Subversion Repositories HelenOS

Rev

Rev 2937 | Rev 2939 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2937 Rev 2938
1
/*
1
/*
2
 * Copyright (c) 2008 Jiri Svoboda
2
 * Copyright (c) 2008 Jiri Svoboda
3
 * All rights reserved.
3
 * All rights reserved.
4
 *
4
 *
5
 * Redistribution and use in source and binary forms, with or without
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
6
 * modification, are permitted provided that the following conditions
7
 * are met:
7
 * are met:
8
 *
8
 *
9
 * - Redistributions of source code must retain the above copyright
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
12
 *   notice, this list of conditions and the following disclaimer in the
13
 *   documentation and/or other materials provided with the distribution.
13
 *   documentation and/or other materials provided with the distribution.
14
 * - The name of the author may not be used to endorse or promote products
14
 * - The name of the author may not be used to endorse or promote products
15
 *   derived from this software without specific prior written permission.
15
 *   derived from this software without specific prior written permission.
16
 *
16
 *
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
27
 */
28
 
28
 
29
/** @addtogroup debug
29
/** @addtogroup debug
30
 * @{
30
 * @{
31
 */
31
 */
32
/** @file
32
/** @file
33
 */
33
 */
34
 
34
 
35
#include <stdio.h>
35
#include <stdio.h>
36
#include <stdlib.h>
36
#include <stdlib.h>
37
#include <unistd.h>
37
#include <unistd.h>
38
#include <syscall.h>
38
#include <syscall.h>
39
#include <ipc/ipc.h>
39
#include <ipc/ipc.h>
40
#include <fibril.h>
40
#include <fibril.h>
41
#include <errno.h>
41
#include <errno.h>
42
#include <udebug.h>
42
#include <udebug.h>
43
#include <async.h>
43
#include <async.h>
44
#include <string.h>
44
#include <string.h>
45
 
45
 
46
#include "cmd.h"
46
#include "cmd.h"
47
#include "cons.h"
47
#include "cons.h"
-
 
48
#include "dthread.h"
48
#include "include/arch.h"
49
#include "include/arch.h"
49
#include "fib_synch.h"
50
#include "fib_synch.h"
50
#include "main.h"
51
#include "main.h"
51
 
52
 
52
void thread_debug_start(unsigned thread_hash);
53
void thread_debug_start(unsigned thread_hash);
53
 
54
 
54
#define IN_BUF_SIZE 64
55
#define IN_BUF_SIZE 64
55
static char in_buf[IN_BUF_SIZE];
56
static char in_buf[IN_BUF_SIZE];
56
 
57
 
57
#define MAX_ARGC 10
58
#define MAX_ARGC 10
58
int cmd_argc;
59
int cmd_argc;
59
char *cmd_argv[MAX_ARGC + 1];   /* need one spare field for cmd_split() */
60
char *cmd_argv[MAX_ARGC + 1];   /* need one spare field for cmd_split() */
60
 
61
 
61
#define THBUF_SIZE 64
62
#define THBUF_SIZE 64
62
thash_t thread_hash_buf[THBUF_SIZE];
63
thash_t thread_hash_buf[THBUF_SIZE];
63
 
64
 
64
#define MAX_THREADS 64
-
 
65
thash_t thread_hash[MAX_THREADS];
-
 
66
int thread_id[MAX_THREADS];
-
 
67
unsigned n_threads;
-
 
68
int cwt; /* index into thread_hash/thread_id */
-
 
69
 
-
 
70
int next_thread_id;
65
int next_thread_id;
71
 
66
 
72
int app_phone;
67
int app_phone;
73
volatile bool abort_debug;
68
volatile bool abort_debug;
74
 
69
 
75
thash_t thash;
70
thash_t thash;
76
volatile int paused;
71
volatile int paused;
77
 
72
 
78
breakpoint_t brk_list[MAX_BRKPTS];
73
breakpoint_t brk_list[MAX_BRKPTS];
79
int lifted_brkpt;
74
int lifted_brkpt;
80
 
75
 
81
fcv_t go_cv;
76
fcv_t go_cv;
82
 
77
 
