binutils-gdb/gdb/hppa-obsd-nat.c

259 lines
8.7 KiB
C
Raw Normal View History

/* Native-dependent code for OpenBSD/hppa.
Copyright (C) 2004-2017 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 "defs.h"
#include "inferior.h"
#include "regcache.h"
#include "target.h"
#include <sys/types.h>
#include <sys/ptrace.h>
#include <machine/reg.h>
#include "hppa-tdep.h"
#include "inf-ptrace.h"
#include "obsd-nat.h"
static int
hppaobsd_gregset_supplies_p (int regnum)
{
return (regnum >= HPPA_R0_REGNUM && regnum <= HPPA_CR27_REGNUM);
}
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
static int
hppaobsd_fpregset_supplies_p (int regnum)
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
{
return (regnum >= HPPA_FP0_REGNUM && regnum <= HPPA_FP31R_REGNUM);
}
/* Supply the general-purpose registers stored in GREGS to REGCACHE. */
static void
hppaobsd_supply_gregset (struct regcache *regcache, const void *gregs)
{
gdb_byte zero[4] = { 0 };
const char *regs = gregs;
int regnum;
regcache_raw_supply (regcache, HPPA_R0_REGNUM, &zero);
for (regnum = HPPA_R1_REGNUM; regnum <= HPPA_R31_REGNUM; regnum++)
regcache_raw_supply (regcache, regnum, regs + regnum * 4);
if (sizeof(struct reg) >= 46 * 4)
{
regcache_raw_supply (regcache, HPPA_IPSW_REGNUM, regs);
regcache_raw_supply (regcache, HPPA_SAR_REGNUM, regs + 32 * 4);
regcache_raw_supply (regcache, HPPA_PCSQ_HEAD_REGNUM, regs + 33 * 4);
regcache_raw_supply (regcache, HPPA_PCSQ_TAIL_REGNUM, regs + 34 * 4);
regcache_raw_supply (regcache, HPPA_PCOQ_HEAD_REGNUM, regs + 35 * 4);
regcache_raw_supply (regcache, HPPA_PCOQ_TAIL_REGNUM, regs + 36 * 4);
regcache_raw_supply (regcache, HPPA_SR0_REGNUM, regs + 37 * 4);
regcache_raw_supply (regcache, HPPA_SR1_REGNUM, regs + 38 * 4);
regcache_raw_supply (regcache, HPPA_SR2_REGNUM, regs + 39 * 4);
regcache_raw_supply (regcache, HPPA_SR3_REGNUM, regs + 40 * 4);
regcache_raw_supply (regcache, HPPA_SR4_REGNUM, regs + 41 * 4);
regcache_raw_supply (regcache, HPPA_SR5_REGNUM, regs + 42 * 4);
regcache_raw_supply (regcache, HPPA_SR6_REGNUM, regs + 43 * 4);
regcache_raw_supply (regcache, HPPA_SR7_REGNUM, regs + 44 * 4);
regcache_raw_supply (regcache, HPPA_CR26_REGNUM, regs + 45 * 4);
regcache_raw_supply (regcache, HPPA_CR27_REGNUM, regs + 46 * 4);
}
else
{
regcache_raw_supply (regcache, HPPA_SAR_REGNUM, regs);
regcache_raw_supply (regcache, HPPA_PCOQ_HEAD_REGNUM, regs + 32 * 4);
regcache_raw_supply (regcache, HPPA_PCOQ_TAIL_REGNUM, regs + 33 * 4);
}
}
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
/* Supply the floating-point registers stored in FPREGS to REGCACHE. */
static void
hppaobsd_supply_fpregset (struct regcache *regcache, const void *fpregs)
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
{
const char *regs = fpregs;
int regnum;
for (regnum = HPPA_FP0_REGNUM; regnum <= HPPA_FP31R_REGNUM;
regnum += 2, regs += 8)
{
regcache_raw_supply (regcache, regnum, regs);
regcache_raw_supply (regcache, regnum + 1, regs + 4);
}
}
/* Collect the general-purpose registers from REGCACHE and store them
in GREGS. */
static void
hppaobsd_collect_gregset (const struct regcache *regcache,
void *gregs, int regnum)
{
char *regs = gregs;
int i;
for (i = HPPA_R1_REGNUM; i <= HPPA_R31_REGNUM; i++)
{
if (regnum == -1 || regnum == i)
regcache_raw_collect (regcache, i, regs + i * 4);
}
if (sizeof(struct reg) >= 46 * 4)
{
if (regnum == -1 || regnum == HPPA_IPSW_REGNUM)
regcache_raw_collect (regcache, HPPA_IPSW_REGNUM, regs);
if (regnum == -1 || regnum == HPPA_SAR_REGNUM)
regcache_raw_collect (regcache, HPPA_SAR_REGNUM, regs + 32 * 4);
if (regnum == -1 || regnum == HPPA_PCSQ_HEAD_REGNUM)
regcache_raw_collect (regcache, HPPA_PCSQ_HEAD_REGNUM, regs + 33 * 4);
if (regnum == -1 || regnum == HPPA_PCSQ_TAIL_REGNUM)
regcache_raw_collect (regcache, HPPA_PCSQ_TAIL_REGNUM, regs + 34 * 4);
if (regnum == -1 || regnum == HPPA_PCOQ_HEAD_REGNUM)
regcache_raw_collect (regcache, HPPA_PCOQ_HEAD_REGNUM, regs + 35 * 4);
if (regnum == -1 || regnum == HPPA_PCOQ_TAIL_REGNUM)
regcache_raw_collect (regcache, HPPA_PCOQ_TAIL_REGNUM, regs + 36 * 4);
if (regnum == -1 || regnum == HPPA_SR0_REGNUM)
regcache_raw_collect (regcache, HPPA_SR0_REGNUM, regs + 37 * 4);
if (regnum == -1 || regnum == HPPA_SR1_REGNUM)
regcache_raw_collect (regcache, HPPA_SR1_REGNUM, regs + 38 * 4);
if (regnum == -1 || regnum == HPPA_SR2_REGNUM)
regcache_raw_collect (regcache, HPPA_SR2_REGNUM, regs + 39 * 4);
if (regnum == -1 || regnum == HPPA_SR3_REGNUM)
regcache_raw_collect (regcache, HPPA_SR3_REGNUM, regs + 40 * 4);
if (regnum == -1 || regnum == HPPA_SR4_REGNUM)
regcache_raw_collect (regcache, HPPA_SR4_REGNUM, regs + 41 * 4);
if (regnum == -1 || regnum == HPPA_SR5_REGNUM)
regcache_raw_collect (regcache, HPPA_SR5_REGNUM, regs + 42 * 4);
if (regnum == -1 || regnum == HPPA_SR6_REGNUM)
regcache_raw_collect (regcache, HPPA_SR6_REGNUM, regs + 43 * 4);
if (regnum == -1 || regnum == HPPA_SR7_REGNUM)
regcache_raw_collect (regcache, HPPA_SR7_REGNUM, regs + 44 * 4);
if (regnum == -1 || regnum == HPPA_CR26_REGNUM)
regcache_raw_collect (regcache, HPPA_CR26_REGNUM, regs + 45 * 4);
if (regnum == -1 || regnum == HPPA_CR27_REGNUM)
regcache_raw_collect (regcache, HPPA_CR27_REGNUM, regs + 46 * 4);
}
else
{
if (regnum == -1 || regnum == HPPA_SAR_REGNUM)
regcache_raw_collect (regcache, HPPA_SAR_REGNUM, regs);
if (regnum == -1 || regnum == HPPA_PCOQ_HEAD_REGNUM)
regcache_raw_collect (regcache, HPPA_PCOQ_HEAD_REGNUM, regs + 32 * 4);
if (regnum == -1 || regnum == HPPA_PCOQ_TAIL_REGNUM)
regcache_raw_collect (regcache, HPPA_PCOQ_TAIL_REGNUM, regs + 33 * 4);
}
}
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
/* Collect the floating-point registers from REGCACHE and store them
in FPREGS. */
static void
hppaobsd_collect_fpregset (struct regcache *regcache,
void *fpregs, int regnum)
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
{
char *regs = fpregs;
int i;
for (i = HPPA_FP0_REGNUM; i <= HPPA_FP31R_REGNUM; i += 2, regs += 8)
{
if (regnum == -1 || regnum == i || regnum == i + 1)
{
regcache_raw_collect (regcache, i, regs);
regcache_raw_collect (regcache, i + 1, regs + 4);
}
}
}
/* Fetch register REGNUM from the inferior. If REGNUM is -1, do this
for all registers (including the floating-point registers). */
static void
hppaobsd_fetch_registers (struct target_ops *ops,
struct regcache *regcache, int regnum)
{
pid_t pid = ptid_get_pid (regcache_get_ptid (regcache));
if (regnum == -1 || hppaobsd_gregset_supplies_p (regnum))
{
struct reg regs;
if (ptrace (PT_GETREGS, pid, (PTRACE_TYPE_ARG3) &regs, 0) == -1)
2005-02-11 Andrew Cagney <cagney@gnu.org> Mark up error_no_arg, query, perror_with_name, complaint, and internal_error. * breakpoint.c, cp-abi.c, cp-namespace.c, cp-support.c: Update. * cris-tdep.c, dbxread.c, dictionary.c, dsrec.c: Update. * dummy-frame.c, dve3900-rom.c, dwarf2-frame.c, dwarf2expr.c: Update. * dwarf2read.c, dwarfread.c, elfread.c, event-loop.c: Update. * exceptions.c, exec.c, f-lang.c, findvar.c, fork-child.c: Update. * frame-unwind.c, frame.c, frv-linux-tdep.c, frv-tdep.c: Update. * gdb_assert.h, gdbarch.c, gdbtypes.c, gnu-nat.c: Update. * go32-nat.c, hppa-tdep.c, hppabsd-nat.c, hpread.c: Update. * i386-linux-nat.c, i386-nat.c, i386-tdep.c, i386bsd-nat.c: Update. * i386fbsd-nat.c, inf-ptrace.c, inf-ttrace.c, infcall.c: Update. * infcmd.c, inflow.c, infptrace.c, infrun.c, inftarg.c: Update. * interps.c, language.c, linespec.c, linux-nat.c: Update. * m32r-linux-nat.c, m68k-tdep.c, m68kbsd-nat.c: Update. * m68klinux-nat.c, m88kbsd-nat.c, macroexp.c, macroscope.c: Update. * macrotab.c, maint.c, mdebugread.c, memattr.c: Update. * mips-linux-tdep.c, mips-tdep.c, mips64obsd-nat.c: Update. * mipsnbsd-nat.c, mn10300-tdep.c, monitor.c, nto-procfs.c: Update. * objc-lang.c, objfiles.c, objfiles.h, ocd.c, osabi.c: Update. * parse.c, ppc-bdm.c, ppc-linux-nat.c, ppc-sysv-tdep.c: Update. * ppcnbsd-nat.c, ppcobsd-nat.c, printcmd.c, procfs.c: Update. * regcache.c, reggroups.c, remote-e7000.c, remote-mips.c: Update. * remote-rdp.c, remote-sds.c, remote-sim.c, remote-st.c: Update. * remote-utils.c, remote.c, rs6000-nat.c, rs6000-tdep.c: Update. * s390-nat.c, s390-tdep.c, sentinel-frame.c, serial.c: Update. * sh-tdep.c, sh3-rom.c, sh64-tdep.c, shnbsd-nat.c: Update. * solib-aix5.c, solib-svr4.c, solib.c, source.c: Update. * sparc-nat.c, stabsread.c, stack.c, symfile.c, symtab.c: Update. * symtab.h, target.c, tracepoint.c, ui-file.c, ui-out.c: Update. * utils.c, valops.c, valprint.c, vax-nat.c, vaxbsd-nat.c: Update. * win32-nat.c, xcoffread.c, xstormy16-tdep.c: Update. * cli/cli-cmds.c, cli/cli-logging.c, cli/cli-script.c: Update. * cli/cli-setshow.c, mi/mi-cmd-break.c, mi/mi-cmds.c: Update. * mi/mi-console.c, mi/mi-getopt.c, mi/mi-out.c: Update. * tui/tui-file.c, tui/tui-interp.c: Update.
2005-02-11 19:13:55 +01:00
perror_with_name (_("Couldn't get registers"));
hppaobsd_supply_gregset (regcache, &regs);
}
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
if (regnum == -1 || hppaobsd_fpregset_supplies_p (regnum))
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
{
struct fpreg fpregs;
if (ptrace (PT_GETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
perror_with_name (_("Couldn't get floating point status"));
hppaobsd_supply_fpregset (regcache, &fpregs);
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
}
}
/* Store register REGNUM back into the inferior. If REGNUM is -1, do
this for all registers (including the floating-point registers). */
static void
hppaobsd_store_registers (struct target_ops *ops,
struct regcache *regcache, int regnum)
{
if (regnum == -1 || hppaobsd_gregset_supplies_p (regnum))
{
struct reg regs;
if (ptrace (PT_GETREGS, pid, (PTRACE_TYPE_ARG3) &regs, 0) == -1)
2005-02-11 Andrew Cagney <cagney@gnu.org> Mark up error_no_arg, query, perror_with_name, complaint, and internal_error. * breakpoint.c, cp-abi.c, cp-namespace.c, cp-support.c: Update. * cris-tdep.c, dbxread.c, dictionary.c, dsrec.c: Update. * dummy-frame.c, dve3900-rom.c, dwarf2-frame.c, dwarf2expr.c: Update. * dwarf2read.c, dwarfread.c, elfread.c, event-loop.c: Update. * exceptions.c, exec.c, f-lang.c, findvar.c, fork-child.c: Update. * frame-unwind.c, frame.c, frv-linux-tdep.c, frv-tdep.c: Update. * gdb_assert.h, gdbarch.c, gdbtypes.c, gnu-nat.c: Update. * go32-nat.c, hppa-tdep.c, hppabsd-nat.c, hpread.c: Update. * i386-linux-nat.c, i386-nat.c, i386-tdep.c, i386bsd-nat.c: Update. * i386fbsd-nat.c, inf-ptrace.c, inf-ttrace.c, infcall.c: Update. * infcmd.c, inflow.c, infptrace.c, infrun.c, inftarg.c: Update. * interps.c, language.c, linespec.c, linux-nat.c: Update. * m32r-linux-nat.c, m68k-tdep.c, m68kbsd-nat.c: Update. * m68klinux-nat.c, m88kbsd-nat.c, macroexp.c, macroscope.c: Update. * macrotab.c, maint.c, mdebugread.c, memattr.c: Update. * mips-linux-tdep.c, mips-tdep.c, mips64obsd-nat.c: Update. * mipsnbsd-nat.c, mn10300-tdep.c, monitor.c, nto-procfs.c: Update. * objc-lang.c, objfiles.c, objfiles.h, ocd.c, osabi.c: Update. * parse.c, ppc-bdm.c, ppc-linux-nat.c, ppc-sysv-tdep.c: Update. * ppcnbsd-nat.c, ppcobsd-nat.c, printcmd.c, procfs.c: Update. * regcache.c, reggroups.c, remote-e7000.c, remote-mips.c: Update. * remote-rdp.c, remote-sds.c, remote-sim.c, remote-st.c: Update. * remote-utils.c, remote.c, rs6000-nat.c, rs6000-tdep.c: Update. * s390-nat.c, s390-tdep.c, sentinel-frame.c, serial.c: Update. * sh-tdep.c, sh3-rom.c, sh64-tdep.c, shnbsd-nat.c: Update. * solib-aix5.c, solib-svr4.c, solib.c, source.c: Update. * sparc-nat.c, stabsread.c, stack.c, symfile.c, symtab.c: Update. * symtab.h, target.c, tracepoint.c, ui-file.c, ui-out.c: Update. * utils.c, valops.c, valprint.c, vax-nat.c, vaxbsd-nat.c: Update. * win32-nat.c, xcoffread.c, xstormy16-tdep.c: Update. * cli/cli-cmds.c, cli/cli-logging.c, cli/cli-script.c: Update. * cli/cli-setshow.c, mi/mi-cmd-break.c, mi/mi-cmds.c: Update. * mi/mi-console.c, mi/mi-getopt.c, mi/mi-out.c: Update. * tui/tui-file.c, tui/tui-interp.c: Update.
2005-02-11 19:13:55 +01:00
perror_with_name (_("Couldn't get registers"));
hppaobsd_collect_gregset (regcache, &regs, regnum);
if (ptrace (PT_SETREGS, pid, (PTRACE_TYPE_ARG3) &regs, 0) == -1)
2005-02-11 Andrew Cagney <cagney@gnu.org> Mark up error_no_arg, query, perror_with_name, complaint, and internal_error. * breakpoint.c, cp-abi.c, cp-namespace.c, cp-support.c: Update. * cris-tdep.c, dbxread.c, dictionary.c, dsrec.c: Update. * dummy-frame.c, dve3900-rom.c, dwarf2-frame.c, dwarf2expr.c: Update. * dwarf2read.c, dwarfread.c, elfread.c, event-loop.c: Update. * exceptions.c, exec.c, f-lang.c, findvar.c, fork-child.c: Update. * frame-unwind.c, frame.c, frv-linux-tdep.c, frv-tdep.c: Update. * gdb_assert.h, gdbarch.c, gdbtypes.c, gnu-nat.c: Update. * go32-nat.c, hppa-tdep.c, hppabsd-nat.c, hpread.c: Update. * i386-linux-nat.c, i386-nat.c, i386-tdep.c, i386bsd-nat.c: Update. * i386fbsd-nat.c, inf-ptrace.c, inf-ttrace.c, infcall.c: Update. * infcmd.c, inflow.c, infptrace.c, infrun.c, inftarg.c: Update. * interps.c, language.c, linespec.c, linux-nat.c: Update. * m32r-linux-nat.c, m68k-tdep.c, m68kbsd-nat.c: Update. * m68klinux-nat.c, m88kbsd-nat.c, macroexp.c, macroscope.c: Update. * macrotab.c, maint.c, mdebugread.c, memattr.c: Update. * mips-linux-tdep.c, mips-tdep.c, mips64obsd-nat.c: Update. * mipsnbsd-nat.c, mn10300-tdep.c, monitor.c, nto-procfs.c: Update. * objc-lang.c, objfiles.c, objfiles.h, ocd.c, osabi.c: Update. * parse.c, ppc-bdm.c, ppc-linux-nat.c, ppc-sysv-tdep.c: Update. * ppcnbsd-nat.c, ppcobsd-nat.c, printcmd.c, procfs.c: Update. * regcache.c, reggroups.c, remote-e7000.c, remote-mips.c: Update. * remote-rdp.c, remote-sds.c, remote-sim.c, remote-st.c: Update. * remote-utils.c, remote.c, rs6000-nat.c, rs6000-tdep.c: Update. * s390-nat.c, s390-tdep.c, sentinel-frame.c, serial.c: Update. * sh-tdep.c, sh3-rom.c, sh64-tdep.c, shnbsd-nat.c: Update. * solib-aix5.c, solib-svr4.c, solib.c, source.c: Update. * sparc-nat.c, stabsread.c, stack.c, symfile.c, symtab.c: Update. * symtab.h, target.c, tracepoint.c, ui-file.c, ui-out.c: Update. * utils.c, valops.c, valprint.c, vax-nat.c, vaxbsd-nat.c: Update. * win32-nat.c, xcoffread.c, xstormy16-tdep.c: Update. * cli/cli-cmds.c, cli/cli-logging.c, cli/cli-script.c: Update. * cli/cli-setshow.c, mi/mi-cmd-break.c, mi/mi-cmds.c: Update. * mi/mi-console.c, mi/mi-getopt.c, mi/mi-out.c: Update. * tui/tui-file.c, tui/tui-interp.c: Update.
2005-02-11 19:13:55 +01:00
perror_with_name (_("Couldn't write registers"));
}
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
if (regnum == -1 || hppaobsd_fpregset_supplies_p (regnum))
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
{
struct fpreg fpregs;
if (ptrace (PT_GETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
perror_with_name (_("Couldn't get floating point status"));
hppaobsd_collect_fpregset (regcache, &fpregs, regnum);
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
if (ptrace (PT_SETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
* hppa-tdep.h (enum hppa_regnum): Add HPPA_FP31R_REGNUM. * hppabsd-nat.c (hppabsd_fpregset_supplies_p) (hppabsd_supply_fpregset, hppabsd_collect_fpregset): New functions. (hppabsd_fetch_registers, hppabsd_store_registers): Handle floating-point registers. print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); for (reg = 16; reg < 31; reg++) /* We may have to apply a StackGhost cookie. */ fs->regs.reg[31].how = DWARF2_FRAME_REG_SAVED_WCOOKIE; fs->regs.reg[31].loc.offset = 15 * size; int regnum; buf, 0, size); { ULONGEST wcookie = extract_unsigned_integer (buf, len); gdb_assert (len == size); *lvalp = not_lval; *addrp = 0; if (valuep) { ULONGEST value = extract_unsigned_integer (valuep, size); store_unsigned_integer (valuep, size, value ^ wcookie); } } apply StackGhost cookie. */ print_scalar_formatted (valaddr, type, format, 0, stream); val_print_type_code_flags (type, valaddr, stream); || (TYPE_CODE (t) == TYPE_CODE_FLAGS) case TYPE_CODE_FLAGS: case TYPE_CODE_FLAGS: void *fpregs, int regnum) { regcache_raw_collect (regcache, i, regs); regcache_raw_collect (regcache, i + 1, regs + 4); } (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't get floating point status")); (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) perror_with_name (_("Couldn't write floating point status")); print_scalar_formatted (valaddr + embedded_offset, type, format, 0, stream); val_print_type_code_flags (type, valaddr + embedded_offset, stream); || regnum == PC_REGNUM); || regnum == tdep->ppc_fpscr_regnum); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); regnum, &regs, sizeof regs); regnum, &fpregs, sizeof fpregs); const char *sect_name, size_t sect_size) struct regcache *regcache, gdb_byte *readbuf, const gdb_byte *writebuf) if (lr_reg == -1) { /* bcl 20,xx,.+4 is used to get the current PC, with or without prediction bits. If the LR has already been saved, we can skip it. */ continue; } extract_unsigned_integer ((gdb_byte *)&(MEMBER), sizeof (MEMBER)) builtin_type_void_data_ptr); lmo->r_version_size); builtin_type_void_data_ptr); lm = ldsomap = solib_svr4_r_ldsomap (); || (X_I (insn) == 1 && X_RS1 (insn) == 0 && (insn & 0x7f) == 0)) { /* OpenBSD system call. */ ULONGEST number; regcache_cooked_read_unsigned (current_regcache, SPARC_G1_REGNUM, &number); if (number & 0x400) return sparc_address_from_register (SPARC_G2_REGNUM); if (number & 0x800) return sparc_address_from_register (SPARC_G7_REGNUM); } gdb_byte *buffer; gdb_byte *check = xmalloc (len); (unsigned int *)cache_ovly_table, cache_novlys * 4); cache_ovly_table[i], 4); error (_(""%s" exists in this program but is not a function."), name); return value_of_variable (sym, NULL); struct ui_file *stream) { if (TYPE_FIELD_NAME (type, bitpos)) fprintf_filtered (stream, "%s ", TYPE_FIELD_NAME (type, bitpos)); else fprintf_filtered (stream, "#%d ", bitpos); } const gdb_byte *valaddr, struct ui_file *stream); i386-sol2-tdep.o sol2-tdep.o corelow.o solib.o solib-svr4.o sol2-tdep.o solib.o solib-svr4.o
2006-01-14 13:24:36 +01:00
perror_with_name (_("Couldn't write floating point status"));
}
}
void
_initialize_hppaobsd_nat (void)
{
struct target_ops *t;
t = inf_ptrace_target ();
t->to_fetch_registers = hppaobsd_fetch_registers;
t->to_store_registers = hppaobsd_store_registers;
obsd_add_target (t);
}