1 /* Generic symbol-table support for the BFD library. 2 Copyright (C) 1990-2020 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 Symbols 25 26 BFD tries to maintain as much symbol information as it can when 27 it moves information from file to file. BFD passes information 28 to applications though the <<asymbol>> structure. When the 29 application requests the symbol table, BFD reads the table in 30 the native form and translates parts of it into the internal 31 format. To maintain more than the information passed to 32 applications, some targets keep some information ``behind the 33 scenes'' in a structure only the particular back end knows 34 about. For example, the coff back end keeps the original 35 symbol table structure as well as the canonical structure when 36 a BFD is read in. On output, the coff back end can reconstruct 37 the output symbol table so that no information is lost, even 38 information unique to coff which BFD doesn't know or 39 understand. If a coff symbol table were read, but were written 40 through an a.out back end, all the coff specific information 41 would be lost. The symbol table of a BFD 42 is not necessarily read in until a canonicalize request is 43 made. Then the BFD back end fills in a table provided by the 44 application with pointers to the canonical information. To 45 output symbols, the application provides BFD with a table of 46 pointers to pointers to <<asymbol>>s. This allows applications 47 like the linker to output a symbol as it was read, since the ``behind 48 the scenes'' information will be still available. 49 @menu 50 @* Reading Symbols:: 51 @* Writing Symbols:: 52 @* Mini Symbols:: 53 @* typedef asymbol:: 54 @* symbol handling functions:: 55 @end menu 56 57 INODE 58 Reading Symbols, Writing Symbols, Symbols, Symbols 59 SUBSECTION 60 Reading symbols 61 62 There are two stages to reading a symbol table from a BFD: 63 allocating storage, and the actual reading process. This is an 64 excerpt from an application which reads the symbol table: 65 66 | long storage_needed; 67 | asymbol **symbol_table; 68 | long number_of_symbols; 69 | long i; 70 | 71 | storage_needed = bfd_get_symtab_upper_bound (abfd); 72 | 73 | if (storage_needed < 0) 74 | FAIL 75 | 76 | if (storage_needed == 0) 77 | return; 78 | 79 | symbol_table = xmalloc (storage_needed); 80 | ... 81 | number_of_symbols = 82 | bfd_canonicalize_symtab (abfd, symbol_table); 83 | 84 | if (number_of_symbols < 0) 85 | FAIL 86 | 87 | for (i = 0; i < number_of_symbols; i++) 88 | process_symbol (symbol_table[i]); 89 90 All storage for the symbols themselves is in an objalloc 91 connected to the BFD; it is freed when the BFD is closed. 92 93 INODE 94 Writing Symbols, Mini Symbols, Reading Symbols, Symbols 95 SUBSECTION 96 Writing symbols 97 98 Writing of a symbol table is automatic when a BFD open for 99 writing is closed. The application attaches a vector of 100 pointers to pointers to symbols to the BFD being written, and 101 fills in the symbol count. The close and cleanup code reads 102 through the table provided and performs all the necessary 103 operations. The BFD output code must always be provided with an 104 ``owned'' symbol: one which has come from another BFD, or one 105 which has been created using <<bfd_make_empty_symbol>>. Here is an 106 example showing the creation of a symbol table with only one element: 107 108 | #include "sysdep.h" 109 | #include "bfd.h" 110 | int main (void) 111 | { 112 | bfd *abfd; 113 | asymbol *ptrs[2]; 114 | asymbol *new; 115 | 116 | abfd = bfd_openw ("foo","a.out-sunos-big"); 117 | bfd_set_format (abfd, bfd_object); 118 | new = bfd_make_empty_symbol (abfd); 119 | new->name = "dummy_symbol"; 120 | new->section = bfd_make_section_old_way (abfd, ".text"); 121 | new->flags = BSF_GLOBAL; 122 | new->value = 0x12345; 123 | 124 | ptrs[0] = new; 125 | ptrs[1] = 0; 126 | 127 | bfd_set_symtab (abfd, ptrs, 1); 128 | bfd_close (abfd); 129 | return 0; 130 | } 131 | 132 | ./makesym 133 | nm foo 134 | 00012345 A dummy_symbol 135 136 Many formats cannot represent arbitrary symbol information; for 137 instance, the <<a.out>> object format does not allow an 138 arbitrary number of sections. A symbol pointing to a section 139 which is not one of <<.text>>, <<.data>> or <<.bss>> cannot 140 be described. 141 142 INODE 143 Mini Symbols, typedef asymbol, Writing Symbols, Symbols 144 SUBSECTION 145 Mini Symbols 146 147 Mini symbols provide read-only access to the symbol table. 148 They use less memory space, but require more time to access. 149 They can be useful for tools like nm or objdump, which may 150 have to handle symbol tables of extremely large executables. 151 152 The <<bfd_read_minisymbols>> function will read the symbols 153 into memory in an internal form. It will return a <<void *>> 154 pointer to a block of memory, a symbol count, and the size of 155 each symbol. The pointer is allocated using <<malloc>>, and 156 should be freed by the caller when it is no longer needed. 157 158 The function <<bfd_minisymbol_to_symbol>> will take a pointer 159 to a minisymbol, and a pointer to a structure returned by 160 <<bfd_make_empty_symbol>>, and return a <<asymbol>> structure. 161 The return value may or may not be the same as the value from 162 <<bfd_make_empty_symbol>> which was passed in. 163 164 */ 165 166 /* 167 DOCDD 168 INODE 169 typedef asymbol, symbol handling functions, Mini Symbols, Symbols 170 171 */ 172 /* 173 SUBSECTION 174 typedef asymbol 175 176 An <<asymbol>> has the form: 177 178 */ 179 180 /* 181 CODE_FRAGMENT 182 183 . 184 .typedef struct bfd_symbol 185 .{ 186 . {* A pointer to the BFD which owns the symbol. This information 187 . is necessary so that a back end can work out what additional 188 . information (invisible to the application writer) is carried 189 . with the symbol. 190 . 191 . This field is *almost* redundant, since you can use section->owner 192 . instead, except that some symbols point to the global sections 193 . bfd_{abs,com,und}_section. This could be fixed by making 194 . these globals be per-bfd (or per-target-flavor). FIXME. *} 195 . struct bfd *the_bfd; {* Use bfd_asymbol_bfd(sym) to access this field. *} 196 . 197 . {* The text of the symbol. The name is left alone, and not copied; the 198 . application may not alter it. *} 199 . const char *name; 200 . 201 . {* The value of the symbol. This really should be a union of a 202 . numeric value with a pointer, since some flags indicate that 203 . a pointer to another symbol is stored here. *} 204 . symvalue value; 205 . 206 . {* Attributes of a symbol. *} 207 .#define BSF_NO_FLAGS 0 208 . 209 . {* The symbol has local scope; <<static>> in <<C>>. The value 210 . is the offset into the section of the data. *} 211 .#define BSF_LOCAL (1 << 0) 212 . 213 . {* The symbol has global scope; initialized data in <<C>>. The 214 . value is the offset into the section of the data. *} 215 .#define BSF_GLOBAL (1 << 1) 216 . 217 . {* The symbol has global scope and is exported. The value is 218 . the offset into the section of the data. *} 219 .#define BSF_EXPORT BSF_GLOBAL {* No real difference. *} 220 . 221 . {* A normal C symbol would be one of: 222 . <<BSF_LOCAL>>, <<BSF_UNDEFINED>> or <<BSF_GLOBAL>>. *} 223 . 224 . {* The symbol is a debugging record. The value has an arbitrary 225 . meaning, unless BSF_DEBUGGING_RELOC is also set. *} 226 .#define BSF_DEBUGGING (1 << 2) 227 . 228 . {* The symbol denotes a function entry point. Used in ELF, 229 . perhaps others someday. *} 230 .#define BSF_FUNCTION (1 << 3) 231 . 232 . {* Used by the linker. *} 233 .#define BSF_KEEP (1 << 5) 234 . 235 . {* An ELF common symbol. *} 236 .#define BSF_ELF_COMMON (1 << 6) 237 . 238 . {* A weak global symbol, overridable without warnings by 239 . a regular global symbol of the same name. *} 240 .#define BSF_WEAK (1 << 7) 241 . 242 . {* This symbol was created to point to a section, e.g. ELF's 243 . STT_SECTION symbols. *} 244 .#define BSF_SECTION_SYM (1 << 8) 245 . 246 . {* The symbol used to be a common symbol, but now it is 247 . allocated. *} 248 .#define BSF_OLD_COMMON (1 << 9) 249 . 250 . {* In some files the type of a symbol sometimes alters its 251 . location in an output file - ie in coff a <<ISFCN>> symbol 252 . which is also <<C_EXT>> symbol appears where it was 253 . declared and not at the end of a section. This bit is set 254 . by the target BFD part to convey this information. *} 255 .#define BSF_NOT_AT_END (1 << 10) 256 . 257 . {* Signal that the symbol is the label of constructor section. *} 258 .#define BSF_CONSTRUCTOR (1 << 11) 259 . 260 . {* Signal that the symbol is a warning symbol. The name is a 261 . warning. The name of the next symbol is the one to warn about; 262 . if a reference is made to a symbol with the same name as the next 263 . symbol, a warning is issued by the linker. *} 264 .#define BSF_WARNING (1 << 12) 265 . 266 . {* Signal that the symbol is indirect. This symbol is an indirect 267 . pointer to the symbol with the same name as the next symbol. *} 268 .#define BSF_INDIRECT (1 << 13) 269 . 270 . {* BSF_FILE marks symbols that contain a file name. This is used 271 . for ELF STT_FILE symbols. *} 272 .#define BSF_FILE (1 << 14) 273 . 274 . {* Symbol is from dynamic linking information. *} 275 .#define BSF_DYNAMIC (1 << 15) 276 . 277 . {* The symbol denotes a data object. Used in ELF, and perhaps 278 . others someday. *} 279 .#define BSF_OBJECT (1 << 16) 280 . 281 . {* This symbol is a debugging symbol. The value is the offset 282 . into the section of the data. BSF_DEBUGGING should be set 283 . as well. *} 284 .#define BSF_DEBUGGING_RELOC (1 << 17) 285 . 286 . {* This symbol is thread local. Used in ELF. *} 287 .#define BSF_THREAD_LOCAL (1 << 18) 288 . 289 . {* This symbol represents a complex relocation expression, 290 . with the expression tree serialized in the symbol name. *} 291 .#define BSF_RELC (1 << 19) 292 . 293 . {* This symbol represents a signed complex relocation expression, 294 . with the expression tree serialized in the symbol name. *} 295 .#define BSF_SRELC (1 << 20) 296 . 297 . {* This symbol was created by bfd_get_synthetic_symtab. *} 298 .#define BSF_SYNTHETIC (1 << 21) 299 . 300 . {* This symbol is an indirect code object. Unrelated to BSF_INDIRECT. 301 . The dynamic linker will compute the value of this symbol by 302 . calling the function that it points to. BSF_FUNCTION must 303 . also be also set. *} 304 .#define BSF_GNU_INDIRECT_FUNCTION (1 << 22) 305 . {* This symbol is a globally unique data object. The dynamic linker 306 . will make sure that in the entire process there is just one symbol 307 . with this name and type in use. BSF_OBJECT must also be set. *} 308 .#define BSF_GNU_UNIQUE (1 << 23) 309 . 310 . flagword flags; 311 . 312 . {* A pointer to the section to which this symbol is 313 . relative. This will always be non NULL, there are special 314 . sections for undefined and absolute symbols. *} 315 . struct bfd_section *section; 316 . 317 . {* Back end special data. *} 318 . union 319 . { 320 . void *p; 321 . bfd_vma i; 322 . } 323 . udata; 324 .} 325 .asymbol; 326 . 327 */ 328 329 #include "sysdep.h" 330 #include "bfd.h" 331 #include "libbfd.h" 332 #include "safe-ctype.h" 333 #include "bfdlink.h" 334 #include "aout/stab_gnu.h" 335 336 /* 337 DOCDD 338 INODE 339 symbol handling functions, , typedef asymbol, Symbols 340 SUBSECTION 341 Symbol handling functions 342 */ 343 344 /* 345 FUNCTION 346 bfd_get_symtab_upper_bound 347 348 DESCRIPTION 349 Return the number of bytes required to store a vector of pointers 350 to <<asymbols>> for all the symbols in the BFD @var{abfd}, 351 including a terminal NULL pointer. If there are no symbols in 352 the BFD, then return 0. If an error occurs, return -1. 353 354 .#define bfd_get_symtab_upper_bound(abfd) \ 355 . BFD_SEND (abfd, _bfd_get_symtab_upper_bound, (abfd)) 356 . 357 */ 358 359 /* 360 FUNCTION 361 bfd_is_local_label 362 363 SYNOPSIS 364 bfd_boolean bfd_is_local_label (bfd *abfd, asymbol *sym); 365 366 DESCRIPTION 367 Return TRUE if the given symbol @var{sym} in the BFD @var{abfd} is 368 a compiler generated local label, else return FALSE. 369 */ 370 371 bfd_boolean 372 bfd_is_local_label (bfd *abfd, asymbol *sym) 373 { 374 /* The BSF_SECTION_SYM check is needed for IA-64, where every label that 375 starts with '.' is local. This would accidentally catch section names 376 if we didn't reject them here. */ 377 if ((sym->flags & (BSF_GLOBAL | BSF_WEAK | BSF_FILE | BSF_SECTION_SYM)) != 0) 378 return FALSE; 379 if (sym->name == NULL) 380 return FALSE; 381 return bfd_is_local_label_name (abfd, sym->name); 382 } 383 384 /* 385 FUNCTION 386 bfd_is_local_label_name 387 388 SYNOPSIS 389 bfd_boolean bfd_is_local_label_name (bfd *abfd, const char *name); 390 391 DESCRIPTION 392 Return TRUE if a symbol with the name @var{name} in the BFD 393 @var{abfd} is a compiler generated local label, else return 394 FALSE. This just checks whether the name has the form of a 395 local label. 396 397 .#define bfd_is_local_label_name(abfd, name) \ 398 . BFD_SEND (abfd, _bfd_is_local_label_name, (abfd, name)) 399 . 400 */ 401 402 /* 403 FUNCTION 404 bfd_is_target_special_symbol 405 406 SYNOPSIS 407 bfd_boolean bfd_is_target_special_symbol (bfd *abfd, asymbol *sym); 408 409 DESCRIPTION 410 Return TRUE iff a symbol @var{sym} in the BFD @var{abfd} is something 411 special to the particular target represented by the BFD. Such symbols 412 should normally not be mentioned to the user. 413 414 .#define bfd_is_target_special_symbol(abfd, sym) \ 415 . BFD_SEND (abfd, _bfd_is_target_special_symbol, (abfd, sym)) 416 . 417 */ 418 419 /* 420 FUNCTION 421 bfd_canonicalize_symtab 422 423 DESCRIPTION 424 Read the symbols from the BFD @var{abfd}, and fills in 425 the vector @var{location} with pointers to the symbols and 426 a trailing NULL. 427 Return the actual number of symbol pointers, not 428 including the NULL. 429 430 .#define bfd_canonicalize_symtab(abfd, location) \ 431 . BFD_SEND (abfd, _bfd_canonicalize_symtab, (abfd, location)) 432 . 433 */ 434 435 /* 436 FUNCTION 437 bfd_set_symtab 438 439 SYNOPSIS 440 bfd_boolean bfd_set_symtab 441 (bfd *abfd, asymbol **location, unsigned int count); 442 443 DESCRIPTION 444 Arrange that when the output BFD @var{abfd} is closed, 445 the table @var{location} of @var{count} pointers to symbols 446 will be written. 447 */ 448 449 bfd_boolean 450 bfd_set_symtab (bfd *abfd, asymbol **location, unsigned int symcount) 451 { 452 if (abfd->format != bfd_object || bfd_read_p (abfd)) 453 { 454 bfd_set_error (bfd_error_invalid_operation); 455 return FALSE; 456 } 457 458 abfd->outsymbols = location; 459 abfd->symcount = symcount; 460 return TRUE; 461 } 462 463 /* 464 FUNCTION 465 bfd_print_symbol_vandf 466 467 SYNOPSIS 468 void bfd_print_symbol_vandf (bfd *abfd, void *file, asymbol *symbol); 469 470 DESCRIPTION 471 Print the value and flags of the @var{symbol} supplied to the 472 stream @var{file}. 473 */ 474 void 475 bfd_print_symbol_vandf (bfd *abfd, void *arg, asymbol *symbol) 476 { 477 FILE *file = (FILE *) arg; 478 479 flagword type = symbol->flags; 480 481 if (symbol->section != NULL) 482 bfd_fprintf_vma (abfd, file, symbol->value + symbol->section->vma); 483 else 484 bfd_fprintf_vma (abfd, file, symbol->value); 485 486 /* This presumes that a symbol can not be both BSF_DEBUGGING and 487 BSF_DYNAMIC, nor more than one of BSF_FUNCTION, BSF_FILE, and 488 BSF_OBJECT. */ 489 fprintf (file, " %c%c%c%c%c%c%c", 490 ((type & BSF_LOCAL) 491 ? (type & BSF_GLOBAL) ? '!' : 'l' 492 : (type & BSF_GLOBAL) ? 'g' 493 : (type & BSF_GNU_UNIQUE) ? 'u' : ' '), 494 (type & BSF_WEAK) ? 'w' : ' ', 495 (type & BSF_CONSTRUCTOR) ? 'C' : ' ', 496 (type & BSF_WARNING) ? 'W' : ' ', 497 (type & BSF_INDIRECT) ? 'I' : (type & BSF_GNU_INDIRECT_FUNCTION) ? 'i' : ' ', 498 (type & BSF_DEBUGGING) ? 'd' : (type & BSF_DYNAMIC) ? 'D' : ' ', 499 ((type & BSF_FUNCTION) 500 ? 'F' 501 : ((type & BSF_FILE) 502 ? 'f' 503 : ((type & BSF_OBJECT) ? 'O' : ' ')))); 504 } 505 506 /* 507 FUNCTION 508 bfd_make_empty_symbol 509 510 DESCRIPTION 511 Create a new <<asymbol>> structure for the BFD @var{abfd} 512 and return a pointer to it. 513 514 This routine is necessary because each back end has private 515 information surrounding the <<asymbol>>. Building your own 516 <<asymbol>> and pointing to it will not create the private 517 information, and will cause problems later on. 518 519 .#define bfd_make_empty_symbol(abfd) \ 520 . BFD_SEND (abfd, _bfd_make_empty_symbol, (abfd)) 521 . 522 */ 523 524 /* 525 FUNCTION 526 _bfd_generic_make_empty_symbol 527 528 SYNOPSIS 529 asymbol *_bfd_generic_make_empty_symbol (bfd *); 530 531 DESCRIPTION 532 Create a new <<asymbol>> structure for the BFD @var{abfd} 533 and return a pointer to it. Used by core file routines, 534 binary back-end and anywhere else where no private info 535 is needed. 536 */ 537 538 asymbol * 539 _bfd_generic_make_empty_symbol (bfd *abfd) 540 { 541 bfd_size_type amt = sizeof (asymbol); 542 asymbol *new_symbol = (asymbol *) bfd_zalloc (abfd, amt); 543 if (new_symbol) 544 new_symbol->the_bfd = abfd; 545 return new_symbol; 546 } 547 548 /* 549 FUNCTION 550 bfd_make_debug_symbol 551 552 DESCRIPTION 553 Create a new <<asymbol>> structure for the BFD @var{abfd}, 554 to be used as a debugging symbol. Further details of its use have 555 yet to be worked out. 556 557 .#define bfd_make_debug_symbol(abfd,ptr,size) \ 558 . BFD_SEND (abfd, _bfd_make_debug_symbol, (abfd, ptr, size)) 559 . 560 */ 561 562 struct section_to_type 563 { 564 const char *section; 565 char type; 566 }; 567 568 /* Map section names to POSIX/BSD single-character symbol types. 569 This table is probably incomplete. It is sorted for convenience of 570 adding entries. Since it is so short, a linear search is used. */ 571 static const struct section_to_type stt[] = 572 { 573 {".bss", 'b'}, 574 {"code", 't'}, /* MRI .text */ 575 {".data", 'd'}, 576 {"*DEBUG*", 'N'}, 577 {".debug", 'N'}, /* MSVC's .debug (non-standard debug syms) */ 578 {".drectve", 'i'}, /* MSVC's .drective section */ 579 {".edata", 'e'}, /* MSVC's .edata (export) section */ 580 {".fini", 't'}, /* ELF fini section */ 581 {".idata", 'i'}, /* MSVC's .idata (import) section */ 582 {".init", 't'}, /* ELF init section */ 583 {".pdata", 'p'}, /* MSVC's .pdata (stack unwind) section */ 584 {".rdata", 'r'}, /* Read only data. */ 585 {".rodata", 'r'}, /* Read only data. */ 586 {".sbss", 's'}, /* Small BSS (uninitialized data). */ 587 {".scommon", 'c'}, /* Small common. */ 588 {".sdata", 'g'}, /* Small initialized data. */ 589 {".text", 't'}, 590 {"vars", 'd'}, /* MRI .data */ 591 {"zerovars", 'b'}, /* MRI .bss */ 592 {0, 0} 593 }; 594 595 /* Return the single-character symbol type corresponding to 596 section S, or '?' for an unknown COFF section. 597 598 Check for leading strings which match, followed by a number, '.', 599 or '$' so .text5 matches the .text entry, but .init_array doesn't 600 match the .init entry. */ 601 602 static char 603 coff_section_type (const char *s) 604 { 605 const struct section_to_type *t; 606 607 for (t = &stt[0]; t->section; t++) 608 { 609 size_t len = strlen (t->section); 610 if (strncmp (s, t->section, len) == 0 611 && memchr (".$0123456789", s[len], 13) != 0) 612 return t->type; 613 } 614 615 return '?'; 616 } 617 618 /* Return the single-character symbol type corresponding to section 619 SECTION, or '?' for an unknown section. This uses section flags to 620 identify sections. 621 622 FIXME These types are unhandled: c, i, e, p. If we handled these also, 623 we could perhaps obsolete coff_section_type. */ 624 625 static char 626 decode_section_type (const struct bfd_section *section) 627 { 628 if (section->flags & SEC_CODE) 629 return 't'; 630 if (section->flags & SEC_DATA) 631 { 632 if (section->flags & SEC_READONLY) 633 return 'r'; 634 else if (section->flags & SEC_SMALL_DATA) 635 return 'g'; 636 else 637 return 'd'; 638 } 639 if ((section->flags & SEC_HAS_CONTENTS) == 0) 640 { 641 if (section->flags & SEC_SMALL_DATA) 642 return 's'; 643 else 644 return 'b'; 645 } 646 if (section->flags & SEC_DEBUGGING) 647 return 'N'; 648 if ((section->flags & SEC_HAS_CONTENTS) && (section->flags & SEC_READONLY)) 649 return 'n'; 650 651 return '?'; 652 } 653 654 /* 655 FUNCTION 656 bfd_decode_symclass 657 658 DESCRIPTION 659 Return a character corresponding to the symbol 660 class of @var{symbol}, or '?' for an unknown class. 661 662 SYNOPSIS 663 int bfd_decode_symclass (asymbol *symbol); 664 */ 665 int 666 bfd_decode_symclass (asymbol *symbol) 667 { 668 char c; 669 670 if (symbol->section && bfd_is_com_section (symbol->section)) 671 return 'C'; 672 if (bfd_is_und_section (symbol->section)) 673 { 674 if (symbol->flags & BSF_WEAK) 675 { 676 /* If weak, determine if it's specifically an object 677 or non-object weak. */ 678 if (symbol->flags & BSF_OBJECT) 679 return 'v'; 680 else 681 return 'w'; 682 } 683 else 684 return 'U'; 685 } 686 if (bfd_is_ind_section (symbol->section)) 687 return 'I'; 688 if (symbol->flags & BSF_GNU_INDIRECT_FUNCTION) 689 return 'i'; 690 if (symbol->flags & BSF_WEAK) 691 { 692 /* If weak, determine if it's specifically an object 693 or non-object weak. */ 694 if (symbol->flags & BSF_OBJECT) 695 return 'V'; 696 else 697 return 'W'; 698 } 699 if (symbol->flags & BSF_GNU_UNIQUE) 700 return 'u'; 701 if (!(symbol->flags & (BSF_GLOBAL | BSF_LOCAL))) 702 return '?'; 703 704 if (bfd_is_abs_section (symbol->section)) 705 c = 'a'; 706 else if (symbol->section) 707 { 708 c = decode_section_type (symbol->section); 709 if (c == '?') 710 c = coff_section_type (symbol->section->name); 711 } 712 else 713 return '?'; 714 if (symbol->flags & BSF_GLOBAL) 715 c = TOUPPER (c); 716 return c; 717 718 /* We don't have to handle these cases just yet, but we will soon: 719 N_SETV: 'v'; 720 N_SETA: 'l'; 721 N_SETT: 'x'; 722 N_SETD: 'z'; 723 N_SETB: 's'; 724 N_INDR: 'i'; 725 */ 726 } 727 728 /* 729 FUNCTION 730 bfd_is_undefined_symclass 731 732 DESCRIPTION 733 Returns non-zero if the class symbol returned by 734 bfd_decode_symclass represents an undefined symbol. 735 Returns zero otherwise. 736 737 SYNOPSIS 738 bfd_boolean bfd_is_undefined_symclass (int symclass); 739 */ 740 741 bfd_boolean 742 bfd_is_undefined_symclass (int symclass) 743 { 744 return symclass == 'U' || symclass == 'w' || symclass == 'v'; 745 } 746 747 /* 748 FUNCTION 749 bfd_symbol_info 750 751 DESCRIPTION 752 Fill in the basic info about symbol that nm needs. 753 Additional info may be added by the back-ends after 754 calling this function. 755 756 SYNOPSIS 757 void bfd_symbol_info (asymbol *symbol, symbol_info *ret); 758 */ 759 760 void 761 bfd_symbol_info (asymbol *symbol, symbol_info *ret) 762 { 763 ret->type = bfd_decode_symclass (symbol); 764 765 if (bfd_is_undefined_symclass (ret->type)) 766 ret->value = 0; 767 else 768 ret->value = symbol->value + symbol->section->vma; 769 770 ret->name = symbol->name; 771 } 772 773 /* 774 FUNCTION 775 bfd_copy_private_symbol_data 776 777 SYNOPSIS 778 bfd_boolean bfd_copy_private_symbol_data 779 (bfd *ibfd, asymbol *isym, bfd *obfd, asymbol *osym); 780 781 DESCRIPTION 782 Copy private symbol information from @var{isym} in the BFD 783 @var{ibfd} to the symbol @var{osym} in the BFD @var{obfd}. 784 Return <<TRUE>> on success, <<FALSE>> on error. Possible error 785 returns are: 786 787 o <<bfd_error_no_memory>> - 788 Not enough memory exists to create private data for @var{osec}. 789 790 .#define bfd_copy_private_symbol_data(ibfd, isymbol, obfd, osymbol) \ 791 . BFD_SEND (obfd, _bfd_copy_private_symbol_data, \ 792 . (ibfd, isymbol, obfd, osymbol)) 793 . 794 */ 795 796 /* The generic version of the function which returns mini symbols. 797 This is used when the backend does not provide a more efficient 798 version. It just uses BFD asymbol structures as mini symbols. */ 799 800 long 801 _bfd_generic_read_minisymbols (bfd *abfd, 802 bfd_boolean dynamic, 803 void **minisymsp, 804 unsigned int *sizep) 805 { 806 long storage; 807 asymbol **syms = NULL; 808 long symcount; 809 810 if (dynamic) 811 storage = bfd_get_dynamic_symtab_upper_bound (abfd); 812 else 813 storage = bfd_get_symtab_upper_bound (abfd); 814 if (storage < 0) 815 goto error_return; 816 if (storage == 0) 817 return 0; 818 819 syms = (asymbol **) bfd_malloc (storage); 820 if (syms == NULL) 821 goto error_return; 822 823 if (dynamic) 824 symcount = bfd_canonicalize_dynamic_symtab (abfd, syms); 825 else 826 symcount = bfd_canonicalize_symtab (abfd, syms); 827 if (symcount < 0) 828 goto error_return; 829 830 if (symcount == 0) 831 /* We return 0 above when storage is 0. Exit in the same state 832 here, so as to not complicate callers with having to deal with 833 freeing memory for zero symcount. */ 834 free (syms); 835 else 836 { 837 *minisymsp = syms; 838 *sizep = sizeof (asymbol *); 839 } 840 return symcount; 841 842 error_return: 843 bfd_set_error (bfd_error_no_symbols); 844 if (syms != NULL) 845 free (syms); 846 return -1; 847 } 848 849 /* The generic version of the function which converts a minisymbol to 850 an asymbol. We don't worry about the sym argument we are passed; 851 we just return the asymbol the minisymbol points to. */ 852 853 asymbol * 854 _bfd_generic_minisymbol_to_symbol (bfd *abfd ATTRIBUTE_UNUSED, 855 bfd_boolean dynamic ATTRIBUTE_UNUSED, 856 const void *minisym, 857 asymbol *sym ATTRIBUTE_UNUSED) 858 { 859 return *(asymbol **) minisym; 860 } 861 862 /* Look through stabs debugging information in .stab and .stabstr 863 sections to find the source file and line closest to a desired 864 location. This is used by COFF and ELF targets. It sets *pfound 865 to TRUE if it finds some information. The *pinfo field is used to 866 pass cached information in and out of this routine; this first time 867 the routine is called for a BFD, *pinfo should be NULL. The value 868 placed in *pinfo should be saved with the BFD, and passed back each 869 time this function is called. */ 870 871 /* We use a cache by default. */ 872 873 #define ENABLE_CACHING 874 875 /* We keep an array of indexentry structures to record where in the 876 stabs section we should look to find line number information for a 877 particular address. */ 878 879 struct indexentry 880 { 881 bfd_vma val; 882 bfd_byte *stab; 883 bfd_byte *str; 884 char *directory_name; 885 char *file_name; 886 char *function_name; 887 int idx; 888 }; 889 890 /* Compare two indexentry structures. This is called via qsort. */ 891 892 static int 893 cmpindexentry (const void *a, const void *b) 894 { 895 const struct indexentry *contestantA = (const struct indexentry *) a; 896 const struct indexentry *contestantB = (const struct indexentry *) b; 897 898 if (contestantA->val < contestantB->val) 899 return -1; 900 if (contestantA->val > contestantB->val) 901 return 1; 902 return contestantA->idx - contestantB->idx; 903 } 904 905 /* A pointer to this structure is stored in *pinfo. */ 906 907 struct stab_find_info 908 { 909 /* The .stab section. */ 910 asection *stabsec; 911 /* The .stabstr section. */ 912 asection *strsec; 913 /* The contents of the .stab section. */ 914 bfd_byte *stabs; 915 /* The contents of the .stabstr section. */ 916 bfd_byte *strs; 917 918 /* A table that indexes stabs by memory address. */ 919 struct indexentry *indextable; 920 /* The number of entries in indextable. */ 921 int indextablesize; 922 923 #ifdef ENABLE_CACHING 924 /* Cached values to restart quickly. */ 925 struct indexentry *cached_indexentry; 926 bfd_vma cached_offset; 927 bfd_byte *cached_stab; 928 char *cached_file_name; 929 #endif 930 931 /* Saved ptr to malloc'ed filename. */ 932 char *filename; 933 }; 934 935 bfd_boolean 936 _bfd_stab_section_find_nearest_line (bfd *abfd, 937 asymbol **symbols, 938 asection *section, 939 bfd_vma offset, 940 bfd_boolean *pfound, 941 const char **pfilename, 942 const char **pfnname, 943 unsigned int *pline, 944 void **pinfo) 945 { 946 struct stab_find_info *info; 947 bfd_size_type stabsize, strsize; 948 bfd_byte *stab, *str; 949 bfd_byte *nul_fun, *nul_str; 950 bfd_size_type stroff; 951 struct indexentry *indexentry; 952 char *file_name; 953 char *directory_name; 954 bfd_boolean saw_line, saw_func; 955 956 *pfound = FALSE; 957 *pfilename = bfd_get_filename (abfd); 958 *pfnname = NULL; 959 *pline = 0; 960 961 /* Stabs entries use a 12 byte format: 962 4 byte string table index 963 1 byte stab type 964 1 byte stab other field 965 2 byte stab desc field 966 4 byte stab value 967 FIXME: This will have to change for a 64 bit object format. 968 969 The stabs symbols are divided into compilation units. For the 970 first entry in each unit, the type of 0, the value is the length 971 of the string table for this unit, and the desc field is the 972 number of stabs symbols for this unit. */ 973 974 #define STRDXOFF (0) 975 #define TYPEOFF (4) 976 #define OTHEROFF (5) 977 #define DESCOFF (6) 978 #define VALOFF (8) 979 #define STABSIZE (12) 980 981 info = (struct stab_find_info *) *pinfo; 982 if (info != NULL) 983 { 984 if (info->stabsec == NULL || info->strsec == NULL) 985 { 986 /* No stabs debugging information. */ 987 return TRUE; 988 } 989 990 stabsize = (info->stabsec->rawsize 991 ? info->stabsec->rawsize 992 : info->stabsec->size); 993 strsize = (info->strsec->rawsize 994 ? info->strsec->rawsize 995 : info->strsec->size); 996 } 997 else 998 { 999 long reloc_size, reloc_count; 1000 arelent **reloc_vector; 1001 int i; 1002 char *function_name; 1003 bfd_size_type amt = sizeof *info; 1004 1005 info = (struct stab_find_info *) bfd_zalloc (abfd, amt); 1006 if (info == NULL) 1007 return FALSE; 1008 1009 /* FIXME: When using the linker --split-by-file or 1010 --split-by-reloc options, it is possible for the .stab and 1011 .stabstr sections to be split. We should handle that. */ 1012 1013 info->stabsec = bfd_get_section_by_name (abfd, ".stab"); 1014 info->strsec = bfd_get_section_by_name (abfd, ".stabstr"); 1015 1016 if (info->stabsec == NULL || info->strsec == NULL) 1017 { 1018 /* Try SOM section names. */ 1019 info->stabsec = bfd_get_section_by_name (abfd, "$GDB_SYMBOLS$"); 1020 info->strsec = bfd_get_section_by_name (abfd, "$GDB_STRINGS$"); 1021 1022 if (info->stabsec == NULL || info->strsec == NULL) 1023 { 1024 /* No stabs debugging information. Set *pinfo so that we 1025 can return quickly in the info != NULL case above. */ 1026 *pinfo = info; 1027 return TRUE; 1028 } 1029 } 1030 1031 stabsize = (info->stabsec->rawsize 1032 ? info->stabsec->rawsize 1033 : info->stabsec->size); 1034 stabsize = (stabsize / STABSIZE) * STABSIZE; 1035 strsize = (info->strsec->rawsize 1036 ? info->strsec->rawsize 1037 : info->strsec->size); 1038 1039 info->stabs = (bfd_byte *) bfd_alloc (abfd, stabsize); 1040 info->strs = (bfd_byte *) bfd_alloc (abfd, strsize); 1041 if (info->stabs == NULL || info->strs == NULL) 1042 return FALSE; 1043 1044 if (! bfd_get_section_contents (abfd, info->stabsec, info->stabs, 1045 0, stabsize) 1046 || ! bfd_get_section_contents (abfd, info->strsec, info->strs, 1047 0, strsize)) 1048 return FALSE; 1049 1050 /* Stab strings ought to be nul terminated. Ensure the last one 1051 is, to prevent running off the end of the buffer. */ 1052 info->strs[strsize - 1] = 0; 1053 1054 /* If this is a relocatable object file, we have to relocate 1055 the entries in .stab. This should always be simple 32 bit 1056 relocations against symbols defined in this object file, so 1057 this should be no big deal. */ 1058 reloc_size = bfd_get_reloc_upper_bound (abfd, info->stabsec); 1059 if (reloc_size < 0) 1060 return FALSE; 1061 reloc_vector = (arelent **) bfd_malloc (reloc_size); 1062 if (reloc_vector == NULL && reloc_size != 0) 1063 return FALSE; 1064 reloc_count = bfd_canonicalize_reloc (abfd, info->stabsec, reloc_vector, 1065 symbols); 1066 if (reloc_count < 0) 1067 { 1068 if (reloc_vector != NULL) 1069 free (reloc_vector); 1070 return FALSE; 1071 } 1072 if (reloc_count > 0) 1073 { 1074 arelent **pr; 1075 1076 for (pr = reloc_vector; *pr != NULL; pr++) 1077 { 1078 arelent *r; 1079 unsigned long val; 1080 asymbol *sym; 1081 bfd_size_type octets; 1082 1083 r = *pr; 1084 /* Ignore R_*_NONE relocs. */ 1085 if (r->howto->dst_mask == 0) 1086 continue; 1087 1088 octets = r->address * bfd_octets_per_byte (abfd, NULL); 1089 if (r->howto->rightshift != 0 1090 || r->howto->size != 2 1091 || r->howto->bitsize != 32 1092 || r->howto->pc_relative 1093 || r->howto->bitpos != 0 1094 || r->howto->dst_mask != 0xffffffff 1095 || octets + 4 > stabsize) 1096 { 1097 _bfd_error_handler 1098 (_("unsupported .stab relocation")); 1099 bfd_set_error (bfd_error_invalid_operation); 1100 if (reloc_vector != NULL) 1101 free (reloc_vector); 1102 return FALSE; 1103 } 1104 1105 val = bfd_get_32 (abfd, info->stabs + octets); 1106 val &= r->howto->src_mask; 1107 sym = *r->sym_ptr_ptr; 1108 val += sym->value + sym->section->vma + r->addend; 1109 bfd_put_32 (abfd, (bfd_vma) val, info->stabs + octets); 1110 } 1111 } 1112 1113 if (reloc_vector != NULL) 1114 free (reloc_vector); 1115 1116 /* First time through this function, build a table matching 1117 function VM addresses to stabs, then sort based on starting 1118 VM address. Do this in two passes: once to count how many 1119 table entries we'll need, and a second to actually build the 1120 table. */ 1121 1122 info->indextablesize = 0; 1123 nul_fun = NULL; 1124 for (stab = info->stabs; stab < info->stabs + stabsize; stab += STABSIZE) 1125 { 1126 if (stab[TYPEOFF] == (bfd_byte) N_SO) 1127 { 1128 /* if we did not see a function def, leave space for one. */ 1129 if (nul_fun != NULL) 1130 ++info->indextablesize; 1131 1132 /* N_SO with null name indicates EOF */ 1133 if (bfd_get_32 (abfd, stab + STRDXOFF) == 0) 1134 nul_fun = NULL; 1135 else 1136 { 1137 nul_fun = stab; 1138 1139 /* two N_SO's in a row is a filename and directory. Skip */ 1140 if (stab + STABSIZE + TYPEOFF < info->stabs + stabsize 1141 && *(stab + STABSIZE + TYPEOFF) == (bfd_byte) N_SO) 1142 stab += STABSIZE; 1143 } 1144 } 1145 else if (stab[TYPEOFF] == (bfd_byte) N_FUN 1146 && bfd_get_32 (abfd, stab + STRDXOFF) != 0) 1147 { 1148 nul_fun = NULL; 1149 ++info->indextablesize; 1150 } 1151 } 1152 1153 if (nul_fun != NULL) 1154 ++info->indextablesize; 1155 1156 if (info->indextablesize == 0) 1157 return TRUE; 1158 ++info->indextablesize; 1159 1160 amt = info->indextablesize; 1161 amt *= sizeof (struct indexentry); 1162 info->indextable = (struct indexentry *) bfd_alloc (abfd, amt); 1163 if (info->indextable == NULL) 1164 return FALSE; 1165 1166 file_name = NULL; 1167 directory_name = NULL; 1168 nul_fun = NULL; 1169 stroff = 0; 1170 1171 for (i = 0, stab = info->stabs, nul_str = str = info->strs; 1172 i < info->indextablesize && stab < info->stabs + stabsize; 1173 stab += STABSIZE) 1174 { 1175 switch (stab[TYPEOFF]) 1176 { 1177 case 0: 1178 /* This is the first entry in a compilation unit. */ 1179 if ((bfd_size_type) ((info->strs + strsize) - str) < stroff) 1180 break; 1181 str += stroff; 1182 stroff = bfd_get_32 (abfd, stab + VALOFF); 1183 break; 1184 1185 case N_SO: 1186 /* The main file name. */ 1187 1188 /* The following code creates a new indextable entry with 1189 a NULL function name if there were no N_FUNs in a file. 1190 Note that a N_SO without a file name is an EOF and 1191 there could be 2 N_SO following it with the new filename 1192 and directory. */ 1193 if (nul_fun != NULL) 1194 { 1195 info->indextable[i].val = bfd_get_32 (abfd, nul_fun + VALOFF); 1196 info->indextable[i].stab = nul_fun; 1197 info->indextable[i].str = nul_str; 1198 info->indextable[i].directory_name = directory_name; 1199 info->indextable[i].file_name = file_name; 1200 info->indextable[i].function_name = NULL; 1201 info->indextable[i].idx = i; 1202 ++i; 1203 } 1204 1205 directory_name = NULL; 1206 file_name = (char *) str + bfd_get_32 (abfd, stab + STRDXOFF); 1207 if (file_name == (char *) str) 1208 { 1209 file_name = NULL; 1210 nul_fun = NULL; 1211 } 1212 else 1213 { 1214 nul_fun = stab; 1215 nul_str = str; 1216 if (file_name >= (char *) info->strs + strsize 1217 || file_name < (char *) str) 1218 file_name = NULL; 1219 if (stab + STABSIZE + TYPEOFF < info->stabs + stabsize 1220 && *(stab + STABSIZE + TYPEOFF) == (bfd_byte) N_SO) 1221 { 1222 /* Two consecutive N_SOs are a directory and a 1223 file name. */ 1224 stab += STABSIZE; 1225 directory_name = file_name; 1226 file_name = ((char *) str 1227 + bfd_get_32 (abfd, stab + STRDXOFF)); 1228 if (file_name >= (char *) info->strs + strsize 1229 || file_name < (char *) str) 1230 file_name = NULL; 1231 } 1232 } 1233 break; 1234 1235 case N_SOL: 1236 /* The name of an include file. */ 1237 file_name = (char *) str + bfd_get_32 (abfd, stab + STRDXOFF); 1238 /* PR 17512: file: 0c680a1f. */ 1239 /* PR 17512: file: 5da8aec4. */ 1240 if (file_name >= (char *) info->strs + strsize 1241 || file_name < (char *) str) 1242 file_name = NULL; 1243 break; 1244 1245 case N_FUN: 1246 /* A function name. */ 1247 function_name = (char *) str + bfd_get_32 (abfd, stab + STRDXOFF); 1248 if (function_name == (char *) str) 1249 continue; 1250 if (function_name >= (char *) info->strs + strsize 1251 || function_name < (char *) str) 1252 function_name = NULL; 1253 1254 nul_fun = NULL; 1255 info->indextable[i].val = bfd_get_32 (abfd, stab + VALOFF); 1256 info->indextable[i].stab = stab; 1257 info->indextable[i].str = str; 1258 info->indextable[i].directory_name = directory_name; 1259 info->indextable[i].file_name = file_name; 1260 info->indextable[i].function_name = function_name; 1261 info->indextable[i].idx = i; 1262 ++i; 1263 break; 1264 } 1265 } 1266 1267 if (nul_fun != NULL) 1268 { 1269 info->indextable[i].val = bfd_get_32 (abfd, nul_fun + VALOFF); 1270 info->indextable[i].stab = nul_fun; 1271 info->indextable[i].str = nul_str; 1272 info->indextable[i].directory_name = directory_name; 1273 info->indextable[i].file_name = file_name; 1274 info->indextable[i].function_name = NULL; 1275 info->indextable[i].idx = i; 1276 ++i; 1277 } 1278 1279 info->indextable[i].val = (bfd_vma) -1; 1280 info->indextable[i].stab = info->stabs + stabsize; 1281 info->indextable[i].str = str; 1282 info->indextable[i].directory_name = NULL; 1283 info->indextable[i].file_name = NULL; 1284 info->indextable[i].function_name = NULL; 1285 info->indextable[i].idx = i; 1286 ++i; 1287 1288 info->indextablesize = i; 1289 qsort (info->indextable, (size_t) i, sizeof (struct indexentry), 1290 cmpindexentry); 1291 1292 *pinfo = info; 1293 } 1294 1295 /* We are passed a section relative offset. The offsets in the 1296 stabs information are absolute. */ 1297 offset += bfd_section_vma (section); 1298 1299 #ifdef ENABLE_CACHING 1300 if (info->cached_indexentry != NULL 1301 && offset >= info->cached_offset 1302 && offset < (info->cached_indexentry + 1)->val) 1303 { 1304 stab = info->cached_stab; 1305 indexentry = info->cached_indexentry; 1306 file_name = info->cached_file_name; 1307 } 1308 else 1309 #endif 1310 { 1311 long low, high; 1312 long mid = -1; 1313 1314 /* Cache non-existent or invalid. Do binary search on 1315 indextable. */ 1316 indexentry = NULL; 1317 1318 low = 0; 1319 high = info->indextablesize - 1; 1320 while (low != high) 1321 { 1322 mid = (high + low) / 2; 1323 if (offset >= info->indextable[mid].val 1324 && offset < info->indextable[mid + 1].val) 1325 { 1326 indexentry = &info->indextable[mid]; 1327 break; 1328 } 1329 1330 if (info->indextable[mid].val > offset) 1331 high = mid; 1332 else 1333 low = mid + 1; 1334 } 1335 1336 if (indexentry == NULL) 1337 return TRUE; 1338 1339 stab = indexentry->stab + STABSIZE; 1340 file_name = indexentry->file_name; 1341 } 1342 1343 directory_name = indexentry->directory_name; 1344 str = indexentry->str; 1345 1346 saw_line = FALSE; 1347 saw_func = FALSE; 1348 for (; stab < (indexentry+1)->stab; stab += STABSIZE) 1349 { 1350 bfd_boolean done; 1351 bfd_vma val; 1352 1353 done = FALSE; 1354 1355 switch (stab[TYPEOFF]) 1356 { 1357 case N_SOL: 1358 /* The name of an include file. */ 1359 val = bfd_get_32 (abfd, stab + VALOFF); 1360 if (val <= offset) 1361 { 1362 file_name = (char *) str + bfd_get_32 (abfd, stab + STRDXOFF); 1363 if (file_name >= (char *) info->strs + strsize 1364 || file_name < (char *) str) 1365 file_name = NULL; 1366 *pline = 0; 1367 } 1368 break; 1369 1370 case N_SLINE: 1371 case N_DSLINE: 1372 case N_BSLINE: 1373 /* A line number. If the function was specified, then the value 1374 is relative to the start of the function. Otherwise, the 1375 value is an absolute address. */ 1376 val = ((indexentry->function_name ? indexentry->val : 0) 1377 + bfd_get_32 (abfd, stab + VALOFF)); 1378 /* If this line starts before our desired offset, or if it's 1379 the first line we've been able to find, use it. The 1380 !saw_line check works around a bug in GCC 2.95.3, which emits 1381 the first N_SLINE late. */ 1382 if (!saw_line || val <= offset) 1383 { 1384 *pline = bfd_get_16 (abfd, stab + DESCOFF); 1385 1386 #ifdef ENABLE_CACHING 1387 info->cached_stab = stab; 1388 info->cached_offset = val; 1389 info->cached_file_name = file_name; 1390 info->cached_indexentry = indexentry; 1391 #endif 1392 } 1393 if (val > offset) 1394 done = TRUE; 1395 saw_line = TRUE; 1396 break; 1397 1398 case N_FUN: 1399 case N_SO: 1400 if (saw_func || saw_line) 1401 done = TRUE; 1402 saw_func = TRUE; 1403 break; 1404 } 1405 1406 if (done) 1407 break; 1408 } 1409 1410 *pfound = TRUE; 1411 1412 if (file_name == NULL || IS_ABSOLUTE_PATH (file_name) 1413 || directory_name == NULL) 1414 *pfilename = file_name; 1415 else 1416 { 1417 size_t dirlen; 1418 1419 dirlen = strlen (directory_name); 1420 if (info->filename == NULL 1421 || filename_ncmp (info->filename, directory_name, dirlen) != 0 1422 || filename_cmp (info->filename + dirlen, file_name) != 0) 1423 { 1424 size_t len; 1425 1426 /* Don't free info->filename here. objdump and other 1427 apps keep a copy of a previously returned file name 1428 pointer. */ 1429 len = strlen (file_name) + 1; 1430 info->filename = (char *) bfd_alloc (abfd, dirlen + len); 1431 if (info->filename == NULL) 1432 return FALSE; 1433 memcpy (info->filename, directory_name, dirlen); 1434 memcpy (info->filename + dirlen, file_name, len); 1435 } 1436 1437 *pfilename = info->filename; 1438 } 1439 1440 if (indexentry->function_name != NULL) 1441 { 1442 char *s; 1443 1444 /* This will typically be something like main:F(0,1), so we want 1445 to clobber the colon. It's OK to change the name, since the 1446 string is in our own local storage anyhow. */ 1447 s = strchr (indexentry->function_name, ':'); 1448 if (s != NULL) 1449 *s = '\0'; 1450 1451 *pfnname = indexentry->function_name; 1452 } 1453 1454 return TRUE; 1455 } 1456 1457 long 1458 _bfd_nosymbols_canonicalize_symtab (bfd *abfd ATTRIBUTE_UNUSED, 1459 asymbol **location ATTRIBUTE_UNUSED) 1460 { 1461 return 0; 1462 } 1463 1464 void 1465 _bfd_nosymbols_print_symbol (bfd *abfd ATTRIBUTE_UNUSED, 1466 void *afile ATTRIBUTE_UNUSED, 1467 asymbol *symbol ATTRIBUTE_UNUSED, 1468 bfd_print_symbol_type how ATTRIBUTE_UNUSED) 1469 { 1470 } 1471 1472 void 1473 _bfd_nosymbols_get_symbol_info (bfd *abfd ATTRIBUTE_UNUSED, 1474 asymbol *sym ATTRIBUTE_UNUSED, 1475 symbol_info *ret ATTRIBUTE_UNUSED) 1476 { 1477 } 1478 1479 const char * 1480 _bfd_nosymbols_get_symbol_version_string (bfd *abfd, 1481 asymbol *symbol ATTRIBUTE_UNUSED, 1482 bfd_boolean *hidden ATTRIBUTE_UNUSED) 1483 { 1484 return (const char *) _bfd_ptr_bfd_null_error (abfd); 1485 } 1486 1487 bfd_boolean 1488 _bfd_nosymbols_bfd_is_local_label_name (bfd *abfd ATTRIBUTE_UNUSED, 1489 const char *name ATTRIBUTE_UNUSED) 1490 { 1491 return FALSE; 1492 } 1493 1494 alent * 1495 _bfd_nosymbols_get_lineno (bfd *abfd, asymbol *sym ATTRIBUTE_UNUSED) 1496 { 1497 return (alent *) _bfd_ptr_bfd_null_error (abfd); 1498 } 1499 1500 bfd_boolean 1501 _bfd_nosymbols_find_nearest_line 1502 (bfd *abfd, 1503 asymbol **symbols ATTRIBUTE_UNUSED, 1504 asection *section ATTRIBUTE_UNUSED, 1505 bfd_vma offset ATTRIBUTE_UNUSED, 1506 const char **filename_ptr ATTRIBUTE_UNUSED, 1507 const char **functionname_ptr ATTRIBUTE_UNUSED, 1508 unsigned int *line_ptr ATTRIBUTE_UNUSED, 1509 unsigned int *discriminator_ptr ATTRIBUTE_UNUSED) 1510 { 1511 return _bfd_bool_bfd_false_error (abfd); 1512 } 1513 1514 bfd_boolean 1515 _bfd_nosymbols_find_line (bfd *abfd, 1516 asymbol **symbols ATTRIBUTE_UNUSED, 1517 asymbol *symbol ATTRIBUTE_UNUSED, 1518 const char **filename_ptr ATTRIBUTE_UNUSED, 1519 unsigned int *line_ptr ATTRIBUTE_UNUSED) 1520 { 1521 return _bfd_bool_bfd_false_error (abfd); 1522 } 1523 1524 bfd_boolean 1525 _bfd_nosymbols_find_inliner_info 1526 (bfd *abfd, 1527 const char **filename_ptr ATTRIBUTE_UNUSED, 1528 const char **functionname_ptr ATTRIBUTE_UNUSED, 1529 unsigned int *line_ptr ATTRIBUTE_UNUSED) 1530 { 1531 return _bfd_bool_bfd_false_error (abfd); 1532 } 1533 1534 asymbol * 1535 _bfd_nosymbols_bfd_make_debug_symbol (bfd *abfd, 1536 void *ptr ATTRIBUTE_UNUSED, 1537 unsigned long sz ATTRIBUTE_UNUSED) 1538 { 1539 return (asymbol *) _bfd_ptr_bfd_null_error (abfd); 1540 } 1541 1542 long 1543 _bfd_nosymbols_read_minisymbols (bfd *abfd, 1544 bfd_boolean dynamic ATTRIBUTE_UNUSED, 1545 void **minisymsp ATTRIBUTE_UNUSED, 1546 unsigned int *sizep ATTRIBUTE_UNUSED) 1547 { 1548 return _bfd_long_bfd_n1_error (abfd); 1549 } 1550 1551 asymbol * 1552 _bfd_nosymbols_minisymbol_to_symbol (bfd *abfd, 1553 bfd_boolean dynamic ATTRIBUTE_UNUSED, 1554 const void *minisym ATTRIBUTE_UNUSED, 1555 asymbol *sym ATTRIBUTE_UNUSED) 1556 { 1557 return (asymbol *) _bfd_ptr_bfd_null_error (abfd); 1558 } 1559 1560 long 1561 _bfd_nodynamic_get_synthetic_symtab (bfd *abfd, 1562 long symcount ATTRIBUTE_UNUSED, 1563 asymbol **syms ATTRIBUTE_UNUSED, 1564 long dynsymcount ATTRIBUTE_UNUSED, 1565 asymbol **dynsyms ATTRIBUTE_UNUSED, 1566 asymbol **ret ATTRIBUTE_UNUSED) 1567 { 1568 return _bfd_long_bfd_n1_error (abfd); 1569 } 1570