1 /* Read ELF (Executable and Linking Format) object files for GDB.
3 Copyright (C) 1991-2019 Free Software Foundation, Inc.
5 Written by Fred Fish at Cygnus Support.
7 This file is part of GDB.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>. */
24 /* Local non-gdb includes. */
25 #include "arch-utils.h"
30 #include "complaints.h"
33 #include "elf/common.h"
34 #include "elf/internal.h"
36 #include "filenames.h"
37 #include "gdb-stabs.h"
39 #include "gdbthread.h"
44 #include "mdebugread.h"
49 #include "stabsread.h"
54 /* Forward declarations. */
55 extern const struct sym_fns elf_sym_fns_gdb_index
;
56 extern const struct sym_fns elf_sym_fns_debug_names
;
57 extern const struct sym_fns elf_sym_fns_lazy_psyms
;
59 /* The struct elfinfo is available only during ELF symbol table and
60 psymtab reading. It is destroyed at the completion of psymtab-reading.
61 It's local to elf_symfile_read. */
65 asection
*stabsect
; /* Section pointer for .stab section */
66 asection
*mdebugsect
; /* Section pointer for .mdebug section */
69 /* Per-BFD data for probe info. */
71 static const struct bfd_data
*probe_key
= NULL
;
73 /* Minimal symbols located at the GOT entries for .plt - that is the real
74 pointer where the given entry will jump to. It gets updated by the real
75 function address during lazy ld.so resolving in the inferior. These
76 minimal symbols are indexed for <tab>-completion. */
78 #define SYMBOL_GOT_PLT_SUFFIX "@got.plt"
80 /* Locate the segments in ABFD. */
82 static struct symfile_segment_data
*
83 elf_symfile_segments (bfd
*abfd
)
85 Elf_Internal_Phdr
*phdrs
, **segments
;
87 int num_phdrs
, num_segments
, num_sections
, i
;
89 struct symfile_segment_data
*data
;
91 phdrs_size
= bfd_get_elf_phdr_upper_bound (abfd
);
95 phdrs
= (Elf_Internal_Phdr
*) alloca (phdrs_size
);
96 num_phdrs
= bfd_get_elf_phdrs (abfd
, phdrs
);
101 segments
= XALLOCAVEC (Elf_Internal_Phdr
*, num_phdrs
);
102 for (i
= 0; i
< num_phdrs
; i
++)
103 if (phdrs
[i
].p_type
== PT_LOAD
)
104 segments
[num_segments
++] = &phdrs
[i
];
106 if (num_segments
== 0)
109 data
= XCNEW (struct symfile_segment_data
);
110 data
->num_segments
= num_segments
;
111 data
->segment_bases
= XCNEWVEC (CORE_ADDR
, num_segments
);
112 data
->segment_sizes
= XCNEWVEC (CORE_ADDR
, num_segments
);
114 for (i
= 0; i
< num_segments
; i
++)
116 data
->segment_bases
[i
] = segments
[i
]->p_vaddr
;
117 data
->segment_sizes
[i
] = segments
[i
]->p_memsz
;
120 num_sections
= bfd_count_sections (abfd
);
121 data
->segment_info
= XCNEWVEC (int, num_sections
);
123 for (i
= 0, sect
= abfd
->sections
; sect
!= NULL
; i
++, sect
= sect
->next
)
127 if ((bfd_get_section_flags (abfd
, sect
) & SEC_ALLOC
) == 0)
130 Elf_Internal_Shdr
*this_hdr
= &elf_section_data (sect
)->this_hdr
;
132 for (j
= 0; j
< num_segments
; j
++)
133 if (ELF_SECTION_IN_SEGMENT (this_hdr
, segments
[j
]))
135 data
->segment_info
[i
] = j
+ 1;
139 /* We should have found a segment for every non-empty section.
140 If we haven't, we will not relocate this section by any
141 offsets we apply to the segments. As an exception, do not
142 warn about SHT_NOBITS sections; in normal ELF execution
143 environments, SHT_NOBITS means zero-initialized and belongs
144 in a segment, but in no-OS environments some tools (e.g. ARM
145 RealView) use SHT_NOBITS for uninitialized data. Since it is
146 uninitialized, it doesn't need a program header. Such
147 binaries are not relocatable. */
148 if (bfd_get_section_size (sect
) > 0 && j
== num_segments
149 && (bfd_get_section_flags (abfd
, sect
) & SEC_LOAD
) != 0)
150 warning (_("Loadable section \"%s\" outside of ELF segments"),
151 bfd_section_name (abfd
, sect
));
157 /* We are called once per section from elf_symfile_read. We
158 need to examine each section we are passed, check to see
159 if it is something we are interested in processing, and
160 if so, stash away some access information for the section.
162 For now we recognize the dwarf debug information sections and
163 line number sections from matching their section names. The
164 ELF definition is no real help here since it has no direct
165 knowledge of DWARF (by design, so any debugging format can be
168 We also recognize the ".stab" sections used by the Sun compilers
169 released with Solaris 2.
171 FIXME: The section names should not be hardwired strings (what
172 should they be? I don't think most object file formats have enough
173 section flags to specify what kind of debug section it is.
177 elf_locate_sections (bfd
*ignore_abfd
, asection
*sectp
, void *eip
)
181 ei
= (struct elfinfo
*) eip
;
182 if (strcmp (sectp
->name
, ".stab") == 0)
184 ei
->stabsect
= sectp
;
186 else if (strcmp (sectp
->name
, ".mdebug") == 0)
188 ei
->mdebugsect
= sectp
;
192 static struct minimal_symbol
*
193 record_minimal_symbol (minimal_symbol_reader
&reader
,
194 const char *name
, int name_len
, bool copy_name
,
196 enum minimal_symbol_type ms_type
,
197 asection
*bfd_section
, struct objfile
*objfile
)
199 struct gdbarch
*gdbarch
= get_objfile_arch (objfile
);
201 if (ms_type
== mst_text
|| ms_type
== mst_file_text
202 || ms_type
== mst_text_gnu_ifunc
)
203 address
= gdbarch_addr_bits_remove (gdbarch
, address
);
205 return reader
.record_full (name
, name_len
, copy_name
, address
,
207 gdb_bfd_section_index (objfile
->obfd
,
211 /* Read the symbol table of an ELF file.
213 Given an objfile, a symbol table, and a flag indicating whether the
214 symbol table contains regular, dynamic, or synthetic symbols, add all
215 the global function and data symbols to the minimal symbol table.
217 In stabs-in-ELF, as implemented by Sun, there are some local symbols
218 defined in the ELF symbol table, which can be used to locate
219 the beginnings of sections from each ".o" file that was linked to
220 form the executable objfile. We gather any such info and record it
221 in data structures hung off the objfile's private data. */
225 #define ST_SYNTHETIC 2
228 elf_symtab_read (minimal_symbol_reader
&reader
,
229 struct objfile
*objfile
, int type
,
230 long number_of_symbols
, asymbol
**symbol_table
,
233 struct gdbarch
*gdbarch
= get_objfile_arch (objfile
);
237 enum minimal_symbol_type ms_type
;
238 /* Name of the last file symbol. This is either a constant string or is
239 saved on the objfile's filename cache. */
240 const char *filesymname
= "";
241 int stripped
= (bfd_get_symcount (objfile
->obfd
) == 0);
242 int elf_make_msymbol_special_p
243 = gdbarch_elf_make_msymbol_special_p (gdbarch
);
245 for (i
= 0; i
< number_of_symbols
; i
++)
247 sym
= symbol_table
[i
];
248 if (sym
->name
== NULL
|| *sym
->name
== '\0')
250 /* Skip names that don't exist (shouldn't happen), or names
251 that are null strings (may happen). */
255 /* Skip "special" symbols, e.g. ARM mapping symbols. These are
256 symbols which do not correspond to objects in the symbol table,
257 but have some other target-specific meaning. */
258 if (bfd_is_target_special_symbol (objfile
->obfd
, sym
))
260 if (gdbarch_record_special_symbol_p (gdbarch
))
261 gdbarch_record_special_symbol (gdbarch
, objfile
, sym
);
265 if (type
== ST_DYNAMIC
266 && sym
->section
== bfd_und_section_ptr
267 && (sym
->flags
& BSF_FUNCTION
))
269 struct minimal_symbol
*msym
;
270 bfd
*abfd
= objfile
->obfd
;
273 /* Symbol is a reference to a function defined in
275 If its value is non zero then it is usually the address
276 of the corresponding entry in the procedure linkage table,
277 plus the desired section offset.
278 If its value is zero then the dynamic linker has to resolve
279 the symbol. We are unable to find any meaningful address
280 for this symbol in the executable file, so we skip it. */
281 symaddr
= sym
->value
;
285 /* sym->section is the undefined section. However, we want to
286 record the section where the PLT stub resides with the
287 minimal symbol. Search the section table for the one that
288 covers the stub's address. */
289 for (sect
= abfd
->sections
; sect
!= NULL
; sect
= sect
->next
)
291 if ((bfd_get_section_flags (abfd
, sect
) & SEC_ALLOC
) == 0)
294 if (symaddr
>= bfd_get_section_vma (abfd
, sect
)
295 && symaddr
< bfd_get_section_vma (abfd
, sect
)
296 + bfd_get_section_size (sect
))
302 /* On ia64-hpux, we have discovered that the system linker
303 adds undefined symbols with nonzero addresses that cannot
304 be right (their address points inside the code of another
305 function in the .text section). This creates problems
306 when trying to determine which symbol corresponds to
309 We try to detect those buggy symbols by checking which
310 section we think they correspond to. Normally, PLT symbols
311 are stored inside their own section, and the typical name
312 for that section is ".plt". So, if there is a ".plt"
313 section, and yet the section name of our symbol does not
314 start with ".plt", we ignore that symbol. */
315 if (!startswith (sect
->name
, ".plt")
316 && bfd_get_section_by_name (abfd
, ".plt") != NULL
)
319 msym
= record_minimal_symbol
320 (reader
, sym
->name
, strlen (sym
->name
), copy_names
,
321 symaddr
, mst_solib_trampoline
, sect
, objfile
);
324 msym
->filename
= filesymname
;
325 if (elf_make_msymbol_special_p
)
326 gdbarch_elf_make_msymbol_special (gdbarch
, sym
, msym
);
331 /* If it is a nonstripped executable, do not enter dynamic
332 symbols, as the dynamic symbol table is usually a subset
333 of the main symbol table. */
334 if (type
== ST_DYNAMIC
&& !stripped
)
336 if (sym
->flags
& BSF_FILE
)
339 = ((const char *) objfile
->per_bfd
->filename_cache
.insert
340 (sym
->name
, strlen (sym
->name
) + 1));
342 else if (sym
->flags
& BSF_SECTION_SYM
)
344 else if (sym
->flags
& (BSF_GLOBAL
| BSF_LOCAL
| BSF_WEAK
347 struct minimal_symbol
*msym
;
349 /* Select global/local/weak symbols. Note that bfd puts abs
350 symbols in their own section, so all symbols we are
351 interested in will have a section. */
352 /* Bfd symbols are section relative. */
353 symaddr
= sym
->value
+ sym
->section
->vma
;
354 /* For non-absolute symbols, use the type of the section
355 they are relative to, to intuit text/data. Bfd provides
356 no way of figuring this out for absolute symbols. */
357 if (sym
->section
== bfd_abs_section_ptr
)
359 /* This is a hack to get the minimal symbol type
360 right for Irix 5, which has absolute addresses
361 with special section indices for dynamic symbols.
363 NOTE: uweigand-20071112: Synthetic symbols do not
364 have an ELF-private part, so do not touch those. */
365 unsigned int shndx
= type
== ST_SYNTHETIC
? 0 :
366 ((elf_symbol_type
*) sym
)->internal_elf_sym
.st_shndx
;
376 case SHN_MIPS_ACOMMON
:
383 /* If it is an Irix dynamic symbol, skip section name
384 symbols, relocate all others by section offset. */
385 if (ms_type
!= mst_abs
)
387 if (sym
->name
[0] == '.')
391 else if (sym
->section
->flags
& SEC_CODE
)
393 if (sym
->flags
& (BSF_GLOBAL
| BSF_WEAK
| BSF_GNU_UNIQUE
))
395 if (sym
->flags
& BSF_GNU_INDIRECT_FUNCTION
)
396 ms_type
= mst_text_gnu_ifunc
;
400 /* The BSF_SYNTHETIC check is there to omit ppc64 function
401 descriptors mistaken for static functions starting with 'L'.
403 else if ((sym
->name
[0] == '.' && sym
->name
[1] == 'L'
404 && (sym
->flags
& BSF_SYNTHETIC
) == 0)
405 || ((sym
->flags
& BSF_LOCAL
)
406 && sym
->name
[0] == '$'
407 && sym
->name
[1] == 'L'))
408 /* Looks like a compiler-generated label. Skip
409 it. The assembler should be skipping these (to
410 keep executables small), but apparently with
411 gcc on the (deleted) delta m88k SVR4, it loses.
412 So to have us check too should be harmless (but
413 I encourage people to fix this in the assembler
414 instead of adding checks here). */
418 ms_type
= mst_file_text
;
421 else if (sym
->section
->flags
& SEC_ALLOC
)
423 if (sym
->flags
& (BSF_GLOBAL
| BSF_WEAK
| BSF_GNU_UNIQUE
))
425 if (sym
->flags
& BSF_GNU_INDIRECT_FUNCTION
)
427 ms_type
= mst_data_gnu_ifunc
;
429 else if (sym
->section
->flags
& SEC_LOAD
)
438 else if (sym
->flags
& BSF_LOCAL
)
440 if (sym
->section
->flags
& SEC_LOAD
)
442 ms_type
= mst_file_data
;
446 ms_type
= mst_file_bss
;
451 ms_type
= mst_unknown
;
456 /* FIXME: Solaris2 shared libraries include lots of
457 odd "absolute" and "undefined" symbols, that play
458 hob with actions like finding what function the PC
459 is in. Ignore them if they aren't text, data, or bss. */
460 /* ms_type = mst_unknown; */
461 continue; /* Skip this symbol. */
463 msym
= record_minimal_symbol
464 (reader
, sym
->name
, strlen (sym
->name
), copy_names
, symaddr
,
465 ms_type
, sym
->section
, objfile
);
469 /* NOTE: uweigand-20071112: A synthetic symbol does not have an
471 if (type
!= ST_SYNTHETIC
)
473 /* Pass symbol size field in via BFD. FIXME!!! */
474 elf_symbol_type
*elf_sym
= (elf_symbol_type
*) sym
;
475 SET_MSYMBOL_SIZE (msym
, elf_sym
->internal_elf_sym
.st_size
);
478 msym
->filename
= filesymname
;
479 if (elf_make_msymbol_special_p
)
480 gdbarch_elf_make_msymbol_special (gdbarch
, sym
, msym
);
483 /* If we see a default versioned symbol, install it under
484 its version-less name. */
487 const char *atsign
= strchr (sym
->name
, '@');
489 if (atsign
!= NULL
&& atsign
[1] == '@' && atsign
> sym
->name
)
491 int len
= atsign
- sym
->name
;
493 record_minimal_symbol (reader
, sym
->name
, len
, true, symaddr
,
494 ms_type
, sym
->section
, objfile
);
498 /* For @plt symbols, also record a trampoline to the
499 destination symbol. The @plt symbol will be used in
500 disassembly, and the trampoline will be used when we are
501 trying to find the target. */
502 if (msym
&& ms_type
== mst_text
&& type
== ST_SYNTHETIC
)
504 int len
= strlen (sym
->name
);
506 if (len
> 4 && strcmp (sym
->name
+ len
- 4, "@plt") == 0)
508 struct minimal_symbol
*mtramp
;
510 mtramp
= record_minimal_symbol (reader
, sym
->name
, len
- 4,
512 mst_solib_trampoline
,
513 sym
->section
, objfile
);
516 SET_MSYMBOL_SIZE (mtramp
, MSYMBOL_SIZE (msym
));
517 mtramp
->created_by_gdb
= 1;
518 mtramp
->filename
= filesymname
;
519 if (elf_make_msymbol_special_p
)
520 gdbarch_elf_make_msymbol_special (gdbarch
,
529 /* Build minimal symbols named `function@got.plt' (see SYMBOL_GOT_PLT_SUFFIX)
530 for later look ups of which function to call when user requests
531 a STT_GNU_IFUNC function. As the STT_GNU_IFUNC type is found at the target
532 library defining `function' we cannot yet know while reading OBJFILE which
533 of the SYMBOL_GOT_PLT_SUFFIX entries will be needed and later
534 DYN_SYMBOL_TABLE is no longer easily available for OBJFILE. */
537 elf_rel_plt_read (minimal_symbol_reader
&reader
,
538 struct objfile
*objfile
, asymbol
**dyn_symbol_table
)
540 bfd
*obfd
= objfile
->obfd
;
541 const struct elf_backend_data
*bed
= get_elf_backend_data (obfd
);
542 asection
*relplt
, *got_plt
;
543 bfd_size_type reloc_count
, reloc
;
544 struct gdbarch
*gdbarch
= get_objfile_arch (objfile
);
545 struct type
*ptr_type
= builtin_type (gdbarch
)->builtin_data_ptr
;
546 size_t ptr_size
= TYPE_LENGTH (ptr_type
);
548 if (objfile
->separate_debug_objfile_backlink
)
551 got_plt
= bfd_get_section_by_name (obfd
, ".got.plt");
554 /* For platforms where there is no separate .got.plt. */
555 got_plt
= bfd_get_section_by_name (obfd
, ".got");
560 /* Depending on system, we may find jump slots in a relocation
561 section for either .got.plt or .plt. */
562 asection
*plt
= bfd_get_section_by_name (obfd
, ".plt");
563 int plt_elf_idx
= (plt
!= NULL
) ? elf_section_data (plt
)->this_idx
: -1;
565 int got_plt_elf_idx
= elf_section_data (got_plt
)->this_idx
;
567 /* This search algorithm is from _bfd_elf_canonicalize_dynamic_reloc. */
568 for (relplt
= obfd
->sections
; relplt
!= NULL
; relplt
= relplt
->next
)
570 const auto &this_hdr
= elf_section_data (relplt
)->this_hdr
;
572 if (this_hdr
.sh_type
== SHT_REL
|| this_hdr
.sh_type
== SHT_RELA
)
574 if (this_hdr
.sh_info
== plt_elf_idx
575 || this_hdr
.sh_info
== got_plt_elf_idx
)
582 if (! bed
->s
->slurp_reloc_table (obfd
, relplt
, dyn_symbol_table
, TRUE
))
585 std::string string_buffer
;
587 /* Does ADDRESS reside in SECTION of OBFD? */
588 auto within_section
= [obfd
] (asection
*section
, CORE_ADDR address
)
593 return (bfd_get_section_vma (obfd
, section
) <= address
594 && (address
< bfd_get_section_vma (obfd
, section
)
595 + bfd_get_section_size (section
)));
598 reloc_count
= relplt
->size
/ elf_section_data (relplt
)->this_hdr
.sh_entsize
;
599 for (reloc
= 0; reloc
< reloc_count
; reloc
++)
602 struct minimal_symbol
*msym
;
604 const char *got_suffix
= SYMBOL_GOT_PLT_SUFFIX
;
605 const size_t got_suffix_len
= strlen (SYMBOL_GOT_PLT_SUFFIX
);
607 name
= bfd_asymbol_name (*relplt
->relocation
[reloc
].sym_ptr_ptr
);
608 address
= relplt
->relocation
[reloc
].address
;
610 asection
*msym_section
;
612 /* Does the pointer reside in either the .got.plt or .plt
614 if (within_section (got_plt
, address
))
615 msym_section
= got_plt
;
616 else if (within_section (plt
, address
))
621 /* We cannot check if NAME is a reference to
622 mst_text_gnu_ifunc/mst_data_gnu_ifunc as in OBJFILE the
623 symbol is undefined and the objfile having NAME defined may
624 not yet have been loaded. */
626 string_buffer
.assign (name
);
627 string_buffer
.append (got_suffix
, got_suffix
+ got_suffix_len
);
629 msym
= record_minimal_symbol (reader
, string_buffer
.c_str (),
630 string_buffer
.size (),
631 true, address
, mst_slot_got_plt
,
632 msym_section
, objfile
);
634 SET_MSYMBOL_SIZE (msym
, ptr_size
);
638 /* The data pointer is htab_t for gnu_ifunc_record_cache_unchecked. */
640 static const struct objfile_data
*elf_objfile_gnu_ifunc_cache_data
;
642 /* Map function names to CORE_ADDR in elf_objfile_gnu_ifunc_cache_data. */
644 struct elf_gnu_ifunc_cache
646 /* This is always a function entry address, not a function descriptor. */
652 /* htab_hash for elf_objfile_gnu_ifunc_cache_data. */
655 elf_gnu_ifunc_cache_hash (const void *a_voidp
)
657 const struct elf_gnu_ifunc_cache
*a
658 = (const struct elf_gnu_ifunc_cache
*) a_voidp
;
660 return htab_hash_string (a
->name
);
663 /* htab_eq for elf_objfile_gnu_ifunc_cache_data. */
666 elf_gnu_ifunc_cache_eq (const void *a_voidp
, const void *b_voidp
)
668 const struct elf_gnu_ifunc_cache
*a
669 = (const struct elf_gnu_ifunc_cache
*) a_voidp
;
670 const struct elf_gnu_ifunc_cache
*b
671 = (const struct elf_gnu_ifunc_cache
*) b_voidp
;
673 return strcmp (a
->name
, b
->name
) == 0;
676 /* Record the target function address of a STT_GNU_IFUNC function NAME is the
677 function entry address ADDR. Return 1 if NAME and ADDR are considered as
678 valid and therefore they were successfully recorded, return 0 otherwise.
680 Function does not expect a duplicate entry. Use
681 elf_gnu_ifunc_resolve_by_cache first to check if the entry for NAME already
685 elf_gnu_ifunc_record_cache (const char *name
, CORE_ADDR addr
)
687 struct bound_minimal_symbol msym
;
688 struct objfile
*objfile
;
690 struct elf_gnu_ifunc_cache entry_local
, *entry_p
;
693 msym
= lookup_minimal_symbol_by_pc (addr
);
694 if (msym
.minsym
== NULL
)
696 if (BMSYMBOL_VALUE_ADDRESS (msym
) != addr
)
698 objfile
= msym
.objfile
;
700 /* If .plt jumps back to .plt the symbol is still deferred for later
701 resolution and it has no use for GDB. */
702 const char *target_name
= MSYMBOL_LINKAGE_NAME (msym
.minsym
);
703 size_t len
= strlen (target_name
);
705 /* Note we check the symbol's name instead of checking whether the
706 symbol is in the .plt section because some systems have @plt
707 symbols in the .text section. */
708 if (len
> 4 && strcmp (target_name
+ len
- 4, "@plt") == 0)
711 htab
= (htab_t
) objfile_data (objfile
, elf_objfile_gnu_ifunc_cache_data
);
714 htab
= htab_create_alloc_ex (1, elf_gnu_ifunc_cache_hash
,
715 elf_gnu_ifunc_cache_eq
,
716 NULL
, &objfile
->objfile_obstack
,
717 hashtab_obstack_allocate
,
718 dummy_obstack_deallocate
);
719 set_objfile_data (objfile
, elf_objfile_gnu_ifunc_cache_data
, htab
);
722 entry_local
.addr
= addr
;
723 obstack_grow (&objfile
->objfile_obstack
, &entry_local
,
724 offsetof (struct elf_gnu_ifunc_cache
, name
));
725 obstack_grow_str0 (&objfile
->objfile_obstack
, name
);
727 = (struct elf_gnu_ifunc_cache
*) obstack_finish (&objfile
->objfile_obstack
);
729 slot
= htab_find_slot (htab
, entry_p
, INSERT
);
732 struct elf_gnu_ifunc_cache
*entry_found_p
733 = (struct elf_gnu_ifunc_cache
*) *slot
;
734 struct gdbarch
*gdbarch
= get_objfile_arch (objfile
);
736 if (entry_found_p
->addr
!= addr
)
738 /* This case indicates buggy inferior program, the resolved address
739 should never change. */
741 warning (_("gnu-indirect-function \"%s\" has changed its resolved "
742 "function_address from %s to %s"),
743 name
, paddress (gdbarch
, entry_found_p
->addr
),
744 paddress (gdbarch
, addr
));
747 /* New ENTRY_P is here leaked/duplicate in the OBJFILE obstack. */
754 /* Try to find the target resolved function entry address of a STT_GNU_IFUNC
755 function NAME. If the address is found it is stored to *ADDR_P (if ADDR_P
756 is not NULL) and the function returns 1. It returns 0 otherwise.
758 Only the elf_objfile_gnu_ifunc_cache_data hash table is searched by this
762 elf_gnu_ifunc_resolve_by_cache (const char *name
, CORE_ADDR
*addr_p
)
764 for (objfile
*objfile
: current_program_space
->objfiles ())
767 struct elf_gnu_ifunc_cache
*entry_p
;
770 htab
= (htab_t
) objfile_data (objfile
, elf_objfile_gnu_ifunc_cache_data
);
774 entry_p
= ((struct elf_gnu_ifunc_cache
*)
775 alloca (sizeof (*entry_p
) + strlen (name
)));
776 strcpy (entry_p
->name
, name
);
778 slot
= htab_find_slot (htab
, entry_p
, NO_INSERT
);
781 entry_p
= (struct elf_gnu_ifunc_cache
*) *slot
;
782 gdb_assert (entry_p
!= NULL
);
785 *addr_p
= entry_p
->addr
;
792 /* Try to find the target resolved function entry address of a STT_GNU_IFUNC
793 function NAME. If the address is found it is stored to *ADDR_P (if ADDR_P
794 is not NULL) and the function returns 1. It returns 0 otherwise.
796 Only the SYMBOL_GOT_PLT_SUFFIX locations are searched by this function.
797 elf_gnu_ifunc_resolve_by_cache must have been already called for NAME to
798 prevent cache entries duplicates. */
801 elf_gnu_ifunc_resolve_by_got (const char *name
, CORE_ADDR
*addr_p
)
804 const size_t got_suffix_len
= strlen (SYMBOL_GOT_PLT_SUFFIX
);
806 name_got_plt
= (char *) alloca (strlen (name
) + got_suffix_len
+ 1);
807 sprintf (name_got_plt
, "%s" SYMBOL_GOT_PLT_SUFFIX
, name
);
809 for (objfile
*objfile
: current_program_space
->objfiles ())
811 bfd
*obfd
= objfile
->obfd
;
812 struct gdbarch
*gdbarch
= get_objfile_arch (objfile
);
813 struct type
*ptr_type
= builtin_type (gdbarch
)->builtin_data_ptr
;
814 size_t ptr_size
= TYPE_LENGTH (ptr_type
);
815 CORE_ADDR pointer_address
, addr
;
817 gdb_byte
*buf
= (gdb_byte
*) alloca (ptr_size
);
818 struct bound_minimal_symbol msym
;
820 msym
= lookup_minimal_symbol (name_got_plt
, NULL
, objfile
);
821 if (msym
.minsym
== NULL
)
823 if (MSYMBOL_TYPE (msym
.minsym
) != mst_slot_got_plt
)
825 pointer_address
= BMSYMBOL_VALUE_ADDRESS (msym
);
827 plt
= bfd_get_section_by_name (obfd
, ".plt");
831 if (MSYMBOL_SIZE (msym
.minsym
) != ptr_size
)
833 if (target_read_memory (pointer_address
, buf
, ptr_size
) != 0)
835 addr
= extract_typed_address (buf
, ptr_type
);
836 addr
= gdbarch_convert_from_func_ptr_addr (gdbarch
, addr
,
837 current_top_target ());
838 addr
= gdbarch_addr_bits_remove (gdbarch
, addr
);
840 if (elf_gnu_ifunc_record_cache (name
, addr
))
851 /* Try to find the target resolved function entry address of a STT_GNU_IFUNC
852 function NAME. If the address is found it is stored to *ADDR_P (if ADDR_P
853 is not NULL) and the function returns 1. It returns 0 otherwise.
855 Both the elf_objfile_gnu_ifunc_cache_data hash table and
856 SYMBOL_GOT_PLT_SUFFIX locations are searched by this function. */
859 elf_gnu_ifunc_resolve_name (const char *name
, CORE_ADDR
*addr_p
)
861 if (elf_gnu_ifunc_resolve_by_cache (name
, addr_p
))
864 if (elf_gnu_ifunc_resolve_by_got (name
, addr_p
))
870 /* Call STT_GNU_IFUNC - a function returning addresss of a real function to
871 call. PC is theSTT_GNU_IFUNC resolving function entry. The value returned
872 is the entry point of the resolved STT_GNU_IFUNC target function to call.
876 elf_gnu_ifunc_resolve_addr (struct gdbarch
*gdbarch
, CORE_ADDR pc
)
878 const char *name_at_pc
;
879 CORE_ADDR start_at_pc
, address
;
880 struct type
*func_func_type
= builtin_type (gdbarch
)->builtin_func_func
;
881 struct value
*function
, *address_val
;
883 struct value
*hwcap_val
;
885 /* Try first any non-intrusive methods without an inferior call. */
887 if (find_pc_partial_function (pc
, &name_at_pc
, &start_at_pc
, NULL
)
888 && start_at_pc
== pc
)
890 if (elf_gnu_ifunc_resolve_name (name_at_pc
, &address
))
896 function
= allocate_value (func_func_type
);
897 VALUE_LVAL (function
) = lval_memory
;
898 set_value_address (function
, pc
);
900 /* STT_GNU_IFUNC resolver functions usually receive the HWCAP vector as
901 parameter. FUNCTION is the function entry address. ADDRESS may be a
902 function descriptor. */
904 target_auxv_search (current_top_target (), AT_HWCAP
, &hwcap
);
905 hwcap_val
= value_from_longest (builtin_type (gdbarch
)
906 ->builtin_unsigned_long
, hwcap
);
907 address_val
= call_function_by_hand (function
, NULL
, hwcap_val
);
908 address
= value_as_address (address_val
);
909 address
= gdbarch_convert_from_func_ptr_addr (gdbarch
, address
, current_top_target ());
910 address
= gdbarch_addr_bits_remove (gdbarch
, address
);
913 elf_gnu_ifunc_record_cache (name_at_pc
, address
);
918 /* Handle inferior hit of bp_gnu_ifunc_resolver, see its definition. */
921 elf_gnu_ifunc_resolver_stop (struct breakpoint
*b
)
923 struct breakpoint
*b_return
;
924 struct frame_info
*prev_frame
= get_prev_frame (get_current_frame ());
925 struct frame_id prev_frame_id
= get_stack_frame_id (prev_frame
);
926 CORE_ADDR prev_pc
= get_frame_pc (prev_frame
);
927 int thread_id
= inferior_thread ()->global_num
;
929 gdb_assert (b
->type
== bp_gnu_ifunc_resolver
);
931 for (b_return
= b
->related_breakpoint
; b_return
!= b
;
932 b_return
= b_return
->related_breakpoint
)
934 gdb_assert (b_return
->type
== bp_gnu_ifunc_resolver_return
);
935 gdb_assert (b_return
->loc
!= NULL
&& b_return
->loc
->next
== NULL
);
936 gdb_assert (frame_id_p (b_return
->frame_id
));
938 if (b_return
->thread
== thread_id
939 && b_return
->loc
->requested_address
== prev_pc
940 && frame_id_eq (b_return
->frame_id
, prev_frame_id
))
946 /* No need to call find_pc_line for symbols resolving as this is only
947 a helper breakpointer never shown to the user. */
950 sal
.pspace
= current_inferior ()->pspace
;
952 sal
.section
= find_pc_overlay (sal
.pc
);
955 = set_momentary_breakpoint (get_frame_arch (prev_frame
), sal
,
957 bp_gnu_ifunc_resolver_return
).release ();
959 /* set_momentary_breakpoint invalidates PREV_FRAME. */
962 /* Add new b_return to the ring list b->related_breakpoint. */
963 gdb_assert (b_return
->related_breakpoint
== b_return
);
964 b_return
->related_breakpoint
= b
->related_breakpoint
;
965 b
->related_breakpoint
= b_return
;
969 /* Handle inferior hit of bp_gnu_ifunc_resolver_return, see its definition. */
972 elf_gnu_ifunc_resolver_return_stop (struct breakpoint
*b
)
974 thread_info
*thread
= inferior_thread ();
975 struct gdbarch
*gdbarch
= get_frame_arch (get_current_frame ());
976 struct type
*func_func_type
= builtin_type (gdbarch
)->builtin_func_func
;
977 struct type
*value_type
= TYPE_TARGET_TYPE (func_func_type
);
978 struct regcache
*regcache
= get_thread_regcache (thread
);
979 struct value
*func_func
;
981 CORE_ADDR resolved_address
, resolved_pc
;
983 gdb_assert (b
->type
== bp_gnu_ifunc_resolver_return
);
985 while (b
->related_breakpoint
!= b
)
987 struct breakpoint
*b_next
= b
->related_breakpoint
;
991 case bp_gnu_ifunc_resolver
:
993 case bp_gnu_ifunc_resolver_return
:
994 delete_breakpoint (b
);
997 internal_error (__FILE__
, __LINE__
,
998 _("handle_inferior_event: Invalid "
999 "gnu-indirect-function breakpoint type %d"),
1004 gdb_assert (b
->type
== bp_gnu_ifunc_resolver
);
1005 gdb_assert (b
->loc
->next
== NULL
);
1007 func_func
= allocate_value (func_func_type
);
1008 VALUE_LVAL (func_func
) = lval_memory
;
1009 set_value_address (func_func
, b
->loc
->related_address
);
1011 value
= allocate_value (value_type
);
1012 gdbarch_return_value (gdbarch
, func_func
, value_type
, regcache
,
1013 value_contents_raw (value
), NULL
);
1014 resolved_address
= value_as_address (value
);
1015 resolved_pc
= gdbarch_convert_from_func_ptr_addr (gdbarch
,
1017 current_top_target ());
1018 resolved_pc
= gdbarch_addr_bits_remove (gdbarch
, resolved_pc
);
1020 gdb_assert (current_program_space
== b
->pspace
|| b
->pspace
== NULL
);
1021 elf_gnu_ifunc_record_cache (event_location_to_string (b
->location
.get ()),
1024 b
->type
= bp_breakpoint
;
1025 update_breakpoint_locations (b
, current_program_space
,
1026 find_function_start_sal (resolved_pc
, NULL
, true),
1030 /* A helper function for elf_symfile_read that reads the minimal
1034 elf_read_minimal_symbols (struct objfile
*objfile
, int symfile_flags
,
1035 const struct elfinfo
*ei
)
1037 bfd
*synth_abfd
, *abfd
= objfile
->obfd
;
1038 long symcount
= 0, dynsymcount
= 0, synthcount
, storage_needed
;
1039 asymbol
**symbol_table
= NULL
, **dyn_symbol_table
= NULL
;
1041 struct dbx_symfile_info
*dbx
;
1043 if (symtab_create_debug
)
1045 fprintf_unfiltered (gdb_stdlog
,
1046 "Reading minimal symbols of objfile %s ...\n",
1047 objfile_name (objfile
));
1050 /* If we already have minsyms, then we can skip some work here.
1051 However, if there were stabs or mdebug sections, we go ahead and
1052 redo all the work anyway, because the psym readers for those
1053 kinds of debuginfo need extra information found here. This can
1054 go away once all types of symbols are in the per-BFD object. */
1055 if (objfile
->per_bfd
->minsyms_read
1056 && ei
->stabsect
== NULL
1057 && ei
->mdebugsect
== NULL
)
1059 if (symtab_create_debug
)
1060 fprintf_unfiltered (gdb_stdlog
,
1061 "... minimal symbols previously read\n");
1065 minimal_symbol_reader
reader (objfile
);
1067 /* Allocate struct to keep track of the symfile. */
1068 dbx
= XCNEW (struct dbx_symfile_info
);
1069 set_objfile_data (objfile
, dbx_objfile_data_key
, dbx
);
1071 /* Process the normal ELF symbol table first. */
1073 storage_needed
= bfd_get_symtab_upper_bound (objfile
->obfd
);
1074 if (storage_needed
< 0)
1075 error (_("Can't read symbols from %s: %s"),
1076 bfd_get_filename (objfile
->obfd
),
1077 bfd_errmsg (bfd_get_error ()));
1079 if (storage_needed
> 0)
1081 /* Memory gets permanently referenced from ABFD after
1082 bfd_canonicalize_symtab so it must not get freed before ABFD gets. */
1084 symbol_table
= (asymbol
**) bfd_alloc (abfd
, storage_needed
);
1085 symcount
= bfd_canonicalize_symtab (objfile
->obfd
, symbol_table
);
1088 error (_("Can't read symbols from %s: %s"),
1089 bfd_get_filename (objfile
->obfd
),
1090 bfd_errmsg (bfd_get_error ()));
1092 elf_symtab_read (reader
, objfile
, ST_REGULAR
, symcount
, symbol_table
,
1096 /* Add the dynamic symbols. */
1098 storage_needed
= bfd_get_dynamic_symtab_upper_bound (objfile
->obfd
);
1100 if (storage_needed
> 0)
1102 /* Memory gets permanently referenced from ABFD after
1103 bfd_get_synthetic_symtab so it must not get freed before ABFD gets.
1104 It happens only in the case when elf_slurp_reloc_table sees
1105 asection->relocation NULL. Determining which section is asection is
1106 done by _bfd_elf_get_synthetic_symtab which is all a bfd
1107 implementation detail, though. */
1109 dyn_symbol_table
= (asymbol
**) bfd_alloc (abfd
, storage_needed
);
1110 dynsymcount
= bfd_canonicalize_dynamic_symtab (objfile
->obfd
,
1113 if (dynsymcount
< 0)
1114 error (_("Can't read symbols from %s: %s"),
1115 bfd_get_filename (objfile
->obfd
),
1116 bfd_errmsg (bfd_get_error ()));
1118 elf_symtab_read (reader
, objfile
, ST_DYNAMIC
, dynsymcount
,
1119 dyn_symbol_table
, false);
1121 elf_rel_plt_read (reader
, objfile
, dyn_symbol_table
);
1124 /* Contrary to binutils --strip-debug/--only-keep-debug the strip command from
1125 elfutils (eu-strip) moves even the .symtab section into the .debug file.
1127 bfd_get_synthetic_symtab on ppc64 for each function descriptor ELF symbol
1128 'name' creates a new BSF_SYNTHETIC ELF symbol '.name' with its code
1129 address. But with eu-strip files bfd_get_synthetic_symtab would fail to
1130 read the code address from .opd while it reads the .symtab section from
1131 a separate debug info file as the .opd section is SHT_NOBITS there.
1133 With SYNTH_ABFD the .opd section will be read from the original
1134 backlinked binary where it is valid. */
1136 if (objfile
->separate_debug_objfile_backlink
)
1137 synth_abfd
= objfile
->separate_debug_objfile_backlink
->obfd
;
1141 /* Add synthetic symbols - for instance, names for any PLT entries. */
1143 synthcount
= bfd_get_synthetic_symtab (synth_abfd
, symcount
, symbol_table
,
1144 dynsymcount
, dyn_symbol_table
,
1150 std::unique_ptr
<asymbol
*[]>
1151 synth_symbol_table (new asymbol
*[synthcount
]);
1152 for (i
= 0; i
< synthcount
; i
++)
1153 synth_symbol_table
[i
] = synthsyms
+ i
;
1154 elf_symtab_read (reader
, objfile
, ST_SYNTHETIC
, synthcount
,
1155 synth_symbol_table
.get (), true);
1161 /* Install any minimal symbols that have been collected as the current
1162 minimal symbols for this objfile. The debug readers below this point
1163 should not generate new minimal symbols; if they do it's their
1164 responsibility to install them. "mdebug" appears to be the only one
1165 which will do this. */
1169 if (symtab_create_debug
)
1170 fprintf_unfiltered (gdb_stdlog
, "Done reading minimal symbols.\n");
1173 /* Scan and build partial symbols for a symbol file.
1174 We have been initialized by a call to elf_symfile_init, which
1175 currently does nothing.
1177 This function only does the minimum work necessary for letting the
1178 user "name" things symbolically; it does not read the entire symtab.
1179 Instead, it reads the external and static symbols and puts them in partial
1180 symbol tables. When more extensive information is requested of a
1181 file, the corresponding partial symbol table is mutated into a full
1182 fledged symbol table by going back and reading the symbols
1185 We look for sections with specific names, to tell us what debug
1186 format to look for: FIXME!!!
1188 elfstab_build_psymtabs() handles STABS symbols;
1189 mdebug_build_psymtabs() handles ECOFF debugging information.
1191 Note that ELF files have a "minimal" symbol table, which looks a lot
1192 like a COFF symbol table, but has only the minimal information necessary
1193 for linking. We process this also, and use the information to
1194 build gdb's minimal symbol table. This gives us some minimal debugging
1195 capability even for files compiled without -g. */
1198 elf_symfile_read (struct objfile
*objfile
, symfile_add_flags symfile_flags
)
1200 bfd
*abfd
= objfile
->obfd
;
1203 memset ((char *) &ei
, 0, sizeof (ei
));
1204 if (!(objfile
->flags
& OBJF_READNEVER
))
1205 bfd_map_over_sections (abfd
, elf_locate_sections
, (void *) & ei
);
1207 elf_read_minimal_symbols (objfile
, symfile_flags
, &ei
);
1209 /* ELF debugging information is inserted into the psymtab in the
1210 order of least informative first - most informative last. Since
1211 the psymtab table is searched `most recent insertion first' this
1212 increases the probability that more detailed debug information
1213 for a section is found.
1215 For instance, an object file might contain both .mdebug (XCOFF)
1216 and .debug_info (DWARF2) sections then .mdebug is inserted first
1217 (searched last) and DWARF2 is inserted last (searched first). If
1218 we don't do this then the XCOFF info is found first - for code in
1219 an included file XCOFF info is useless. */
1223 const struct ecoff_debug_swap
*swap
;
1225 /* .mdebug section, presumably holding ECOFF debugging
1227 swap
= get_elf_backend_data (abfd
)->elf_backend_ecoff_debug_swap
;
1229 elfmdebug_build_psymtabs (objfile
, swap
, ei
.mdebugsect
);
1235 /* Stab sections have an associated string table that looks like
1236 a separate section. */
1237 str_sect
= bfd_get_section_by_name (abfd
, ".stabstr");
1239 /* FIXME should probably warn about a stab section without a stabstr. */
1241 elfstab_build_psymtabs (objfile
,
1244 bfd_section_size (abfd
, str_sect
));
1247 if (dwarf2_has_info (objfile
, NULL
))
1249 dw_index_kind index_kind
;
1251 /* elf_sym_fns_gdb_index cannot handle simultaneous non-DWARF
1252 debug information present in OBJFILE. If there is such debug
1253 info present never use an index. */
1254 if (!objfile_has_partial_symbols (objfile
)
1255 && dwarf2_initialize_objfile (objfile
, &index_kind
))
1259 case dw_index_kind::GDB_INDEX
:
1260 objfile_set_sym_fns (objfile
, &elf_sym_fns_gdb_index
);
1262 case dw_index_kind::DEBUG_NAMES
:
1263 objfile_set_sym_fns (objfile
, &elf_sym_fns_debug_names
);
1269 /* It is ok to do this even if the stabs reader made some
1270 partial symbols, because OBJF_PSYMTABS_READ has not been
1271 set, and so our lazy reader function will still be called
1273 objfile_set_sym_fns (objfile
, &elf_sym_fns_lazy_psyms
);
1276 /* If the file has its own symbol tables it has no separate debug
1277 info. `.dynsym'/`.symtab' go to MSYMBOLS, `.debug_info' goes to
1278 SYMTABS/PSYMTABS. `.gnu_debuglink' may no longer be present with
1279 `.note.gnu.build-id'.
1281 .gnu_debugdata is !objfile_has_partial_symbols because it contains only
1282 .symtab, not .debug_* section. But if we already added .gnu_debugdata as
1283 an objfile via find_separate_debug_file_in_section there was no separate
1284 debug info available. Therefore do not attempt to search for another one,
1285 objfile->separate_debug_objfile->separate_debug_objfile GDB guarantees to
1286 be NULL and we would possibly violate it. */
1288 else if (!objfile_has_partial_symbols (objfile
)
1289 && objfile
->separate_debug_objfile
== NULL
1290 && objfile
->separate_debug_objfile_backlink
== NULL
)
1292 std::string debugfile
= find_separate_debug_file_by_buildid (objfile
);
1294 if (debugfile
.empty ())
1295 debugfile
= find_separate_debug_file_by_debuglink (objfile
);
1297 if (!debugfile
.empty ())
1299 gdb_bfd_ref_ptr
debug_bfd (symfile_bfd_open (debugfile
.c_str ()));
1301 symbol_file_add_separate (debug_bfd
.get (), debugfile
.c_str (),
1302 symfile_flags
, objfile
);
1307 /* Callback to lazily read psymtabs. */
1310 read_psyms (struct objfile
*objfile
)
1312 if (dwarf2_has_info (objfile
, NULL
))
1313 dwarf2_build_psymtabs (objfile
);
1316 /* Initialize anything that needs initializing when a completely new symbol
1317 file is specified (not just adding some symbols from another file, e.g. a
1320 We reinitialize buildsym, since we may be reading stabs from an ELF
1324 elf_new_init (struct objfile
*ignore
)
1326 stabsread_new_init ();
1329 /* Perform any local cleanups required when we are done with a particular
1330 objfile. I.E, we are in the process of discarding all symbol information
1331 for an objfile, freeing up all memory held for it, and unlinking the
1332 objfile struct from the global list of known objfiles. */
1335 elf_symfile_finish (struct objfile
*objfile
)
1339 /* ELF specific initialization routine for reading symbols. */
1342 elf_symfile_init (struct objfile
*objfile
)
1344 /* ELF objects may be reordered, so set OBJF_REORDERED. If we
1345 find this causes a significant slowdown in gdb then we could
1346 set it in the debug symbol readers only when necessary. */
1347 objfile
->flags
|= OBJF_REORDERED
;
1350 /* Implementation of `sym_get_probes', as documented in symfile.h. */
1352 static const std::vector
<probe
*> &
1353 elf_get_probes (struct objfile
*objfile
)
1355 std::vector
<probe
*> *probes_per_bfd
;
1357 /* Have we parsed this objfile's probes already? */
1358 probes_per_bfd
= (std::vector
<probe
*> *) bfd_data (objfile
->obfd
, probe_key
);
1360 if (probes_per_bfd
== NULL
)
1362 probes_per_bfd
= new std::vector
<probe
*>;
1364 /* Here we try to gather information about all types of probes from the
1366 for (const static_probe_ops
*ops
: all_static_probe_ops
)
1367 ops
->get_probes (probes_per_bfd
, objfile
);
1369 set_bfd_data (objfile
->obfd
, probe_key
, probes_per_bfd
);
1372 return *probes_per_bfd
;
1375 /* Helper function used to free the space allocated for storing SystemTap
1376 probe information. */
1379 probe_key_free (bfd
*abfd
, void *d
)
1381 std::vector
<probe
*> *probes
= (std::vector
<probe
*> *) d
;
1383 for (probe
*p
: *probes
)
1391 /* Implementation `sym_probe_fns', as documented in symfile.h. */
1393 static const struct sym_probe_fns elf_probe_fns
=
1395 elf_get_probes
, /* sym_get_probes */
1398 /* Register that we are able to handle ELF object file formats. */
1400 static const struct sym_fns elf_sym_fns
=
1402 elf_new_init
, /* init anything gbl to entire symtab */
1403 elf_symfile_init
, /* read initial info, setup for sym_read() */
1404 elf_symfile_read
, /* read a symbol file into symtab */
1405 NULL
, /* sym_read_psymbols */
1406 elf_symfile_finish
, /* finished with file, cleanup */
1407 default_symfile_offsets
, /* Translate ext. to int. relocation */
1408 elf_symfile_segments
, /* Get segment information from a file. */
1410 default_symfile_relocate
, /* Relocate a debug section. */
1411 &elf_probe_fns
, /* sym_probe_fns */
1415 /* The same as elf_sym_fns, but not registered and lazily reads
1418 const struct sym_fns elf_sym_fns_lazy_psyms
=
1420 elf_new_init
, /* init anything gbl to entire symtab */
1421 elf_symfile_init
, /* read initial info, setup for sym_read() */
1422 elf_symfile_read
, /* read a symbol file into symtab */
1423 read_psyms
, /* sym_read_psymbols */
1424 elf_symfile_finish
, /* finished with file, cleanup */
1425 default_symfile_offsets
, /* Translate ext. to int. relocation */
1426 elf_symfile_segments
, /* Get segment information from a file. */
1428 default_symfile_relocate
, /* Relocate a debug section. */
1429 &elf_probe_fns
, /* sym_probe_fns */
1433 /* The same as elf_sym_fns, but not registered and uses the
1434 DWARF-specific GNU index rather than psymtab. */
1435 const struct sym_fns elf_sym_fns_gdb_index
=
1437 elf_new_init
, /* init anything gbl to entire symab */
1438 elf_symfile_init
, /* read initial info, setup for sym_red() */
1439 elf_symfile_read
, /* read a symbol file into symtab */
1440 NULL
, /* sym_read_psymbols */
1441 elf_symfile_finish
, /* finished with file, cleanup */
1442 default_symfile_offsets
, /* Translate ext. to int. relocatin */
1443 elf_symfile_segments
, /* Get segment information from a file. */
1445 default_symfile_relocate
, /* Relocate a debug section. */
1446 &elf_probe_fns
, /* sym_probe_fns */
1447 &dwarf2_gdb_index_functions
1450 /* The same as elf_sym_fns, but not registered and uses the
1451 DWARF-specific .debug_names index rather than psymtab. */
1452 const struct sym_fns elf_sym_fns_debug_names
=
1454 elf_new_init
, /* init anything gbl to entire symab */
1455 elf_symfile_init
, /* read initial info, setup for sym_red() */
1456 elf_symfile_read
, /* read a symbol file into symtab */
1457 NULL
, /* sym_read_psymbols */
1458 elf_symfile_finish
, /* finished with file, cleanup */
1459 default_symfile_offsets
, /* Translate ext. to int. relocatin */
1460 elf_symfile_segments
, /* Get segment information from a file. */
1462 default_symfile_relocate
, /* Relocate a debug section. */
1463 &elf_probe_fns
, /* sym_probe_fns */
1464 &dwarf2_debug_names_functions
1467 /* STT_GNU_IFUNC resolver vector to be installed to gnu_ifunc_fns_p. */
1469 static const struct gnu_ifunc_fns elf_gnu_ifunc_fns
=
1471 elf_gnu_ifunc_resolve_addr
,
1472 elf_gnu_ifunc_resolve_name
,
1473 elf_gnu_ifunc_resolver_stop
,
1474 elf_gnu_ifunc_resolver_return_stop
1478 _initialize_elfread (void)
1480 probe_key
= register_bfd_data_with_cleanup (NULL
, probe_key_free
);
1481 add_symtab_fns (bfd_target_elf_flavour
, &elf_sym_fns
);
1483 elf_objfile_gnu_ifunc_cache_data
= register_objfile_data ();
1484 gnu_ifunc_fns_p
= &elf_gnu_ifunc_fns
;