Subversion Repositories Kolibri OS

Rev

Rev 5222 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. /* output-file.c -  Deal with the output file
  2.    Copyright (C) 1987-2015 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.