1 /* Common code for PA ELF implementations.
2 Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
3 Free Software Foundation, Inc.
5 This file is part of BFD, the Binary File Descriptor library.
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.
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.
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. */
22 #define ELF_HOWTO_TABLE_SIZE R_PARISC_UNIMPLEMENTED + 1
24 /* This file is included by multiple PA ELF BFD backends with different
27 Most of the routines are written to be size independent, but sometimes
28 external constraints require 32 or 64 bit specific code. We remap
29 the definitions/functions as necessary here. */
31 #define ELF_R_TYPE(X) ELF64_R_TYPE(X)
32 #define ELF_R_SYM(X) ELF64_R_SYM(X)
33 #define elf_hppa_reloc_final_type elf64_hppa_reloc_final_type
34 #define _bfd_elf_hppa_gen_reloc_type _bfd_elf64_hppa_gen_reloc_type
35 #define elf_hppa_relocate_section elf64_hppa_relocate_section
36 #define elf_hppa_final_link elf64_hppa_final_link
39 #define ELF_R_TYPE(X) ELF32_R_TYPE(X)
40 #define ELF_R_SYM(X) ELF32_R_SYM(X)
41 #define elf_hppa_reloc_final_type elf32_hppa_reloc_final_type
42 #define _bfd_elf_hppa_gen_reloc_type _bfd_elf32_hppa_gen_reloc_type
43 #define elf_hppa_relocate_section elf32_hppa_relocate_section
44 #define elf_hppa_final_link elf32_hppa_final_link
47 /* ELF/PA relocation howto entries. */
49 static reloc_howto_type elf_hppa_howto_table[ELF_HOWTO_TABLE_SIZE] =
51 { R_PARISC_NONE, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
52 bfd_elf_generic_reloc, "R_PARISC_NONE", FALSE, 0, 0, FALSE },
54 /* The values in DIR32 are to placate the check in
55 _bfd_stab_section_find_nearest_line. */
56 { R_PARISC_DIR32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
57 bfd_elf_generic_reloc, "R_PARISC_DIR32", FALSE, 0, 0xffffffff, FALSE },
58 { R_PARISC_DIR21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
59 bfd_elf_generic_reloc, "R_PARISC_DIR21L", FALSE, 0, 0, FALSE },
60 { R_PARISC_DIR17R, 0, 2, 17, FALSE, 0, complain_overflow_bitfield,
61 bfd_elf_generic_reloc, "R_PARISC_DIR17R", FALSE, 0, 0, FALSE },
62 { R_PARISC_DIR17F, 0, 2, 17, FALSE, 0, complain_overflow_bitfield,
63 bfd_elf_generic_reloc, "R_PARISC_DIR17F", FALSE, 0, 0, FALSE },
64 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
65 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
66 { R_PARISC_DIR14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
67 bfd_elf_generic_reloc, "R_PARISC_DIR14R", FALSE, 0, 0, FALSE },
68 { R_PARISC_DIR14F, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
69 bfd_elf_generic_reloc, "R_PARISC_DIR14F", FALSE, 0, 0, FALSE },
71 { R_PARISC_PCREL12F, 0, 2, 12, TRUE, 0, complain_overflow_bitfield,
72 bfd_elf_generic_reloc, "R_PARISC_PCREL12F", FALSE, 0, 0, FALSE },
73 { R_PARISC_PCREL32, 0, 2, 32, TRUE, 0, complain_overflow_bitfield,
74 bfd_elf_generic_reloc, "R_PARISC_PCREL32", FALSE, 0, 0, FALSE },
75 { R_PARISC_PCREL21L, 0, 2, 21, TRUE, 0, complain_overflow_bitfield,
76 bfd_elf_generic_reloc, "R_PARISC_PCREL21L", FALSE, 0, 0, FALSE },
77 { R_PARISC_PCREL17R, 0, 2, 17, TRUE, 0, complain_overflow_bitfield,
78 bfd_elf_generic_reloc, "R_PARISC_PCREL17R", FALSE, 0, 0, FALSE },
79 { R_PARISC_PCREL17F, 0, 2, 17, TRUE, 0, complain_overflow_bitfield,
80 bfd_elf_generic_reloc, "R_PARISC_PCREL17F", FALSE, 0, 0, FALSE },
81 { R_PARISC_PCREL17C, 0, 2, 17, TRUE, 0, complain_overflow_bitfield,
82 bfd_elf_generic_reloc, "R_PARISC_PCREL17C", FALSE, 0, 0, FALSE },
83 { R_PARISC_PCREL14R, 0, 2, 14, TRUE, 0, complain_overflow_bitfield,
84 bfd_elf_generic_reloc, "R_PARISC_PCREL14R", FALSE, 0, 0, FALSE },
85 { R_PARISC_PCREL14F, 0, 2, 14, TRUE, 0, complain_overflow_bitfield,
86 bfd_elf_generic_reloc, "R_PARISC_PCREL14F", FALSE, 0, 0, FALSE },
88 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
89 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
90 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
91 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
92 { R_PARISC_DPREL21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
93 bfd_elf_generic_reloc, "R_PARISC_DPREL21L", FALSE, 0, 0, FALSE },
94 { R_PARISC_DPREL14WR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
95 bfd_elf_generic_reloc, "R_PARISC_DPREL14WR", FALSE, 0, 0, FALSE },
96 { R_PARISC_DPREL14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
97 bfd_elf_generic_reloc, "R_PARISC_DPREL14DR", FALSE, 0, 0, FALSE },
98 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
99 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
100 { R_PARISC_DPREL14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
101 bfd_elf_generic_reloc, "R_PARISC_DPREL14R", FALSE, 0, 0, FALSE },
102 { R_PARISC_DPREL14F, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
103 bfd_elf_generic_reloc, "R_PARISC_DPREL14F", FALSE, 0, 0, FALSE },
105 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
106 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
107 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
108 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
109 { R_PARISC_DLTREL21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
110 bfd_elf_generic_reloc, "R_PARISC_DLTREL21L", FALSE, 0, 0, FALSE },
111 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
112 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
113 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
114 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
115 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
116 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
117 { R_PARISC_DLTREL14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
118 bfd_elf_generic_reloc, "R_PARISC_DLTREL14R", FALSE, 0, 0, FALSE },
119 { R_PARISC_DLTREL14F, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
120 bfd_elf_generic_reloc, "R_PARISC_DLTREL14F", FALSE, 0, 0, FALSE },
122 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
123 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
124 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
125 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
126 { R_PARISC_DLTIND21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
127 bfd_elf_generic_reloc, "R_PARISC_DLTIND21L", FALSE, 0, 0, FALSE },
128 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
129 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
130 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
131 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
132 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
133 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
134 { R_PARISC_DLTIND14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
135 bfd_elf_generic_reloc, "R_PARISC_DLTIND14R", FALSE, 0, 0, FALSE },
136 { R_PARISC_DLTIND14F, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
137 bfd_elf_generic_reloc, "R_PARISC_DLTIND14F", FALSE, 0, 0, FALSE },
139 { R_PARISC_SETBASE, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
140 bfd_elf_generic_reloc, "R_PARISC_SETBASE", FALSE, 0, 0, FALSE },
141 { R_PARISC_SECREL32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
142 bfd_elf_generic_reloc, "R_PARISC_SECREL32", FALSE, 0, 0xffffffff, FALSE },
143 { R_PARISC_BASEREL21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
144 bfd_elf_generic_reloc, "R_PARISC_BASEREL21L", FALSE, 0, 0, FALSE },
145 { R_PARISC_BASEREL17R, 0, 2, 17, FALSE, 0, complain_overflow_bitfield,
146 bfd_elf_generic_reloc, "R_PARISC_BASEREL17R", FALSE, 0, 0, FALSE },
147 { R_PARISC_BASEREL17F, 0, 2, 17, FALSE, 0, complain_overflow_bitfield,
148 bfd_elf_generic_reloc, "R_PARISC_BASEREL17F", FALSE, 0, 0, FALSE },
149 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
150 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
151 { R_PARISC_BASEREL14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
152 bfd_elf_generic_reloc, "R_PARISC_BASEREL14R", FALSE, 0, 0, FALSE },
153 { R_PARISC_BASEREL14F, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
154 bfd_elf_generic_reloc, "R_PARISC_BASEREL14F", FALSE, 0, 0, FALSE },
156 { R_PARISC_SEGBASE, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
157 bfd_elf_generic_reloc, "R_PARISC_SEGBASE", FALSE, 0, 0, FALSE },
158 { R_PARISC_SEGREL32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
159 bfd_elf_generic_reloc, "R_PARISC_SEGREL32", FALSE, 0, 0, FALSE },
160 { R_PARISC_PLTOFF21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
161 bfd_elf_generic_reloc, "R_PARISC_PLTOFF21L", FALSE, 0, 0, FALSE },
162 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
163 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
164 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
165 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
166 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
167 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
168 { R_PARISC_PLTOFF14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
169 bfd_elf_generic_reloc, "R_PARISC_PLTOFF14R", FALSE, 0, 0, FALSE },
170 { R_PARISC_PLTOFF14F, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
171 bfd_elf_generic_reloc, "R_PARISC_PLTOFF14F", FALSE, 0, 0, FALSE },
173 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
174 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
175 { R_PARISC_LTOFF_FPTR32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
176 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR32", FALSE, 0, 0, FALSE },
177 { R_PARISC_LTOFF_FPTR21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
178 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR21L", FALSE, 0, 0, FALSE },
179 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
180 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
181 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
182 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
183 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
184 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
185 { R_PARISC_LTOFF_FPTR14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
186 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR14R", FALSE, 0, 0, FALSE },
187 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
188 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
190 { R_PARISC_FPTR64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
191 bfd_elf_generic_reloc, "R_PARISC_FPTR64", FALSE, 0, 0, FALSE },
192 { R_PARISC_PLABEL32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
193 bfd_elf_generic_reloc, "R_PARISC_PLABEL32", FALSE, 0, 0, FALSE },
194 { R_PARISC_PLABEL21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
195 bfd_elf_generic_reloc, "R_PARISC_PLABEL21L", FALSE, 0, 0, FALSE },
196 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
197 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
198 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
199 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
200 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
201 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
202 { R_PARISC_PLABEL14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
203 bfd_elf_generic_reloc, "R_PARISC_PLABEL14R", FALSE, 0, 0, FALSE },
204 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
205 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
207 { R_PARISC_PCREL64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
208 bfd_elf_generic_reloc, "R_PARISC_PCREL64", FALSE, 0, 0, FALSE },
209 { R_PARISC_PCREL22C, 0, 2, 22, FALSE, 0, complain_overflow_bitfield,
210 bfd_elf_generic_reloc, "R_PARISC_PCREL22C", FALSE, 0, 0, FALSE },
211 { R_PARISC_PCREL22F, 0, 2, 22, FALSE, 0, complain_overflow_bitfield,
212 bfd_elf_generic_reloc, "R_PARISC_PCREL22F", FALSE, 0, 0, FALSE },
213 { R_PARISC_PCREL14WR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
214 bfd_elf_generic_reloc, "R_PARISC_PCREL14WR", FALSE, 0, 0, FALSE },
215 { R_PARISC_PCREL14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
216 bfd_elf_generic_reloc, "R_PARISC_PCREL14DR", FALSE, 0, 0, FALSE },
217 { R_PARISC_PCREL16F, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
218 bfd_elf_generic_reloc, "R_PARISC_PCREL16F", FALSE, 0, 0, FALSE },
219 { R_PARISC_PCREL16WF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
220 bfd_elf_generic_reloc, "R_PARISC_PCREL16WF", FALSE, 0, 0, FALSE },
221 { R_PARISC_PCREL16DF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
222 bfd_elf_generic_reloc, "R_PARISC_PCREL16DF", FALSE, 0, 0, FALSE },
224 { R_PARISC_DIR64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
225 bfd_elf_generic_reloc, "R_PARISC_DIR64", FALSE, 0, 0, FALSE },
226 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
227 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
228 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
229 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
230 { R_PARISC_DIR14WR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
231 bfd_elf_generic_reloc, "R_PARISC_DIR14WR", FALSE, 0, 0, FALSE },
232 { R_PARISC_DIR14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
233 bfd_elf_generic_reloc, "R_PARISC_DIR14DR", FALSE, 0, 0, FALSE },
234 { R_PARISC_DIR16F, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
235 bfd_elf_generic_reloc, "R_PARISC_DIR16F", FALSE, 0, 0, FALSE },
236 { R_PARISC_DIR16WF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
237 bfd_elf_generic_reloc, "R_PARISC_DIR16WF", FALSE, 0, 0, FALSE },
238 { R_PARISC_DIR16DF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
239 bfd_elf_generic_reloc, "R_PARISC_DIR16DF", FALSE, 0, 0, FALSE },
241 { R_PARISC_GPREL64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
242 bfd_elf_generic_reloc, "R_PARISC_GPREL64", FALSE, 0, 0, FALSE },
243 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
244 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
245 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
246 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
247 { R_PARISC_DLTREL14WR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
248 bfd_elf_generic_reloc, "R_PARISC_DLTREL14WR", FALSE, 0, 0, FALSE },
249 { R_PARISC_DLTREL14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
250 bfd_elf_generic_reloc, "R_PARISC_DLTREL14DR", FALSE, 0, 0, FALSE },
251 { R_PARISC_GPREL16F, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
252 bfd_elf_generic_reloc, "R_PARISC_GPREL16F", FALSE, 0, 0, FALSE },
253 { R_PARISC_GPREL16WF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
254 bfd_elf_generic_reloc, "R_PARISC_GPREL16WF", FALSE, 0, 0, FALSE },
255 { R_PARISC_GPREL16DF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
256 bfd_elf_generic_reloc, "R_PARISC_GPREL16DF", FALSE, 0, 0, FALSE },
258 { R_PARISC_LTOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
259 bfd_elf_generic_reloc, "R_PARISC_LTOFF64", FALSE, 0, 0, FALSE },
260 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
261 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
262 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
263 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
264 { R_PARISC_DLTIND14WR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
265 bfd_elf_generic_reloc, "R_PARISC_DLTIND14WR", FALSE, 0, 0, FALSE },
266 { R_PARISC_DLTIND14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
267 bfd_elf_generic_reloc, "R_PARISC_DLTIND14DR", FALSE, 0, 0, FALSE },
268 { R_PARISC_LTOFF16F, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
269 bfd_elf_generic_reloc, "R_PARISC_LTOFF16F", FALSE, 0, 0, FALSE },
270 { R_PARISC_LTOFF16WF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
271 bfd_elf_generic_reloc, "R_PARISC_LTOFF16DF", FALSE, 0, 0, FALSE },
272 { R_PARISC_LTOFF16DF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
273 bfd_elf_generic_reloc, "R_PARISC_LTOFF16DF", FALSE, 0, 0, FALSE },
275 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
276 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
277 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
278 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
279 { R_PARISC_BASEREL14WR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
280 bfd_elf_generic_reloc, "R_PARISC_BASEREL14WR", FALSE, 0, 0, FALSE },
281 { R_PARISC_BASEREL14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
282 bfd_elf_generic_reloc, "R_PARISC_BASEREL14DR", FALSE, 0, 0, FALSE },
283 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
284 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
285 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
286 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
287 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
288 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
289 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
290 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
292 { R_PARISC_SEGREL64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
293 bfd_elf_generic_reloc, "R_PARISC_SEGREL64", FALSE, 0, 0, FALSE },
294 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
295 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
296 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
297 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
298 { R_PARISC_PLTOFF14WR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
299 bfd_elf_generic_reloc, "R_PARISC_PLTOFF14WR", FALSE, 0, 0, FALSE },
300 { R_PARISC_PLTOFF14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
301 bfd_elf_generic_reloc, "R_PARISC_PLTOFF14DR", FALSE, 0, 0, FALSE },
302 { R_PARISC_PLTOFF16F, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
303 bfd_elf_generic_reloc, "R_PARISC_PLTOFF16F", FALSE, 0, 0, FALSE },
304 { R_PARISC_PLTOFF16WF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
305 bfd_elf_generic_reloc, "R_PARISC_PLTOFF16WF", FALSE, 0, 0, FALSE },
306 { R_PARISC_PLTOFF16DF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
307 bfd_elf_generic_reloc, "R_PARISC_PLTOFF16DF", FALSE, 0, 0, FALSE },
309 { R_PARISC_LTOFF_FPTR64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
310 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
311 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
312 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
313 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
314 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
315 { R_PARISC_LTOFF_FPTR14WR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
316 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR14WR", FALSE, 0, 0, FALSE },
317 { R_PARISC_LTOFF_FPTR14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
318 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR14DR", FALSE, 0, 0, FALSE },
319 { R_PARISC_LTOFF_FPTR16F, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
320 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR16F", FALSE, 0, 0, FALSE },
321 { R_PARISC_LTOFF_FPTR16WF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
322 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR16WF", FALSE, 0, 0, FALSE },
323 { R_PARISC_LTOFF_FPTR16DF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
324 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
326 { R_PARISC_COPY, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
327 bfd_elf_generic_reloc, "R_PARISC_COPY", FALSE, 0, 0, FALSE },
328 { R_PARISC_IPLT, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
329 bfd_elf_generic_reloc, "R_PARISC_IPLT", FALSE, 0, 0, FALSE },
330 { R_PARISC_EPLT, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
331 bfd_elf_generic_reloc, "R_PARISC_EPLT", FALSE, 0, 0, FALSE },
332 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
333 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
334 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
335 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
336 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
337 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
338 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
339 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
340 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
341 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
343 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
344 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
345 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
346 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
347 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
348 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
349 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
350 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
351 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
352 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
353 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
354 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
355 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
356 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
357 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
358 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
360 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
361 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
362 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
363 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
364 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
365 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
366 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
367 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
368 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
369 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
370 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
371 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
372 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
373 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
374 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
375 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
377 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
378 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
379 { R_PARISC_TPREL32, 0, 2, 32, FALSE, 0, complain_overflow_dont,
380 bfd_elf_generic_reloc, "R_PARISC_TPREL32", FALSE, 0, 0, FALSE },
381 { R_PARISC_TPREL21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
382 bfd_elf_generic_reloc, "R_PARISC_TPREL21L", FALSE, 0, 0, FALSE },
383 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
384 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
385 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
386 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
387 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
388 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
389 { R_PARISC_TPREL14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
390 bfd_elf_generic_reloc, "R_PARISC_TPREL14R", FALSE, 0, 0, FALSE },
391 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
392 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
394 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
395 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
396 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
397 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
398 { R_PARISC_LTOFF_TP21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
399 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP21L", FALSE, 0, 0, FALSE },
400 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
401 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
402 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
403 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
404 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
405 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
406 { R_PARISC_LTOFF_TP14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
407 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP14R", FALSE, 0, 0, FALSE },
408 { R_PARISC_LTOFF_TP14F, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
409 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP14F", FALSE, 0, 0, FALSE },
411 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
412 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
413 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
414 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
415 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
416 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
417 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
418 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
419 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
420 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
421 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
422 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
423 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
424 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
425 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
426 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
428 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
429 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
430 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
431 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
432 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
433 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
434 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
435 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
436 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
437 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
438 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
439 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
440 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
441 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
442 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
443 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
445 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
446 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
447 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
448 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
449 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
450 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
451 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
452 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
453 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
454 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
455 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
456 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
457 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
458 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
459 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
460 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
462 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
463 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
464 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
465 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
466 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
467 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
468 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
469 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
470 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
471 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
472 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
473 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
474 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
475 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
476 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
477 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
479 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
480 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
481 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
482 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
483 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
484 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
485 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
486 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
487 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
488 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
489 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
490 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
491 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
492 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
493 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
494 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
496 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
497 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
498 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
499 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
500 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
501 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
502 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
503 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
504 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
505 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
506 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
507 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
508 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
509 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
510 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
511 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
513 { R_PARISC_TPREL64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
514 bfd_elf_generic_reloc, "R_PARISC_TPREL64", FALSE, 0, 0, FALSE },
515 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
516 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
517 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
518 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
519 { R_PARISC_TPREL14WR, 0, 2, 14, FALSE, 0, complain_overflow_dont,
520 bfd_elf_generic_reloc, "R_PARISC_TPREL14WR", FALSE, 0, 0, FALSE },
521 { R_PARISC_TPREL14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
522 bfd_elf_generic_reloc, "R_PARISC_TPREL14DR", FALSE, 0, 0, FALSE },
523 { R_PARISC_TPREL16F, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
524 bfd_elf_generic_reloc, "R_PARISC_TPREL16F", FALSE, 0, 0, FALSE },
525 { R_PARISC_TPREL16WF, 0, 2, 16, FALSE, 0, complain_overflow_dont,
526 bfd_elf_generic_reloc, "R_PARISC_TPREL16WF", FALSE, 0, 0, FALSE },
527 { R_PARISC_TPREL16DF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
528 bfd_elf_generic_reloc, "R_PARISC_TPREL16DF", FALSE, 0, 0, FALSE },
530 { R_PARISC_LTOFF_TP64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
531 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP64", FALSE, 0, 0, FALSE },
532 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
533 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
534 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
535 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
536 { R_PARISC_LTOFF_TP14WR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
537 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP14WR", FALSE, 0, 0, FALSE },
538 { R_PARISC_LTOFF_TP14DR, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
539 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP14DR", FALSE, 0, 0, FALSE },
540 { R_PARISC_LTOFF_TP16F, 0, 2, 16, FALSE, 0, complain_overflow_dont,
541 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP16F", FALSE, 0, 0, FALSE },
542 { R_PARISC_LTOFF_TP16WF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
543 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP16WF", FALSE, 0, 0, FALSE },
544 { R_PARISC_LTOFF_TP16DF, 0, 2, 16, FALSE, 0, complain_overflow_bitfield,
545 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP16DF", FALSE, 0, 0, FALSE },
547 { R_PARISC_GNU_VTENTRY, 0, 0, 0, FALSE, 0, complain_overflow_dont,
548 bfd_elf_generic_reloc, "R_PARISC_GNU_VTENTRY", FALSE, 0, 0, FALSE },
549 { R_PARISC_GNU_VTINHERIT, 0, 0, 0, FALSE, 0, complain_overflow_dont,
550 bfd_elf_generic_reloc, "R_PARISC_GNU_VTINHERIT", FALSE, 0, 0, FALSE },
551 { R_PARISC_TLS_GD21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
552 bfd_elf_generic_reloc, "R_PARISC_TLS_GD21L", FALSE, 0, 0, FALSE },
553 { R_PARISC_TLS_GD14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
554 bfd_elf_generic_reloc, "R_PARISC_TLS_GD14R", FALSE, 0, 0, FALSE },
555 { R_PARISC_TLS_GDCALL, 0, 0, 0, FALSE, 0, complain_overflow_dont,
556 bfd_elf_generic_reloc, "R_PARISC_TLS_GDCALL", FALSE, 0, 0, FALSE },
557 { R_PARISC_TLS_LDM21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
558 bfd_elf_generic_reloc, "R_PARISC_TLS_LDM21L", FALSE, 0, 0, FALSE },
559 { R_PARISC_TLS_LDM14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
560 bfd_elf_generic_reloc, "R_PARISC_TLS_LDM14R", FALSE, 0, 0, FALSE },
561 { R_PARISC_TLS_LDMCALL, 0, 0, 0, FALSE, 0, complain_overflow_dont,
562 bfd_elf_generic_reloc, "R_PARISC_TLS_LDMCALL", FALSE, 0, 0, FALSE },
564 { R_PARISC_TLS_LDO21L, 0, 2, 21, FALSE, 0, complain_overflow_bitfield,
565 bfd_elf_generic_reloc, "R_PARISC_TLS_LDO21L", FALSE, 0, 0, FALSE },
566 { R_PARISC_TLS_LDO14R, 0, 2, 14, FALSE, 0, complain_overflow_bitfield,
567 bfd_elf_generic_reloc, "R_PARISC_TLS_LDO14R", FALSE, 0, 0, FALSE },
568 { R_PARISC_TLS_DTPMOD32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
569 bfd_elf_generic_reloc, "R_PARISC_TLS_DTPMOD32", FALSE, 0, 0, FALSE },
570 { R_PARISC_TLS_DTPMOD64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
571 bfd_elf_generic_reloc, "R_PARISC_TLS_DTPMOD64", FALSE, 0, 0, FALSE },
572 { R_PARISC_TLS_DTPOFF32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
573 bfd_elf_generic_reloc, "R_PARISC_TLS_DTPOFF32", FALSE, 0, 0, FALSE },
574 { R_PARISC_TLS_DTPOFF64, 0, 4, 64, FALSE, 0, complain_overflow_bitfield,
575 bfd_elf_generic_reloc, "R_PARISC_TLS_DTPOFF64", FALSE, 0, 0, FALSE },
578 #define OFFSET_14R_FROM_21L 4
579 #define OFFSET_14F_FROM_21L 5
581 /* Return the final relocation type for the given base type, instruction
582 format, and field selector. */
585 elf_hppa_reloc_final_type (bfd *abfd,
586 elf_hppa_reloc_type base_type,
590 elf_hppa_reloc_type final_type = base_type;
592 /* Just a tangle of nested switch statements to deal with the braindamage
593 that a different field selector means a completely different relocation
597 /* We have been using generic relocation types. However, that may not
598 really make sense. Anyway, we need to support both R_PARISC_DIR64
599 and R_PARISC_DIR32 here. */
602 case R_HPPA_ABS_CALL:
609 final_type = R_PARISC_DIR14F;
614 final_type = R_PARISC_DIR14R;
617 final_type = R_PARISC_DLTIND14R;
620 final_type = R_PARISC_LTOFF_FPTR14DR;
623 final_type = R_PARISC_DLTIND14F;
626 final_type = R_PARISC_PLABEL14R;
629 return R_PARISC_NONE;
637 final_type = R_PARISC_DIR17F;
642 final_type = R_PARISC_DIR17R;
645 return R_PARISC_NONE;
657 final_type = R_PARISC_DIR21L;
660 final_type = R_PARISC_DLTIND21L;
663 final_type = R_PARISC_LTOFF_FPTR21L;
666 final_type = R_PARISC_PLABEL21L;
669 return R_PARISC_NONE;
677 final_type = R_PARISC_DIR32;
678 /* When in 64bit mode, a 32bit relocation is supposed to
679 be a section relative relocation. Dwarf2 (for example)
680 uses 32bit section relative relocations. */
681 if (bfd_get_arch_info (abfd)->bits_per_address != 32)
682 final_type = R_PARISC_SECREL32;
685 final_type = R_PARISC_PLABEL32;
688 return R_PARISC_NONE;
696 final_type = R_PARISC_DIR64;
699 final_type = R_PARISC_FPTR64;
702 return R_PARISC_NONE;
707 return R_PARISC_NONE;
720 /* R_PARISC_DLTREL14R for elf64, R_PARISC_DPREL14R for elf32. */
721 final_type = base_type + OFFSET_14R_FROM_21L;
724 /* R_PARISC_DLTREL14F for elf64, R_PARISC_DPREL14F for elf32. */
725 final_type = base_type + OFFSET_14F_FROM_21L;
728 return R_PARISC_NONE;
740 /* R_PARISC_DLTREL21L for elf64, R_PARISC_DPREL21L for elf32. */
741 final_type = base_type;
744 return R_PARISC_NONE;
752 final_type = R_PARISC_GPREL64;
755 return R_PARISC_NONE;
760 return R_PARISC_NONE;
764 case R_HPPA_PCREL_CALL:
771 final_type = R_PARISC_PCREL12F;
774 return R_PARISC_NONE;
779 /* Contrary to appearances, these are not calls of any sort.
780 Rather, they are loads/stores with a pcrel reloc. */
786 final_type = R_PARISC_PCREL14R;
789 if (bfd_get_mach (abfd) < 25)
790 final_type = R_PARISC_PCREL14F;
792 final_type = R_PARISC_PCREL16F;
795 return R_PARISC_NONE;
805 final_type = R_PARISC_PCREL17R;
808 final_type = R_PARISC_PCREL17F;
811 return R_PARISC_NONE;
823 final_type = R_PARISC_PCREL21L;
826 return R_PARISC_NONE;
834 final_type = R_PARISC_PCREL22F;
837 return R_PARISC_NONE;
845 final_type = R_PARISC_PCREL32;
848 return R_PARISC_NONE;
856 final_type = R_PARISC_PCREL64;
859 return R_PARISC_NONE;
864 return R_PARISC_NONE;
868 case R_PARISC_TLS_GD21L:
873 final_type = R_PARISC_TLS_GD21L;
877 final_type = R_PARISC_TLS_GD14R;
880 return R_PARISC_NONE;
884 case R_PARISC_TLS_LDM21L:
889 final_type = R_PARISC_TLS_LDM21L;
893 final_type = R_PARISC_TLS_LDM14R;
896 return R_PARISC_NONE;
900 case R_PARISC_TLS_LDO21L:
904 final_type = R_PARISC_TLS_LDO21L;
907 final_type = R_PARISC_TLS_LDO14R;
910 return R_PARISC_NONE;
914 case R_PARISC_TLS_IE21L:
919 final_type = R_PARISC_TLS_IE21L;
923 final_type = R_PARISC_TLS_IE14R;
926 return R_PARISC_NONE;
930 case R_PARISC_TLS_LE21L:
934 final_type = R_PARISC_TLS_LE21L;
937 final_type = R_PARISC_TLS_LE14R;
940 return R_PARISC_NONE;
944 case R_PARISC_SEGREL32:
951 final_type = R_PARISC_SEGREL32;
954 return R_PARISC_NONE;
962 final_type = R_PARISC_SEGREL64;
965 return R_PARISC_NONE;
970 return R_PARISC_NONE;
974 case R_PARISC_GNU_VTENTRY:
975 case R_PARISC_GNU_VTINHERIT:
976 case R_PARISC_SEGBASE:
977 /* The defaults are fine for these cases. */
981 return R_PARISC_NONE;
987 /* Return one (or more) BFD relocations which implement the base
988 relocation with modifications based on format and field. */
990 elf_hppa_reloc_type **
991 _bfd_elf_hppa_gen_reloc_type (bfd *abfd,
992 elf_hppa_reloc_type base_type,
995 int ignore ATTRIBUTE_UNUSED,
996 asymbol *sym ATTRIBUTE_UNUSED)
998 elf_hppa_reloc_type *finaltype;
999 elf_hppa_reloc_type **final_types;
1000 bfd_size_type amt = sizeof (elf_hppa_reloc_type *) * 2;
1002 /* Allocate slots for the BFD relocation. */
1003 final_types = bfd_alloc (abfd, amt);
1004 if (final_types == NULL)
1007 /* Allocate space for the relocation itself. */
1008 amt = sizeof (elf_hppa_reloc_type);
1009 finaltype = bfd_alloc (abfd, amt);
1010 if (finaltype == NULL)
1013 /* Some reasonable defaults. */
1014 final_types[0] = finaltype;
1015 final_types[1] = NULL;
1017 *finaltype = elf_hppa_reloc_final_type (abfd, base_type, format, field);
1022 /* Translate from an elf into field into a howto relocation pointer. */
1025 elf_hppa_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED,
1027 Elf_Internal_Rela *elf_reloc)
1029 BFD_ASSERT (ELF_R_TYPE (elf_reloc->r_info)
1030 < (unsigned int) R_PARISC_UNIMPLEMENTED);
1031 bfd_reloc->howto = &elf_hppa_howto_table[ELF_R_TYPE (elf_reloc->r_info)];
1034 /* Translate from an elf into field into a howto relocation pointer. */
1037 elf_hppa_info_to_howto_rel (bfd *abfd ATTRIBUTE_UNUSED,
1039 Elf_Internal_Rela *elf_reloc)
1041 BFD_ASSERT (ELF_R_TYPE (elf_reloc->r_info)
1042 < (unsigned int) R_PARISC_UNIMPLEMENTED);
1043 bfd_reloc->howto = &elf_hppa_howto_table[ELF_R_TYPE (elf_reloc->r_info)];
1046 /* Return the address of the howto table entry to perform the CODE
1047 relocation for an ARCH machine. */
1049 static reloc_howto_type *
1050 elf_hppa_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1051 bfd_reloc_code_real_type code)
1053 if ((int) code < (int) R_PARISC_UNIMPLEMENTED)
1055 BFD_ASSERT ((int) elf_hppa_howto_table[(int) code].type == (int) code);
1056 return &elf_hppa_howto_table[(int) code];
1061 static reloc_howto_type *
1062 elf_hppa_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
1068 i < sizeof (elf_hppa_howto_table) / sizeof (elf_hppa_howto_table[0]);
1070 if (elf_hppa_howto_table[i].name != NULL
1071 && strcasecmp (elf_hppa_howto_table[i].name, r_name) == 0)
1072 return &elf_hppa_howto_table[i];
1077 /* Return TRUE if SYM represents a local label symbol. */
1080 elf_hppa_is_local_label_name (bfd *abfd ATTRIBUTE_UNUSED, const char *name)
1082 if (name[0] == 'L' && name[1] == '$')
1084 return _bfd_elf_is_local_label_name (abfd, name);
1087 /* Set the correct type for an ELF section. We do this by the
1088 section name, which is a hack, but ought to work. */
1091 elf_hppa_fake_sections (bfd *abfd, Elf_Internal_Shdr *hdr, asection *sec)
1095 name = bfd_get_section_name (abfd, sec);
1097 if (strcmp (name, ".PARISC.unwind") == 0)
1103 hdr->sh_type = SHT_LOPROC + 1;
1107 /* ?!? How are unwinds supposed to work for symbols in arbitrary
1108 sections? Or what if we have multiple .text sections in a single
1109 .o file? HP really messed up on this one.
1111 Ugh. We can not use elf_section_data (sec)->this_idx at this
1112 point because it is not initialized yet.
1114 So we (gasp) recompute it here. Hopefully nobody ever changes the
1115 way sections are numbered in elf.c! */
1116 for (asec = abfd->sections, indx = 1; asec; asec = asec->next, indx++)
1118 if (asec->name && strcmp (asec->name, ".text") == 0)
1120 hdr->sh_info = indx;
1125 /* I have no idea if this is really necessary or what it means. */
1126 hdr->sh_entsize = 4;
1132 elf_hppa_final_write_processing (bfd *abfd,
1133 bfd_boolean linker ATTRIBUTE_UNUSED)
1135 int mach = bfd_get_mach (abfd);
1137 elf_elfheader (abfd)->e_flags &= ~(EF_PARISC_ARCH | EF_PARISC_TRAPNIL
1138 | EF_PARISC_EXT | EF_PARISC_LSB
1139 | EF_PARISC_WIDE | EF_PARISC_NO_KABP
1140 | EF_PARISC_LAZYSWAP);
1143 elf_elfheader (abfd)->e_flags |= EFA_PARISC_1_0;
1144 else if (mach == 11)
1145 elf_elfheader (abfd)->e_flags |= EFA_PARISC_1_1;
1146 else if (mach == 20)
1147 elf_elfheader (abfd)->e_flags |= EFA_PARISC_2_0;
1148 else if (mach == 25)
1149 elf_elfheader (abfd)->e_flags |= (EF_PARISC_WIDE
1151 /* The GNU tools have trapped without
1152 option since 1993, so need to take
1153 a step backwards with the ELF
1154 based toolchains. */
1155 | EF_PARISC_TRAPNIL);
1158 /* Comparison function for qsort to sort unwind section during a
1162 hppa_unwind_entry_compare (const void *a, const void *b)
1164 const bfd_byte *ap, *bp;
1165 unsigned long av, bv;
1168 av = (unsigned long) ap[0] << 24;
1169 av |= (unsigned long) ap[1] << 16;
1170 av |= (unsigned long) ap[2] << 8;
1171 av |= (unsigned long) ap[3];
1174 bv = (unsigned long) bp[0] << 24;
1175 bv |= (unsigned long) bp[1] << 16;
1176 bv |= (unsigned long) bp[2] << 8;
1177 bv |= (unsigned long) bp[3];
1179 return av < bv ? -1 : av > bv ? 1 : 0;
1183 elf_hppa_sort_unwind (bfd *abfd)
1187 /* Magic section names, but this is much safer than having
1188 relocate_section remember where SEGREL32 relocs occurred.
1189 Consider what happens if someone inept creates a linker script
1190 that puts unwind information in .text. */
1191 s = bfd_get_section_by_name (abfd, ".PARISC.unwind");
1197 if (!bfd_malloc_and_get_section (abfd, s, &contents))
1201 qsort (contents, (size_t) (size / 16), 16, hppa_unwind_entry_compare);
1203 if (! bfd_set_section_contents (abfd, s, contents, (file_ptr) 0, size))
1210 /* What to do when ld finds relocations against symbols defined in
1211 discarded sections. */
1214 elf_hppa_action_discarded (asection *sec)
1216 if (strcmp (".PARISC.unwind", sec->name) == 0)
1219 return _bfd_elf_default_action_discarded (sec);
1223 /* Hook called by the linker routine which adds symbols from an object
1224 file. HP's libraries define symbols with HP specific section
1225 indices, which we have to handle. */
1228 elf_hppa_add_symbol_hook (bfd *abfd,
1229 struct bfd_link_info *info ATTRIBUTE_UNUSED,
1230 Elf_Internal_Sym *sym,
1231 const char **namep ATTRIBUTE_UNUSED,
1232 flagword *flagsp ATTRIBUTE_UNUSED,
1236 unsigned int index = sym->st_shndx;
1240 case SHN_PARISC_ANSI_COMMON:
1241 *secp = bfd_make_section_old_way (abfd, ".PARISC.ansi.common");
1242 (*secp)->flags |= SEC_IS_COMMON;
1243 *valp = sym->st_size;
1246 case SHN_PARISC_HUGE_COMMON:
1247 *secp = bfd_make_section_old_way (abfd, ".PARISC.huge.common");
1248 (*secp)->flags |= SEC_IS_COMMON;
1249 *valp = sym->st_size;
1257 elf_hppa_unmark_useless_dynamic_symbols (struct elf_link_hash_entry *h,
1260 struct bfd_link_info *info = data;
1262 if (h->root.type == bfd_link_hash_warning)
1263 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1265 /* If we are not creating a shared library, and this symbol is
1266 referenced by a shared library but is not defined anywhere, then
1267 the generic code will warn that it is undefined.
1269 This behavior is undesirable on HPs since the standard shared
1270 libraries contain references to undefined symbols.
1272 So we twiddle the flags associated with such symbols so that they
1273 will not trigger the warning. ?!? FIXME. This is horribly fragile.
1275 Ultimately we should have better controls over the generic ELF BFD
1277 if (! info->relocatable
1278 && info->unresolved_syms_in_shared_libs != RM_IGNORE
1279 && h->root.type == bfd_link_hash_undefined
1284 h->pointer_equality_needed = 1;
1291 elf_hppa_remark_useless_dynamic_symbols (struct elf_link_hash_entry *h,
1294 struct bfd_link_info *info = data;
1296 if (h->root.type == bfd_link_hash_warning)
1297 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1299 /* If we are not creating a shared library, and this symbol is
1300 referenced by a shared library but is not defined anywhere, then
1301 the generic code will warn that it is undefined.
1303 This behavior is undesirable on HPs since the standard shared
1304 libraries contain references to undefined symbols.
1306 So we twiddle the flags associated with such symbols so that they
1307 will not trigger the warning. ?!? FIXME. This is horribly fragile.
1309 Ultimately we should have better controls over the generic ELF BFD
1311 if (! info->relocatable
1312 && info->unresolved_syms_in_shared_libs != RM_IGNORE
1313 && h->root.type == bfd_link_hash_undefined
1316 && h->pointer_equality_needed)
1319 h->pointer_equality_needed = 0;
1326 elf_hppa_is_dynamic_loader_symbol (const char *name)
1328 return (! strcmp (name, "__CPU_REVISION")
1329 || ! strcmp (name, "__CPU_KEYBITS_1")
1330 || ! strcmp (name, "__SYSTEM_ID_D")
1331 || ! strcmp (name, "__FPU_MODEL")
1332 || ! strcmp (name, "__FPU_REVISION")
1333 || ! strcmp (name, "__ARGC")
1334 || ! strcmp (name, "__ARGV")
1335 || ! strcmp (name, "__ENVP")
1336 || ! strcmp (name, "__TLS_SIZE_D")
1337 || ! strcmp (name, "__LOAD_INFO")
1338 || ! strcmp (name, "__systab"));
1341 /* Record the lowest address for the data and text segments. */
1343 elf_hppa_record_segment_addrs (bfd *abfd,
1347 struct elf64_hppa_link_hash_table *hppa_info = data;
1349 if ((section->flags & (SEC_ALLOC | SEC_LOAD)) == (SEC_ALLOC | SEC_LOAD))
1352 Elf_Internal_Phdr *p;
1354 p = _bfd_elf_find_segment_containing_section (abfd, section->output_section);
1355 BFD_ASSERT (p != NULL);
1358 if (section->flags & SEC_READONLY)
1360 if (value < hppa_info->text_segment_base)
1361 hppa_info->text_segment_base = value;
1365 if (value < hppa_info->data_segment_base)
1366 hppa_info->data_segment_base = value;
1371 /* Called after we have seen all the input files/sections, but before
1372 final symbol resolution and section placement has been determined.
1374 We use this hook to (possibly) provide a value for __gp, then we
1375 fall back to the generic ELF final link routine. */
1378 elf_hppa_final_link (bfd *abfd, struct bfd_link_info *info)
1381 struct elf64_hppa_link_hash_table *hppa_info = elf64_hppa_hash_table (info);
1383 if (! info->relocatable)
1385 struct elf_link_hash_entry *gp;
1388 /* The linker script defines a value for __gp iff it was referenced
1389 by one of the objects being linked. First try to find the symbol
1390 in the hash table. If that fails, just compute the value __gp
1392 gp = elf_link_hash_lookup (elf_hash_table (info), "__gp", FALSE,
1398 /* Adjust the value of __gp as we may want to slide it into the
1399 .plt section so that the stubs can access PLT entries without
1400 using an addil sequence. */
1401 gp->root.u.def.value += hppa_info->gp_offset;
1403 gp_val = (gp->root.u.def.section->output_section->vma
1404 + gp->root.u.def.section->output_offset
1405 + gp->root.u.def.value);
1411 /* First look for a .plt section. If found, then __gp is the
1412 address of the .plt + gp_offset.
1414 If no .plt is found, then look for .dlt, .opd and .data (in
1415 that order) and set __gp to the base address of whichever
1416 section is found first. */
1418 sec = hppa_info->plt_sec;
1419 if (sec && ! (sec->flags & SEC_EXCLUDE))
1420 gp_val = (sec->output_offset
1421 + sec->output_section->vma
1422 + hppa_info->gp_offset);
1425 sec = hppa_info->dlt_sec;
1426 if (!sec || (sec->flags & SEC_EXCLUDE))
1427 sec = hppa_info->opd_sec;
1428 if (!sec || (sec->flags & SEC_EXCLUDE))
1429 sec = bfd_get_section_by_name (abfd, ".data");
1430 if (!sec || (sec->flags & SEC_EXCLUDE))
1433 gp_val = sec->output_offset + sec->output_section->vma;
1437 /* Install whatever value we found/computed for __gp. */
1438 _bfd_set_gp_value (abfd, gp_val);
1441 /* We need to know the base of the text and data segments so that we
1442 can perform SEGREL relocations. We will record the base addresses
1443 when we encounter the first SEGREL relocation. */
1444 hppa_info->text_segment_base = (bfd_vma)-1;
1445 hppa_info->data_segment_base = (bfd_vma)-1;
1447 /* HP's shared libraries have references to symbols that are not
1448 defined anywhere. The generic ELF BFD linker code will complain
1451 So we detect the losing case and arrange for the flags on the symbol
1452 to indicate that it was never referenced. This keeps the generic
1453 ELF BFD link code happy and appears to not create any secondary
1454 problems. Ultimately we need a way to control the behavior of the
1455 generic ELF BFD link code better. */
1456 elf_link_hash_traverse (elf_hash_table (info),
1457 elf_hppa_unmark_useless_dynamic_symbols,
1460 /* Invoke the regular ELF backend linker to do all the work. */
1461 retval = bfd_elf_final_link (abfd, info);
1463 elf_link_hash_traverse (elf_hash_table (info),
1464 elf_hppa_remark_useless_dynamic_symbols,
1467 /* If we're producing a final executable, sort the contents of the
1470 retval = elf_hppa_sort_unwind (abfd);
1475 /* Relocate the given INSN. VALUE should be the actual value we want
1476 to insert into the instruction, ie by this point we should not be
1477 concerned with computing an offset relative to the DLT, PC, etc.
1478 Instead this routine is meant to handle the bit manipulations needed
1479 to insert the relocation into the given instruction. */
1482 elf_hppa_relocate_insn (int insn, int sym_value, unsigned int r_type)
1486 /* This is any 22 bit branch. In PA2.0 syntax it corresponds to
1487 the "B" instruction. */
1488 case R_PARISC_PCREL22F:
1489 case R_PARISC_PCREL22C:
1490 return (insn & ~0x3ff1ffd) | re_assemble_22 (sym_value);
1492 /* This is any 12 bit branch. */
1493 case R_PARISC_PCREL12F:
1494 return (insn & ~0x1ffd) | re_assemble_12 (sym_value);
1496 /* This is any 17 bit branch. In PA2.0 syntax it also corresponds
1497 to the "B" instruction as well as BE. */
1498 case R_PARISC_PCREL17F:
1499 case R_PARISC_DIR17F:
1500 case R_PARISC_DIR17R:
1501 case R_PARISC_PCREL17C:
1502 case R_PARISC_PCREL17R:
1503 return (insn & ~0x1f1ffd) | re_assemble_17 (sym_value);
1505 /* ADDIL or LDIL instructions. */
1506 case R_PARISC_DLTREL21L:
1507 case R_PARISC_DLTIND21L:
1508 case R_PARISC_LTOFF_FPTR21L:
1509 case R_PARISC_PCREL21L:
1510 case R_PARISC_LTOFF_TP21L:
1511 case R_PARISC_DPREL21L:
1512 case R_PARISC_PLTOFF21L:
1513 case R_PARISC_DIR21L:
1514 return (insn & ~0x1fffff) | re_assemble_21 (sym_value);
1516 /* LDO and integer loads/stores with 14 bit displacements. */
1517 case R_PARISC_DLTREL14R:
1518 case R_PARISC_DLTREL14F:
1519 case R_PARISC_DLTIND14R:
1520 case R_PARISC_DLTIND14F:
1521 case R_PARISC_LTOFF_FPTR14R:
1522 case R_PARISC_PCREL14R:
1523 case R_PARISC_PCREL14F:
1524 case R_PARISC_LTOFF_TP14R:
1525 case R_PARISC_LTOFF_TP14F:
1526 case R_PARISC_DPREL14R:
1527 case R_PARISC_DPREL14F:
1528 case R_PARISC_PLTOFF14R:
1529 case R_PARISC_PLTOFF14F:
1530 case R_PARISC_DIR14R:
1531 case R_PARISC_DIR14F:
1532 return (insn & ~0x3fff) | low_sign_unext (sym_value, 14);
1534 /* PA2.0W LDO and integer loads/stores with 16 bit displacements. */
1535 case R_PARISC_LTOFF_FPTR16F:
1536 case R_PARISC_PCREL16F:
1537 case R_PARISC_LTOFF_TP16F:
1538 case R_PARISC_GPREL16F:
1539 case R_PARISC_PLTOFF16F:
1540 case R_PARISC_DIR16F:
1541 case R_PARISC_LTOFF16F:
1542 return (insn & ~0xffff) | re_assemble_16 (sym_value);
1544 /* Doubleword loads and stores with a 14 bit displacement. */
1545 case R_PARISC_DLTREL14DR:
1546 case R_PARISC_DLTIND14DR:
1547 case R_PARISC_LTOFF_FPTR14DR:
1548 case R_PARISC_LTOFF_FPTR16DF:
1549 case R_PARISC_PCREL14DR:
1550 case R_PARISC_PCREL16DF:
1551 case R_PARISC_LTOFF_TP14DR:
1552 case R_PARISC_LTOFF_TP16DF:
1553 case R_PARISC_DPREL14DR:
1554 case R_PARISC_GPREL16DF:
1555 case R_PARISC_PLTOFF14DR:
1556 case R_PARISC_PLTOFF16DF:
1557 case R_PARISC_DIR14DR:
1558 case R_PARISC_DIR16DF:
1559 case R_PARISC_LTOFF16DF:
1560 return (insn & ~0x3ff1) | (((sym_value & 0x2000) >> 13)
1561 | ((sym_value & 0x1ff8) << 1));
1563 /* Floating point single word load/store instructions. */
1564 case R_PARISC_DLTREL14WR:
1565 case R_PARISC_DLTIND14WR:
1566 case R_PARISC_LTOFF_FPTR14WR:
1567 case R_PARISC_LTOFF_FPTR16WF:
1568 case R_PARISC_PCREL14WR:
1569 case R_PARISC_PCREL16WF:
1570 case R_PARISC_LTOFF_TP14WR:
1571 case R_PARISC_LTOFF_TP16WF:
1572 case R_PARISC_DPREL14WR:
1573 case R_PARISC_GPREL16WF:
1574 case R_PARISC_PLTOFF14WR:
1575 case R_PARISC_PLTOFF16WF:
1576 case R_PARISC_DIR16WF:
1577 case R_PARISC_DIR14WR:
1578 case R_PARISC_LTOFF16WF:
1579 return (insn & ~0x3ff9) | (((sym_value & 0x2000) >> 13)
1580 | ((sym_value & 0x1ffc) << 1));
1587 /* Compute the value for a relocation (REL) during a final link stage,
1588 then insert the value into the proper location in CONTENTS.
1590 VALUE is a tentative value for the relocation and may be overridden
1591 and modified here based on the specific relocation to be performed.
1593 For example we do conversions for PC-relative branches in this routine
1594 or redirection of calls to external routines to stubs.
1596 The work of actually applying the relocation is left to a helper
1597 routine in an attempt to reduce the complexity and size of this
1600 static bfd_reloc_status_type
1601 elf_hppa_final_link_relocate (Elf_Internal_Rela *rel,
1604 asection *input_section,
1607 struct bfd_link_info *info,
1609 struct elf_link_hash_entry *h,
1610 struct elf64_hppa_dyn_hash_entry *dyn_h)
1613 bfd_vma max_branch_offset = 0;
1614 bfd_vma offset = rel->r_offset;
1615 bfd_signed_vma addend = rel->r_addend;
1616 reloc_howto_type *howto = elf_hppa_howto_table + ELF_R_TYPE (rel->r_info);
1617 unsigned int r_type = howto->type;
1618 bfd_byte *hit_data = contents + offset;
1619 struct elf64_hppa_link_hash_table *hppa_info = elf64_hppa_hash_table (info);
1621 insn = bfd_get_32 (input_bfd, hit_data);
1628 /* Basic function call support.
1630 Note for a call to a function defined in another dynamic library
1631 we want to redirect the call to a stub. */
1633 /* PC relative relocs without an implicit offset. */
1634 case R_PARISC_PCREL21L:
1635 case R_PARISC_PCREL14R:
1636 case R_PARISC_PCREL14F:
1637 case R_PARISC_PCREL14WR:
1638 case R_PARISC_PCREL14DR:
1639 case R_PARISC_PCREL16F:
1640 case R_PARISC_PCREL16WF:
1641 case R_PARISC_PCREL16DF:
1643 /* If this is a call to a function defined in another dynamic
1644 library, then redirect the call to the local stub for this
1646 if (sym_sec == NULL || sym_sec->output_section == NULL)
1647 value = (dyn_h->stub_offset + hppa_info->stub_sec->output_offset
1648 + hppa_info->stub_sec->output_section->vma);
1650 /* Turn VALUE into a proper PC relative address. */
1651 value -= (offset + input_section->output_offset
1652 + input_section->output_section->vma);
1654 /* Adjust for any field selectors. */
1655 if (r_type == R_PARISC_PCREL21L)
1656 value = hppa_field_adjust (value, -8 + addend, e_lsel);
1657 else if (r_type == R_PARISC_PCREL14F
1658 || r_type == R_PARISC_PCREL16F
1659 || r_type == R_PARISC_PCREL16WF
1660 || r_type == R_PARISC_PCREL16DF)
1661 value = hppa_field_adjust (value, -8 + addend, e_fsel);
1663 value = hppa_field_adjust (value, -8 + addend, e_rsel);
1665 /* Apply the relocation to the given instruction. */
1666 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1670 case R_PARISC_PCREL12F:
1671 case R_PARISC_PCREL22F:
1672 case R_PARISC_PCREL17F:
1673 case R_PARISC_PCREL22C:
1674 case R_PARISC_PCREL17C:
1675 case R_PARISC_PCREL17R:
1677 /* If this is a call to a function defined in another dynamic
1678 library, then redirect the call to the local stub for this
1680 if (sym_sec == NULL || sym_sec->output_section == NULL)
1681 value = (dyn_h->stub_offset + hppa_info->stub_sec->output_offset
1682 + hppa_info->stub_sec->output_section->vma);
1684 /* Turn VALUE into a proper PC relative address. */
1685 value -= (offset + input_section->output_offset
1686 + input_section->output_section->vma);
1688 if (r_type == (unsigned int) R_PARISC_PCREL22F)
1689 max_branch_offset = (1 << (22-1)) << 2;
1690 else if (r_type == (unsigned int) R_PARISC_PCREL17F)
1691 max_branch_offset = (1 << (17-1)) << 2;
1692 else if (r_type == (unsigned int) R_PARISC_PCREL12F)
1693 max_branch_offset = (1 << (12-1)) << 2;
1695 /* Make sure we can reach the branch target. */
1696 if (max_branch_offset != 0
1697 && value + addend + max_branch_offset >= 2*max_branch_offset)
1699 (*_bfd_error_handler)
1700 (_("%B(%A+0x%lx): cannot reach %s"),
1704 h->root.root.string);
1705 bfd_set_error (bfd_error_bad_value);
1706 return bfd_reloc_notsupported;
1709 /* Adjust for any field selectors. */
1710 if (r_type == R_PARISC_PCREL17R)
1711 value = hppa_field_adjust (value, -8 + addend, e_rsel);
1713 value = hppa_field_adjust (value, -8 + addend, e_fsel);
1715 /* All branches are implicitly shifted by 2 places. */
1718 /* Apply the relocation to the given instruction. */
1719 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1723 /* Indirect references to data through the DLT. */
1724 case R_PARISC_DLTIND14R:
1725 case R_PARISC_DLTIND14F:
1726 case R_PARISC_DLTIND14DR:
1727 case R_PARISC_DLTIND14WR:
1728 case R_PARISC_DLTIND21L:
1729 case R_PARISC_LTOFF_FPTR14R:
1730 case R_PARISC_LTOFF_FPTR14DR:
1731 case R_PARISC_LTOFF_FPTR14WR:
1732 case R_PARISC_LTOFF_FPTR21L:
1733 case R_PARISC_LTOFF_FPTR16F:
1734 case R_PARISC_LTOFF_FPTR16WF:
1735 case R_PARISC_LTOFF_FPTR16DF:
1736 case R_PARISC_LTOFF_TP21L:
1737 case R_PARISC_LTOFF_TP14R:
1738 case R_PARISC_LTOFF_TP14F:
1739 case R_PARISC_LTOFF_TP14WR:
1740 case R_PARISC_LTOFF_TP14DR:
1741 case R_PARISC_LTOFF_TP16F:
1742 case R_PARISC_LTOFF_TP16WF:
1743 case R_PARISC_LTOFF_TP16DF:
1744 case R_PARISC_LTOFF16F:
1745 case R_PARISC_LTOFF16WF:
1746 case R_PARISC_LTOFF16DF:
1748 /* If this relocation was against a local symbol, then we still
1749 have not set up the DLT entry (it's not convenient to do so
1750 in the "finalize_dlt" routine because it is difficult to get
1751 to the local symbol's value).
1753 So, if this is a local symbol (h == NULL), then we need to
1754 fill in its DLT entry.
1756 Similarly we may still need to set up an entry in .opd for
1757 a local function which had its address taken. */
1758 if (dyn_h->h == NULL)
1760 /* Now do .opd creation if needed. */
1761 if (r_type == R_PARISC_LTOFF_FPTR14R
1762 || r_type == R_PARISC_LTOFF_FPTR14DR
1763 || r_type == R_PARISC_LTOFF_FPTR14WR
1764 || r_type == R_PARISC_LTOFF_FPTR21L
1765 || r_type == R_PARISC_LTOFF_FPTR16F
1766 || r_type == R_PARISC_LTOFF_FPTR16WF
1767 || r_type == R_PARISC_LTOFF_FPTR16DF)
1769 /* The first two words of an .opd entry are zero. */
1770 memset (hppa_info->opd_sec->contents + dyn_h->opd_offset,
1773 /* The next word is the address of the function. */
1774 bfd_put_64 (hppa_info->opd_sec->owner, value + addend,
1775 (hppa_info->opd_sec->contents
1776 + dyn_h->opd_offset + 16));
1778 /* The last word is our local __gp value. */
1779 value = _bfd_get_gp_value
1780 (hppa_info->opd_sec->output_section->owner);
1781 bfd_put_64 (hppa_info->opd_sec->owner, value,
1782 (hppa_info->opd_sec->contents
1783 + dyn_h->opd_offset + 24));
1785 /* The DLT value is the address of the .opd entry. */
1786 value = (dyn_h->opd_offset
1787 + hppa_info->opd_sec->output_offset
1788 + hppa_info->opd_sec->output_section->vma);
1792 bfd_put_64 (hppa_info->dlt_sec->owner,
1794 hppa_info->dlt_sec->contents + dyn_h->dlt_offset);
1797 /* We want the value of the DLT offset for this symbol, not
1798 the symbol's actual address. Note that __gp may not point
1799 to the start of the DLT, so we have to compute the absolute
1800 address, then subtract out the value of __gp. */
1801 value = (dyn_h->dlt_offset
1802 + hppa_info->dlt_sec->output_offset
1803 + hppa_info->dlt_sec->output_section->vma);
1804 value -= _bfd_get_gp_value (output_bfd);
1806 /* All DLTIND relocations are basically the same at this point,
1807 except that we need different field selectors for the 21bit
1808 version vs the 14bit versions. */
1809 if (r_type == R_PARISC_DLTIND21L
1810 || r_type == R_PARISC_LTOFF_FPTR21L
1811 || r_type == R_PARISC_LTOFF_TP21L)
1812 value = hppa_field_adjust (value, 0, e_lsel);
1813 else if (r_type == R_PARISC_DLTIND14F
1814 || r_type == R_PARISC_LTOFF_FPTR16F
1815 || r_type == R_PARISC_LTOFF_FPTR16WF
1816 || r_type == R_PARISC_LTOFF_FPTR16DF
1817 || r_type == R_PARISC_LTOFF16F
1818 || r_type == R_PARISC_LTOFF16DF
1819 || r_type == R_PARISC_LTOFF16WF
1820 || r_type == R_PARISC_LTOFF_TP16F
1821 || r_type == R_PARISC_LTOFF_TP16WF
1822 || r_type == R_PARISC_LTOFF_TP16DF)
1823 value = hppa_field_adjust (value, 0, e_fsel);
1825 value = hppa_field_adjust (value, 0, e_rsel);
1827 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1831 case R_PARISC_DLTREL14R:
1832 case R_PARISC_DLTREL14F:
1833 case R_PARISC_DLTREL14DR:
1834 case R_PARISC_DLTREL14WR:
1835 case R_PARISC_DLTREL21L:
1836 case R_PARISC_DPREL21L:
1837 case R_PARISC_DPREL14WR:
1838 case R_PARISC_DPREL14DR:
1839 case R_PARISC_DPREL14R:
1840 case R_PARISC_DPREL14F:
1841 case R_PARISC_GPREL16F:
1842 case R_PARISC_GPREL16WF:
1843 case R_PARISC_GPREL16DF:
1845 /* Subtract out the global pointer value to make value a DLT
1846 relative address. */
1847 value -= _bfd_get_gp_value (output_bfd);
1849 /* All DLTREL relocations are basically the same at this point,
1850 except that we need different field selectors for the 21bit
1851 version vs the 14bit versions. */
1852 if (r_type == R_PARISC_DLTREL21L
1853 || r_type == R_PARISC_DPREL21L)
1854 value = hppa_field_adjust (value, addend, e_lrsel);
1855 else if (r_type == R_PARISC_DLTREL14F
1856 || r_type == R_PARISC_DPREL14F
1857 || r_type == R_PARISC_GPREL16F
1858 || r_type == R_PARISC_GPREL16WF
1859 || r_type == R_PARISC_GPREL16DF)
1860 value = hppa_field_adjust (value, addend, e_fsel);
1862 value = hppa_field_adjust (value, addend, e_rrsel);
1864 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1868 case R_PARISC_DIR21L:
1869 case R_PARISC_DIR17R:
1870 case R_PARISC_DIR17F:
1871 case R_PARISC_DIR14R:
1872 case R_PARISC_DIR14F:
1873 case R_PARISC_DIR14WR:
1874 case R_PARISC_DIR14DR:
1875 case R_PARISC_DIR16F:
1876 case R_PARISC_DIR16WF:
1877 case R_PARISC_DIR16DF:
1879 /* All DIR relocations are basically the same at this point,
1880 except that branch offsets need to be divided by four, and
1881 we need different field selectors. Note that we don't
1882 redirect absolute calls to local stubs. */
1884 if (r_type == R_PARISC_DIR21L)
1885 value = hppa_field_adjust (value, addend, e_lrsel);
1886 else if (r_type == R_PARISC_DIR17F
1887 || r_type == R_PARISC_DIR16F
1888 || r_type == R_PARISC_DIR16WF
1889 || r_type == R_PARISC_DIR16DF
1890 || r_type == R_PARISC_DIR14F)
1891 value = hppa_field_adjust (value, addend, e_fsel);
1893 value = hppa_field_adjust (value, addend, e_rrsel);
1895 if (r_type == R_PARISC_DIR17R || r_type == R_PARISC_DIR17F)
1896 /* All branches are implicitly shifted by 2 places. */
1899 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1903 case R_PARISC_PLTOFF21L:
1904 case R_PARISC_PLTOFF14R:
1905 case R_PARISC_PLTOFF14F:
1906 case R_PARISC_PLTOFF14WR:
1907 case R_PARISC_PLTOFF14DR:
1908 case R_PARISC_PLTOFF16F:
1909 case R_PARISC_PLTOFF16WF:
1910 case R_PARISC_PLTOFF16DF:
1912 /* We want the value of the PLT offset for this symbol, not
1913 the symbol's actual address. Note that __gp may not point
1914 to the start of the DLT, so we have to compute the absolute
1915 address, then subtract out the value of __gp. */
1916 value = (dyn_h->plt_offset
1917 + hppa_info->plt_sec->output_offset
1918 + hppa_info->plt_sec->output_section->vma);
1919 value -= _bfd_get_gp_value (output_bfd);
1921 /* All PLTOFF relocations are basically the same at this point,
1922 except that we need different field selectors for the 21bit
1923 version vs the 14bit versions. */
1924 if (r_type == R_PARISC_PLTOFF21L)
1925 value = hppa_field_adjust (value, addend, e_lrsel);
1926 else if (r_type == R_PARISC_PLTOFF14F
1927 || r_type == R_PARISC_PLTOFF16F
1928 || r_type == R_PARISC_PLTOFF16WF
1929 || r_type == R_PARISC_PLTOFF16DF)
1930 value = hppa_field_adjust (value, addend, e_fsel);
1932 value = hppa_field_adjust (value, addend, e_rrsel);
1934 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1938 case R_PARISC_LTOFF_FPTR32:
1940 /* We may still need to create the FPTR itself if it was for
1942 if (dyn_h->h == NULL)
1944 /* The first two words of an .opd entry are zero. */
1945 memset (hppa_info->opd_sec->contents + dyn_h->opd_offset, 0, 16);
1947 /* The next word is the address of the function. */
1948 bfd_put_64 (hppa_info->opd_sec->owner, value + addend,
1949 (hppa_info->opd_sec->contents
1950 + dyn_h->opd_offset + 16));
1952 /* The last word is our local __gp value. */
1953 value = _bfd_get_gp_value
1954 (hppa_info->opd_sec->output_section->owner);
1955 bfd_put_64 (hppa_info->opd_sec->owner, value,
1956 hppa_info->opd_sec->contents + dyn_h->opd_offset + 24);
1958 /* The DLT value is the address of the .opd entry. */
1959 value = (dyn_h->opd_offset
1960 + hppa_info->opd_sec->output_offset
1961 + hppa_info->opd_sec->output_section->vma);
1963 bfd_put_64 (hppa_info->dlt_sec->owner,
1965 hppa_info->dlt_sec->contents + dyn_h->dlt_offset);
1968 /* We want the value of the DLT offset for this symbol, not
1969 the symbol's actual address. Note that __gp may not point
1970 to the start of the DLT, so we have to compute the absolute
1971 address, then subtract out the value of __gp. */
1972 value = (dyn_h->dlt_offset
1973 + hppa_info->dlt_sec->output_offset
1974 + hppa_info->dlt_sec->output_section->vma);
1975 value -= _bfd_get_gp_value (output_bfd);
1976 bfd_put_32 (input_bfd, value, hit_data);
1977 return bfd_reloc_ok;
1980 case R_PARISC_LTOFF_FPTR64:
1981 case R_PARISC_LTOFF_TP64:
1983 /* We may still need to create the FPTR itself if it was for
1985 if (dyn_h->h == NULL && r_type == R_PARISC_LTOFF_FPTR64)
1987 /* The first two words of an .opd entry are zero. */
1988 memset (hppa_info->opd_sec->contents + dyn_h->opd_offset, 0, 16);
1990 /* The next word is the address of the function. */
1991 bfd_put_64 (hppa_info->opd_sec->owner, value + addend,
1992 (hppa_info->opd_sec->contents
1993 + dyn_h->opd_offset + 16));
1995 /* The last word is our local __gp value. */
1996 value = _bfd_get_gp_value
1997 (hppa_info->opd_sec->output_section->owner);
1998 bfd_put_64 (hppa_info->opd_sec->owner, value,
1999 hppa_info->opd_sec->contents + dyn_h->opd_offset + 24);
2001 /* The DLT value is the address of the .opd entry. */
2002 value = (dyn_h->opd_offset
2003 + hppa_info->opd_sec->output_offset
2004 + hppa_info->opd_sec->output_section->vma);
2006 bfd_put_64 (hppa_info->dlt_sec->owner,
2008 hppa_info->dlt_sec->contents + dyn_h->dlt_offset);
2011 /* We want the value of the DLT offset for this symbol, not
2012 the symbol's actual address. Note that __gp may not point
2013 to the start of the DLT, so we have to compute the absolute
2014 address, then subtract out the value of __gp. */
2015 value = (dyn_h->dlt_offset
2016 + hppa_info->dlt_sec->output_offset
2017 + hppa_info->dlt_sec->output_section->vma);
2018 value -= _bfd_get_gp_value (output_bfd);
2019 bfd_put_64 (input_bfd, value, hit_data);
2020 return bfd_reloc_ok;
2023 case R_PARISC_DIR32:
2024 bfd_put_32 (input_bfd, value + addend, hit_data);
2025 return bfd_reloc_ok;
2027 case R_PARISC_DIR64:
2028 bfd_put_64 (input_bfd, value + addend, hit_data);
2029 return bfd_reloc_ok;
2031 case R_PARISC_GPREL64:
2032 /* Subtract out the global pointer value to make value a DLT
2033 relative address. */
2034 value -= _bfd_get_gp_value (output_bfd);
2036 bfd_put_64 (input_bfd, value + addend, hit_data);
2037 return bfd_reloc_ok;
2039 case R_PARISC_LTOFF64:
2040 /* We want the value of the DLT offset for this symbol, not
2041 the symbol's actual address. Note that __gp may not point
2042 to the start of the DLT, so we have to compute the absolute
2043 address, then subtract out the value of __gp. */
2044 value = (dyn_h->dlt_offset
2045 + hppa_info->dlt_sec->output_offset
2046 + hppa_info->dlt_sec->output_section->vma);
2047 value -= _bfd_get_gp_value (output_bfd);
2049 bfd_put_64 (input_bfd, value + addend, hit_data);
2050 return bfd_reloc_ok;
2052 case R_PARISC_PCREL32:
2054 /* If this is a call to a function defined in another dynamic
2055 library, then redirect the call to the local stub for this
2057 if (sym_sec == NULL || sym_sec->output_section == NULL)
2058 value = (dyn_h->stub_offset + hppa_info->stub_sec->output_offset
2059 + hppa_info->stub_sec->output_section->vma);
2061 /* Turn VALUE into a proper PC relative address. */
2062 value -= (offset + input_section->output_offset
2063 + input_section->output_section->vma);
2067 bfd_put_32 (input_bfd, value, hit_data);
2068 return bfd_reloc_ok;
2071 case R_PARISC_PCREL64:
2073 /* If this is a call to a function defined in another dynamic
2074 library, then redirect the call to the local stub for this
2076 if (sym_sec == NULL || sym_sec->output_section == NULL)
2077 value = (dyn_h->stub_offset + hppa_info->stub_sec->output_offset
2078 + hppa_info->stub_sec->output_section->vma);
2080 /* Turn VALUE into a proper PC relative address. */
2081 value -= (offset + input_section->output_offset
2082 + input_section->output_section->vma);
2086 bfd_put_64 (input_bfd, value, hit_data);
2087 return bfd_reloc_ok;
2090 case R_PARISC_FPTR64:
2092 /* We may still need to create the FPTR itself if it was for
2094 if (dyn_h->h == NULL)
2096 /* The first two words of an .opd entry are zero. */
2097 memset (hppa_info->opd_sec->contents + dyn_h->opd_offset, 0, 16);
2099 /* The next word is the address of the function. */
2100 bfd_put_64 (hppa_info->opd_sec->owner, value + addend,
2101 (hppa_info->opd_sec->contents
2102 + dyn_h->opd_offset + 16));
2104 /* The last word is our local __gp value. */
2105 value = _bfd_get_gp_value
2106 (hppa_info->opd_sec->output_section->owner);
2107 bfd_put_64 (hppa_info->opd_sec->owner, value,
2108 hppa_info->opd_sec->contents + dyn_h->opd_offset + 24);
2111 if (dyn_h->want_opd)
2112 /* We want the value of the OPD offset for this symbol. */
2113 value = (dyn_h->opd_offset
2114 + hppa_info->opd_sec->output_offset
2115 + hppa_info->opd_sec->output_section->vma);
2117 /* We want the address of the symbol. */
2120 bfd_put_64 (input_bfd, value, hit_data);
2121 return bfd_reloc_ok;
2124 case R_PARISC_SECREL32:
2125 bfd_put_32 (input_bfd,
2126 value + addend - sym_sec->output_section->vma,
2128 return bfd_reloc_ok;
2130 case R_PARISC_SEGREL32:
2131 case R_PARISC_SEGREL64:
2133 /* If this is the first SEGREL relocation, then initialize
2134 the segment base values. */
2135 if (hppa_info->text_segment_base == (bfd_vma) -1)
2136 bfd_map_over_sections (output_bfd, elf_hppa_record_segment_addrs,
2139 /* VALUE holds the absolute address. We want to include the
2140 addend, then turn it into a segment relative address.
2142 The segment is derived from SYM_SEC. We assume that there are
2143 only two segments of note in the resulting executable/shlib.
2144 A readonly segment (.text) and a readwrite segment (.data). */
2147 if (sym_sec->flags & SEC_CODE)
2148 value -= hppa_info->text_segment_base;
2150 value -= hppa_info->data_segment_base;
2152 if (r_type == R_PARISC_SEGREL32)
2153 bfd_put_32 (input_bfd, value, hit_data);
2155 bfd_put_64 (input_bfd, value, hit_data);
2156 return bfd_reloc_ok;
2159 /* Something we don't know how to handle. */
2161 return bfd_reloc_notsupported;
2164 /* Update the instruction word. */
2165 bfd_put_32 (input_bfd, (bfd_vma) insn, hit_data);
2166 return bfd_reloc_ok;
2169 /* Relocate an HPPA ELF section. */
2172 elf_hppa_relocate_section (bfd *output_bfd,
2173 struct bfd_link_info *info,
2175 asection *input_section,
2177 Elf_Internal_Rela *relocs,
2178 Elf_Internal_Sym *local_syms,
2179 asection **local_sections)
2181 Elf_Internal_Shdr *symtab_hdr;
2182 Elf_Internal_Rela *rel;
2183 Elf_Internal_Rela *relend;
2184 struct elf64_hppa_link_hash_table *hppa_info;
2186 hppa_info = elf64_hppa_hash_table (info);
2187 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
2190 relend = relocs + input_section->reloc_count;
2191 for (; rel < relend; rel++)
2194 reloc_howto_type *howto = elf_hppa_howto_table + ELF_R_TYPE (rel->r_info);
2195 unsigned long r_symndx;
2196 struct elf_link_hash_entry *h;
2197 Elf_Internal_Sym *sym;
2200 bfd_reloc_status_type r;
2201 const char *dyn_name;
2202 char *dynh_buf = NULL;
2203 size_t dynh_buflen = 0;
2204 struct elf64_hppa_dyn_hash_entry *dyn_h = NULL;
2206 r_type = ELF_R_TYPE (rel->r_info);
2207 if (r_type < 0 || r_type >= (int) R_PARISC_UNIMPLEMENTED)
2209 bfd_set_error (bfd_error_bad_value);
2213 /* This is a final link. */
2214 r_symndx = ELF_R_SYM (rel->r_info);
2218 if (r_symndx < symtab_hdr->sh_info)
2220 /* This is a local symbol. */
2221 sym = local_syms + r_symndx;
2222 sym_sec = local_sections[r_symndx];
2223 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sym_sec, rel);
2225 /* If this symbol has an entry in the PA64 dynamic hash
2226 table, then get it. */
2227 dyn_name = get_dyn_name (input_bfd, h, rel,
2228 &dynh_buf, &dynh_buflen);
2229 dyn_h = elf64_hppa_dyn_hash_lookup (&hppa_info->dyn_hash_table,
2230 dyn_name, FALSE, FALSE);
2235 /* This is not a local symbol. */
2239 indx = r_symndx - symtab_hdr->sh_info;
2240 h = elf_sym_hashes (input_bfd)[indx];
2241 while (h->root.type == bfd_link_hash_indirect
2242 || h->root.type == bfd_link_hash_warning)
2243 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2244 if (h->root.type == bfd_link_hash_defined
2245 || h->root.type == bfd_link_hash_defweak)
2247 sym_sec = h->root.u.def.section;
2249 /* If this symbol has an entry in the PA64 dynamic hash
2250 table, then get it. */
2251 dyn_name = get_dyn_name (input_bfd, h, rel,
2252 &dynh_buf, &dynh_buflen);
2253 dyn_h = elf64_hppa_dyn_hash_lookup (&hppa_info->dyn_hash_table,
2254 dyn_name, FALSE, FALSE);
2256 /* If we have a relocation against a symbol defined in a
2257 shared library and we have not created an entry in the
2258 PA64 dynamic symbol hash table for it, then we lose. */
2259 if (!info->relocatable
2260 && sym_sec->output_section == NULL && dyn_h == NULL)
2262 (*_bfd_error_handler)
2263 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
2266 (long) rel->r_offset,
2268 h->root.root.string);
2270 else if (sym_sec->output_section)
2271 relocation = (h->root.u.def.value
2272 + sym_sec->output_offset
2273 + sym_sec->output_section->vma);
2275 else if (info->unresolved_syms_in_objects == RM_IGNORE
2276 && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
2278 /* If this symbol has an entry in the PA64 dynamic hash
2279 table, then get it. */
2280 dyn_name = get_dyn_name (input_bfd, h, rel,
2281 &dynh_buf, &dynh_buflen);
2282 dyn_h = elf64_hppa_dyn_hash_lookup (&hppa_info->dyn_hash_table,
2283 dyn_name, FALSE, FALSE);
2285 if (!info->relocatable && dyn_h == NULL)
2287 (*_bfd_error_handler)
2288 (_("%B(%A): warning: unresolvable relocation against symbol `%s'"),
2289 input_bfd, input_section, h->root.root.string);
2292 else if (h->root.type == bfd_link_hash_undefweak)
2294 dyn_name = get_dyn_name (input_bfd, h, rel,
2295 &dynh_buf, &dynh_buflen);
2296 dyn_h = elf64_hppa_dyn_hash_lookup (&hppa_info->dyn_hash_table,
2297 dyn_name, FALSE, FALSE);
2299 if (!info->relocatable && dyn_h == NULL)
2301 (*_bfd_error_handler)
2302 (_("%B(%A): warning: unresolvable relocation against symbol `%s'"),
2303 input_bfd, input_section, h->root.root.string);
2306 else if (!info->relocatable)
2308 /* Ignore dynamic loader defined symbols. */
2309 if (!elf_hppa_is_dynamic_loader_symbol (h->root.root.string))
2311 if (!((*info->callbacks->undefined_symbol)
2312 (info, h->root.root.string, input_bfd,
2313 input_section, rel->r_offset,
2314 (info->unresolved_syms_in_objects == RM_GENERATE_ERROR
2315 || ELF_ST_VISIBILITY (h->other)))))
2322 if (sym_sec != NULL && elf_discarded_section (sym_sec))
2324 /* For relocs against symbols from removed linkonce sections,
2325 or sections discarded by a linker script, we just want the
2326 section contents zeroed. Avoid any special processing. */
2327 _bfd_clear_contents (howto, input_bfd, contents + rel->r_offset);
2333 if (info->relocatable)
2336 r = elf_hppa_final_link_relocate (rel, input_bfd, output_bfd,
2337 input_section, contents,
2338 relocation, info, sym_sec,
2341 if (r != bfd_reloc_ok)
2347 case bfd_reloc_overflow:
2349 const char *sym_name;
2355 sym_name = bfd_elf_string_from_elf_section (input_bfd,
2356 symtab_hdr->sh_link,
2358 if (sym_name == NULL)
2360 if (*sym_name == '\0')
2361 sym_name = bfd_section_name (input_bfd, sym_sec);
2364 if (!((*info->callbacks->reloc_overflow)
2365 (info, (h ? &h->root : NULL), sym_name,
2366 howto->name, (bfd_vma) 0, input_bfd,
2367 input_section, rel->r_offset)))
2377 #endif /* ARCH_SIZE == 64 */