]>
Commit | Line | Data |
---|---|---|
1 | /* Low level Alpha GNU/Linux interface, for GDB when running native. | |
2 | Copyright (C) 2005-2024 Free Software Foundation, Inc. | |
3 | ||
4 | This file is part of GDB. | |
5 | ||
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. | |
10 | ||
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. | |
15 | ||
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/>. */ | |
18 | ||
19 | #include "target.h" | |
20 | #include "regcache.h" | |
21 | #include "linux-nat-trad.h" | |
22 | ||
23 | #include "alpha-tdep.h" | |
24 | #include "gdbarch.h" | |
25 | ||
26 | #include "nat/gdb_ptrace.h" | |
27 | #include <alpha/ptrace.h> | |
28 | ||
29 | #include <sys/procfs.h> | |
30 | #include "gregset.h" | |
31 | ||
32 | /* The address of UNIQUE for ptrace. */ | |
33 | #define ALPHA_UNIQUE_PTRACE_ADDR 65 | |
34 | ||
35 | class alpha_linux_nat_target final : public linux_nat_trad_target | |
36 | { | |
37 | protected: | |
38 | /* Override linux_nat_trad_target methods. */ | |
39 | CORE_ADDR register_u_offset (struct gdbarch *gdbarch, | |
40 | int regno, int store_p) override; | |
41 | }; | |
42 | ||
43 | static alpha_linux_nat_target the_alpha_linux_nat_target; | |
44 | ||
45 | /* See the comment in m68k-tdep.c regarding the utility of these | |
46 | functions. */ | |
47 | ||
48 | void | |
49 | supply_gregset (struct regcache *regcache, const gdb_gregset_t *gregsetp) | |
50 | { | |
51 | const long *regp = (const long *)gregsetp; | |
52 | ||
53 | /* PC is in slot 32, UNIQUE is in slot 33. */ | |
54 | alpha_supply_int_regs (regcache, -1, regp, regp + 31, regp + 32); | |
55 | } | |
56 | ||
57 | void | |
58 | fill_gregset (const struct regcache *regcache, | |
59 | gdb_gregset_t *gregsetp, int regno) | |
60 | { | |
61 | long *regp = (long *)gregsetp; | |
62 | ||
63 | /* PC is in slot 32, UNIQUE is in slot 33. */ | |
64 | alpha_fill_int_regs (regcache, regno, regp, regp + 31, regp + 32); | |
65 | } | |
66 | ||
67 | /* Now we do the same thing for floating-point registers. | |
68 | Again, see the comments in m68k-tdep.c. */ | |
69 | ||
70 | void | |
71 | supply_fpregset (struct regcache *regcache, const gdb_fpregset_t *fpregsetp) | |
72 | { | |
73 | const long *regp = (const long *)fpregsetp; | |
74 | ||
75 | /* FPCR is in slot 32. */ | |
76 | alpha_supply_fp_regs (regcache, -1, regp, regp + 31); | |
77 | } | |
78 | ||
79 | void | |
80 | fill_fpregset (const struct regcache *regcache, | |
81 | gdb_fpregset_t *fpregsetp, int regno) | |
82 | { | |
83 | long *regp = (long *)fpregsetp; | |
84 | ||
85 | /* FPCR is in slot 32. */ | |
86 | alpha_fill_fp_regs (regcache, regno, regp, regp + 31); | |
87 | } | |
88 | ||
89 | CORE_ADDR | |
90 | alpha_linux_nat_target::register_u_offset (struct gdbarch *gdbarch, | |
91 | int regno, int store_p) | |
92 | { | |
93 | if (regno == gdbarch_pc_regnum (gdbarch)) | |
94 | return PC; | |
95 | if (regno == ALPHA_UNIQUE_REGNUM) | |
96 | return ALPHA_UNIQUE_PTRACE_ADDR; | |
97 | if (regno < gdbarch_fp0_regnum (gdbarch)) | |
98 | return GPR_BASE + regno; | |
99 | else | |
100 | return FPR_BASE + regno - gdbarch_fp0_regnum (gdbarch); | |
101 | } | |
102 | ||
103 | void _initialize_alpha_linux_nat (); | |
104 | void | |
105 | _initialize_alpha_linux_nat () | |
106 | { | |
107 | linux_target = &the_alpha_linux_nat_target; | |
108 | add_inf_child_target (&the_alpha_linux_nat_target); | |
109 | } |