83
void command_split(char *cmd_str)
78
static void command_split(char *cmd_str)
84
{
79
{
85
    char *p = cmd_str;
80
    char *p = cmd_str;
86
 
81
 
87
    if (*p == '\0') {
82
    if (*p == '\0') {
88
        cmd_argc = 0;
83
        cmd_argc = 0;
89
        return;
84
        return;
90
    }
85
    }
91
 
86
 
92
    cmd_argc = 1;
87
    cmd_argc = 1;
93
    cmd_argv[0] = p;
88
    cmd_argv[0] = p;
94
 
89
 
95
    while (*p != '\0') {
90
    while (*p != '\0') {
96
        if (*p == ' ') {
91
        if (*p == ' ') {
97
            cmd_argv[cmd_argc++] = p + 1;
92
            cmd_argv[cmd_argc++] = p + 1;
98
            *p = '\0';
93
            *p = '\0';
99
        }
94
        }
100
        ++p;
95
        ++p;
101
    }
96
    }
102
}
97
}
103
 
98
 
104
void command_run(void)
99
static void command_run(void)
105
{
100
{
106
    int i;
101
    int i;
107
    int cmp_len;
102
    int cmp_len;
108
    int len;
103
    int len;
109
 
104
 
110
    int idx_found;
105
    int idx_found;
111
    int num_found;
106
    int num_found;
112
 
107
 
113
    len = strlen(cmd_argv[0]);
108
    len = strlen(cmd_argv[0]);
114
    cmp_len = 1;
109
    cmp_len = 1;
115
 
110
 
116
    while (cmp_len <= len + 1) {
111
    while (cmp_len <= len + 1) {
117
 
112
 
118
        num_found = 0;
113
        num_found = 0;
119
        i = 0;
114
        i = 0;
120
        while (cmd_table[i].name != NULL) {
115
        while (cmd_table[i].name != NULL) {
121
            if (strncmp(cmd_table[i].name, cmd_argv[0], cmp_len) == 0) {
116
            if (strncmp(cmd_table[i].name, cmd_argv[0], cmp_len) == 0) {
122
                idx_found = i;
117
                idx_found = i;
123
                ++num_found;
118
                ++num_found;
124
            }
119
            }
125
            ++i;
120
            ++i;
126
        }
121
        }
127
 
122
 
128
        if (num_found < 2) break;
123
        if (num_found < 2) break;
129
 
124
 
130
        --cmp_len;
125
        --cmp_len;
131
    }
126
    }
132
 
127
 
133
    if (num_found == 0) {
128
    if (num_found == 0) {
134
        cons_printf("Unknown command. Try one of:\n");
129
        cons_printf("Unknown command. Try one of:\n");
135
        cmd_help(0, NULL);
130
        cmd_help(0, NULL);
136
        return;
131
        return;
137
    }
132
    }
138
 
133
 
139
    if (cmd_argc - 1 != cmd_table[idx_found].argc) {
134
    if (cmd_argc - 1 != cmd_table[idx_found].argc) {
140
        cons_printf("Command '%s' expects %d arguments\n",
135
        cons_printf("Command '%s' expects %d arguments\n",
141
        cmd_table[idx_found].name, cmd_table[idx_found].argc);
136
        cmd_table[idx_found].name, cmd_table[idx_found].argc);
142
        return;
137
        return;
143
    }
138
    }
144
 
139
 
145
    (*cmd_table[idx_found].proc)(cmd_argc, cmd_argv);
140
    (*cmd_table[idx_found].proc)(cmd_argc, cmd_argv);
146
}
141
}
147
 
142
 
148
void thread_stop(void)
143
static void thread_stop(void)
149
{
144
{
150
    cons_printf("[t] stopped\n");
145
    cons_printf("[t] stopped\n");
151
    fcv_wait(&go_cv);
146
    fcv_wait(&go_cv);
152
    cons_printf("[t] go\n");
147
    cons_printf("[t] go\n");
153
}
148
}
154
 
149
 
155
/*
150
/*
156
 * Called by a fibril (from arch code) when a breakpoint is hit.
151
 * Called by a fibril (from arch code) when a breakpoint is hit.
157
 */
152
 */
158
void breakpoint_hit(void)
153
void breakpoint_hit(void)
159
{
154
{
160
    cons_printf("breakpoint hit\n");
155
    cons_printf("breakpoint hit\n");
161
    thread_stop();
156
    thread_stop();
162
}
157
}
163
 
158
 
