1 /* Generic GNU/Linux target using traditional ptrace register access.
3 Copyright (C) 1988-2019 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/>. */
21 #include "linux-nat-trad.h"
23 #include "nat/gdb_ptrace.h"
24 #include "inf-ptrace.h"
26 /* Fetch register REGNUM from the inferior. */
29 linux_nat_trad_target::fetch_register (struct regcache
*regcache
, int regnum
)
31 struct gdbarch
*gdbarch
= regcache
->arch ();
32 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
39 /* This isn't really an address, but ptrace thinks of it as one. */
40 addr
= register_u_offset (gdbarch
, regnum
, 0);
41 if (addr
== (CORE_ADDR
)-1
42 || gdbarch_cannot_fetch_register (gdbarch
, regnum
))
44 regcache
->raw_supply (regnum
, NULL
);
48 pid
= get_ptrace_pid (regcache
->ptid ());
50 size
= register_size (gdbarch
, regnum
);
51 buf
= (gdb_byte
*) alloca (size
);
53 /* Read the register contents from the inferior a chunk at a time. */
54 for (i
= 0; i
< size
; i
+= sizeof (PTRACE_TYPE_RET
))
56 size_t chunk
= std::min (sizeof (PTRACE_TYPE_RET
), size
- i
);
60 val
= ptrace (PT_READ_U
, pid
, (PTRACE_TYPE_ARG3
) (uintptr_t) addr
, 0);
62 error (_("Couldn't read register %s (#%d): %s."),
63 gdbarch_register_name (gdbarch
, regnum
),
64 regnum
, safe_strerror (errno
));
65 store_unsigned_integer (buf
+ i
, chunk
, byte_order
, val
);
67 addr
+= sizeof (PTRACE_TYPE_RET
);
69 regcache
->raw_supply (regnum
, buf
);
72 /* Fetch register REGNUM from the inferior. If REGNUM is -1, do this
76 linux_nat_trad_target::fetch_registers (struct regcache
*regcache
, int regnum
)
80 regnum
< gdbarch_num_regs (regcache
->arch ());
82 fetch_register (regcache
, regnum
);
84 fetch_register (regcache
, regnum
);
87 /* Store register REGNUM into the inferior. */
90 linux_nat_trad_target::store_register (const struct regcache
*regcache
,
93 struct gdbarch
*gdbarch
= regcache
->arch ();
94 enum bfd_endian byte_order
= gdbarch_byte_order (gdbarch
);
101 /* This isn't really an address, but ptrace thinks of it as one. */
102 addr
= register_u_offset (gdbarch
, regnum
, 1);
103 if (addr
== (CORE_ADDR
)-1
104 || gdbarch_cannot_store_register (gdbarch
, regnum
))
107 pid
= get_ptrace_pid (regcache
->ptid ());
109 size
= register_size (gdbarch
, regnum
);
110 buf
= (gdb_byte
*) alloca (size
);
112 /* Write the register contents into the inferior a chunk at a time. */
113 regcache
->raw_collect (regnum
, buf
);
114 for (i
= 0; i
< size
; i
+= sizeof (PTRACE_TYPE_RET
))
116 size_t chunk
= std::min (sizeof (PTRACE_TYPE_RET
), size
- i
);
119 val
= extract_unsigned_integer (buf
+ i
, chunk
, byte_order
);
121 ptrace (PT_WRITE_U
, pid
, (PTRACE_TYPE_ARG3
) (uintptr_t) addr
, val
);
123 error (_("Couldn't write register %s (#%d): %s."),
124 gdbarch_register_name (gdbarch
, regnum
),
125 regnum
, safe_strerror (errno
));
127 addr
+= sizeof (PTRACE_TYPE_RET
);
131 /* Store register REGNUM back into the inferior. If REGNUM is -1, do
132 this for all registers. */
135 linux_nat_trad_target::store_registers (struct regcache
*regcache
, int regnum
)
139 regnum
< gdbarch_num_regs (regcache
->arch ());
141 store_register (regcache
, regnum
);
143 store_register (regcache
, regnum
);