output-file.c revision 78828 
1/* output-file.c -  Deal with the output file
2   Copyright 1987, 1990, 1991, 1992, 1993, 1994, 1996, 1998, 1999
3   Free Software Foundation, Inc.
4
5   This file is part of GAS, the GNU Assembler.
6
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)
10   any later version.
11
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.
16
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 02111-1307, USA.  */
20
21#include <stdio.h>
22
23#include "as.h"
24
25#include "output-file.h"
26
27#ifdef BFD_HEADERS
28#define USE_BFD
29#endif
30
31#ifdef BFD_ASSEMBLER
32#define USE_BFD
33#ifndef TARGET_MACH
34#define TARGET_MACH 0
35#endif
36#endif
37
38#ifdef USE_BFD
39#include "bfd.h"
40bfd *stdoutput;
41
42void
43output_file_create (name)
44     char *name;
45{
46  if (name[0] == '-' && name[1] == '\0')
47    {
48      as_fatal (_("Can't open a bfd on stdout %s "), name);
49    }
50  else if (!(stdoutput = bfd_openw (name, TARGET_FORMAT)))
51    {
52      as_perror (_("FATAL: Can't create %s"), name);
53      exit (EXIT_FAILURE);
54    }
55  bfd_set_format (stdoutput, bfd_object);
56#ifdef BFD_ASSEMBLER
57  bfd_set_arch_mach (stdoutput, TARGET_ARCH, TARGET_MACH);
58#endif
59  if (flag_traditional_format)
60    stdoutput->flags |= BFD_TRADITIONAL_FORMAT;
61}
62
63void
64output_file_close (filename)
65     char *filename;
66{
67#ifdef BFD_ASSEMBLER
68  /* Close the bfd.  */
69  if (bfd_close (stdoutput) == 0)
70    {
71      bfd_perror (filename);
72      as_perror (_("FATAL: Can't close %s\n"), filename);
73      exit (EXIT_FAILURE);
74    }
75#else
76  /* Close the bfd without getting bfd to write out anything by itself */
77  if (bfd_close_all_done (stdoutput) == 0)
78    {
79      as_perror (_("FATAL: Can't close %s\n"), filename);
80      exit (EXIT_FAILURE);
81    }
82#endif
83  stdoutput = NULL;		/* Trust nobody! */
84}
85
86#ifndef BFD_ASSEMBLER
87void
88output_file_append (where, length, filename)
89     char *where ATTRIBUTE_UNUSED;
90     long length ATTRIBUTE_UNUSED;
91     char *filename ATTRIBUTE_UNUSED;
92{
93  abort ();
94}
95#endif
96
97#else
98
99static FILE *stdoutput;
100
101void
102output_file_create (name)
103     char *name;
104{
105  if (name[0] == '-' && name[1] == '\0')
106    {
107      stdoutput = stdout;
108      return;
109    }
110
111  stdoutput = fopen (name, "wb");
112
113  /* Some systems don't grok "b" in fopen modes.  */
114  if (stdoutput == NULL)
115    stdoutput = fopen (name, "w");
116
117  if (stdoutput == NULL)
118    {
119      as_perror (_("FATAL: Can't create %s"), name);
120      exit (EXIT_FAILURE);
121    }
122}
123
124void
125output_file_close (filename)
126     char *filename;
127{
128  if (EOF == fclose (stdoutput))
129    {
130      as_perror (_("FATAL: Can't close %s"), filename);
131      exit (EXIT_FAILURE);
132    }
133  stdoutput = NULL;		/* Trust nobody! */
134}
135
136void
137output_file_append (where, length, filename)
138     char *where;
139     long length;
140     char *filename;
141{
142  for (; length; length--, where++)
143    {
144      (void) putc (*where, stdoutput);
145      if (ferror (stdoutput))
146	/* if ( EOF == (putc( *where, stdoutput )) ) */
147	{
148	  as_perror (_("Failed to emit an object byte"), filename);
149	  as_fatal (_("Can't continue"));
150	}
151    }
152}
153
154#endif
155
156/* end of output-file.c */
157