Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
att
GitHub Repository: att/ast
 Path: blob/master/src/lib/libast/misc/fmtrec.c
1810 views
1
/***********************************************************************

2
*                                                                      *

3
*               This software is part of the ast package               *

4
*          Copyright (c) 1985-2011 AT&T Intellectual Property          *

5
*                      and is licensed under the                       *

6
*                 Eclipse Public License, Version 1.0                  *

7
*                    by AT&T Intellectual Property                     *

8
*                                                                      *

9
*                A copy of the License is available at                 *

10
*          http://www.eclipse.org/org/documents/epl-v10.html           *

11
*         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *

12
*                                                                      *

13
*              Information and Software Systems Research               *

14
*                            AT&T Research                             *

15
*                           Florham Park NJ                            *

16
*                                                                      *

17
*                 Glenn Fowler <[email protected]>                  *

18
*                  David Korn <[email protected]>                   *

19
*                   Phong Vo <[email protected]>                    *

20
*                                                                      *

21
***********************************************************************/

22
#pragma prototyped

23


24
/*

25
 * return the record format string given a format descriptor

26
 */

27


28
#include <recfmt.h>

29
#include <ctype.h>

30


31
char*

32
fmtrec(Recfmt_t f, int fs)

33
{

34
	char*	b;

35
	char*	e;

36
	char*	s;

37
	long	n;

38
	char	del[2];

39


40
	b = s = fmtbuf(n = 32);

41
	e = b + n;

42
	switch (RECTYPE(f))

43
	{

44
	case REC_delimited:

45
		*s++ = 'd';

46
		if ((del[0] = REC_D_DELIMITER(f)) != '\n')

47
		{

48
			del[1] = 0;

49
			if (fs)

50
				sfsprintf(s, e - s, "0x%02x", *(unsigned char*)del);

51
			else

52
				sfsprintf(s, e - s, "%s", fmtquote(del, NiL, NiL, 1, 0));

53
		}

54
		else

55
			*s = 0;

56
		break;

57
	case REC_fixed:

58
		if (!fs)

59
			*s++ = 'f';

60
		sfsprintf(s, e - s, "%lu", REC_F_SIZE(f));

61
		break;

62
	case REC_variable:

63
		*s++ = 'v';

64
		if (n = REC_V_SIZE(f))

65
			s += sfsprintf(s, e - s, "%lu", n);

66
		if (REC_V_HEADER(f) != 4)

67
			s += sfsprintf(s, e - s, "h%u", REC_V_HEADER(f));

68
		if (REC_V_OFFSET(f) != 0)

69
			s += sfsprintf(s, e - s, "o%u", REC_V_OFFSET(f));

70
		if (REC_V_LENGTH(f) != 2)

71
			s += sfsprintf(s, e - s, "z%u", REC_V_LENGTH(f));

72
		if (REC_V_LITTLE(f) != 0)

73
			*s++ = 'l';

74
		if (REC_V_INCLUSIVE(f) == 0)

75
			*s++ = 'n';

76
		*s = 0;

77
		break;

78
	case REC_method:

79
		*s++ = 'm';

80
		switch (n = REC_M_INDEX(f))

81
		{

82
		case REC_M_data:

83
			sfsprintf(s, e - s, "data");

84
			break;

85
		case REC_M_path:

86
			sfsprintf(s, e - s, "path");

87
			break;

88
		default:

89
			sfsprintf(s, e - s, "%lu", n);

90
			break;

91
		}

92
		break;

93
	case REC_none:

94
		*s++ = 'n';

95
		*s = 0;

96
		break;

97
	default:

98
		sfsprintf(s, e - s, "u%u.0x%07x", RECTYPE(f), REC_U_ATTRIBUTES(f));

99
		break;

100
	}

101
	return b;

102
}

103


104