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 bound_minimal_symbol ms
;
116 struct cleanup
*old_chain
= save_current_program_space ();
117 struct inferior
*inf
= find_inferior_ptid (ph
->ptid
);
120 set_current_program_space (inf
->pspace
);
122 /* FIXME: kettenis/2000-09-03: What should we do with OBJ? */
123 ms
= lookup_minimal_symbol (name
, NULL
, NULL
);
124 if (ms
.minsym
== NULL
)
128 *sym_addr
= core_addr_to_ps_addr (BMSYMBOL_VALUE_ADDRESS (ms
));
132 do_cleanups (old_chain
);
136 /* Read SIZE bytes from the target process PH at address ADDR and copy
140 ps_pdread (gdb_ps_prochandle_t ph
, psaddr_t addr
,
141 gdb_ps_read_buf_t buf
, gdb_ps_size_t size
)
143 return ps_xfer_memory (ph
, addr
, (gdb_byte
*) buf
, size
, 0);
146 /* Write SIZE bytes from BUF into the target process PH at address ADDR. */
149 ps_pdwrite (gdb_ps_prochandle_t ph
, psaddr_t addr
,
150 gdb_ps_write_buf_t buf
, gdb_ps_size_t size
)
152 return ps_xfer_memory (ph
, addr
, (gdb_byte
*) buf
, size
, 1);
155 /* Get the general registers of LWP LWPID within the target process PH
156 and store them in GREGSET. */
159 ps_lgetregs (gdb_ps_prochandle_t ph
, lwpid_t lwpid
, prgregset_t gregset
)
161 ptid_t ptid
= ptid_build (ptid_get_pid (ph
->ptid
), lwpid
, 0);
162 struct regcache
*regcache
163 = get_thread_arch_regcache (ptid
, target_gdbarch ());
165 target_fetch_registers (regcache
, -1);
166 fill_gregset (regcache
, (gdb_gregset_t
*) gregset
, -1);
171 /* Set the general registers of LWP LWPID within the target process PH
175 ps_lsetregs (gdb_ps_prochandle_t ph
, lwpid_t lwpid
, const prgregset_t gregset
)
177 ptid_t ptid
= ptid_build (ptid_get_pid (ph
->ptid
), lwpid
, 0);
178 struct regcache
*regcache
179 = get_thread_arch_regcache (ptid
, target_gdbarch ());
181 supply_gregset (regcache
, (const gdb_gregset_t
*) gregset
);
182 target_store_registers (regcache
, -1);
187 /* Get the floating-point registers of LWP LWPID within the target
188 process PH and store them in FPREGSET. */
191 ps_lgetfpregs (gdb_ps_prochandle_t ph
, lwpid_t lwpid
,
192 gdb_prfpregset_t
*fpregset
)
194 ptid_t ptid
= ptid_build (ptid_get_pid (ph
->ptid
), lwpid
, 0);
195 struct regcache
*regcache
196 = get_thread_arch_regcache (ptid
, target_gdbarch ());
198 target_fetch_registers (regcache
, -1);
199 fill_fpregset (regcache
, (gdb_fpregset_t
*) fpregset
, -1);
204 /* Set the floating-point registers of LWP LWPID within the target
205 process PH from FPREGSET. */
208 ps_lsetfpregs (gdb_ps_prochandle_t ph
, lwpid_t lwpid
,
209 const gdb_prfpregset_t
*fpregset
)
211 ptid_t ptid
= ptid_build (ptid_get_pid (ph
->ptid
), lwpid
, 0);
212 struct regcache
*regcache
213 = get_thread_arch_regcache (ptid
, target_gdbarch ());
215 supply_fpregset (regcache
, (const gdb_fpregset_t
*) fpregset
);
216 target_store_registers (regcache
, -1);
221 /* Return overall process id of the target PH. Special for GNU/Linux
222 -- not used on Solaris. */
225 ps_getpid (gdb_ps_prochandle_t ph
)
227 return ptid_get_pid (ph
->ptid
);
230 /* Provide a prototype to silence -Wmissing-prototypes. */
231 extern initialize_file_ftype _initialize_proc_service
;
234 _initialize_proc_service (void)
236 /* This function solely exists to make sure this module is linked
237 into the final binary. */