2 * Copyright (c) 1989 The Regents of the University of California.
5 * This code is derived from software contributed to Berkeley by
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
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 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * @(#) Copyright (c) 1989 The Regents of the University of California. All rights reserved.
37 * @(#)main.c 5.5 (Berkeley) 5/24/93
38 * $FreeBSD: src/usr.bin/yacc/main.c,v 1.12 2000/01/10 20:26:24 kris Exp $
39 * $DragonFly: src/usr.bin/yacc/main.c,v 1.6 2006/01/22 13:38:50 swildner Exp $
54 const char *symbol_prefix;
55 const char *file_prefix = "y";
56 const char *temp_form = "yacc.XXXXXXXXXXX";
61 char *action_file_name;
63 char *defines_file_name;
64 const char *input_file_name = "";
65 char *output_file_name;
67 char *union_file_name;
68 char *verbose_file_name;
70 FILE *action_file; /* a temp file, used to save actions associated */
71 /* with rules until the parser is written */
72 FILE *code_file; /* y.code.c (used when the -r option is specified) */
73 FILE *defines_file; /* y.tab.h */
74 FILE *input_file; /* the input file */
75 FILE *output_file; /* y.tab.c */
76 FILE *text_file; /* a temp file, used to save text until all */
77 /* symbols have been defined */
78 FILE *union_file; /* a temp file, used to save the union */
79 /* definition until all symbol have been */
81 FILE *verbose_file; /* y.output */
103 static void cleanup(void);
104 static void create_file_names(void);
105 static void getargs(int, char **);
106 static void onintr(int);
107 static void open_files(void);
108 static void set_signals(void);
109 static void usage(void);
115 if (action_file) { fclose(action_file); unlink(action_file_name); }
116 if (text_file) { fclose(text_file); unlink(text_file_name); }
117 if (union_file) { fclose(union_file); unlink(union_file_name); }
122 onintr(int signo __unused)
125 unlink(action_file_name);
127 unlink(text_file_name);
129 unlink(union_file_name);
138 if (signal(SIGINT, SIG_IGN) != SIG_IGN)
139 signal(SIGINT, onintr);
142 if (signal(SIGTERM, SIG_IGN) != SIG_IGN)
143 signal(SIGTERM, onintr);
146 if (signal(SIGHUP, SIG_IGN) != SIG_IGN)
147 signal(SIGHUP, onintr);
155 fprintf(stderr, "%s\n%s\n",
156 "usage: yacc [-dlrtv] [-b file_prefix] [-o output_filename]",
157 " [-p symbol_prefix] filename");
163 getargs(int argc, char **argv)
168 for (i = 1; i < argc; ++i)
171 if (*s != '-') break;
176 if (i + 1 < argc) usage();
181 goto no_more_options;
187 file_prefix = argv[i];
202 output_file_name = s;
204 output_file_name = argv[i];
213 symbol_prefix = argv[i];
269 if (i + 1 != argc) usage();
270 input_file_name = argv[i];
290 create_file_names(void)
295 tmpdir = getenv("TMPDIR");
296 if (tmpdir == 0) tmpdir = "/tmp";
298 len = strlen(tmpdir);
300 if (len && tmpdir[len-1] != '/')
303 action_file_name = MALLOC(i);
304 if (action_file_name == 0) no_space();
305 text_file_name = MALLOC(i);
306 if (text_file_name == 0) no_space();
307 union_file_name = MALLOC(i);
308 if (union_file_name == 0) no_space();
310 strcpy(action_file_name, tmpdir);
311 strcpy(text_file_name, tmpdir);
312 strcpy(union_file_name, tmpdir);
314 if (len && tmpdir[len - 1] != '/')
316 action_file_name[len] = '/';
317 text_file_name[len] = '/';
318 union_file_name[len] = '/';
322 strcpy(action_file_name + len, temp_form);
323 strcpy(text_file_name + len, temp_form);
324 strcpy(union_file_name + len, temp_form);
326 action_file_name[len + 5] = 'a';
327 text_file_name[len + 5] = 't';
328 union_file_name[len + 5] = 'u';
330 if (output_file_name != 0)
332 file_prefix = output_file_name;
333 len = strlen(file_prefix);
337 len = strlen(file_prefix);
338 output_file_name = MALLOC(len + 7);
339 if (output_file_name == 0)
341 strcpy(output_file_name, file_prefix);
342 strcpy(output_file_name + len, OUTPUT_SUFFIX);
347 code_file_name = MALLOC(len + 8);
348 if (code_file_name == 0)
350 strcpy(code_file_name, file_prefix);
351 if (file_prefix == output_file_name)
354 * XXX ".tab.c" here is OUTPUT_SUFFIX, but since its length is
355 * in various magic numbers, don't bother using the macro.
357 if (len >= 6 && strcmp(code_file_name + len - 6, ".tab.c") == 0)
358 strcpy(code_file_name + len - 6, CODE_SUFFIX);
359 else if (len >= 2 && strcmp(code_file_name + len - 2, ".c") == 0)
360 strcpy(code_file_name + len - 2, CODE_SUFFIX);
362 strcpy(code_file_name + len, CODE_SUFFIX);
365 strcpy(code_file_name + len, CODE_SUFFIX);
368 code_file_name = output_file_name;
372 defines_file_name = MALLOC(len + 7);
373 if (defines_file_name == 0)
375 strcpy(defines_file_name, file_prefix);
376 if (file_prefix == output_file_name)
378 #define BISON_DEFINES_SUFFIX ".h"
379 if (len >= 2 && strcmp(defines_file_name + len - 2, ".c") == 0)
380 strcpy(defines_file_name + len - 2, BISON_DEFINES_SUFFIX);
382 strcpy(defines_file_name + len, BISON_DEFINES_SUFFIX);
385 strcpy(defines_file_name + len, DEFINES_SUFFIX);
390 verbose_file_name = MALLOC(len + 8);
391 if (verbose_file_name == 0)
393 strcpy(verbose_file_name, file_prefix);
394 if (file_prefix == output_file_name)
396 if (len >= 6 && strcmp(verbose_file_name + len - 6, ".tab.c") == 0)
397 strcpy(verbose_file_name + len - 6, VERBOSE_SUFFIX);
398 else if (len >= 2 && strcmp(verbose_file_name + len - 2, ".c") == 0)
399 strcpy(verbose_file_name + len - 2, VERBOSE_SUFFIX);
401 strcpy(verbose_file_name + len, VERBOSE_SUFFIX);
404 strcpy(verbose_file_name + len, VERBOSE_SUFFIX);
418 input_file = fopen(input_file_name, "r");
420 open_error(input_file_name);
423 fd = mkstemp(action_file_name);
424 if (fd < 0 || (action_file = fdopen(fd, "w")) == NULL) {
427 open_error(action_file_name);
429 fd = mkstemp(text_file_name);
430 if (fd < 0 || (text_file = fdopen(fd, "w")) == NULL) {
433 open_error(text_file_name);
435 fd = mkstemp(union_file_name);
436 if (fd < 0 || (union_file = fdopen(fd, "w")) == NULL) {
439 open_error(union_file_name);
442 text_file = fopen(text_file_name, "w");
444 open_error(text_file_name);
448 verbose_file = fopen(verbose_file_name, "w");
449 if (verbose_file == 0)
450 open_error(verbose_file_name);
455 defines_file = fopen(defines_file_name, "w");
456 if (defines_file == 0)
457 open_error(defines_file_name);
458 union_file = fopen(union_file_name, "w");
460 open_error(union_file_name);
463 output_file = fopen(output_file_name, "w");
464 if (output_file == 0)
465 open_error(output_file_name);
469 code_file = fopen(code_file_name, "w");
471 open_error(code_file_name);
474 code_file = output_file;
479 main(int argc, char **argv)