1 /* output-file.c - Deal with the output file 2 Copyright (C) 1987-2014 Free Software Foundation, Inc. 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 } 74
