gdb/hppa-hpux-tdep.c

   1 /* Target-dependent code for HPUX running on PA-RISC, for GDB.
   2
   3    Copyright 2002, 2003 Free Software Foundation, Inc.
   4
   5 This file is part of GDB.
   6
   7 This program is free software; you can redistribute it and/or modify
   8 it under the terms of the GNU General Public License as published by
   9 the Free Software Foundation; either version 2 of the License, or
  10 (at your option) any later version.
  11
  12 This program is distributed in the hope that it will be useful,
  13 but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 GNU General Public License for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with this program; if not, write to the Free Software
  19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  20
  21 #include "defs.h"
  22 #include "arch-utils.h"
  23 #include "gdbcore.h"
  24 #include "osabi.h"
  25 #include "gdb_string.h"
  26
  27 /* Forward declarations.  */
  28 extern void _initialize_hppa_hpux_tdep (void);
  29 extern initialize_file_ftype _initialize_hppa_hpux_tdep;
  30
  31 /* FIXME: brobecker 2002-12-25.  The following functions will eventually
  32    become static, after the multiarching conversion is done.  */
  33 int hppa_hpux_pc_in_sigtramp (CORE_ADDR pc, char *name);
  34 void hppa_hpux_frame_saved_pc_in_sigtramp (struct frame_info *fi,
  35                                            CORE_ADDR *tmp);
  36 void hppa_hpux_frame_base_before_sigtramp (struct frame_info *fi,
  37                                            CORE_ADDR *tmp);
  38 void hppa_hpux_frame_find_saved_regs_in_sigtramp
  39       (struct frame_info *fi, CORE_ADDR *fsr);
  40
  41 int
  42 hppa_hpux_pc_in_sigtramp (CORE_ADDR pc, char *name)
  43 {
  44   /* Actually, for a PA running HPUX the kernel calls the signal handler
  45      without an intermediate trampoline.  Luckily the kernel always sets
  46      the return pointer for the signal handler to point to _sigreturn.  */
  47   return (name && (strcmp ("_sigreturn", name) == 0));
  48 }
  49
  50 /* For hppa_hpux_frame_saved_pc_in_sigtramp,
  51    hppa_hpux_frame_base_before_sigtramp and
  52    hppa_hpux_frame_find_saved_regs_in_sigtramp:
  53
  54    The signal context structure pointer is always saved at the base
  55    of the frame which "calls" the signal handler.  We only want to find
  56    the hardware save state structure, which lives 10 32bit words into
  57    sigcontext structure.
  58
  59    Within the hardware save state structure, registers are found in the
  60    same order as the register numbers in GDB.
  61
  62    At one time we peeked at %r31 rather than the PC queues to determine
  63    what instruction took the fault.  This was done on purpose, but I don't
  64    remember why.  Looking at the PC queues is really the right way, and
  65    I don't remember why that didn't work when this code was originally
  66    written.  */
  67
  68 void
  69 hppa_hpux_frame_saved_pc_in_sigtramp (struct frame_info *fi, CORE_ADDR *tmp)
  70 {
  71   *tmp = read_memory_integer (get_frame_base (fi) + (43 * 4), 4);
  72 }
  73
  74 void
  75 hppa_hpux_frame_base_before_sigtramp (struct frame_info *fi,
  76                                       CORE_ADDR *tmp)
  77 {
  78   *tmp = read_memory_integer (get_frame_base (fi) + (40 * 4), 4);
  79 }
  80
  81 void
  82 hppa_hpux_frame_find_saved_regs_in_sigtramp (struct frame_info *fi,
  83                                              CORE_ADDR *fsr)
  84 {
  85   int i;
  86   const CORE_ADDR tmp = get_frame_base (fi) + (10 * 4);
  87
  88   for (i = 0; i < NUM_REGS; i++)
  89     {
  90       if (i == SP_REGNUM)
  91         fsr[SP_REGNUM] = read_memory_integer (tmp + SP_REGNUM * 4, 4);
  92       else
  93         fsr[i] = tmp + i * 4;
  94     }
  95 }
  96
  97 static void
  98 hppa_hpux_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
  99 {
 100   set_gdbarch_pc_in_sigtramp (gdbarch, hppa_hpux_pc_in_sigtramp);
 101 }
 102
 103 static void
 104 hppa_hpux_som_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
 105 {
 106   hppa_hpux_init_abi (info, gdbarch);
 107 }
 108
 109 static void
 110 hppa_hpux_elf_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
 111 {
 112   hppa_hpux_init_abi (info, gdbarch);
 113 }
 114
 115 void
 116 _initialize_hppa_hpux_tdep (void)
 117 {
 118   gdbarch_register_osabi (bfd_arch_hppa, 0, GDB_OSABI_HPUX_SOM,
 119                           hppa_hpux_som_init_abi);
 120   gdbarch_register_osabi (bfd_arch_hppa, 0, GDB_OSABI_HPUX_ELF,
 121                           hppa_hpux_elf_init_abi);
 122 }