old-cross-binutils/gas/output-file.c

155 lines
3.3 KiB
C
Raw Normal View History

1999-05-03 07:29:11 +00:00
/* output-file.c - Deal with the output file
Copyright 1987, 1990, 1991, 1992, 1993, 1994, 1996, 1998, 1999, 2001, 2003
1999-05-03 07:29:11 +00:00
Free Software Foundation, Inc.
This file is part of GAS, the GNU Assembler.
GAS is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
GAS is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GAS; see the file COPYING. If not, write to
the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
02111-1307, USA. */
1999-05-03 07:29:11 +00:00
#include <stdio.h>
#include "as.h"
#include "output-file.h"
#ifdef BFD_HEADERS
#define USE_BFD
#endif
#ifdef BFD_ASSEMBLER
#define USE_BFD
#ifndef TARGET_MACH
#define TARGET_MACH 0
#endif
#endif
#ifdef USE_BFD
#include "bfd.h"
bfd *stdoutput;
void
output_file_create (char *name)
1999-05-03 07:29:11 +00:00
{
if (name[0] == '-' && name[1] == '\0')
as_fatal (_("can't open a bfd on stdout %s"), name);
1999-05-03 07:29:11 +00:00
else if (!(stdoutput = bfd_openw (name, TARGET_FORMAT)))
{
as_perror (_("FATAL: can't create %s"), name);
1999-05-03 07:29:11 +00:00
exit (EXIT_FAILURE);
}
1999-05-03 07:29:11 +00:00
bfd_set_format (stdoutput, bfd_object);
#ifdef BFD_ASSEMBLER
bfd_set_arch_mach (stdoutput, TARGET_ARCH, TARGET_MACH);
#endif
if (flag_traditional_format)
stdoutput->flags |= BFD_TRADITIONAL_FORMAT;
}
void
output_file_close (char *filename)
1999-05-03 07:29:11 +00:00
{
#ifdef BFD_ASSEMBLER
/* Close the bfd. */
if (bfd_close (stdoutput) == 0)
{
bfd_perror (filename);
as_perror (_("FATAL: can't close %s\n"), filename);
1999-05-03 07:29:11 +00:00
exit (EXIT_FAILURE);
}
#else
/* Close the bfd without getting bfd to write out anything by itself. */
1999-05-03 07:29:11 +00:00
if (bfd_close_all_done (stdoutput) == 0)
{
as_perror (_("FATAL: can't close %s\n"), filename);
1999-05-03 07:29:11 +00:00
exit (EXIT_FAILURE);
}
#endif
stdoutput = NULL; /* Trust nobody! */
1999-05-03 07:29:11 +00:00
}
#ifndef BFD_ASSEMBLER
void
output_file_append (char *where ATTRIBUTE_UNUSED,
long length ATTRIBUTE_UNUSED,
char *filename ATTRIBUTE_UNUSED)
1999-05-03 07:29:11 +00:00
{
abort ();
}
#endif
#else
static FILE *stdoutput;
void
output_file_create (char *name)
1999-05-03 07:29:11 +00:00
{
if (name[0] == '-' && name[1] == '\0')
{
stdoutput = stdout;
return;
}
stdoutput = fopen (name, FOPEN_WB);
1999-05-03 07:29:11 +00:00
if (stdoutput == NULL)
{
#ifdef BFD_ASSEMBLER
bfd_set_error (bfd_error_system_call);
#endif
as_perror (_("FATAL: can't create %s"), name);
1999-05-03 07:29:11 +00:00
exit (EXIT_FAILURE);
}
}
void
output_file_close (char *filename)
1999-05-03 07:29:11 +00:00
{
if (EOF == fclose (stdoutput))
{
#ifdef BFD_ASSEMBLER
bfd_set_error (bfd_error_system_call);
#endif
as_perror (_("FATAL: can't close %s"), filename);
1999-05-03 07:29:11 +00:00
exit (EXIT_FAILURE);
}
/* Trust nobody! */
stdoutput = NULL;
1999-05-03 07:29:11 +00:00
}
void
output_file_append (char * where, long length, char * filename)
1999-05-03 07:29:11 +00:00
{
for (; length; length--, where++)
{
(void) putc (*where, stdoutput);
1999-05-03 07:29:11 +00:00
if (ferror (stdoutput))
{
#ifdef BFD_ASSEMBLER
bfd_set_error (bfd_error_system_call);
#endif
1999-05-03 07:29:11 +00:00
as_perror (_("Failed to emit an object byte"), filename);
as_fatal (_("can't continue"));
1999-05-03 07:29:11 +00:00
}
}
}
#endif