1 /* output-file.c - Deal with the output file
2 Copyright 1987, 1990, 1991, 1992, 1993, 1994, 1996, 1998, 1999, 2001
3 Free Software Foundation, Inc.
5 This file is part of GAS, the GNU Assembler.
7 GAS is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 GAS is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GAS; see the file COPYING. If not, write to
19 the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
26 #include "output-file.h"
44 output_file_create (name
)
47 if (name
[0] == '-' && name
[1] == '\0')
48 as_fatal (_("Can't open a bfd on stdout %s "), name
);
50 else if (!(stdoutput
= bfd_openw (name
, TARGET_FORMAT
)))
52 as_perror (_("FATAL: Can't create %s"), name
);
56 bfd_set_format (stdoutput
, bfd_object
);
58 bfd_set_arch_mach (stdoutput
, TARGET_ARCH
, TARGET_MACH
);
60 if (flag_traditional_format
)
61 stdoutput
->flags
|= BFD_TRADITIONAL_FORMAT
;
65 output_file_close (filename
)
70 if (bfd_close (stdoutput
) == 0)
72 bfd_perror (filename
);
73 as_perror (_("FATAL: Can't close %s\n"), filename
);
77 /* Close the bfd without getting bfd to write out anything by itself. */
78 if (bfd_close_all_done (stdoutput
) == 0)
80 as_perror (_("FATAL: Can't close %s\n"), filename
);
84 stdoutput
= NULL
; /* Trust nobody! */
89 output_file_append (where
, length
, filename
)
90 char *where ATTRIBUTE_UNUSED
;
91 long length ATTRIBUTE_UNUSED
;
92 char *filename ATTRIBUTE_UNUSED
;
100 static FILE *stdoutput
;
103 output_file_create (name
)
106 if (name
[0] == '-' && name
[1] == '\0')
112 stdoutput
= fopen (name
, FOPEN_WB
);
114 /* Some systems don't grok "b" in fopen modes. */
115 /* XXX - is this still necessary now that we use FOPEN_WB ? */
116 if (stdoutput
== NULL
)
117 stdoutput
= fopen (name
, FOPEN_W
);
119 if (stdoutput
== NULL
)
121 as_perror (_("FATAL: Can't create %s"), name
);
127 output_file_close (filename
)
130 if (EOF
== fclose (stdoutput
))
132 as_perror (_("FATAL: Can't close %s"), filename
);
141 output_file_append (where
, length
, filename
)
146 for (; length
; length
--, where
++)
148 (void) putc (*where
, stdoutput
);
150 if (ferror (stdoutput
))
151 /* if ( EOF == (putc( *where, stdoutput )) ) */
153 as_perror (_("Failed to emit an object byte"), filename
);
154 as_fatal (_("Can't continue"));