gdb/mipsnbsd-nat.c - gdb

Functions defined

Source code

  1. /* Native-dependent code for MIPS systems running NetBSD.

  3.    Copyright (C) 2000-2015 Free Software Foundation, Inc.

  5.    This file is part of GDB.

  7.    This program is free software; you can redistribute it and/or modify
  8.    it under the terms of the GNU General Public License as published by
  9.    the Free Software Foundation; either version 3 of the License, or
  10.    (at your option) any later version.

  12.    This program is distributed in the hope that it will be useful,
  13.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15.    GNU General Public License for more details.

  17.    You should have received a copy of the GNU General Public License
  18.    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */

  20. #include "defs.h"
  21. #include "inferior.h"
  22. #include "regcache.h"
  23. #include "target.h"

  25. #include <sys/types.h>
  26. #include <sys/ptrace.h>
  27. #include <machine/reg.h>

  29. #include "mips-tdep.h"
  30. #include "mipsnbsd-tdep.h"
  31. #include "inf-ptrace.h"

  33. /* Determine if PT_GETREGS fetches this register.  */
  34. static int
  35. ‌getregs_supplies (struct gdbarch *gdbarch, int regno)
  36. {
  37.   return ((regno) >= MIPS_ZERO_REGNUM
  38.           && (regno) <= gdbarch_pc_regnum (gdbarch));
  39. }

  41. static void
  42. ‌mipsnbsd_fetch_inferior_registers (struct target_ops *ops,
  43.                                    struct regcache *regcache, int regno)
  44. {
  45.   struct gdbarch *gdbarch = get_regcache_arch (regcache);
  46.   if (regno == -1 || getregs_supplies (gdbarch, regno))
  47.     {
  48.       struct reg regs;

  50.       if (ptrace (PT_GETREGS, ptid_get_pid (inferior_ptid),
  51.                   (PTRACE_TYPE_ARG3) &regs, 0) == -1)
  52.         perror_with_name (_("Couldn't get registers"));

  54.       mipsnbsd_supply_reg (regcache, (char *) &regs, regno);
  55.       if (regno != -1)
  56.         return;
  57.     }

  59.   if (regno == -1
  60.       || regno >= gdbarch_fp0_regnum (get_regcache_arch (regcache)))
  61.     {
  62.       struct fpreg fpregs;

  64.       if (ptrace (PT_GETFPREGS, ptid_get_pid (inferior_ptid),
  65.                   (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
  66.         perror_with_name (_("Couldn't get floating point status"));

  68.       mipsnbsd_supply_fpreg (regcache, (char *) &fpregs, regno);
  69.     }
  70. }

  72. static void
  73. ‌mipsnbsd_store_inferior_registers (struct target_ops *ops,
  74.                                    struct regcache *regcache, int regno)
  75. {
  76.   struct gdbarch *gdbarch = get_regcache_arch (regcache);
  77.   if (regno == -1 || getregs_supplies (gdbarch, regno))
  78.     {
  79.       struct reg regs;

  81.       if (ptrace (PT_GETREGS, ptid_get_pid (inferior_ptid),
  82.                   (PTRACE_TYPE_ARG3) &regs, 0) == -1)
  83.         perror_with_name (_("Couldn't get registers"));

  85.       mipsnbsd_fill_reg (regcache, (char *) &regs, regno);

  87.       if (ptrace (PT_SETREGS, ptid_get_pid (inferior_ptid),
  88.                   (PTRACE_TYPE_ARG3) &regs, 0) == -1)
  89.         perror_with_name (_("Couldn't write registers"));

  91.       if (regno != -1)
  92.         return;
  93.     }

  95.   if (regno == -1
  96.       || regno >= gdbarch_fp0_regnum (get_regcache_arch (regcache)))
  97.     {
  98.       struct fpreg fpregs;

  100.       if (ptrace (PT_GETFPREGS, ptid_get_pid (inferior_ptid),
  101.                   (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
  102.         perror_with_name (_("Couldn't get floating point status"));

  104.       mipsnbsd_fill_fpreg (regcache, (char *) &fpregs, regno);

  106.       if (ptrace (PT_SETFPREGS, ptid_get_pid (inferior_ptid),
  107.                   (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
  108.         perror_with_name (_("Couldn't write floating point status"));
  109.     }
  110. }


  113. /* Provide a prototype to silence -Wmissing-prototypes.  */
  114. void _initialize_mipsnbsd_nat (void);

  116. void
  117. ‌_initialize_mipsnbsd_nat (void)
  118. {
  119.   struct target_ops *t;

  121.   t = inf_ptrace_target ();
  122.   t->to_fetch_registers = mipsnbsd_fetch_inferior_registers;
  123.   t->to_store_registers = mipsnbsd_store_inferior_registers;
  124.   add_target (t);
  125. }