PR ld/12549
[binutils-gdb.git] / gdb / gdbserver / proc-service.c
1 /* libthread_db helper functions for the remote server for GDB.
2 Copyright (C) 2002-2013 Free Software Foundation, Inc.
3
4 Contributed by MontaVista Software.
5
6 This file is part of GDB.
7
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
12
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>. */
20
21 #include "server.h"
22
23 /* This file is currently tied to GNU/Linux. It should scale well to
24 another libthread_db implementation, with the approriate gdbserver
25 hooks, but for now this means we can use GNU/Linux's target data. */
26
27 #include "linux-low.h"
28
29 #include "gdb_proc_service.h"
30
31 typedef struct ps_prochandle *gdb_ps_prochandle_t;
32 typedef void *gdb_ps_read_buf_t;
33 typedef const void *gdb_ps_write_buf_t;
34 typedef size_t gdb_ps_size_t;
35
36 #ifdef HAVE_LINUX_REGSETS
37 #define HAVE_REGSETS
38 #endif
39
40 #ifdef HAVE_REGSETS
41 static struct regset_info *
42 gregset_info(void)
43 {
44 int i = 0;
45
46 while (target_regsets[i].size != -1)
47 {
48 if (target_regsets[i].type == GENERAL_REGS)
49 break;
50 i++;
51 }
52
53 return &target_regsets[i];
54 }
55 #endif
56
57 /* Search for the symbol named NAME within the object named OBJ within
58 the target process PH. If the symbol is found the address of the
59 symbol is stored in SYM_ADDR. */
60
61 ps_err_e
62 ps_pglobal_lookup (gdb_ps_prochandle_t ph, const char *obj,
63 const char *name, psaddr_t *sym_addr)
64 {
65 CORE_ADDR addr;
66
67 if (thread_db_look_up_one_symbol (name, &addr) == 0)
68 return PS_NOSYM;
69
70 *sym_addr = (psaddr_t) (unsigned long) addr;
71 return PS_OK;
72 }
73
74 /* Read SIZE bytes from the target process PH at address ADDR and copy
75 them into BUF. */
76
77 ps_err_e
78 ps_pdread (gdb_ps_prochandle_t ph, psaddr_t addr,
79 gdb_ps_read_buf_t buf, gdb_ps_size_t size)
80 {
81 read_inferior_memory ((unsigned long) addr, buf, size);
82 return PS_OK;
83 }
84
85 /* Write SIZE bytes from BUF into the target process PH at address ADDR. */
86
87 ps_err_e
88 ps_pdwrite (gdb_ps_prochandle_t ph, psaddr_t addr,
89 gdb_ps_write_buf_t buf, gdb_ps_size_t size)
90 {
91 return write_inferior_memory ((unsigned long) addr, buf, size);
92 }
93
94 /* Get the general registers of LWP LWPID within the target process PH
95 and store them in GREGSET. */
96
97 ps_err_e
98 ps_lgetregs (gdb_ps_prochandle_t ph, lwpid_t lwpid, prgregset_t gregset)
99 {
100 #ifdef HAVE_REGSETS
101 struct lwp_info *lwp;
102 struct thread_info *reg_inferior, *save_inferior;
103 struct regcache *regcache;
104
105 lwp = find_lwp_pid (pid_to_ptid (lwpid));
106 if (lwp == NULL)
107 return PS_ERR;
108
109 reg_inferior = get_lwp_thread (lwp);
110 save_inferior = current_inferior;
111 current_inferior = reg_inferior;
112 regcache = get_thread_regcache (current_inferior, 1);
113 gregset_info ()->fill_function (regcache, gregset);
114
115 current_inferior = save_inferior;
116 return PS_OK;
117 #else
118 return PS_ERR;
119 #endif
120 }
121
122 /* Set the general registers of LWP LWPID within the target process PH
123 from GREGSET. */
124
125 ps_err_e
126 ps_lsetregs (gdb_ps_prochandle_t ph, lwpid_t lwpid, const prgregset_t gregset)
127 {
128 /* Unneeded. */
129 return PS_ERR;
130 }
131
132 /* Get the floating-point registers of LWP LWPID within the target
133 process PH and store them in FPREGSET. */
134
135 ps_err_e
136 ps_lgetfpregs (gdb_ps_prochandle_t ph, lwpid_t lwpid, void *fpregset)
137 {
138 /* Unneeded. */
139 return PS_ERR;
140 }
141
142 /* Set the floating-point registers of LWP LWPID within the target
143 process PH from FPREGSET. */
144
145 ps_err_e
146 ps_lsetfpregs (gdb_ps_prochandle_t ph, lwpid_t lwpid, void *fpregset)
147 {
148 /* Unneeded. */
149 return PS_ERR;
150 }
151
152 /* Return overall process id of the target PH. Special for GNU/Linux
153 -- not used on Solaris. */
154
155 pid_t
156 ps_getpid (gdb_ps_prochandle_t ph)
157 {
158 return pid_of (get_thread_lwp (current_inferior));
159 }