1 /* <proc_service.h> implementation.
3 Copyright (C) 1999-2017 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/>. */
29 #include "gdb_proc_service.h"
31 #include <sys/procfs.h>
33 /* Prototypes for supply_gregset etc. */
37 /* Fix-up some broken systems. */
39 /* The prototypes in <proc_service.h> are slightly different on older
40 systems. Compensate for the discrepancies. */
42 #ifdef PROC_SERVICE_IS_OLD
43 typedef const struct ps_prochandle
*gdb_ps_prochandle_t
;
44 typedef char *gdb_ps_read_buf_t
;
45 typedef char *gdb_ps_write_buf_t
;
46 typedef int gdb_ps_size_t
;
48 typedef struct ps_prochandle
*gdb_ps_prochandle_t
;
49 typedef void *gdb_ps_read_buf_t
;
50 typedef const void *gdb_ps_write_buf_t
;
51 typedef size_t gdb_ps_size_t
;
55 /* Helper functions. */
57 /* Convert a psaddr_t to a CORE_ADDR. */
60 ps_addr_to_core_addr (psaddr_t addr
)
62 if (exec_bfd
&& bfd_get_sign_extend_vma (exec_bfd
))
63 return (intptr_t) addr
;
65 return (uintptr_t) addr
;
68 /* Convert a CORE_ADDR to a psaddr_t. */
71 core_addr_to_ps_addr (CORE_ADDR addr
)
73 if (exec_bfd
&& bfd_get_sign_extend_vma (exec_bfd
))
74 return (psaddr_t
) (intptr_t) addr
;
76 return (psaddr_t
) (uintptr_t) addr
;
79 /* Transfer LEN bytes of memory between BUF and address ADDR in the
80 process specified by PH. If WRITE, transfer them to the process,
81 else transfer them from the process. Returns PS_OK for success,
84 This is a helper function for ps_pdread and ps_pdwrite. */
87 ps_xfer_memory (const struct ps_prochandle
*ph
, psaddr_t addr
,
88 gdb_byte
*buf
, size_t len
, int write
)
90 struct cleanup
*old_chain
= save_inferior_ptid ();
92 CORE_ADDR core_addr
= ps_addr_to_core_addr (addr
);
94 inferior_ptid
= ph
->ptid
;
97 ret
= target_write_memory (core_addr
, buf
, len
);
99 ret
= target_read_memory (core_addr
, buf
, len
);
101 do_cleanups (old_chain
);
103 return (ret
== 0 ? PS_OK
: PS_ERR
);
107 /* Search for the symbol named NAME within the object named OBJ within
108 the target process PH. If the symbol is found the address of the
109 symbol is stored in SYM_ADDR. */
112 ps_pglobal_lookup (gdb_ps_prochandle_t ph
, const char *obj
,
113 const char *name
, psaddr_t
*sym_addr
)
115 struct inferior
*inf
= find_inferior_ptid (ph
->ptid
);
117 scoped_restore_current_program_space restore_pspace
;
119 set_current_program_space (inf
->pspace
);
121 /* FIXME: kettenis/2000-09-03: What should we do with OBJ? */
122 bound_minimal_symbol ms
= lookup_minimal_symbol (name
, NULL
, NULL
);
123 if (ms
.minsym
== NULL
)
126 *sym_addr
= core_addr_to_ps_addr (BMSYMBOL_VALUE_ADDRESS (ms
));
130 /* Read SIZE bytes from the target process PH at address ADDR and copy
134 ps_pdread (gdb_ps_prochandle_t ph
, psaddr_t addr
,
135 gdb_ps_read_buf_t buf
, gdb_ps_size_t size
)
137 return ps_xfer_memory (ph
, addr
, (gdb_byte
*) buf
, size
, 0);
140 /* Write SIZE bytes from BUF into the target process PH at address ADDR. */
143 ps_pdwrite (gdb_ps_prochandle_t ph
, psaddr_t addr
,
144 gdb_ps_write_buf_t buf
, gdb_ps_size_t size
)
146 return ps_xfer_memory (ph
, addr
, (gdb_byte
*) buf
, size
, 1);
149 /* Get the general registers of LWP LWPID within the target process PH
150 and store them in GREGSET. */
153 ps_lgetregs (gdb_ps_prochandle_t ph
, lwpid_t lwpid
, prgregset_t gregset
)
155 ptid_t ptid
= ptid_build (ptid_get_pid (ph
->ptid
), lwpid
, 0);
156 struct regcache
*regcache
157 = get_thread_arch_regcache (ptid
, target_gdbarch ());
159 target_fetch_registers (regcache
, -1);
160 fill_gregset (regcache
, (gdb_gregset_t
*) gregset
, -1);
165 /* Set the general registers of LWP LWPID within the target process PH
169 ps_lsetregs (gdb_ps_prochandle_t ph
, lwpid_t lwpid
, const prgregset_t gregset
)
171 ptid_t ptid
= ptid_build (ptid_get_pid (ph
->ptid
), lwpid
, 0);
172 struct regcache
*regcache
173 = get_thread_arch_regcache (ptid
, target_gdbarch ());
175 supply_gregset (regcache
, (const gdb_gregset_t
*) gregset
);
176 target_store_registers (regcache
, -1);
181 /* Get the floating-point registers of LWP LWPID within the target
182 process PH and store them in FPREGSET. */
185 ps_lgetfpregs (gdb_ps_prochandle_t ph
, lwpid_t lwpid
,
186 gdb_prfpregset_t
*fpregset
)
188 ptid_t ptid
= ptid_build (ptid_get_pid (ph
->ptid
), lwpid
, 0);
189 struct regcache
*regcache
190 = get_thread_arch_regcache (ptid
, target_gdbarch ());
192 target_fetch_registers (regcache
, -1);
193 fill_fpregset (regcache
, (gdb_fpregset_t
*) fpregset
, -1);
198 /* Set the floating-point registers of LWP LWPID within the target
199 process PH from FPREGSET. */
202 ps_lsetfpregs (gdb_ps_prochandle_t ph
, lwpid_t lwpid
,
203 const gdb_prfpregset_t
*fpregset
)
205 ptid_t ptid
= ptid_build (ptid_get_pid (ph
->ptid
), lwpid
, 0);
206 struct regcache
*regcache
207 = get_thread_arch_regcache (ptid
, target_gdbarch ());
209 supply_fpregset (regcache
, (const gdb_fpregset_t
*) fpregset
);
210 target_store_registers (regcache
, -1);
215 /* Return overall process id of the target PH. Special for GNU/Linux
216 -- not used on Solaris. */
219 ps_getpid (gdb_ps_prochandle_t ph
)
221 return ptid_get_pid (ph
->ptid
);
224 /* Provide a prototype to silence -Wmissing-prototypes. */
225 extern initialize_file_ftype _initialize_proc_service
;
228 _initialize_proc_service (void)
230 /* This function solely exists to make sure this module is linked
231 into the final binary. */