[deliverable/binutils-gdb.git] / gas / config / tc-arm.h

/* This file is tc-arm.h
   Copyright (C) 1994-2018 Free Software Foundation, Inc.
   Contributed by Richard Earnshaw (rwe@pegasus.esprit.ec.org)
	Modified by David Taylor (dtaylor@armltd.co.uk)

   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 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, 51 Franklin Street - Fifth Floor, Boston, MA
   02110-1301, USA.  */

#define TC_ARM 1

#ifndef TARGET_BYTES_BIG_ENDIAN
#define TARGET_BYTES_BIG_ENDIAN 0
#endif

#define WORKING_DOT_WORD

#define COFF_MAGIC 	ARMMAGIC
#define TARGET_ARCH 	bfd_arch_arm

#define DIFF_EXPR_OK

#ifdef  LITTLE_ENDIAN
#undef  LITTLE_ENDIAN
#endif

#ifdef  BIG_ENDIAN
#undef  BIG_ENDIAN
#endif

#define LITTLE_ENDIAN 	1234
#define BIG_ENDIAN 	4321

struct fix;

#if defined OBJ_AOUT
# if defined TE_RISCIX
#  define TARGET_FORMAT "a.out-riscix"
# elif defined TE_LINUX
#  define ARM_BI_ENDIAN
#  define TARGET_FORMAT "a.out-arm-linux"
# elif defined TE_NetBSD
#  define TARGET_FORMAT "a.out-arm-netbsd"
# else
#  define ARM_BI_ENDIAN
#  define TARGET_FORMAT (target_big_endian ? "a.out-arm-big" : "a.out-arm-little")
# endif
#elif defined OBJ_AIF
# define TARGET_FORMAT "aif"
#elif defined OBJ_COFF
# define ARM_BI_ENDIAN
# if defined TE_PE
#  if defined TE_EPOC
#   define TARGET_FORMAT (target_big_endian ? "epoc-pe-arm-big" : "epoc-pe-arm-little")
#  elif defined TE_WINCE
#   define TARGET_FORMAT (target_big_endian ? "pe-arm-wince-big" : "pe-arm-wince-little")
#  else
#   define TARGET_FORMAT (target_big_endian ? "pe-arm-big" : "pe-arm-little")
#  endif
# else
#  define TARGET_FORMAT (target_big_endian ? "coff-arm-big" : "coff-arm-little")
# endif
#elif defined OBJ_ELF
# define ARM_BI_ENDIAN
# define TARGET_FORMAT	elf32_arm_target_format ()
#endif

/* We support double slash line-comments for compatibility with the ARM AArch64 Assembler.  */
#define DOUBLESLASH_LINE_COMMENTS

/* We conditionally support labels without a colon.  */
#define LABELS_WITHOUT_COLONS codecomposer_syntax
extern bfd_boolean codecomposer_syntax;

#define tc_symbol_chars arm_symbol_chars
extern const char arm_symbol_chars[];

#define TC_FORCE_RELOCATION(FIX) arm_force_relocation (FIX)

extern unsigned int arm_frag_max_var (struct frag *);
#define md_frag_max_var arm_frag_max_var

#define md_relax_frag(segment, fragp, stretch) \
  arm_relax_frag (segment, fragp, stretch)
extern int arm_relax_frag (asection *, struct frag *, long);

#define md_optimize_expr(l,o,r)		arm_optimize_expr (l, o, r)
extern int arm_optimize_expr (expressionS *, operatorT, expressionS *);

#define md_cleanup() arm_cleanup ()

#define md_start_line_hook() arm_start_line_hook ()

#define TC_START_LABEL_WITHOUT_COLON(NUL_CHAR, NEXT_CHAR) \
  tc_start_label_without_colon ()
extern bfd_boolean tc_start_label_without_colon (void);

#define tc_frob_label(S) arm_frob_label (S)

/* We also need to mark assembler created symbols:  */
#define tc_frob_fake_label(S) arm_frob_label (S)

#ifdef OBJ_ELF
#define md_end arm_md_end
extern void arm_md_end (void);
bfd_boolean arm_is_eabi (void);

#define md_post_relax_hook		arm_md_post_relax ()
extern void arm_md_post_relax (void);
#endif

/* NOTE: The fake label creation in stabs.c:s_stab_generic() has
   deliberately not been updated to mark assembler created stabs
   symbols as Thumb.  */

#define TC_FIX_TYPE int
#define TC_INIT_FIX_DATA(FIX) ((FIX)->tc_fix_data = 0)

/* We need to keep some local information on symbols.  */

#define TC_SYMFIELD_TYPE 	unsigned int
#define ARM_GET_FLAG(s)   	(*symbol_get_tc (s))
#define ARM_SET_FLAG(s,v) 	(*symbol_get_tc (s) |= (v))
#define ARM_RESET_FLAG(s,v) 	(*symbol_get_tc (s) &= ~(v))

