Commit | Line | Data |
---|---|---|
252b5132 | 1 | /* This file is tc-alpha.h |
a161fe53 | 2 | Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002 |
f7e42eb4 | 3 | Free Software Foundation, Inc. |
252b5132 RH |
4 | Written by Ken Raeburn <raeburn@cygnus.com>. |
5 | ||
6 | This file is part of GAS, the GNU Assembler. | |
7 | ||
8 | GAS is free software; you can redistribute it and/or modify | |
9 | it under the terms of the GNU General Public License as published by | |
10 | the Free Software Foundation; either version 2, or (at your option) | |
11 | any later version. | |
12 | ||
13 | GAS is distributed in the hope that it will be useful, | |
14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | GNU General Public License for more details. | |
17 | ||
18 | You should have received a copy of the GNU General Public License | |
19 | along with GAS; see the file COPYING. If not, write to the Free | |
20 | Software Foundation, 59 Temple Place - Suite 330, Boston, MA | |
21 | 02111-1307, USA. */ | |
22 | ||
23 | #define TC_ALPHA | |
24 | ||
25 | #define TARGET_BYTES_BIG_ENDIAN 0 | |
26 | ||
27 | #define WORKING_DOT_WORD | |
28 | ||
29 | #define TARGET_ARCH bfd_arch_alpha | |
30 | ||
31 | #define TARGET_FORMAT (OUTPUT_FLAVOR == bfd_target_ecoff_flavour \ | |
32 | ? "ecoff-littlealpha" \ | |
33 | : OUTPUT_FLAVOR == bfd_target_elf_flavour \ | |
34 | ? "elf64-alpha" \ | |
35 | : OUTPUT_FLAVOR == bfd_target_evax_flavour \ | |
36 | ? "vms-alpha" \ | |
37 | : "unknown-format") | |
38 | ||
39 | #define NEED_LITERAL_POOL | |
252b5132 RH |
40 | #define REPEAT_CONS_EXPRESSIONS |
41 | ||
a161fe53 AM |
42 | struct fix; |
43 | struct alpha_reloc_tag; | |
44 | ||
543833df | 45 | extern void alpha_validate_fix PARAMS ((struct fix *)); |
252b5132 RH |
46 | extern int alpha_force_relocation PARAMS ((struct fix *)); |
47 | extern int alpha_fix_adjustable PARAMS ((struct fix *)); | |
48 | ||
49 | extern unsigned long alpha_gprmask, alpha_fprmask; | |
50 | extern valueT alpha_gp_value; | |
51 | ||
a7fda457 | 52 | #ifdef OBJ_ELF |
a161fe53 | 53 | #define TC_VALIDATE_FIX(FIX,SEGTYPE,SKIP) alpha_validate_fix (FIX) |
a7fda457 | 54 | #endif |
a161fe53 AM |
55 | #define TC_FORCE_RELOCATION(FIX) alpha_force_relocation (FIX) |
56 | #define tc_fix_adjustable(FIX) alpha_fix_adjustable (FIX) | |
252b5132 RH |
57 | #define RELOC_REQUIRES_SYMBOL |
58 | ||
a161fe53 AM |
59 | /* Values passed to md_apply_fix3 don't include the symbol value. */ |
60 | #define MD_APPLY_SYM_VALUE(FIX) 0 | |
252b5132 RH |
61 | |
62 | #define md_convert_frag(b,s,f) as_fatal ("alpha convert_frag\n") | |
63 | #define md_estimate_size_before_relax(f,s) \ | |
07726851 | 64 | (as_fatal ("estimate_size_before_relax called"),1) |
252b5132 RH |
65 | #define md_operand(x) |
66 | ||
67 | #ifdef OBJ_EVAX | |
68 | ||
69 | /* This field keeps the symbols position in the link section. */ | |
70 | #define OBJ_SYMFIELD_TYPE valueT | |
71 | ||
72 | #define TC_CONS_FIX_NEW(FRAG,OFF,LEN,EXP) \ | |
73 | fix_new_exp (FRAG, OFF, (int)LEN, EXP, 0, \ | |
74 | LEN == 2 ? BFD_RELOC_16 \ | |
75 | : LEN == 4 ? BFD_RELOC_32 \ | |
76 | : LEN == 8 ? BFD_RELOC_64 \ | |
77 | : BFD_RELOC_ALPHA_LINKAGE); | |
78 | #endif | |
79 | ||
80 | #define md_number_to_chars number_to_chars_littleendian | |
81 | ||
82 | extern int tc_get_register PARAMS ((int frame)); | |
83 | extern void alpha_frob_ecoff_data PARAMS ((void)); | |
84 | ||
85 | #define tc_frob_label(sym) alpha_define_label (sym) | |
49309057 | 86 | extern void alpha_define_label PARAMS ((symbolS *)); |
252b5132 RH |
87 | |
88 | #define md_cons_align(nbytes) alpha_cons_align (nbytes) | |
89 | extern void alpha_cons_align PARAMS ((int)); | |
90 | ||
0a9ef439 RH |
91 | #define HANDLE_ALIGN(fragp) alpha_handle_align (fragp) |
92 | extern void alpha_handle_align PARAMS ((struct frag *)); | |
93 | ||
94 | #define MAX_MEM_FOR_RS_ALIGN_CODE (3 + 4 + 8) | |
95 | ||
252b5132 RH |
96 | #ifdef OBJ_ECOFF |
97 | #define tc_frob_file_before_adjust() alpha_frob_file_before_adjust () | |
98 | extern void alpha_frob_file_before_adjust PARAMS ((void)); | |
99 | #endif | |
100 | ||
101 | #define DIFF_EXPR_OK /* foo-. gets turned into PC relative relocs */ | |
102 | ||
103 | #ifdef OBJ_ELF | |
104 | #define ELF_TC_SPECIAL_SECTIONS \ | |
105 | { ".sdata", SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_ALPHA_GPREL }, \ | |
106 | { ".sbss", SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_ALPHA_GPREL }, | |
d61a78a7 RH |
107 | |
108 | #define md_elf_section_letter alpha_elf_section_letter | |
109 | extern int alpha_elf_section_letter PARAMS ((int, char **)); | |
110 | #define md_elf_section_flags alpha_elf_section_flags | |
111 | extern flagword alpha_elf_section_flags PARAMS ((flagword, int, int)); | |
252b5132 | 112 | #endif |
43b4c25e MM |
113 | |
114 | /* Whether to add support for explict !relocation_op!sequence_number. At the | |
115 | moment, only do this for ELF, though ECOFF could use it as well. */ | |
116 | ||
117 | #ifdef OBJ_ELF | |
118 | #define RELOC_OP_P | |
119 | #endif | |
120 | ||
19f78583 RH |
121 | /* Before the relocations are written, reorder them, so that user |
122 | supplied !lituse relocations follow the appropriate !literal | |
123 | relocations. Also convert the gas-internal relocations to the | |
124 | appropriate linker relocations. */ | |
a161fe53 AM |
125 | #define tc_frob_file_before_fix() alpha_before_fix () |
126 | extern void alpha_before_fix PARAMS ((void)); | |
43b4c25e MM |
127 | |
128 | /* New fields for supporting explicit relocations (such as !literal to mark | |
129 | where a pointer is loaded from the global table, and !lituse_base to track | |
130 | all of the normal uses of that pointer). */ | |
131 | ||
132 | #define TC_FIX_TYPE struct alpha_fix_tag | |
133 | ||
134 | struct alpha_fix_tag | |
135 | { | |
19f78583 RH |
136 | struct fix *next_reloc; /* next !lituse or !gpdisp */ |
137 | struct alpha_reloc_tag *info; /* other members with same sequence */ | |
43b4c25e MM |
138 | }; |
139 | ||
140 | /* Initialize the TC_FIX_TYPE field. */ | |
a161fe53 | 141 | #define TC_INIT_FIX_DATA(FIX) \ |
43b4c25e | 142 | do { \ |
a161fe53 AM |
143 | FIX->tc_fix_data.next_reloc = (struct fix *) 0; \ |
144 | FIX->tc_fix_data.info = (struct alpha_reloc_tag *) 0; \ | |
43b4c25e MM |
145 | } while (0) |
146 | ||
147 | /* Work with DEBUG5 to print fields in tc_fix_type. */ | |
a161fe53 | 148 | #define TC_FIX_DATA_PRINT(STREAM, FIX) \ |
43b4c25e | 149 | do { \ |
a161fe53 AM |
150 | if (FIX->tc_fix_data.info) \ |
151 | fprintf (STREAM, "\tinfo = 0x%lx, next_reloc = 0x%lx\n", \ | |
152 | (long) FIX->tc_fix_data.info, \ | |
153 | (long) FIX->tc_fix_data.next_reloc); \ | |
43b4c25e | 154 | } while (0) |
4dc7ead9 RH |
155 | |
156 | #define DWARF2_LINE_MIN_INSN_LENGTH 4 |