1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
|
// This is a component of emc
// Copyright © 2009 Jeff Epler
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#ifndef EXTRA
#define EXTRA
#endif
const char *fmt, *efmt;
int result;
result = dbuf_get_string(o, &fmt);
if(result < 0) return result;
if(*fmt) fmt = gettext(fmt);
while((efmt = strchr(fmt, '%'))) {
int modifier_l;
int code = get_code(&efmt, &modifier_l);
int fmt_len = efmt - fmt;
char *block = alloca(fmt_len + 1);
memcpy(block, fmt, fmt_len);
block[fmt_len] = 0;
switch(code) {
case '%':
result = PRINT("%s", block);
break;
case 'c': case 'd': case 'i': case 'x': case 'u': case 'X':
if(modifier_l)
case 'p':
{
long l;
result = dbuf_get_long(o, &l);
if(result < 0) return SET_ERRNO(result);
result = PRINT(block, l);
} else {
int i;
result = dbuf_get_int(o, &i);
if(result < 0) return SET_ERRNO(result);
result = PRINT(block, i);
}
break;
case 'e': case 'E': case 'f': case 'F': case 'g': case 'G':
{
double d;
result = dbuf_get_double(o, &d);
if(result < 0) return SET_ERRNO(result);
result = PRINT(block, d);
}
break;
case 's':
{
const char *s;
result = dbuf_get_string(o, &s);
if(result < 0) return SET_ERRNO(result);
if(*s) s = gettext(s);
result = PRINT(block, s);
}
break;
}
if(result < 0) return SET_ERRNO(result);
EXTRA
fmt = efmt;
}
if(*fmt) {
result = PRINT("%s", fmt);
if(result < 0) return SET_ERRNO(result);
EXTRA
}
return SET_ERRNO(result);
#undef PRINT
#undef EXTRA
|