#define ARM_FLAG_THUMB 		(1 << 0)	/* The symbol is a Thumb symbol rather than an Arm symbol.  */
#define ARM_FLAG_INTERWORK 	(1 << 1)	/* The symbol is attached to code that supports interworking.  */
#define THUMB_FLAG_FUNC		(1 << 2)	/* The symbol is attached to the start of a Thumb function.  */

#define ARM_IS_THUMB(s)		(ARM_GET_FLAG (s) & ARM_FLAG_THUMB)
#define ARM_IS_INTERWORK(s)	(ARM_GET_FLAG (s) & ARM_FLAG_INTERWORK)

#ifdef OBJ_ELF

/* For ELF objects THUMB_IS_FUNC is inferred from
   ARM_IS_THUMB and the function type.  */
#define THUMB_IS_FUNC(s)					\
  ((s) != NULL							\
   && ((arm_is_eabi ()						\
	&& (ARM_IS_THUMB (s))					\
	&& (symbol_get_bfdsym (s)->flags & BSF_FUNCTION))	\
       || (ARM_GET_FLAG (s) & THUMB_FLAG_FUNC)))

#define ARM_IS_FUNC(s)					\
  (((s) != NULL						\
    && arm_is_eabi ()					\
    && !(ARM_IS_THUMB (s))				\
    /* && !(THUMB_FLAG_FUNC & ARM_GET_FLAG (s)) \ */	\
    && (symbol_get_bfdsym (s)->flags & BSF_FUNCTION)))


#else

#define THUMB_IS_FUNC(s)	((s) && ARM_GET_FLAG (s) & THUMB_FLAG_FUNC)
#define ARM_IS_FUNC(s)          (!THUMB_IS_FUNC (s) \
				 && (s) && (symbol_get_bfdsym (s)->flags & BSF_FUNCTION))
#endif

#define ARM_SET_THUMB(s,t)      ((t) ? ARM_SET_FLAG (s, ARM_FLAG_THUMB)     : ARM_RESET_FLAG (s, ARM_FLAG_THUMB))
#define ARM_SET_INTERWORK(s,t)  ((t) ? ARM_SET_FLAG (s, ARM_FLAG_INTERWORK) : ARM_RESET_FLAG (s, ARM_FLAG_INTERWORK))
#define THUMB_SET_FUNC(s,t)     ((t) ? ARM_SET_FLAG (s, THUMB_FLAG_FUNC)    : ARM_RESET_FLAG (s, THUMB_FLAG_FUNC))

void arm_copy_symbol_attributes (symbolS *, symbolS *);

#ifndef TC_COPY_SYMBOL_ATTRIBUTES
#define TC_COPY_SYMBOL_ATTRIBUTES(DEST, SRC) \
  (arm_copy_symbol_attributes (DEST, SRC))
#endif

#define TC_START_LABEL(STR, NUL_CHAR, NEXT_CHAR)			\
  (NEXT_CHAR == ':' || (NEXT_CHAR == '/' && arm_data_in_code ()))
#define tc_canonicalize_symbol_name(str) arm_canonicalize_symbol_name (str);
#define obj_adjust_symtab() 		 arm_adjust_symtab ()

#define LISTING_HEADER "ARM GAS "

#define OPTIONAL_REGISTER_PREFIX '%'

#define LOCAL_LABEL(name)  (name[0] == '.' && name[1] == 'L')
#define LOCAL_LABELS_FB    1

/* This expression evaluates to true if the relocation is for a local
   object for which we still want to do the relocation at runtime.
   False if we are willing to perform this relocation while building
   the .o file.  GOTOFF does not need to be checked here because it is
   not pcrel.  I am not sure if some of the others are ever used with
   pcrel, but it is easier to be safe than sorry.  */

#define TC_FORCE_RELOCATION_LOCAL(FIX)			\
  (GENERIC_FORCE_RELOCATION_LOCAL (FIX)			\
   || (FIX)->fx_r_type == BFD_RELOC_ARM_GOT32		\
   || (FIX)->fx_r_type == BFD_RELOC_32			\
   || ((FIX)->fx_addsy != NULL				\
       && S_IS_WEAK ((FIX)->fx_addsy)))

/* Force output of R_ARM_REL32 relocations against thumb function symbols.
   This is needed to ensure the low bit is handled correctly.  */
#define TC_FORCE_RELOCATION_SUB_SAME(FIX, SEG)	\
  (GENERIC_FORCE_RELOCATION_SUB_SAME (FIX, SEG)	\
   || THUMB_IS_FUNC ((FIX)->fx_addsy))

#define TC_FORCE_RELOCATION_ABS(FIX)			\
  (((FIX)->fx_pcrel					\
    && (FIX)->fx_r_type != BFD_RELOC_32			\
    && (FIX)->fx_r_type != BFD_RELOC_ARM_GOT32)		\
   || TC_FORCE_RELOCATION(FIX))

#define TC_CONS_FIX_NEW cons_fix_new_arm

