/* 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, 2004, 2005
Free Software Foundation, Inc.
This file is part of Bison, the GNU Compiler Compiler.
You should have received a copy of the GNU General Public License
along with Bison; see the file COPYING. If not, write to the Free
- Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
- 02111-1307, USA. */
+ Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+ 02110-1301, USA. */
#include "system.h"
#include <error.h>
#include <get-errno.h>
+#include <quote.h>
+#include <xstrndup.h>
#include "complain.h"
#include "files.h"
#include "getargs.h"
#include "gram.h"
+#include "stdio-safer.h"
/* From basename.c. Almost a lie, as it returns a char *. */
const char *base_name (char const *name);
char *short_base_name = NULL;
/* C source file extension (the parser source). */
-const char *src_extension = NULL;
+static char const *src_extension = NULL;
/* Header file extension (if option ``-d'' is specified). */
-const char *header_extension = NULL;
+static char const *header_extension = NULL;
\f
/*-----------------------------------------------------------------.
| Return a newly allocated string composed of the concatenation of |
{
FILE *ptr;
- ptr = fopen (name, mode);
+ ptr = fopen_safer (name, mode);
if (!ptr)
error (EXIT_FAILURE, get_errno (), _("cannot open file `%s'"), name);
}
\f
-/*----------------------------------------------------------------.
-| 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. */
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)
{
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)
{
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. */
+ 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. */
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]));
}