1 /* Common code for PA ELF implementations.
2 Copyright 1999, 2000, 2001, 2002, 2003, 2004
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 2 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
21 #define ELF_HOWTO_TABLE_SIZE R_PARISC_UNIMPLEMENTED + 1
23 /* This file is included by multiple PA ELF BFD backends with different
26 Most of the routines are written to be size independent, but sometimes
27 external constraints require 32 or 64 bit specific code. We remap
28 the definitions/functions as necessary here. */
30 #define ELF_R_TYPE(X) ELF64_R_TYPE(X)
31 #define ELF_R_SYM(X) ELF64_R_SYM(X)
32 #define elf_hppa_reloc_final_type elf64_hppa_reloc_final_type
33 #define _bfd_elf_hppa_gen_reloc_type _bfd_elf64_hppa_gen_reloc_type
34 #define elf_hppa_relocate_section elf64_hppa_relocate_section
35 #define elf_hppa_final_link elf64_hppa_final_link
38 #define ELF_R_TYPE(X) ELF32_R_TYPE(X)
39 #define ELF_R_SYM(X) ELF32_R_SYM(X)
40 #define elf_hppa_reloc_final_type elf32_hppa_reloc_final_type
41 #define _bfd_elf_hppa_gen_reloc_type _bfd_elf32_hppa_gen_reloc_type
42 #define elf_hppa_relocate_section elf32_hppa_relocate_section
43 #define elf_hppa_final_link elf32_hppa_final_link
47 static bfd_reloc_status_type elf_hppa_final_link_relocate
48 (Elf_Internal_Rela *, bfd *, bfd *, asection *, bfd_byte *, bfd_vma,
49 struct bfd_link_info *, asection *, struct elf_link_hash_entry *,
50 struct elf64_hppa_dyn_hash_entry *);
52 static int elf_hppa_relocate_insn
53 (int, int, unsigned int);
56 /* ELF/PA relocation howto entries. */
58 static reloc_howto_type elf_hppa_howto_table[ELF_HOWTO_TABLE_SIZE] =
60 { R_PARISC_NONE, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
61 bfd_elf_generic_reloc, "R_PARISC_NONE", FALSE, 0, 0, FALSE },
63 /* The values in DIR32 are to placate the check in
64 _bfd_stab_section_find_nearest_line. */
65 { R_PARISC_DIR32, 0, 2, 32, FALSE, 0, complain_overflow_bitfield,
66 bfd_elf_generic_reloc, "R_PARISC_DIR32", FALSE, 0, 0xffffffff, FALSE },
67 { R_PARISC_DIR21L, 0, 0, 21, FALSE, 0, complain_overflow_bitfield,
68 bfd_elf_generic_reloc, "R_PARISC_DIR21L", FALSE, 0, 0, FALSE },
69 { R_PARISC_DIR17R, 0, 0, 17, FALSE, 0, complain_overflow_bitfield,
70 bfd_elf_generic_reloc, "R_PARISC_DIR17R", FALSE, 0, 0, FALSE },
71 { R_PARISC_DIR17F, 0, 0, 17, FALSE, 0, complain_overflow_bitfield,
72 bfd_elf_generic_reloc, "R_PARISC_DIR17F", FALSE, 0, 0, FALSE },
73 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
74 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
75 { R_PARISC_DIR14R, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
76 bfd_elf_generic_reloc, "R_PARISC_DIR14R", FALSE, 0, 0, FALSE },
77 { R_PARISC_DIR14F, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
78 bfd_elf_generic_reloc, "R_PARISC_DIR14F", FALSE, 0, 0, FALSE },
80 { R_PARISC_PCREL12F, 0, 0, 12, TRUE, 0, complain_overflow_bitfield,
81 bfd_elf_generic_reloc, "R_PARISC_PCREL12F", FALSE, 0, 0, FALSE },
82 { R_PARISC_PCREL32, 0, 0, 32, TRUE, 0, complain_overflow_bitfield,
83 bfd_elf_generic_reloc, "R_PARISC_PCREL32", FALSE, 0, 0, FALSE },
84 { R_PARISC_PCREL21L, 0, 0, 21, TRUE, 0, complain_overflow_bitfield,
85 bfd_elf_generic_reloc, "R_PARISC_PCREL21L", FALSE, 0, 0, FALSE },
86 { R_PARISC_PCREL17R, 0, 0, 17, TRUE, 0, complain_overflow_bitfield,
87 bfd_elf_generic_reloc, "R_PARISC_PCREL17R", FALSE, 0, 0, FALSE },
88 { R_PARISC_PCREL17F, 0, 0, 17, TRUE, 0, complain_overflow_bitfield,
89 bfd_elf_generic_reloc, "R_PARISC_PCREL17F", FALSE, 0, 0, FALSE },
90 { R_PARISC_PCREL17C, 0, 0, 17, TRUE, 0, complain_overflow_bitfield,
91 bfd_elf_generic_reloc, "R_PARISC_PCREL17C", FALSE, 0, 0, FALSE },
92 { R_PARISC_PCREL14R, 0, 0, 14, TRUE, 0, complain_overflow_bitfield,
93 bfd_elf_generic_reloc, "R_PARISC_PCREL14R", FALSE, 0, 0, FALSE },
94 { R_PARISC_PCREL14F, 0, 0, 14, TRUE, 0, complain_overflow_bitfield,
95 bfd_elf_generic_reloc, "R_PARISC_PCREL14F", FALSE, 0, 0, FALSE },
97 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
98 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
99 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
100 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
101 { R_PARISC_DPREL21L, 0, 0, 21, FALSE, 0, complain_overflow_bitfield,
102 bfd_elf_generic_reloc, "R_PARISC_DPREL21L", FALSE, 0, 0, FALSE },
103 { R_PARISC_DPREL14WR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
104 bfd_elf_generic_reloc, "R_PARISC_DPREL14WR", FALSE, 0, 0, FALSE },
105 { R_PARISC_DPREL14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
106 bfd_elf_generic_reloc, "R_PARISC_DPREL14DR", 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_DPREL14R, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
110 bfd_elf_generic_reloc, "R_PARISC_DPREL14R", FALSE, 0, 0, FALSE },
111 { R_PARISC_DPREL14F, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
112 bfd_elf_generic_reloc, "R_PARISC_DPREL14F", FALSE, 0, 0, FALSE },
114 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
115 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
116 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
117 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
118 { R_PARISC_DLTREL21L, 0, 0, 21, FALSE, 0, complain_overflow_bitfield,
119 bfd_elf_generic_reloc, "R_PARISC_DLTREL21L", FALSE, 0, 0, FALSE },
120 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
121 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", 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_DLTREL14R, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
127 bfd_elf_generic_reloc, "R_PARISC_DLTREL14R", FALSE, 0, 0, FALSE },
128 { R_PARISC_DLTREL14F, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
129 bfd_elf_generic_reloc, "R_PARISC_DLTREL14F", FALSE, 0, 0, FALSE },
131 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
132 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
133 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
134 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
135 { R_PARISC_DLTIND21L, 0, 0, 21, FALSE, 0, complain_overflow_bitfield,
136 bfd_elf_generic_reloc, "R_PARISC_DLTIND21L", FALSE, 0, 0, FALSE },
137 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
138 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
139 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
140 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
141 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
142 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
143 { R_PARISC_DLTIND14R, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
144 bfd_elf_generic_reloc, "R_PARISC_DLTIND14R", FALSE, 0, 0, FALSE },
145 { R_PARISC_DLTIND14F, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
146 bfd_elf_generic_reloc, "R_PARISC_DLTIND14F", FALSE, 0, 0, FALSE },
148 { R_PARISC_SETBASE, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
149 bfd_elf_generic_reloc, "R_PARISC_SETBASE", FALSE, 0, 0, FALSE },
150 { R_PARISC_SECREL32, 0, 0, 32, FALSE, 0, complain_overflow_bitfield,
151 bfd_elf_generic_reloc, "R_PARISC_SECREL32", FALSE, 0, 0, FALSE },
152 { R_PARISC_BASEREL21L, 0, 0, 21, FALSE, 0, complain_overflow_bitfield,
153 bfd_elf_generic_reloc, "R_PARISC_BASEREL21L", FALSE, 0, 0, FALSE },
154 { R_PARISC_BASEREL17R, 0, 0, 17, FALSE, 0, complain_overflow_bitfield,
155 bfd_elf_generic_reloc, "R_PARISC_BASEREL17R", FALSE, 0, 0, FALSE },
156 { R_PARISC_BASEREL17F, 0, 0, 17, FALSE, 0, complain_overflow_bitfield,
157 bfd_elf_generic_reloc, "R_PARISC_BASEREL17F", FALSE, 0, 0, FALSE },
158 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
159 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
160 { R_PARISC_BASEREL14R, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
161 bfd_elf_generic_reloc, "R_PARISC_BASEREL14R", FALSE, 0, 0, FALSE },
162 { R_PARISC_BASEREL14F, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
163 bfd_elf_generic_reloc, "R_PARISC_BASEREL14F", FALSE, 0, 0, FALSE },
165 { R_PARISC_SEGBASE, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
166 bfd_elf_generic_reloc, "R_PARISC_SEGBASE", FALSE, 0, 0, FALSE },
167 { R_PARISC_SEGREL32, 0, 0, 32, FALSE, 0, complain_overflow_bitfield,
168 bfd_elf_generic_reloc, "R_PARISC_SEGREL32", FALSE, 0, 0, FALSE },
169 { R_PARISC_PLTOFF21L, 0, 0, 21, FALSE, 0, complain_overflow_bitfield,
170 bfd_elf_generic_reloc, "R_PARISC_PLTOFF21L", FALSE, 0, 0, FALSE },
171 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
172 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", 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_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
176 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
177 { R_PARISC_PLTOFF14R, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
178 bfd_elf_generic_reloc, "R_PARISC_PLTOFF14R", FALSE, 0, 0, FALSE },
179 { R_PARISC_PLTOFF14F, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
180 bfd_elf_generic_reloc, "R_PARISC_PLTOFF14F", FALSE, 0, 0, FALSE },
182 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
183 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
184 { R_PARISC_LTOFF_FPTR32, 0, 0, 32, FALSE, 0, complain_overflow_bitfield,
185 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR32", FALSE, 0, 0, FALSE },
186 { R_PARISC_LTOFF_FPTR21L, 0, 0, 21, FALSE, 0, complain_overflow_bitfield,
187 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR21L", FALSE, 0, 0, FALSE },
188 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
189 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
190 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
191 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
192 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
193 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
194 { R_PARISC_LTOFF_FPTR14R, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
195 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR14R", 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 },
199 { R_PARISC_FPTR64, 0, 0, 64, FALSE, 0, complain_overflow_bitfield,
200 bfd_elf_generic_reloc, "R_PARISC_FPTR64", FALSE, 0, 0, FALSE },
201 { R_PARISC_PLABEL32, 0, 0, 32, FALSE, 0, complain_overflow_bitfield,
202 bfd_elf_generic_reloc, "R_PARISC_PLABEL32", FALSE, 0, 0, FALSE },
203 { R_PARISC_PLABEL21L, 0, 0, 21, FALSE, 0, complain_overflow_bitfield,
204 bfd_elf_generic_reloc, "R_PARISC_PLABEL21L", FALSE, 0, 0, FALSE },
205 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
206 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
207 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
208 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
209 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
210 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
211 { R_PARISC_PLABEL14R, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
212 bfd_elf_generic_reloc, "R_PARISC_PLABEL14R", FALSE, 0, 0, FALSE },
213 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
214 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
216 { R_PARISC_PCREL64, 0, 0, 64, FALSE, 0, complain_overflow_bitfield,
217 bfd_elf_generic_reloc, "R_PARISC_PCREL64", FALSE, 0, 0, FALSE },
218 { R_PARISC_PCREL22C, 0, 0, 22, FALSE, 0, complain_overflow_bitfield,
219 bfd_elf_generic_reloc, "R_PARISC_PCREL22C", FALSE, 0, 0, FALSE },
220 { R_PARISC_PCREL22F, 0, 0, 22, FALSE, 0, complain_overflow_bitfield,
221 bfd_elf_generic_reloc, "R_PARISC_PCREL22F", FALSE, 0, 0, FALSE },
222 { R_PARISC_PCREL14WR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
223 bfd_elf_generic_reloc, "R_PARISC_PCREL14WR", FALSE, 0, 0, FALSE },
224 { R_PARISC_PCREL14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
225 bfd_elf_generic_reloc, "R_PARISC_PCREL14DR", FALSE, 0, 0, FALSE },
226 { R_PARISC_PCREL16F, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
227 bfd_elf_generic_reloc, "R_PARISC_PCREL16F", FALSE, 0, 0, FALSE },
228 { R_PARISC_PCREL16WF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
229 bfd_elf_generic_reloc, "R_PARISC_PCREL16WF", FALSE, 0, 0, FALSE },
230 { R_PARISC_PCREL16DF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
231 bfd_elf_generic_reloc, "R_PARISC_PCREL16DF", FALSE, 0, 0, FALSE },
233 { R_PARISC_DIR64, 0, 0, 64, FALSE, 0, complain_overflow_bitfield,
234 bfd_elf_generic_reloc, "R_PARISC_DIR64", FALSE, 0, 0, FALSE },
235 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
236 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
237 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
238 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
239 { R_PARISC_DIR14WR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
240 bfd_elf_generic_reloc, "R_PARISC_DIR14WR", FALSE, 0, 0, FALSE },
241 { R_PARISC_DIR14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
242 bfd_elf_generic_reloc, "R_PARISC_DIR14DR", FALSE, 0, 0, FALSE },
243 { R_PARISC_DIR16F, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
244 bfd_elf_generic_reloc, "R_PARISC_DIR16F", FALSE, 0, 0, FALSE },
245 { R_PARISC_DIR16WF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
246 bfd_elf_generic_reloc, "R_PARISC_DIR16WF", FALSE, 0, 0, FALSE },
247 { R_PARISC_DIR16DF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
248 bfd_elf_generic_reloc, "R_PARISC_DIR16DF", FALSE, 0, 0, FALSE },
250 { R_PARISC_GPREL64, 0, 0, 64, FALSE, 0, complain_overflow_bitfield,
251 bfd_elf_generic_reloc, "R_PARISC_GPREL64", FALSE, 0, 0, FALSE },
252 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
253 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
254 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
255 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
256 { R_PARISC_DLTREL14WR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
257 bfd_elf_generic_reloc, "R_PARISC_DLTREL14WR", FALSE, 0, 0, FALSE },
258 { R_PARISC_DLTREL14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
259 bfd_elf_generic_reloc, "R_PARISC_DLTREL14DR", FALSE, 0, 0, FALSE },
260 { R_PARISC_GPREL16F, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
261 bfd_elf_generic_reloc, "R_PARISC_GPREL16F", FALSE, 0, 0, FALSE },
262 { R_PARISC_GPREL16WF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
263 bfd_elf_generic_reloc, "R_PARISC_GPREL16WF", FALSE, 0, 0, FALSE },
264 { R_PARISC_GPREL16DF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
265 bfd_elf_generic_reloc, "R_PARISC_GPREL16DF", FALSE, 0, 0, FALSE },
267 { R_PARISC_LTOFF64, 0, 0, 64, FALSE, 0, complain_overflow_bitfield,
268 bfd_elf_generic_reloc, "R_PARISC_LTOFF64", FALSE, 0, 0, FALSE },
269 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
270 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
271 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
272 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
273 { R_PARISC_DLTIND14WR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
274 bfd_elf_generic_reloc, "R_PARISC_DLTIND14WR", FALSE, 0, 0, FALSE },
275 { R_PARISC_DLTIND14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
276 bfd_elf_generic_reloc, "R_PARISC_DLTIND14DR", FALSE, 0, 0, FALSE },
277 { R_PARISC_LTOFF16F, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
278 bfd_elf_generic_reloc, "R_PARISC_LTOFF16F", FALSE, 0, 0, FALSE },
279 { R_PARISC_LTOFF16WF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
280 bfd_elf_generic_reloc, "R_PARISC_LTOFF16DF", FALSE, 0, 0, FALSE },
281 { R_PARISC_LTOFF16DF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
282 bfd_elf_generic_reloc, "R_PARISC_LTOFF16DF", FALSE, 0, 0, FALSE },
284 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
285 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
286 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
287 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
288 { R_PARISC_BASEREL14WR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
289 bfd_elf_generic_reloc, "R_PARISC_BASEREL14WR", FALSE, 0, 0, FALSE },
290 { R_PARISC_BASEREL14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
291 bfd_elf_generic_reloc, "R_PARISC_BASEREL14DR", FALSE, 0, 0, FALSE },
292 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
293 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", 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_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
299 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
301 { R_PARISC_SEGREL64, 0, 0, 64, FALSE, 0, complain_overflow_bitfield,
302 bfd_elf_generic_reloc, "R_PARISC_SEGREL64", FALSE, 0, 0, FALSE },
303 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
304 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
305 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
306 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
307 { R_PARISC_PLTOFF14WR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
308 bfd_elf_generic_reloc, "R_PARISC_PLTOFF14WR", FALSE, 0, 0, FALSE },
309 { R_PARISC_PLTOFF14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
310 bfd_elf_generic_reloc, "R_PARISC_PLTOFF14DR", FALSE, 0, 0, FALSE },
311 { R_PARISC_PLTOFF16F, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
312 bfd_elf_generic_reloc, "R_PARISC_PLTOFF16F", FALSE, 0, 0, FALSE },
313 { R_PARISC_PLTOFF16WF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
314 bfd_elf_generic_reloc, "R_PARISC_PLTOFF16WF", FALSE, 0, 0, FALSE },
315 { R_PARISC_PLTOFF16DF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
316 bfd_elf_generic_reloc, "R_PARISC_PLTOFF16DF", FALSE, 0, 0, FALSE },
318 { R_PARISC_LTOFF_FPTR64, 0, 0, 64, FALSE, 0, complain_overflow_bitfield,
319 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
320 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
321 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
322 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
323 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
324 { R_PARISC_LTOFF_FPTR14WR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
325 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR14WR", FALSE, 0, 0, FALSE },
326 { R_PARISC_LTOFF_FPTR14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
327 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR14DR", FALSE, 0, 0, FALSE },
328 { R_PARISC_LTOFF_FPTR16F, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
329 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR16F", FALSE, 0, 0, FALSE },
330 { R_PARISC_LTOFF_FPTR16WF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
331 bfd_elf_generic_reloc, "R_PARISC_LTOFF_FPTR16WF", FALSE, 0, 0, FALSE },
332 { R_PARISC_LTOFF_FPTR16DF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
333 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
335 { R_PARISC_COPY, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
336 bfd_elf_generic_reloc, "R_PARISC_COPY", FALSE, 0, 0, FALSE },
337 { R_PARISC_IPLT, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
338 bfd_elf_generic_reloc, "R_PARISC_IPLT", FALSE, 0, 0, FALSE },
339 { R_PARISC_EPLT, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
340 bfd_elf_generic_reloc, "R_PARISC_EPLT", FALSE, 0, 0, FALSE },
341 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
342 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_bitfield,
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 },
352 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
353 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
354 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
355 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
356 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
357 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
358 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
359 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
360 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
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_bitfield,
367 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
369 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
370 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
371 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
372 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
373 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
374 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
375 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
376 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
377 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
378 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
379 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
380 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
381 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
382 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", 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 },
386 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
387 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
388 { R_PARISC_TPREL32, 0, 0, 32, FALSE, 0, complain_overflow_dont,
389 bfd_elf_generic_reloc, "R_PARISC_TPREL32", FALSE, 0, 0, FALSE },
390 { R_PARISC_TPREL21L, 0, 0, 21, FALSE, 0, complain_overflow_dont,
391 bfd_elf_generic_reloc, "R_PARISC_TPREL21L", FALSE, 0, 0, FALSE },
392 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
393 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_TPREL14R, 0, 0, 14, FALSE, 0, complain_overflow_dont,
399 bfd_elf_generic_reloc, "R_PARISC_TPREL14R", 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 },
403 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
404 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
405 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
406 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
407 { R_PARISC_LTOFF_TP21L, 0, 0, 21, FALSE, 0, complain_overflow_bitfield,
408 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP21L", FALSE, 0, 0, FALSE },
409 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
410 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", 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_LTOFF_TP14R, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
416 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
417 { R_PARISC_LTOFF_TP14F, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
418 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP14F", FALSE, 0, 0, FALSE },
420 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
421 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
422 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
423 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
424 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
425 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
426 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
427 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_bitfield,
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 },
437 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
438 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
439 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
440 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
441 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
442 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
443 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
444 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_dont,
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 },
454 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
455 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
456 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
457 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
458 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
459 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
460 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
461 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
462 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
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_dont,
469 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
471 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
472 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
473 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
474 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
475 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
476 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
477 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
478 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_bitfield,
482 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
483 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
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 },
488 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
489 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
490 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
491 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
492 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
493 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
494 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
495 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
496 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
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 },
505 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
506 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
507 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
508 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
509 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
510 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
511 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
512 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
513 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_dont,
514 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", 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_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
520 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
522 { R_PARISC_TPREL64, 0, 0, 64, FALSE, 0, complain_overflow_bitfield,
523 bfd_elf_generic_reloc, "R_PARISC_TPREL64", FALSE, 0, 0, FALSE },
524 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
525 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
526 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
527 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
528 { R_PARISC_TPREL14WR, 0, 0, 14, FALSE, 0, complain_overflow_dont,
529 bfd_elf_generic_reloc, "R_PARISC_TPREL14WR", FALSE, 0, 0, FALSE },
530 { R_PARISC_TPREL14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
531 bfd_elf_generic_reloc, "R_PARISC_TPREL14DR", FALSE, 0, 0, FALSE },
532 { R_PARISC_TPREL16F, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
533 bfd_elf_generic_reloc, "R_PARISC_TPREL16F", FALSE, 0, 0, FALSE },
534 { R_PARISC_TPREL16WF, 0, 0, 16, FALSE, 0, complain_overflow_dont,
535 bfd_elf_generic_reloc, "R_PARISC_TPREL16WF", FALSE, 0, 0, FALSE },
536 { R_PARISC_TPREL16DF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
537 bfd_elf_generic_reloc, "R_PARISC_TPREL16DF", FALSE, 0, 0, FALSE },
539 { R_PARISC_LTOFF_TP64, 0, 0, 64, FALSE, 0, complain_overflow_bitfield,
540 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP64", FALSE, 0, 0, FALSE },
541 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
542 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
543 { R_PARISC_UNIMPLEMENTED, 0, 0, 0, FALSE, 0, complain_overflow_bitfield,
544 bfd_elf_generic_reloc, "R_PARISC_UNIMPLEMENTED", FALSE, 0, 0, FALSE },
545 { R_PARISC_LTOFF_TP14WR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
546 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP14WR", FALSE, 0, 0, FALSE },
547 { R_PARISC_LTOFF_TP14DR, 0, 0, 14, FALSE, 0, complain_overflow_bitfield,
548 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP14DR", FALSE, 0, 0, FALSE },
549 { R_PARISC_LTOFF_TP16F, 0, 0, 16, FALSE, 0, complain_overflow_dont,
550 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP16F", FALSE, 0, 0, FALSE },
551 { R_PARISC_LTOFF_TP16WF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
552 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP16WF", FALSE, 0, 0, FALSE },
553 { R_PARISC_LTOFF_TP16DF, 0, 0, 16, FALSE, 0, complain_overflow_bitfield,
554 bfd_elf_generic_reloc, "R_PARISC_LTOFF_TP16DF", FALSE, 0, 0, FALSE },
556 { R_PARISC_GNU_VTENTRY, 0, 0, 0, FALSE, 0, complain_overflow_dont,
557 bfd_elf_generic_reloc, "R_PARISC_GNU_VTENTRY", FALSE, 0, 0, FALSE },
558 { R_PARISC_GNU_VTINHERIT, 0, 0, 0, FALSE, 0, complain_overflow_dont,
559 bfd_elf_generic_reloc, "R_PARISC_GNU_VTINHERIT", FALSE, 0, 0, FALSE },
562 #define OFFSET_14R_FROM_21L 4
563 #define OFFSET_14F_FROM_21L 5
565 /* Return the final relocation type for the given base type, instruction
566 format, and field selector. */
569 elf_hppa_reloc_final_type (bfd *abfd,
570 elf_hppa_reloc_type base_type,
574 elf_hppa_reloc_type final_type = base_type;
576 /* Just a tangle of nested switch statements to deal with the braindamage
577 that a different field selector means a completely different relocation
581 /* We have been using generic relocation types. However, that may not
582 really make sense. Anyway, we need to support both R_PARISC_DIR64
583 and R_PARISC_DIR32 here. */
586 case R_HPPA_ABS_CALL:
593 final_type = R_PARISC_DIR14F;
598 final_type = R_PARISC_DIR14R;
601 final_type = R_PARISC_DLTIND14R;
604 final_type = R_PARISC_LTOFF_FPTR14DR;
607 final_type = R_PARISC_DLTIND14F;
610 final_type = R_PARISC_PLABEL14R;
613 return R_PARISC_NONE;
621 final_type = R_PARISC_DIR17F;
626 final_type = R_PARISC_DIR17R;
629 return R_PARISC_NONE;
641 final_type = R_PARISC_DIR21L;
644 final_type = R_PARISC_DLTIND21L;
647 final_type = R_PARISC_LTOFF_FPTR21L;
650 final_type = R_PARISC_PLABEL21L;
653 return R_PARISC_NONE;
661 final_type = R_PARISC_DIR32;
662 /* When in 64bit mode, a 32bit relocation is supposed to
663 be a section relative relocation. Dwarf2 (for example)
664 uses 32bit section relative relocations. */
665 if (bfd_get_arch_info (abfd)->bits_per_address != 32)
666 final_type = R_PARISC_SECREL32;
669 final_type = R_PARISC_PLABEL32;
672 return R_PARISC_NONE;
680 final_type = R_PARISC_DIR64;
683 final_type = R_PARISC_FPTR64;
686 return R_PARISC_NONE;
691 return R_PARISC_NONE;
704 /* R_PARISC_DLTREL14R for elf64, R_PARISC_DPREL14R for elf32 */
705 final_type = base_type + OFFSET_14R_FROM_21L;
708 /* R_PARISC_DLTREL14F for elf64, R_PARISC_DPREL14F for elf32 */
709 final_type = base_type + OFFSET_14F_FROM_21L;
712 return R_PARISC_NONE;
724 /* R_PARISC_DLTREL21L for elf64, R_PARISC_DPREL21L for elf32 */
725 final_type = base_type;
728 return R_PARISC_NONE;
733 return R_PARISC_NONE;
737 case R_HPPA_PCREL_CALL:
744 final_type = R_PARISC_PCREL12F;
747 return R_PARISC_NONE;
752 /* Contrary to appearances, these are not calls of any sort.
753 Rather, they are loads/stores with a pcrel reloc. */
759 final_type = R_PARISC_PCREL14R;
762 if (bfd_get_mach (abfd) < 25)
763 final_type = R_PARISC_PCREL14F;
765 final_type = R_PARISC_PCREL16F;
768 return R_PARISC_NONE;
778 final_type = R_PARISC_PCREL17R;
781 final_type = R_PARISC_PCREL17F;
784 return R_PARISC_NONE;
796 final_type = R_PARISC_PCREL21L;
799 return R_PARISC_NONE;
807 final_type = R_PARISC_PCREL22F;
810 return R_PARISC_NONE;
818 final_type = R_PARISC_PCREL32;
821 return R_PARISC_NONE;
829 final_type = R_PARISC_PCREL64;
832 return R_PARISC_NONE;
837 return R_PARISC_NONE;
841 case R_PARISC_GNU_VTENTRY:
842 case R_PARISC_GNU_VTINHERIT:
843 case R_PARISC_SEGREL32:
844 case R_PARISC_SEGBASE:
845 /* The defaults are fine for these cases. */
849 return R_PARISC_NONE;
855 /* Return one (or more) BFD relocations which implement the base
856 relocation with modifications based on format and field. */
858 elf_hppa_reloc_type **
859 _bfd_elf_hppa_gen_reloc_type (bfd *abfd,
860 elf_hppa_reloc_type base_type,
863 int ignore ATTRIBUTE_UNUSED,
864 asymbol *sym ATTRIBUTE_UNUSED)
866 elf_hppa_reloc_type *finaltype;
867 elf_hppa_reloc_type **final_types;
868 bfd_size_type amt = sizeof (elf_hppa_reloc_type *) * 2;
870 /* Allocate slots for the BFD relocation. */
871 final_types = bfd_alloc (abfd, amt);
872 if (final_types == NULL)
875 /* Allocate space for the relocation itself. */
876 amt = sizeof (elf_hppa_reloc_type);
877 finaltype = bfd_alloc (abfd, amt);
878 if (finaltype == NULL)
881 /* Some reasonable defaults. */
882 final_types[0] = finaltype;
883 final_types[1] = NULL;
885 *finaltype = elf_hppa_reloc_final_type (abfd, base_type, format, field);
890 /* Translate from an elf into field into a howto relocation pointer. */
893 elf_hppa_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED,
895 Elf_Internal_Rela *elf_reloc)
897 BFD_ASSERT (ELF_R_TYPE (elf_reloc->r_info)
898 < (unsigned int) R_PARISC_UNIMPLEMENTED);
899 bfd_reloc->howto = &elf_hppa_howto_table[ELF_R_TYPE (elf_reloc->r_info)];
902 /* Translate from an elf into field into a howto relocation pointer. */
905 elf_hppa_info_to_howto_rel (bfd *abfd ATTRIBUTE_UNUSED,
907 Elf_Internal_Rela *elf_reloc)
909 BFD_ASSERT (ELF_R_TYPE(elf_reloc->r_info)
910 < (unsigned int) R_PARISC_UNIMPLEMENTED);
911 bfd_reloc->howto = &elf_hppa_howto_table[ELF_R_TYPE (elf_reloc->r_info)];
914 /* Return the address of the howto table entry to perform the CODE
915 relocation for an ARCH machine. */
917 static reloc_howto_type *
918 elf_hppa_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
919 bfd_reloc_code_real_type code)
921 if ((int) code < (int) R_PARISC_UNIMPLEMENTED)
923 BFD_ASSERT ((int) elf_hppa_howto_table[(int) code].type == (int) code);
924 return &elf_hppa_howto_table[(int) code];
929 /* Return TRUE if SYM represents a local label symbol. */
932 elf_hppa_is_local_label_name (bfd *abfd ATTRIBUTE_UNUSED, const char *name)
934 if (name[0] == 'L' && name[1] == '$')
936 return _bfd_elf_is_local_label_name (abfd, name);
939 /* Set the correct type for an ELF section. We do this by the
940 section name, which is a hack, but ought to work. */
943 elf_hppa_fake_sections (bfd *abfd, Elf_Internal_Shdr *hdr, asection *sec)
947 name = bfd_get_section_name (abfd, sec);
949 if (strcmp (name, ".PARISC.unwind") == 0)
954 hdr->sh_type = SHT_LOPROC + 1;
958 /* ?!? How are unwinds supposed to work for symbols in arbitrary
959 sections? Or what if we have multiple .text sections in a single
960 .o file? HP really messed up on this one.
962 Ugh. We can not use elf_section_data (sec)->this_idx at this
963 point because it is not initialized yet.
965 So we (gasp) recompute it here. Hopefully nobody ever changes the
966 way sections are numbered in elf.c! */
967 for (asec = abfd->sections, indx = 1; asec; asec = asec->next, indx++)
969 if (asec->name && strcmp (asec->name, ".text") == 0)
976 /* I have no idea if this is really necessary or what it means. */
983 elf_hppa_final_write_processing (bfd *abfd,
984 bfd_boolean linker ATTRIBUTE_UNUSED)
986 int mach = bfd_get_mach (abfd);
988 elf_elfheader (abfd)->e_flags &= ~(EF_PARISC_ARCH | EF_PARISC_TRAPNIL
989 | EF_PARISC_EXT | EF_PARISC_LSB
990 | EF_PARISC_WIDE | EF_PARISC_NO_KABP
991 | EF_PARISC_LAZYSWAP);
994 elf_elfheader (abfd)->e_flags |= EFA_PARISC_1_0;
996 elf_elfheader (abfd)->e_flags |= EFA_PARISC_1_1;
998 elf_elfheader (abfd)->e_flags |= EFA_PARISC_2_0;
1000 elf_elfheader (abfd)->e_flags |= (EF_PARISC_WIDE
1002 /* The GNU tools have trapped without
1003 option since 1993, so need to take
1004 a step backwards with the ELF
1005 based toolchains. */
1006 | EF_PARISC_TRAPNIL);
1009 /* Comparison function for qsort to sort unwind section during a
1013 hppa_unwind_entry_compare (const void *a, const void *b)
1015 const bfd_byte *ap, *bp;
1016 unsigned long av, bv;
1019 av = (unsigned long) ap[0] << 24;
1020 av |= (unsigned long) ap[1] << 16;
1021 av |= (unsigned long) ap[2] << 8;
1022 av |= (unsigned long) ap[3];
1025 bv = (unsigned long) bp[0] << 24;
1026 bv |= (unsigned long) bp[1] << 16;
1027 bv |= (unsigned long) bp[2] << 8;
1028 bv |= (unsigned long) bp[3];
1030 return av < bv ? -1 : av > bv ? 1 : 0;
1033 static bfd_boolean elf_hppa_sort_unwind (bfd *abfd)
1037 /* Magic section names, but this is much safer than having
1038 relocate_section remember where SEGREL32 relocs occurred.
1039 Consider what happens if someone inept creates a linker script
1040 that puts unwind information in .text. */
1041 s = bfd_get_section_by_name (abfd, ".PARISC.unwind");
1047 if (!bfd_malloc_and_get_section (abfd, s, &contents))
1051 qsort (contents, (size_t) (size / 16), 16, hppa_unwind_entry_compare);
1053 if (! bfd_set_section_contents (abfd, s, contents, (file_ptr) 0, size))
1061 /* Hook called by the linker routine which adds symbols from an object
1062 file. HP's libraries define symbols with HP specific section
1063 indices, which we have to handle. */
1066 elf_hppa_add_symbol_hook (bfd *abfd,
1067 struct bfd_link_info *info ATTRIBUTE_UNUSED,
1068 Elf_Internal_Sym *sym,
1069 const char **namep ATTRIBUTE_UNUSED,
1070 flagword *flagsp ATTRIBUTE_UNUSED,
1074 int index = sym->st_shndx;
1078 case SHN_PARISC_ANSI_COMMON:
1079 *secp = bfd_make_section_old_way (abfd, ".PARISC.ansi.common");
1080 (*secp)->flags |= SEC_IS_COMMON;
1081 *valp = sym->st_size;
1084 case SHN_PARISC_HUGE_COMMON:
1085 *secp = bfd_make_section_old_way (abfd, ".PARISC.huge.common");
1086 (*secp)->flags |= SEC_IS_COMMON;
1087 *valp = sym->st_size;
1095 elf_hppa_unmark_useless_dynamic_symbols (struct elf_link_hash_entry *h,
1098 struct bfd_link_info *info = data;
1100 if (h->root.type == bfd_link_hash_warning)
1101 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1103 /* If we are not creating a shared library, and this symbol is
1104 referenced by a shared library but is not defined anywhere, then
1105 the generic code will warn that it is undefined.
1107 This behavior is undesirable on HPs since the standard shared
1108 libraries contain references to undefined symbols.
1110 So we twiddle the flags associated with such symbols so that they
1111 will not trigger the warning. ?!? FIXME. This is horribly fragile.
1113 Ultimately we should have better controls over the generic ELF BFD
1115 if (! info->relocatable
1116 && info->unresolved_syms_in_shared_libs != RM_IGNORE
1117 && h->root.type == bfd_link_hash_undefined
1118 && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_DYNAMIC) != 0
1119 && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_REGULAR) == 0)
1121 h->elf_link_hash_flags &= ~ELF_LINK_HASH_REF_DYNAMIC;
1122 h->elf_link_hash_flags |= 0x8000;
1129 elf_hppa_remark_useless_dynamic_symbols (struct elf_link_hash_entry *h,
1132 struct bfd_link_info *info = data;
1134 if (h->root.type == bfd_link_hash_warning)
1135 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1137 /* If we are not creating a shared library, and this symbol is
1138 referenced by a shared library but is not defined anywhere, then
1139 the generic code will warn that it is undefined.
1141 This behavior is undesirable on HPs since the standard shared
1142 libraries contain references to undefined symbols.
1144 So we twiddle the flags associated with such symbols so that they
1145 will not trigger the warning. ?!? FIXME. This is horribly fragile.
1147 Ultimately we should have better controls over the generic ELF BFD
1149 if (! info->relocatable
1150 && info->unresolved_syms_in_shared_libs != RM_IGNORE
1151 && h->root.type == bfd_link_hash_undefined
1152 && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_DYNAMIC) == 0
1153 && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_REGULAR) == 0
1154 && (h->elf_link_hash_flags & 0x8000) != 0)
1156 h->elf_link_hash_flags |= ELF_LINK_HASH_REF_DYNAMIC;
1157 h->elf_link_hash_flags &= ~0x8000;
1164 elf_hppa_is_dynamic_loader_symbol (const char *name)
1166 return (! strcmp (name, "__CPU_REVISION")
1167 || ! strcmp (name, "__CPU_KEYBITS_1")
1168 || ! strcmp (name, "__SYSTEM_ID_D")
1169 || ! strcmp (name, "__FPU_MODEL")
1170 || ! strcmp (name, "__FPU_REVISION")
1171 || ! strcmp (name, "__ARGC")
1172 || ! strcmp (name, "__ARGV")
1173 || ! strcmp (name, "__ENVP")
1174 || ! strcmp (name, "__TLS_SIZE_D")
1175 || ! strcmp (name, "__LOAD_INFO")
1176 || ! strcmp (name, "__systab"));
1179 /* Record the lowest address for the data and text segments. */
1181 elf_hppa_record_segment_addrs (bfd *abfd ATTRIBUTE_UNUSED,
1185 struct elf64_hppa_link_hash_table *hppa_info;
1190 value = section->vma - section->filepos;
1192 if (((section->flags & (SEC_ALLOC | SEC_LOAD | SEC_READONLY))
1193 == (SEC_ALLOC | SEC_LOAD | SEC_READONLY))
1194 && value < hppa_info->text_segment_base)
1195 hppa_info->text_segment_base = value;
1196 else if (((section->flags & (SEC_ALLOC | SEC_LOAD | SEC_READONLY))
1197 == (SEC_ALLOC | SEC_LOAD))
1198 && value < hppa_info->data_segment_base)
1199 hppa_info->data_segment_base = value;
1202 /* Called after we have seen all the input files/sections, but before
1203 final symbol resolution and section placement has been determined.
1205 We use this hook to (possibly) provide a value for __gp, then we
1206 fall back to the generic ELF final link routine. */
1209 elf_hppa_final_link (bfd *abfd, struct bfd_link_info *info)
1212 struct elf64_hppa_link_hash_table *hppa_info = elf64_hppa_hash_table (info);
1214 if (! info->relocatable)
1216 struct elf_link_hash_entry *gp;
1219 /* The linker script defines a value for __gp iff it was referenced
1220 by one of the objects being linked. First try to find the symbol
1221 in the hash table. If that fails, just compute the value __gp
1223 gp = elf_link_hash_lookup (elf_hash_table (info), "__gp", FALSE,
1229 /* Adjust the value of __gp as we may want to slide it into the
1230 .plt section so that the stubs can access PLT entries without
1231 using an addil sequence. */
1232 gp->root.u.def.value += hppa_info->gp_offset;
1234 gp_val = (gp->root.u.def.section->output_section->vma
1235 + gp->root.u.def.section->output_offset
1236 + gp->root.u.def.value);
1242 /* First look for a .plt section. If found, then __gp is the
1243 address of the .plt + gp_offset.
1245 If no .plt is found, then look for .dlt, .opd and .data (in
1246 that order) and set __gp to the base address of whichever
1247 section is found first. */
1249 sec = hppa_info->plt_sec;
1250 if (sec && ! (sec->flags & SEC_EXCLUDE))
1251 gp_val = (sec->output_offset
1252 + sec->output_section->vma
1253 + hppa_info->gp_offset);
1256 sec = hppa_info->dlt_sec;
1257 if (!sec || (sec->flags & SEC_EXCLUDE))
1258 sec = hppa_info->opd_sec;
1259 if (!sec || (sec->flags & SEC_EXCLUDE))
1260 sec = bfd_get_section_by_name (abfd, ".data");
1261 if (!sec || (sec->flags & SEC_EXCLUDE))
1264 gp_val = sec->output_offset + sec->output_section->vma;
1268 /* Install whatever value we found/computed for __gp. */
1269 _bfd_set_gp_value (abfd, gp_val);
1272 /* We need to know the base of the text and data segments so that we
1273 can perform SEGREL relocations. We will record the base addresses
1274 when we encounter the first SEGREL relocation. */
1275 hppa_info->text_segment_base = (bfd_vma)-1;
1276 hppa_info->data_segment_base = (bfd_vma)-1;
1278 /* HP's shared libraries have references to symbols that are not
1279 defined anywhere. The generic ELF BFD linker code will complain
1282 So we detect the losing case and arrange for the flags on the symbol
1283 to indicate that it was never referenced. This keeps the generic
1284 ELF BFD link code happy and appears to not create any secondary
1285 problems. Ultimately we need a way to control the behavior of the
1286 generic ELF BFD link code better. */
1287 elf_link_hash_traverse (elf_hash_table (info),
1288 elf_hppa_unmark_useless_dynamic_symbols,
1291 /* Invoke the regular ELF backend linker to do all the work. */
1292 retval = bfd_elf_final_link (abfd, info);
1294 elf_link_hash_traverse (elf_hash_table (info),
1295 elf_hppa_remark_useless_dynamic_symbols,
1298 /* If we're producing a final executable, sort the contents of the
1301 retval = elf_hppa_sort_unwind (abfd);
1306 /* Relocate an HPPA ELF section. */
1309 elf_hppa_relocate_section (bfd *output_bfd,
1310 struct bfd_link_info *info,
1312 asection *input_section,
1314 Elf_Internal_Rela *relocs,
1315 Elf_Internal_Sym *local_syms,
1316 asection **local_sections)
1318 Elf_Internal_Shdr *symtab_hdr;
1319 Elf_Internal_Rela *rel;
1320 Elf_Internal_Rela *relend;
1321 struct elf64_hppa_link_hash_table *hppa_info;
1323 if (info->relocatable)
1326 hppa_info = elf64_hppa_hash_table (info);
1327 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
1330 relend = relocs + input_section->reloc_count;
1331 for (; rel < relend; rel++)
1334 reloc_howto_type *howto = elf_hppa_howto_table + ELF_R_TYPE (rel->r_info);
1335 unsigned long r_symndx;
1336 struct elf_link_hash_entry *h;
1337 Elf_Internal_Sym *sym;
1340 bfd_reloc_status_type r;
1341 const char *sym_name;
1342 const char *dyn_name;
1343 char *dynh_buf = NULL;
1344 size_t dynh_buflen = 0;
1345 struct elf64_hppa_dyn_hash_entry *dyn_h = NULL;
1347 r_type = ELF_R_TYPE (rel->r_info);
1348 if (r_type < 0 || r_type >= (int) R_PARISC_UNIMPLEMENTED)
1350 bfd_set_error (bfd_error_bad_value);
1354 /* This is a final link. */
1355 r_symndx = ELF_R_SYM (rel->r_info);
1359 if (r_symndx < symtab_hdr->sh_info)
1361 /* This is a local symbol. */
1362 sym = local_syms + r_symndx;
1363 sym_sec = local_sections[r_symndx];
1364 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sym_sec, rel);
1366 /* If this symbol has an entry in the PA64 dynamic hash
1367 table, then get it. */
1368 dyn_name = get_dyn_name (input_bfd, h, rel,
1369 &dynh_buf, &dynh_buflen);
1370 dyn_h = elf64_hppa_dyn_hash_lookup (&hppa_info->dyn_hash_table,
1371 dyn_name, FALSE, FALSE);
1376 /* This is not a local symbol. */
1379 indx = r_symndx - symtab_hdr->sh_info;
1380 h = elf_sym_hashes (input_bfd)[indx];
1381 while (h->root.type == bfd_link_hash_indirect
1382 || h->root.type == bfd_link_hash_warning)
1383 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1384 if (h->root.type == bfd_link_hash_defined
1385 || h->root.type == bfd_link_hash_defweak)
1387 sym_sec = h->root.u.def.section;
1389 /* If this symbol has an entry in the PA64 dynamic hash
1390 table, then get it. */
1391 dyn_name = get_dyn_name (input_bfd, h, rel,
1392 &dynh_buf, &dynh_buflen);
1393 dyn_h = elf64_hppa_dyn_hash_lookup (&hppa_info->dyn_hash_table,
1394 dyn_name, FALSE, FALSE);
1396 /* If we have a relocation against a symbol defined in a
1397 shared library and we have not created an entry in the
1398 PA64 dynamic symbol hash table for it, then we lose. */
1399 if (sym_sec->output_section == NULL && dyn_h == NULL)
1401 (*_bfd_error_handler)
1402 (_("%s: warning: unresolvable relocation against symbol `%s' from %s section"),
1403 bfd_archive_filename (input_bfd), h->root.root.string,
1404 bfd_get_section_name (input_bfd, input_section));
1407 else if (sym_sec->output_section)
1408 relocation = (h->root.u.def.value
1409 + sym_sec->output_offset
1410 + sym_sec->output_section->vma);
1411 /* Value will be provided via one of the offsets in the
1412 dyn_h hash table entry. */
1416 else if (info->unresolved_syms_in_objects == RM_IGNORE
1417 && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
1419 /* If this symbol has an entry in the PA64 dynamic hash
1420 table, then get it. */
1421 dyn_name = get_dyn_name (input_bfd, h, rel,
1422 &dynh_buf, &dynh_buflen);
1423 dyn_h = elf64_hppa_dyn_hash_lookup (&hppa_info->dyn_hash_table,
1424 dyn_name, FALSE, FALSE);
1428 (*_bfd_error_handler)
1429 (_("%s: warning: unresolvable relocation against symbol `%s' from %s section"),
1430 bfd_archive_filename (input_bfd), h->root.root.string,
1431 bfd_get_section_name (input_bfd, input_section));
1435 else if (h->root.type == bfd_link_hash_undefweak)
1437 dyn_name = get_dyn_name (input_bfd, h, rel,
1438 &dynh_buf, &dynh_buflen);
1439 dyn_h = elf64_hppa_dyn_hash_lookup (&hppa_info->dyn_hash_table,
1440 dyn_name, FALSE, FALSE);
1444 (*_bfd_error_handler)
1445 (_("%s: warning: unresolvable relocation against symbol `%s' from %s section"),
1446 bfd_archive_filename (input_bfd), h->root.root.string,
1447 bfd_get_section_name (input_bfd, input_section));
1453 /* Ignore dynamic loader defined symbols. */
1454 if (elf_hppa_is_dynamic_loader_symbol (h->root.root.string))
1458 if (!((*info->callbacks->undefined_symbol)
1459 (info, h->root.root.string, input_bfd,
1460 input_section, rel->r_offset,
1461 (info->unresolved_syms_in_objects == RM_GENERATE_ERROR
1462 || ELF_ST_VISIBILITY (h->other)))))
1470 sym_name = h->root.root.string;
1473 sym_name = bfd_elf_string_from_elf_section (input_bfd,
1474 symtab_hdr->sh_link,
1476 if (sym_name == NULL)
1478 if (*sym_name == '\0')
1479 sym_name = bfd_section_name (input_bfd, sym_sec);
1482 r = elf_hppa_final_link_relocate (rel, input_bfd, output_bfd,
1483 input_section, contents,
1484 relocation, info, sym_sec,
1487 if (r != bfd_reloc_ok)
1493 case bfd_reloc_overflow:
1495 if (!((*info->callbacks->reloc_overflow)
1496 (info, sym_name, howto->name, (bfd_vma) 0,
1497 input_bfd, input_section, rel->r_offset)))
1507 /* Compute the value for a relocation (REL) during a final link stage,
1508 then insert the value into the proper location in CONTENTS.
1510 VALUE is a tentative value for the relocation and may be overridden
1511 and modified here based on the specific relocation to be performed.
1513 For example we do conversions for PC-relative branches in this routine
1514 or redirection of calls to external routines to stubs.
1516 The work of actually applying the relocation is left to a helper
1517 routine in an attempt to reduce the complexity and size of this
1520 static bfd_reloc_status_type
1521 elf_hppa_final_link_relocate (Elf_Internal_Rela *rel,
1524 asection *input_section,
1527 struct bfd_link_info *info,
1529 struct elf_link_hash_entry *h ATTRIBUTE_UNUSED,
1530 struct elf64_hppa_dyn_hash_entry *dyn_h)
1533 bfd_vma offset = rel->r_offset;
1534 bfd_signed_vma addend = rel->r_addend;
1535 reloc_howto_type *howto = elf_hppa_howto_table + ELF_R_TYPE (rel->r_info);
1536 unsigned int r_type = howto->type;
1537 bfd_byte *hit_data = contents + offset;
1538 struct elf64_hppa_link_hash_table *hppa_info = elf64_hppa_hash_table (info);
1540 insn = bfd_get_32 (input_bfd, hit_data);
1547 /* Basic function call support.
1549 Note for a call to a function defined in another dynamic library
1550 we want to redirect the call to a stub. */
1552 /* Random PC relative relocs. */
1553 case R_PARISC_PCREL21L:
1554 case R_PARISC_PCREL14R:
1555 case R_PARISC_PCREL14F:
1556 case R_PARISC_PCREL14WR:
1557 case R_PARISC_PCREL14DR:
1558 case R_PARISC_PCREL16F:
1559 case R_PARISC_PCREL16WF:
1560 case R_PARISC_PCREL16DF:
1562 /* If this is a call to a function defined in another dynamic
1563 library, then redirect the call to the local stub for this
1565 if (sym_sec == NULL || sym_sec->output_section == NULL)
1566 value = (dyn_h->stub_offset + hppa_info->stub_sec->output_offset
1567 + hppa_info->stub_sec->output_section->vma);
1569 /* Turn VALUE into a proper PC relative address. */
1570 value -= (offset + input_section->output_offset
1571 + input_section->output_section->vma);
1573 /* Adjust for any field selectors. */
1574 if (r_type == R_PARISC_PCREL21L)
1575 value = hppa_field_adjust (value, -8 + addend, e_lsel);
1576 else if (r_type == R_PARISC_PCREL14F
1577 || r_type == R_PARISC_PCREL16F
1578 || r_type == R_PARISC_PCREL16WF
1579 || r_type == R_PARISC_PCREL16DF)
1580 value = hppa_field_adjust (value, -8 + addend, e_fsel);
1582 value = hppa_field_adjust (value, -8 + addend, e_rsel);
1584 /* Apply the relocation to the given instruction. */
1585 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1589 case R_PARISC_PCREL12F:
1590 case R_PARISC_PCREL22F:
1591 case R_PARISC_PCREL17F:
1592 case R_PARISC_PCREL22C:
1593 case R_PARISC_PCREL17C:
1594 case R_PARISC_PCREL17R:
1596 /* If this is a call to a function defined in another dynamic
1597 library, then redirect the call to the local stub for this
1599 if (sym_sec == NULL || sym_sec->output_section == NULL)
1600 value = (dyn_h->stub_offset + hppa_info->stub_sec->output_offset
1601 + hppa_info->stub_sec->output_section->vma);
1603 /* Turn VALUE into a proper PC relative address. */
1604 value -= (offset + input_section->output_offset
1605 + input_section->output_section->vma);
1607 /* Adjust for any field selectors. */
1608 if (r_type == R_PARISC_PCREL17R)
1609 value = hppa_field_adjust (value, -8 + addend, e_rsel);
1611 value = hppa_field_adjust (value, -8 + addend, e_fsel);
1613 /* All branches are implicitly shifted by 2 places. */
1616 /* Apply the relocation to the given instruction. */
1617 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1621 /* Indirect references to data through the DLT. */
1622 case R_PARISC_DLTIND14R:
1623 case R_PARISC_DLTIND14F:
1624 case R_PARISC_DLTIND14DR:
1625 case R_PARISC_DLTIND14WR:
1626 case R_PARISC_DLTIND21L:
1627 case R_PARISC_LTOFF_FPTR14R:
1628 case R_PARISC_LTOFF_FPTR14DR:
1629 case R_PARISC_LTOFF_FPTR14WR:
1630 case R_PARISC_LTOFF_FPTR21L:
1631 case R_PARISC_LTOFF_FPTR16F:
1632 case R_PARISC_LTOFF_FPTR16WF:
1633 case R_PARISC_LTOFF_FPTR16DF:
1634 case R_PARISC_LTOFF_TP21L:
1635 case R_PARISC_LTOFF_TP14R:
1636 case R_PARISC_LTOFF_TP14F:
1637 case R_PARISC_LTOFF_TP14WR:
1638 case R_PARISC_LTOFF_TP14DR:
1639 case R_PARISC_LTOFF_TP16F:
1640 case R_PARISC_LTOFF_TP16WF:
1641 case R_PARISC_LTOFF_TP16DF:
1642 case R_PARISC_LTOFF16F:
1643 case R_PARISC_LTOFF16WF:
1644 case R_PARISC_LTOFF16DF:
1646 /* If this relocation was against a local symbol, then we still
1647 have not set up the DLT entry (it's not convenient to do so
1648 in the "finalize_dlt" routine because it is difficult to get
1649 to the local symbol's value).
1651 So, if this is a local symbol (h == NULL), then we need to
1652 fill in its DLT entry.
1654 Similarly we may still need to set up an entry in .opd for
1655 a local function which had its address taken. */
1656 if (dyn_h->h == NULL)
1658 /* Now do .opd creation if needed. */
1659 if (r_type == R_PARISC_LTOFF_FPTR14R
1660 || r_type == R_PARISC_LTOFF_FPTR14DR
1661 || r_type == R_PARISC_LTOFF_FPTR14WR
1662 || r_type == R_PARISC_LTOFF_FPTR21L
1663 || r_type == R_PARISC_LTOFF_FPTR16F
1664 || r_type == R_PARISC_LTOFF_FPTR16WF
1665 || r_type == R_PARISC_LTOFF_FPTR16DF)
1667 /* The first two words of an .opd entry are zero. */
1668 memset (hppa_info->opd_sec->contents + dyn_h->opd_offset,
1671 /* The next word is the address of the function. */
1672 bfd_put_64 (hppa_info->opd_sec->owner, value + addend,
1673 (hppa_info->opd_sec->contents
1674 + dyn_h->opd_offset + 16));
1676 /* The last word is our local __gp value. */
1677 value = _bfd_get_gp_value
1678 (hppa_info->opd_sec->output_section->owner);
1679 bfd_put_64 (hppa_info->opd_sec->owner, value,
1680 (hppa_info->opd_sec->contents
1681 + dyn_h->opd_offset + 24));
1683 /* The DLT value is the address of the .opd entry. */
1684 value = (dyn_h->opd_offset
1685 + hppa_info->opd_sec->output_offset
1686 + hppa_info->opd_sec->output_section->vma);
1690 bfd_put_64 (hppa_info->dlt_sec->owner,
1692 hppa_info->dlt_sec->contents + dyn_h->dlt_offset);
1695 /* We want the value of the DLT offset for this symbol, not
1696 the symbol's actual address. Note that __gp may not point
1697 to the start of the DLT, so we have to compute the absolute
1698 address, then subtract out the value of __gp. */
1699 value = (dyn_h->dlt_offset
1700 + hppa_info->dlt_sec->output_offset
1701 + hppa_info->dlt_sec->output_section->vma);
1702 value -= _bfd_get_gp_value (output_bfd);
1704 /* All DLTIND relocations are basically the same at this point,
1705 except that we need different field selectors for the 21bit
1706 version vs the 14bit versions. */
1707 if (r_type == R_PARISC_DLTIND21L
1708 || r_type == R_PARISC_LTOFF_FPTR21L
1709 || r_type == R_PARISC_LTOFF_TP21L)
1710 value = hppa_field_adjust (value, 0, e_lsel);
1711 else if (r_type == R_PARISC_DLTIND14F
1712 || r_type == R_PARISC_LTOFF_FPTR16F
1713 || r_type == R_PARISC_LTOFF_FPTR16WF
1714 || r_type == R_PARISC_LTOFF_FPTR16DF
1715 || r_type == R_PARISC_LTOFF16F
1716 || r_type == R_PARISC_LTOFF16DF
1717 || r_type == R_PARISC_LTOFF16WF
1718 || r_type == R_PARISC_LTOFF_TP16F
1719 || r_type == R_PARISC_LTOFF_TP16WF
1720 || r_type == R_PARISC_LTOFF_TP16DF)
1721 value = hppa_field_adjust (value, 0, e_fsel);
1723 value = hppa_field_adjust (value, 0, e_rsel);
1725 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1729 case R_PARISC_DLTREL14R:
1730 case R_PARISC_DLTREL14F:
1731 case R_PARISC_DLTREL14DR:
1732 case R_PARISC_DLTREL14WR:
1733 case R_PARISC_DLTREL21L:
1734 case R_PARISC_DPREL21L:
1735 case R_PARISC_DPREL14WR:
1736 case R_PARISC_DPREL14DR:
1737 case R_PARISC_DPREL14R:
1738 case R_PARISC_DPREL14F:
1739 case R_PARISC_GPREL16F:
1740 case R_PARISC_GPREL16WF:
1741 case R_PARISC_GPREL16DF:
1743 /* Subtract out the global pointer value to make value a DLT
1744 relative address. */
1745 value -= _bfd_get_gp_value (output_bfd);
1747 /* All DLTREL relocations are basically the same at this point,
1748 except that we need different field selectors for the 21bit
1749 version vs the 14bit versions. */
1750 if (r_type == R_PARISC_DLTREL21L
1751 || r_type == R_PARISC_DPREL21L)
1752 value = hppa_field_adjust (value, addend, e_lrsel);
1753 else if (r_type == R_PARISC_DLTREL14F
1754 || r_type == R_PARISC_DPREL14F
1755 || r_type == R_PARISC_GPREL16F
1756 || r_type == R_PARISC_GPREL16WF
1757 || r_type == R_PARISC_GPREL16DF)
1758 value = hppa_field_adjust (value, addend, e_fsel);
1760 value = hppa_field_adjust (value, addend, e_rrsel);
1762 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1766 case R_PARISC_DIR21L:
1767 case R_PARISC_DIR17R:
1768 case R_PARISC_DIR17F:
1769 case R_PARISC_DIR14R:
1770 case R_PARISC_DIR14F:
1771 case R_PARISC_DIR14WR:
1772 case R_PARISC_DIR14DR:
1773 case R_PARISC_DIR16F:
1774 case R_PARISC_DIR16WF:
1775 case R_PARISC_DIR16DF:
1777 /* All DIR relocations are basically the same at this point,
1778 except that branch offsets need to be divided by four, and
1779 we need different field selectors. Note that we don't
1780 redirect absolute calls to local stubs. */
1782 if (r_type == R_PARISC_DIR21L)
1783 value = hppa_field_adjust (value, addend, e_lrsel);
1784 else if (r_type == R_PARISC_DIR17F
1785 || r_type == R_PARISC_DIR16F
1786 || r_type == R_PARISC_DIR16WF
1787 || r_type == R_PARISC_DIR16DF
1788 || r_type == R_PARISC_DIR14F)
1789 value = hppa_field_adjust (value, addend, e_fsel);
1791 value = hppa_field_adjust (value, addend, e_rrsel);
1793 if (r_type == R_PARISC_DIR17R || r_type == R_PARISC_DIR17F)
1795 /* All branches are implicitly shifted by 2 places. */
1799 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1803 case R_PARISC_PLTOFF21L:
1804 case R_PARISC_PLTOFF14R:
1805 case R_PARISC_PLTOFF14F:
1806 case R_PARISC_PLTOFF14WR:
1807 case R_PARISC_PLTOFF14DR:
1808 case R_PARISC_PLTOFF16F:
1809 case R_PARISC_PLTOFF16WF:
1810 case R_PARISC_PLTOFF16DF:
1812 /* We want the value of the PLT offset for this symbol, not
1813 the symbol's actual address. Note that __gp may not point
1814 to the start of the DLT, so we have to compute the absolute
1815 address, then subtract out the value of __gp. */
1816 value = (dyn_h->plt_offset
1817 + hppa_info->plt_sec->output_offset
1818 + hppa_info->plt_sec->output_section->vma);
1819 value -= _bfd_get_gp_value (output_bfd);
1821 /* All PLTOFF relocations are basically the same at this point,
1822 except that we need different field selectors for the 21bit
1823 version vs the 14bit versions. */
1824 if (r_type == R_PARISC_PLTOFF21L)
1825 value = hppa_field_adjust (value, addend, e_lrsel);
1826 else if (r_type == R_PARISC_PLTOFF14F
1827 || r_type == R_PARISC_PLTOFF16F
1828 || r_type == R_PARISC_PLTOFF16WF
1829 || r_type == R_PARISC_PLTOFF16DF)
1830 value = hppa_field_adjust (value, addend, e_fsel);
1832 value = hppa_field_adjust (value, addend, e_rrsel);
1834 insn = elf_hppa_relocate_insn (insn, (int) value, r_type);
1838 case R_PARISC_LTOFF_FPTR32:
1840 /* We may still need to create the FPTR itself if it was for
1842 if (dyn_h->h == NULL)
1844 /* The first two words of an .opd entry are zero. */
1845 memset (hppa_info->opd_sec->contents + dyn_h->opd_offset, 0, 16);
1847 /* The next word is the address of the function. */
1848 bfd_put_64 (hppa_info->opd_sec->owner, value + addend,
1849 (hppa_info->opd_sec->contents
1850 + dyn_h->opd_offset + 16));
1852 /* The last word is our local __gp value. */
1853 value = _bfd_get_gp_value
1854 (hppa_info->opd_sec->output_section->owner);
1855 bfd_put_64 (hppa_info->opd_sec->owner, value,
1856 hppa_info->opd_sec->contents + dyn_h->opd_offset + 24);
1858 /* The DLT value is the address of the .opd entry. */
1859 value = (dyn_h->opd_offset
1860 + hppa_info->opd_sec->output_offset
1861 + hppa_info->opd_sec->output_section->vma);
1863 bfd_put_64 (hppa_info->dlt_sec->owner,
1865 hppa_info->dlt_sec->contents + dyn_h->dlt_offset);
1868 /* We want the value of the DLT offset for this symbol, not
1869 the symbol's actual address. Note that __gp may not point
1870 to the start of the DLT, so we have to compute the absolute
1871 address, then subtract out the value of __gp. */
1872 value = (dyn_h->dlt_offset
1873 + hppa_info->dlt_sec->output_offset
1874 + hppa_info->dlt_sec->output_section->vma);
1875 value -= _bfd_get_gp_value (output_bfd);
1876 bfd_put_32 (input_bfd, value, hit_data);
1877 return bfd_reloc_ok;
1880 case R_PARISC_LTOFF_FPTR64:
1881 case R_PARISC_LTOFF_TP64:
1883 /* We may still need to create the FPTR itself if it was for
1885 if (dyn_h->h == NULL && r_type == R_PARISC_LTOFF_FPTR64)
1887 /* The first two words of an .opd entry are zero. */
1888 memset (hppa_info->opd_sec->contents + dyn_h->opd_offset, 0, 16);
1890 /* The next word is the address of the function. */
1891 bfd_put_64 (hppa_info->opd_sec->owner, value + addend,
1892 (hppa_info->opd_sec->contents
1893 + dyn_h->opd_offset + 16));
1895 /* The last word is our local __gp value. */
1896 value = _bfd_get_gp_value
1897 (hppa_info->opd_sec->output_section->owner);
1898 bfd_put_64 (hppa_info->opd_sec->owner, value,
1899 hppa_info->opd_sec->contents + dyn_h->opd_offset + 24);
1901 /* The DLT value is the address of the .opd entry. */
1902 value = (dyn_h->opd_offset
1903 + hppa_info->opd_sec->output_offset
1904 + hppa_info->opd_sec->output_section->vma);
1906 bfd_put_64 (hppa_info->dlt_sec->owner,
1908 hppa_info->dlt_sec->contents + dyn_h->dlt_offset);
1911 /* We want the value of the DLT offset for this symbol, not
1912 the symbol's actual address. Note that __gp may not point
1913 to the start of the DLT, so we have to compute the absolute
1914 address, then subtract out the value of __gp. */
1915 value = (dyn_h->dlt_offset
1916 + hppa_info->dlt_sec->output_offset
1917 + hppa_info->dlt_sec->output_section->vma);
1918 value -= _bfd_get_gp_value (output_bfd);
1919 bfd_put_64 (input_bfd, value, hit_data);
1920 return bfd_reloc_ok;
1923 case R_PARISC_DIR32:
1924 bfd_put_32 (input_bfd, value + addend, hit_data);
1925 return bfd_reloc_ok;
1927 case R_PARISC_DIR64:
1928 bfd_put_64 (input_bfd, value + addend, hit_data);
1929 return bfd_reloc_ok;
1931 case R_PARISC_GPREL64:
1932 /* Subtract out the global pointer value to make value a DLT
1933 relative address. */
1934 value -= _bfd_get_gp_value (output_bfd);
1936 bfd_put_64 (input_bfd, value + addend, hit_data);
1937 return bfd_reloc_ok;
1939 case R_PARISC_LTOFF64:
1940 /* We want the value of the DLT offset for this symbol, not
1941 the symbol's actual address. Note that __gp may not point
1942 to the start of the DLT, so we have to compute the absolute
1943 address, then subtract out the value of __gp. */
1944 value = (dyn_h->dlt_offset
1945 + hppa_info->dlt_sec->output_offset
1946 + hppa_info->dlt_sec->output_section->vma);
1947 value -= _bfd_get_gp_value (output_bfd);
1949 bfd_put_64 (input_bfd, value + addend, hit_data);
1950 return bfd_reloc_ok;
1952 case R_PARISC_PCREL32:
1954 /* If this is a call to a function defined in another dynamic
1955 library, then redirect the call to the local stub for this
1957 if (sym_sec == NULL || sym_sec->output_section == NULL)
1958 value = (dyn_h->stub_offset + hppa_info->stub_sec->output_offset
1959 + hppa_info->stub_sec->output_section->vma);
1961 /* Turn VALUE into a proper PC relative address. */
1962 value -= (offset + input_section->output_offset
1963 + input_section->output_section->vma);
1967 bfd_put_32 (input_bfd, value, hit_data);
1968 return bfd_reloc_ok;
1971 case R_PARISC_PCREL64:
1973 /* If this is a call to a function defined in another dynamic
1974 library, then redirect the call to the local stub for this
1976 if (sym_sec == NULL || sym_sec->output_section == NULL)
1977 value = (dyn_h->stub_offset + hppa_info->stub_sec->output_offset
1978 + hppa_info->stub_sec->output_section->vma);
1980 /* Turn VALUE into a proper PC relative address. */
1981 value -= (offset + input_section->output_offset
1982 + input_section->output_section->vma);
1986 bfd_put_64 (input_bfd, value, hit_data);
1987 return bfd_reloc_ok;
1990 case R_PARISC_FPTR64:
1992 /* We may still need to create the FPTR itself if it was for
1994 if (dyn_h->h == NULL)
1996 /* The first two words of an .opd entry are zero. */
1997 memset (hppa_info->opd_sec->contents + dyn_h->opd_offset, 0, 16);
1999 /* The next word is the address of the function. */
2000 bfd_put_64 (hppa_info->opd_sec->owner, value + addend,
2001 (hppa_info->opd_sec->contents
2002 + dyn_h->opd_offset + 16));
2004 /* The last word is our local __gp value. */
2005 value = _bfd_get_gp_value
2006 (hppa_info->opd_sec->output_section->owner);
2007 bfd_put_64 (hppa_info->opd_sec->owner, value,
2008 hppa_info->opd_sec->contents + dyn_h->opd_offset + 24);
2011 if (dyn_h->want_opd)
2012 /* We want the value of the OPD offset for this symbol. */
2013 value = (dyn_h->opd_offset
2014 + hppa_info->opd_sec->output_offset
2015 + hppa_info->opd_sec->output_section->vma);
2017 /* We want the address of the symbol. */
2020 bfd_put_64 (input_bfd, value, hit_data);
2021 return bfd_reloc_ok;
2024 case R_PARISC_SECREL32:
2025 bfd_put_32 (input_bfd,
2026 value + addend - sym_sec->output_section->vma,
2028 return bfd_reloc_ok;
2030 case R_PARISC_SEGREL32:
2031 case R_PARISC_SEGREL64:
2033 /* If this is the first SEGREL relocation, then initialize
2034 the segment base values. */
2035 if (hppa_info->text_segment_base == (bfd_vma) -1)
2036 bfd_map_over_sections (output_bfd, elf_hppa_record_segment_addrs,
2039 /* VALUE holds the absolute address. We want to include the
2040 addend, then turn it into a segment relative address.
2042 The segment is derived from SYM_SEC. We assume that there are
2043 only two segments of note in the resulting executable/shlib.
2044 A readonly segment (.text) and a readwrite segment (.data). */
2047 if (sym_sec->flags & SEC_CODE)
2048 value -= hppa_info->text_segment_base;
2050 value -= hppa_info->data_segment_base;
2052 if (r_type == R_PARISC_SEGREL32)
2053 bfd_put_32 (input_bfd, value, hit_data);
2055 bfd_put_64 (input_bfd, value, hit_data);
2056 return bfd_reloc_ok;
2059 /* Something we don't know how to handle. */
2061 return bfd_reloc_notsupported;
2064 /* Update the instruction word. */
2065 bfd_put_32 (input_bfd, (bfd_vma) insn, hit_data);
2066 return bfd_reloc_ok;
2069 /* Relocate the given INSN. VALUE should be the actual value we want
2070 to insert into the instruction, ie by this point we should not be
2071 concerned with computing an offset relative to the DLT, PC, etc.
2072 Instead this routine is meant to handle the bit manipulations needed
2073 to insert the relocation into the given instruction. */
2076 elf_hppa_relocate_insn (int insn, int sym_value, unsigned int r_type)
2080 /* This is any 22 bit branch. In PA2.0 syntax it corresponds to
2081 the "B" instruction. */
2082 case R_PARISC_PCREL22F:
2083 case R_PARISC_PCREL22C:
2084 return (insn & ~0x3ff1ffd) | re_assemble_22 (sym_value);
2086 /* This is any 12 bit branch. */
2087 case R_PARISC_PCREL12F:
2088 return (insn & ~0x1ffd) | re_assemble_12 (sym_value);
2090 /* This is any 17 bit branch. In PA2.0 syntax it also corresponds
2091 to the "B" instruction as well as BE. */
2092 case R_PARISC_PCREL17F:
2093 case R_PARISC_DIR17F:
2094 case R_PARISC_DIR17R:
2095 case R_PARISC_PCREL17C:
2096 case R_PARISC_PCREL17R:
2097 return (insn & ~0x1f1ffd) | re_assemble_17 (sym_value);
2099 /* ADDIL or LDIL instructions. */
2100 case R_PARISC_DLTREL21L:
2101 case R_PARISC_DLTIND21L:
2102 case R_PARISC_LTOFF_FPTR21L:
2103 case R_PARISC_PCREL21L:
2104 case R_PARISC_LTOFF_TP21L:
2105 case R_PARISC_DPREL21L:
2106 case R_PARISC_PLTOFF21L:
2107 case R_PARISC_DIR21L:
2108 return (insn & ~0x1fffff) | re_assemble_21 (sym_value);
2110 /* LDO and integer loads/stores with 14 bit displacements. */
2111 case R_PARISC_DLTREL14R:
2112 case R_PARISC_DLTREL14F:
2113 case R_PARISC_DLTIND14R:
2114 case R_PARISC_DLTIND14F:
2115 case R_PARISC_LTOFF_FPTR14R:
2116 case R_PARISC_PCREL14R:
2117 case R_PARISC_PCREL14F:
2118 case R_PARISC_LTOFF_TP14R:
2119 case R_PARISC_LTOFF_TP14F:
2120 case R_PARISC_DPREL14R:
2121 case R_PARISC_DPREL14F:
2122 case R_PARISC_PLTOFF14R:
2123 case R_PARISC_PLTOFF14F:
2124 case R_PARISC_DIR14R:
2125 case R_PARISC_DIR14F:
2126 return (insn & ~0x3fff) | low_sign_unext (sym_value, 14);
2128 /* PA2.0W LDO and integer loads/stores with 16 bit displacements. */
2129 case R_PARISC_LTOFF_FPTR16F:
2130 case R_PARISC_PCREL16F:
2131 case R_PARISC_LTOFF_TP16F:
2132 case R_PARISC_GPREL16F:
2133 case R_PARISC_PLTOFF16F:
2134 case R_PARISC_DIR16F:
2135 case R_PARISC_LTOFF16F:
2136 return (insn & ~0xffff) | re_assemble_16 (sym_value);
2138 /* Doubleword loads and stores with a 14 bit displacement. */
2139 case R_PARISC_DLTREL14DR:
2140 case R_PARISC_DLTIND14DR:
2141 case R_PARISC_LTOFF_FPTR14DR:
2142 case R_PARISC_LTOFF_FPTR16DF:
2143 case R_PARISC_PCREL14DR:
2144 case R_PARISC_PCREL16DF:
2145 case R_PARISC_LTOFF_TP14DR:
2146 case R_PARISC_LTOFF_TP16DF:
2147 case R_PARISC_DPREL14DR:
2148 case R_PARISC_GPREL16DF:
2149 case R_PARISC_PLTOFF14DR:
2150 case R_PARISC_PLTOFF16DF:
2151 case R_PARISC_DIR14DR:
2152 case R_PARISC_DIR16DF:
2153 case R_PARISC_LTOFF16DF:
2154 return (insn & ~0x3ff1) | (((sym_value & 0x2000) >> 13)
2155 | ((sym_value & 0x1ff8) << 1));
2157 /* Floating point single word load/store instructions. */
2158 case R_PARISC_DLTREL14WR:
2159 case R_PARISC_DLTIND14WR:
2160 case R_PARISC_LTOFF_FPTR14WR:
2161 case R_PARISC_LTOFF_FPTR16WF:
2162 case R_PARISC_PCREL14WR:
2163 case R_PARISC_PCREL16WF:
2164 case R_PARISC_LTOFF_TP14WR:
2165 case R_PARISC_LTOFF_TP16WF:
2166 case R_PARISC_DPREL14WR:
2167 case R_PARISC_GPREL16WF:
2168 case R_PARISC_PLTOFF14WR:
2169 case R_PARISC_PLTOFF16WF:
2170 case R_PARISC_DIR16WF:
2171 case R_PARISC_DIR14WR:
2172 case R_PARISC_LTOFF16WF:
2173 return (insn & ~0x3ff9) | (((sym_value & 0x2000) >> 13)
2174 | ((sym_value & 0x1ffc) << 1));