#define MAX_MEM_ALIGNMENT_BYTES    6
#define MAX_MEM_FOR_RS_ALIGN_CODE ((1 << MAX_MEM_ALIGNMENT_BYTES) - 1)

/* For frags in code sections we need to record whether they contain
   ARM code or THUMB code.  This is that if they have to be aligned,
   they can contain the correct type of no-op instruction.  */
struct arm_frag_type
{
  int thumb_mode;
#ifdef OBJ_ELF
  /* If there is a mapping symbol at offset 0 in this frag,
     it will be saved in FIRST_MAP.  If there are any mapping
     symbols in this frag, the last one will be saved in
     LAST_MAP.  */
  symbolS *first_map, *last_map;
#endif
};

static inline int
arm_min (int am_p1, int am_p2)
{
  return am_p1 < am_p2 ? am_p1 : am_p2;
}

#define TC_FRAG_TYPE		struct arm_frag_type
/* NOTE: max_chars is a local variable from frag_var / frag_variant.  */
#define TC_FRAG_INIT(fragp)	arm_init_frag (fragp, max_chars)
#define TC_ALIGN_ZERO_IS_DEFAULT 1
#define HANDLE_ALIGN(fragp)	arm_handle_align (fragp)
/* PR gas/19276: COFF/PE segment alignment is already handled in coff_frob_section().  */
#ifndef TE_PE
#define SUB_SEGMENT_ALIGN(SEG, FRCHAIN)				\
  ((!(FRCHAIN)->frch_next && subseg_text_p (SEG))		\
   ? arm_min (2, get_recorded_alignment (SEG)) : 0)
#endif

#define md_do_align(N, FILL, LEN, MAX, LABEL)					\
  if (FILL == NULL && (N) != 0 && ! need_pass_2 && subseg_text_p (now_seg))	\
    {										\
      arm_frag_align_code (N, MAX);						\
      goto LABEL;								\
    }

#define DWARF2_LINE_MIN_INSN_LENGTH 	2

/* The lr register is r14.  */
#define DWARF2_DEFAULT_RETURN_COLUMN  14

/* Registers are generally saved at negative offsets to the CFA.  */
#define DWARF2_CIE_DATA_ALIGNMENT     (-4)

/* State variables for IT block handling.  */
enum it_state
{
  OUTSIDE_IT_BLOCK, MANUAL_IT_BLOCK, AUTOMATIC_IT_BLOCK
};
struct current_it
{
  int mask;
  enum it_state state;
  int cc;
  int block_length;
  char *insn;
  int state_handled;
  int warn_deprecated;
  int insn_cond;
};

#ifdef OBJ_ELF
# define obj_frob_symbol(sym, punt)	armelf_frob_symbol ((sym), & (punt))
# define md_elf_section_change_hook()	arm_elf_change_section ()
# define md_elf_section_type(str, len)	arm_elf_section_type (str, len)
# define GLOBAL_OFFSET_TABLE_NAME	"_GLOBAL_OFFSET_TABLE_"
# define TC_SEGMENT_INFO_TYPE 		struct arm_segment_info_type

/* This is not really an alignment operation, but it's something we
   need to do at the same time: whenever we are figuring out the
   alignment for data, we should check whether a $d symbol is
   necessary.  */
# define md_cons_align(nbytes)		mapping_state (MAP_DATA)

enum mstate
{
  MAP_UNDEFINED = 0, /* Must be zero, for seginfo in new sections.  */
  MAP_DATA,
  MAP_ARM,
  MAP_THUMB
};

void mapping_state (enum mstate);

struct arm_segment_info_type
{
  enum mstate mapstate;

  /* Bit N indicates that an R_ARM_NONE relocation has been output for
     __aeabi_unwind_cpp_prN already if set. This enables dependencies to be
     emitted only once per section, to save unnecessary bloat.  */
  unsigned int marked_pr_dependency;

  struct current_it current_it;
};

/* We want .cfi_* pseudo-ops for generating unwind info.  */
#define TARGET_USE_CFIPOP              1

/* CFI hooks.  */
#define tc_regname_to_dw2regnum            tc_arm_regname_to_dw2regnum
#define tc_cfi_frame_initial_instructions  tc_arm_frame_initial_instructions

#else /* Not OBJ_ELF.  */
#define GLOBAL_OFFSET_TABLE_NAME "__GLOBAL_OFFSET_TABLE_"
#endif

#if defined OBJ_ELF || defined OBJ_COFF

# define EXTERN_FORCE_RELOC 			1
# define tc_fix_adjustable(FIX) 		arm_fix_adjustable (FIX)
#endif

#ifdef OBJ_ELF
/* Values passed to md_apply_fix don't include the symbol value.  */
# define MD_APPLY_SYM_VALUE(FIX) 		arm_apply_sym_value (FIX, this_segment)
#endif

