1 /* BFD back-end for IBM RS/6000 "XCOFF64" files.
3 Free Software Foundation, Inc.
4 Written Clinton Popetz.
5 Contributed by Cygnus Support.
7 This file is part of BFD, the Binary File Descriptor library.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 2 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program; if not, write to the Free Software
21 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
23 /* Internalcoff.h and coffcode.h modify themselves based on these flags. */
25 #define RS6000COFF_C 1
30 #include "coff/internal.h"
31 #include "coff/rs6k64.h"
35 #define GET_FILEHDR_SYMPTR bfd_h_get_64
36 #define PUT_FILEHDR_SYMPTR bfd_h_put_64
37 #define GET_AOUTHDR_DATA_START bfd_h_get_64
38 #define PUT_AOUTHDR_DATA_START bfd_h_put_64
39 #define GET_AOUTHDR_TEXT_START bfd_h_get_64
40 #define PUT_AOUTHDR_TEXT_START bfd_h_put_64
41 #define GET_AOUTHDR_TSIZE bfd_h_get_64
42 #define PUT_AOUTHDR_TSIZE bfd_h_put_64
43 #define GET_AOUTHDR_DSIZE bfd_h_get_64
44 #define PUT_AOUTHDR_DSIZE bfd_h_put_64
45 #define GET_AOUTHDR_BSIZE bfd_h_get_64
46 #define PUT_AOUTHDR_BSIZE bfd_h_put_64
47 #define GET_AOUTHDR_ENTRY bfd_h_get_64
48 #define PUT_AOUTHDR_ENTRY bfd_h_put_64
49 #define GET_SCNHDR_PADDR bfd_h_get_64
50 #define PUT_SCNHDR_PADDR bfd_h_put_64
51 #define GET_SCNHDR_VADDR bfd_h_get_64
52 #define PUT_SCNHDR_VADDR bfd_h_put_64
53 #define GET_SCNHDR_SIZE bfd_h_get_64
54 #define PUT_SCNHDR_SIZE bfd_h_put_64
55 #define GET_SCNHDR_SCNPTR bfd_h_get_64
56 #define PUT_SCNHDR_SCNPTR bfd_h_put_64
57 #define GET_SCNHDR_RELPTR bfd_h_get_64
58 #define PUT_SCNHDR_RELPTR bfd_h_put_64
59 #define GET_SCNHDR_LNNOPTR bfd_h_get_64
60 #define PUT_SCNHDR_LNNOPTR bfd_h_put_64
61 #define GET_SCNHDR_NRELOC bfd_h_get_32
62 #define MAX_SCNHDR_NRELOC 0xffffffff
63 #define PUT_SCNHDR_NRELOC bfd_h_put_32
64 #define GET_SCNHDR_NLNNO bfd_h_get_32
65 #define MAX_SCNHDR_NLNNO 0xffffffff
66 #define PUT_SCNHDR_NLNNO bfd_h_put_32
67 #define GET_RELOC_VADDR bfd_h_get_64
68 #define PUT_RELOC_VADDR bfd_h_put_64
70 #define COFF_FORCE_SYMBOLS_IN_STRINGS
71 #define COFF_DEBUG_STRING_WIDE_PREFIX
74 #define COFF_ADJUST_SCNHDR_OUT_POST(ABFD,INT,EXT) \
76 memset (((SCNHDR *)EXT)->s_pad, 0, sizeof (((SCNHDR *)EXT)->s_pad));\
79 #define NO_COFF_LINENOS
81 #define coff_SWAP_lineno_in xcoff64_swap_lineno_in
82 #define coff_SWAP_lineno_out xcoff64_swap_lineno_out
84 #define PUTWORD bfd_h_put_32
85 #define PUTHALF bfd_h_put_16
86 #define PUTBYTE bfd_h_put_8
87 #define GETWORD bfd_h_get_32
88 #define GETHALF bfd_h_get_16
89 #define GETBYTE bfd_h_get_8
92 /* For XCOFF64, the effective width of symndx changes depending on
93 whether we are the first entry. Sigh. */
95 xcoff64_swap_lineno_in (abfd
, ext1
, in1
)
100 LINENO
*ext
= (LINENO
*)ext1
;
101 struct internal_lineno
*in
= (struct internal_lineno
*)in1
;
103 in
->l_lnno
= bfd_h_get_32(abfd
, (bfd_byte
*) (ext
->l_lnno
));
105 in
->l_addr
.l_symndx
=
106 bfd_h_get_32(abfd
, (bfd_byte
*) ext
->l_addr
.l_symndx
);
108 in
->l_addr
.l_symndx
=
109 bfd_h_get_64(abfd
, (bfd_byte
*) ext
->l_addr
.l_symndx
);
113 xcoff64_swap_lineno_out (abfd
, inp
, outp
)
118 struct internal_lineno
*in
= (struct internal_lineno
*)inp
;
119 struct external_lineno
*ext
= (struct external_lineno
*)outp
;
120 PUTWORD(abfd
, in
->l_addr
.l_symndx
, (bfd_byte
*)
121 ext
->l_addr
.l_symndx
);
123 bfd_h_put_32 (abfd
, in
->l_lnno
, (bfd_byte
*) (ext
->l_lnno
));
125 bfd_h_put_32 (abfd
, in
->l_addr
.l_symndx
, (bfd_byte
*)ext
->l_addr
.l_symndx
);
127 bfd_h_put_64 (abfd
, in
->l_addr
.l_symndx
, (bfd_byte
*)ext
->l_addr
.l_symndx
);
129 return bfd_coff_linesz (abfd
);
133 static void xcoff64_swap_sym_in
PARAMS ((bfd
*, PTR
, PTR
));
134 static unsigned int xcoff64_swap_sym_out
PARAMS ((bfd
*, PTR
, PTR
));
135 static void xcoff64_swap_aux_in
PARAMS ((bfd
*, PTR
, int, int, int, int, PTR
));
136 static unsigned int xcoff64_swap_aux_out
PARAMS ((bfd
*, PTR
, int, int, int, int, PTR
));
139 xcoff64_swap_sym_in (abfd
, ext1
, in1
)
144 SYMENT
*ext
= (SYMENT
*)ext1
;
145 struct internal_syment
*in
= (struct internal_syment
*)in1
;
148 in
->_n
._n_n
._n_zeroes
= 0;
149 in
->_n
._n_n
._n_offset
= bfd_h_get_32(abfd
, (bfd_byte
*) ext
->e_offset
);
150 in
->n_value
= bfd_h_get_64(abfd
, (bfd_byte
*) ext
->e
.e_value
);
151 in
->n_scnum
= bfd_h_get_16(abfd
, (bfd_byte
*) ext
->e_scnum
);
152 in
->n_type
= bfd_h_get_16(abfd
, (bfd_byte
*) ext
->e_type
);
153 in
->n_sclass
= bfd_h_get_8(abfd
, ext
->e_sclass
);
154 in
->n_numaux
= bfd_h_get_8(abfd
, ext
->e_numaux
);
158 xcoff64_swap_sym_out (abfd
, inp
, extp
)
163 struct internal_syment
*in
= (struct internal_syment
*)inp
;
164 SYMENT
*ext
=(SYMENT
*)extp
;
166 bfd_h_put_32(abfd
, in
->_n
._n_n
._n_offset
, (bfd_byte
*) ext
->e_offset
);
167 bfd_h_put_64(abfd
, in
->n_value
, (bfd_byte
*) ext
->e
.e_value
);
168 bfd_h_put_16(abfd
, in
->n_scnum
, (bfd_byte
*) ext
->e_scnum
);
169 bfd_h_put_16(abfd
, in
->n_type
, (bfd_byte
*) ext
->e_type
);
170 bfd_h_put_8(abfd
, in
->n_sclass
, ext
->e_sclass
);
171 bfd_h_put_8(abfd
, in
->n_numaux
, ext
->e_numaux
);
172 return bfd_coff_symesz (abfd
);
176 xcoff64_swap_aux_in (abfd
, ext1
, type
, class, indx
, numaux
, in1
)
185 AUXENT
*ext
= (AUXENT
*)ext1
;
186 union internal_auxent
*in
= (union internal_auxent
*)in1
;
190 if (ext
->x_file
.x_fname
[0] == 0) {
191 in
->x_file
.x_n
.x_zeroes
= 0;
192 in
->x_file
.x_n
.x_offset
=
193 bfd_h_get_32(abfd
, (bfd_byte
*) ext
->x_file
.x_n
.x_offset
);
198 memcpy (in
->x_file
.x_fname
, ext
->x_file
.x_fname
,
199 numaux
* sizeof (AUXENT
));
203 memcpy (in
->x_file
.x_fname
, ext
->x_file
.x_fname
, FILNMLEN
);
208 /* RS/6000 "csect" auxents */
211 if (indx
+ 1 == numaux
)
213 in
->x_csect
.x_scnlen
.l
=
214 bfd_h_get_32(abfd
, ext
->x_csect
.x_scnlen_lo
);
215 /* FIXME: If we want section lengths larger than 32 bits, we need
216 to modify the internal coff structures to support it. */
217 in
->x_csect
.x_parmhash
= bfd_h_get_32 (abfd
,
218 ext
->x_csect
.x_parmhash
);
219 in
->x_csect
.x_snhash
= bfd_h_get_16 (abfd
, ext
->x_csect
.x_snhash
);
220 /* We don't have to hack bitfields in x_smtyp because it's
221 defined by shifts-and-ands, which are equivalent on all
223 in
->x_csect
.x_smtyp
= bfd_h_get_8 (abfd
, ext
->x_csect
.x_smtyp
);
224 in
->x_csect
.x_smclas
= bfd_h_get_8 (abfd
, ext
->x_csect
.x_smclas
);
232 if (type
== T_NULL
) {
233 /* PE defines some extra fields; we zero them out for
235 in
->x_scn
.x_checksum
= 0;
236 in
->x_scn
.x_associated
= 0;
237 in
->x_scn
.x_comdat
= 0;
244 if (class == C_BLOCK
|| class == C_FCN
|| ISFCN (type
) || ISTAG (class))
246 in
->x_sym
.x_fcnary
.x_fcn
.x_lnnoptr
= bfd_h_get_64(abfd
, (bfd_byte
*)
247 ext
->x_sym
.x_fcnary
.x_fcn
.x_lnnoptr
);
248 in
->x_sym
.x_fcnary
.x_fcn
.x_endndx
.l
= bfd_h_get_32(abfd
, (bfd_byte
*)
249 ext
->x_sym
.x_fcnary
.x_fcn
.x_endndx
);
252 in
->x_sym
.x_misc
.x_fsize
= bfd_h_get_32(abfd
, (bfd_byte
*) ext
->x_sym
.x_fcnary
.x_fcn
.x_fsize
);
255 in
->x_sym
.x_misc
.x_lnsz
.x_lnno
= bfd_h_get_32(abfd
, (bfd_byte
*)
256 ext
->x_sym
.x_fcnary
.x_lnsz
.x_lnno
);
257 in
->x_sym
.x_misc
.x_lnsz
.x_size
= bfd_h_get_16(abfd
, (bfd_byte
*)
258 ext
->x_sym
.x_fcnary
.x_lnsz
.x_size
);
262 /* the semicolon is because MSVC doesn't like labels at
270 xcoff64_swap_aux_out (abfd
, inp
, type
, class, indx
, numaux
, extp
)
275 int indx ATTRIBUTE_UNUSED
;
276 int numaux ATTRIBUTE_UNUSED
;
279 union internal_auxent
*in
= (union internal_auxent
*)inp
;
280 AUXENT
*ext
= (AUXENT
*)extp
;
282 memset((PTR
)ext
, 0, bfd_coff_auxesz (abfd
));
286 if (in
->x_file
.x_fname
[0] == 0)
288 PUTWORD(abfd
, 0, (bfd_byte
*) ext
->x_file
.x_n
.x_zeroes
);
290 in
->x_file
.x_n
.x_offset
,
291 (bfd_byte
*) ext
->x_file
.x_n
.x_offset
);
295 memcpy (ext
->x_file
.x_fname
, in
->x_file
.x_fname
, FILNMLEN
);
297 PUTBYTE (abfd
, _AUX_FILE
, (bfd_byte
*) ext
->x_auxtype
.x_auxtype
);
300 /* RS/6000 "csect" auxents */
303 if (indx
+ 1 == numaux
)
305 PUTWORD (abfd
, in
->x_csect
.x_scnlen
.l
, ext
->x_csect
.x_scnlen_lo
);
306 PUTWORD (abfd
, in
->x_csect
.x_parmhash
, ext
->x_csect
.x_parmhash
);
307 PUTHALF (abfd
, in
->x_csect
.x_snhash
, ext
->x_csect
.x_snhash
);
308 /* We don't have to hack bitfields in x_smtyp because it's
309 defined by shifts-and-ands, which are equivalent on all
311 PUTBYTE (abfd
, in
->x_csect
.x_smtyp
, ext
->x_csect
.x_smtyp
);
312 PUTBYTE (abfd
, in
->x_csect
.x_smclas
, ext
->x_csect
.x_smclas
);
313 PUTBYTE (abfd
, _AUX_CSECT
, (bfd_byte
*) ext
->x_auxtype
.x_auxtype
);
321 if (type
== T_NULL
) {
327 if (class == C_BLOCK
|| class == C_FCN
|| ISFCN (type
) || ISTAG (class))
329 bfd_h_put_64(abfd
, in
->x_sym
.x_fcnary
.x_fcn
.x_lnnoptr
,
330 (bfd_byte
*) ext
->x_sym
.x_fcnary
.x_fcn
.x_lnnoptr
);
331 PUTBYTE (abfd
, _AUX_FCN
, (bfd_byte
*) ext
->x_auxtype
.x_auxtype
);
332 PUTWORD(abfd
, in
->x_sym
.x_fcnary
.x_fcn
.x_endndx
.l
,
333 (bfd_byte
*) ext
->x_sym
.x_fcnary
.x_fcn
.x_endndx
);
336 PUTWORD (abfd
, in
->x_sym
.x_misc
.x_fsize
,
337 (bfd_byte
*) ext
->x_sym
.x_fcnary
.x_fcn
.x_fsize
);
340 bfd_h_put_32(abfd
, in
->x_sym
.x_misc
.x_lnsz
.x_lnno
,
341 (bfd_byte
*)ext
->x_sym
.x_fcnary
.x_lnsz
.x_lnno
);
342 bfd_h_put_16(abfd
, in
->x_sym
.x_misc
.x_lnsz
.x_size
,
343 (bfd_byte
*)ext
->x_sym
.x_fcnary
.x_lnsz
.x_size
);
347 return bfd_coff_auxesz (abfd
);
351 #define coff_SWAP_sym_in xcoff64_swap_sym_in
352 #define coff_SWAP_sym_out xcoff64_swap_sym_out
353 #define coff_SWAP_aux_in xcoff64_swap_aux_in
354 #define coff_SWAP_aux_out xcoff64_swap_aux_out
356 #define TARGET_NAME "aixcoff64-rs6000"
357 #define TARGET_SYM rs6000coff64_vec
359 #include "xcoff-target.h"
This page took 0.03627 seconds and 4 git commands to generate.