This is the mail archive of the
binutils@sources.redhat.com
mailing list for the binutils project.
PATCH: Support ia64-hpux in binutils
- From: "H. J. Lu" <hjl at lucon dot org>
- To: binutils at sources dot redhat dot com
- Date: Mon, 29 Sep 2003 13:21:18 -0700
- Subject: PATCH: Support ia64-hpux in binutils
I will check in this patch shortly for ia64-hpux.
H.J.
---
2003-09-29 H.J. Lu <hongjiu.lu@intel.com>
* readelf.c (dump_relocations): Support SHN_IA_64_ANSI_COMMON.
(get_symbol_index_type): Likewise.
testsuites/
2003-09-29 H.J. Lu <hongjiu.lu@intel.com>
* binutils-all/readelf.exp: Use is_elf_format.
* binutils-all/readelf.h: Support IA64/ILP32.
* binutils-all/readelf.s: Likewise.
* binutils-all/readelf.ss: Likewise.
* lib/utils-lib.exp (proc is_elf_format): Copy from ld
testsuite. Add ia64-*-hpux*.
--- binutils/readelf.c.ilp32-test 2003-09-25 21:07:47.000000000 -0700
+++ binutils/readelf.c 2003-09-29 12:55:36.000000000 -0700
@@ -1194,6 +1194,10 @@ dump_relocations (FILE *file,
sec_name = "ABS";
else if (psym->st_shndx == SHN_COMMON)
sec_name = "COMMON";
+ else if (elf_header.e_machine == EM_IA_64
+ && elf_header.e_ident[EI_OSABI] == ELFOSABI_HPUX
+ && psym->st_shndx == SHN_IA_64_ANSI_COMMON)
+ sec_name = "ANSI_COM";
else
{
sprintf (name_buf, "<section 0x%x>",
@@ -5550,7 +5554,11 @@ get_symbol_index_type (unsigned int type
case SHN_ABS: return "ABS";
case SHN_COMMON: return "COM";
default:
- if (type >= SHN_LOPROC && type <= SHN_HIPROC)
+ if (type == SHN_IA_64_ANSI_COMMON
+ && elf_header.e_machine == EM_IA_64
+ && elf_header.e_ident[EI_OSABI] == ELFOSABI_HPUX)
+ return "ANSI_COM";
+ else if (type >= SHN_LOPROC && type <= SHN_HIPROC)
sprintf (buff, "PRC[0x%04x]", type);
else if (type >= SHN_LOOS && type <= SHN_HIOS)
sprintf (buff, "OS [0x%04x]", type);
--- binutils/testsuite/binutils-all/readelf.exp.ilp32-test 2003-04-28 07:48:50.000000000 -0700
+++ binutils/testsuite/binutils-all/readelf.exp 2003-09-29 11:54:15.000000000 -0700
@@ -303,25 +303,8 @@ proc readelf_wi_test {} {
}
-# Only ELF based toolchains need readelf.
-# For now be paranoid and assume that if ELF is not mentioned
-# in the target string, then the target is not an ELF based port.
-
-if { ![istarget *-*-elf*] \
- && ![istarget *-*-linux*] \
- && ![istarget i?86-*-sysv4*] \
- && ![istarget i?86-*-unixware] \
- && ![istarget mips*-*-irix5*] \
- && ![istarget mips*-*-irix6*] \
- && ![istarget powerpc-*-sysv4*] \
- && ![istarget powerpc-*-eabi*] \
- && ![istarget sparc*-*-solaris2*] } {
- verbose "$READELF is only intended for ELF targets" 2
- return
-}
-
-if { [istarget *-*-linux*oldld*] \
- || [istarget *-*-linux*aout*] } {
+# Exclude non-ELF targets.
+if ![is_elf_format] {
verbose "$READELF is only intended for ELF targets" 2
return
}
--- binutils/testsuite/binutils-all/readelf.h.ilp32-test 2003-09-29 13:15:29.000000000 -0700
+++ binutils/testsuite/binutils-all/readelf.h 2003-09-29 12:42:28.000000000 -0700
@@ -1,5 +1,5 @@
ELF Header:
- Magic: 7f 45 4c 46 0[12] 0[12] 01 .. 00 00 00 00 00 00 00 00
+ Magic: 7f 45 4c 46 0[12] 0[12] 01 .. .. 00 00 00 00 00 00 00
Class: ELF[36][24]
Data: 2's complement,.* endian
Version: 1 \(current\)
--- binutils/testsuite/binutils-all/readelf.s.ilp32-test 2001-05-25 12:04:01.000000000 -0700
+++ binutils/testsuite/binutils-all/readelf.s 2003-09-29 13:05:58.000000000 -0700
@@ -4,13 +4,13 @@ Section Headers:
\[Nr\] Name Type Addr Off Size ES Flg Lk Inf Al
\[ 0\] NULL 00000000 000000 000000 00 +0 +0 +0
# On the normal MIPS systems, sections must be aligned to 16 byte
-# boundaries.
+# boundaries. On IA64, text sections are aligned to 16 byte boundaries.
\[ 1\] .text PROGBITS 00000000 0000(34|40) 0000(08|10) 00 +AX +0 +0 +(.|..)
\[ 2\] .rel.+text +REL. +0+ 0+.* 00000. 0. +. +1 +4
# MIPS targets put .rela.text here.
#...
- \[ .\] .data PROGBITS 00000000 0000(3c|50) 0000(04|10) 00 WA +0 +0 +(.|..)
- \[ .\] .bss NOBITS 00000000 0000(4|6)0 000000 00 WA +0 +0 +(.|..)
+ \[ .\] .data PROGBITS 00000000 0000(3c|48|50) 0000(04|10) 00 WA +0 +0 +(.|..)
+ \[ .\] .bss NOBITS 00000000 0000(40|4c|60) 000000 00 WA +0 +0 +(.|..)
# MIPS targets put .reginfo and .mdebug here.
# v850 targets put .call_table_data and .call_table_text here.
#...
--- binutils/testsuite/binutils-all/readelf.ss.ilp32-test 2003-09-29 13:15:29.000000000 -0700
+++ binutils/testsuite/binutils-all/readelf.ss 2003-09-29 13:07:34.000000000 -0700
@@ -13,4 +13,4 @@ Symbol table '.symtab' contains .* entri
.* .: 00000000 0 NOTYPE GLOBAL DEFAULT 1 text_symbol
.: 00000000 0 NOTYPE GLOBAL DEFAULT UND external_symbol
..: 00000000 0 NOTYPE GLOBAL DEFAULT 3 data_symbol
- ..: 00000004 4 OBJECT GLOBAL DEFAULT COM common_symbol
+ ..: 00000004 4 OBJECT GLOBAL DEFAULT ( COM|ANSI_COM) common_symbol
--- binutils/testsuite/lib/utils-lib.exp.ilp32-test 2003-09-29 11:52:18.000000000 -0700
+++ binutils/testsuite/lib/utils-lib.exp 2003-09-29 11:57:25.000000000 -0700
@@ -111,3 +111,41 @@ proc default_binutils_assemble { source
return 0
}
}
+
+#
+# is_elf_format
+# true if the object format is known to be ELF
+#
+proc is_elf_format {} {
+ if { ![istarget *-*-sysv4*] \
+ && ![istarget *-*-unixware*] \
+ && ![istarget *-*-elf*] \
+ && ![istarget *-*-eabi*] \
+ && ![istarget hppa*64*-*-hpux*] \
+ && ![istarget ia64-*-hpux*] \
+ && ![istarget *-*-linux*] \
+ && ![istarget *-*-irix5*] \
+ && ![istarget *-*-irix6*] \
+ && ![istarget *-*-netbsd*] \
+ && ![istarget *-*-solaris2*] } {
+ return 0
+ }
+
+ if { [istarget *-*-linux*aout*] \
+ || [istarget *-*-linux*oldld*] } {
+ return 0
+ }
+
+ if { ![istarget *-*-netbsdelf*] \
+ && ([istarget *-*-netbsd*aout*] \
+ || [istarget *-*-netbsdpe*] \
+ || [istarget arm*-*-netbsd*] \
+ || [istarget sparc-*-netbsd*] \
+ || [istarget i*86-*-netbsd*] \
+ || [istarget m68*-*-netbsd*] \
+ || [istarget vax-*-netbsd*] \
+ || [istarget ns32k-*-netbsd*]) } {
+ return 0
+ }
+ return 1
+}