#ifdef OBJ_COFF
# define TC_VALIDATE_FIX(FIX, SEGTYPE, LABEL)	arm_validate_fix (FIX)
/* Values passed to md_apply_fix don't include the symbol value.  */
# define MD_APPLY_SYM_VALUE(FIX) 		0
#endif

#define MD_PCREL_FROM_SECTION(F,S) md_pcrel_from_section(F,S)

extern long md_pcrel_from_section (struct fix *, segT);
extern void arm_frag_align_code (int, int);
extern void arm_validate_fix (struct fix *);
extern const char * elf32_arm_target_format (void);
extern void arm_elf_change_section (void);
extern int arm_force_relocation (struct fix *);
extern void arm_cleanup (void);
extern void arm_start_line_hook (void);
extern void arm_frob_label (symbolS *);
extern int arm_data_in_code (void);
extern char * arm_canonicalize_symbol_name (char *);
extern void arm_adjust_symtab (void);
extern void armelf_frob_symbol (symbolS *, int *);
extern void cons_fix_new_arm (fragS *, int, int, expressionS *,
			      bfd_reloc_code_real_type);
extern void arm_init_frag (struct frag *, int);
extern void arm_handle_align (struct frag *);
extern bfd_boolean arm_fix_adjustable (struct fix *);
extern int arm_elf_section_type (const char *, size_t);
extern int tc_arm_regname_to_dw2regnum (char *regname);
extern void tc_arm_frame_initial_instructions (void);

#ifdef TE_PE

#define O_secrel O_md1

#define TC_DWARF2_EMIT_OFFSET  tc_pe_dwarf2_emit_offset
void tc_pe_dwarf2_emit_offset (symbolS *, unsigned int);

#endif /* TE_PE */

#ifdef OBJ_ELF
#define CONVERT_SYMBOLIC_ATTRIBUTE(name) arm_convert_symbolic_attribute (name)
extern int arm_convert_symbolic_attribute (const char *);
extern int arm_apply_sym_value (struct fix *, segT);
#endif

#define tc_comment_chars arm_comment_chars
extern char arm_comment_chars[];

#define tc_line_separator_chars arm_line_separator_chars
extern char arm_line_separator_chars[];

#define TC_EQUAL_IN_INSN(c, s) arm_tc_equal_in_insn ((c), (s))
extern bfd_boolean arm_tc_equal_in_insn (int, char *);
Commit	Line	Data
252b5132	1	/* This file is tc-arm.h
219d1afa	2	Copyright (C) 1994-2018 Free Software Foundation, Inc.
252b5132 RH	3	Contributed by Richard Earnshaw (rwe@pegasus.esprit.ec.org)
	4	Modified by David Taylor (dtaylor@armltd.co.uk)
	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
ec2655a6	10	the Free Software Foundation; either version 3, or (at your option)
252b5132 RH	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
4b4da160 NC	20	Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
4b4da160 NC	21	02110-1301, USA. */
252b5132 RH	22
	23	#define TC_ARM 1
	24
	25	#ifndef TARGET_BYTES_BIG_ENDIAN
	26	#define TARGET_BYTES_BIG_ENDIAN 0
	27	#endif
	28
	29	#define WORKING_DOT_WORD
	30
	31	#define COFF_MAGIC ARMMAGIC
	32	#define TARGET_ARCH bfd_arch_arm
	33
252b5132 RH	34	#define DIFF_EXPR_OK
	35
	36	#ifdef LITTLE_ENDIAN
	37	#undef LITTLE_ENDIAN
	38	#endif
	39
	40	#ifdef BIG_ENDIAN
	41	#undef BIG_ENDIAN
	42	#endif
	43
	44	#define LITTLE_ENDIAN 1234
	45	#define BIG_ENDIAN 4321
	46
a161fe53 AM	47	struct fix;
a161fe53 AM	48
69b97547 NC	49	#if defined OBJ_AOUT
	50	# if defined TE_RISCIX
	51	# define TARGET_FORMAT "a.out-riscix"
	52	# elif defined TE_LINUX
	53	# define ARM_BI_ENDIAN
	54	# define TARGET_FORMAT "a.out-arm-linux"
	55	# elif defined TE_NetBSD
	56	# define TARGET_FORMAT "a.out-arm-netbsd"
	57	# else
	58	# define ARM_BI_ENDIAN
	59	# define TARGET_FORMAT (target_big_endian ? "a.out-arm-big" : "a.out-arm-little")
	60	# endif
	61	#elif defined OBJ_AIF
	62	# define TARGET_FORMAT "aif"
	63	#elif defined OBJ_COFF
252b5132	64	# define ARM_BI_ENDIAN
252b5132	65	# if defined TE_PE
69b97547 NC	66	# if defined TE_EPOC
69b97547 NC	67	# define TARGET_FORMAT (target_big_endian ? "epoc-pe-arm-big" : "epoc-pe-arm-little")
7148cc28 NC	68	# elif defined TE_WINCE
7148cc28 NC	69	# define TARGET_FORMAT (target_big_endian ? "pe-arm-wince-big" : "pe-arm-wince-little")
69b97547 NC	70	# else
	71	# define TARGET_FORMAT (target_big_endian ? "pe-arm-big" : "pe-arm-little")
	72	# endif
