1999-05-03 15:29:11 +08:00
|
|
|
/* tc-hppa.h -- Header file for the PA
|
2003-01-24 07:17:57 +08:00
|
|
|
Copyright 1989, 1993, 1994, 1995, 1997, 1998, 1999, 2000, 2001, 2002,
|
2009-03-04 07:21:52 +08:00
|
|
|
2003, 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
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
|
2007-07-03 19:01:12 +08:00
|
|
|
the Free Software Foundation; either version 3, or (at your option)
|
1999-05-03 15:29:11 +08:00
|
|
|
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
|
2005-05-05 17:13:19 +08:00
|
|
|
Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
|
|
|
|
02110-1301, USA. */
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
/* HP PA-RISC support was contributed by the Center for Software Science
|
|
|
|
at the University of Utah. */
|
|
|
|
|
|
|
|
/* Please refrain from exposing the world to the internals of tc-hppa.c
|
|
|
|
when this file is included. This means only declaring exported functions,
|
|
|
|
(please PARAMize them!) not exporting structures and data items which
|
|
|
|
are used solely within tc-hppa.c, etc.
|
|
|
|
|
2000-09-16 08:56:47 +08:00
|
|
|
Also refrain from adding any more object file dependent code, there is
|
1999-05-03 15:29:11 +08:00
|
|
|
already far too much object file format dependent code in this file.
|
|
|
|
In theory this file should contain only exported functions, structures
|
|
|
|
and data declarations common to all PA assemblers. */
|
|
|
|
|
|
|
|
#ifndef _TC_HPPA_H
|
|
|
|
#define _TC_HPPA_H
|
|
|
|
|
|
|
|
#ifndef TC_HPPA
|
|
|
|
#define TC_HPPA 1
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#define TARGET_BYTES_BIG_ENDIAN 1
|
|
|
|
|
|
|
|
#define TARGET_ARCH bfd_arch_hppa
|
|
|
|
|
|
|
|
#define WORKING_DOT_WORD
|
|
|
|
|
|
|
|
#ifdef OBJ_ELF
|
2000-07-09 16:16:21 +08:00
|
|
|
#if TARGET_ARCH_SIZE == 64
|
1999-06-21 23:48:51 +08:00
|
|
|
#include "bfd/elf64-hppa.h"
|
2003-10-06 19:01:36 +08:00
|
|
|
#if defined (TE_LINUX) || defined (TE_NetBSD)
|
2001-01-15 10:36:21 +08:00
|
|
|
#define TARGET_FORMAT "elf64-hppa-linux"
|
1999-06-21 23:48:51 +08:00
|
|
|
#else
|
2001-01-15 10:36:21 +08:00
|
|
|
#define TARGET_FORMAT "elf64-hppa"
|
|
|
|
#endif
|
|
|
|
#else /* TARGET_ARCH_SIZE == 32 */
|
1999-05-03 15:29:11 +08:00
|
|
|
#include "bfd/elf32-hppa.h"
|
2004-07-28 06:30:25 +08:00
|
|
|
#if defined (TE_LINUX)
|
2001-01-15 10:36:21 +08:00
|
|
|
#define TARGET_FORMAT "elf32-hppa-linux"
|
|
|
|
#else
|
2004-07-28 06:30:25 +08:00
|
|
|
#if defined (TE_NetBSD)
|
|
|
|
#define TARGET_FORMAT "elf32-hppa-netbsd"
|
|
|
|
#else
|
1999-05-03 15:29:11 +08:00
|
|
|
#define TARGET_FORMAT "elf32-hppa"
|
|
|
|
#endif
|
1999-06-21 23:48:51 +08:00
|
|
|
#endif
|
2001-01-15 10:36:21 +08:00
|
|
|
#endif
|
2004-07-28 06:30:25 +08:00
|
|
|
#endif
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
#ifdef OBJ_SOM
|
|
|
|
#include "bfd/som.h"
|
|
|
|
#define TARGET_FORMAT "som"
|
|
|
|
#endif
|
|
|
|
|
2002-02-03 02:36:04 +08:00
|
|
|
#if defined(TE_LINUX) || defined(TE_NetBSD)
|
2000-07-28 13:05:20 +08:00
|
|
|
/* Define to compile in an extra assembler option, -c, which enables a
|
|
|
|
warning (once per file) when a comment is encountered.
|
|
|
|
The hppa comment char is a `;' which tends to occur in random C asm
|
|
|
|
statements. A semicolon is a line separator for most assemblers.
|
|
|
|
It's hard to find these lurking semicolons. Thus... */
|
|
|
|
#define WARN_COMMENTS 1
|
|
|
|
#endif
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
/* FIXME. Why oh why aren't these defined somewhere globally? */
|
|
|
|
#ifndef FALSE
|
|
|
|
#define FALSE (0)
|
|
|
|
#define TRUE (!FALSE)
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#define ASEC_NULL (asection *)0
|
|
|
|
|
2000-07-09 16:16:21 +08:00
|
|
|
/* pa_define_label gets used outside of tc-hppa.c via tc_frob_label. */
|
2006-05-24 19:05:42 +08:00
|
|
|
extern void pa_define_label (symbolS *);
|
|
|
|
extern void parse_cons_expression_hppa (expressionS *);
|
|
|
|
extern void cons_fix_new_hppa (fragS *, int, int, expressionS *);
|
|
|
|
extern int hppa_force_relocation (struct fix *);
|
1999-05-03 15:29:11 +08:00
|
|
|
|
|
|
|
/* This gets called before writing the object file to make sure
|
|
|
|
things like entry/exit and proc/procend pairs match. */
|
2006-05-24 19:05:42 +08:00
|
|
|
extern void pa_check_eof (void);
|
1999-05-03 15:29:11 +08:00
|
|
|
#define tc_frob_file pa_check_eof
|
|
|
|
|
|
|
|
#define tc_frob_label(sym) pa_define_label (sym)
|
|
|
|
|
2003-04-28 16:35:06 +08:00
|
|
|
extern const char hppa_symbol_chars[];
|
|
|
|
#define tc_symbol_chars hppa_symbol_chars
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
#define RELOC_EXPANSION_POSSIBLE
|
|
|
|
#define MAX_RELOC_EXPANSION 6
|
|
|
|
|
|
|
|
/* The PA needs to parse field selectors in .byte, etc. */
|
|
|
|
|
|
|
|
#define TC_PARSE_CONS_EXPRESSION(EXP, NBYTES) \
|
|
|
|
parse_cons_expression_hppa (EXP)
|
|
|
|
#define TC_CONS_FIX_NEW cons_fix_new_hppa
|
|
|
|
|
2005-02-19 16:56:08 +08:00
|
|
|
/* On the PA, an exclamation point can appear in an instruction. It is
|
|
|
|
used in FP comparison instructions and as an end of line marker.
|
|
|
|
When used in an instruction it will always follow a comma. */
|
1999-05-03 15:29:11 +08:00
|
|
|
#define TC_EOL_IN_INSN(PTR) (*(PTR) == '!' && (PTR)[-1] == ',')
|
|
|
|
|
2006-05-24 19:05:42 +08:00
|
|
|
int hppa_fix_adjustable (struct fix *);
|
1999-05-03 15:29:11 +08:00
|
|
|
#define tc_fix_adjustable hppa_fix_adjustable
|
|
|
|
|
2002-09-05 08:01:18 +08:00
|
|
|
#define EXTERN_FORCE_RELOC 1
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
/* Because of the strange PA calling conventions, it is sometimes
|
|
|
|
necessary to emit a relocation for a call even though it would
|
|
|
|
normally appear safe to handle it completely within GAS. */
|
2002-09-05 08:01:18 +08:00
|
|
|
#define TC_FORCE_RELOCATION(FIX) hppa_force_relocation (FIX)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
gas:
* cgen.c, cgen.h, tc.h, write.c, config/obj-coff.c
* config/tc-a29k.c, config/tc-alpha.c, config/tc-alpha.h
* config/tc-arc.c, config/tc-arc.h, config/tc-arm.c
* config/tc-arm.h, config/tc-avr.c, config/tc-avr.h
* config/tc-cris.c, config/tc-crx.c, config/tc-d10v.c
* config/tc-d10v.h, config/tc-d30v.c, config/tc-d30v.h
* config/tc-dlx.c, config/tc-dlx.h, config/tc-fr30.h
* config/tc-frv.c, config/tc-frv.h, config/tc-h8300.c
* config/tc-h8500.c, config/tc-hppa.c, config/tc-hppa.h
* config/tc-i370.c, config/tc-i370.h, config/tc-i386.c
* config/tc-i386.h, config/tc-i860.c, config/tc-i860.h
* config/tc-i960.c, config/tc-i960.h, config/tc-ia64.c
* config/tc-ip2k.c, config/tc-ip2k.h, config/tc-iq2000.c
* config/tc-iq2000.h, config/tc-m32r.c, config/tc-m32r.h
* config/tc-m68hc11.c, config/tc-m68hc11.h, config/tc-m68k.c
* config/tc-m68k.h, config/tc-m88k.c, config/tc-maxq.c
* config/tc-mcore.c, config/tc-mcore.h, config/tc-mips.c
* config/tc-mips.h, config/tc-mmix.c, config/tc-mn10200.c
* config/tc-mn10300.c, config/tc-msp430.c, config/tc-ns32k.c
* config/tc-openrisc.h, config/tc-or32.c, config/tc-or32.h
* config/tc-pdp11.c, config/tc-pj.c, config/tc-pj.h
* config/tc-ppc.c, config/tc-ppc.h, config/tc-s390.c
* config/tc-s390.h, config/tc-sh64.c, config/tc-sh.c
* config/tc-sh.h, config/tc-sparc.c, config/tc-sparc.h
* config/tc-tahoe.c, config/tc-tic30.c, config/tc-tic4x.c
* config/tc-tic54x.c, config/tc-tic80.c, config/tc-v850.c
* config/tc-v850.h, config/tc-vax.c, config/tc-vax.h
* config/tc-w65.c, config/tc-xstormy16.c, config/tc-xstormy16.h
* config/tc-xtensa.c, config/tc-z8k.c:
Replace all instances of the string "_apply_fix3" with
"_apply_fix".
* po/POTFILES.in, po/gas.pot: Regenerate.
bfd:
* coff-i386.c: Change md_apply_fix3 to md_apply_fix in comment.
cgen:
* doc/porting.texi: Change all mention of md_apply_fix3 and
gas_cgen_md_apply_fix3 to md_apply_fix and gas_cgen_md_apply_fix
respectively.
2005-06-08 01:54:22 +08:00
|
|
|
/* Values passed to md_apply_fix don't include the symbol value. */
|
2003-01-24 07:17:57 +08:00
|
|
|
#define MD_APPLY_SYM_VALUE(FIX) 0
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
#ifdef OBJ_SOM
|
|
|
|
/* If a symbol is imported, but never used, then the symbol should
|
|
|
|
*not* end up in the symbol table. Likewise for absolute symbols
|
|
|
|
with local scope. */
|
|
|
|
#define tc_frob_symbol(sym,punt) \
|
1999-06-03 20:42:36 +08:00
|
|
|
if ((S_GET_SEGMENT (sym) == &bfd_und_section && ! symbol_used_p (sym)) \
|
1999-05-03 15:29:11 +08:00
|
|
|
|| (S_GET_SEGMENT (sym) == &bfd_abs_section \
|
1999-06-03 20:42:36 +08:00
|
|
|
&& ! S_IS_EXTERNAL (sym))) \
|
1999-05-03 15:29:11 +08:00
|
|
|
punt = 1
|
|
|
|
|
|
|
|
/* We need to be able to make relocations involving the difference of
|
|
|
|
two symbols. This includes the difference of two symbols when
|
2000-09-16 08:56:47 +08:00
|
|
|
one of them is undefined (this comes up in PIC code generation).
|
1999-05-03 15:29:11 +08:00
|
|
|
|
2008-09-08 08:54:26 +08:00
|
|
|
We allow the difference of two symbols when the subtract symbol is
|
|
|
|
local to the relocation. This is implemented using R_HPPA_COMPLEX.
|
|
|
|
|
|
|
|
This has some limitations. Difference expressions only work between
|
|
|
|
symbols in the same segment/quadrant of a module since the HP dynamic
|
|
|
|
loader relocates the text and data segments independently. Thus, a
|
|
|
|
difference expression can't be used between text and data symbols,
|
|
|
|
or between symbols in different executable modules. */
|
|
|
|
#define DIFF_EXPR_OK 1
|
2008-09-19 18:00:40 +08:00
|
|
|
#define TC_FORCE_RELOCATION_SUB_LOCAL(FIX, SEG) 1
|
1999-05-03 15:29:11 +08:00
|
|
|
#define UNDEFINED_DIFFERENCE_OK
|
|
|
|
#endif
|
|
|
|
|
2002-09-10 05:31:40 +08:00
|
|
|
#ifdef OBJ_ELF
|
2008-09-08 08:54:26 +08:00
|
|
|
|
|
|
|
/* Difference expressions for the 64-bit HP-UX target have the same
|
|
|
|
limitations as those for the 32-bit SOM target. */
|
2003-01-24 07:17:57 +08:00
|
|
|
#define DIFF_EXPR_OK 1
|
|
|
|
|
2000-09-05 11:23:05 +08:00
|
|
|
/* Handle .type psuedo. Given a type string of `millicode', set the
|
|
|
|
internal elf symbol type to STT_PARISC_MILLI, and return
|
|
|
|
BSF_FUNCTION for the BFD symbol type. */
|
|
|
|
#define md_elf_symbol_type(name, sym, elf) \
|
|
|
|
((strcmp ((name), "millicode") == 0 \
|
|
|
|
|| strcmp ((name), "STT_PARISC_MILLI") == 0) \
|
|
|
|
? (((elf)->internal_elf_sym.st_info = ELF_ST_INFO \
|
|
|
|
(ELF_ST_BIND ((elf)->internal_elf_sym.st_info), STT_PARISC_MILLI)\
|
|
|
|
), BSF_FUNCTION) \
|
|
|
|
: -1)
|
|
|
|
|
1999-05-03 15:29:11 +08:00
|
|
|
#define tc_frob_symbol(sym,punt) \
|
|
|
|
{ \
|
2006-05-24 19:05:42 +08:00
|
|
|
if ((S_GET_SEGMENT (sym) == &bfd_und_section \
|
|
|
|
&& ! symbol_used_p (sym) \
|
|
|
|
&& ELF_ST_VISIBILITY (S_GET_OTHER (sym)) == STV_DEFAULT) \
|
2000-09-05 11:23:05 +08:00
|
|
|
|| strcmp (S_GET_NAME (sym), "$global$") == 0 \
|
2008-08-28 10:33:45 +08:00
|
|
|
|| strcmp (S_GET_NAME (sym), "$segrel$") == 0 \
|
2006-05-24 19:05:42 +08:00
|
|
|
|| strcmp (S_GET_NAME (sym), "$PIC_pcrel$0") == 0 \
|
|
|
|
|| strcmp (S_GET_NAME (sym), "$tls_gdidx$") == 0 \
|
|
|
|
|| strcmp (S_GET_NAME (sym), "$tls_ldidx$") == 0 \
|
|
|
|
|| strcmp (S_GET_NAME (sym), "$tls_dtpoff$") == 0 \
|
|
|
|
|| strcmp (S_GET_NAME (sym), "$tls_ieoff$") == 0 \
|
|
|
|
|| strcmp (S_GET_NAME (sym), "$tls_leoff$") == 0) \
|
1999-05-03 15:29:11 +08:00
|
|
|
punt = 1; \
|
|
|
|
}
|
|
|
|
|
2000-09-05 11:23:05 +08:00
|
|
|
#define elf_tc_final_processing elf_hppa_final_processing
|
2006-05-24 19:05:42 +08:00
|
|
|
void elf_hppa_final_processing (void);
|
2000-09-05 11:23:05 +08:00
|
|
|
#endif /* OBJ_ELF */
|
|
|
|
|
|
|
|
#define md_operand(x)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
2000-09-05 11:45:18 +08:00
|
|
|
/* Allow register expressions to be treated as absolute expressions.
|
|
|
|
A silly fudge required for backwards compatibility. */
|
|
|
|
#define md_optimize_expr hppa_force_reg_syms_absolute
|
|
|
|
|
2006-05-24 19:05:42 +08:00
|
|
|
int hppa_force_reg_syms_absolute (expressionS *, operatorT, expressionS *);
|
2000-09-05 11:45:18 +08:00
|
|
|
|
2008-08-13 07:39:31 +08:00
|
|
|
#define TC_FIX_TYPE void *
|
2002-09-05 08:01:18 +08:00
|
|
|
#define TC_INIT_FIX_DATA(FIX) ((FIX)->tc_fix_data = NULL)
|
1999-05-03 15:29:11 +08:00
|
|
|
|
2006-10-30 09:09:18 +08:00
|
|
|
#ifdef OBJ_ELF
|
|
|
|
#define TARGET_USE_CFIPOP 1
|
|
|
|
|
|
|
|
#define tc_cfi_frame_initial_instructions hppa_cfi_frame_initial_instructions
|
|
|
|
extern void hppa_cfi_frame_initial_instructions (void);
|
|
|
|
|
|
|
|
#define tc_regname_to_dw2regnum hppa_regname_to_dw2regnum
|
|
|
|
extern int hppa_regname_to_dw2regnum (char *regname);
|
|
|
|
|
|
|
|
#define DWARF2_LINE_MIN_INSN_LENGTH 4
|
|
|
|
#define DWARF2_DEFAULT_RETURN_COLUMN 2
|
|
|
|
#if TARGET_ARCH_SIZE == 64
|
2008-08-22 03:49:22 +08:00
|
|
|
#define DWARF2_CIE_DATA_ALIGNMENT 8
|
|
|
|
#define DWARF2_FDE_RELOC_SIZE 8
|
2006-10-30 09:09:18 +08:00
|
|
|
#else
|
2008-08-22 03:49:22 +08:00
|
|
|
#define DWARF2_CIE_DATA_ALIGNMENT 4
|
2006-10-30 09:09:18 +08:00
|
|
|
#endif
|
2008-08-22 03:49:22 +08:00
|
|
|
|
2008-08-30 23:52:22 +08:00
|
|
|
#if !defined (TE_LINUX) && !defined (TE_NetBSD)
|
|
|
|
/* Due to the way dynamic linking to personality functions is handled
|
|
|
|
on HP-UX, we need to have a read-write .eh_frame section. */
|
2008-08-22 03:49:22 +08:00
|
|
|
#define DWARF2_EH_FRAME_READ_ONLY 0
|
2008-09-08 06:54:54 +08:00
|
|
|
|
|
|
|
/* Because differences between text and data symbols don't work, we
|
|
|
|
can't use difference expressions during CFI generation. */
|
|
|
|
#define CFI_DIFF_EXPR_OK 0
|
2006-10-30 09:09:18 +08:00
|
|
|
#endif
|
|
|
|
|
2008-08-30 23:52:22 +08:00
|
|
|
#endif /* OBJ_ELF */
|
1999-05-03 15:29:11 +08:00
|
|
|
#endif /* _TC_HPPA_H */
|