Browse Source
This port has been unmaintained for years, remove it. gdbserver/ChangeLog: * configure: Re-generate. * configure.ac: Remove srv_lynxos test. * configure.srv: Remove lynxos cases. * lynx-i386-low.cc, lynx-low.cc, lynx-low.h, lynx-ppc-low.c: Remove. Change-Id: I239d1cf1fc7b4c7a174251bc7981707eaba7d972binutils-2_35-branch
Simon Marchi
6 years ago
8 changed files with 8 additions and 1409 deletions
@ -1,358 +0,0 @@ |
|||
/* Copyright (C) 2010-2020 Free Software Foundation, Inc.
|
|||
|
|||
This file is part of GDB. |
|||
|
|||
This program 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 of the License, or |
|||
(at your option) any later version. |
|||
|
|||
This program 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. If not, see <http://www.gnu.org/licenses/>. */
|
|||
|
|||
#include "server.h" |
|||
#include "lynx-low.h" |
|||
#include <limits.h> |
|||
#include <sys/ptrace.h> |
|||
#include "gdbsupport/x86-xstate.h" |
|||
#include "arch/i386.h" |
|||
#include "x86-tdesc.h" |
|||
|
|||
/* The following two typedefs are defined in a .h file which is not
|
|||
in the standard include path (/sys/include/family/x86/ucontext.h), |
|||
so we just duplicate them here. |
|||
|
|||
Unfortunately for us, the definition of this structure differs between |
|||
LynxOS 5.x and LynxOS 178. Rather than duplicate the code, we use |
|||
different definitions depending on the target. */ |
|||
|
|||
#ifdef VMOS_DEV |
|||
#define LYNXOS_178 |
|||
#endif |
|||
|
|||
/* General register context */ |
|||
typedef struct usr_econtext { |
|||
|
|||
uint32_t uec_fault; |
|||
uint32_t uec_es; |
|||
uint32_t uec_ds; |
|||
uint32_t uec_edi; |
|||
uint32_t uec_esi; |
|||
uint32_t uec_ebp; |
|||
uint32_t uec_temp; |
|||
uint32_t uec_ebx; |
|||
uint32_t uec_edx; |
|||
uint32_t uec_ecx; |
|||
uint32_t uec_eax; |
|||
uint32_t uec_inum; |
|||
uint32_t uec_ecode; |
|||
uint32_t uec_eip; |
|||
uint32_t uec_cs; |
|||
uint32_t uec_eflags; |
|||
uint32_t uec_esp; |
|||
uint32_t uec_ss; |
|||
uint32_t uec_fs; |
|||
uint32_t uec_gs; |
|||
} usr_econtext_t; |
|||
|
|||
#if defined(LYNXOS_178) |
|||
|
|||
/* Floating point register context */ |
|||
typedef struct usr_fcontext { |
|||
uint32_t ufc_control; |
|||
uint32_t ufc_status; |
|||
uint32_t ufc_tag; |
|||
uint8_t *ufc_inst_off; |
|||
uint32_t ufc_inst_sel; |
|||
uint8_t *ufc_data_off; |
|||
uint32_t ufc_data_sel; |
|||
struct ufp387_real { |
|||
uint16_t umant4; |
|||
uint16_t umant3; |
|||
uint16_t umant2; |
|||
uint16_t umant1; |
|||
uint16_t us_and_e; |
|||
} ufc_reg[8]; |
|||
} usr_fcontext_t; |
|||
|
|||
#else /* This is LynxOS 5.x. */ |
|||
|
|||
/* Floating point and SIMD register context */ |
|||
typedef struct usr_fcontext { |
|||
uint16_t ufc_control; |
|||
uint16_t ufc_status; |
|||
uint16_t ufc_tag; |
|||
uint16_t ufc_opcode; |
|||
uint8_t *ufc_inst_off; |
|||
uint32_t ufc_inst_sel; |
|||
uint8_t *ufc_data_off; |
|||
uint32_t ufc_data_sel; |
|||
uint32_t usse_mxcsr; |
|||
uint32_t usse_mxcsr_mask; |
|||
struct ufp387_real { |
|||
uint16_t umant4; |
|||
uint16_t umant3; |
|||
uint16_t umant2; |
|||
uint16_t umant1; |
|||
uint16_t us_and_e; |
|||
uint16_t ureserved_1; |
|||
uint16_t ureserved_2; |
|||
uint16_t ureserved_3; |
|||
} ufc_reg[8]; |
|||
struct uxmm_register { |
|||
uint16_t uchunk_1; |
|||
uint16_t uchunk_2; |
|||
uint16_t uchunk_3; |
|||
uint16_t uchunk_4; |
|||
uint16_t uchunk_5; |
|||
uint16_t uchunk_6; |
|||
uint16_t uchunk_7; |
|||
uint16_t uchunk_8; |
|||
} uxmm_reg[8]; |
|||
char ureserved[16][14]; |
|||
} usr_fcontext_t; |
|||
|
|||
#endif |
|||
|
|||
/* The index of various registers inside the regcache. */ |
|||
|
|||
enum lynx_i386_gdb_regnum |
|||
{ |
|||
I386_EAX_REGNUM, |
|||
I386_ECX_REGNUM, |
|||
I386_EDX_REGNUM, |
|||
I386_EBX_REGNUM, |
|||
I386_ESP_REGNUM, |
|||
I386_EBP_REGNUM, |
|||
I386_ESI_REGNUM, |
|||
I386_EDI_REGNUM, |
|||
I386_EIP_REGNUM, |
|||
I386_EFLAGS_REGNUM, |
|||
I386_CS_REGNUM, |
|||
I386_SS_REGNUM, |
|||
I386_DS_REGNUM, |
|||
I386_ES_REGNUM, |
|||
I386_FS_REGNUM, |
|||
I386_GS_REGNUM, |
|||
I386_ST0_REGNUM, |
|||
I386_FCTRL_REGNUM = I386_ST0_REGNUM + 8, |
|||
I386_FSTAT_REGNUM, |
|||
I386_FTAG_REGNUM, |
|||
I386_FISEG_REGNUM, |
|||
I386_FIOFF_REGNUM, |
|||
I386_FOSEG_REGNUM, |
|||
I386_FOOFF_REGNUM, |
|||
I386_FOP_REGNUM, |
|||
I386_XMM0_REGNUM = 32, |
|||
I386_MXCSR_REGNUM = I386_XMM0_REGNUM + 8, |
|||
I386_SENTINEL_REGUM |
|||
}; |
|||
|
|||
/* The fill_function for the general-purpose register set. */ |
|||
|
|||
static void |
|||
lynx_i386_fill_gregset (struct regcache *regcache, char *buf) |
|||
{ |
|||
#define lynx_i386_collect_gp(regnum, fld) \ |
|||
collect_register (regcache, regnum, \ |
|||
buf + offsetof (usr_econtext_t, uec_##fld)) |
|||
|
|||
lynx_i386_collect_gp (I386_EAX_REGNUM, eax); |
|||
lynx_i386_collect_gp (I386_ECX_REGNUM, ecx); |
|||
lynx_i386_collect_gp (I386_EDX_REGNUM, edx); |
|||
lynx_i386_collect_gp (I386_EBX_REGNUM, ebx); |
|||
lynx_i386_collect_gp (I386_ESP_REGNUM, esp); |
|||
lynx_i386_collect_gp (I386_EBP_REGNUM, ebp); |
|||
lynx_i386_collect_gp (I386_ESI_REGNUM, esi); |
|||
lynx_i386_collect_gp (I386_EDI_REGNUM, edi); |
|||
lynx_i386_collect_gp (I386_EIP_REGNUM, eip); |
|||
lynx_i386_collect_gp (I386_EFLAGS_REGNUM, eflags); |
|||
lynx_i386_collect_gp (I386_CS_REGNUM, cs); |
|||
lynx_i386_collect_gp (I386_SS_REGNUM, ss); |
|||
lynx_i386_collect_gp (I386_DS_REGNUM, ds); |
|||
lynx_i386_collect_gp (I386_ES_REGNUM, es); |
|||
lynx_i386_collect_gp (I386_FS_REGNUM, fs); |
|||
lynx_i386_collect_gp (I386_GS_REGNUM, gs); |
|||
} |
|||
|
|||
/* The store_function for the general-purpose register set. */ |
|||
|
|||
static void |
|||
lynx_i386_store_gregset (struct regcache *regcache, const char *buf) |
|||
{ |
|||
#define lynx_i386_supply_gp(regnum, fld) \ |
|||
supply_register (regcache, regnum, \ |
|||
buf + offsetof (usr_econtext_t, uec_##fld)) |
|||
|
|||
lynx_i386_supply_gp (I386_EAX_REGNUM, eax); |
|||
lynx_i386_supply_gp (I386_ECX_REGNUM, ecx); |
|||
lynx_i386_supply_gp (I386_EDX_REGNUM, edx); |
|||
lynx_i386_supply_gp (I386_EBX_REGNUM, ebx); |
|||
lynx_i386_supply_gp (I386_ESP_REGNUM, esp); |
|||
lynx_i386_supply_gp (I386_EBP_REGNUM, ebp); |
|||
lynx_i386_supply_gp (I386_ESI_REGNUM, esi); |
|||
lynx_i386_supply_gp (I386_EDI_REGNUM, edi); |
|||
lynx_i386_supply_gp (I386_EIP_REGNUM, eip); |
|||
lynx_i386_supply_gp (I386_EFLAGS_REGNUM, eflags); |
|||
lynx_i386_supply_gp (I386_CS_REGNUM, cs); |
|||
lynx_i386_supply_gp (I386_SS_REGNUM, ss); |
|||
lynx_i386_supply_gp (I386_DS_REGNUM, ds); |
|||
lynx_i386_supply_gp (I386_ES_REGNUM, es); |
|||
lynx_i386_supply_gp (I386_FS_REGNUM, fs); |
|||
lynx_i386_supply_gp (I386_GS_REGNUM, gs); |
|||
} |
|||
|
|||
/* Extract the first 16 bits of register REGNUM in the REGCACHE,
|
|||
and store these 2 bytes at DEST. |
|||
|
|||
This is useful to collect certain 16bit registers which are known |
|||
by GDBserver as 32bit registers (such as the Control Register |
|||
for instance). */ |
|||
|
|||
static void |
|||
collect_16bit_register (struct regcache *regcache, int regnum, char *dest) |
|||
{ |
|||
gdb_byte word[4]; |
|||
|
|||
collect_register (regcache, regnum, word); |
|||
memcpy (dest, word, 2); |
|||
} |
|||
|
|||
/* The fill_function for the floating-point register set. */ |
|||
|
|||
static void |
|||
lynx_i386_fill_fpregset (struct regcache *regcache, char *buf) |
|||
{ |
|||
int i; |
|||
|
|||
/* Collect %st0 .. %st7. */ |
|||
for (i = 0; i < 8; i++) |
|||
collect_register (regcache, I386_ST0_REGNUM + i, |
|||
buf + offsetof (usr_fcontext_t, ufc_reg) |
|||
+ i * sizeof (struct ufp387_real)); |
|||
|
|||
/* Collect the other FPU registers. */ |
|||
collect_16bit_register (regcache, I386_FCTRL_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_control)); |
|||
collect_16bit_register (regcache, I386_FSTAT_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_status)); |
|||
collect_16bit_register (regcache, I386_FTAG_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_tag)); |
|||
collect_register (regcache, I386_FISEG_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_inst_sel)); |
|||
collect_register (regcache, I386_FIOFF_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_inst_off)); |
|||
collect_register (regcache, I386_FOSEG_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_data_sel)); |
|||
collect_register (regcache, I386_FOOFF_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_data_off)); |
|||
#if !defined(LYNXOS_178) |
|||
collect_16bit_register (regcache, I386_FOP_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_opcode)); |
|||
|
|||
/* Collect the XMM registers. */ |
|||
for (i = 0; i < 8; i++) |
|||
collect_register (regcache, I386_XMM0_REGNUM + i, |
|||
buf + offsetof (usr_fcontext_t, uxmm_reg) |
|||
+ i * sizeof (struct uxmm_register)); |
|||
collect_register (regcache, I386_MXCSR_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, usse_mxcsr)); |
|||
#endif |
|||
} |
|||
|
|||
/* This is the supply counterpart for collect_16bit_register:
|
|||
It extracts a 2byte value from BUF, and uses that value to |
|||
set REGNUM's value in the regcache. |
|||
|
|||
This is useful to supply the value of certain 16bit registers |
|||
which are known by GDBserver as 32bit registers (such as the Control |
|||
Register for instance). */ |
|||
|
|||
static void |
|||
supply_16bit_register (struct regcache *regcache, int regnum, const char *buf) |
|||
{ |
|||
gdb_byte word[4]; |
|||
|
|||
memcpy (word, buf, 2); |
|||
memset (word + 2, 0, 2); |
|||
supply_register (regcache, regnum, word); |
|||
} |
|||
|
|||
/* The store_function for the floating-point register set. */ |
|||
|
|||
static void |
|||
lynx_i386_store_fpregset (struct regcache *regcache, const char *buf) |
|||
{ |
|||
int i; |
|||
|
|||
/* Store the %st0 .. %st7 registers. */ |
|||
for (i = 0; i < 8; i++) |
|||
supply_register (regcache, I386_ST0_REGNUM + i, |
|||
buf + offsetof (usr_fcontext_t, ufc_reg) |
|||
+ i * sizeof (struct ufp387_real)); |
|||
|
|||
/* Store the other FPU registers. */ |
|||
supply_16bit_register (regcache, I386_FCTRL_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_control)); |
|||
supply_16bit_register (regcache, I386_FSTAT_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_status)); |
|||
supply_16bit_register (regcache, I386_FTAG_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_tag)); |
|||
supply_register (regcache, I386_FISEG_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_inst_sel)); |
|||
supply_register (regcache, I386_FIOFF_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_inst_off)); |
|||
supply_register (regcache, I386_FOSEG_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_data_sel)); |
|||
supply_register (regcache, I386_FOOFF_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_data_off)); |
|||
#if !defined(LYNXOS_178) |
|||
supply_16bit_register (regcache, I386_FOP_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_opcode)); |
|||
|
|||
/* Store the XMM registers. */ |
|||
for (i = 0; i < 8; i++) |
|||
supply_register (regcache, I386_XMM0_REGNUM + i, |
|||
buf + offsetof (usr_fcontext_t, uxmm_reg) |
|||
+ i * sizeof (struct uxmm_register)); |
|||
supply_register (regcache, I386_MXCSR_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, usse_mxcsr)); |
|||
#endif |
|||
} |
|||
|
|||
/* Implements the lynx_target_ops.arch_setup routine. */ |
|||
|
|||
static void |
|||
lynx_i386_arch_setup (void) |
|||
{ |
|||
struct target_desc *tdesc |
|||
= i386_create_target_description (X86_XSTATE_SSE_MASK, false, false); |
|||
|
|||
init_target_desc (tdesc, i386_expedite_regs); |
|||
|
|||
lynx_tdesc = tdesc; |
|||
} |
|||
|
|||
/* Description of all the x86-lynx register sets. */ |
|||
|
|||
struct lynx_regset_info lynx_target_regsets[] = { |
|||
/* General Purpose Registers. */ |
|||
{PTRACE_GETREGS, PTRACE_SETREGS, sizeof(usr_econtext_t), |
|||
lynx_i386_fill_gregset, lynx_i386_store_gregset}, |
|||
/* Floating Point Registers. */ |
|||
{ PTRACE_GETFPREGS, PTRACE_SETFPREGS, sizeof(usr_fcontext_t), |
|||
lynx_i386_fill_fpregset, lynx_i386_store_fpregset }, |
|||
/* End of list marker. */ |
|||
{0, 0, -1, NULL, NULL } |
|||
}; |
|||
|
|||
/* The lynx_target_ops vector for x86-lynx. */ |
|||
|
|||
struct lynx_target_ops the_low_target = { |
|||
lynx_i386_arch_setup, |
|||
}; |
|||
@ -1,747 +0,0 @@ |
|||
/* Copyright (C) 2009-2020 Free Software Foundation, Inc.
|
|||
|
|||
This file is part of GDB. |
|||
|
|||
This program 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 of the License, or |
|||
(at your option) any later version. |
|||
|
|||
This program 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. If not, see <http://www.gnu.org/licenses/>. */
|
|||
|
|||
#include "server.h" |
|||
#include "target.h" |
|||
#include "lynx-low.h" |
|||
|
|||
#include <limits.h> |
|||
#include <sys/ptrace.h> |
|||
#include <sys/piddef.h> /* Provides PIDGET, TIDGET, BUILDPID, etc. */ |
|||
#include <unistd.h> |
|||
#include <sys/ioctl.h> |
|||
#include <sys/types.h> |
|||
#include "gdbsupport/gdb_wait.h" |
|||
#include <signal.h> |
|||
#include "gdbsupport/filestuff.h" |
|||
#include "gdbsupport/common-inferior.h" |
|||
#include "nat/fork-inferior.h" |
|||
|
|||
int using_threads = 1; |
|||
|
|||
const struct target_desc *lynx_tdesc; |
|||
|
|||
/* Per-process private data. */ |
|||
|
|||
struct process_info_private |
|||
{ |
|||
/* The PTID obtained from the last wait performed on this process.
|
|||
Initialized to null_ptid until the first wait is performed. */ |
|||
ptid_t last_wait_event_ptid; |
|||
}; |
|||
|
|||
/* Print a debug trace on standard output if debug_threads is set. */ |
|||
|
|||
static void |
|||
lynx_debug (char *string, ...) |
|||
{ |
|||
va_list args; |
|||
|
|||
if (!debug_threads) |
|||
return; |
|||
|
|||
va_start (args, string); |
|||
fprintf (stderr, "DEBUG(lynx): "); |
|||
vfprintf (stderr, string, args); |
|||
fprintf (stderr, "\n"); |
|||
va_end (args); |
|||
} |
|||
|
|||
/* Build a ptid_t given a PID and a LynxOS TID. */ |
|||
|
|||
static ptid_t |
|||
lynx_ptid_t (int pid, long tid) |
|||
{ |
|||
/* brobecker/2010-06-21: It looks like the LWP field in ptids
|
|||
should be distinct for each thread (see write_ptid where it |
|||
writes the thread ID from the LWP). So instead of storing |
|||
the LynxOS tid in the tid field of the ptid, we store it in |
|||
the lwp field. */ |
|||
return ptid_t (pid, tid, 0); |
|||
} |
|||
|
|||
/* Return the process ID of the given PTID.
|
|||
|
|||
This function has little reason to exist, it's just a wrapper around |
|||
ptid_get_pid. But since we have a getter function for the lynxos |
|||
ptid, it feels cleaner to have a getter for the pid as well. */ |
|||
|
|||
static int |
|||
lynx_ptid_get_pid (ptid_t ptid) |
|||
{ |
|||
return ptid.pid (); |
|||
} |
|||
|
|||
/* Return the LynxOS tid of the given PTID. */ |
|||
|
|||
static long |
|||
lynx_ptid_get_tid (ptid_t ptid) |
|||
{ |
|||
/* See lynx_ptid_t: The LynxOS tid is stored inside the lwp field
|
|||
of the ptid. */ |
|||
return ptid.lwp (); |
|||
} |
|||
|
|||
/* For a given PTID, return the associated PID as known by the LynxOS
|
|||
ptrace layer. */ |
|||
|
|||
static int |
|||
lynx_ptrace_pid_from_ptid (ptid_t ptid) |
|||
{ |
|||
return BUILDPID (lynx_ptid_get_pid (ptid), lynx_ptid_get_tid (ptid)); |
|||
} |
|||
|
|||
/* Return a string image of the ptrace REQUEST number. */ |
|||
|
|||
static char * |
|||
ptrace_request_to_str (int request) |
|||
{ |
|||
#define CASE(X) case X: return #X |
|||
switch (request) |
|||
{ |
|||
CASE(PTRACE_TRACEME); |
|||
CASE(PTRACE_PEEKTEXT); |
|||
CASE(PTRACE_PEEKDATA); |
|||
CASE(PTRACE_PEEKUSER); |
|||
CASE(PTRACE_POKETEXT); |
|||
CASE(PTRACE_POKEDATA); |
|||
CASE(PTRACE_POKEUSER); |
|||
CASE(PTRACE_CONT); |
|||
CASE(PTRACE_KILL); |
|||
CASE(PTRACE_SINGLESTEP); |
|||
CASE(PTRACE_ATTACH); |
|||
CASE(PTRACE_DETACH); |
|||
CASE(PTRACE_GETREGS); |
|||
CASE(PTRACE_SETREGS); |
|||
CASE(PTRACE_GETFPREGS); |
|||
CASE(PTRACE_SETFPREGS); |
|||
CASE(PTRACE_READDATA); |
|||
CASE(PTRACE_WRITEDATA); |
|||
CASE(PTRACE_READTEXT); |
|||
CASE(PTRACE_WRITETEXT); |
|||
CASE(PTRACE_GETFPAREGS); |
|||
CASE(PTRACE_SETFPAREGS); |
|||
CASE(PTRACE_GETWINDOW); |
|||
CASE(PTRACE_SETWINDOW); |
|||
CASE(PTRACE_SYSCALL); |
|||
CASE(PTRACE_DUMPCORE); |
|||
CASE(PTRACE_SETWRBKPT); |
|||
CASE(PTRACE_SETACBKPT); |
|||
CASE(PTRACE_CLRBKPT); |
|||
CASE(PTRACE_GET_UCODE); |
|||
#ifdef PT_READ_GPR |
|||
CASE(PT_READ_GPR); |
|||
#endif |
|||
#ifdef PT_WRITE_GPR |
|||
CASE(PT_WRITE_GPR); |
|||
#endif |
|||
#ifdef PT_READ_FPR |
|||
CASE(PT_READ_FPR); |
|||
#endif |
|||
#ifdef PT_WRITE_FPR |
|||
CASE(PT_WRITE_FPR); |
|||
#endif |
|||
#ifdef PT_READ_VPR |
|||
CASE(PT_READ_VPR); |
|||
#endif |
|||
#ifdef PT_WRITE_VPR |
|||
CASE(PT_WRITE_VPR); |
|||
#endif |
|||
#ifdef PTRACE_PEEKUSP |
|||
CASE(PTRACE_PEEKUSP); |
|||
#endif |
|||
#ifdef PTRACE_POKEUSP |
|||
CASE(PTRACE_POKEUSP); |
|||
#endif |
|||
CASE(PTRACE_PEEKTHREAD); |
|||
CASE(PTRACE_THREADUSER); |
|||
CASE(PTRACE_FPREAD); |
|||
CASE(PTRACE_FPWRITE); |
|||
CASE(PTRACE_SETSIG); |
|||
CASE(PTRACE_CONT_ONE); |
|||
CASE(PTRACE_KILL_ONE); |
|||
CASE(PTRACE_SINGLESTEP_ONE); |
|||
CASE(PTRACE_GETLOADINFO); |
|||
CASE(PTRACE_GETTRACESIG); |
|||
#ifdef PTRACE_GETTHREADLIST |
|||
CASE(PTRACE_GETTHREADLIST); |
|||
#endif |
|||
} |
|||
#undef CASE |
|||
|
|||
return "<unknown-request>"; |
|||
} |
|||
|
|||
/* A wrapper around ptrace that allows us to print debug traces of
|
|||
ptrace calls if debug traces are activated. */ |
|||
|
|||
static int |
|||
lynx_ptrace (int request, ptid_t ptid, int addr, int data, int addr2) |
|||
{ |
|||
int result; |
|||
const int pid = lynx_ptrace_pid_from_ptid (ptid); |
|||
int saved_errno; |
|||
|
|||
if (debug_threads) |
|||
fprintf (stderr, "PTRACE (%s, pid=%d(pid=%d, tid=%d), addr=0x%x, " |
|||
"data=0x%x, addr2=0x%x)", |
|||
ptrace_request_to_str (request), pid, PIDGET (pid), TIDGET (pid), |
|||
addr, data, addr2); |
|||
result = ptrace (request, pid, addr, data, addr2); |
|||
saved_errno = errno; |
|||
if (debug_threads) |
|||
fprintf (stderr, " -> %d (=0x%x)\n", result, result); |
|||
|
|||
errno = saved_errno; |
|||
return result; |
|||
} |
|||
|
|||
/* Call add_process with the given parameters, and initializes
|
|||
the process' private data. */ |
|||
|
|||
static struct process_info * |
|||
lynx_add_process (int pid, int attached) |
|||
{ |
|||
struct process_info *proc; |
|||
|
|||
proc = add_process (pid, attached); |
|||
proc->tdesc = lynx_tdesc; |
|||
proc->priv = XCNEW (struct process_info_private); |
|||
proc->priv->last_wait_event_ptid = null_ptid; |
|||
|
|||
return proc; |
|||
} |
|||
|
|||
/* Callback used by fork_inferior to start tracing the inferior. */ |
|||
|
|||
static void |
|||
lynx_ptrace_fun () |
|||
{ |
|||
int pgrp; |
|||
|
|||
/* Switch child to its own process group so that signals won't
|
|||
directly affect GDBserver. */ |
|||
pgrp = getpid(); |
|||
if (pgrp < 0) |
|||
trace_start_error_with_name ("pgrp"); |
|||
if (setpgid (0, pgrp) < 0) |
|||
trace_start_error_with_name ("setpgid"); |
|||
if (ioctl (0, TIOCSPGRP, &pgrp) < 0) |
|||
trace_start_error_with_name ("ioctl"); |
|||
if (lynx_ptrace (PTRACE_TRACEME, null_ptid, 0, 0, 0) < 0) |
|||
trace_start_error_with_name ("lynx_ptrace"); |
|||
} |
|||
|
|||
/* Implement the create_inferior method of the target_ops vector. */ |
|||
|
|||
int |
|||
lynx_process_target::create_inferior (const char *program, |
|||
const std::vector<char *> &program_args) |
|||
{ |
|||
int pid; |
|||
std::string str_program_args = construct_inferior_arguments (program_args); |
|||
|
|||
lynx_debug ("create_inferior ()"); |
|||
|
|||
pid = fork_inferior (program, |
|||
str_program_args.c_str (), |
|||
get_environ ()->envp (), lynx_ptrace_fun, |
|||
NULL, NULL, NULL, NULL); |
|||
|
|||
post_fork_inferior (pid, program); |
|||
|
|||
lynx_add_process (pid, 0); |
|||
/* Do not add the process thread just yet, as we do not know its tid.
|
|||
We will add it later, during the wait for the STOP event corresponding |
|||
to the lynx_ptrace (PTRACE_TRACEME) call above. */ |
|||
return pid; |
|||
} |
|||
|
|||
/* Assuming we've just attached to a running inferior whose pid is PID,
|
|||
add all threads running in that process. */ |
|||
|
|||
static void |
|||
lynx_add_threads_after_attach (int pid) |
|||
{ |
|||
/* Ugh! There appears to be no way to get the list of threads
|
|||
in the program we just attached to. So get the list by calling |
|||
the "ps" command. This is only needed now, as we will then |
|||
keep the thread list up to date thanks to thread creation and |
|||
exit notifications. */ |
|||
FILE *f; |
|||
char buf[256]; |
|||
int thread_pid, thread_tid; |
|||
|
|||
f = popen ("ps atx", "r"); |
|||
if (f == NULL) |
|||
perror_with_name ("Cannot get thread list"); |
|||
|
|||
while (fgets (buf, sizeof (buf), f) != NULL) |
|||
if ((sscanf (buf, "%d %d", &thread_pid, &thread_tid) == 2 |
|||
&& thread_pid == pid)) |
|||
{ |
|||
ptid_t thread_ptid = lynx_ptid_t (pid, thread_tid); |
|||
|
|||
if (!find_thread_ptid (thread_ptid)) |
|||
{ |
|||
lynx_debug ("New thread: (pid = %d, tid = %d)", |
|||
pid, thread_tid); |
|||
add_thread (thread_ptid, NULL); |
|||
} |
|||
} |
|||
|
|||
pclose (f); |
|||
} |
|||
|
|||
/* Implement the attach target_ops method. */ |
|||
|
|||
int |
|||
lynx_process_target::attach (unsigned long pid) |
|||
{ |
|||
ptid_t ptid = lynx_ptid_t (pid, 0); |
|||
|
|||
if (lynx_ptrace (PTRACE_ATTACH, ptid, 0, 0, 0) != 0) |
|||
error ("Cannot attach to process %lu: %s (%d)\n", pid, |
|||
safe_strerror (errno), errno); |
|||
|
|||
lynx_add_process (pid, 1); |
|||
lynx_add_threads_after_attach (pid); |
|||
|
|||
return 0; |
|||
} |
|||
|
|||
/* Implement the resume target_ops method. */ |
|||
|
|||
void |
|||
lynx_process_target::resume (thread_resume *resume_info, size_t n) |
|||
{ |
|||
ptid_t ptid = resume_info[0].thread; |
|||
const int request |
|||
= (resume_info[0].kind == resume_step |
|||
? (n == 1 ? PTRACE_SINGLESTEP_ONE : PTRACE_SINGLESTEP) |
|||
: PTRACE_CONT); |
|||
const int signal = resume_info[0].sig; |
|||
|
|||
/* If given a minus_one_ptid, then try using the current_process'
|
|||
private->last_wait_event_ptid. On most LynxOS versions, |
|||
using any of the process' thread works well enough, but |
|||
LynxOS 178 is a little more sensitive, and triggers some |
|||
unexpected signals (Eg SIG61) when we resume the inferior |
|||
using a different thread. */ |
|||
if (ptid == minus_one_ptid) |
|||
ptid = current_process()->priv->last_wait_event_ptid; |
|||
|
|||
/* The ptid might still be minus_one_ptid; this can happen between
|
|||
the moment we create the inferior or attach to a process, and |
|||
the moment we resume its execution for the first time. It is |
|||
fine to use the current_thread's ptid in those cases. */ |
|||
if (ptid == minus_one_ptid) |
|||
ptid = ptid_of (current_thread); |
|||
|
|||
regcache_invalidate_pid (ptid.pid ()); |
|||
|
|||
errno = 0; |
|||
lynx_ptrace (request, ptid, 1, signal, 0); |
|||
if (errno) |
|||
perror_with_name ("ptrace"); |
|||
} |
|||
|
|||
/* Resume the execution of the given PTID. */ |
|||
|
|||
static void |
|||
lynx_continue (ptid_t ptid) |
|||
{ |
|||
struct thread_resume resume_info; |
|||
|
|||
resume_info.thread = ptid; |
|||
resume_info.kind = resume_continue; |
|||
resume_info.sig = 0; |
|||
|
|||
lynx_resume (&resume_info, 1); |
|||
} |
|||
|
|||
/* A wrapper around waitpid that handles the various idiosyncrasies
|
|||
of LynxOS' waitpid. */ |
|||
|
|||
static int |
|||
lynx_waitpid (int pid, int *stat_loc) |
|||
{ |
|||
int ret = 0; |
|||
|
|||
while (1) |
|||
{ |
|||
ret = waitpid (pid, stat_loc, WNOHANG); |
|||
if (ret < 0) |
|||
{ |
|||
/* An ECHILD error is not indicative of a real problem.
|
|||
It happens for instance while waiting for the inferior |
|||
to stop after attaching to it. */ |
|||
if (errno != ECHILD) |
|||
perror_with_name ("waitpid (WNOHANG)"); |
|||
} |
|||
if (ret > 0) |
|||
break; |
|||
/* No event with WNOHANG. See if there is one with WUNTRACED. */ |
|||
ret = waitpid (pid, stat_loc, WNOHANG | WUNTRACED); |
|||
if (ret < 0) |
|||
{ |
|||
/* An ECHILD error is not indicative of a real problem.
|
|||
It happens for instance while waiting for the inferior |
|||
to stop after attaching to it. */ |
|||
if (errno != ECHILD) |
|||
perror_with_name ("waitpid (WNOHANG|WUNTRACED)"); |
|||
} |
|||
if (ret > 0) |
|||
break; |
|||
usleep (1000); |
|||
} |
|||
return ret; |
|||
} |
|||
|
|||
/* Implement the wait target_ops method. */ |
|||
|
|||
static ptid_t |
|||
lynx_wait_1 (ptid_t ptid, struct target_waitstatus *status, int options) |
|||
{ |
|||
int pid; |
|||
int ret; |
|||
int wstat; |
|||
ptid_t new_ptid; |
|||
|
|||
if (ptid == minus_one_ptid) |
|||
pid = lynx_ptid_get_pid (ptid_of (current_thread)); |
|||
else |
|||
pid = BUILDPID (lynx_ptid_get_pid (ptid), lynx_ptid_get_tid (ptid)); |
|||
|
|||
retry: |
|||
|
|||
ret = lynx_waitpid (pid, &wstat); |
|||
new_ptid = lynx_ptid_t (ret, ((union wait *) &wstat)->w_tid); |
|||
find_process_pid (ret)->priv->last_wait_event_ptid = new_ptid; |
|||
|
|||
/* If this is a new thread, then add it now. The reason why we do
|
|||
this here instead of when handling new-thread events is because |
|||
we need to add the thread associated to the "main" thread - even |
|||
for non-threaded applications where the new-thread events are not |
|||
generated. */ |
|||
if (!find_thread_ptid (new_ptid)) |
|||
{ |
|||
lynx_debug ("New thread: (pid = %d, tid = %d)", |
|||
lynx_ptid_get_pid (new_ptid), lynx_ptid_get_tid (new_ptid)); |
|||
add_thread (new_ptid, NULL); |
|||
} |
|||
|
|||
if (WIFSTOPPED (wstat)) |
|||
{ |
|||
status->kind = TARGET_WAITKIND_STOPPED; |
|||
status->value.integer = gdb_signal_from_host (WSTOPSIG (wstat)); |
|||
lynx_debug ("process stopped with signal: %d", |
|||
status->value.integer); |
|||
} |
|||
else if (WIFEXITED (wstat)) |
|||
{ |
|||
status->kind = TARGET_WAITKIND_EXITED; |
|||
status->value.integer = WEXITSTATUS (wstat); |
|||
lynx_debug ("process exited with code: %d", status->value.integer); |
|||
} |
|||
else if (WIFSIGNALED (wstat)) |
|||
{ |
|||
status->kind = TARGET_WAITKIND_SIGNALLED; |
|||
status->value.integer = gdb_signal_from_host (WTERMSIG (wstat)); |
|||
lynx_debug ("process terminated with code: %d", |
|||
status->value.integer); |
|||
} |
|||
else |
|||
{ |
|||
/* Not sure what happened if we get here, or whether we can
|
|||
in fact get here. But if we do, handle the event the best |
|||
we can. */ |
|||
status->kind = TARGET_WAITKIND_STOPPED; |
|||
status->value.integer = gdb_signal_from_host (0); |
|||
lynx_debug ("unknown event ????"); |
|||
} |
|||
|
|||
/* SIGTRAP events are generated for situations other than single-step/
|
|||
breakpoint events (Eg. new-thread events). Handle those other types |
|||
of events, and resume the execution if necessary. */ |
|||
if (status->kind == TARGET_WAITKIND_STOPPED |
|||
&& status->value.integer == GDB_SIGNAL_TRAP) |
|||
{ |
|||
const int realsig = lynx_ptrace (PTRACE_GETTRACESIG, new_ptid, 0, 0, 0); |
|||
|
|||
lynx_debug ("(realsig = %d)", realsig); |
|||
switch (realsig) |
|||
{ |
|||
case SIGNEWTHREAD: |
|||
/* We just added the new thread above. No need to do anything
|
|||
further. Just resume the execution again. */ |
|||
lynx_continue (new_ptid); |
|||
goto retry; |
|||
|
|||
case SIGTHREADEXIT: |
|||
remove_thread (find_thread_ptid (new_ptid)); |
|||
lynx_continue (new_ptid); |
|||
goto retry; |
|||
} |
|||
} |
|||
|
|||
return new_ptid; |
|||
} |
|||
|
|||
/* A wrapper around lynx_wait_1 that also prints debug traces when
|
|||
such debug traces have been activated. */ |
|||
|
|||
ptid_t |
|||
lynx_process_target::wait (ptid_t ptid, target_waitstatus *status, |
|||
int options) |
|||
{ |
|||
ptid_t new_ptid; |
|||
|
|||
lynx_debug ("wait (pid = %d, tid = %ld)", |
|||
lynx_ptid_get_pid (ptid), lynx_ptid_get_tid (ptid)); |
|||
new_ptid = lynx_wait_1 (ptid, status, options); |
|||
lynx_debug (" -> (pid=%d, tid=%ld, status->kind = %d)", |
|||
lynx_ptid_get_pid (new_ptid), lynx_ptid_get_tid (new_ptid), |
|||
status->kind); |
|||
return new_ptid; |
|||
} |
|||
|
|||
/* Implement the kill target_ops method. */ |
|||
|
|||
int |
|||
lynx_process_target::kill (process_info *process) |
|||
{ |
|||
ptid_t ptid = lynx_ptid_t (process->pid, 0); |
|||
struct target_waitstatus status; |
|||
|
|||
lynx_ptrace (PTRACE_KILL, ptid, 0, 0, 0); |
|||
lynx_wait (ptid, &status, 0); |
|||
mourn (process); |
|||
return 0; |
|||
} |
|||
|
|||
/* Implement the detach target_ops method. */ |
|||
|
|||
int |
|||
lynx_process_target::detach (process_info *process) |
|||
{ |
|||
ptid_t ptid = lynx_ptid_t (process->pid, 0); |
|||
|
|||
lynx_ptrace (PTRACE_DETACH, ptid, 0, 0, 0); |
|||
mourn (process); |
|||
return 0; |
|||
} |
|||
|
|||
/* Implement the mourn target_ops method. */ |
|||
|
|||
void |
|||
lynx_process_target::mourn (struct process_info *proc) |
|||
{ |
|||
for_each_thread (proc->pid, remove_thread); |
|||
|
|||
/* Free our private data. */ |
|||
free (proc->priv); |
|||
proc->priv = NULL; |
|||
|
|||
remove_process (proc); |
|||
} |
|||
|
|||
/* Implement the join target_ops method. */ |
|||
|
|||
void |
|||
lynx_process_target::join (int pid) |
|||
{ |
|||
/* The PTRACE_DETACH is sufficient to detach from the process.
|
|||
So no need to do anything extra. */ |
|||
} |
|||
|
|||
/* Implement the thread_alive target_ops method. */ |
|||
|
|||
bool |
|||
lynx_process_target::thread_alive (ptid_t ptid) |
|||
{ |
|||
/* The list of threads is updated at the end of each wait, so it
|
|||
should be up to date. No need to re-fetch it. */ |
|||
return (find_thread_ptid (ptid) != NULL); |
|||
} |
|||
|
|||
/* Implement the fetch_registers target_ops method. */ |
|||
|
|||
void |
|||
lynx_process_target::fetch_registers (regcache *regcache, int regno) |
|||
{ |
|||
struct lynx_regset_info *regset = lynx_target_regsets; |
|||
ptid_t inferior_ptid = ptid_of (current_thread); |
|||
|
|||
lynx_debug ("fetch_registers (regno = %d)", regno); |
|||
|
|||
while (regset->size >= 0) |
|||
{ |
|||
char *buf; |
|||
int res; |
|||
|
|||
buf = xmalloc (regset->size); |
|||
res = lynx_ptrace (regset->get_request, inferior_ptid, (int) buf, 0, 0); |
|||
if (res < 0) |
|||
perror ("ptrace"); |
|||
regset->store_function (regcache, buf); |
|||
free (buf); |
|||
regset++; |
|||
} |
|||
} |
|||
|
|||
/* Implement the store_registers target_ops method. */ |
|||
|
|||
void |
|||
lynx_process_target::store_registers (regcache *regcache, int regno) |
|||
{ |
|||
struct lynx_regset_info *regset = lynx_target_regsets; |
|||
ptid_t inferior_ptid = ptid_of (current_thread); |
|||
|
|||
lynx_debug ("store_registers (regno = %d)", regno); |
|||
|
|||
while (regset->size >= 0) |
|||
{ |
|||
char *buf; |
|||
int res; |
|||
|
|||
buf = xmalloc (regset->size); |
|||
res = lynx_ptrace (regset->get_request, inferior_ptid, (int) buf, 0, 0); |
|||
if (res == 0) |
|||
{ |
|||
/* Then overlay our cached registers on that. */ |
|||
regset->fill_function (regcache, buf); |
|||
/* Only now do we write the register set. */ |
|||
res = lynx_ptrace (regset->set_request, inferior_ptid, (int) buf, |
|||
0, 0); |
|||
} |
|||
if (res < 0) |
|||
perror ("ptrace"); |
|||
free (buf); |
|||
regset++; |
|||
} |
|||
} |
|||
|
|||
/* Implement the read_memory target_ops method. */ |
|||
|
|||
int |
|||
lynx_process_target::read_memory (CORE_ADDR memaddr, unsigned char *myaddr, |
|||
int len) |
|||
{ |
|||
/* On LynxOS, memory reads needs to be performed in chunks the size
|
|||
of int types, and they should also be aligned accordingly. */ |
|||
int buf; |
|||
const int xfer_size = sizeof (buf); |
|||
CORE_ADDR addr = memaddr & -(CORE_ADDR) xfer_size; |
|||
ptid_t inferior_ptid = ptid_of (current_thread); |
|||
|
|||
while (addr < memaddr + len) |
|||
{ |
|||
int skip = 0; |
|||
int truncate = 0; |
|||
|
|||
errno = 0; |
|||
if (addr < memaddr) |
|||
skip = memaddr - addr; |
|||
if (addr + xfer_size > memaddr + len) |
|||
truncate = addr + xfer_size - memaddr - len; |
|||
buf = lynx_ptrace (PTRACE_PEEKTEXT, inferior_ptid, addr, 0, 0); |
|||
if (errno) |
|||
return errno; |
|||
memcpy (myaddr + (addr - memaddr) + skip, (gdb_byte *) &buf + skip, |
|||
xfer_size - skip - truncate); |
|||
addr += xfer_size; |
|||
} |
|||
|
|||
return 0; |
|||
} |
|||
|
|||
/* Implement the write_memory target_ops method. */ |
|||
|
|||
int |
|||
lynx_process_target::write_memory (CORE_ADDR memaddr, |
|||
const unsigned char *myaddr, int len) |
|||
{ |
|||
/* On LynxOS, memory writes needs to be performed in chunks the size
|
|||
of int types, and they should also be aligned accordingly. */ |
|||
int buf; |
|||
const int xfer_size = sizeof (buf); |
|||
CORE_ADDR addr = memaddr & -(CORE_ADDR) xfer_size; |
|||
ptid_t inferior_ptid = ptid_of (current_thread); |
|||
|
|||
while (addr < memaddr + len) |
|||
{ |
|||
int skip = 0; |
|||
int truncate = 0; |
|||
|
|||
if (addr < memaddr) |
|||
skip = memaddr - addr; |
|||
if (addr + xfer_size > memaddr + len) |
|||
truncate = addr + xfer_size - memaddr - len; |
|||
if (skip > 0 || truncate > 0) |
|||
{ |
|||
/* We need to read the memory at this address in order to preserve
|
|||
the data that we are not overwriting. */ |
|||
read_memory (addr, (unsigned char *) &buf, xfer_size); |
|||
if (errno) |
|||
return errno; |
|||
} |
|||
memcpy ((gdb_byte *) &buf + skip, myaddr + (addr - memaddr) + skip, |
|||
xfer_size - skip - truncate); |
|||
errno = 0; |
|||
lynx_ptrace (PTRACE_POKETEXT, inferior_ptid, addr, buf, 0); |
|||
if (errno) |
|||
return errno; |
|||
addr += xfer_size; |
|||
} |
|||
|
|||
return 0; |
|||
} |
|||
|
|||
/* Implement the kill_request target_ops method. */ |
|||
|
|||
void |
|||
lynx_process_target::request_interrupt () |
|||
{ |
|||
ptid_t inferior_ptid = ptid_of (get_first_thread ()); |
|||
|
|||
kill (lynx_ptid_get_pid (inferior_ptid), SIGINT); |
|||
} |
|||
|
|||
bool |
|||
lynx_process_target::supports_hardware_single_step () |
|||
{ |
|||
return true; |
|||
} |
|||
|
|||
const gdb_byte * |
|||
lynx_process_target::sw_breakpoint_from_kind (int kind, int *size) |
|||
{ |
|||
error (_("Target does not implement the sw_breakpoint_from_kind op")); |
|||
} |
|||
|
|||
/* The LynxOS target ops object. */ |
|||
|
|||
static lynx_process_target the_lynx_target; |
|||
|
|||
void |
|||
initialize_low (void) |
|||
{ |
|||
set_target_ops (&the_lynx_target); |
|||
the_low_target.arch_setup (); |
|||
} |
|||
|
|||
@ -1,102 +0,0 @@ |
|||
/* Copyright (C) 2010-2020 Free Software Foundation, Inc.
|
|||
|
|||
This file is part of GDB. |
|||
|
|||
This program 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 of the License, or |
|||
(at your option) any later version. |
|||
|
|||
This program 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. If not, see <http://www.gnu.org/licenses/>. */
|
|||
|
|||
#ifndef GDBSERVER_LYNX_LOW_H |
|||
#define GDBSERVER_LYNX_LOW_H |
|||
|
|||
struct regcache; |
|||
struct target_desc; |
|||
|
|||
/* Some information relative to a given register set. */ |
|||
|
|||
struct lynx_regset_info |
|||
{ |
|||
/* The ptrace request needed to get/set registers of this set. */ |
|||
int get_request, set_request; |
|||
/* The size of the register set. */ |
|||
int size; |
|||
/* Fill the buffer BUF from the contents of the given REGCACHE. */ |
|||
void (*fill_function) (struct regcache *regcache, char *buf); |
|||
/* Store the register value in BUF in the given REGCACHE. */ |
|||
void (*store_function) (struct regcache *regcache, const char *buf); |
|||
}; |
|||
|
|||
/* A list of regsets for the target being debugged, terminated by an entry
|
|||
where the size is negative. |
|||
|
|||
This list should be created by the target-specific code. */ |
|||
|
|||
extern struct lynx_regset_info lynx_target_regsets[]; |
|||
|
|||
/* The target-specific operations for LynxOS support. */ |
|||
|
|||
struct lynx_target_ops |
|||
{ |
|||
/* Architecture-specific setup. */ |
|||
void (*arch_setup) (void); |
|||
}; |
|||
|
|||
extern struct lynx_target_ops the_low_target; |
|||
|
|||
/* Target ops definitions for a LynxOS target. */ |
|||
|
|||
class lynx_process_target : public process_stratum_target |
|||
{ |
|||
public: |
|||
|
|||
int create_inferior (const char *program, |
|||
const std::vector<char *> &program_args) override; |
|||
|
|||
int attach (unsigned long pid) override; |
|||
|
|||
int kill (process_info *proc) override; |
|||
|
|||
int detach (process_info *proc) override; |
|||
|
|||
void mourn (process_info *proc) override; |
|||
|
|||
void join (int pid) override; |
|||
|
|||
bool thread_alive (ptid_t pid) override; |
|||
|
|||
void resume (thread_resume *resume_info, size_t n) override; |
|||
|
|||
ptid_t wait (ptid_t ptid, target_waitstatus *status, |
|||
int options) override; |
|||
|
|||
void fetch_registers (regcache *regcache, int regno) override; |
|||
|
|||
void store_registers (regcache *regcache, int regno) override; |
|||
|
|||
int read_memory (CORE_ADDR memaddr, unsigned char *myaddr, |
|||
int len) override; |
|||
|
|||
int write_memory (CORE_ADDR memaddr, const unsigned char *myaddr, |
|||
int len) override; |
|||
|
|||
void request_interrupt () override; |
|||
|
|||
bool supports_hardware_single_step () override; |
|||
|
|||
const gdb_byte *sw_breakpoint_from_kind (int kind, int *size) override; |
|||
}; |
|||
|
|||
/* The inferior's target description. This is a global because the
|
|||
LynxOS ports support neither bi-arch nor multi-process. */ |
|||
extern const struct target_desc *lynx_tdesc; |
|||
|
|||
#endif /* GDBSERVER_LYNX_LOW_H */ |
|||
@ -1,185 +0,0 @@ |
|||
/* Copyright (C) 2009-2020 Free Software Foundation, Inc.
|
|||
|
|||
This file is part of GDB. |
|||
|
|||
This program 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 of the License, or |
|||
(at your option) any later version. |
|||
|
|||
This program 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. If not, see <http://www.gnu.org/licenses/>. */
|
|||
|
|||
#include "server.h" |
|||
#include "lynx-low.h" |
|||
#include <limits.h> |
|||
#include <sys/ptrace.h> |
|||
|
|||
/* The following two typedefs are defined in a .h file which is not
|
|||
in the standard include path (/sys/include/family/ppc/ucontext.h), |
|||
so we just duplicate them here. */ |
|||
|
|||
/* General register context */ |
|||
typedef struct usr_econtext_s |
|||
{ |
|||
uint32_t uec_iregs[32]; |
|||
uint32_t uec_inum; |
|||
uint32_t uec_srr0; |
|||
uint32_t uec_srr1; |
|||
uint32_t uec_lr; |
|||
uint32_t uec_ctr; |
|||
uint32_t uec_cr; |
|||
uint32_t uec_xer; |
|||
uint32_t uec_dar; |
|||
uint32_t uec_mq; |
|||
uint32_t uec_msr; |
|||
uint32_t uec_sregs[16]; |
|||
uint32_t uec_ss_count; |
|||
uint32_t uec_ss_addr1; |
|||
uint32_t uec_ss_addr2; |
|||
uint32_t uec_ss_code1; |
|||
uint32_t uec_ss_code2; |
|||
} usr_econtext_t; |
|||
|
|||
/* Floating point register context */ |
|||
typedef struct usr_fcontext_s |
|||
{ |
|||
uint64_t ufc_freg[32]; |
|||
uint32_t ufc_fpscr[2]; |
|||
} usr_fcontext_t; |
|||
|
|||
/* Index of for various registers inside the regcache. */ |
|||
#define R0_REGNUM 0 |
|||
#define F0_REGNUM 32 |
|||
#define PC_REGNUM 64 |
|||
#define MSR_REGNUM 65 |
|||
#define CR_REGNUM 66 |
|||
#define LR_REGNUM 67 |
|||
#define CTR_REGNUM 68 |
|||
#define XER_REGNUM 69 |
|||
#define FPSCR_REGNUM 70 |
|||
|
|||
/* Defined in auto-generated file powerpc-32.c. */ |
|||
extern void init_registers_powerpc_32 (void); |
|||
extern const struct target_desc *tdesc_powerpc_32; |
|||
|
|||
/* The fill_function for the general-purpose register set. */ |
|||
|
|||
static void |
|||
lynx_ppc_fill_gregset (struct regcache *regcache, char *buf) |
|||
{ |
|||
int i; |
|||
|
|||
/* r0 - r31 */ |
|||
for (i = 0; i < 32; i++) |
|||
collect_register (regcache, R0_REGNUM + i, |
|||
buf + offsetof (usr_econtext_t, uec_iregs[i])); |
|||
|
|||
/* The other registers provided in the GP register context. */ |
|||
collect_register (regcache, PC_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_srr0)); |
|||
collect_register (regcache, MSR_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_srr1)); |
|||
collect_register (regcache, CR_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_cr)); |
|||
collect_register (regcache, LR_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_lr)); |
|||
collect_register (regcache, CTR_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_ctr)); |
|||
collect_register (regcache, XER_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_xer)); |
|||
} |
|||
|
|||
/* The store_function for the general-purpose register set. */ |
|||
|
|||
static void |
|||
lynx_ppc_store_gregset (struct regcache *regcache, const char *buf) |
|||
{ |
|||
int i; |
|||
|
|||
/* r0 - r31 */ |
|||
for (i = 0; i < 32; i++) |
|||
supply_register (regcache, R0_REGNUM + i, |
|||
buf + offsetof (usr_econtext_t, uec_iregs[i])); |
|||
|
|||
/* The other registers provided in the GP register context. */ |
|||
supply_register (regcache, PC_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_srr0)); |
|||
supply_register (regcache, MSR_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_srr1)); |
|||
supply_register (regcache, CR_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_cr)); |
|||
supply_register (regcache, LR_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_lr)); |
|||
supply_register (regcache, CTR_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_ctr)); |
|||
supply_register (regcache, XER_REGNUM, |
|||
buf + offsetof (usr_econtext_t, uec_xer)); |
|||
} |
|||
|
|||
/* The fill_function for the floating-point register set. */ |
|||
|
|||
static void |
|||
lynx_ppc_fill_fpregset (struct regcache *regcache, char *buf) |
|||
{ |
|||
int i; |
|||
|
|||
/* f0 - f31 */ |
|||
for (i = 0; i < 32; i++) |
|||
collect_register (regcache, F0_REGNUM + i, |
|||
buf + offsetof (usr_fcontext_t, ufc_freg[i])); |
|||
|
|||
/* fpscr */ |
|||
collect_register (regcache, FPSCR_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_fpscr)); |
|||
} |
|||
|
|||
/* The store_function for the floating-point register set. */ |
|||
|
|||
static void |
|||
lynx_ppc_store_fpregset (struct regcache *regcache, const char *buf) |
|||
{ |
|||
int i; |
|||
|
|||
/* f0 - f31 */ |
|||
for (i = 0; i < 32; i++) |
|||
supply_register (regcache, F0_REGNUM + i, |
|||
buf + offsetof (usr_fcontext_t, ufc_freg[i])); |
|||
|
|||
/* fpscr */ |
|||
supply_register (regcache, FPSCR_REGNUM, |
|||
buf + offsetof (usr_fcontext_t, ufc_fpscr)); |
|||
} |
|||
|
|||
/* Implements the lynx_target_ops.arch_setup routine. */ |
|||
|
|||
static void |
|||
lynx_ppc_arch_setup (void) |
|||
{ |
|||
init_registers_powerpc_32 (); |
|||
lynx_tdesc = tdesc_powerpc_32; |
|||
} |
|||
|
|||
/* Description of all the powerpc-lynx register sets. */ |
|||
|
|||
struct lynx_regset_info lynx_target_regsets[] = { |
|||
/* General Purpose Registers. */ |
|||
{PTRACE_GETREGS, PTRACE_SETREGS, sizeof(usr_econtext_t), |
|||
lynx_ppc_fill_gregset, lynx_ppc_store_gregset}, |
|||
/* Floating Point Registers. */ |
|||
{ PTRACE_GETFPREGS, PTRACE_SETFPREGS, sizeof(usr_fcontext_t), |
|||
lynx_ppc_fill_fpregset, lynx_ppc_store_fpregset }, |
|||
/* End of list marker. */ |
|||
{0, 0, -1, NULL, NULL } |
|||
}; |
|||
|
|||
/* The lynx_target_ops vector for powerpc-lynxos. */ |
|||
|
|||
struct lynx_target_ops the_low_target = { |
|||
lynx_ppc_arch_setup, |
|||
}; |
|||
Loading…
Reference in new issue