Line data Source code
1 : /* Initialization of PPC64 specific backend library.
2 : Copyright (C) 2004, 2005, 2006, 2007, 2008, 2013, 2014 Red Hat, Inc.
3 : This file is part of elfutils.
4 : Written by Ulrich Drepper <drepper@redhat.com>, 2004.
5 :
6 : This file is free software; you can redistribute it and/or modify
7 : it under the terms of either
8 :
9 : * the GNU Lesser General Public License as published by the Free
10 : Software Foundation; either version 3 of the License, or (at
11 : your option) any later version
12 :
13 : or
14 :
15 : * the GNU General Public License as published by the Free
16 : Software Foundation; either version 2 of the License, or (at
17 : your option) any later version
18 :
19 : or both in parallel, as here.
20 :
21 : elfutils is distributed in the hope that it will be useful, but
22 : WITHOUT ANY WARRANTY; without even the implied warranty of
23 : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
24 : General Public License for more details.
25 :
26 : You should have received copies of the GNU General Public License and
27 : the GNU Lesser General Public License along with this program. If
28 : not, see <http://www.gnu.org/licenses/>. */
29 :
30 : #ifdef HAVE_CONFIG_H
31 : # include <config.h>
32 : #endif
33 :
34 : #include <string.h>
35 :
36 : #define BACKEND ppc64_
37 : #define RELOC_PREFIX R_PPC64_
38 : #include "libebl_CPU.h"
39 :
40 : /* This defines the common reloc hooks based on ppc64_reloc.def. */
41 : #include "common-reloc.c"
42 :
43 :
44 : const char *
45 178 : ppc64_init (Elf *elf __attribute__ ((unused)),
46 : GElf_Half machine __attribute__ ((unused)),
47 : Ebl *eh,
48 : size_t ehlen)
49 : {
50 : /* Check whether the Elf_BH object has a sufficent size. */
51 178 : if (ehlen < sizeof (Ebl))
52 : return NULL;
53 :
54 : /* We handle it. */
55 178 : ppc64_init_reloc (eh);
56 178 : HOOK (eh, reloc_simple_type);
57 178 : HOOK (eh, dynamic_tag_name);
58 178 : HOOK (eh, dynamic_tag_check);
59 178 : HOOK (eh, machine_flag_check);
60 178 : HOOK (eh, copy_reloc_p);
61 178 : HOOK (eh, check_special_symbol);
62 178 : HOOK (eh, check_st_other_bits);
63 178 : HOOK (eh, bss_plt_p);
64 178 : HOOK (eh, return_value_location);
65 178 : HOOK (eh, register_info);
66 178 : HOOK (eh, syscall_abi);
67 178 : HOOK (eh, core_note);
68 178 : HOOK (eh, auxv_info);
69 178 : HOOK (eh, check_object_attribute);
70 178 : HOOK (eh, abi_cfi);
71 : /* gcc/config/ #define DWARF_FRAME_REGISTERS. */
72 178 : eh->frame_nregs = (114 - 1) + 32;
73 178 : HOOK (eh, set_initial_registers_tid);
74 178 : HOOK (eh, dwarf_to_regno);
75 178 : HOOK (eh, unwind);
76 178 : HOOK (eh, resolve_sym_value);
77 :
78 : /* Find the function descriptor .opd table for resolve_sym_value. */
79 178 : if (elf != NULL)
80 : {
81 178 : GElf_Ehdr ehdr_mem, *ehdr = gelf_getehdr (elf, &ehdr_mem);
82 178 : size_t shstrndx;
83 178 : if (ehdr != NULL && ehdr->e_type != ET_REL
84 80 : && elf_getshdrstrndx (elf, &shstrndx) == 0)
85 : {
86 : /* We could also try through DT_PPC64_OPD and DT_PPC64_OPDSZ. */
87 : GElf_Shdr opd_shdr_mem, *opd_shdr;
88 : Elf_Scn *scn = NULL;
89 1180 : while ((scn = elf_nextscn (elf, scn)) != NULL)
90 : {
91 1133 : opd_shdr = gelf_getshdr (scn, &opd_shdr_mem);
92 1133 : if (opd_shdr != NULL
93 1133 : && (opd_shdr->sh_flags & SHF_ALLOC) != 0
94 877 : && opd_shdr->sh_type == SHT_PROGBITS
95 416 : && opd_shdr->sh_size > 0)
96 : {
97 1155 : const char *name = elf_strptr (elf, shstrndx,
98 385 : opd_shdr->sh_name);
99 385 : if (name != NULL && strcmp (name, ".opd") == 0)
100 : {
101 33 : eh->fd_addr = opd_shdr->sh_addr;
102 33 : eh->fd_data = elf_getdata (scn, NULL);
103 33 : break;
104 : }
105 : }
106 : }
107 : }
108 : }
109 :
110 : return MODVERSION;
111 : }
|