Branch data Line data Source code
1 : : /*
2 : : * Copyright (c) 1997-2005 Kungliga Tekniska Högskolan
3 : : * (Royal Institute of Technology, Stockholm, Sweden).
4 : : * All rights reserved.
5 : : *
6 : : * Redistribution and use in source and binary forms, with or without
7 : : * modification, are permitted provided that the following conditions
8 : : * are met:
9 : : *
10 : : * 1. Redistributions of source code must retain the above copyright
11 : : * notice, this list of conditions and the following disclaimer.
12 : : *
13 : : * 2. Redistributions in binary form must reproduce the above copyright
14 : : * notice, this list of conditions and the following disclaimer in the
15 : : * documentation and/or other materials provided with the distribution.
16 : : *
17 : : * 3. Neither the name of the Institute nor the names of its contributors
18 : : * may be used to endorse or promote products derived from this software
19 : : * without specific prior written permission.
20 : : *
21 : : * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22 : : * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 : : * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 : : * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25 : : * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 : : * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 : : * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 : : * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 : : * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 : : * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 : : * SUCH DAMAGE.
32 : : */
33 : :
34 : : #include "gen_locl.h"
35 : : #include <getarg.h>
36 : : #include "lex.h"
37 : :
38 : : RCSID("$Id$");
39 : :
40 : : extern FILE *yyin;
41 : :
42 : : static getarg_strings preserve;
43 : : static getarg_strings seq;
44 : :
45 : : int
46 : 1184 : preserve_type(const char *p)
47 : : {
48 : : int i;
49 [ + + ]: 1968 : for (i = 0; i < preserve.num_strings; i++)
50 [ + + ]: 808 : if (strcmp(preserve.strings[i], p) == 0)
51 : 24 : return 1;
52 : 1184 : return 0;
53 : : }
54 : :
55 : : int
56 : 296 : seq_type(const char *p)
57 : : {
58 : : int i;
59 [ + + ]: 990 : for (i = 0; i < seq.num_strings; i++)
60 [ + + ]: 706 : if (strcmp(seq.strings[i], p) == 0)
61 : 12 : return 1;
62 : 296 : return 0;
63 : : }
64 : :
65 : : int support_ber;
66 : : int template_flag;
67 : : int rfc1510_bitstring;
68 : : int one_code_file;
69 : : char *option_file;
70 : : int version_flag;
71 : : int help_flag;
72 : : struct getargs args[] = {
73 : : { "template", 0, arg_flag, &template_flag },
74 : : { "encode-rfc1510-bit-string", 0, arg_flag, &rfc1510_bitstring },
75 : : { "decode-dce-ber", 0, arg_flag, &support_ber },
76 : : { "support-ber", 0, arg_flag, &support_ber },
77 : : { "preserve-binary", 0, arg_strings, &preserve },
78 : : { "sequence", 0, arg_strings, &seq },
79 : : { "one-code-file", 0, arg_flag, &one_code_file },
80 : : { "option-file", 0, arg_string, &option_file },
81 : : { "version", 0, arg_flag, &version_flag },
82 : : { "help", 0, arg_flag, &help_flag }
83 : : };
84 : : int num_args = sizeof(args) / sizeof(args[0]);
85 : :
86 : : static void
87 : 0 : usage(int code)
88 : : {
89 : 0 : arg_printusage(args, num_args, NULL, "[asn1-file [name]]");
90 : 0 : exit(code);
91 : : }
92 : :
93 : : int error_flag;
94 : :
95 : : int
96 : 14 : main(int argc, char **argv)
97 : : {
98 : : int ret;
99 : : const char *file;
100 : 14 : const char *name = NULL;
101 : 14 : int optidx = 0;
102 : 14 : char **arg = NULL;
103 : 14 : size_t len = 0, i;
104 : :
105 : 14 : setprogname(argv[0]);
106 [ - + ]: 14 : if(getarg(args, num_args, argc, argv, &optidx))
107 : 0 : usage(1);
108 [ - + ]: 14 : if(help_flag)
109 : 0 : usage(0);
110 [ - + ]: 14 : if(version_flag) {
111 : 0 : print_version(NULL);
112 : 0 : exit(0);
113 : : }
114 [ - + ]: 14 : if (argc == optidx) {
115 : 0 : file = "stdin";
116 : 0 : name = "stdin";
117 : 0 : yyin = stdin;
118 : : } else {
119 : 14 : file = argv[optidx];
120 : 14 : yyin = fopen (file, "r");
121 [ - + ]: 14 : if (yyin == NULL)
122 : 0 : err (1, "open %s", file);
123 [ - + ]: 14 : if (argc == optidx + 1) {
124 : : char *p;
125 : 0 : name = estrdup(file);
126 : 0 : p = strrchr(name, '.');
127 [ # # ]: 0 : if (p)
128 : 0 : *p = '\0';
129 : : } else
130 : 14 : name = argv[optidx + 1];
131 : : }
132 : :
133 : : /*
134 : : * Parse extra options file
135 : : */
136 [ + + ]: 14 : if (option_file) {
137 : : char buf[1024];
138 : : FILE *opt;
139 : :
140 : 2 : opt = fopen(option_file, "r");
141 [ - + ]: 2 : if (opt == NULL) {
142 : 0 : perror("open");
143 : 0 : exit(1);
144 : : }
145 : :
146 : 2 : arg = calloc(2, sizeof(arg[0]));
147 [ - + ]: 2 : if (arg == NULL) {
148 : 0 : perror("calloc");
149 : 0 : exit(1);
150 : : }
151 : 2 : arg[0] = option_file;
152 : 2 : arg[1] = NULL;
153 : 2 : len = 1;
154 : :
155 [ + + ]: 10 : while (fgets(buf, sizeof(buf), opt) != NULL) {
156 : 8 : buf[strcspn(buf, "\n\r")] = '\0';
157 : :
158 : 8 : arg = realloc(arg, (len + 2) * sizeof(arg[0]));
159 [ - + ]: 8 : if (arg == NULL) {
160 : 0 : perror("malloc");
161 : 0 : exit(1);
162 : : }
163 : 8 : arg[len] = strdup(buf);
164 [ - + ]: 8 : if (arg[len] == NULL) {
165 : 0 : perror("strdup");
166 : 0 : exit(1);
167 : : }
168 : 8 : arg[len + 1] = NULL;
169 : 8 : len++;
170 : : }
171 : 2 : fclose(opt);
172 : :
173 : 2 : optidx = 0;
174 [ - + ]: 2 : if(getarg(args, num_args, len, arg, &optidx))
175 : 0 : usage(1);
176 : :
177 [ - + ]: 2 : if (len != optidx) {
178 : 0 : fprintf(stderr, "extra args");
179 : 0 : exit(1);
180 : : }
181 : : }
182 : :
183 : :
184 : 14 : init_generate (file, name);
185 : :
186 [ + - ]: 14 : if (one_code_file)
187 : 14 : generate_header_of_codefile(name);
188 : :
189 : 14 : initsym ();
190 : 14 : ret = yyparse ();
191 [ + - ][ - + ]: 14 : if(ret != 0 || error_flag != 0)
192 : 0 : exit(1);
193 : 14 : close_generate ();
194 [ + - ]: 14 : if (argc != optidx)
195 : 14 : fclose(yyin);
196 : :
197 [ + - ]: 14 : if (one_code_file)
198 : 14 : close_codefile();
199 : :
200 [ + + ]: 14 : if (arg) {
201 [ + + ]: 10 : for (i = 1; i < len; i++)
202 : 8 : free(arg[i]);
203 : 2 : free(arg);
204 : : }
205 : :
206 : 14 : return 0;
207 : : }
|