1/* output-file.c -  Deal with the output file
2   Copyright 1987, 1990, 1991, 1992, 1993, 1994, 1996, 1998, 1999, 2001,
3   2003, 2004, 2005, 2006 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, 51 Franklin Street - Fifth Floor, Boston, MA
20   02110-1301, USA.  */
21
22#include "as.h"
23#include "output-file.h"
24
25#ifndef TARGET_MACH
26#define TARGET_MACH 0
27#endif
28
29bfd *stdoutput;
30
31void
32output_file_create (char *name)
33{
34  if (name[0] == '-' && name[1] == '\0')
35    as_fatal (_("can't open a bfd on stdout %s"), name);
36
37  else if (!(stdoutput = bfd_openw (name, TARGET_FORMAT)))
38    {
39      bfd_error_type err = bfd_get_error ();
40
41      if (err == bfd_error_invalid_target)
42	as_fatal (_("selected target format '%s' unknown"), TARGET_FORMAT);
43      else
44	as_fatal (_("can't create %s: %s"), name, bfd_errmsg (err));
45    }
46
47  bfd_set_format (stdoutput, bfd_object);
48  bfd_set_arch_mach (stdoutput, TARGET_ARCH, TARGET_MACH);
49  if (flag_traditional_format)
50    stdoutput->flags |= BFD_TRADITIONAL_FORMAT;
51}
52
53void
54output_file_close (char *filename)
55{
56  bfd_boolean res;
57
58  if (stdoutput == NULL)
59    return;
60
61  /* Close the bfd.  */
62  res = bfd_close (stdoutput);
63
64  /* Prevent an infinite loop - if the close failed we will call as_fatal
65     which will call xexit() which may call this function again...  */
66  stdoutput = NULL;
67
68  if (! res)
69    as_fatal (_("can't close %s: %s"), filename,
70	      bfd_errmsg (bfd_get_error ()));
71}
72