164
int task_connect(int taskid)
159
static int task_connect(int taskid)
165
{
160
{
166
    int rc;
161
    int rc;
167
    unsigned evmask;
162
    unsigned evmask;
168
 
163
 
169
    cons_printf("ipc_connect_kbox(%d)... ", taskid);
164
    cons_printf("ipc_connect_kbox(%d)... ", taskid);
170
    rc = ipc_connect_kbox(taskid);
165
    rc = ipc_connect_kbox(taskid);
171
    cons_printf("-> %d\n", rc);
166
    cons_printf("-> %d\n", rc);
172
    app_phone = rc;
167
    app_phone = rc;
173
    if (rc < 0) return rc;
168
    if (rc < 0) return rc;
174
 
169
 
175
    cons_printf("udebug_begin()... ");
170
    cons_printf("udebug_begin()... ");
176
    rc = udebug_begin(app_phone);
171
    rc = udebug_begin(app_phone);
177
    cons_printf("-> %d\n", rc);
172
    cons_printf("-> %d\n", rc);
178
    if (rc < 0) return rc;
173
    if (rc < 0) return rc;
179
 
174
 
180
    evmask = UDEBUG_EM_ALL & ~(UDEBUG_EM_SYSCALL_B | UDEBUG_EM_SYSCALL_E);
175
    evmask = UDEBUG_EM_ALL & ~(UDEBUG_EM_SYSCALL_B | UDEBUG_EM_SYSCALL_E);
181
    cons_printf("udebug_set_evmask(0x%x)... ", evmask);
176
    cons_printf("udebug_set_evmask(0x%x)... ", evmask);
182
    rc = udebug_set_evmask(app_phone, evmask);
177
    rc = udebug_set_evmask(app_phone, evmask);
183
    cons_printf("-> %d\n", rc);
178
    cons_printf("-> %d\n", rc);
184
    if (rc < 0) return rc;
179
    if (rc < 0) return rc;
185
 
180
 
186
    return 0;
181
    return 0;
187
}
182
}
188
 
183
 
189
int get_thread_list(void)
184
static int get_thread_list(void)
190
{
185
{
191
    int rc;
186
    int rc;
192
    int tb_copied;
187
    int tb_copied;
193
    int tb_needed;
188
    int tb_needed;
194
    int i;
189
    int i;
195
    int n;
190
    int n;
196
 
191
 
197
    cons_printf("send IPC_M_DEBUG_THREAD_READ message\n");
192
    cons_printf("send IPC_M_DEBUG_THREAD_READ message\n");
198
    rc = udebug_thread_read(app_phone, (unsigned)thread_hash_buf,
193
    rc = udebug_thread_read(app_phone, (unsigned)thread_hash_buf,
199
        THBUF_SIZE*sizeof(unsigned), &tb_copied, &tb_needed);
194
        THBUF_SIZE*sizeof(unsigned), &tb_copied, &tb_needed);
200
    cons_printf("-> %d\n", rc);
195
    cons_printf("-> %d\n", rc);
201
    if (rc < 0) return rc;
196
    if (rc < 0) return rc;
202
 
197
 
203
    n = tb_copied / sizeof(unsigned);
198
    n = tb_copied / sizeof(unsigned);
204
 
199
 
205
    cons_printf("thread IDs:");
200
    cons_printf("thread IDs:");
206
    for (i=0; i<n; i++) {
201
    for (i=0; i<n; i++) {
207
        cons_printf(" %u", thread_hash_buf[i]);
202
        cons_printf(" %u", thread_hash_buf[i]);
208
    }
203
    }
209
    cons_printf("\ntotal of %u threads\n", tb_needed/sizeof(unsigned));
204
    cons_printf("\ntotal of %u threads\n", tb_needed/sizeof(unsigned));
210
 
205
 
211
    return n;
206
    return n;
212
}
207
}
213
 
208
 
214
void event_thread_b(unsigned hash)
209
void event_thread_b(unsigned hash)
215
{
210
{
216
    async_serialize_start();
211
    async_serialize_start();
217
    cons_printf("new thread, hash 0x%x\n", hash);
212
    cons_printf("new thread, hash 0x%x\n", hash);
218
    async_serialize_end();
213
    async_serialize_end();
219
 
214
 
220
    thread_debug_start(hash);
215
    thread_debug_start(hash);
221
}
216
}
222
 
217
 
223
static unsigned buffer[1024];
218
static unsigned buffer[1024];
224
 
219
 