252b5132 RH	73	# else
	74	# define TARGET_FORMAT (target_big_endian ? "coff-arm-big" : "coff-arm-little")
	75	# endif
69b97547 NC	76	#elif defined OBJ_ELF
	77	# define ARM_BI_ENDIAN
	78	# define TARGET_FORMAT elf32_arm_target_format ()
252b5132 RH	79	#endif
252b5132 RH	80
1bf10b0d NC	81	/* We support double slash line-comments for compatibility with the ARM AArch64 Assembler. */
	82	#define DOUBLESLASH_LINE_COMMENTS
	83
2e6976a8 DG	84	/* We conditionally support labels without a colon. */
	85	#define LABELS_WITHOUT_COLONS codecomposer_syntax
	86	extern bfd_boolean codecomposer_syntax;
	87
bacebabc RM	88	#define tc_symbol_chars arm_symbol_chars
	89	extern const char arm_symbol_chars[];
	90
114424c6	91	#define TC_FORCE_RELOCATION(FIX) arm_force_relocation (FIX)
114424c6	92
fa94de6b RM	93	extern unsigned int arm_frag_max_var (struct frag *);
	94	#define md_frag_max_var arm_frag_max_var
	95
0110f2b8	96	#define md_relax_frag(segment, fragp, stretch) \
e07e6e58	97	arm_relax_frag (segment, fragp, stretch)
0110f2b8	98	extern int arm_relax_frag (asection , struct frag , long);
252b5132	99
a8bc6c78 PB	100	#define md_optimize_expr(l,o,r) arm_optimize_expr (l, o, r)
	101	extern int arm_optimize_expr (expressionS , operatorT, expressionS );
	102
252b5132	103	#define md_cleanup() arm_cleanup ()
252b5132 RH	104
252b5132 RH	105	#define md_start_line_hook() arm_start_line_hook ()
252b5132	106
2e57ce7b AM	107	#define TC_START_LABEL_WITHOUT_COLON(NUL_CHAR, NEXT_CHAR) \
	108	tc_start_label_without_colon ()
	109	extern bfd_boolean tc_start_label_without_colon (void);
2e6976a8	110
252b5132	111	#define tc_frob_label(S) arm_frob_label (S)
252b5132 RH	112
	113	/* We also need to mark assembler created symbols: */
	114	#define tc_frob_fake_label(S) arm_frob_label (S)
	115
ee065d83 PB	116	#ifdef OBJ_ELF
	117	#define md_end arm_md_end
	118	extern void arm_md_end (void);
e1da3f5b	119	bfd_boolean arm_is_eabi (void);
3cfdb781	120
c168ce07 TP	121	#define md_post_relax_hook arm_md_post_relax ()
c168ce07 TP	122	extern void arm_md_post_relax (void);
ee065d83 PB	123	#endif
ee065d83 PB	124
252b5132 RH	125	/* NOTE: The fake label creation in stabs.c:s_stab_generic() has
	126	deliberately not been updated to mark assembler created stabs
	127	symbols as Thumb. */
	128
adbaf948 ZW	129	#define TC_FIX_TYPE int
adbaf948 ZW	130	#define TC_INIT_FIX_DATA(FIX) ((FIX)->tc_fix_data = 0)
29c4c6b5	131
252b5132 RH	132	/* We need to keep some local information on symbols. */
252b5132 RH	133
69b97547	134	#define TC_SYMFIELD_TYPE unsigned int
174419c1 ILT	135	#define ARM_GET_FLAG(s) (*symbol_get_tc (s))
	136	#define ARM_SET_FLAG(s,v) (*symbol_get_tc (s) \|= (v))
	137	#define ARM_RESET_FLAG(s,v) (*symbol_get_tc (s) &= ~(v))
252b5132 RH	138
252b5132 RH	139	#define ARM_FLAG_THUMB (1 << 0) /* The symbol is a Thumb symbol rather than an Arm symbol. */
2d2255b5	140	#define ARM_FLAG_INTERWORK (1 << 1) /* The symbol is attached to code that supports interworking. */
252b5132 RH	141	#define THUMB_FLAG_FUNC (1 << 2) /* The symbol is attached to the start of a Thumb function. */
	142
	143	#define ARM_IS_THUMB(s) (ARM_GET_FLAG (s) & ARM_FLAG_THUMB)
	144	#define ARM_IS_INTERWORK(s) (ARM_GET_FLAG (s) & ARM_FLAG_INTERWORK)
