15b81b6b3SRodney W. Grimes /* 25b81b6b3SRodney W. Grimes * Mach Operating System 35b81b6b3SRodney W. Grimes * Copyright (c) 1991,1990 Carnegie Mellon University 45b81b6b3SRodney W. Grimes * All Rights Reserved. 55b81b6b3SRodney W. Grimes * 65b81b6b3SRodney W. Grimes * Permission to use, copy, modify and distribute this software and its 75b81b6b3SRodney W. Grimes * documentation is hereby granted, provided that both the copyright 85b81b6b3SRodney W. Grimes * notice and this permission notice appear in all copies of the 95b81b6b3SRodney W. Grimes * software, derivative works or modified versions, and any portions 105b81b6b3SRodney W. Grimes * thereof, and that both notices appear in supporting documentation. 115b81b6b3SRodney W. Grimes * 125b81b6b3SRodney W. Grimes * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS 135b81b6b3SRodney W. Grimes * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR 145b81b6b3SRodney W. Grimes * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. 155b81b6b3SRodney W. Grimes * 165b81b6b3SRodney W. Grimes * Carnegie Mellon requests users of this software to return to 175b81b6b3SRodney W. Grimes * 185b81b6b3SRodney W. Grimes * Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU 195b81b6b3SRodney W. Grimes * School of Computer Science 205b81b6b3SRodney W. Grimes * Carnegie Mellon University 215b81b6b3SRodney W. Grimes * Pittsburgh PA 15213-3890 225b81b6b3SRodney W. Grimes * 235b81b6b3SRodney W. Grimes * any improvements or extensions that they make and grant Carnegie the 245b81b6b3SRodney W. Grimes * rights to redistribute these changes. 250edf66ecSRodney W. Grimes * 26f73a856dSPoul-Henning Kamp * $Id: db_run.c,v 1.6 1995/11/24 14:13:40 bde Exp $ 275b81b6b3SRodney W. Grimes */ 280edf66ecSRodney W. Grimes 295b81b6b3SRodney W. Grimes /* 305b81b6b3SRodney W. Grimes * Author: David B. Golub, Carnegie Mellon University 315b81b6b3SRodney W. Grimes * Date: 7/90 325b81b6b3SRodney W. Grimes */ 335b81b6b3SRodney W. Grimes 345b81b6b3SRodney W. Grimes /* 355b81b6b3SRodney W. Grimes * Commands to run process. 365b81b6b3SRodney W. Grimes */ 37f540b106SGarrett Wollman #include <sys/param.h> 38f540b106SGarrett Wollman #include <sys/systm.h> 39f540b106SGarrett Wollman #include <sys/proc.h> 40f540b106SGarrett Wollman #include <ddb/ddb.h> 415b81b6b3SRodney W. Grimes 425b81b6b3SRodney W. Grimes #include <ddb/db_lex.h> 435b81b6b3SRodney W. Grimes #include <ddb/db_break.h> 445b81b6b3SRodney W. Grimes #include <ddb/db_access.h> 455b81b6b3SRodney W. Grimes 465b81b6b3SRodney W. Grimes int db_run_mode; 475b81b6b3SRodney W. Grimes #define STEP_NONE 0 485b81b6b3SRodney W. Grimes #define STEP_ONCE 1 495b81b6b3SRodney W. Grimes #define STEP_RETURN 2 505b81b6b3SRodney W. Grimes #define STEP_CALLT 3 515b81b6b3SRodney W. Grimes #define STEP_CONTINUE 4 525b81b6b3SRodney W. Grimes #define STEP_INVISIBLE 5 535b81b6b3SRodney W. Grimes #define STEP_COUNT 6 545b81b6b3SRodney W. Grimes 555b81b6b3SRodney W. Grimes boolean_t db_sstep_print; 565b81b6b3SRodney W. Grimes int db_loop_count; 575b81b6b3SRodney W. Grimes int db_call_depth; 585b81b6b3SRodney W. Grimes 595b81b6b3SRodney W. Grimes int db_inst_count; 605b81b6b3SRodney W. Grimes int db_load_count; 615b81b6b3SRodney W. Grimes int db_store_count; 625b81b6b3SRodney W. Grimes 635b81b6b3SRodney W. Grimes #ifndef db_set_single_step 64058284fcSBruce Evans extern void db_set_single_step __P((db_regs_t *regs); 655b81b6b3SRodney W. Grimes #endif 665b81b6b3SRodney W. Grimes #ifndef db_clear_single_step 67058284fcSBruce Evans extern void db_clear_single_step __P((db_regs_t *regs)); 685b81b6b3SRodney W. Grimes #endif 695b81b6b3SRodney W. Grimes 70f73a856dSPoul-Henning Kamp #ifdef notused 71f73a856dSPoul-Henning Kamp static void db_single_step __P((db_regs_t *regs)); 72f73a856dSPoul-Henning Kamp #endif 73f73a856dSPoul-Henning Kamp 745b81b6b3SRodney W. Grimes boolean_t 755b81b6b3SRodney W. Grimes db_stop_at_pc(is_breakpoint) 765b81b6b3SRodney W. Grimes boolean_t *is_breakpoint; 775b81b6b3SRodney W. Grimes { 785b81b6b3SRodney W. Grimes register db_addr_t pc; 795b81b6b3SRodney W. Grimes register db_breakpoint_t bkpt; 805b81b6b3SRodney W. Grimes 815b81b6b3SRodney W. Grimes db_clear_single_step(DDB_REGS); 825b81b6b3SRodney W. Grimes db_clear_breakpoints(); 835b81b6b3SRodney W. Grimes db_clear_watchpoints(); 845b81b6b3SRodney W. Grimes pc = PC_REGS(DDB_REGS); 855b81b6b3SRodney W. Grimes 865b81b6b3SRodney W. Grimes #ifdef FIXUP_PC_AFTER_BREAK 875b81b6b3SRodney W. Grimes if (*is_breakpoint) { 885b81b6b3SRodney W. Grimes /* 895b81b6b3SRodney W. Grimes * Breakpoint trap. Fix up the PC if the 905b81b6b3SRodney W. Grimes * machine requires it. 915b81b6b3SRodney W. Grimes */ 925b81b6b3SRodney W. Grimes FIXUP_PC_AFTER_BREAK 935b81b6b3SRodney W. Grimes pc = PC_REGS(DDB_REGS); 945b81b6b3SRodney W. Grimes } 955b81b6b3SRodney W. Grimes #endif 965b81b6b3SRodney W. Grimes 975b81b6b3SRodney W. Grimes /* 985b81b6b3SRodney W. Grimes * Now check for a breakpoint at this address. 995b81b6b3SRodney W. Grimes */ 1005b81b6b3SRodney W. Grimes bkpt = db_find_breakpoint_here(pc); 1015b81b6b3SRodney W. Grimes if (bkpt) { 1025b81b6b3SRodney W. Grimes if (--bkpt->count == 0) { 1035b81b6b3SRodney W. Grimes bkpt->count = bkpt->init_count; 1045b81b6b3SRodney W. Grimes *is_breakpoint = TRUE; 1055b81b6b3SRodney W. Grimes return (TRUE); /* stop here */ 1065b81b6b3SRodney W. Grimes } 1075b81b6b3SRodney W. Grimes } else if (*is_breakpoint) { 1085b81b6b3SRodney W. Grimes ddb_regs.tf_eip += 1; 1095b81b6b3SRodney W. Grimes } 1105b81b6b3SRodney W. Grimes 1115b81b6b3SRodney W. Grimes *is_breakpoint = FALSE; 1125b81b6b3SRodney W. Grimes 1135b81b6b3SRodney W. Grimes if (db_run_mode == STEP_INVISIBLE) { 1145b81b6b3SRodney W. Grimes db_run_mode = STEP_CONTINUE; 1155b81b6b3SRodney W. Grimes return (FALSE); /* continue */ 1165b81b6b3SRodney W. Grimes } 1175b81b6b3SRodney W. Grimes if (db_run_mode == STEP_COUNT) { 1185b81b6b3SRodney W. Grimes return (FALSE); /* continue */ 1195b81b6b3SRodney W. Grimes } 1205b81b6b3SRodney W. Grimes if (db_run_mode == STEP_ONCE) { 1215b81b6b3SRodney W. Grimes if (--db_loop_count > 0) { 1225b81b6b3SRodney W. Grimes if (db_sstep_print) { 1235b81b6b3SRodney W. Grimes db_printf("\t\t"); 1245b81b6b3SRodney W. Grimes db_print_loc_and_inst(pc); 1255b81b6b3SRodney W. Grimes db_printf("\n"); 1265b81b6b3SRodney W. Grimes } 1275b81b6b3SRodney W. Grimes return (FALSE); /* continue */ 1285b81b6b3SRodney W. Grimes } 1295b81b6b3SRodney W. Grimes } 1305b81b6b3SRodney W. Grimes if (db_run_mode == STEP_RETURN) { 1315b81b6b3SRodney W. Grimes db_expr_t ins = db_get_value(pc, sizeof(int), FALSE); 1325b81b6b3SRodney W. Grimes 1335b81b6b3SRodney W. Grimes /* continue until matching return */ 1345b81b6b3SRodney W. Grimes 1355b81b6b3SRodney W. Grimes if (!inst_trap_return(ins) && 1365b81b6b3SRodney W. Grimes (!inst_return(ins) || --db_call_depth != 0)) { 1375b81b6b3SRodney W. Grimes if (db_sstep_print) { 1385b81b6b3SRodney W. Grimes if (inst_call(ins) || inst_return(ins)) { 1395b81b6b3SRodney W. Grimes register int i; 1405b81b6b3SRodney W. Grimes 1415b81b6b3SRodney W. Grimes db_printf("[after %6d] ", db_inst_count); 1425b81b6b3SRodney W. Grimes for (i = db_call_depth; --i > 0; ) 1435b81b6b3SRodney W. Grimes db_printf(" "); 1445b81b6b3SRodney W. Grimes db_print_loc_and_inst(pc); 1455b81b6b3SRodney W. Grimes db_printf("\n"); 1465b81b6b3SRodney W. Grimes } 1475b81b6b3SRodney W. Grimes } 1485b81b6b3SRodney W. Grimes if (inst_call(ins)) 1495b81b6b3SRodney W. Grimes db_call_depth++; 1505b81b6b3SRodney W. Grimes return (FALSE); /* continue */ 1515b81b6b3SRodney W. Grimes } 1525b81b6b3SRodney W. Grimes } 1535b81b6b3SRodney W. Grimes if (db_run_mode == STEP_CALLT) { 1545b81b6b3SRodney W. Grimes db_expr_t ins = db_get_value(pc, sizeof(int), FALSE); 1555b81b6b3SRodney W. Grimes 1565b81b6b3SRodney W. Grimes /* continue until call or return */ 1575b81b6b3SRodney W. Grimes 1585b81b6b3SRodney W. Grimes if (!inst_call(ins) && 1595b81b6b3SRodney W. Grimes !inst_return(ins) && 1605b81b6b3SRodney W. Grimes !inst_trap_return(ins)) { 1615b81b6b3SRodney W. Grimes return (FALSE); /* continue */ 1625b81b6b3SRodney W. Grimes } 1635b81b6b3SRodney W. Grimes } 1645b81b6b3SRodney W. Grimes db_run_mode = STEP_NONE; 1655b81b6b3SRodney W. Grimes return (TRUE); 1665b81b6b3SRodney W. Grimes } 1675b81b6b3SRodney W. Grimes 1685b81b6b3SRodney W. Grimes void 1695b81b6b3SRodney W. Grimes db_restart_at_pc(watchpt) 1705b81b6b3SRodney W. Grimes boolean_t watchpt; 1715b81b6b3SRodney W. Grimes { 1725b81b6b3SRodney W. Grimes register db_addr_t pc = PC_REGS(DDB_REGS); 1735b81b6b3SRodney W. Grimes 1745b81b6b3SRodney W. Grimes if ((db_run_mode == STEP_COUNT) || 1755b81b6b3SRodney W. Grimes (db_run_mode == STEP_RETURN) || 1765b81b6b3SRodney W. Grimes (db_run_mode == STEP_CALLT)) { 1775b81b6b3SRodney W. Grimes db_expr_t ins; 1785b81b6b3SRodney W. Grimes 1795b81b6b3SRodney W. Grimes /* 1805b81b6b3SRodney W. Grimes * We are about to execute this instruction, 1815b81b6b3SRodney W. Grimes * so count it now. 1825b81b6b3SRodney W. Grimes */ 1835b81b6b3SRodney W. Grimes 1845b81b6b3SRodney W. Grimes ins = db_get_value(pc, sizeof(int), FALSE); 1855b81b6b3SRodney W. Grimes db_inst_count++; 1865b81b6b3SRodney W. Grimes db_load_count += inst_load(ins); 1875b81b6b3SRodney W. Grimes db_store_count += inst_store(ins); 1885b81b6b3SRodney W. Grimes #ifdef SOFTWARE_SSTEP 1895b81b6b3SRodney W. Grimes /* XXX works on mips, but... */ 1905b81b6b3SRodney W. Grimes if (inst_branch(ins) || inst_call(ins)) { 1915b81b6b3SRodney W. Grimes ins = db_get_value(next_instr_address(pc,1), 1925b81b6b3SRodney W. Grimes sizeof(int), FALSE); 1935b81b6b3SRodney W. Grimes db_inst_count++; 1945b81b6b3SRodney W. Grimes db_load_count += inst_load(ins); 1955b81b6b3SRodney W. Grimes db_store_count += inst_store(ins); 1965b81b6b3SRodney W. Grimes } 1975b81b6b3SRodney W. Grimes #endif SOFTWARE_SSTEP 1985b81b6b3SRodney W. Grimes } 1995b81b6b3SRodney W. Grimes 2005b81b6b3SRodney W. Grimes if (db_run_mode == STEP_CONTINUE) { 2015b81b6b3SRodney W. Grimes if (watchpt || db_find_breakpoint_here(pc)) { 2025b81b6b3SRodney W. Grimes /* 2035b81b6b3SRodney W. Grimes * Step over breakpoint/watchpoint. 2045b81b6b3SRodney W. Grimes */ 2055b81b6b3SRodney W. Grimes db_run_mode = STEP_INVISIBLE; 2065b81b6b3SRodney W. Grimes db_set_single_step(DDB_REGS); 2075b81b6b3SRodney W. Grimes } else { 2085b81b6b3SRodney W. Grimes db_set_breakpoints(); 2095b81b6b3SRodney W. Grimes db_set_watchpoints(); 2105b81b6b3SRodney W. Grimes } 2115b81b6b3SRodney W. Grimes } else { 2125b81b6b3SRodney W. Grimes db_set_single_step(DDB_REGS); 2135b81b6b3SRodney W. Grimes } 2145b81b6b3SRodney W. Grimes } 2155b81b6b3SRodney W. Grimes 216f73a856dSPoul-Henning Kamp #ifdef notused 217f73a856dSPoul-Henning Kamp static void 2185b81b6b3SRodney W. Grimes db_single_step(regs) 2195b81b6b3SRodney W. Grimes db_regs_t *regs; 2205b81b6b3SRodney W. Grimes { 2215b81b6b3SRodney W. Grimes if (db_run_mode == STEP_CONTINUE) { 2225b81b6b3SRodney W. Grimes db_run_mode = STEP_INVISIBLE; 2235b81b6b3SRodney W. Grimes db_set_single_step(regs); 2245b81b6b3SRodney W. Grimes } 2255b81b6b3SRodney W. Grimes } 226f73a856dSPoul-Henning Kamp #endif 2275b81b6b3SRodney W. Grimes 2285b81b6b3SRodney W. Grimes #ifdef SOFTWARE_SSTEP 2295b81b6b3SRodney W. Grimes /* 2305b81b6b3SRodney W. Grimes * Software implementation of single-stepping. 2315b81b6b3SRodney W. Grimes * If your machine does not have a trace mode 2325b81b6b3SRodney W. Grimes * similar to the vax or sun ones you can use 2335b81b6b3SRodney W. Grimes * this implementation, done for the mips. 2345b81b6b3SRodney W. Grimes * Just define the above conditional and provide 2355b81b6b3SRodney W. Grimes * the functions/macros defined below. 2365b81b6b3SRodney W. Grimes * 2375b81b6b3SRodney W. Grimes * extern boolean_t 2385b81b6b3SRodney W. Grimes * inst_branch(), returns true if the instruction might branch 2395b81b6b3SRodney W. Grimes * extern unsigned 2405b81b6b3SRodney W. Grimes * branch_taken(), return the address the instruction might 2415b81b6b3SRodney W. Grimes * branch to 2425b81b6b3SRodney W. Grimes * db_getreg_val(); return the value of a user register, 2435b81b6b3SRodney W. Grimes * as indicated in the hardware instruction 2445b81b6b3SRodney W. Grimes * encoding, e.g. 8 for r8 2455b81b6b3SRodney W. Grimes * 2465b81b6b3SRodney W. Grimes * next_instr_address(pc,bd) returns the address of the first 2475b81b6b3SRodney W. Grimes * instruction following the one at "pc", 2485b81b6b3SRodney W. Grimes * which is either in the taken path of 2495b81b6b3SRodney W. Grimes * the branch (bd==1) or not. This is 2505b81b6b3SRodney W. Grimes * for machines (mips) with branch delays. 2515b81b6b3SRodney W. Grimes * 2525b81b6b3SRodney W. Grimes * A single-step may involve at most 2 breakpoints - 2535b81b6b3SRodney W. Grimes * one for branch-not-taken and one for branch taken. 2545b81b6b3SRodney W. Grimes * If one of these addresses does not already have a breakpoint, 2555b81b6b3SRodney W. Grimes * we allocate a breakpoint and save it here. 2565b81b6b3SRodney W. Grimes * These breakpoints are deleted on return. 2575b81b6b3SRodney W. Grimes */ 2585b81b6b3SRodney W. Grimes db_breakpoint_t db_not_taken_bkpt = 0; 2595b81b6b3SRodney W. Grimes db_breakpoint_t db_taken_bkpt = 0; 2605b81b6b3SRodney W. Grimes 2615b81b6b3SRodney W. Grimes void 2625b81b6b3SRodney W. Grimes db_set_single_step(regs) 2635b81b6b3SRodney W. Grimes register db_regs_t *regs; 2645b81b6b3SRodney W. Grimes { 2655b81b6b3SRodney W. Grimes db_addr_t pc = PC_REGS(regs); 2665b81b6b3SRodney W. Grimes register unsigned inst, brpc; 2675b81b6b3SRodney W. Grimes 2685b81b6b3SRodney W. Grimes /* 2695b81b6b3SRodney W. Grimes * User was stopped at pc, e.g. the instruction 2705b81b6b3SRodney W. Grimes * at pc was not executed. 2715b81b6b3SRodney W. Grimes */ 2725b81b6b3SRodney W. Grimes inst = db_get_value(pc, sizeof(int), FALSE); 2735b81b6b3SRodney W. Grimes if (inst_branch(inst) || inst_call(inst)) { 2745b81b6b3SRodney W. Grimes extern unsigned getreg_val(); 2755b81b6b3SRodney W. Grimes 2765b81b6b3SRodney W. Grimes brpc = branch_taken(inst, pc, getreg_val, regs); 2775b81b6b3SRodney W. Grimes if (brpc != pc) { /* self-branches are hopeless */ 2785b81b6b3SRodney W. Grimes db_taken_bkpt = db_set_temp_breakpoint(brpc); 2795b81b6b3SRodney W. Grimes } 2805b81b6b3SRodney W. Grimes pc = next_instr_address(pc,1); 2815b81b6b3SRodney W. Grimes } 2825b81b6b3SRodney W. Grimes pc = next_instr_address(pc,0); 2835b81b6b3SRodney W. Grimes db_not_taken_bkpt = db_set_temp_breakpoint(pc); 2845b81b6b3SRodney W. Grimes } 2855b81b6b3SRodney W. Grimes 2865b81b6b3SRodney W. Grimes void 2875b81b6b3SRodney W. Grimes db_clear_single_step(regs) 2885b81b6b3SRodney W. Grimes db_regs_t *regs; 2895b81b6b3SRodney W. Grimes { 2905b81b6b3SRodney W. Grimes register db_breakpoint_t bkpt; 2915b81b6b3SRodney W. Grimes 2925b81b6b3SRodney W. Grimes if (db_taken_bkpt != 0) { 2935b81b6b3SRodney W. Grimes db_delete_temp_breakpoint(db_taken_bkpt); 2945b81b6b3SRodney W. Grimes db_taken_bkpt = 0; 2955b81b6b3SRodney W. Grimes } 2965b81b6b3SRodney W. Grimes if (db_not_taken_bkpt != 0) { 2975b81b6b3SRodney W. Grimes db_delete_temp_breakpoint(db_not_taken_bkpt); 2985b81b6b3SRodney W. Grimes db_not_taken_bkpt = 0; 2995b81b6b3SRodney W. Grimes } 3005b81b6b3SRodney W. Grimes } 3015b81b6b3SRodney W. Grimes 3025b81b6b3SRodney W. Grimes #endif SOFTWARE_SSTEP 3035b81b6b3SRodney W. Grimes 3045b81b6b3SRodney W. Grimes extern int db_cmd_loop_done; 3055b81b6b3SRodney W. Grimes 3065b81b6b3SRodney W. Grimes /* single-step */ 3075b81b6b3SRodney W. Grimes /*ARGSUSED*/ 3085b81b6b3SRodney W. Grimes void 3095b81b6b3SRodney W. Grimes db_single_step_cmd(addr, have_addr, count, modif) 3105b81b6b3SRodney W. Grimes db_expr_t addr; 311058284fcSBruce Evans boolean_t have_addr; 3125b81b6b3SRodney W. Grimes db_expr_t count; 3135b81b6b3SRodney W. Grimes char * modif; 3145b81b6b3SRodney W. Grimes { 3155b81b6b3SRodney W. Grimes boolean_t print = FALSE; 3165b81b6b3SRodney W. Grimes 3175b81b6b3SRodney W. Grimes if (count == -1) 3185b81b6b3SRodney W. Grimes count = 1; 3195b81b6b3SRodney W. Grimes 3205b81b6b3SRodney W. Grimes if (modif[0] == 'p') 3215b81b6b3SRodney W. Grimes print = TRUE; 3225b81b6b3SRodney W. Grimes 3235b81b6b3SRodney W. Grimes db_run_mode = STEP_ONCE; 3245b81b6b3SRodney W. Grimes db_loop_count = count; 3255b81b6b3SRodney W. Grimes db_sstep_print = print; 3265b81b6b3SRodney W. Grimes db_inst_count = 0; 3275b81b6b3SRodney W. Grimes db_load_count = 0; 3285b81b6b3SRodney W. Grimes db_store_count = 0; 3295b81b6b3SRodney W. Grimes 3305b81b6b3SRodney W. Grimes db_cmd_loop_done = 1; 3315b81b6b3SRodney W. Grimes } 3325b81b6b3SRodney W. Grimes 3335b81b6b3SRodney W. Grimes /* trace and print until call/return */ 3345b81b6b3SRodney W. Grimes /*ARGSUSED*/ 3355b81b6b3SRodney W. Grimes void 3365b81b6b3SRodney W. Grimes db_trace_until_call_cmd(addr, have_addr, count, modif) 3375b81b6b3SRodney W. Grimes db_expr_t addr; 338058284fcSBruce Evans boolean_t have_addr; 3395b81b6b3SRodney W. Grimes db_expr_t count; 3405b81b6b3SRodney W. Grimes char * modif; 3415b81b6b3SRodney W. Grimes { 3425b81b6b3SRodney W. Grimes boolean_t print = FALSE; 3435b81b6b3SRodney W. Grimes 3445b81b6b3SRodney W. Grimes if (modif[0] == 'p') 3455b81b6b3SRodney W. Grimes print = TRUE; 3465b81b6b3SRodney W. Grimes 3475b81b6b3SRodney W. Grimes db_run_mode = STEP_CALLT; 3485b81b6b3SRodney W. Grimes db_sstep_print = print; 3495b81b6b3SRodney W. Grimes db_inst_count = 0; 3505b81b6b3SRodney W. Grimes db_load_count = 0; 3515b81b6b3SRodney W. Grimes db_store_count = 0; 3525b81b6b3SRodney W. Grimes 3535b81b6b3SRodney W. Grimes db_cmd_loop_done = 1; 3545b81b6b3SRodney W. Grimes } 3555b81b6b3SRodney W. Grimes 3565b81b6b3SRodney W. Grimes /*ARGSUSED*/ 3575b81b6b3SRodney W. Grimes void 3585b81b6b3SRodney W. Grimes db_trace_until_matching_cmd(addr, have_addr, count, modif) 3595b81b6b3SRodney W. Grimes db_expr_t addr; 360058284fcSBruce Evans boolean_t have_addr; 3615b81b6b3SRodney W. Grimes db_expr_t count; 3625b81b6b3SRodney W. Grimes char * modif; 3635b81b6b3SRodney W. Grimes { 3645b81b6b3SRodney W. Grimes boolean_t print = FALSE; 3655b81b6b3SRodney W. Grimes 3665b81b6b3SRodney W. Grimes if (modif[0] == 'p') 3675b81b6b3SRodney W. Grimes print = TRUE; 3685b81b6b3SRodney W. Grimes 3695b81b6b3SRodney W. Grimes db_run_mode = STEP_RETURN; 3705b81b6b3SRodney W. Grimes db_call_depth = 1; 3715b81b6b3SRodney W. Grimes db_sstep_print = print; 3725b81b6b3SRodney W. Grimes db_inst_count = 0; 3735b81b6b3SRodney W. Grimes db_load_count = 0; 3745b81b6b3SRodney W. Grimes db_store_count = 0; 3755b81b6b3SRodney W. Grimes 3765b81b6b3SRodney W. Grimes db_cmd_loop_done = 1; 3775b81b6b3SRodney W. Grimes } 3785b81b6b3SRodney W. Grimes 3795b81b6b3SRodney W. Grimes /* continue */ 3805b81b6b3SRodney W. Grimes /*ARGSUSED*/ 3815b81b6b3SRodney W. Grimes void 3825b81b6b3SRodney W. Grimes db_continue_cmd(addr, have_addr, count, modif) 3835b81b6b3SRodney W. Grimes db_expr_t addr; 384058284fcSBruce Evans boolean_t have_addr; 3855b81b6b3SRodney W. Grimes db_expr_t count; 3865b81b6b3SRodney W. Grimes char * modif; 3875b81b6b3SRodney W. Grimes { 3885b81b6b3SRodney W. Grimes if (modif[0] == 'c') 3895b81b6b3SRodney W. Grimes db_run_mode = STEP_COUNT; 3905b81b6b3SRodney W. Grimes else 3915b81b6b3SRodney W. Grimes db_run_mode = STEP_CONTINUE; 3925b81b6b3SRodney W. Grimes db_inst_count = 0; 3935b81b6b3SRodney W. Grimes db_load_count = 0; 3945b81b6b3SRodney W. Grimes db_store_count = 0; 3955b81b6b3SRodney W. Grimes 3965b81b6b3SRodney W. Grimes db_cmd_loop_done = 1; 3975b81b6b3SRodney W. Grimes } 398