contrib/binutils-2.27/bfd/corefile.c

   1 /* Core file generic interface routines for BFD.
   2    Copyright (C) 1990-2016 Free Software Foundation, Inc.
   3    Written by Cygnus Support.
   4
   5    This file is part of BFD, the Binary File Descriptor library.
   6
   7    This program 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 3 of the License, or
  10    (at your option) any later version.
  11
  12    This program 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 this program; if not, write to the Free Software
  19    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  20    MA 02110-1301, USA.  */
  21
  22 /*
  23 SECTION
  24         Core files
  25
  26 SUBSECTION
  27         Core file functions
  28
  29 DESCRIPTION
  30         These are functions pertaining to core files.
  31 */
  32
  33 #include "sysdep.h"
  34 #include "bfd.h"
  35 #include "libbfd.h"
  36
  37 /*
  38 FUNCTION
  39         bfd_core_file_failing_command
  40
  41 SYNOPSIS
  42         const char *bfd_core_file_failing_command (bfd *abfd);
  43
  44 DESCRIPTION
  45         Return a read-only string explaining which program was running
  46         when it failed and produced the core file @var{abfd}.
  47
  48 */
  49
  50 const char *
  51 bfd_core_file_failing_command (bfd *abfd)
  52 {
  53   if (abfd->format != bfd_core)
  54     {
  55       bfd_set_error (bfd_error_invalid_operation);
  56       return NULL;
  57     }
  58   return BFD_SEND (abfd, _core_file_failing_command, (abfd));
  59 }
  60
  61 /*
  62 FUNCTION
  63         bfd_core_file_failing_signal
  64
  65 SYNOPSIS
  66         int bfd_core_file_failing_signal (bfd *abfd);
  67
  68 DESCRIPTION
  69         Returns the signal number which caused the core dump which
  70         generated the file the BFD @var{abfd} is attached to.
  71 */
  72
  73 int
  74 bfd_core_file_failing_signal (bfd *abfd)
  75 {
  76   if (abfd->format != bfd_core)
  77     {
  78       bfd_set_error (bfd_error_invalid_operation);
  79       return 0;
  80     }
  81   return BFD_SEND (abfd, _core_file_failing_signal, (abfd));
  82 }
  83
  84 /*
  85 FUNCTION
  86         bfd_core_file_pid
  87
  88 SYNOPSIS
  89         int bfd_core_file_pid (bfd *abfd);
  90
  91 DESCRIPTION
  92
  93         Returns the PID of the process the core dump the BFD
  94         @var{abfd} is attached to was generated from.
  95 */
  96
  97 int
  98 bfd_core_file_pid (bfd *abfd)
  99 {
 100   if (abfd->format != bfd_core)
 101     {
 102       bfd_set_error (bfd_error_invalid_operation);
 103       return 0;
 104     }
 105   return BFD_SEND (abfd, _core_file_pid, (abfd));
 106 }
 107
 108
 109 /*
 110 FUNCTION
 111         core_file_matches_executable_p
 112
 113 SYNOPSIS
 114         bfd_boolean core_file_matches_executable_p
 115           (bfd *core_bfd, bfd *exec_bfd);
 116
 117 DESCRIPTION
 118         Return <<TRUE>> if the core file attached to @var{core_bfd}
 119         was generated by a run of the executable file attached to
 120         @var{exec_bfd}, <<FALSE>> otherwise.
 121 */
 122
 123 bfd_boolean
 124 core_file_matches_executable_p (bfd *core_bfd, bfd *exec_bfd)
 125 {
 126   if (core_bfd->format != bfd_core || exec_bfd->format != bfd_object)
 127     {
 128       bfd_set_error (bfd_error_wrong_format);
 129       return FALSE;
 130     }
 131
 132   return BFD_SEND (core_bfd, _core_file_matches_executable_p,
 133                    (core_bfd, exec_bfd));
 134 }
 135
 136 /*
 137 FUNCTION
 138         generic_core_file_matches_executable_p
 139
 140 SYNOPSIS
 141         bfd_boolean generic_core_file_matches_executable_p
 142           (bfd *core_bfd, bfd *exec_bfd);
 143
 144 DESCRIPTION
 145         Return TRUE if the core file attached to @var{core_bfd}
 146         was generated by a run of the executable file attached
 147         to @var{exec_bfd}.  The match is based on executable
 148         basenames only.
 149
 150         Note: When not able to determine the core file failing
 151         command or the executable name, we still return TRUE even
 152         though we're not sure that core file and executable match.
 153         This is to avoid generating a false warning in situations
 154         where we really don't know whether they match or not.
 155 */
 156
 157 bfd_boolean
 158 generic_core_file_matches_executable_p (bfd *core_bfd, bfd *exec_bfd)
 159 {
 160   char *exec;
 161   char *core;
 162   char *last_slash;
 163
 164   if (exec_bfd == NULL || core_bfd == NULL)
 165     return TRUE;
 166
 167   /* The cast below is to avoid a compiler warning due to the assignment
 168      of the const char * returned by bfd_core_file_failing_command to a
 169      non-const char *.  In this case, the assignement does not lead to
 170      breaking the const, as we're only reading the string.  */
 171
 172   core = (char *) bfd_core_file_failing_command (core_bfd);
 173   if (core == NULL)
 174     return TRUE;
 175
 176   exec = bfd_get_filename (exec_bfd);
 177   if (exec == NULL)
 178     return TRUE;
 179
 180   last_slash = strrchr (core, '/');
 181   if (last_slash != NULL)
 182     core = last_slash + 1;
 183
 184   last_slash = strrchr (exec, '/');
 185   if (last_slash != NULL)
 186     exec = last_slash + 1;
 187
 188   return filename_cmp (exec, core) == 0;
 189 }
 190