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 : preserve_type(const char *p)
47 1172 : {
48 : int i;
49 1944 : for (i = 0; i < preserve.num_strings; i++)
50 796 : if (strcmp(preserve.strings[i], p) == 0)
51 24 : return 1;
52 1148 : return 0;
53 : }
54 :
55 : int
56 : seq_type(const char *p)
57 293 : {
58 : int i;
59 916 : for (i = 0; i < seq.num_strings; i++)
60 632 : if (strcmp(seq.strings[i], p) == 0)
61 9 : return 1;
62 284 : 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 : usage(int code)
88 0 : {
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 : main(int argc, char **argv)
97 14 : {
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 11 : while (fgets(buf, sizeof(buf), opt) != NULL) {
156 7 : buf[strcspn(buf, "\n\r")] = '\0';
157 :
158 7 : arg = realloc(arg, (len + 2) * sizeof(arg[0]));
159 7 : if (arg == NULL) {
160 0 : perror("malloc");
161 0 : exit(1);
162 : }
163 7 : arg[len] = strdup(buf);
164 7 : if (arg[len] == NULL) {
165 0 : perror("strdup");
166 0 : exit(1);
167 : }
168 7 : arg[len + 1] = NULL;
169 7 : 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 9 : for (i = 1; i < len; i++)
202 7 : free(arg[i]);
203 2 : free(arg);
204 : }
205 :
206 14 : return 0;
207 : }
|