/* write.h
+ Copyright (C) 1987-2020 Free Software Foundation, Inc.
- Copyright (C) 1987, 1992 Free Software Foundation, Inc.
-
This file is part of GAS, the GNU Assembler.
-
+
GAS is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2, or (at your option)
+ the Free Software Foundation; either version 3, or (at your option)
any later version.
-
+
GAS is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with GAS; see the file COPYING. If not, write to
- the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
-#ifndef TC_I960
-#ifdef hpux
-#define EXEC_MACHINE_TYPE HP9000S200_ID
-#endif
-#endif /* TC_I960 */
+ You should have received a copy of the GNU General Public License
+ along with GAS; see the file COPYING. If not, write to the Free
+ Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
+ 02110-1301, USA. */
-#ifndef LOCAL_LABEL
-#ifdef DOT_LABEL_PREFIX
-#define LOCAL_LABEL(name) (name[0] =='.' \
- && ( name [1] == 'L' || name [1] == '.' ))
-#else /* not defined DOT_LABEL_PREFIX */
-#define LOCAL_LABEL(name) (name [0] == 'L' )
-#endif /* not defined DOT_LABEL_PREFIX */
-#endif /* LOCAL_LABEL */
+#ifndef __write_h__
+#define __write_h__
-#define S_LOCAL_NAME(s) (LOCAL_LABEL(S_GET_NAME(s)))
+/* This is the name of a fake symbol which will never appear in the
+ assembler output. S_IS_LOCAL detects it because of the \001. */
+#ifndef FAKE_LABEL_NAME
+#define FAKE_LABEL_NAME "L0\001"
+#endif
-#include "bit_fix.h"
+/* This is a special character that is used to indicate a fake label.
+ It must be present in FAKE_LABEL_NAME, although it does not have to
+ be the first character. It must not be a character that would be
+ found in a valid symbol name.
+
+ Also be aware that the function _bfd_elf_is_local_label_name in
+ bfd/elf.c has an implicit assumption that FAKE_LABEL_CHAR is '\001'.
+ If this is not the case then FAKE_LABEL_NAME must start with ".L" in
+ order for the function to continue working. */
+#ifndef FAKE_LABEL_CHAR
+#define FAKE_LABEL_CHAR '\001'
+#endif
/*
* FixSs may be built up in any order.
*/
-struct fix {
- fragS *fx_frag; /* Which frag? */
- long fx_where; /* Where is the 1st byte to fix up? */
- symbolS *fx_addsy; /* NULL or Symbol whose value we add in. */
- symbolS *fx_subsy; /* NULL or Symbol whose value we subtract. */
- long fx_offset; /* Absolute number we add in. */
- struct fix *fx_next; /* NULL or -> next fixS. */
- short int fx_size; /* How many bytes are involved? */
- char fx_pcrel; /* TRUE: pc-relative. */
- char fx_pcrel_adjust; /* pc-relative offset adjust */
- char fx_im_disp; /* TRUE: value is a displacement */
- bit_fixS *fx_bit_fixP; /* IF NULL no bitfix's to do */
- char fx_bsr; /* sequent-hack */
-#if defined(TC_SPARC) || defined(TC_A29K) || defined(NEED_FX_R_TYPE)
- /* Hacks for machines where the type of reloc can't be
- worked out by looking at how big it is */
-
- int fx_r_type;
-#endif
- char fx_callj; /* TRUE if target is a 'callj' (used by i960) */
- long fx_addnumber;
-};
+struct fix
+{
+ /* Next fixS in linked list, or NULL. */
+ struct fix *fx_next;
-typedef struct fix fixS;
+ /* These small fields are grouped together for compactness of
+ this structure, and efficiency of access on some architectures. */
-COMMON char *next_object_file_charP;
+ /* Is this a pc-relative relocation? */
+ unsigned fx_pcrel : 1;
-#ifndef MANY_SEGMENTS
-COMMON fixS *text_fix_root, *text_fix_tail; /* Chains fixSs. */
-COMMON fixS *data_fix_root, *data_fix_tail; /* Chains fixSs. */
-COMMON fixS *bss_fix_root, *bss_fix_tail; /* Chains fixSs. */
-#endif
-COMMON fixS **seg_fix_rootP, **seg_fix_tailP; /* -> one of above. */
-extern long string_byte_count;
-extern int section_alignment[];
-
-#if __STDC__ == 1
-
-bit_fixS *bit_fix_new(int size, int offset, long base_type, long base_adj, long min, long max, long add);
-void append(char **charPP, char *fromP, unsigned long length);
-void record_alignment(segT seg, int align);
-void write_object_file(void);
-
-fixS *fix_new(fragS *frag,
- int where,
- int size,
- symbolS *add_symbol,
- symbolS *sub_symbol,
- long offset,
- int pcrel
-#if defined(TC_SPARC) || defined(TC_A29K) || defined(NEED_FX_R_TYPE)
- , int r_type
-#endif
-);
+ /* Has this relocation already been applied? */
+ unsigned fx_done : 1;
-#else /* not __STDC__ */
+ /* Suppress overflow complaints on large addends. This is used
+ in the PowerPC ELF config to allow large addends on the
+ BFD_RELOC_{LO16,HI16,HI16_S} relocations.
-bit_fixS *bit_fix_new();
-fixS *fix_new();
-void append();
-void record_alignment();
-void write_object_file();
+ @@ Can this be determined from BFD? */
+ unsigned fx_no_overflow : 1;
-#endif /* not __STDC__ */
+ /* The value is signed when checking for overflow. */
+ unsigned fx_signed : 1;
-/*
- * Local Variables:
- * comment-column: 0
- * fill-column: 131
- * End:
- */
+ /* Some bits for the CPU specific code. */
+ unsigned fx_tcbit : 1;
+ unsigned fx_tcbit2 : 1;
+
+ /* Spare bits. */
+ unsigned fx_unused : 10;
+
+ /* pc-relative offset adjust (only used by some CPU specific code) */
+ int fx_pcrel_adjust : 8;
+
+ /* How many bytes are involved? */
+ unsigned fx_size : 8;
+
+ bfd_reloc_code_real_type fx_r_type;
+
+ /* Which frag does this fix apply to? */
+ fragS *fx_frag;
+
+ /* The location within the frag where the fixup occurs. */
+ unsigned long fx_where;
+
+ /* NULL or Symbol whose value we add in. */
+ symbolS *fx_addsy;
+
+ /* NULL or Symbol whose value we subtract. */
+ symbolS *fx_subsy;
+
+ /* Absolute number we add in. */
+ valueT fx_offset;
+
+ /* The value of dot when the fixup expression was parsed. */
+ addressT fx_dot_value;
+
+ /* The frag fx_dot_value is based on. */
+ fragS *fx_dot_frag;
+
+ /* This field is sort of misnamed. It appears to be a sort of random
+ scratch field, for use by the back ends. The main gas code doesn't
+ do anything but initialize it to zero. The use of it does need to
+ be coordinated between the cpu and format files, though. E.g., some
+ coff targets pass the `addend' field from the cpu file via this
+ field. I don't know why the `fx_offset' field above can't be used
+ for that; investigate later and document. KR */
+ valueT fx_addnumber;
+
+ /* The location of the instruction which created the reloc, used
+ in error messages. */
+ const char *fx_file;
+ unsigned fx_line;
+
+#ifdef USING_CGEN
+ struct {
+ /* CGEN_INSN entry for this instruction. */
+ const struct cgen_insn *insn;
+ /* Target specific data, usually reloc number. */
+ int opinfo;
+ /* Which ifield this fixup applies to. */
+ struct cgen_maybe_multi_ifield * field;
+ /* is this field is the MSB field in a set? */
+ int msb_field_p;
+ } fx_cgen;
+#endif
+
+#ifdef TC_FIX_TYPE
+ /* Location where a backend can attach additional data
+ needed to perform fixups. */
+ TC_FIX_TYPE tc_fix_data;
+#endif
+};
+
+typedef struct fix fixS;
+
+struct reloc_list
+{
+ struct reloc_list *next;
+ union
+ {
+ struct
+ {
+ symbolS *offset_sym;
+ reloc_howto_type *howto;
+ symbolS *sym;
+ bfd_vma addend;
+ } a;
+ struct
+ {
+ asection *sec;
+ asymbol *s;
+ arelent r;
+ } b;
+ } u;
+ const char *file;
+ unsigned int line;
+};
-/* end of write.h */
+extern int finalize_syms;
+extern symbolS *abs_section_sym;
+extern addressT dot_value;
+extern fragS *dot_frag;
+extern struct reloc_list* reloc_list;
+
+extern void append (char **, char *, unsigned long);
+extern void record_alignment (segT, unsigned);
+extern int get_recorded_alignment (segT);
+extern void write_object_file (void);
+extern long relax_frag (segT, fragS *, long);
+extern int relax_segment (struct frag *, segT, int);
+extern void number_to_chars_littleendian (char *, valueT, int);
+extern void number_to_chars_bigendian (char *, valueT, int);
+extern fixS *fix_new (fragS *, unsigned long, unsigned long, symbolS *,
+ offsetT, int, bfd_reloc_code_real_type);
+extern fixS *fix_at_start (fragS *, unsigned long, symbolS *,
+ offsetT, int, bfd_reloc_code_real_type);
+extern fixS *fix_new_exp (fragS *, unsigned long, unsigned long,
+ expressionS *, int, bfd_reloc_code_real_type);
+extern void write_print_statistics (FILE *);
+
+#endif /* __write_h__ */