Rev 5222 | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
5222 | serge | 1 | /* output-file.c - Deal with the output file |
6324 | serge | 2 | Copyright (C) 1987-2015 Free Software Foundation, Inc. |
5222 | serge | 3 | |
4 | This file is part of GAS, the GNU Assembler. |
||
5 | |||
6 | GAS is free software; you can redistribute it and/or modify |
||
7 | it under the terms of the GNU General Public License as published by |
||
8 | the Free Software Foundation; either version 3, or (at your option) |
||
9 | any later version. |
||
10 | |||
11 | GAS is distributed in the hope that it will be useful, |
||
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
||
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||
14 | GNU General Public License for more details. |
||
15 | |||
16 | You should have received a copy of the GNU General Public License |
||
17 | along with GAS; see the file COPYING. If not, write to |
||
18 | the Free Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA |
||
19 | 02110-1301, USA. */ |
||
20 | |||
21 | #include "as.h" |
||
22 | #include "output-file.h" |
||
23 | |||
24 | #ifndef TARGET_MACH |
||
25 | #define TARGET_MACH 0 |
||
26 | #endif |
||
27 | |||
28 | bfd *stdoutput; |
||
29 | |||
30 | void |
||
31 | output_file_create (char *name) |
||
32 | { |
||
33 | if (name[0] == '-' && name[1] == '\0') |
||
34 | as_fatal (_("can't open a bfd on stdout %s"), name); |
||
35 | |||
36 | else if (!(stdoutput = bfd_openw (name, TARGET_FORMAT))) |
||
37 | { |
||
38 | bfd_error_type err = bfd_get_error (); |
||
39 | |||
40 | if (err == bfd_error_invalid_target) |
||
41 | as_fatal (_("selected target format '%s' unknown"), TARGET_FORMAT); |
||
42 | else |
||
43 | as_fatal (_("can't create %s: %s"), name, bfd_errmsg (err)); |
||
44 | } |
||
45 | |||
46 | bfd_set_format (stdoutput, bfd_object); |
||
47 | bfd_set_arch_mach (stdoutput, TARGET_ARCH, TARGET_MACH); |
||
48 | if (flag_traditional_format) |
||
49 | stdoutput->flags |= BFD_TRADITIONAL_FORMAT; |
||
50 | } |
||
51 | |||
52 | void |
||
53 | output_file_close (char *filename) |
||
54 | { |
||
55 | bfd_boolean res; |
||
56 | |||
57 | if (stdoutput == NULL) |
||
58 | return; |
||
59 | |||
60 | /* Close the bfd. */ |
||
61 | if (had_errors ()) |
||
62 | res = bfd_cache_close_all (); |
||
63 | else |
||
64 | res = bfd_close (stdoutput); |
||
65 | |||
66 | /* Prevent an infinite loop - if the close failed we will call as_fatal |
||
67 | which will call xexit() which may call this function again... */ |
||
68 | stdoutput = NULL; |
||
69 | |||
70 | if (! res) |
||
71 | as_fatal (_("can't close %s: %s"), filename, |
||
72 | bfd_errmsg (bfd_get_error ())); |
||
73 | } |