e07e6e58	145
e1da3f5b PB	146	#ifdef OBJ_ELF
	147
	148	/* For ELF objects THUMB_IS_FUNC is inferred from
267bf995	149	ARM_IS_THUMB and the function type. */
63b33ceb NC	150	#define THUMB_IS_FUNC(s) \
	151	((s) != NULL \
	152	&& ((arm_is_eabi () \
	153	&& (ARM_IS_THUMB (s)) \
	154	&& (symbol_get_bfdsym (s)->flags & BSF_FUNCTION)) \
	155	\|\| (ARM_GET_FLAG (s) & THUMB_FLAG_FUNC)))
	156
	157	#define ARM_IS_FUNC(s) \
	158	(((s) != NULL \
	159	&& arm_is_eabi () \
	160	&& !(ARM_IS_THUMB (s)) \
	161	/* && !(THUMB_FLAG_FUNC & ARM_GET_FLAG (s)) \ */ \
267bf995 RR	162	&& (symbol_get_bfdsym (s)->flags & BSF_FUNCTION)))
	163
	164
e1da3f5b	165	#else
e07e6e58	166
63b33ceb	167	#define THUMB_IS_FUNC(s) ((s) && ARM_GET_FLAG (s) & THUMB_FLAG_FUNC)
267bf995	168	#define ARM_IS_FUNC(s) (!THUMB_IS_FUNC (s) \
63b33ceb	169	&& (s) && (symbol_get_bfdsym (s)->flags & BSF_FUNCTION))
e1da3f5b	170	#endif
252b5132 RH	171
	172	#define ARM_SET_THUMB(s,t) ((t) ? ARM_SET_FLAG (s, ARM_FLAG_THUMB) : ARM_RESET_FLAG (s, ARM_FLAG_THUMB))
	173	#define ARM_SET_INTERWORK(s,t) ((t) ? ARM_SET_FLAG (s, ARM_FLAG_INTERWORK) : ARM_RESET_FLAG (s, ARM_FLAG_INTERWORK))
	174	#define THUMB_SET_FUNC(s,t) ((t) ? ARM_SET_FLAG (s, THUMB_FLAG_FUNC) : ARM_RESET_FLAG (s, THUMB_FLAG_FUNC))
	175
794ba86a	176	void arm_copy_symbol_attributes (symbolS , symbolS );
e07e6e58	177
794ba86a DJ	178	#ifndef TC_COPY_SYMBOL_ATTRIBUTES
	179	#define TC_COPY_SYMBOL_ATTRIBUTES(DEST, SRC) \
	180	(arm_copy_symbol_attributes (DEST, SRC))
	181	#endif
	182
2e57ce7b AM	183	#define TC_START_LABEL(STR, NUL_CHAR, NEXT_CHAR) \
2e57ce7b AM	184	(NEXT_CHAR == ':' \|\| (NEXT_CHAR == '/' && arm_data_in_code ()))
69b97547 NC	185	#define tc_canonicalize_symbol_name(str) arm_canonicalize_symbol_name (str);
69b97547 NC	186	#define obj_adjust_symtab() arm_adjust_symtab ()
252b5132 RH	187
	188	#define LISTING_HEADER "ARM GAS "
	189
	190	#define OPTIONAL_REGISTER_PREFIX '%'
	191
37f6032b ZW	192	#define LOCAL_LABEL(name) (name[0] == '.' && name[1] == 'L')
37f6032b ZW	193	#define LOCAL_LABELS_FB 1
252b5132	194
a161fe53 AM	195	/* This expression evaluates to true if the relocation is for a local
	196	object for which we still want to do the relocation at runtime.
	197	False if we are willing to perform this relocation while building
	198	the .o file. GOTOFF does not need to be checked here because it is
	199	not pcrel. I am not sure if some of the others are ever used with
252b5132 RH	200	pcrel, but it is easier to be safe than sorry. */
252b5132 RH	201
a161fe53	202	#define TC_FORCE_RELOCATION_LOCAL(FIX) \
91cb9803	203	(GENERIC_FORCE_RELOCATION_LOCAL (FIX) \
a161fe53 AM	204	\|\| (FIX)->fx_r_type == BFD_RELOC_ARM_GOT32 \
a161fe53 AM	205	\|\| (FIX)->fx_r_type == BFD_RELOC_32 \
91cb9803 AM	206	\|\| ((FIX)->fx_addsy != NULL \
91cb9803 AM	207	&& S_IS_WEAK ((FIX)->fx_addsy)))
252b5132	208
a8bc6c78 PB	209	/* Force output of R_ARM_REL32 relocations against thumb function symbols.
	210	This is needed to ensure the low bit is handled correctly. */
	211	#define TC_FORCE_RELOCATION_SUB_SAME(FIX, SEG) \
91cb9803 AM	212	(GENERIC_FORCE_RELOCATION_SUB_SAME (FIX, SEG) \
91cb9803 AM	213	\|\| THUMB_IS_FUNC ((FIX)->fx_addsy))
a8bc6c78	214
6e7ce2cd PB	215	#define TC_FORCE_RELOCATION_ABS(FIX) \
	216	(((FIX)->fx_pcrel \
	217	&& (FIX)->fx_r_type != BFD_RELOC_32 \
	218	&& (FIX)->fx_r_type != BFD_RELOC_ARM_GOT32) \
	219	\|\| TC_FORCE_RELOCATION(FIX))
	220
