1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
|
/* for separate threads within the inferior process, for GDB.
Copyright (C) 1986, 1987, 1988 Free Software Foundation, Inc.
GDB is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY. No author or distributor accepts responsibility to anyone
for the consequences of using it or for whether it serves any
particular purpose or works at all, unless he says so in writing.
Refer to the GDB General Public License for full details.
Everyone is granted permission to copy, modify and redistribute GDB,
but only under the conditions described in the GDB General Public
License. A copy of this license is supposed to have been given to you
along with GDB so you can know your rights and responsibilities. It
should be in a file named COPYING. Among other things, the copyright
notice and this notice must be preserved on all copies.
In other words, go ahead and share GDB, but don't try to stop
anyone else from sharing it farther. Help stamp out software hoarding!
*/
#include "defs.h"
#include "symtab.h"
#include "frame.h"
#include "inferior.h"
#include "environ.h"
#include "value.h"
#include "target.h"
#include "thread.h"
#include <sys/types.h>
#include <signal.h>
/*#include "lynxos-core.h"*/
struct thread_info
{
struct thread_info *next;
int pid; /* Actual process id */
int num; /* Convenient handle */
};
static struct thread_info *thread_list = NULL;
static int highest_thread_num;
static void thread_info PARAMS ((void));
static void thread_command PARAMS ((char * tidstr, int from_tty));
static void prune_threads PARAMS ((void));
static void thread_switch PARAMS ((int pid));
void
init_thread_list ()
{
struct thread_info *tp, *tpnext;
if (!thread_list)
return;
for (tp = thread_list; tp; tp = tpnext)
{
tpnext = tp->next;
free (tp);
}
thread_list = NULL;
highest_thread_num = 0;
}
void
add_thread (pid)
int pid;
{
struct thread_info *tp;
tp = xmalloc (sizeof (struct thread_info));
tp->pid = pid;
tp->num = ++highest_thread_num;
tp->next = thread_list;
thread_list = tp;
}
static struct thread_info *
find_thread_id (num)
int num;
{
struct thread_info *tp;
for (tp = thread_list; tp; tp = tp->next)
if (tp->num == num)
return tp;
return NULL;
}
int
in_thread_list (pid)
int pid;
{
struct thread_info *tp;
for (tp = thread_list; tp; tp = tp->next)
if (tp->pid == pid)
return 1;
return 0; /* Never heard of 'im */
}
#if 0
void
bfd_get_core_threads (abfd)
bfd *abfd;
{
int i;
inferior_pid = BUILDPID (inferior_pid, core_thread (abfd)->pid);
for (i = 0; i < core_pss (abfd).threadcnt; i++)
add_thread (core_thread (abfd)[i].pid);
}
#endif
static void
prune_threads ()
{
struct thread_info *tp, *tpprev;
tpprev = 0;
for (tp = thread_list; tp; tp = tp->next)
if (tp->pid == -1)
{
if (tpprev)
tpprev->next = tp->next;
else
thread_list = NULL;
free (tp);
}
else
tpprev = tp;
}
/* Print information about currently known threads */
static void
info_threads_command (arg, from_tty)
char *arg;
int from_tty;
{
struct thread_info *tp;
int current_pid = inferior_pid;
for (tp = thread_list; tp; tp = tp->next)
{
if (target_has_execution
&& kill (tp->pid, 0) == -1)
{
tp->pid == -1; /* Mark it as dead */
continue;
}
if (tp->pid == current_pid)
printf_filtered ("* ");
else
printf_filtered (" ");
printf_filtered ("%d %s ", tp->num, target_pid_to_str (tp->pid));
thread_switch (tp->pid);
print_stack_frame (selected_frame, -1, 0);
}
thread_switch (current_pid);
prune_threads ();
}
/* Switch from one thread to another. */
void
thread_switch (pid)
int pid;
{
if (pid == inferior_pid)
return;
inferior_pid = pid;
pc_changed = 0;
flush_cached_frames ();
registers_changed ();
stop_pc = read_pc();
set_current_frame (create_new_frame (read_fp (), stop_pc));
stop_frame_address = FRAME_FP (get_current_frame ());
select_frame (get_current_frame (), 0);
}
static void
thread_command (tidstr, from_tty)
char *tidstr;
int from_tty;
{
int num;
struct thread_info *tp;
if (!tidstr)
error ("Please specify a thread ID. Use the \"info threads\" command to\n\
see the IDs of currently known threads.");
num = atoi (tidstr);
tp = find_thread_id (num);
if (!tp)
error ("Thread ID %d not known. Use the \"info threads\" command to\n\
see the IDs of currently known threads.", num);
thread_switch (tp->pid);
printf_filtered ("[Switching to %s]\n", target_pid_to_str (inferior_pid));
print_stack_frame (selected_frame, selected_frame_level, 1);
}
void
_initialize_thread ()
{
add_info ("threads", info_threads_command,
"IDs of currently known threads.");
add_com ("thread", class_info, thread_command,
"Use this command to switch between threads.\n\
The new thread ID must be currently known.");
}
|
