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
88
89
90
91
92
93
94
95
|
#include "asn1c_internal.h"
#include "asn1c_out.h"
/*
* Add an elementary chunk of target language text
* into appropriate output stream.
*/
int
asn1c_compiled_output(arg_t *arg, const char *fmt, ...) {
struct compiler_stream_destination_s *dst;
const char *p;
int lf_found;
va_list ap;
out_chunk_t *m;
int ret;
switch(arg->target->target) {
case OT_IGNORE:
return 0;
default:
dst = &arg->target->destination[arg->target->target];
break;
}
/*
* Make sure the output has a single LF and only at the end.
*/
for(lf_found = 0, p = fmt; *p; p++) {
if(*p == '\n') {
lf_found++;
assert(p[1] == '\0');
}
}
assert(lf_found <= 1);
/*
* Print out the indentation.
*/
if(dst->indented == 0) {
int i = dst->indent_level;
dst->indented = 1;
while(i--) {
ret = asn1c_compiled_output(arg, "\t");
if(ret == -1) return -1;
}
}
if(lf_found)
dst->indented = 0;
/*
* Allocate buffer.
*/
m = calloc(1, sizeof(out_chunk_t));
if(m == NULL) return -1;
m->len = 16;
do {
void *tmp;
m->len <<= 2;
tmp = realloc(m->buf, m->len);
if(tmp) {
m->buf = (char *)tmp;
} else {
free(m->buf);
free(m);
return -1;
}
va_start(ap, fmt);
ret = vsnprintf(m->buf, m->len, fmt, ap);
va_end(ap);
} while(ret >= (m->len - 1) || ret < 0);
m->len = ret;
if(arg->target->target == OT_INCLUDES
|| arg->target->target == OT_FWD_DECLS
|| arg->target->target == OT_POST_INCLUDE) {
out_chunk_t *v;
TQ_FOR(v, &dst->chunks, next) {
if(m->len == v->len
&& !memcmp(m->buf, v->buf, m->len))
break;
}
if(v) {
/* Entry is already present. Skip it. */
free(m->buf);
free(m);
return 0;
}
}
TQ_ADD(&dst->chunks, m, next);
return 0;
}
|