225
static void debug_event(thash_t thash, udebug_event_t ev_type, sysarg_t val0)
220
static void debug_event(thash_t thash, udebug_event_t ev_type, sysarg_t val0)
226
{
221
{
227
    switch (ev_type) {
222
    switch (ev_type) {
228
    case UDEBUG_EVENT_STOP:
223
    case UDEBUG_EVENT_STOP:
229
        cons_printf("stop event\n");
224
        cons_printf("stop event\n");
230
        cons_printf("waiting for resume\n");
225
        cons_printf("waiting for resume\n");
231
        while (paused) {
226
        while (paused) {
232
            usleep(1000000);
227
            usleep(1000000);
233
            fibril_yield();
228
            fibril_yield();
234
            cons_printf(".");
229
            cons_printf(".");
235
        }
230
        }
236
        cons_printf("resumed\n");
231
        cons_printf("resumed\n");
237
        break;
232
        break;
238
    case UDEBUG_EVENT_THREAD_B:
233
    case UDEBUG_EVENT_THREAD_B:
239
        event_thread_b(val0);
234
        event_thread_b(val0);
240
        break;
235
        break;
241
    case UDEBUG_EVENT_THREAD_E:
236
    case UDEBUG_EVENT_THREAD_E:
242
        cons_printf("thread 0x%x exited\n", val0);
237
        cons_printf("thread 0x%x exited\n", val0);
243
        abort_debug = true;
238
        abort_debug = true;
244
        break;
239
        break;
245
    case UDEBUG_EVENT_BREAKPOINT:
240
    case UDEBUG_EVENT_BREAKPOINT:
246
        arch_event_breakpoint(thash);
241
        arch_event_breakpoint(thash);
247
        break;
242
        break;
248
    case UDEBUG_EVENT_TRAP:
243
    case UDEBUG_EVENT_TRAP:
249
        arch_event_trap(thash);
244
        arch_event_trap(thash);
250
        break;
245
        break;
251
    default:
246
    default:
252
        cons_printf("unknown event type %d\n", ev_type);
247
        cons_printf("unknown event type %d\n", ev_type);
253
        break;
248
        break;
254
    }
249
    }
255
}
250
}
256
 
251
 
257
void debug_loop(void *thread_buf_idx_arg)
252
void debug_loop(void *dt_arg)
258
{
253
{
259
    int rc;
254
    int rc;
260
    udebug_event_t ev_type;
255
    udebug_event_t ev_type;
261
    unsigned thread_buf_idx;
256
    unsigned thread_buf_idx;
262
    thash_t thash;
-
 
263
    int tid;
-
 
264
    unsigned val0, val1;
257
    unsigned val0, val1;
-
 
258
    dthread_t *dt;
265
 
259
 
266
    thread_buf_idx = (unsigned)thread_buf_idx_arg;
-
 
267
 
-
 
268
    thash = thread_hash[thread_buf_idx];
-
 
269
    tid = thread_id[thread_buf_idx];
260
    dt = (dthread_t *)dt_arg;
270
 
261
 
271
    cons_printf("debug_loop(%d)\n", tid);
262
    cons_printf("debug_loop(%d)\n", dt->id);
272
 
263
 
273
    while (!abort_debug) {
264
    while (!abort_debug) {
274
 
265
 
275
        /* Run thread until an event occurs */
266
        /* Run thread until an event occurs */
276
        rc = udebug_go(app_phone, thash,
267
        rc = udebug_go(app_phone, dt->hash, &ev_type, &val0, &val1);
277
            &ev_type, &val0, &val1);
-
 
278
 
268
 
279
        if (ev_type == UDEBUG_EVENT_FINISHED) {
269
        if (ev_type == UDEBUG_EVENT_FINISHED) {
280
            cons_printf("thread %u debugging finished\n", tid);
270
            cons_printf("thread %u debugging finished\n", dt->id);
281
            break;
271
            break;
282
        }
272
        }
283
        if (rc >= 0) debug_event(thash, ev_type, val0);
273
        if (rc >= 0) debug_event(thash, ev_type, val0);
284
    }
274
    }
285
 
275
 
286
    cons_printf("debug_loop(%d) exiting\n", thread_id);
276
    cons_printf("debug_loop(%d) exiting\n", dt->id);
287
}
277
}
288
 
278
 
