1 /* Native-dependent code for AMD64 BSD's. 2 3 Copyright (C) 2003-2013 Free Software Foundation, Inc. 4 5 This file is part of GDB. 6 7 This program is free software; you can redistribute it and/or modify 8 it under the terms of the GNU General Public License as published by 9 the Free Software Foundation; either version 3 of the License, or 10 (at your option) any later version. 11 12 This program is distributed in the hope that it will be useful, 13 but WITHOUT ANY WARRANTY; without even the implied warranty of 14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 15 GNU General Public License for more details. 16 17 You should have received a copy of the GNU General Public License 18 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 19 20 #include "defs.h" 21 #include "inferior.h" 22 #include "regcache.h" 23 #include "target.h" 24 25 /* We include <signal.h> to make sure `struct fxsave64' is defined on 26 NetBSD, since NetBSD's <machine/reg.h> needs it. */ 27 #include "gdb_assert.h" 28 #include <signal.h> 29 #include <sys/types.h> 30 #include <sys/ptrace.h> 31 #include <machine/reg.h> 32 33 #include "amd64-tdep.h" 34 #include "amd64-nat.h" 35 #include "amd64bsd-nat.h" 36 #include "inf-ptrace.h" 37 38 39 /* Fetch register REGNUM from the inferior. If REGNUM is -1, do this 40 for all registers (including the floating-point registers). */ 41 42 static void 43 amd64bsd_fetch_inferior_registers (struct target_ops *ops, 44 struct regcache *regcache, int regnum) 45 { 46 struct gdbarch *gdbarch = get_regcache_arch (regcache); 47 48 if (regnum == -1 || amd64_native_gregset_supplies_p (gdbarch, regnum)) 49 { 50 struct reg regs; 51 52 if (ptrace (PT_GETREGS, PIDGET (inferior_ptid), 53 (PTRACE_TYPE_ARG3) ®s, 0) == -1) 54 perror_with_name (_("Couldn't get registers")); 55 56 amd64_supply_native_gregset (regcache, ®s, -1); 57 if (regnum != -1) 58 return; 59 } 60 61 if (regnum == -1 || !amd64_native_gregset_supplies_p (gdbarch, regnum)) 62 { 63 struct fpreg fpregs; 64 65 if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid), 66 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) 67 perror_with_name (_("Couldn't get floating point status")); 68 69 amd64_supply_fxsave (regcache, -1, &fpregs); 70 } 71 } 72 73 /* Store register REGNUM back into the inferior. If REGNUM is -1, do 74 this for all registers (including the floating-point registers). */ 75 76 static void 77 amd64bsd_store_inferior_registers (struct target_ops *ops, 78 struct regcache *regcache, int regnum) 79 { 80 struct gdbarch *gdbarch = get_regcache_arch (regcache); 81 82 if (regnum == -1 || amd64_native_gregset_supplies_p (gdbarch, regnum)) 83 { 84 struct reg regs; 85 86 if (ptrace (PT_GETREGS, PIDGET (inferior_ptid), 87 (PTRACE_TYPE_ARG3) ®s, 0) == -1) 88 perror_with_name (_("Couldn't get registers")); 89 90 amd64_collect_native_gregset (regcache, ®s, regnum); 91 92 if (ptrace (PT_SETREGS, PIDGET (inferior_ptid), 93 (PTRACE_TYPE_ARG3) ®s, 0) == -1) 94 perror_with_name (_("Couldn't write registers")); 95 96 if (regnum != -1) 97 return; 98 } 99 100 if (regnum == -1 || !amd64_native_gregset_supplies_p (gdbarch, regnum)) 101 { 102 struct fpreg fpregs; 103 104 if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid), 105 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) 106 perror_with_name (_("Couldn't get floating point status")); 107 108 amd64_collect_fxsave (regcache, regnum, &fpregs); 109 110 if (ptrace (PT_SETFPREGS, PIDGET (inferior_ptid), 111 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1) 112 perror_with_name (_("Couldn't write floating point status")); 113 } 114 } 115 116 /* Create a prototype *BSD/amd64 target. The client can override it 117 with local methods. */ 118 119 struct target_ops * 120 amd64bsd_target (void) 121 { 122 struct target_ops *t; 123 124 t = inf_ptrace_target (); 125 t->to_fetch_registers = amd64bsd_fetch_inferior_registers; 126 t->to_store_registers = amd64bsd_store_inferior_registers; 127 return t; 128 } 129 130 131 /* Support for debug registers. */ 132 133 #ifdef HAVE_PT_GETDBREGS 134 135 static unsigned long 136 amd64bsd_dr_get (ptid_t ptid, int regnum) 137 { 138 struct dbreg dbregs; 139 140 if (ptrace (PT_GETDBREGS, PIDGET (inferior_ptid), 141 (PTRACE_TYPE_ARG3) &dbregs, 0) == -1) 142 perror_with_name (_("Couldn't read debug registers")); 143 144 return DBREG_DRX ((&dbregs), regnum); 145 } 146 147 static void 148 amd64bsd_dr_set (int regnum, unsigned long value) 149 { 150 struct dbreg dbregs; 151 152 if (ptrace (PT_GETDBREGS, PIDGET (inferior_ptid), 153 (PTRACE_TYPE_ARG3) &dbregs, 0) == -1) 154 perror_with_name (_("Couldn't get debug registers")); 155 156 /* For some mysterious reason, some of the reserved bits in the 157 debug control register get set. Mask these off, otherwise the 158 ptrace call below will fail. */ 159 DBREG_DRX ((&dbregs), 7) &= ~(0xffffffff0000fc00); 160 161 DBREG_DRX ((&dbregs), regnum) = value; 162 163 if (ptrace (PT_SETDBREGS, PIDGET (inferior_ptid), 164 (PTRACE_TYPE_ARG3) &dbregs, 0) == -1) 165 perror_with_name (_("Couldn't write debug registers")); 166 } 167 168 void 169 amd64bsd_dr_set_control (unsigned long control) 170 { 171 amd64bsd_dr_set (7, control); 172 } 173 174 void 175 amd64bsd_dr_set_addr (int regnum, CORE_ADDR addr) 176 { 177 gdb_assert (regnum >= 0 && regnum <= 4); 178 179 amd64bsd_dr_set (regnum, addr); 180 } 181 182 CORE_ADDR 183 amd64bsd_dr_get_addr (int regnum) 184 { 185 return amd64bsd_dr_get (inferior_ptid, regnum); 186 } 187 188 unsigned long 189 amd64bsd_dr_get_status (void) 190 { 191 return amd64bsd_dr_get (inferior_ptid, 6); 192 } 193 194 unsigned long 195 amd64bsd_dr_get_control (void) 196 { 197 return amd64bsd_dr_get (inferior_ptid, 7); 198 } 199 200 #endif /* PT_GETDBREGS */ 201