1 /* Machine-dependent hooks for the unix child process stratum. This
2 code is for the HP PA-RISC cpu.
4 Copyright 1986, 1987, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1998,
5 1999, 2000, 2001 Free Software Foundation, Inc.
7 Contributed by the Center for Software Science at the
8 University of Utah (pa-gdb-bugs@cs.utah.edu).
10 This file is part of GDB.
12 This program is free software; you can redistribute it and/or modify
13 it under the terms of the GNU General Public License as published by
14 the Free Software Foundation; either version 2 of the License, or
15 (at your option) any later version.
17 This program is distributed in the hope that it will be useful,
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 GNU General Public License for more details.
22 You should have received a copy of the GNU General Public License
23 along with this program; if not, write to the Free Software
24 Foundation, Inc., 59 Temple Place - Suite 330,
25 Boston, MA 02111-1307, USA. */
31 #include <sys/ptrace.h>
33 /* Use an extra level of indirection for ptrace calls.
34 This lets us breakpoint usefully on call_ptrace. It also
35 allows us to pass an extra argument to ptrace without
36 using an ANSI-C specific macro. */
38 #define ptrace call_ptrace
40 #if !defined (offsetof)
41 #define offsetof(TYPE, MEMBER) ((unsigned long) &((TYPE *)0)->MEMBER)
44 /* U_REGS_OFFSET is the offset of the registers within the u area. */
45 #if !defined (U_REGS_OFFSET)
46 #define U_REGS_OFFSET \
47 ptrace (PT_READ_U, PIDGET (inferior_ptid), \
48 (PTRACE_ARG3_TYPE) (offsetof (struct user, u_ar0)), 0) \
52 /* Fetch one register. */
55 fetch_register (int regno
)
57 register unsigned int regaddr
;
58 char buf
[MAX_REGISTER_RAW_SIZE
];
61 /* Offset of registers within the u area. */
64 offset
= U_REGS_OFFSET
;
66 regaddr
= register_addr (regno
, offset
);
67 for (i
= 0; i
< REGISTER_RAW_SIZE (regno
); i
+= sizeof (int))
70 *(int *) &buf
[i
] = ptrace (PT_RUREGS
, PIDGET (inferior_ptid
),
71 (PTRACE_ARG3_TYPE
) regaddr
, 0);
72 regaddr
+= sizeof (int);
75 /* Warning, not error, in case we are attached; sometimes the
76 kernel doesn't let us at the registers. */
77 char *err
= safe_strerror (errno
);
78 char *msg
= alloca (strlen (err
) + 128);
79 sprintf (msg
, "reading register %s: %s", REGISTER_NAME (regno
), err
);
84 supply_register (regno
, buf
);
88 /* Fetch all registers, or just one, from the child process. */
91 fetch_inferior_registers (int regno
)
94 for (regno
= 0; regno
< NUM_REGS
; regno
++)
95 fetch_register (regno
);
97 fetch_register (regno
);
100 /* Store our register values back into the inferior.
101 If REGNO is -1, do this for all registers.
102 Otherwise, REGNO specifies which register (so we can save time). */
105 store_inferior_registers (int regno
)
107 register unsigned int regaddr
;
110 unsigned int offset
= U_REGS_OFFSET
;
115 if (CANNOT_STORE_REGISTER (regno
))
117 regaddr
= register_addr (regno
, offset
);
119 if (regno
== PCOQ_HEAD_REGNUM
|| regno
== PCOQ_TAIL_REGNUM
)
121 scratch
= *(int *) ®isters
[REGISTER_BYTE (regno
)] | 0x3;
122 ptrace (PT_WUREGS
, PIDGET (inferior_ptid
), (PTRACE_ARG3_TYPE
) regaddr
,
126 /* Error, even if attached. Failing to write these two
127 registers is pretty serious. */
128 sprintf (buf
, "writing register number %d", regno
);
129 perror_with_name (buf
);
133 for (i
= 0; i
< REGISTER_RAW_SIZE (regno
); i
+= sizeof (int))
136 ptrace (PT_WUREGS
, PIDGET (inferior_ptid
),
137 (PTRACE_ARG3_TYPE
) regaddr
,
138 *(int *) ®isters
[REGISTER_BYTE (regno
) + i
]);
141 /* Warning, not error, in case we are attached; sometimes the
142 kernel doesn't let us at the registers. */
143 char *err
= safe_strerror (errno
);
144 char *msg
= alloca (strlen (err
) + 128);
145 sprintf (msg
, "writing register %s: %s",
146 REGISTER_NAME (regno
), err
);
150 regaddr
+= sizeof (int);
154 for (regno
= 0; regno
< NUM_REGS
; regno
++)
155 store_inferior_registers (regno
);
158 /* PT_PROT is specific to the PA BSD kernel and isn't documented
159 anywhere (except here).
161 PT_PROT allows one to enable/disable the data memory break bit
162 for pages of memory in an inferior process. This bit is used
163 to cause "Data memory break traps" to occur when the appropriate
166 The arguments are as follows:
168 PT_PROT -- The ptrace action to perform.
170 INFERIOR_PID -- The pid of the process who's page table entries
173 PT_ARGS -- The *address* of a 3 word block of memory which has
174 additional information:
176 word 0 -- The start address to watch. This should be a page-aligned
179 word 1 -- The ending address to watch. Again, this should be a
180 page aligned address.
182 word 2 -- Nonzero to enable the data memory break bit on the
183 given address range or zero to disable the data memory break
184 bit on the given address range.
186 This call may fail if the given addresses are not valid in the inferior
187 process. This most often happens when restarting a program which
188 has watchpoints inserted on heap or stack memory. */
193 hppa_set_watchpoint (int addr
, int len
, int flag
)
197 pt_args
[1] = addr
+ len
;
200 /* Mask off the lower 12 bits since we want to work on a page basis. */
204 /* Rounding adjustments. */
205 pt_args
[1] -= pt_args
[0];
208 /* Put the lower 12 bits back as zero. */
213 return ptrace (PT_PROT
, PIDGET (inferior_ptid
), (PTRACE_ARG3_TYPE
) pt_args
, 0);
This page took 0.033438 seconds and 4 git commands to generate.