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 { 48 int i; 49 for (i = 0; i < preserve.num_strings; i++) 50 if (strcmp(preserve.strings[i], p) == 0) 51 return 1; 52 return 0; 53 } 54 55 int 56 seq_type(const char *p) 57 { 58 int i; 59 for (i = 0; i < seq.num_strings; i++) 60 if (strcmp(seq.strings[i], p) == 0) 61 return 1; 62 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 { 89 arg_printusage(args, num_args, NULL, "[asn1-file [name]]"); 90 exit(code); 91 } 92 93 int error_flag; 94 95 int 96 main(int argc, char **argv) 97 { 98 int ret; 99 const char *file; 100 const char *name = NULL; 101 int optidx = 0; 102 char **arg = NULL; 103 size_t len = 0, i; 104 105 setprogname(argv[0]); 106 if(getarg(args, num_args, argc, argv, &optidx)) 107 usage(1); 108 if(help_flag) 109 usage(0); 110 if(version_flag) { 111 print_version(NULL); 112 exit(0); 113 } 114 if (argc == optidx) { 115 file = "stdin"; 116 name = "stdin"; 117 yyin = stdin; 118 } else { 119 file = argv[optidx]; 120 yyin = fopen (file, "r"); 121 if (yyin == NULL) 122 err (1, "open %s", file); 123 if (argc == optidx + 1) { 124 char *p; 125 name = estrdup(file); 126 p = strrchr(name, '.'); 127 if (p) 128 *p = '\0'; 129 } else 130 name = argv[optidx + 1]; 131 } 132 133 /* 134 * Parse extra options file 135 */ 136 if (option_file) { 137 char buf[1024]; 138 FILE *opt; 139 140 opt = fopen(option_file, "r"); 141 if (opt == NULL) { 142 perror("open"); 143 exit(1); 144 } 145 146 arg = calloc(2, sizeof(arg[0])); 147 if (arg == NULL) { 148 perror("calloc"); 149 exit(1); 150 } 151 arg[0] = option_file; 152 arg[1] = NULL; 153 len = 1; 154 155 while (fgets(buf, sizeof(buf), opt) != NULL) { 156 buf[strcspn(buf, "\n\r")] = '\0'; 157 158 arg = realloc(arg, (len + 2) * sizeof(arg[0])); 159 if (arg == NULL) { 160 perror("malloc"); 161 exit(1); 162 } 163 arg[len] = strdup(buf); 164 if (arg[len] == NULL) { 165 perror("strdup"); 166 exit(1); 167 } 168 arg[len + 1] = NULL; 169 len++; 170 } 171 fclose(opt); 172 173 optidx = 0; 174 if(getarg(args, num_args, len, arg, &optidx)) 175 usage(1); 176 177 if (len != optidx) { 178 fprintf(stderr, "extra args"); 179 exit(1); 180 } 181 } 182 183 184 init_generate (file, name); 185 186 if (one_code_file) 187 generate_header_of_codefile(name); 188 189 initsym (); 190 ret = yyparse (); 191 if(ret != 0 || error_flag != 0) 192 exit(1); 193 close_generate (); 194 if (argc != optidx) 195 fclose(yyin); 196 197 if (one_code_file) 198 close_codefile(); 199 200 if (arg) { 201 for (i = 1; i < len; i++) 202 free(arg[i]); 203 free(arg); 204 } 205 206 return 0; 207 } 208