diff options
Diffstat (limited to 'gdb/elfread.c')
-rw-r--r-- | gdb/elfread.c | 296 |
1 files changed, 149 insertions, 147 deletions
diff --git a/gdb/elfread.c b/gdb/elfread.c index 9c13b00..f0ad2be 100644 --- a/gdb/elfread.c +++ b/gdb/elfread.c @@ -2,21 +2,22 @@ Copyright 1991, 92, 93, 94, 95, 96, 1998 Free Software Foundation, Inc. Written by Fred Fish at Cygnus Support. -This file is part of GDB. + This file is part of GDB. -This program is free software; you can redistribute it and/or modify -it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 2 of the License, or -(at your option) any later version. + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2 of the License, or + (at your option) any later version. -This program is distributed in the hope that it will be useful, -but WITHOUT ANY WARRANTY; without even the implied warranty of -MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -GNU General Public License for more details. + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. -You should have received a copy of the GNU General Public License -along with this program; if not, write to the Free Software -Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 59 Temple Place - Suite 330, + Boston, MA 02111-1307, USA. */ #include "defs.h" #include "bfd.h" @@ -38,29 +39,30 @@ extern void _initialize_elfread PARAMS ((void)); psymtab reading. It is destroyed at the complation of psymtab-reading. It's local to elf_symfile_read. */ -struct elfinfo { - file_ptr dboffset; /* Offset to dwarf debug section */ - unsigned int dbsize; /* Size of dwarf debug section */ - file_ptr lnoffset; /* Offset to dwarf line number section */ - unsigned int lnsize; /* Size of dwarf line number section */ - asection *stabsect; /* Section pointer for .stab section */ - asection *stabindexsect; /* Section pointer for .stab.index section */ - asection *mdebugsect; /* Section pointer for .mdebug section */ -}; +struct elfinfo + { + file_ptr dboffset; /* Offset to dwarf debug section */ + unsigned int dbsize; /* Size of dwarf debug section */ + file_ptr lnoffset; /* Offset to dwarf line number section */ + unsigned int lnsize; /* Size of dwarf line number section */ + asection *stabsect; /* Section pointer for .stab section */ + asection *stabindexsect; /* Section pointer for .stab.index section */ + asection *mdebugsect; /* Section pointer for .mdebug section */ + }; /* Various things we might complain about... */ -struct complaint section_info_complaint = - {"elf/stab section information %s without a preceding file symbol", 0, 0}; +struct complaint section_info_complaint = +{"elf/stab section information %s without a preceding file symbol", 0, 0}; -struct complaint section_info_dup_complaint = - {"duplicated elf/stab section information for %s", 0, 0}; +struct complaint section_info_dup_complaint = +{"duplicated elf/stab section information for %s", 0, 0}; -struct complaint stab_info_mismatch_complaint = - {"elf/stab section information missing for %s", 0, 0}; +struct complaint stab_info_mismatch_complaint = +{"elf/stab section information missing for %s", 0, 0}; -struct complaint stab_info_questionable_complaint = - {"elf/stab section information questionable for %s", 0, 0}; +struct complaint stab_info_questionable_complaint = +{"elf/stab section information questionable for %s", 0, 0}; static void elf_symfile_init PARAMS ((struct objfile *)); @@ -75,16 +77,16 @@ static void elf_symfile_finish PARAMS ((struct objfile *)); static void -elf_symtab_read PARAMS ((bfd *, CORE_ADDR, struct objfile *, int)); +elf_symtab_read PARAMS ((bfd *, CORE_ADDR, struct objfile *, int)); static void free_elfinfo PARAMS ((void *)); static struct minimal_symbol * -record_minimal_symbol_and_info PARAMS ((char *, CORE_ADDR, - enum minimal_symbol_type, char *, - asection *bfd_section, - struct objfile *)); + record_minimal_symbol_and_info PARAMS ((char *, CORE_ADDR, + enum minimal_symbol_type, char *, + asection * bfd_section, + struct objfile *)); static void elf_locate_sections PARAMS ((bfd *, asection *, void *)); @@ -117,31 +119,31 @@ elf_locate_sections (ignore_abfd, sectp, eip) register struct elfinfo *ei; ei = (struct elfinfo *) eip; - if (STREQ (sectp -> name, ".debug")) + if (STREQ (sectp->name, ".debug")) { - ei -> dboffset = sectp -> filepos; - ei -> dbsize = bfd_get_section_size_before_reloc (sectp); + ei->dboffset = sectp->filepos; + ei->dbsize = bfd_get_section_size_before_reloc (sectp); } - else if (STREQ (sectp -> name, ".line")) + else if (STREQ (sectp->name, ".line")) { - ei -> lnoffset = sectp -> filepos; - ei -> lnsize = bfd_get_section_size_before_reloc (sectp); + ei->lnoffset = sectp->filepos; + ei->lnsize = bfd_get_section_size_before_reloc (sectp); } - else if (STREQ (sectp -> name, ".stab")) + else if (STREQ (sectp->name, ".stab")) { - ei -> stabsect = sectp; + ei->stabsect = sectp; } - else if (STREQ (sectp -> name, ".stab.index")) + else if (STREQ (sectp->name, ".stab.index")) { - ei -> stabindexsect = sectp; + ei->stabindexsect = sectp; } - else if (STREQ (sectp -> name, ".mdebug")) + else if (STREQ (sectp->name, ".mdebug")) { - ei -> mdebugsect = sectp; + ei->mdebugsect = sectp; } } -#if 0 /* Currently unused */ +#if 0 /* Currently unused */ char * elf_interpreter (abfd) @@ -156,7 +158,7 @@ elf_interpreter (abfd) { size = bfd_section_size (abfd, interp_sec); interp = alloca (size); - if (bfd_get_section_contents (abfd, interp_sec, interp, (file_ptr)0, + if (bfd_get_section_contents (abfd, interp_sec, interp, (file_ptr) 0, size)) { interp = savestring (interp, size - 1); @@ -213,29 +215,29 @@ record_minimal_symbol_and_info (name, address, ms_type, info, bfd_section, /* -LOCAL FUNCTION + LOCAL FUNCTION - elf_symtab_read -- read the symbol table of an ELF file + elf_symtab_read -- read the symbol table of an ELF file -SYNOPSIS + SYNOPSIS - void elf_symtab_read (bfd *abfd, CORE_ADDR addr, - struct objfile *objfile, int dynamic) + void elf_symtab_read (bfd *abfd, CORE_ADDR addr, + struct objfile *objfile, int dynamic) -DESCRIPTION + DESCRIPTION - Given an open bfd, a base address to relocate symbols to, and a - flag that specifies whether or not this bfd is for an executable - or not (may be shared library for example), add all the global - function and data symbols to the minimal symbol table. + Given an open bfd, a base address to relocate symbols to, and a + flag that specifies whether or not this bfd is for an executable + or not (may be shared library for example), add all the global + function and data symbols to the minimal symbol table. - In stabs-in-ELF, as implemented by Sun, there are some local symbols - defined in the ELF symbol table, which can be used to locate - the beginnings of sections from each ".o" file that was linked to - form the executable objfile. We gather any such info and record it - in data structures hung off the objfile's private data. + In stabs-in-ELF, as implemented by Sun, there are some local symbols + defined in the ELF symbol table, which can be used to locate + the beginnings of sections from each ".o" file that was linked to + form the executable objfile. We gather any such info and record it + in data structures hung off the objfile's private data. -*/ + */ static void elf_symtab_read (abfd, addr, objfile, dynamic) @@ -266,7 +268,7 @@ elf_symtab_read (abfd, addr, objfile, dynamic) struct dbx_symfile_info *dbx = objfile->sym_stab_info; unsigned long size; int stripped = (bfd_get_symcount (abfd) == 0); - + if (dynamic) { storage_needed = bfd_get_dynamic_symtab_upper_bound (abfd); @@ -287,44 +289,44 @@ elf_symtab_read (abfd, addr, objfile, dynamic) symbol_table = (asymbol **) xmalloc (storage_needed); back_to = make_cleanup (free, symbol_table); if (dynamic) - number_of_symbols = bfd_canonicalize_dynamic_symtab (abfd, + number_of_symbols = bfd_canonicalize_dynamic_symtab (abfd, symbol_table); else - number_of_symbols = bfd_canonicalize_symtab (abfd, symbol_table); + number_of_symbols = bfd_canonicalize_symtab (abfd, symbol_table); if (number_of_symbols < 0) error ("Can't read symbols from %s: %s", bfd_get_filename (abfd), bfd_errmsg (bfd_get_error ())); for (i = 0; i < number_of_symbols; i++) { sym = symbol_table[i]; - if (sym -> name == NULL || *sym -> name == '\0') + if (sym->name == NULL || *sym->name == '\0') { /* Skip names that don't exist (shouldn't happen), or names - that are null strings (may happen). */ + that are null strings (may happen). */ continue; } if (dynamic - && sym -> section == &bfd_und_section - && (sym -> flags & BSF_FUNCTION)) + && sym->section == &bfd_und_section + && (sym->flags & BSF_FUNCTION)) { struct minimal_symbol *msym; /* Symbol is a reference to a function defined in - a shared library. - If its value is non zero then it is usually the address - of the corresponding entry in the procedure linkage table, - relative to the base address. - If its value is zero then the dynamic linker has to resolve - the symbol. We are unable to find any meaningful address - for this symbol in the executable file, so we skip it. */ - symaddr = sym -> value; + a shared library. + If its value is non zero then it is usually the address + of the corresponding entry in the procedure linkage table, + relative to the base address. + If its value is zero then the dynamic linker has to resolve + the symbol. We are unable to find any meaningful address + for this symbol in the executable file, so we skip it. */ + symaddr = sym->value; if (symaddr == 0) continue; symaddr += addr; msym = record_minimal_symbol_and_info - ((char *) sym -> name, symaddr, - mst_solib_trampoline, NULL, sym -> section, objfile); + ((char *) sym->name, symaddr, + mst_solib_trampoline, NULL, sym->section, objfile); #ifdef SOFUN_ADDRESS_MAYBE_MISSING if (msym != NULL) msym->filename = filesymname; @@ -337,47 +339,47 @@ elf_symtab_read (abfd, addr, objfile, dynamic) of the main symbol table. */ if (dynamic && !stripped) continue; - if (sym -> flags & BSF_FILE) + if (sym->flags & BSF_FILE) { /* STT_FILE debugging symbol that helps stabs-in-elf debugging. - Chain any old one onto the objfile; remember new sym. */ + Chain any old one onto the objfile; remember new sym. */ if (sectinfo != NULL) { - sectinfo -> next = dbx -> stab_section_info; - dbx -> stab_section_info = sectinfo; + sectinfo->next = dbx->stab_section_info; + dbx->stab_section_info = sectinfo; sectinfo = NULL; } filesym = sym; #ifdef SOFUN_ADDRESS_MAYBE_MISSING filesymname = - obsavestring ((char *)filesym->name, strlen (filesym->name), + obsavestring ((char *) filesym->name, strlen (filesym->name), &objfile->symbol_obstack); #endif } - else if (sym -> flags & (BSF_GLOBAL | BSF_LOCAL | BSF_WEAK)) + else if (sym->flags & (BSF_GLOBAL | BSF_LOCAL | BSF_WEAK)) { struct minimal_symbol *msym; /* Select global/local/weak symbols. Note that bfd puts abs - symbols in their own section, so all symbols we are - interested in will have a section. */ + symbols in their own section, so all symbols we are + interested in will have a section. */ /* Bfd symbols are section relative. */ - symaddr = sym -> value + sym -> section -> vma; + symaddr = sym->value + sym->section->vma; /* Relocate all non-absolute symbols by base address. */ - if (sym -> section != &bfd_abs_section) + if (sym->section != &bfd_abs_section) { symaddr += addr; } /* For non-absolute symbols, use the type of the section - they are relative to, to intuit text/data. Bfd provides - no way of figuring this out for absolute symbols. */ - if (sym -> section == &bfd_abs_section) + they are relative to, to intuit text/data. Bfd provides + no way of figuring this out for absolute symbols. */ + if (sym->section == &bfd_abs_section) { /* This is a hack to get the minimal symbol type right for Irix 5, which has absolute adresses with special section indices for dynamic symbols. */ unsigned short shndx = - ((elf_symbol_type *) sym)->internal_elf_sym.st_shndx; + ((elf_symbol_type *) sym)->internal_elf_sym.st_shndx; switch (shndx) { @@ -403,14 +405,14 @@ elf_symtab_read (abfd, addr, objfile, dynamic) symaddr += addr; } } - else if (sym -> section -> flags & SEC_CODE) + else if (sym->section->flags & SEC_CODE) { - if (sym -> flags & BSF_GLOBAL) + if (sym->flags & BSF_GLOBAL) { ms_type = mst_text; } else if ((sym->name[0] == '.' && sym->name[1] == 'L') - || ((sym -> flags & BSF_LOCAL) + || ((sym->flags & BSF_LOCAL) && sym->name[0] == '$' && sym->name[1] == 'L')) /* Looks like a compiler-generated label. Skip it. @@ -424,23 +426,23 @@ elf_symtab_read (abfd, addr, objfile, dynamic) else if (sym->name[0] == '.' && sym->name[1] == '.') { /* Looks like a Harris compiler generated label for the - purpose of marking instructions that are relevant to - DWARF dies. The assembler can't get rid of these - because they are relocatable addresses that the - linker needs to resolve. */ + purpose of marking instructions that are relevant to + DWARF dies. The assembler can't get rid of these + because they are relocatable addresses that the + linker needs to resolve. */ continue; } -#endif +#endif else { ms_type = mst_file_text; } } - else if (sym -> section -> flags & SEC_ALLOC) + else if (sym->section->flags & SEC_ALLOC) { - if (sym -> flags & BSF_GLOBAL) + if (sym->flags & BSF_GLOBAL) { - if (sym -> section -> flags & SEC_LOAD) + if (sym->section->flags & SEC_LOAD) { ms_type = mst_data; } @@ -449,23 +451,23 @@ elf_symtab_read (abfd, addr, objfile, dynamic) ms_type = mst_bss; } } - else if (sym -> flags & BSF_LOCAL) + else if (sym->flags & BSF_LOCAL) { /* Named Local variable in a Data section. Check its - name for stabs-in-elf. The STREQ macro checks the - first character inline, so we only actually do a - strcmp function call on names that start with 'B' - or 'D' */ + name for stabs-in-elf. The STREQ macro checks the + first character inline, so we only actually do a + strcmp function call on names that start with 'B' + or 'D' */ index = SECT_OFF_MAX; - if (STREQ ("Bbss.bss", sym -> name)) + if (STREQ ("Bbss.bss", sym->name)) { index = SECT_OFF_BSS; } - else if (STREQ ("Ddata.data", sym -> name)) + else if (STREQ ("Ddata.data", sym->name)) { index = SECT_OFF_DATA; } - else if (STREQ ("Drodata.rodata", sym -> name)) + else if (STREQ ("Drodata.rodata", sym->name)) { index = SECT_OFF_RODATA; } @@ -476,39 +478,39 @@ elf_symtab_read (abfd, addr, objfile, dynamic) if (sectinfo == NULL) { sectinfo = (struct stab_section_info *) - xmmalloc (objfile -> md, sizeof (*sectinfo)); + xmmalloc (objfile->md, sizeof (*sectinfo)); memset ((PTR) sectinfo, 0, sizeof (*sectinfo)); if (filesym == NULL) { complain (§ion_info_complaint, - sym -> name); + sym->name); } else { - sectinfo -> filename = - (char *) filesym -> name; + sectinfo->filename = + (char *) filesym->name; } } - if (sectinfo -> sections[index] != 0) + if (sectinfo->sections[index] != 0) { complain (§ion_info_dup_complaint, - sectinfo -> filename); + sectinfo->filename); } /* Bfd symbols are section relative. */ - symaddr = sym -> value + sym -> section -> vma; + symaddr = sym->value + sym->section->vma; /* Relocate non-absolute symbols by base address. */ - if (sym -> section != &bfd_abs_section) + if (sym->section != &bfd_abs_section) { symaddr += addr; } - sectinfo -> sections[index] = symaddr; + sectinfo->sections[index] = symaddr; /* The special local symbols don't go in the minimal symbol table, so ignore this one. */ continue; } /* Not a special stabs-in-elf symbol, do regular - symbol processing. */ - if (sym -> section -> flags & SEC_LOAD) + symbol processing. */ + if (sym->section->flags & SEC_LOAD) { ms_type = mst_file_data; } @@ -529,19 +531,19 @@ elf_symtab_read (abfd, addr, objfile, dynamic) hob with actions like finding what function the PC is in. Ignore them if they aren't text, data, or bss. */ /* ms_type = mst_unknown; */ - continue; /* Skip this symbol. */ + continue; /* Skip this symbol. */ } /* Pass symbol size field in via BFD. FIXME!!! */ - size = ((elf_symbol_type *) sym) -> internal_elf_sym.st_size; + size = ((elf_symbol_type *) sym)->internal_elf_sym.st_size; msym = record_minimal_symbol_and_info - ((char *) sym -> name, symaddr, - ms_type, (PTR) size, sym -> section, objfile); + ((char *) sym->name, symaddr, + ms_type, (PTR) size, sym->section, objfile); #ifdef SOFUN_ADDRESS_MAYBE_MISSING if (msym != NULL) msym->filename = filesymname; #endif #ifdef ELF_MAKE_MSYMBOL_SPECIAL - ELF_MAKE_MSYMBOL_SPECIAL(sym,msym); + ELF_MAKE_MSYMBOL_SPECIAL (sym, msym); #endif } } @@ -599,7 +601,7 @@ elf_symfile_read (objfile, section_offsets, mainline) /* Allocate struct to keep track of the symfile */ objfile->sym_stab_info = (struct dbx_symfile_info *) - xmmalloc (objfile -> md, sizeof (struct dbx_symfile_info)); + xmmalloc (objfile->md, sizeof (struct dbx_symfile_info)); memset ((char *) objfile->sym_stab_info, 0, sizeof (struct dbx_symfile_info)); make_cleanup (free_elfinfo, (PTR) objfile); @@ -628,7 +630,7 @@ elf_symfile_read (objfile, section_offsets, mainline) } /* We first have to find them... */ - bfd_map_over_sections (abfd, elf_locate_sections, (PTR) &ei); + bfd_map_over_sections (abfd, elf_locate_sections, (PTR) & ei); /* ELF debugging information is inserted into the psymtab in the order of least informative first - most informative last. Since @@ -647,7 +649,7 @@ elf_symfile_read (objfile, section_offsets, mainline) const struct ecoff_debug_swap *swap; /* .mdebug section, presumably holding ECOFF debugging - information. */ + information. */ swap = get_elf_backend_data (abfd)->elf_backend_ecoff_debug_swap; if (swap) elfmdebug_build_psymtabs (objfile, swap, ei.mdebugsect, @@ -658,7 +660,7 @@ elf_symfile_read (objfile, section_offsets, mainline) asection *str_sect; /* Stab sections have an associated string table that looks like - a separate section. */ + a separate section. */ str_sect = bfd_get_section_by_name (abfd, ".stabstr"); /* FIXME should probably warn about a stab section without a stabstr. */ @@ -700,7 +702,7 @@ static void free_elfinfo (objp) PTR objp; { - struct objfile *objfile = (struct objfile *)objp; + struct objfile *objfile = (struct objfile *) objp; struct dbx_symfile_info *dbxinfo = objfile->sym_stab_info; struct stab_section_info *ssi, *nssi; @@ -739,9 +741,9 @@ static void elf_symfile_finish (objfile) struct objfile *objfile; { - if (objfile -> sym_stab_info != NULL) + if (objfile->sym_stab_info != NULL) { - mfree (objfile -> md, objfile -> sym_stab_info); + mfree (objfile->md, objfile->sym_stab_info); } } @@ -787,7 +789,7 @@ elfstab_offset_sections (objfile, pst) /* The ELF symbol info doesn't include path names, so strip the path (if any) from the psymtab filename. */ while (0 != (p = strchr (filename, '/'))) - filename = p+1; + filename = p + 1; /* FIXME: This linear search could speed up significantly if it was chained in the right order to match how we search it, @@ -801,7 +803,7 @@ elfstab_offset_sections (objfile, pst) (from different directories) with the same name. */ if (0 == maybe->found) break; - questionable = maybe; /* Might use it later. */ + questionable = maybe; /* Might use it later. */ } } @@ -816,9 +818,9 @@ elfstab_offset_sections (objfile, pst) /* Found it! Allocate a new psymtab struct, and fill it in. */ maybe->found++; pst->section_offsets = (struct section_offsets *) - obstack_alloc (&objfile -> psymbol_obstack, + obstack_alloc (&objfile->psymbol_obstack, sizeof (struct section_offsets) + - sizeof (pst->section_offsets->offsets) * (SECT_OFF_MAX-1)); + sizeof (pst->section_offsets->offsets) * (SECT_OFF_MAX - 1)); for (i = 0; i < SECT_OFF_MAX; i++) ANOFFSET (pst->section_offsets, i) = maybe->sections[i]; @@ -826,7 +828,7 @@ elfstab_offset_sections (objfile, pst) } /* We were unable to find any offsets for this file. Complain. */ - if (dbx->stab_section_info) /* If there *is* any info, */ + if (dbx->stab_section_info) /* If there *is* any info, */ complain (&stab_info_mismatch_complaint, filename); } @@ -835,13 +837,13 @@ elfstab_offset_sections (objfile, pst) static struct sym_fns elf_sym_fns = { bfd_target_elf_flavour, - elf_new_init, /* sym_new_init: init anything gbl to entire symtab */ - elf_symfile_init, /* sym_init: read initial info, setup for sym_read() */ - elf_symfile_read, /* sym_read: read a symbol file into symtab */ - elf_symfile_finish, /* sym_finish: finished with file, cleanup */ + elf_new_init, /* sym_new_init: init anything gbl to entire symtab */ + elf_symfile_init, /* sym_init: read initial info, setup for sym_read() */ + elf_symfile_read, /* sym_read: read a symbol file into symtab */ + elf_symfile_finish, /* sym_finish: finished with file, cleanup */ default_symfile_offsets, /* sym_offsets: Translate ext. to int. relocation */ - NULL /* next: pointer to next struct sym_fns */ + NULL /* next: pointer to next struct sym_fns */ }; void |