1 /* GNU/Linux/m68k specific low level interface, for the remote server for GDB.
2 Copyright (C) 1995-2020 Free Software Foundation, Inc.
4 This file is part of GDB.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>. */
20 #include "linux-low.h"
22 /* Linux target op definitions for the m68k architecture. */
24 class m68k_target
: public linux_process_target
30 void low_arch_setup () override
;
33 /* The singleton target ops object. */
35 static m68k_target the_m68k_target
;
37 /* Defined in auto-generated file reg-m68k.c. */
38 void init_registers_m68k (void);
39 extern const struct target_desc
*tdesc_m68k
;
45 #define m68k_num_regs 29
46 #define m68k_num_gregs 18
48 /* This table must line up with REGISTER_NAMES in tm-m68k.h */
49 static int m68k_regmap
[] =
52 PT_D0
* 4, PT_D1
* 4, PT_D2
* 4, PT_D3
* 4,
53 PT_D4
* 4, PT_D5
* 4, PT_D6
* 4, PT_D7
* 4,
54 PT_A0
* 4, PT_A1
* 4, PT_A2
* 4, PT_A3
* 4,
55 PT_A4
* 4, PT_A5
* 4, PT_A6
* 4, PT_USP
* 4,
58 14 * 4, 0 * 4, 1 * 4, 2 * 4, 3 * 4, 4 * 4, 5 * 4, 6 * 4,
59 7 * 4, 8 * 4, 9 * 4, 10 * 4, 11 * 4, 12 * 4, 13 * 4, 15 * 4,
63 PT_FP0
* 4, PT_FP1
* 4, PT_FP2
* 4, PT_FP3
* 4,
64 PT_FP4
* 4, PT_FP5
* 4, PT_FP6
* 4, PT_FP7
* 4,
65 PT_FPCR
* 4, PT_FPSR
* 4, PT_FPIAR
* 4
67 21 * 4, 24 * 4, 27 * 4, 30 * 4, 33 * 4, 36 * 4,
68 39 * 4, 42 * 4, 45 * 4, 46 * 4, 47 * 4
73 m68k_cannot_store_register (int regno
)
75 return (regno
>= m68k_num_regs
);
79 m68k_cannot_fetch_register (int regno
)
81 return (regno
>= m68k_num_regs
);
84 #ifdef HAVE_PTRACE_GETREGS
85 #include <sys/procfs.h>
86 #include "nat/gdb_ptrace.h"
89 m68k_fill_gregset (struct regcache
*regcache
, void *buf
)
93 for (i
= 0; i
< m68k_num_gregs
; i
++)
94 collect_register (regcache
, i
, (char *) buf
+ m68k_regmap
[i
]);
98 m68k_store_gregset (struct regcache
*regcache
, const void *buf
)
102 for (i
= 0; i
< m68k_num_gregs
; i
++)
103 supply_register (regcache
, i
, (const char *) buf
+ m68k_regmap
[i
]);
107 m68k_fill_fpregset (struct regcache
*regcache
, void *buf
)
111 for (i
= m68k_num_gregs
; i
< m68k_num_regs
; i
++)
112 collect_register (regcache
, i
, ((char *) buf
113 + (m68k_regmap
[i
] - m68k_regmap
[m68k_num_gregs
])));
117 m68k_store_fpregset (struct regcache
*regcache
, const void *buf
)
121 for (i
= m68k_num_gregs
; i
< m68k_num_regs
; i
++)
122 supply_register (regcache
, i
, ((const char *) buf
123 + (m68k_regmap
[i
] - m68k_regmap
[m68k_num_gregs
])));
126 #endif /* HAVE_PTRACE_GETREGS */
128 static struct regset_info m68k_regsets
[] = {
129 #ifdef HAVE_PTRACE_GETREGS
130 { PTRACE_GETREGS
, PTRACE_SETREGS
, 0, sizeof (elf_gregset_t
),
132 m68k_fill_gregset
, m68k_store_gregset
},
133 { PTRACE_GETFPREGS
, PTRACE_SETFPREGS
, 0, sizeof (elf_fpregset_t
),
135 m68k_fill_fpregset
, m68k_store_fpregset
},
136 #endif /* HAVE_PTRACE_GETREGS */
140 static const gdb_byte m68k_breakpoint
[] = { 0x4E, 0x4F };
141 #define m68k_breakpoint_len 2
143 /* Implementation of linux_target_ops method "sw_breakpoint_from_kind". */
145 static const gdb_byte
*
146 m68k_sw_breakpoint_from_kind (int kind
, int *size
)
148 *size
= m68k_breakpoint_len
;
149 return m68k_breakpoint
;
153 m68k_breakpoint_at (CORE_ADDR pc
)
157 read_inferior_memory (pc
, c
, 2);
158 if (c
[0] == 0x4E && c
[1] == 0x4F)
164 #include <asm/ptrace.h>
166 #ifdef PTRACE_GET_THREAD_AREA
167 /* Fetch the thread-local storage pointer for libthread_db. */
170 ps_get_thread_area (struct ps_prochandle
*ph
,
171 lwpid_t lwpid
, int idx
, void **base
)
173 if (ptrace (PTRACE_GET_THREAD_AREA
, lwpid
, NULL
, base
) != 0)
176 /* IDX is the bias from the thread pointer to the beginning of the
177 thread descriptor. It has to be subtracted due to implementation
178 quirks in libthread_db. */
179 *base
= (void *) ((char *)*base
- idx
);
183 #endif /* PTRACE_GET_THREAD_AREA */
185 static struct regsets_info m68k_regsets_info
=
187 m68k_regsets
, /* regsets */
189 NULL
, /* disabled_regsets */
192 static struct usrregs_info m68k_usrregs_info
=
198 static struct regs_info regs_info
=
200 NULL
, /* regset_bitmap */
205 static const struct regs_info
*
206 m68k_regs_info (void)
212 m68k_target::low_arch_setup ()
214 current_process ()->tdesc
= tdesc_m68k
;
217 /* Support for hardware single step. */
220 m68k_supports_hardware_single_step (void)
225 struct linux_target_ops the_low_target
= {
227 m68k_cannot_fetch_register
,
228 m68k_cannot_store_register
,
229 NULL
, /* fetch_register */
232 NULL
, /* breakpoint_kind_from_pc */
233 m68k_sw_breakpoint_from_kind
,
237 NULL
, /* supports_z_point_type */
238 NULL
, /* insert_point */
239 NULL
, /* remove_point */
240 NULL
, /* stopped_by_watchpoint */
241 NULL
, /* stopped_data_address */
242 NULL
, /* collect_ptrace_register */
243 NULL
, /* supply_ptrace_register */
244 NULL
, /* siginfo_fixup */
245 NULL
, /* new_process */
246 NULL
, /* delete_process */
247 NULL
, /* new_thread */
248 NULL
, /* delete_thread */
250 NULL
, /* prepare_to_resume */
251 NULL
, /* process_qsupported */
252 NULL
, /* supports_tracepoints */
253 NULL
, /* get_thread_area */
254 NULL
, /* install_fast_tracepoint_jump_pad */
256 NULL
, /* get_min_fast_tracepoint_insn_len */
257 NULL
, /* supports_range_stepping */
258 NULL
, /* breakpoint_kind_from_current_state */
259 m68k_supports_hardware_single_step
,
262 /* The linux target ops object. */
264 linux_process_target
*the_linux_target
= &the_m68k_target
;
267 initialize_low_arch (void)
269 /* Initialize the Linux target descriptions. */
270 init_registers_m68k ();
272 initialize_regsets_info (&m68k_regsets_info
);