252b5132	221	#define TC_CONS_FIX_NEW cons_fix_new_arm
16a0c2d4	222
140033b3 NC	223	#define MAX_MEM_ALIGNMENT_BYTES 6
140033b3 NC	224	#define MAX_MEM_FOR_RS_ALIGN_CODE ((1 << MAX_MEM_ALIGNMENT_BYTES) - 1)
d8708f40	225
16a0c2d4 NC	226	/* For frags in code sections we need to record whether they contain
	227	ARM code or THUMB code. This is that if they have to be aligned,
	228	they can contain the correct type of no-op instruction. */
cd000bff DJ	229	struct arm_frag_type
	230	{
	231	int thumb_mode;
	232	#ifdef OBJ_ELF
	233	/* If there is a mapping symbol at offset 0 in this frag,
	234	it will be saved in FIRST_MAP. If there are any mapping
	235	symbols in this frag, the last one will be saved in
	236	LAST_MAP. */
	237	symbolS first_map, last_map;
	238	#endif
	239	};
	240
7a5c933c RE	241	static inline int
	242	arm_min (int am_p1, int am_p2)
	243	{
	244	return am_p1 < am_p2 ? am_p1 : am_p2;
	245	}
	246
cd000bff DJ	247	#define TC_FRAG_TYPE struct arm_frag_type
	248	/* NOTE: max_chars is a local variable from frag_var / frag_variant. */
	249	#define TC_FRAG_INIT(fragp) arm_init_frag (fragp, max_chars)
db2ed2e0	250	#define TC_ALIGN_ZERO_IS_DEFAULT 1
69b97547	251	#define HANDLE_ALIGN(fragp) arm_handle_align (fragp)
f27c5390 NC	252	/* PR gas/19276: COFF/PE segment alignment is already handled in coff_frob_section(). */
	253	#ifndef TE_PE
	254	#define SUB_SEGMENT_ALIGN(SEG, FRCHAIN) \
7a5c933c RE	255	((!(FRCHAIN)->frch_next && subseg_text_p (SEG)) \
7a5c933c RE	256	? arm_min (2, get_recorded_alignment (SEG)) : 0)
f27c5390	257	#endif
16a0c2d4 NC	258
	259	#define md_do_align(N, FILL, LEN, MAX, LABEL) \
	260	if (FILL == NULL && (N) != 0 && ! need_pass_2 && subseg_text_p (now_seg)) \
	261	{ \
	262	arm_frag_align_code (N, MAX); \
	263	goto LABEL; \
	264	}
69b97547	265
f0927246 NC	266	#define DWARF2_LINE_MIN_INSN_LENGTH 2
	267
	268	/* The lr register is r14. */
	269	#define DWARF2_DEFAULT_RETURN_COLUMN 14
	270
	271	/* Registers are generally saved at negative offsets to the CFA. */
8d79fd44	272	#define DWARF2_CIE_DATA_ALIGNMENT (-4)
f0927246	273
e07e6e58 NC	274	/* State variables for IT block handling. */
	275	enum it_state
	276	{
	277	OUTSIDE_IT_BLOCK, MANUAL_IT_BLOCK, AUTOMATIC_IT_BLOCK
	278	};
	279	struct current_it
	280	{
	281	int mask;
	282	enum it_state state;
	283	int cc;
	284	int block_length;
	285	char *insn;
	286	int state_handled;
5a01bb1d MGD	287	int warn_deprecated;
5a01bb1d MGD	288	int insn_cond;
e07e6e58 NC	289	};
e07e6e58 NC	290
69b97547	291	#ifdef OBJ_ELF
69b97547 NC	292	# define obj_frob_symbol(sym, punt) armelf_frob_symbol ((sym), & (punt))
69b97547 NC	293	# define md_elf_section_change_hook() arm_elf_change_section ()
40a18ebd	294	# define md_elf_section_type(str, len) arm_elf_section_type (str, len)
69b97547	295	# define GLOBAL_OFFSET_TABLE_NAME "_GLOBAL_OFFSET_TABLE_"
84798bd6	296	# define TC_SEGMENT_INFO_TYPE struct arm_segment_info_type
69b97547	297
e821645d DJ	298	/* This is not really an alignment operation, but it's something we
	299	need to do at the same time: whenever we are figuring out the
	300	alignment for data, we should check whether a $d symbol is
	301	necessary. */
	302	# define md_cons_align(nbytes) mapping_state (MAP_DATA)
	303
69b97547 NC	304	enum mstate
	305	{
	306	MAP_UNDEFINED = 0, /* Must be zero, for seginfo in new sections. */
	307	MAP_DATA,
	308	MAP_ARM,
	309	MAP_THUMB
	310	};
	311
