1 /* Motorola m68k native support for Linux
2 Copyright 1996, 1998, 2000, 2001 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 2 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, write to the Free Software
18 Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
29 #include <sys/types.h>
32 #include <sys/param.h>
36 #include <sys/ioctl.h>
38 #include <sys/procfs.h>
43 #include "floatformat.h"
48 /* This table must line up with REGISTER_NAMES in tm-m68k.h */
49 static const int regmap
[] =
51 PT_D0
, PT_D1
, PT_D2
, PT_D3
, PT_D4
, PT_D5
, PT_D6
, PT_D7
,
52 PT_A0
, PT_A1
, PT_A2
, PT_A3
, PT_A4
, PT_A5
, PT_A6
, PT_USP
,
54 /* PT_FP0, ..., PT_FP7 */
55 21, 24, 27, 30, 33, 36, 39, 42,
56 /* PT_FPCR, PT_FPSR, PT_FPIAR */
60 /* BLOCKEND is the value of u.u_ar0, and points to the place where GS
64 m68k_linux_register_u_addr (int blockend
, int regnum
)
66 return (blockend
+ 4 * regmap
[regnum
]);
69 /* Given a pointer to a general register set in /proc format
70 (elf_gregset_t *), unpack the register contents and supply
71 them as gdb's idea of the current register values. */
74 /* Note both m68k-tdep.c and m68klinux-nat.c contain definitions
75 for supply_gregset and supply_fpregset. The definitions
76 in m68k-tdep.c are valid if USE_PROC_FS is defined. Otherwise,
77 the definitions in m68klinux-nat.c will be used. This is a
78 bit of a hack. The supply_* routines do not belong in
79 *_tdep.c files. But, there are several lynx ports that currently
80 depend on these definitions. */
84 /* Prototypes for supply_gregset etc. */
88 supply_gregset (elf_gregset_t
*gregsetp
)
92 for (regi
= D0_REGNUM
; regi
<= SP_REGNUM
; regi
++)
93 supply_register (regi
, (char *) (*gregsetp
+ regmap
[regi
]));
94 supply_register (PS_REGNUM
, (char *) (*gregsetp
+ PT_SR
));
95 supply_register (PC_REGNUM
, (char *) (*gregsetp
+ PT_PC
));
98 /* Given a pointer to a floating point register set in /proc format
99 (fpregset_t *), unpack the register contents and supply them as gdb's
100 idea of the current floating point register values. */
103 supply_fpregset (elf_fpregset_t
*fpregsetp
)
107 for (regi
= FP0_REGNUM
; regi
< FPC_REGNUM
; regi
++)
108 supply_register (regi
, (char *) &fpregsetp
->fpregs
[(regi
- FP0_REGNUM
) * 3]);
109 supply_register (FPC_REGNUM
, (char *) &fpregsetp
->fpcntl
[0]);
110 supply_register (FPS_REGNUM
, (char *) &fpregsetp
->fpcntl
[1]);
111 supply_register (FPI_REGNUM
, (char *) &fpregsetp
->fpcntl
[2]);
117 /* Interpreting register set info found in core files. */
119 /* Provide registers to GDB from a core file.
121 (We can't use the generic version of this function in
122 core-regset.c, because we need to use elf_gregset_t instead of
125 CORE_REG_SECT points to an array of bytes, which are the contents
126 of a `note' from a core file which BFD thinks might contain
127 register contents. CORE_REG_SIZE is its size.
129 WHICH says which register set corelow suspects this is:
130 0 --- the general-purpose register set, in elf_gregset_t format
131 2 --- the floating-point register set, in elf_fpregset_t format
133 REG_ADDR isn't used on Linux. */
136 fetch_core_registers (char *core_reg_sect
, unsigned core_reg_size
,
137 int which
, CORE_ADDR reg_addr
)
139 elf_gregset_t gregset
;
140 elf_fpregset_t fpregset
;
145 if (core_reg_size
!= sizeof (gregset
))
146 warning ("Wrong size gregset in core file.");
149 memcpy (&gregset
, core_reg_sect
, sizeof (gregset
));
150 supply_gregset (&gregset
);
155 if (core_reg_size
!= sizeof (fpregset
))
156 warning ("Wrong size fpregset in core file.");
159 memcpy (&fpregset
, core_reg_sect
, sizeof (fpregset
));
160 supply_fpregset (&fpregset
);
165 /* We've covered all the kinds of registers we know about here,
166 so this must be something we wouldn't know what to do with
167 anyway. Just ignore it. */
176 return (sizeof (struct user
));
179 /* Return non-zero if PC points into the signal trampoline. */
182 in_sigtramp (CORE_ADDR pc
)
185 char buf
[TARGET_SHORT_BIT
/ TARGET_CHAR_BIT
];
188 sp
= read_register (SP_REGNUM
);
192 if (read_memory_nobpt (pc
, buf
, sizeof (buf
)))
194 insn
= extract_unsigned_integer (buf
, sizeof (buf
));
195 if (insn
== 0xdefc /* addaw #,sp */
196 || insn
== 0x7077 /* moveq #119,d0 */
197 || insn
== 0x4e40 /* trap #0 */
198 || insn
== 0x203c /* movel #,d0 */ )
201 if (read_memory_nobpt (pc
- 2, buf
, sizeof (buf
)))
203 insn
= extract_unsigned_integer (buf
, sizeof (buf
));
204 if (insn
== 0xdefc /* addaw #,sp */
205 || insn
== 0x7077 /* moveq #119,d0 */
206 || insn
== 0x4e40 /* trap #0 */
207 || insn
== 0x203c /* movel #,d0 */ )
214 /* Register that we are able to handle Linux ELF core file formats. */
216 static struct core_fns linux_elf_core_fns
=
218 bfd_target_elf_flavour
, /* core_flavour */
219 default_check_format
, /* check_format */
220 default_core_sniffer
, /* core_sniffer */
221 fetch_core_registers
, /* core_read_registers */
226 _initialize_m68k_linux_nat ()
228 add_core_fns (&linux_elf_core_fns
);