X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/82129ef5d5932d207d100c731de6de4aeb5c9a15..d2ffe11637313569116e8a9f891785b842ddb1e9:/src/files.c diff --git a/src/files.c b/src/files.c index e92771ff..6c222a87 100644 --- a/src/files.c +++ b/src/files.c @@ -1,6 +1,6 @@ /* Open and close files for Bison. - Copyright (C) 1984, 1986, 1989, 1992, 2000, 2001, 2002 + Copyright (C) 1984, 1986, 1989, 1992, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. This file is part of Bison, the GNU Compiler Compiler. @@ -25,6 +25,7 @@ #include #include +#include #include "complain.h" #include "files.h" @@ -118,9 +119,9 @@ xfclose (FILE *ptr) } -/*----------------------------------------------------------------. -| Compute BASE_NAME, SHORT_BASE_NAME and output files extensions. | -`----------------------------------------------------------------*/ +/*---------------------------------------------------------------------. +| Compute FULL_BASE_NAME, SHORT_BASE_NAME and output files extensions. | +`---------------------------------------------------------------------*/ /* Replace all characters FROM by TO in the string IN. and returns a new allocated string. */ @@ -139,7 +140,7 @@ tr (const char *in, char from, char to) return (temp); } -/* Computes extensions from the grammar file extension. */ +/* Compute extensions from the grammar file extension. */ static void compute_exts_from_gf (const char *ext) { @@ -149,7 +150,7 @@ compute_exts_from_gf (const char *ext) header_extension = tr (header_extension, 'Y', 'H'); } -/* Computes extensions from the given c source file extension. */ +/* Compute extensions from the given c source file extension. */ static void compute_exts_from_src (const char *ext) { @@ -222,10 +223,10 @@ compute_base_names (void) const char *base, *tab, *ext; /* If --output=foo.c was specified (SPEC_OUTFILE == foo.c), - BASE_NAME and SHORT_BASE_NAME are `foo'. + FULL_BASE_NAME and SHORT_BASE_NAME are `foo'. - If --output=foo.tab.c was specified, BASE_NAME is `foo.tab' and - SHORT_BASE_NAME is `foo'. + If --output=foo.tab.c was specified, FULL_BASE_NAME is `foo.tab' + and SHORT_BASE_NAME is `foo'. The precise -o name will be used for FTABLE. For other output files, remove the ".c" or ".tab.c" suffix. */ @@ -279,20 +280,25 @@ compute_base_names (void) + strlen (TAB_EXT) + 1); stpcpy (stpcpy (full_base_name, short_base_name), TAB_EXT); - /* Computes the extensions from the grammar file name. */ + /* Compute the extensions from the grammar file name. */ filename_split (grammar_file, &base, &tab, &ext); if (ext && !yacc_flag) compute_exts_from_gf (ext); } } -/*-------------------------------------------------------. -| Close the open files, compute the output files names. | -`-------------------------------------------------------*/ + +/* Compute the output file names. Warn if we detect conflicting + outputs to the same file. */ void compute_output_file_names (void) { + char const *name[4]; + int i; + int j; + int names = 0; + compute_base_names (); /* If not yet done. */ @@ -301,16 +307,31 @@ compute_output_file_names (void) if (!header_extension) header_extension = ".h"; - parser_file_name = + name[names++] = parser_file_name = spec_outfile ? spec_outfile : concat2 (full_base_name, src_extension); - /* It the defines filename if not given, we create it. */ - if (!spec_defines_file) - spec_defines_file = concat2 (full_base_name, header_extension); + if (defines_flag) + { + if (! spec_defines_file) + spec_defines_file = concat2 (full_base_name, header_extension); + name[names++] = spec_defines_file; + } - /* It the graph filename if not given, we create it. */ - if (!spec_graph_file) - spec_graph_file = concat2 (short_base_name, ".vcg"); + if (graph_flag) + { + if (! spec_graph_file) + spec_graph_file = concat2 (short_base_name, ".vcg"); + name[names++] = spec_graph_file; + } + + if (report_flag) + { + spec_verbose_file = concat2 (short_base_name, OUTPUT_EXT); + name[names++] = spec_verbose_file; + } - spec_verbose_file = concat2 (short_base_name, OUTPUT_EXT); + for (j = 0; j < names; j++) + for (i = 0; i < j; i++) + if (strcmp (name[i], name[j]) == 0) + warn (_("conflicting outputs to file %s"), quote (name[i])); }