1da2e3ebdSchin /***********************************************************************
2da2e3ebdSchin *                                                                      *
3da2e3ebdSchin *               This software is part of the ast package               *
4*b30d1939SAndy Fiddaman *          Copyright (c) 1985-2011 AT&T Intellectual Property          *
5da2e3ebdSchin *                      and is licensed under the                       *
6*b30d1939SAndy Fiddaman *                 Eclipse Public License, Version 1.0                  *
77c2fbfb3SApril Chin *                    by AT&T Intellectual Property                     *
8da2e3ebdSchin *                                                                      *
9da2e3ebdSchin *                A copy of the License is available at                 *
10*b30d1939SAndy Fiddaman *          http://www.eclipse.org/org/documents/epl-v10.html           *
11*b30d1939SAndy Fiddaman *         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *
12da2e3ebdSchin *                                                                      *
13da2e3ebdSchin *              Information and Software Systems Research               *
14da2e3ebdSchin *                            AT&T Research                             *
15da2e3ebdSchin *                           Florham Park NJ                            *
16da2e3ebdSchin *                                                                      *
17da2e3ebdSchin *                 Glenn Fowler <gsf@research.att.com>                  *
18da2e3ebdSchin *                  David Korn <dgk@research.att.com>                   *
19da2e3ebdSchin *                   Phong Vo <kpv@research.att.com>                    *
20da2e3ebdSchin *                                                                      *
21da2e3ebdSchin ***********************************************************************/
22da2e3ebdSchin #pragma prototyped
23da2e3ebdSchin 
24da2e3ebdSchin /*
25da2e3ebdSchin  * return the record format string given a format descriptor
26da2e3ebdSchin  */
27da2e3ebdSchin 
28da2e3ebdSchin #include <recfmt.h>
29da2e3ebdSchin #include <ctype.h>
30da2e3ebdSchin 
31da2e3ebdSchin char*
fmtrec(Recfmt_t f,int fs)32da2e3ebdSchin fmtrec(Recfmt_t f, int fs)
33da2e3ebdSchin {
34da2e3ebdSchin 	char*	b;
35da2e3ebdSchin 	char*	e;
36da2e3ebdSchin 	char*	s;
37da2e3ebdSchin 	long	n;
38da2e3ebdSchin 	char	del[2];
39da2e3ebdSchin 
40da2e3ebdSchin 	b = s = fmtbuf(n = 32);
41da2e3ebdSchin 	e = b + n;
42da2e3ebdSchin 	switch (RECTYPE(f))
43da2e3ebdSchin 	{
44da2e3ebdSchin 	case REC_delimited:
45da2e3ebdSchin 		*s++ = 'd';
46da2e3ebdSchin 		if ((del[0] = REC_D_DELIMITER(f)) != '\n')
47da2e3ebdSchin 		{
48da2e3ebdSchin 			del[1] = 0;
49da2e3ebdSchin 			if (fs)
50da2e3ebdSchin 				sfsprintf(s, e - s, "0x%02x", *(unsigned char*)del);
51da2e3ebdSchin 			else
52da2e3ebdSchin 				sfsprintf(s, e - s, "%s", fmtquote(del, NiL, NiL, 1, 0));
53da2e3ebdSchin 		}
54da2e3ebdSchin 		else
55da2e3ebdSchin 			*s = 0;
56da2e3ebdSchin 		break;
57da2e3ebdSchin 	case REC_fixed:
58da2e3ebdSchin 		if (!fs)
59da2e3ebdSchin 			*s++ = 'f';
60da2e3ebdSchin 		sfsprintf(s, e - s, "%lu", REC_F_SIZE(f));
61da2e3ebdSchin 		break;
62da2e3ebdSchin 	case REC_variable:
63da2e3ebdSchin 		*s++ = 'v';
64da2e3ebdSchin 		if (n = REC_V_SIZE(f))
65da2e3ebdSchin 			s += sfsprintf(s, e - s, "%lu", n);
66da2e3ebdSchin 		if (REC_V_HEADER(f) != 4)
67da2e3ebdSchin 			s += sfsprintf(s, e - s, "h%u", REC_V_HEADER(f));
68da2e3ebdSchin 		if (REC_V_OFFSET(f) != 0)
69da2e3ebdSchin 			s += sfsprintf(s, e - s, "o%u", REC_V_OFFSET(f));
70da2e3ebdSchin 		if (REC_V_LENGTH(f) != 2)
71da2e3ebdSchin 			s += sfsprintf(s, e - s, "z%u", REC_V_LENGTH(f));
72da2e3ebdSchin 		if (REC_V_LITTLE(f) != 0)
73da2e3ebdSchin 			*s++ = 'l';
74da2e3ebdSchin 		if (REC_V_INCLUSIVE(f) == 0)
75da2e3ebdSchin 			*s++ = 'n';
76da2e3ebdSchin 		*s = 0;
77da2e3ebdSchin 		break;
78da2e3ebdSchin 	case REC_method:
79da2e3ebdSchin 		*s++ = 'm';
80da2e3ebdSchin 		switch (n = REC_M_INDEX(f))
81da2e3ebdSchin 		{
82da2e3ebdSchin 		case REC_M_data:
83da2e3ebdSchin 			sfsprintf(s, e - s, "data");
84da2e3ebdSchin 			break;
85da2e3ebdSchin 		case REC_M_path:
86da2e3ebdSchin 			sfsprintf(s, e - s, "path");
87da2e3ebdSchin 			break;
88da2e3ebdSchin 		default:
89da2e3ebdSchin 			sfsprintf(s, e - s, "%lu", n);
90da2e3ebdSchin 			break;
91da2e3ebdSchin 		}
92da2e3ebdSchin 		break;
93da2e3ebdSchin 	case REC_none:
94da2e3ebdSchin 		*s++ = 'n';
95da2e3ebdSchin 		*s = 0;
96da2e3ebdSchin 		break;
97da2e3ebdSchin 	default:
98da2e3ebdSchin 		sfsprintf(s, e - s, "u%u.0x%07x", RECTYPE(f), REC_U_ATTRIBUTES(f));
99da2e3ebdSchin 		break;
100da2e3ebdSchin 	}
101da2e3ebdSchin 	return b;
102da2e3ebdSchin }
103