db_command.c revision 1.158 1 /* $NetBSD: db_command.c,v 1.158 2018/09/15 08:48:18 mrg Exp $ */
2
3 /*
4 * Copyright (c) 1996, 1997, 1998, 1999, 2002, 2009 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Adam Hamsik, and by Andrew Doran.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32 /*
33 * Mach Operating System
34 * Copyright (c) 1991,1990 Carnegie Mellon University
35 * All Rights Reserved.
36 *
37 * Permission to use, copy, modify and distribute this software and its
38 * documentation is hereby granted, provided that both the copyright
39 * notice and this permission notice appear in all copies of the
40 * software, derivative works or modified versions, and any portions
41 * thereof, and that both notices appear in supporting documentation.
42 *
43 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
44 * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
45 * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
46 *
47 * Carnegie Mellon requests users of this software to return to
48 *
49 * Software Distribution Coordinator or Software.Distribution (at) CS.CMU.EDU
50 * School of Computer Science
51 * Carnegie Mellon University
52 * Pittsburgh PA 15213-3890
53 *
54 * any improvements or extensions that they make and grant Carnegie the
55 * rights to redistribute these changes.
56 */
57
58 /*
59 * Command dispatcher.
60 */
61
62 #include <sys/cdefs.h>
63 __KERNEL_RCSID(0, "$NetBSD: db_command.c,v 1.158 2018/09/15 08:48:18 mrg Exp $");
64
65 #ifdef _KERNEL_OPT
66 #include "opt_aio.h"
67 #include "opt_ddb.h"
68 #include "opt_kgdb.h"
69 #include "opt_mqueue.h"
70 #include "opt_inet.h"
71 #include "opt_kernhist.h"
72 #include "opt_ddbparam.h"
73 #include "opt_multiprocessor.h"
74 #endif
75
76 #include <sys/param.h>
77 #include <sys/systm.h>
78 #include <sys/reboot.h>
79 #include <sys/device.h>
80 #include <sys/lwp.h>
81 #include <sys/mbuf.h>
82 #include <sys/namei.h>
83 #include <sys/pool.h>
84 #include <sys/proc.h>
85 #include <sys/vnode.h>
86 #include <sys/vmem.h>
87 #include <sys/lockdebug.h>
88 #include <sys/cpu.h>
89 #include <sys/buf.h>
90 #include <sys/module.h>
91 #include <sys/kernhist.h>
92 #include <sys/socketvar.h>
93
94 /*include queue macros*/
95 #include <sys/queue.h>
96
97 #include <ddb/ddb.h>
98
99 #include <uvm/uvm_extern.h>
100 #include <uvm/uvm_ddb.h>
101
102 #include <net/route.h>
103
104 /*
105 * Results of command search.
106 */
107 #define CMD_EXACT 0
108 #define CMD_PREFIX 1
109 #define CMD_NONE 2
110 #define CMD_AMBIGUOUS 3
111
112 /*
113 * Exported global variables
114 */
115 bool db_cmd_loop_done;
116 label_t *db_recover;
117 db_addr_t db_dot;
118 db_addr_t db_last_addr;
119 db_addr_t db_prev;
120 db_addr_t db_next;
121
122
123 /*
124 * New DDB api for adding and removing commands uses three lists, because
125 * we use two types of commands
126 * a) standard commands without subcommands -> reboot
127 * b) show commands which are subcommands of show command -> show aio_jobs
128 * c) if defined machine specific commands
129 *
130 * ddb_add_cmd, ddb_rem_cmd use type (DDB_SHOW_CMD||DDB_BASE_CMD)argument to
131 * add them to representativ lists.
132 */
133
134 static const struct db_command db_command_table[];
135 static const struct db_command db_show_cmds[];
136
137 #ifdef DB_MACHINE_COMMANDS
138 /* arch/<arch>/<arch>/db_interface.c */
139 extern const struct db_command db_machine_command_table[];
140 #endif
141
142 /* the global queue of all command tables */
143 TAILQ_HEAD(db_cmd_tbl_en_head, db_cmd_tbl_en);
144
145 /* TAILQ entry used to register command tables */
146 struct db_cmd_tbl_en {
147 const struct db_command *db_cmd; /* cmd table */
148 TAILQ_ENTRY(db_cmd_tbl_en) db_cmd_next;
149 };
150
151 /* head of base commands list */
152 static struct db_cmd_tbl_en_head db_base_cmd_list =
153 TAILQ_HEAD_INITIALIZER(db_base_cmd_list);
154 static struct db_cmd_tbl_en db_base_cmd_builtins =
155 { .db_cmd = db_command_table };
156
157 /* head of show commands list */
158 static struct db_cmd_tbl_en_head db_show_cmd_list =
159 TAILQ_HEAD_INITIALIZER(db_show_cmd_list);
160 static struct db_cmd_tbl_en db_show_cmd_builtins =
161 { .db_cmd = db_show_cmds };
162
163 /* head of machine commands list */
164 static struct db_cmd_tbl_en_head db_mach_cmd_list =
165 TAILQ_HEAD_INITIALIZER(db_mach_cmd_list);
166 #ifdef DB_MACHINE_COMMANDS
167 static struct db_cmd_tbl_en db_mach_cmd_builtins =
168 { .db_cmd = db_machine_command_table };
169 #endif
170
171 /*
172 * if 'ed' style: 'dot' is set at start of last item printed,
173 * and '+' points to next line.
174 * Otherwise: 'dot' points to next item, '..' points to last.
175 */
176 static bool db_ed_style = true;
177
178 static void db_init_commands(void);
179 static int db_register_tbl_entry(uint8_t type,
180 struct db_cmd_tbl_en *list_ent);
181 static void db_cmd_list(const struct db_cmd_tbl_en_head *);
182 static int db_cmd_search(const char *, struct db_cmd_tbl_en_head *,
183 const struct db_command **);
184 static int db_cmd_search_table(const char *, const struct db_command *,
185 const struct db_command **);
186 static void db_cmd_search_failed(char *, int);
187 static const struct db_command *db_read_command(void);
188 static void db_command(const struct db_command **);
189 static void db_buf_print_cmd(db_expr_t, bool, db_expr_t, const char *);
190 static void db_event_print_cmd(db_expr_t, bool, db_expr_t, const char *);
191 static void db_fncall(db_expr_t, bool, db_expr_t, const char *);
192 static void db_help_print_cmd(db_expr_t, bool, db_expr_t, const char *);
193 static void db_lock_print_cmd(db_expr_t, bool, db_expr_t, const char *);
194 static void db_show_all_locks(db_expr_t, bool, db_expr_t, const char *);
195 static void db_show_lockstats(db_expr_t, bool, db_expr_t, const char *);
196 static void db_mount_print_cmd(db_expr_t, bool, db_expr_t, const char *);
197 static void db_mbuf_print_cmd(db_expr_t, bool, db_expr_t, const char *);
198 static void db_map_print_cmd(db_expr_t, bool, db_expr_t, const char *);
199 static void db_namecache_print_cmd(db_expr_t, bool, db_expr_t,
200 const char *);
201 static void db_object_print_cmd(db_expr_t, bool, db_expr_t, const char *);
202 static void db_page_print_cmd(db_expr_t, bool, db_expr_t, const char *);
203 static void db_show_all_pages(db_expr_t, bool, db_expr_t, const char *);
204 static void db_pool_print_cmd(db_expr_t, bool, db_expr_t, const char *);
205 static void db_reboot_cmd(db_expr_t, bool, db_expr_t, const char *);
206 static void db_sifting_cmd(db_expr_t, bool, db_expr_t, const char *);
207 static void db_socket_print_cmd(db_expr_t, bool, db_expr_t, const char *);
208 static void db_stack_trace_cmd(db_expr_t, bool, db_expr_t, const char *);
209 static void db_sync_cmd(db_expr_t, bool, db_expr_t, const char *);
210 static void db_whatis_cmd(db_expr_t, bool, db_expr_t, const char *);
211 static void db_uvmexp_print_cmd(db_expr_t, bool, db_expr_t, const char *);
212 #ifdef KERNHIST
213 static void db_kernhist_print_cmd(db_expr_t, bool, db_expr_t, const char *);
214 #endif
215 static void db_vnode_print_cmd(db_expr_t, bool, db_expr_t, const char *);
216 static void db_vnode_lock_print_cmd(db_expr_t, bool, db_expr_t,
217 const char *);
218 static void db_vmem_print_cmd(db_expr_t, bool, db_expr_t, const char *);
219
220 static const struct db_command db_show_cmds[] = {
221 /*added from all sub cmds*/
222 { DDB_ADD_CMD("callout", db_show_callout,
223 0 ,"List all used callout functions.",NULL,NULL) },
224 { DDB_ADD_CMD("pages", db_show_all_pages,
225 0 ,"List all used memory pages.",NULL,NULL) },
226 { DDB_ADD_CMD("proc", db_show_proc,
227 0 ,"Print process information.",NULL,NULL) },
228 { DDB_ADD_CMD("procs", db_show_all_procs,
229 0 ,"List all processes.",NULL,NULL) },
230 { DDB_ADD_CMD("pools", db_show_all_pools,
231 0 ,"Show all pools",NULL,NULL) },
232 { DDB_ADD_CMD("locks", db_show_all_locks,
233 0 ,"Show all held locks", "[/t]", NULL) },
234 #ifdef AIO
235 /*added from all sub cmds*/
236 { DDB_ADD_CMD("aio_jobs", db_show_aio_jobs, 0,
237 "Show aio jobs",NULL,NULL) },
238 #endif
239 { DDB_ADD_CMD("all", NULL,
240 CS_COMPAT, NULL,NULL,NULL) },
241 #if defined(INET)
242 { DDB_ADD_CMD("routes", db_show_routes, 0,NULL,NULL,NULL) },
243 #endif
244 #ifdef _KERNEL
245 { DDB_ADD_CMD("breaks", db_listbreak_cmd, 0,
246 "Display all breaks.",NULL,NULL) },
247 #endif
248 { DDB_ADD_CMD("buf", db_buf_print_cmd, 0,
249 "Print the struct buf at address.", "[/f] address",NULL) },
250 { DDB_ADD_CMD("devices", db_show_all_devices, 0,NULL,NULL,NULL) },
251 { DDB_ADD_CMD("event", db_event_print_cmd, 0,
252 "Print all the non-zero evcnt(9) event counters.", "[/fitm]",NULL) },
253 { DDB_ADD_CMD("files", db_show_files_cmd, 0,
254 "Print the files open by process at address",
255 "[/f] address", NULL) },
256 { DDB_ADD_CMD("lock", db_lock_print_cmd, 0,NULL,NULL,NULL) },
257 { DDB_ADD_CMD("lockstats",
258 db_show_lockstats, 0,
259 "Print statistics of locks", NULL, NULL) },
260 { DDB_ADD_CMD("map", db_map_print_cmd, 0,
261 "Print the vm_map at address.", "[/f] address",NULL) },
262 { DDB_ADD_CMD("socket", db_socket_print_cmd, 0,NULL,NULL,NULL) },
263 { DDB_ADD_CMD("module", db_show_module_cmd, 0,
264 "Print kernel modules", NULL, NULL) },
265 { DDB_ADD_CMD("mount", db_mount_print_cmd, 0,
266 "Print the mount structure at address.", "[/f] address",NULL) },
267 #ifdef MQUEUE
268 { DDB_ADD_CMD("mqueue", db_show_mqueue_cmd, 0,
269 "Print the message queues", NULL, NULL) },
270 #endif
271 { DDB_ADD_CMD("mbuf", db_mbuf_print_cmd, 0,NULL,NULL,
272 "-c prints all mbuf chains") },
273 { DDB_ADD_CMD("ncache", db_namecache_print_cmd, 0,
274 "Dump the namecache list.", "address",NULL) },
275 { DDB_ADD_CMD("object", db_object_print_cmd, 0,
276 "Print the vm_object at address.", "[/f] address",NULL) },
277 { DDB_ADD_CMD("page", db_page_print_cmd, 0,
278 "Print the vm_page at address.", "[/f] address",NULL) },
279 { DDB_ADD_CMD("panic", db_show_panic, 0,
280 "Print the current panic string",NULL,NULL) },
281 { DDB_ADD_CMD("pool", db_pool_print_cmd, 0,
282 "Print the pool at address.", "[/clp] address",NULL) },
283 { DDB_ADD_CMD("registers", db_show_regs, 0,
284 "Display the register set.", "[/u]",NULL) },
285 { DDB_ADD_CMD("sched_qs", db_show_sched_qs, 0,
286 "Print the state of the scheduler's run queues.",
287 NULL,NULL) },
288 { DDB_ADD_CMD("uvmexp", db_uvmexp_print_cmd, 0,
289 "Print a selection of UVM counters and statistics.",
290 NULL,NULL) },
291 #ifdef KERNHIST
292 { DDB_ADD_CMD("kernhist", db_kernhist_print_cmd, 0,
293 "Print the UVM history logs.",
294 NULL,NULL) },
295 #endif
296 { DDB_ADD_CMD("vnode", db_vnode_print_cmd, 0,
297 "Print the vnode at address.", "[/f] address",NULL) },
298 { DDB_ADD_CMD("vnode_lock", db_vnode_lock_print_cmd, 0,
299 "Print the vnode having that address as v_lock.",
300 "[/f] address",NULL) },
301 { DDB_ADD_CMD("vmem", db_vmem_print_cmd, 0,
302 "Print the vmem usage.", "[/a] address", NULL) },
303 { DDB_ADD_CMD("vmems", db_show_all_vmems, 0,
304 "Show all vmems.", NULL, NULL) },
305 #ifdef _KERNEL
306 { DDB_ADD_CMD("watches", db_listwatch_cmd, 0,
307 "Display all watchpoints.", NULL,NULL) },
308 #endif
309 { DDB_ADD_CMD(NULL, NULL, 0,NULL,NULL,NULL) }
310 };
311
312 static const struct db_command db_command_table[] = {
313 { DDB_ADD_CMD("b", db_breakpoint_cmd, 0,
314 "Set a breakpoint at address", "[/u] address[,count].",NULL) },
315 { DDB_ADD_CMD("break", db_breakpoint_cmd, 0,
316 "Set a breakpoint at address", "[/u] address[,count].",NULL) },
317 { DDB_ADD_CMD("bt", db_stack_trace_cmd, 0,
318 "Show backtrace.", "See help trace.",NULL) },
319 { DDB_ADD_CMD("c", db_continue_cmd, 0,
320 "Continue execution.", "[/c]",NULL) },
321 { DDB_ADD_CMD("call", db_fncall, CS_OWN,
322 "Call the function", "address[(expression[,...])]",NULL) },
323 { DDB_ADD_CMD("callout", db_show_callout, 0, NULL,
324 NULL,NULL ) },
325 { DDB_ADD_CMD("continue", db_continue_cmd, 0,
326 "Continue execution.", "[/c]",NULL) },
327 { DDB_ADD_CMD("d", db_delete_cmd, 0,
328 "Delete a breakpoint.", "address | #number",NULL) },
329 { DDB_ADD_CMD("delete", db_delete_cmd, 0,
330 "Delete a breakpoint.", "address | #number",NULL) },
331 { DDB_ADD_CMD("dmesg", db_dmesg, 0,
332 "Show kernel message buffer.", "[count]",NULL) },
333 { DDB_ADD_CMD("dwatch", db_deletewatch_cmd, 0,
334 "Delete the watchpoint.", "address",NULL) },
335 { DDB_ADD_CMD("examine", db_examine_cmd, CS_SET_DOT,
336 "Display the address locations.",
337 "[/modifier] address[,count]",NULL) },
338 { DDB_ADD_CMD("exit", db_continue_cmd, 0,
339 "Continue execution.", "[/c]",NULL) },
340 { DDB_ADD_CMD("help", db_help_print_cmd, CS_OWN|CS_NOREPEAT,
341 "Display help about commands",
342 "Use other commands as arguments.",NULL) },
343 { DDB_ADD_CMD("kill", db_kill_proc, CS_OWN,
344 "Send a signal to the process","pid[,signal_number]",
345 " pid:\t\t\tthe process id (may need 0t prefix for decimal)\n"
346 " signal_number:\tthe signal to send") },
347 #ifdef KGDB
348 { DDB_ADD_CMD("kgdb", db_kgdb_cmd, 0, NULL,NULL,NULL) },
349 #endif
350 { DDB_ADD_CMD("machine",NULL,CS_MACH,
351 "Architecture specific functions.",NULL,NULL) },
352 { DDB_ADD_CMD("match", db_trace_until_matching_cmd,0,
353 "Stop at the matching return instruction.","See help next",NULL) },
354 { DDB_ADD_CMD("next", db_trace_until_matching_cmd,0,
355 "Stop at the matching return instruction.","[/p]",NULL) },
356 { DDB_ADD_CMD("p", db_print_cmd, 0,
357 "Print address according to the format.",
358 "[/axzodurc] address [address ...]",NULL) },
359 { DDB_ADD_CMD("print", db_print_cmd, 0,
360 "Print address according to the format.",
361 "[/axzodurc] address [address ...]",NULL) },
362 { DDB_ADD_CMD("ps", db_show_all_procs, 0,
363 "Print all processes.","See show all procs",NULL) },
364 { DDB_ADD_CMD("quit", db_continue_cmd, 0,
365 "Continue execution.", "[/c]",NULL) },
366 { DDB_ADD_CMD("reboot", db_reboot_cmd, CS_OWN,
367 "Reboot","0x1 RB_ASKNAME, 0x2 RB_SINGLE, 0x4 RB_NOSYNC, 0x8 RB_HALT,"
368 "0x40 RB_KDB, 0x100 RB_DUMP, 0x808 RB_POWERDOWN",NULL) },
369 { DDB_ADD_CMD("s", db_single_step_cmd, 0,
370 "Single-step count times.","[/p] [,count]",NULL) },
371 { DDB_ADD_CMD("search", db_search_cmd, CS_OWN|CS_SET_DOT,
372 "Search memory from address for value.",
373 "[/bhl] address value [mask] [,count]",NULL) },
374 { DDB_ADD_CMD("set", db_set_cmd, CS_OWN,
375 "Set the named variable","$variable [=] expression",NULL) },
376 { DDB_ADD_CMD("show", NULL, CS_SHOW,
377 "Show kernel stats.", NULL,NULL) },
378 { DDB_ADD_CMD("sifting", db_sifting_cmd, CS_OWN,
379 "Search the symbol tables ","[/F] string",NULL) },
380 { DDB_ADD_CMD("step", db_single_step_cmd, 0,
381 "Single-step count times.","[/p] [,count]",NULL) },
382 { DDB_ADD_CMD("sync", db_sync_cmd, CS_OWN,
383 "Force a crash dump, and then reboot.",NULL,NULL) },
384 { DDB_ADD_CMD("trace", db_stack_trace_cmd, 0,
385 "Stack trace from frame-address.",
386 "[/u[l]] [frame-address][,count]",NULL) },
387 { DDB_ADD_CMD("until", db_trace_until_call_cmd,0,
388 "Stop at the next call or return instruction.","[/p]",NULL) },
389 { DDB_ADD_CMD("w", db_write_cmd, CS_MORE|CS_SET_DOT,
390 "Write the expressions at succeeding locations.",
391 "[/bhl] address expression [expression ...]",NULL) },
392 { DDB_ADD_CMD("watch", db_watchpoint_cmd, CS_MORE,
393 "Set a watchpoint for a region. ","address[,size]",NULL) },
394 { DDB_ADD_CMD("whatis", db_whatis_cmd, 0,
395 "Describe what an address is", "address", NULL) },
396 { DDB_ADD_CMD("write", db_write_cmd, CS_MORE|CS_SET_DOT,
397 "Write the expressions at succeeding locations.",
398 "[/bhl] address expression [expression ...]",NULL) },
399 { DDB_ADD_CMD("x", db_examine_cmd, CS_SET_DOT,
400 "Display the address locations.",
401 "[/modifier] address[,count]",NULL) },
402 { DDB_ADD_CMD(NULL, NULL, 0, NULL, NULL, NULL) }
403 };
404
405 static const struct db_command *db_last_command = NULL;
406 #if defined(DDB_COMMANDONENTER)
407 char db_cmd_on_enter[DB_LINE_MAXLEN + 1] = ___STRING(DDB_COMMANDONENTER);
408 #else /* defined(DDB_COMMANDONENTER) */
409 char db_cmd_on_enter[DB_LINE_MAXLEN + 1] = "";
410 #endif /* defined(DDB_COMMANDONENTER) */
411 #define DB_LINE_SEP ';'
412
413 /*
414 * Execute commandlist after ddb start
415 * This function goes through the command list created from commands and ';'
416 */
417 static void
418 db_execute_commandlist(const char *cmdlist)
419 {
420 const char *cmd = cmdlist;
421 const struct db_command *dummy = NULL;
422
423 while (*cmd != '\0') {
424 const char *ep = cmd;
425
426 while (*ep != '\0' && *ep != DB_LINE_SEP) {
427 ep++;
428 }
429 db_set_line(cmd, ep);
430 db_command(&dummy);
431 cmd = ep;
432 if (*cmd == DB_LINE_SEP) {
433 cmd++;
434 }
435 }
436 }
437
438 /* Initialize ddb command tables */
439 void
440 db_init_commands(void)
441 {
442 static bool done = false;
443
444 if (done) return;
445 done = true;
446
447 /* register command tables */
448 (void)db_register_tbl_entry(DDB_BASE_CMD, &db_base_cmd_builtins);
449 #ifdef DB_MACHINE_COMMANDS
450 (void)db_register_tbl_entry(DDB_MACH_CMD, &db_mach_cmd_builtins);
451 #endif
452 (void)db_register_tbl_entry(DDB_SHOW_CMD, &db_show_cmd_builtins);
453 }
454
455
456 /*
457 * Add command table to the specified list
458 * Arg:
459 * int type specifies type of command table DDB_SHOW_CMD|DDB_BASE_CMD|DDB_MAC_CMD
460 * *cmd_tbl poiter to static allocated db_command table
461 *
462 * Command table must be NULL terminated array of struct db_command
463 */
464 int
465 db_register_tbl(uint8_t type, const struct db_command *cmd_tbl)
466 {
467 struct db_cmd_tbl_en *list_ent;
468
469 /* empty list - ignore */
470 if (cmd_tbl->name == 0)
471 return 0;
472
473 /* force builtin commands to be registered first */
474 db_init_commands();
475
476 /* now create a list entry for this table */
477 list_ent = db_zalloc(sizeof(*list_ent));
478 if (list_ent == NULL)
479 return ENOMEM;
480 list_ent->db_cmd=cmd_tbl;
481
482 /* and register it */
483 return db_register_tbl_entry(type, list_ent);
484 }
485
486 static int
487 db_register_tbl_entry(uint8_t type, struct db_cmd_tbl_en *list_ent)
488 {
489 struct db_cmd_tbl_en_head *list;
490
491 switch(type) {
492 case DDB_BASE_CMD:
493 list = &db_base_cmd_list;
494 break;
495 case DDB_SHOW_CMD:
496 list = &db_show_cmd_list;
497 break;
498 case DDB_MACH_CMD:
499 list = &db_mach_cmd_list;
500 break;
501 default:
502 return ENOENT;
503 }
504
505 TAILQ_INSERT_TAIL(list, list_ent, db_cmd_next);
506
507 return 0;
508 }
509
510 /*
511 * Remove command table specified with db_cmd address == cmd_tbl
512 */
513 int
514 db_unregister_tbl(uint8_t type,const struct db_command *cmd_tbl)
515 {
516 struct db_cmd_tbl_en *list_ent;
517 struct db_cmd_tbl_en_head *list;
518
519 /* find list on which the entry should live */
520 switch (type) {
521 case DDB_BASE_CMD:
522 list=&db_base_cmd_list;
523 break;
524 case DDB_SHOW_CMD:
525 list=&db_show_cmd_list;
526 break;
527 case DDB_MACH_CMD:
528 list=&db_mach_cmd_list;
529 break;
530 default:
531 return EINVAL;
532 }
533
534 TAILQ_FOREACH (list_ent, list, db_cmd_next) {
535 if (list_ent->db_cmd == cmd_tbl){
536 TAILQ_REMOVE(list,
537 list_ent, db_cmd_next);
538 db_free(list_ent, sizeof(*list_ent));
539 return 0;
540 }
541 }
542 return ENOENT;
543 }
544
545 /* This function is called from machine trap code. */
546 void
547 db_command_loop(void)
548 {
549 label_t db_jmpbuf;
550 label_t *savejmp;
551
552 /*
553 * Initialize 'prev' and 'next' to dot.
554 */
555 db_prev = db_dot;
556 db_next = db_dot;
557
558 db_cmd_loop_done = false;
559
560 /* Init default command tables add machine, base,
561 show command tables to the list */
562 db_init_commands();
563
564 /* save context for return from ddb */
565 savejmp = db_recover;
566 db_recover = &db_jmpbuf;
567 (void) setjmp(&db_jmpbuf);
568
569 /*
570 * Execute default ddb start commands only if this is the
571 * first entry into DDB, in case the start commands fault
572 * and we recurse into here.
573 */
574 if (!savejmp)
575 db_execute_commandlist(db_cmd_on_enter);
576
577 (void) setjmp(&db_jmpbuf);
578 while (!db_cmd_loop_done) {
579 if (db_print_position() != 0)
580 db_printf("\n");
581 db_output_line = 0;
582 (void) db_read_line();
583 db_command(&db_last_command);
584 }
585
586 db_recover = savejmp;
587 }
588
589 /*
590 * Search command table for command prefix
591 */
592 static int
593 db_cmd_search_table(const char *name,
594 const struct db_command *table,
595 const struct db_command **cmdp)
596 {
597
598 const struct db_command *cmd;
599 int result;
600
601 result = CMD_NONE;
602 *cmdp = NULL;
603
604 for (cmd = table; cmd->name != 0; cmd++) {
605 const char *lp;
606 const char *rp;
607
608 lp = name;
609 rp = cmd->name;
610 while (*lp != '\0' && *lp == *rp) {
611 rp++;
612 lp++;
613 }
614
615 if (*lp != '\0') /* mismatch or extra chars in name */
616 continue;
617
618 if (*rp == '\0') { /* exact match */
619 *cmdp = cmd;
620 return (CMD_EXACT);
621 }
622
623 /* prefix match: end of name, not end of command */
624 if (result == CMD_NONE) {
625 result = CMD_PREFIX;
626 *cmdp = cmd;
627 }
628 else if (result == CMD_PREFIX) {
629 result = CMD_AMBIGUOUS;
630 *cmdp = NULL;
631 }
632 }
633
634 return (result);
635 }
636
637
638 /*
639 * Search list of command tables for command
640 */
641 static int
642 db_cmd_search(const char *name,
643 struct db_cmd_tbl_en_head *list_head,
644 const struct db_command **cmdp)
645 {
646 struct db_cmd_tbl_en *list_ent;
647 const struct db_command *found_command;
648 bool accept_prefix_match;
649 int result;
650
651 result = CMD_NONE;
652 found_command = NULL;
653 accept_prefix_match = true;
654
655 TAILQ_FOREACH(list_ent, list_head, db_cmd_next) {
656 const struct db_command *cmd;
657 int found;
658
659 found = db_cmd_search_table(name, list_ent->db_cmd, &cmd);
660 if (found == CMD_EXACT) {
661 result = CMD_EXACT;
662 found_command = cmd;
663 break;
664 }
665
666 if (found == CMD_PREFIX) {
667 if (accept_prefix_match) {
668 /*
669 * Continue search, but note current result
670 * in case we won't find anything else.
671 */
672 accept_prefix_match = false;
673 result = CMD_PREFIX;
674 found_command = cmd;
675 } else {
676 /*
677 * Watch out for globally ambiguous
678 * prefix match that is not locally
679 * ambiguous - with one match in one
680 * table and another match(es) in
681 * another table.
682 */
683 result = CMD_AMBIGUOUS;
684 found_command = NULL;
685 }
686 }
687 else if (found == CMD_AMBIGUOUS) {
688 accept_prefix_match = false;
689 result = CMD_AMBIGUOUS;
690 found_command = NULL;
691 }
692 }
693
694 *cmdp = found_command;
695 return result;
696 }
697
698 static void
699 db_cmd_search_failed(char *name, int search_result)
700 {
701 if (search_result == CMD_NONE)
702 db_printf("No such command: %s\n", name);
703 else
704 db_printf("Ambiguous command: %s\n", name);
705 }
706
707
708 /*
709 * List commands to the console.
710 */
711 static void
712 db_cmd_list(const struct db_cmd_tbl_en_head *list)
713 {
714
715 struct db_cmd_tbl_en *list_ent;
716 const struct db_command *table;
717 size_t i, j, w, columns, lines, numcmds, width=0;
718 const char *p;
719
720 TAILQ_FOREACH(list_ent,list,db_cmd_next) {
721 table = list_ent->db_cmd;
722 for (i = 0; table[i].name != NULL; i++) {
723 w = strlen(table[i].name);
724 if (w > width)
725 width = w;
726 }
727 }
728
729 width = DB_NEXT_TAB(width);
730
731 columns = db_max_width / width;
732 if (columns == 0)
733 columns = 1;
734
735 TAILQ_FOREACH(list_ent,list,db_cmd_next) {
736 table = list_ent->db_cmd;
737
738 for (numcmds = 0; table[numcmds].name != NULL; numcmds++)
739 ;
740 lines = (numcmds + columns - 1) / columns;
741
742 for (i = 0; i < lines; i++) {
743 for (j = 0; j < columns; j++) {
744 p = table[j * lines + i].name;
745 if (p)
746 db_printf("%s", p);
747 if (j * lines + i + lines >= numcmds) {
748 db_putchar('\n');
749 break;
750 }
751 if (p) {
752 w = strlen(p);
753 while (w < width) {
754 w = DB_NEXT_TAB(w);
755 db_putchar('\t');
756 }
757 }
758 }
759 }
760 }
761 return;
762 }
763
764 /*
765 * Read complete command with all subcommands, starting with current
766 * db_tok_string. If subcommand is missing, print the list of all
767 * subcommands. If command/subcommand is not found, print an error
768 * message. Returns pointer to "leaf" command or NULL.
769 */
770 static const struct db_command *
771 db_read_command(void)
772 {
773 const struct db_command *command;
774 struct db_cmd_tbl_en_head *list;
775 int found;
776 int t;
777
778 list = &db_base_cmd_list;
779 do {
780 found = db_cmd_search(db_tok_string, list, &command);
781 if (command == NULL) {
782 db_cmd_search_failed(db_tok_string, found);
783 db_flush_lex();
784 return NULL;
785 }
786
787 if (command->flag == CS_SHOW)
788 list = &db_show_cmd_list;
789 else if (command->flag == CS_MACH)
790 list = &db_mach_cmd_list;
791 else if (command->flag == CS_COMPAT)
792 /* same list */;
793 else
794 break; /* expect no more subcommands */
795
796 t = db_read_token(); /* read subcommand */
797 if (t != tIDENT) {
798 /* if none given - just print all of them */
799 db_cmd_list(list);
800 db_flush_lex();
801 return NULL;
802 }
803 } while (list != NULL);
804
805 return command;
806 }
807
808 /*
809 * Parse command line and execute apropriate function.
810 */
811 static void
812 db_command(const struct db_command **last_cmdp)
813 {
814 const struct db_command *command;
815 static db_expr_t last_count = 0;
816 db_expr_t addr, count;
817 char modif[TOK_STRING_SIZE];
818
819 int t;
820 bool have_addr = false;
821
822 command = NULL;
823
824 t = db_read_token();
825 if ((t == tEOL) || (t == tCOMMA)) {
826 /*
827 * An empty line repeats last command, at 'next'.
828 * Only a count repeats the last command with the new count.
829 */
830 command = *last_cmdp;
831
832 if (!command)
833 return;
834
835 addr = (db_expr_t)db_next;
836 if (t == tCOMMA) {
837 if (!db_expression(&count)) {
838 db_printf("Count missing\n");
839 db_flush_lex();
840 return;
841 }
842 } else
843 count = last_count;
844 have_addr = false;
845 modif[0] = '\0';
846 db_skip_to_eol();
847
848 } else if (t == tEXCL) {
849 db_fncall(0, 0, 0, NULL);
850 return;
851
852 } else if (t != tIDENT) {
853 db_printf("?\n");
854 db_flush_lex();
855 return;
856
857 } else {
858
859 command = db_read_command();
860 if (command == NULL)
861 return;
862
863 if ((command->flag & CS_OWN) == 0) {
864
865 /*
866 * Standard syntax:
867 * command [/modifier] [addr] [,count]
868 */
869 t = db_read_token(); /* get modifier */
870 if (t == tSLASH) {
871 t = db_read_token();
872 if (t != tIDENT) {
873 db_printf("Bad modifier\n");
874 db_flush_lex();
875 return;
876 }
877 /* save modifier */
878 strlcpy(modif, db_tok_string, sizeof(modif));
879
880 } else {
881 db_unread_token(t);
882 modif[0] = '\0';
883 }
884
885 if (db_expression(&addr)) { /*get address*/
886 db_dot = (db_addr_t) addr;
887 db_last_addr = db_dot;
888 have_addr = true;
889 } else {
890 addr = (db_expr_t) db_dot;
891 have_addr = false;
892 }
893
894 t = db_read_token();
895 if (t == tCOMMA) { /*Get count*/
896 if (!db_expression(&count)) {
897 db_printf("Count missing\n");
898 db_flush_lex();
899 return;
900 }
901 } else {
902 db_unread_token(t);
903 count = -1;
904 }
905 if ((command->flag & CS_MORE) == 0) {
906 db_skip_to_eol();
907 }
908 }
909 }
910
911 if (command != NULL && command->flag & CS_NOREPEAT) {
912 *last_cmdp = NULL;
913 last_count = 0;
914 } else {
915 *last_cmdp = command;
916 last_count = count;
917 }
918
919
920 if (command != NULL) {
921 /*
922 * Execute the command.
923 */
924 if (command->fcn != NULL)
925 (*command->fcn)(addr, have_addr, count, modif);
926
927 if (command->flag & CS_SET_DOT) {
928 /*
929 * If command changes dot, set dot to
930 * previous address displayed (if 'ed' style).
931 */
932 if (db_ed_style)
933 db_dot = db_prev;
934 else
935 db_dot = db_next;
936 } else {
937 /*
938 * If command does not change dot,
939 * set 'next' location to be the same.
940 */
941 db_next = db_dot;
942 }
943 }
944 }
945
946 /*
947 * Print help for commands
948 */
949 static void
950 db_help_print_cmd(db_expr_t addr, bool have_addr, db_expr_t count,
951 const char *modif)
952 {
953 const struct db_command *command;
954 int t;
955
956 t = db_read_token();
957
958 /* is there another command after the "help"? */
959 if (t != tIDENT) {
960 /* print base commands */
961 db_cmd_list(&db_base_cmd_list);
962 return;
963 }
964
965 command = db_read_command();
966 if (command == NULL)
967 return;
968
969 #ifdef DDB_VERBOSE_HELP
970 db_printf("Command: %s\n", command->name);
971 if (command->cmd_descr != NULL)
972 db_printf(" Description: %s\n", command->cmd_descr);
973 if (command->cmd_arg != NULL)
974 db_printf(" Arguments: %s\n", command->cmd_arg);
975 if (command->cmd_arg_help != NULL)
976 db_printf(" Arguments description:\n%s\n",
977 command->cmd_arg_help);
978 if ((command->cmd_arg == NULL) && (command->cmd_descr == NULL))
979 db_printf(" No help message.\n");
980 #endif
981
982 db_skip_to_eol();
983 }
984
985 /*ARGSUSED*/
986 static void
987 db_map_print_cmd(db_expr_t addr, bool have_addr, db_expr_t count,
988 const char *modif)
989 {
990 #ifdef _KERNEL
991 bool full = false;
992
993 if (modif[0] == 'f')
994 full = true;
995
996 if (have_addr == false)
997 addr = (db_expr_t)(uintptr_t)db_read_ptr("kernel_map");
998
999 uvm_map_printit((struct vm_map *)(uintptr_t) addr, full, db_printf);
1000 #endif /* XXX CRASH(8) */
1001 }
1002
1003 /*ARGSUSED*/
1004 static void
1005 db_object_print_cmd(db_expr_t addr, bool have_addr,
1006 db_expr_t count, const char *modif)
1007 {
1008 #ifdef _KERNEL /* XXX CRASH(8) */
1009 bool full = false;
1010
1011 if (modif[0] == 'f')
1012 full = true;
1013
1014 uvm_object_printit((struct uvm_object *)(uintptr_t) addr, full,
1015 db_printf);
1016 #endif
1017 }
1018
1019 /*ARGSUSED*/
1020 static void
1021 db_page_print_cmd(db_expr_t addr, bool have_addr,
1022 db_expr_t count, const char *modif)
1023 {
1024 #ifdef _KERNEL /* XXX CRASH(8) */
1025 bool full = false;
1026
1027 if (modif[0] == 'f')
1028 full = true;
1029
1030 uvm_page_printit((struct vm_page *)(uintptr_t) addr, full, db_printf);
1031 #endif
1032 }
1033
1034 /*ARGSUSED*/
1035 static void
1036 db_show_all_pages(db_expr_t addr, bool have_addr,
1037 db_expr_t count, const char *modif)
1038 {
1039
1040 #ifdef _KERNEL /* XXX CRASH(8) */
1041 uvm_page_printall(db_printf);
1042 #endif
1043 }
1044
1045 /*ARGSUSED*/
1046 static void
1047 db_buf_print_cmd(db_expr_t addr, bool have_addr,
1048 db_expr_t count, const char *modif)
1049 {
1050 #ifdef _KERNEL /* XXX CRASH(8) */
1051 bool full = false;
1052
1053 if (modif[0] == 'f')
1054 full = true;
1055
1056 vfs_buf_print((struct buf *)(uintptr_t) addr, full, db_printf);
1057 #endif
1058 }
1059
1060 /*ARGSUSED*/
1061 static void
1062 db_event_print_cmd(db_expr_t addr, bool have_addr,
1063 db_expr_t count, const char *modif)
1064 {
1065 bool showzero = false;
1066 bool showall = true;
1067 bool showintr = false;
1068 bool showtrap = false;
1069 bool showmisc = false;
1070 struct evcnt ev, *evp;
1071 char buf[80];
1072 int i;
1073
1074 i = 0;
1075 while (modif[i]) {
1076 switch (modif[i]) {
1077 case 'f':
1078 showzero = true;
1079 break;
1080 case 'i':
1081 showintr = true;
1082 showall = false;
1083 break;
1084 case 't':
1085 showtrap = true;
1086 showall = false;
1087 break;
1088 case 'm':
1089 showmisc = true;
1090 showall = false;
1091 break;
1092 }
1093 i++;
1094 }
1095
1096 if (showall)
1097 showmisc = showintr = showtrap = true;
1098
1099 evp = (struct evcnt *)db_read_ptr("allevents");
1100 while (evp != NULL) {
1101 db_read_bytes((db_addr_t)evp, sizeof(ev), (char *)&ev);
1102 evp = ev.ev_list.tqe_next;
1103 if (ev.ev_count == 0 && !showzero)
1104 continue;
1105 if (ev.ev_type == EVCNT_TYPE_INTR && !showintr)
1106 continue;
1107 if (ev.ev_type == EVCNT_TYPE_TRAP && !showtrap)
1108 continue;
1109 if (ev.ev_type == EVCNT_TYPE_MISC && !showmisc)
1110 continue;
1111 db_read_bytes((db_addr_t)ev.ev_group, ev.ev_grouplen + 1, buf);
1112 db_printf("evcnt type %d: %s ", ev.ev_type, buf);
1113 db_read_bytes((db_addr_t)ev.ev_name, ev.ev_namelen + 1, buf);
1114 db_printf("%s = %lld\n", buf, (long long)ev.ev_count);
1115 }
1116 }
1117
1118 /*ARGSUSED*/
1119 static void
1120 db_vnode_print_cmd(db_expr_t addr, bool have_addr,
1121 db_expr_t count, const char *modif)
1122 {
1123 #ifdef _KERNEL /* XXX CRASH(8) */
1124 bool full = false;
1125
1126 if (modif[0] == 'f')
1127 full = true;
1128
1129 vfs_vnode_print((struct vnode *)(uintptr_t) addr, full, db_printf);
1130 #endif
1131 }
1132
1133 /*ARGSUSED*/
1134 static void
1135 db_vnode_lock_print_cmd(db_expr_t addr, bool have_addr,
1136 db_expr_t count, const char *modif)
1137 {
1138 #ifdef _KERNEL /* XXX CRASH(8) */
1139 bool full = false;
1140
1141 if (modif[0] == 'f')
1142 full = true;
1143
1144 vfs_vnode_lock_print((struct vnode *)(uintptr_t) addr, full, db_printf);
1145 #endif
1146 }
1147
1148 /*ARGSUSED*/
1149 static void
1150 db_vmem_print_cmd(db_expr_t addr, bool have_addr,
1151 db_expr_t count, const char *modif)
1152 {
1153
1154 #ifdef _KERNEL /* XXX CRASH(8) */
1155 vmem_print((uintptr_t) addr, modif, db_printf);
1156 #endif
1157 }
1158
1159 static void
1160 db_mount_print_cmd(db_expr_t addr, bool have_addr,
1161 db_expr_t count, const char *modif)
1162 {
1163 #ifdef _KERNEL /* XXX CRASH(8) */
1164 bool full = false;
1165
1166 if (modif[0] == 'f')
1167 full = true;
1168
1169 vfs_mount_print((struct mount *)(uintptr_t) addr, full, db_printf);
1170 #endif
1171 }
1172
1173 /*ARGSUSED*/
1174 static void
1175 db_mbuf_print_cmd(db_expr_t addr, bool have_addr,
1176 db_expr_t count, const char *modif)
1177 {
1178
1179 #ifdef _KERNEL /* XXX CRASH(8) */
1180 m_print((const struct mbuf *)(uintptr_t) addr, modif, db_printf);
1181 #endif
1182 }
1183
1184 /*ARGSUSED*/
1185 static void
1186 db_pool_print_cmd(db_expr_t addr, bool have_addr,
1187 db_expr_t count, const char *modif)
1188 {
1189
1190 #ifdef _KERNEL /* XXX CRASH(8) */
1191 pool_printit((struct pool *)(uintptr_t) addr, modif, db_printf);
1192 #endif
1193 }
1194
1195 /*ARGSUSED*/
1196 static void
1197 db_namecache_print_cmd(db_expr_t addr, bool have_addr,
1198 db_expr_t count, const char *modif)
1199 {
1200
1201 #ifdef _KERNEL /* XXX CRASH(8) */
1202 namecache_print((struct vnode *)(uintptr_t) addr, db_printf);
1203 #endif
1204 }
1205
1206 /*ARGSUSED*/
1207 static void
1208 db_uvmexp_print_cmd(db_expr_t addr, bool have_addr,
1209 db_expr_t count, const char *modif)
1210 {
1211
1212 #ifdef _KERNEL /* XXX CRASH(8) */
1213 uvmexp_print(db_printf);
1214 #endif
1215 }
1216
1217 /*ARGSUSED */
1218 static void
1219 db_socket_print_cmd(db_expr_t addr, bool have_addr, db_expr_t count,
1220 const char *modif)
1221 {
1222
1223 #ifdef _KERNEL /* XXX CRASH(8) */
1224 socket_print(modif, db_printf);
1225 #endif
1226 }
1227
1228 #ifdef KERNHIST
1229 /*ARGSUSED*/
1230 static void
1231 db_kernhist_print_cmd(db_expr_t addr, bool have_addr,
1232 db_expr_t count, const char *modif)
1233 {
1234
1235 kernhist_print((void *)(uintptr_t)addr, count, modif, db_printf);
1236 }
1237 #endif
1238
1239 /*ARGSUSED*/
1240 static void
1241 db_lock_print_cmd(db_expr_t addr, bool have_addr,
1242 db_expr_t count, const char *modif)
1243 {
1244
1245 #ifdef _KERNEL /* XXX CRASH(8) */
1246 lockdebug_lock_print(have_addr ? (void *)(uintptr_t)addr : NULL,
1247 db_printf);
1248 #endif
1249 }
1250
1251 static void
1252 db_show_all_locks(db_expr_t addr, bool have_addr,
1253 db_expr_t count, const char *modif)
1254 {
1255
1256 #ifdef _KERNEL /* XXX CRASH(8) */
1257 lockdebug_show_all_locks(db_printf, modif);
1258 #endif
1259 }
1260
1261 static void
1262 db_show_lockstats(db_expr_t addr, bool have_addr,
1263 db_expr_t count, const char *modif)
1264 {
1265
1266 #ifdef _KERNEL /* XXX CRASH(8) */
1267 lockdebug_show_lockstats(db_printf);
1268 #endif
1269 }
1270
1271 /*
1272 * Call random function:
1273 * !expr(arg,arg,arg)
1274 */
1275 /*ARGSUSED*/
1276 static void
1277 db_fncall(db_expr_t addr, bool have_addr,
1278 db_expr_t count, const char *modif)
1279 {
1280 #ifdef _KERNEL
1281 db_expr_t fn_addr;
1282 #define MAXARGS 11
1283 db_expr_t args[MAXARGS];
1284 int nargs = 0;
1285 db_expr_t retval;
1286 db_expr_t (*func)(db_expr_t, ...);
1287 int t;
1288
1289 if (!db_expression(&fn_addr)) {
1290 db_printf("Bad function\n");
1291 db_flush_lex();
1292 return;
1293 }
1294 func = (db_expr_t (*)(db_expr_t, ...))(uintptr_t) fn_addr;
1295
1296 t = db_read_token();
1297 if (t == tLPAREN) {
1298 if (db_expression(&args[0])) {
1299 nargs++;
1300 while ((t = db_read_token()) == tCOMMA) {
1301 if (nargs == MAXARGS) {
1302 db_printf("Too many arguments\n");
1303 db_flush_lex();
1304 return;
1305 }
1306 if (!db_expression(&args[nargs])) {
1307 db_printf("Argument missing\n");
1308 db_flush_lex();
1309 return;
1310 }
1311 nargs++;
1312 }
1313 db_unread_token(t);
1314 }
1315 if (db_read_token() != tRPAREN) {
1316 db_printf("?\n");
1317 db_flush_lex();
1318 return;
1319 }
1320 }
1321 db_skip_to_eol();
1322
1323 while (nargs < MAXARGS) {
1324 args[nargs++] = 0;
1325 }
1326
1327 retval = (*func)(args[0], args[1], args[2], args[3], args[4],
1328 args[5], args[6], args[7], args[8], args[9]);
1329 db_printf("%s\n", db_num_to_str(retval));
1330 #else /* _KERNEL */
1331 db_printf("This command can only be used in-kernel.\n");
1332 #endif /* _KERNEL */
1333 }
1334
1335 static void
1336 db_reboot_cmd(db_expr_t addr, bool have_addr,
1337 db_expr_t count, const char *modif)
1338 {
1339 #ifdef _KERNEL
1340 db_expr_t bootflags;
1341
1342 /* Flags, default to RB_AUTOBOOT */
1343 if (!db_expression(&bootflags))
1344 bootflags = (db_expr_t)RB_AUTOBOOT;
1345 if (db_read_token() != tEOL) {
1346 db_error("?\n");
1347 /*NOTREACHED*/
1348 }
1349 /*
1350 * We are leaving DDB, never to return upward.
1351 * Clear db_recover so that we can debug faults in functions
1352 * called from cpu_reboot.
1353 */
1354 db_recover = 0;
1355 /* Avoid all mutex errors */
1356 lockdebug_dismiss();
1357 panicstr = "reboot forced via kernel debugger";
1358 /* Make it possible to break into the debugger again */
1359 spl0();
1360 cpu_reboot((int)bootflags, NULL);
1361 #else /* _KERNEL */
1362 db_printf("This command can only be used in-kernel.\n");
1363 #endif /* _KERNEL */
1364 }
1365
1366 static void
1367 db_sifting_cmd(db_expr_t addr, bool have_addr,
1368 db_expr_t count, const char *modif)
1369 {
1370 int mode, t;
1371
1372 t = db_read_token();
1373 if (t == tSLASH) {
1374 t = db_read_token();
1375 if (t != tIDENT) {
1376 bad_modifier:
1377 db_printf("Bad modifier\n");
1378 db_flush_lex();
1379 return;
1380 }
1381 if (!strcmp(db_tok_string, "F"))
1382 mode = 'F';
1383 else
1384 goto bad_modifier;
1385 t = db_read_token();
1386 } else
1387 mode = 0;
1388
1389 if (t == tIDENT)
1390 db_sifting(db_tok_string, mode);
1391 else {
1392 db_printf("Bad argument (non-string)\n");
1393 db_flush_lex();
1394 }
1395 }
1396
1397 static void
1398 db_stack_trace_cmd(db_expr_t addr, bool have_addr, db_expr_t count, const char *modif)
1399 {
1400 register const char *cp = modif;
1401 register char c;
1402 void (*pr)(const char *, ...);
1403
1404 pr = db_printf;
1405 while ((c = *cp++) != 0)
1406 if (c == 'l')
1407 pr = (void (*)(const char *, ...))printf;
1408
1409 if (count == -1)
1410 count = 65535;
1411
1412 db_stack_trace_print(addr, have_addr, count, modif, pr);
1413 }
1414
1415 static void
1416 db_sync_cmd(db_expr_t addr, bool have_addr,
1417 db_expr_t count, const char *modif)
1418 {
1419 #ifdef _KERNEL
1420 /*
1421 * We are leaving DDB, never to return upward.
1422 * Clear db_recover so that we can debug faults in functions
1423 * called from cpu_reboot.
1424 */
1425 db_recover = 0;
1426 panicstr = "dump forced via kernel debugger";
1427 cpu_reboot(RB_DUMP, NULL);
1428 #else /* _KERNEL */
1429 db_printf("This command can only be used in-kernel.\n");
1430 #endif /* _KERNEL */
1431 }
1432
1433 /*
1434 * Describe what an address is
1435 */
1436 void
1437 db_whatis_cmd(db_expr_t address, bool have_addr,
1438 db_expr_t count, const char *modif)
1439 {
1440 const uintptr_t addr = (uintptr_t)address;
1441
1442 db_lwp_whatis(addr, db_printf);
1443 #ifdef _KERNEL /* XXX CRASH(8) */
1444 pool_whatis(addr, db_printf);
1445 vmem_whatis(addr, db_printf);
1446 uvm_whatis(addr, db_printf);
1447 module_whatis(addr, db_printf);
1448 #endif
1449 }
1450