e821645d DJ	312	void mapping_state (enum mstate);
e821645d DJ	313
84798bd6 JB	314	struct arm_segment_info_type
	315	{
	316	enum mstate mapstate;
940b5ce0 DJ	317
	318	/* Bit N indicates that an R_ARM_NONE relocation has been output for
	319	__aeabi_unwind_cpp_prN already if set. This enables dependencies to be
	320	emitted only once per section, to save unnecessary bloat. */
84798bd6	321	unsigned int marked_pr_dependency;
940b5ce0	322
e07e6e58	323	struct current_it current_it;
84798bd6 JB	324	};
84798bd6 JB	325
a394c00f NC	326	/* We want .cfi_* pseudo-ops for generating unwind info. */
	327	#define TARGET_USE_CFIPOP 1
	328
a394c00f NC	329	/* CFI hooks. */
	330	#define tc_regname_to_dw2regnum tc_arm_regname_to_dw2regnum
	331	#define tc_cfi_frame_initial_instructions tc_arm_frame_initial_instructions
	332
69b97547 NC	333	#else /* Not OBJ_ELF. */
	334	#define GLOBAL_OFFSET_TABLE_NAME "__GLOBAL_OFFSET_TABLE_"
	335	#endif
	336
	337	#if defined OBJ_ELF \|\| defined OBJ_COFF
	338
	339	# define EXTERN_FORCE_RELOC 1
	340	# define tc_fix_adjustable(FIX) arm_fix_adjustable (FIX)
267bf995 RR	341	#endif
	342
	343	#ifdef OBJ_ELF
55cf6793	344	/* Values passed to md_apply_fix don't include the symbol value. */
93ef582d	345	# define MD_APPLY_SYM_VALUE(FIX) arm_apply_sym_value (FIX, this_segment)
4343666d	346	#endif
69b97547	347
4343666d RR	348	#ifdef OBJ_COFF
4343666d RR	349	# define TC_VALIDATE_FIX(FIX, SEGTYPE, LABEL) arm_validate_fix (FIX)
267bf995 RR	350	/* Values passed to md_apply_fix don't include the symbol value. */
267bf995 RR	351	# define MD_APPLY_SYM_VALUE(FIX) 0
69b97547 NC	352	#endif
69b97547 NC	353
2fc8bdac ZW	354	#define MD_PCREL_FROM_SECTION(F,S) md_pcrel_from_section(F,S)
	355
	356	extern long md_pcrel_from_section (struct fix *, segT);
69b97547 NC	357	extern void arm_frag_align_code (int, int);
	358	extern void arm_validate_fix (struct fix *);
	359	extern const char * elf32_arm_target_format (void);
	360	extern void arm_elf_change_section (void);
	361	extern int arm_force_relocation (struct fix *);
	362	extern void arm_cleanup (void);
	363	extern void arm_start_line_hook (void);
	364	extern void arm_frob_label (symbolS *);
	365	extern int arm_data_in_code (void);
	366	extern char * arm_canonicalize_symbol_name (char *);
	367	extern void arm_adjust_symtab (void);
	368	extern void armelf_frob_symbol (symbolS , int );
62ebcb5c AM	369	extern void cons_fix_new_arm (fragS , int, int, expressionS ,
62ebcb5c AM	370	bfd_reloc_code_real_type);
cd000bff	371	extern void arm_init_frag (struct frag *, int);
69b97547 NC	372	extern void arm_handle_align (struct frag *);
69b97547 NC	373	extern bfd_boolean arm_fix_adjustable (struct fix *);
40a18ebd	374	extern int arm_elf_section_type (const char *, size_t);
1df69f4f	375	extern int tc_arm_regname_to_dw2regnum (char *regname);
a394c00f	376	extern void tc_arm_frame_initial_instructions (void);
f0927246 NC	377
	378	#ifdef TE_PE
	379
	380	#define O_secrel O_md1
	381
	382	#define TC_DWARF2_EMIT_OFFSET tc_pe_dwarf2_emit_offset
	383	void tc_pe_dwarf2_emit_offset (symbolS *, unsigned int);
	384
	385	#endif /* TE_PE */
e04befd0	386
f31fef98	387	#ifdef OBJ_ELF
e04befd0	388	#define CONVERT_SYMBOLIC_ATTRIBUTE(name) arm_convert_symbolic_attribute (name)
f31fef98	389	extern int arm_convert_symbolic_attribute (const char *);
93ef582d	390	extern int arm_apply_sym_value (struct fix *, segT);
f31fef98	391	#endif
2e6976a8 DG	392
	393	#define tc_comment_chars arm_comment_chars
	394	extern char arm_comment_chars[];
	395
	396	#define tc_line_separator_chars arm_line_separator_chars
	397	extern char arm_line_separator_chars[];
ae8714c2 NC	398
	399	#define TC_EQUAL_IN_INSN(c, s) arm_tc_equal_in_insn ((c), (s))
	400	extern bfd_boolean arm_tc_equal_in_insn (int, char *);