289
void thread_debug_start(unsigned thash)
279
void thread_debug_start(unsigned thash)
290
{
280
{
291
    fid_t fid;
281
    fid_t fid;
-
 
282
    dthread_t *dt;
292
 
283
 
293
    thread_hash[n_threads] = thash;
284
    dt = dthread_new(thash);
294
    thread_id[n_threads] = next_thread_id++;
-
 
295
 
285
 
296
    fid = fibril_create(debug_loop, (void *)n_threads++);
286
    fid = fibril_create(debug_loop, (void *)dt);
297
    if (fid == 0) {
287
    if (fid == 0) {
298
        cons_printf("Warning: Failed creating fibril\n");
288
        cons_printf("Warning: Failed creating fibril\n");
299
    }
289
    }
300
    fibril_add_ready(fid);
290
    fibril_add_ready(fid);
301
}
291
}
302
 
292
 
303
void debug_active_task(void)
293
void debug_active_task(void)
304
{
294
{
305
    int taskid;
295
    int taskid;
306
    int i;
296
    int i;
307
    int rc;
297
    int rc;
308
    int c;
298
    int c;
309
 
299
 
310
    cons_printf("Breakpoint Debugger\n");
300
    cons_printf("Breakpoint Debugger\n");
311
    cons_printf("Press 'c' to connect\n");
301
    cons_printf("Press 'c' to connect\n");
312
    while ((i = getchar()) != 'c')
302
    while ((i = getchar()) != 'c')
313
        putchar(i);
303
        putchar(i);
314
 
304
 
315
    taskid = 14;
305
    taskid = 14;
316
    rc = task_connect(taskid);
306
    rc = task_connect(taskid);
317
    if (rc < 0) {
307
    if (rc < 0) {
318
        cons_printf("Failed to connect to task %d\n", taskid);
308
        cons_printf("Failed to connect to task %d\n", taskid);
319
        return;
309
        return;
320
    }
310
    }
321
 
311
 
322
    cons_printf("Connected to task %d\n", taskid);
312
    cons_printf("Connected to task %d\n", taskid);
323
 
313
 
324
    rc = get_thread_list();
314
    rc = get_thread_list();
325
    if (rc < 0) {
315
    if (rc < 0) {
326
        cons_printf("Failed to get thread list (error %d)\n", rc);
316
        cons_printf("Failed to get thread list (error %d)\n", rc);
327
        return;
317
        return;
328
    }
318
    }
329
 
319
 
330
    abort_debug = false;
320
    abort_debug = false;
331
 
321
 
332
    for (i = 0; i < rc; i++) {
322
    for (i = 0; i < rc; i++) {
333
        thread_debug_start(thread_hash_buf[i]);
323
        thread_debug_start(thread_hash_buf[i]);
334
    }
324
    }
335
 
325
 
336
    while (!quit) {
326
    while (!quit) {
337
        cons_read_line(in_buf, IN_BUF_SIZE);
327
        cons_read_line(in_buf, IN_BUF_SIZE);
338
        command_split(in_buf);
328
        command_split(in_buf);
339
        if (cmd_argc == 0) continue;
329
        if (cmd_argc == 0) continue;
340
 
330
 
341
        command_run();
331
        command_run();
342
    }
332
    }
343
 
333
 
344
    cons_printf("terminate debugging session...\n");
334
    cons_printf("terminate debugging session...\n");
345
    abort_debug = true;
335
    abort_debug = true;
346
    udebug_end(app_phone);
336
    udebug_end(app_phone);
347
    ipc_hangup(app_phone);
337
    ipc_hangup(app_phone);
348
 
338
 
349
    cons_printf("done\n");
339
    cons_printf("done\n");
350
    return;
340
    return;
351
}
341
}
352
 
342
 
353
static void main_init(void)
343
static void main_init(void)
354
{
344
{
355
    next_thread_id = 1;
345
    next_thread_id = 1;
356
    paused = 0;
346
    paused = 0;
-
 
347
   
-
 
348
    list_initialize(&dthreads);
-
 
349
    cwt = NULL;
357
 
350
 
358
    fcv_init(&go_cv);
351
    fcv_init(&go_cv);
359
}
352
}
360
 
353
 
361
int main(void)
354
int main(void)
362
{
355
{
363
    main_init();
356
    main_init();
364
 
357
 
365
    while (1) {
358
    while (1) {
366
        debug_active_task();
359
        debug_active_task();
367
    }
360
    }
368
}
361
}
369
 
362
 
370
/** @}
363
/** @}
371
 */
364
 */
372
 
365