mirror of
git://gcc.gnu.org/git/gcc.git
synced 2025-03-12 00:57:19 +08:00
ia64-aix port from Tim Wall
ia64-aix port from Tim Wall * config.gcc: Add configuration for AIX5/IA64. * config/ia64/aix.h: New. AIX5/IA64-specific configuration. * config/ia64/crt[in].asm: New. Generic static ctor/dtor support prefix/suffix code. * config/ia64/t-aix: New. Makefile fragment. * config/ia64/unwind-aix.c: New. Unwind table entry lookup. From-SVN: r43958
This commit is contained in:
parent
4d89361244
commit
c177db4bbe
@ -1,3 +1,12 @@
|
||||
2001-07-11 Timothy Wall <twall@redhat.com>
|
||||
|
||||
* config.gcc: Add configuration for AIX5/IA64.
|
||||
* config/ia64/aix.h: New. AIX5/IA64-specific configuration.
|
||||
* config/ia64/crt[in].asm: New. Generic static ctor/dtor
|
||||
support prefix/suffix code.
|
||||
* config/ia64/t-aix: New. Makefile fragment.
|
||||
* config/ia64/unwind-aix.c: New. Unwind table entry lookup.
|
||||
|
||||
2001-07-11 Kazu Hirata <kazu@hxi.com>
|
||||
|
||||
* recog.c (validate_change): Fix a comment typo.
|
||||
|
@ -1465,6 +1465,11 @@ i960-*-*) # Default i960 environment.
|
||||
c_target_objs="i960-c.o"
|
||||
cxx_target_objs="i960-c.o"
|
||||
;;
|
||||
ia64*-*-aix*)
|
||||
tm_file="${tm_file} svr4.h ia64/sysv4.h ia64/aix.h"
|
||||
tmake_file="ia64/t-ia64 ia64/t-aix"
|
||||
target_cpu_default="MASK_GNU_AS|MASK_GNU_LD"
|
||||
;;
|
||||
ia64*-*-elf*)
|
||||
tm_file=ia64/elf.h
|
||||
tmake_file="ia64/t-ia64"
|
||||
|
262
gcc/config/ia64/aix.h
Normal file
262
gcc/config/ia64/aix.h
Normal file
@ -0,0 +1,262 @@
|
||||
/* Definitions of target machine GNU compiler. IA-64/AIX version.
|
||||
Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc.
|
||||
Contributed by Timothy Wall (twall@cygnus.com)
|
||||
|
||||
This file is part of GNU CC.
|
||||
|
||||
GNU CC 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)
|
||||
any later version.
|
||||
|
||||
GNU CC 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 GNU CC; see the file COPYING. If not, write to
|
||||
the Free Software Foundation, 59 Temple Place - Suite 330,
|
||||
Boston, MA 02111-1307, USA. */
|
||||
|
||||
/* AIX5 (aka Monterey): a mix of AIX and UnixWare.
|
||||
This file is loosely based on ia64/linux.h. */
|
||||
|
||||
#undef ASM_APP_ON
|
||||
#define ASM_APP_ON "#APP\n"
|
||||
|
||||
#undef ASM_APP_OFF
|
||||
#define ASM_APP_OFF "#NO_APP\n"
|
||||
|
||||
#define SET_ASM_OP "\t.set\t"
|
||||
|
||||
/*#undef PREFERRED_DEBUGGING_TYPE*/
|
||||
/*#define PREFERRED_DEBUGGING_TYPE DBX_DEBUG*/
|
||||
|
||||
#undef MD_EXEC_PREFIX
|
||||
#undef MD_STARTFILE_PREFIX
|
||||
#define MD_STARTFILE_PREFIX "/usr/lib/ia64l64/"
|
||||
|
||||
/* Output at beginning of assembler file. */
|
||||
/* The .file command should always begin the output. */
|
||||
#undef ASM_FILE_START
|
||||
#define ASM_FILE_START(FILE) \
|
||||
do { \
|
||||
output_file_directive (FILE, main_input_filename); \
|
||||
fprintf (FILE, "\t.version\t\"01.01\"\n"); \
|
||||
} while (0)
|
||||
|
||||
/* Provide a STARTFILE_SPEC appropriate for AIX. Here we add
|
||||
the crti C++ startup files file which provide part of the support
|
||||
for getting C++ file-scope static object constructed before entering
|
||||
`main'. */
|
||||
|
||||
#undef STARTFILE_SPEC
|
||||
#define STARTFILE_SPEC \
|
||||
"%{!shared: \
|
||||
%{pg:gcrt1_64.o%s} %{!pg:%{p:mcrt1_64.o%s} \
|
||||
%{!p:%{profile:gcrt1_64.o%s} \
|
||||
%{!profile:crt1_64.o%s}}}} \
|
||||
crti.o%s %{!shared:crtbegin.o%s} %{shared:crtbeginS.o%s}"
|
||||
|
||||
/* Provide a ENDFILE_SPEC appropriate for AIX. Here we tack on
|
||||
the crtn file which provides termination of the support for getting C++
|
||||
file-scope static object constructed before entering `main'. */
|
||||
|
||||
#undef ENDFILE_SPEC
|
||||
#define ENDFILE_SPEC "%{!shared:crtend.o%s} %{shared:crtendS.o%s} crtn.o%s"
|
||||
|
||||
#undef DEFAULT_VTABLE_THUNKS
|
||||
#define DEFAULT_VTABLE_THUNKS 1
|
||||
|
||||
/* Define this so we can compile MS code for use with WINE. */
|
||||
#define HANDLE_PRAGMA_PACK_PUSH_POP
|
||||
|
||||
/* A C string constant that tells the GNU CC driver program options to pass to
|
||||
CPP. It can also specify how to translate options you give to GNU CC into
|
||||
options for GNU CC to pass to the CPP. */
|
||||
|
||||
/* If -ansi, we need to define _ANSI_C_SOURCE to get the right headers. */
|
||||
#undef CPP_SPEC
|
||||
#define CPP_SPEC "\
|
||||
%{mcpu=itanium:-D__itanium__} %{mbig-endian:-D__BIG_ENDIAN__} \
|
||||
%{ansi:-D_ANSI_C_SOURCE} \
|
||||
%{posix:-D_POSIX_SOURCE} \
|
||||
%{cpp_cpu} \
|
||||
-D__LONG_MAX__=9223372036854775807L"
|
||||
|
||||
#undef CPP_PREDEFINES
|
||||
#define CPP_PREDEFINES "\
|
||||
-D__ia64 -D__ia64__ -D_AIX -D_AIX64 -D_LONGLONG -Dunix \
|
||||
-D__LP64__ -D__ELF__ -Asystem=unix -Asystem=aix -Acpu=ia64 -Amachine=ia64 \
|
||||
-D__64BIT__ -D_LONG_LONG -D_IA64 -D__int128=__size128_t"
|
||||
|
||||
/* The GNU C++ standard library requires that these macros be defined. */
|
||||
#undef CPLUSPLUS_CPP_SPEC
|
||||
#define CPLUSPLUS_CPP_SPEC \
|
||||
"-D_XOPEN_SOURCE=500 \
|
||||
-D_XOPEN_SOURCE_EXTENDED=1 \
|
||||
-D_LARGE_FILE_API \
|
||||
-D_ALL_SOURCE \
|
||||
-D__LONG_MAX__=9223372036854775807L \
|
||||
%{cpp_cpu}"
|
||||
|
||||
/* ia64-specific options for gas */
|
||||
#undef ASM_SPEC
|
||||
#define ASM_SPEC "-x %{mconstant-gp} %{mauto-pic}"
|
||||
|
||||
/* Define this for shared library support. */
|
||||
|
||||
#undef LINK_SPEC
|
||||
#define LINK_SPEC "\
|
||||
%{shared:-shared} \
|
||||
%{!shared: \
|
||||
%{!static: \
|
||||
%{rdynamic:-export-dynamic} \
|
||||
%{!dynamic-linker:-dynamic-linker /usr/lib/ia64l64/libc.so.1}} \
|
||||
%{static:-static}}"
|
||||
|
||||
#define DONT_USE_BUILTIN_SETJMP
|
||||
#define JMP_BUF_SIZE 85
|
||||
|
||||
/* Output any profiling code before the prologue. */
|
||||
|
||||
#undef PROFILE_BEFORE_PROLOGUE
|
||||
#define PROFILE_BEFORE_PROLOGUE 1
|
||||
|
||||
/* A C statement or compound statement to output to FILE some assembler code to
|
||||
call the profiling subroutine `mcount'.
|
||||
|
||||
FIXME this is not supported until xlC supports it and can thus tell us
|
||||
how to do it.
|
||||
*/
|
||||
|
||||
#undef FUNCTION_PROFILER
|
||||
#define FUNCTION_PROFILER(FILE, LABELNO) \
|
||||
do { \
|
||||
} while (0)
|
||||
|
||||
/* Tell the linker where to find the crt*.o files. */
|
||||
|
||||
#ifndef CROSS_COMPILE
|
||||
#undef STANDARD_STARTFILE_PREFIX
|
||||
#define STANDARD_STARTFILE_PREFIX "/usr/lib/ia64l64/"
|
||||
#endif
|
||||
|
||||
/* Override SELECT_SECTION and SELECT_RTX_SECTION from config/ia64/sysv4.h;
|
||||
these definitions ignore flag_pic as if it were always set;
|
||||
it is illegal to have relocations in shared segments on AIX. */
|
||||
|
||||
/* A C statement or statements to switch to the appropriate
|
||||
section for output of DECL. DECL is either a `VAR_DECL' node
|
||||
or a constant of some sort. RELOC indicates whether forming
|
||||
the initial value of DECL requires link-time relocations. */
|
||||
|
||||
#undef SELECT_SECTION
|
||||
#define SELECT_SECTION(DECL,RELOC) \
|
||||
{ \
|
||||
if (TREE_CODE (DECL) == STRING_CST) \
|
||||
{ \
|
||||
if (! flag_writable_strings) \
|
||||
const_section (); \
|
||||
else \
|
||||
data_section (); \
|
||||
} \
|
||||
else if (TREE_CODE (DECL) == VAR_DECL) \
|
||||
{ \
|
||||
if (XSTR (XEXP (DECL_RTL (DECL), 0), 0)[0] \
|
||||
== SDATA_NAME_FLAG_CHAR) \
|
||||
sdata_section (); \
|
||||
/* ??? We need the extra ! RELOC check, because the default is to \
|
||||
only check RELOC if flag_pic is set, and we don't set flag_pic \
|
||||
(yet?). */ \
|
||||
else if (DECL_READONLY_SECTION (DECL, RELOC) && ! (RELOC)) \
|
||||
const_section (); \
|
||||
else \
|
||||
data_section (); \
|
||||
} \
|
||||
/* This could be a CONSTRUCTOR containing ADDR_EXPR of a VAR_DECL, \
|
||||
in which case we can't put it in a shared library rodata. */ \
|
||||
else if (RELOC) \
|
||||
data_section (); \
|
||||
else \
|
||||
const_section (); \
|
||||
}
|
||||
|
||||
/* Similarly for constant pool data. */
|
||||
|
||||
extern unsigned int ia64_section_threshold;
|
||||
#undef SELECT_RTX_SECTION
|
||||
#define SELECT_RTX_SECTION(MODE, RTX) \
|
||||
{ \
|
||||
if (GET_MODE_SIZE (MODE) > 0 \
|
||||
&& GET_MODE_SIZE (MODE) <= ia64_section_threshold) \
|
||||
sdata_section (); \
|
||||
else if (symbolic_operand ((RTX), (MODE))) \
|
||||
data_section (); \
|
||||
else \
|
||||
const_section (); \
|
||||
}
|
||||
|
||||
#undef UNIQUE_SECTION
|
||||
#define UNIQUE_SECTION(DECL, RELOC) \
|
||||
do \
|
||||
{ \
|
||||
int len; \
|
||||
int sec; \
|
||||
const char *name; \
|
||||
char *string; \
|
||||
const char *prefix; \
|
||||
static const char *prefixes[/*4*/3][2] = \
|
||||
{ \
|
||||
{ ".text.", ".gnu.linkonce.t." }, \
|
||||
{ ".rodata.", ".gnu.linkonce.r." }, \
|
||||
{ ".data.", ".gnu.linkonce.d." } \
|
||||
/* Do not generate unique sections for uninitialised \
|
||||
data since we do not have support for this in the \
|
||||
linker scripts yet... \
|
||||
,{ ".bss.", ".gnu.linkonce.b." } */ \
|
||||
}; \
|
||||
\
|
||||
if (TREE_CODE (DECL) == FUNCTION_DECL) \
|
||||
sec = 0; \
|
||||
/* else if (DECL_INITIAL (DECL) == 0 \
|
||||
|| DECL_INITIAL (DECL) == error_mark_node) \
|
||||
sec = 3; */ \
|
||||
else if (DECL_READONLY_SECTION (DECL, RELOC) && ! (RELOC))\
|
||||
sec = 1; \
|
||||
else \
|
||||
sec = 2; \
|
||||
\
|
||||
name = IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (DECL)); \
|
||||
/* Strip off any encoding in name. */ \
|
||||
STRIP_NAME_ENCODING (name, name); \
|
||||
prefix = prefixes[sec][DECL_ONE_ONLY(DECL)]; \
|
||||
len = strlen (name) + strlen (prefix); \
|
||||
string = alloca (len + 1); \
|
||||
\
|
||||
sprintf (string, "%s%s", prefix, name); \
|
||||
\
|
||||
DECL_SECTION_NAME (DECL) = build_string (len, string); \
|
||||
} \
|
||||
while (0)
|
||||
|
||||
/* Override ia64/sysv4.h setting with that used by AIX5. */
|
||||
#undef WCHAR_TYPE
|
||||
#ifdef __64BIT__
|
||||
#define WCHAR_TYPE "unsigned int"
|
||||
#else
|
||||
#define WCHAR_TYPE "unsigned short"
|
||||
#endif
|
||||
|
||||
/* Have to get rid of the system's definition so that we can use gcc's
|
||||
instead. */
|
||||
#include <sys/machine.h>
|
||||
#undef REG_SIZE
|
||||
|
||||
/* Define the `__builtin_va_list' type for AIX. Use char* b/c that's what the
|
||||
system headers expect. */
|
||||
#define BUILD_VA_LIST_TYPE(VALIST) \
|
||||
(VALIST) = build_pointer_type(char_type_node)
|
||||
|
||||
/* End of aix.h */
|
66
gcc/config/ia64/crti.asm
Normal file
66
gcc/config/ia64/crti.asm
Normal file
@ -0,0 +1,66 @@
|
||||
# Copyright (C) 2000, 2001 Free Software Foundation, Inc.
|
||||
# Written By Timothy Wall
|
||||
#
|
||||
# This file 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) any
|
||||
# later version.
|
||||
#
|
||||
# In addition to the permissions in the GNU General Public License, the
|
||||
# Free Software Foundation gives you unlimited permission to link the
|
||||
# compiled version of this file with other programs, and to distribute
|
||||
# those programs without any restriction coming from the use of this
|
||||
# file. (The General Public License restrictions do apply in other
|
||||
# respects; for example, they cover modification of the file, and
|
||||
# distribution when not linked into another program.)
|
||||
#
|
||||
# This file 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 this program; see the file COPYING. If not, write to
|
||||
# the Free Software Foundation, 59 Temple Place - Suite 330,
|
||||
# Boston, MA 02111-1307, USA.
|
||||
#
|
||||
# As a special exception, if you link this library with files
|
||||
# compiled with GCC to produce an executable, this does not cause
|
||||
# the resulting executable to be covered by the GNU General Public License.
|
||||
# This exception does not however invalidate any other reasons why
|
||||
# the executable file might be covered by the GNU General Public License.
|
||||
#
|
||||
|
||||
# This file just make a stack frame for the contents of the .fini and
|
||||
# .init sections. Users may put any desired instructions in those
|
||||
# sections.
|
||||
|
||||
.file "crti.asm"
|
||||
|
||||
.section ".init"
|
||||
.align 16
|
||||
.global _init#
|
||||
_init:
|
||||
.prologue 14, 33
|
||||
.save ar.pfs, r34
|
||||
alloc r34 = ar.pfs, 0, 4, 0, 0
|
||||
.vframe r35
|
||||
mov r35 = r12
|
||||
.save rp, r33
|
||||
mov r33 = b0
|
||||
.body
|
||||
|
||||
.section ".fini"
|
||||
.align 16
|
||||
.global _fini#
|
||||
_fini:
|
||||
.prologue 14, 33
|
||||
.save ar.pfs, r34
|
||||
alloc r34 = ar.pfs, 0, 4, 0, 0
|
||||
.vframe r35
|
||||
mov r35 = r12
|
||||
.save rp, r33
|
||||
mov r33 = b0
|
||||
.body
|
||||
|
||||
# end of crti.asm
|
56
gcc/config/ia64/crtn.asm
Normal file
56
gcc/config/ia64/crtn.asm
Normal file
@ -0,0 +1,56 @@
|
||||
# Copyright (C) 2000, 2001 Free Software Foundation, Inc.
|
||||
# Written By Timothy Wall
|
||||
#
|
||||
# This file 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) any
|
||||
# later version.
|
||||
#
|
||||
# In addition to the permissions in the GNU General Public License, the
|
||||
# Free Software Foundation gives you unlimited permission to link the
|
||||
# compiled version of this file with other programs, and to distribute
|
||||
# those programs without any restriction coming from the use of this
|
||||
# file. (The General Public License restrictions do apply in other
|
||||
# respects; for example, they cover modification of the file, and
|
||||
# distribution when not linked into another program.)
|
||||
#
|
||||
# This file 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 this program; see the file COPYING. If not, write to
|
||||
# the Free Software Foundation, 59 Temple Place - Suite 330,
|
||||
# Boston, MA 02111-1307, USA.
|
||||
#
|
||||
# As a special exception, if you link this library with files
|
||||
# compiled with GCC to produce an executable, this does not cause
|
||||
# the resulting executable to be covered by the GNU General Public License.
|
||||
# This exception does not however invalidate any other reasons why
|
||||
# the executable file might be covered by the GNU General Public License.
|
||||
#
|
||||
|
||||
# This file just makes sure that the .fini and .init sections do in
|
||||
# fact return. Users may put any desired instructions in those sections.
|
||||
# This file is the last thing linked into any executable.
|
||||
|
||||
.file "crtn.asm"
|
||||
|
||||
.section ".init"
|
||||
;;
|
||||
mov ar.pfs = r34
|
||||
mov b0 = r33
|
||||
.restore sp
|
||||
mov r12 = r35
|
||||
br.ret.sptk.many b0
|
||||
|
||||
.section ".fini"
|
||||
;;
|
||||
mov ar.pfs = r34
|
||||
mov b0 = r33
|
||||
.restore sp
|
||||
mov r12 = r35
|
||||
br.ret.sptk.many b0
|
||||
|
||||
# end of crtn.asm
|
19
gcc/config/ia64/t-aix
Normal file
19
gcc/config/ia64/t-aix
Normal file
@ -0,0 +1,19 @@
|
||||
# AIX support
|
||||
|
||||
# Compile crtbeginS.o and crtendS.o with pic.
|
||||
CRTSTUFF_T_CFLAGS_S = -fPIC
|
||||
# Compile libgcc2.a with pic and defines required by AIX headers
|
||||
TARGET_LIBGCC2_CFLAGS = -fPIC -D__64BIT__ -D_LONG_LONG -D_IA64 -D__int128=__size128_t
|
||||
LIB2ADDEH += $(srcdir)/config/ia64/unwind-aix.c
|
||||
|
||||
# Add crt[in].o to the list defined in t-ia64. These files provide
|
||||
# endpoints for crtbegin/end.
|
||||
|
||||
EXTRA_PARTS=crti.o crtn.o crtbegin.o crtend.o crtbeginS.o crtendS.o
|
||||
|
||||
crti.o: $(srcdir)/config/ia64/crti.asm $(GCC_PASSES)
|
||||
$(GCC_FOR_TARGET) -c -o crti.o -x assembler $(srcdir)/config/ia64/crti.asm
|
||||
crtn.o: $(srcdir)/config/ia64/crtn.asm $(GCC_PASSES)
|
||||
$(GCC_FOR_TARGET) -c -o crtn.o -x assembler $(srcdir)/config/ia64/crtn.asm
|
||||
|
||||
# end t-aix
|
120
gcc/config/ia64/unwind-aix.c
Normal file
120
gcc/config/ia64/unwind-aix.c
Normal file
@ -0,0 +1,120 @@
|
||||
/* Implements unwind table entry lookup for AIX (cf. fde-glibc.c).
|
||||
Copyright (C) 2001 Free Software Foundation, Inc.
|
||||
Contributed by Timothy Wall <twall@redhat.com>
|
||||
|
||||
This file is part of GNU CC.
|
||||
|
||||
GNU CC 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)
|
||||
any later version.
|
||||
|
||||
GNU CC 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 GNU CC; see the file COPYING. If not, write to
|
||||
the Free Software Foundation, 59 Temple Place - Suite 330,
|
||||
Boston, MA 02111-1307, USA. */
|
||||
|
||||
#include "tconfig.h"
|
||||
#include "tsystem.h"
|
||||
#include "unwind.h"
|
||||
#include "unwind-ia64.h"
|
||||
|
||||
#include <dlfcn.h>
|
||||
#include <link.h>
|
||||
#include <sys/mman.h>
|
||||
|
||||
static struct unw_table_entry *
|
||||
find_fde_for_dso (Elf64_Addr pc, rt_link_map *map,
|
||||
unsigned long* pseg_base, unsigned long* pgp)
|
||||
{
|
||||
rt_segment *seg;
|
||||
Elf64_Addr seg_base;
|
||||
struct unw_table_entry *f_base;
|
||||
size_t lo, hi;
|
||||
|
||||
/* See if PC falls into one of the loaded segments. */
|
||||
for (seg = map->l_segments; seg; seg = (rt_segment *)seg->s_next)
|
||||
{
|
||||
if (pc >= seg->s_map_addr && pc < seg->s_map_addr + seg->s_mapsz)
|
||||
break;
|
||||
}
|
||||
if (!seg)
|
||||
return NULL;
|
||||
|
||||
/* Search for the entry within the unwind table. */
|
||||
f_base = (struct unw_table_entry *) (map->l_unwind_table);
|
||||
seg_base = (Elf64_Addr) seg->s_map_addr;
|
||||
lo = 0;
|
||||
hi = map->l_unwind_sz / sizeof (struct unw_table_entry);
|
||||
|
||||
while (lo < hi)
|
||||
{
|
||||
size_t mid = (lo + hi) / 2;
|
||||
struct unw_table_entry *f = f_base + mid;
|
||||
|
||||
if (pc < f->start_offset + seg_base)
|
||||
hi = mid;
|
||||
else if (pc >= f->end_offset + seg_base)
|
||||
lo = mid + 1;
|
||||
else {
|
||||
/* AIX executables are *always* dynamic. Look up GP for this
|
||||
object. */
|
||||
Elf64_Dyn *dyn = map->l_ld;
|
||||
*pgp = 0;
|
||||
for (; dyn->d_tag != DT_NULL ; dyn++)
|
||||
{
|
||||
if (dyn->d_tag == DT_PLTGOT)
|
||||
{
|
||||
*pgp = dyn->d_un.d_ptr;
|
||||
break;
|
||||
}
|
||||
}
|
||||
*pseg_base = seg_base;
|
||||
return f;
|
||||
}
|
||||
}
|
||||
return NULL;
|
||||
}
|
||||
|
||||
/* Return a pointer to the unwind table entry for the function containing
|
||||
PC. */
|
||||
struct unw_table_entry *
|
||||
_Unwind_FindTableEntry (void *pc, unsigned long *pseg_base, unsigned long *pgp)
|
||||
{
|
||||
extern rt_r_debug _r_debug;
|
||||
struct unw_table_entry *ret;
|
||||
rt_link_map *map = _r_debug.r_map; /* address of link map */
|
||||
|
||||
/* Check the main application first, hoping that most of the user's
|
||||
code is there instead of in some library. */
|
||||
ret = find_fde_for_dso ((Elf64_Addr)pc, map, pseg_base, pgp);
|
||||
if (ret)
|
||||
{
|
||||
/* If we're in the main application, use the current GP value. */
|
||||
register unsigned long gp __asm__("gp");
|
||||
*pgp = gp;
|
||||
return ret;
|
||||
}
|
||||
|
||||
/* FIXME need a DSO lock mechanism for AIX here, to ensure shared
|
||||
libraries aren't changed while we're examining them. */
|
||||
|
||||
for (map = _r_debug.r_map; map; map = map->l_next)
|
||||
{
|
||||
/* Skip the main application's entry. */
|
||||
if (!map->l_name)
|
||||
continue;
|
||||
ret = find_fde_for_dso ((Elf64_Addr)pc, map, pseg_base, pgp);
|
||||
if (ret)
|
||||
break;
|
||||
}
|
||||
|
||||
/* FIXME need a DSO unlock mechanism for AIX here. */
|
||||
|
||||
return ret;
|
||||
}
|
Loading…
Reference in New Issue
Block a user