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