/** * TrueReality - debug.c * Copyright (C) 1998, 1999 Niki W. Waibel * * This program is free software; you can redistribute it and/ * or modify it under the terms of the GNU General Public Li- * cence as published by the Free Software Foundation; either * version 2 of the Licence, or any later version. * * This program is distributed in the hope that it will be use- * ful, but WITHOUT ANY WARRANTY; without even the implied war- * ranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. * See the GNU General Public Licence for more details. * * You should have received a copy of the GNU General Public * Licence along with this program; if not, write to the Free * Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, * USA. * * Information about me (the author): * Niki W. Waibel, Reichenau 20, 6890 Lustenau, Austria - EUROPE * niki.waibel@gmx.net **/ #include #include #include #include #include #include #include #include "N64/memory.h" #include "N64/mnemonic.h" #include "N64/registers.h" #include "N64/rsp_registers.h" #include "N64/rsp.h" #include "N64/cpu.h" #include "file_loader.h" #include #ifdef READLINE #include #include #endif static WORD breakp[256]; static char * get_line(char *prompt); static void n64_rsp_debugger_switch(char line[]); static void n64_rsp_debugger_files(); /* get_line: This routine supports readline if defined. You need the readline and ncurses library! After using this routine the last time you've to free the mem! */ static char *get_line(char *prompt) { static char *line = NULL; if(line) { free(line); line = NULL; } #ifndef READLINE printf("%s", prompt); line = (char *)malloc(82); fgets(line, 80, stdin); #else line = readline(prompt); if(line && *line) add_history(line); #endif return(line); } /* static char *get_line(char *prompt, char *line) */ void n64_cpu_debugger() { char *line; int i, j, n; WORD addr; HWORD hword; WORD word; DWORD dword; breakp[0] = 0; do { line = get_line("TR-debug> "); switch(line[0]) { case 'j': if(sscanf(line+1, "%lx", &word) == 1) { reg.pc = word; } else { fputs("n64_rsp_debugger: Use 'j addr' sets pc to addr\n", stderr); } break; case 'C': n64_rsp_debugger(); break; case 'R': dispatch(EMU_RESET, 0); break; case 'h': case 'H': fputs("n64_cpu_debugger: For help have a look at TrueReality/Documentation/Debugger\n" "(Exit debugger with '!')\n\n", stderr); break; case 'd': if(sscanf(line+1, "%llx", &dword) == 1) prefs.debug = dword; else print_debugging_options(); break; case '.': if(sscanf(line+1, "%x", &n) == 1) { switch(n) { case 0: reg.halt = 0; break; case 1: reg.halt = 1; break; } /* switch(n) */ break; } /* if(sscanf(line+1, "%x", &n) == 1) */ fputs("n64_cpu_debugger: Use '. n' set/reset halt state\n" " n = 0: cpu run\n" " n = 1: cpu halt\n\n", stderr); break; case 'G': for(;;) { #ifdef HALT if(reg.halt) { reg.halt = 0; break; } #endif cpu_step(); } break; #if DISPLAY_SUPPORT case 'r': dispatch(DISPLAY_REFRESH, 0); break; #endif case 'b': if(sscanf(line+1, "%lx", &addr) == 1) { breakp[0] += 1; breakp[ breakp[0] ] = addr; printf("Breakpoint #%d set @ %08lx\n", (int)breakp[0], breakp[ breakp[0] ]); } else if(line[1] == '-') { if(breakp[0] > 0) { breakp[0] -= 1; printf("Breakpoint #%d removed\n", (int)breakp[0] + 1); } else printf("There is no breakpoint to remove (set one!)\n"); } else if(line[1] == 'l') { for(i=1; i<=breakp[0]; i++) printf("Breakpoint #%d: %08lx\n", i, breakp[i]); putchar('\n'); } else { fputs("n64_cpu_debugger: 'b pos' ... sets breakpoint @ pos\n" " 'b-' ... remove last breakpoint\n" " 'bl' ... lists all breakpoints\n\n'", stderr); } break; case 't': cpu_step(); break; case 'g': if(line[1] == '-') { if(sscanf(line + 2, "%llx", &dword) == 1) { while(reg.cpr[0][9] < dword) { #ifdef HALT if(reg.halt) { reg.halt = 0; break; } #endif cpu_step(); for(j=1; j<=breakp[0]; j++) if(reg.pc == breakp[j]) { printf("\nBreakpoint #%d @ %08lx ([count]=%016llx) reached\n\n", j, breakp[j], reg.cpr[0][COUNT]); dword = 0; break; } /* if(reg.pc == breakp[j]) */ } /* while(reg.cpr[0][9] < dword) */ } /* if(sscanf(line + 2, "%llx", &dword) == 1) */ else fputs("n64_cpu_debugger: g x ... executes x instructions\n" " g- x ... executes instructions until count == x\n\n", stderr); } else { if(sscanf(line + 1, "%llx", &dword) == 1) { for(i=0; i "); n64_rsp_debugger_switch(line); } while(line[0] != 'C' && line[0] != '!'); } /* void n64_rsp_debugger() */ static void n64_rsp_debugger_switch(char line[]) { static int do_not_branch = 0; int i, j, n; WORD addr; HWORD hword; WORD word; DWORD dword; switch(line[0]) { case 'T': do { rsp_step(); } while(!rsp_reg.halt); rsp_print_r(); line[0] = 'C'; break; case 'N': if(do_not_branch) { do_not_branch = 0; puts("Message: Branch and jump enabled"); fflush(stdout); } else { do_not_branch = 1; puts("Message: Branch and jump disabled"); fflush(stdout); } break; case 'n': rsp_reg.delay = NO_RSP_DELAY; break; case 'j': if(sscanf(line+1, "%lx", &word) == 1) { mem.sp_reg_pc = word; } else { fputs("n64_rsp_debugger: Use 'j addr' sets rsp pc to addr\n", stderr); } break; case 'F': n64_rsp_debugger_files(); return; case 'C': return; case 'R': dispatch(EMU_RESET, 0); break; case 'h': case 'H': fputs("n64_rsp_debugger: No help right now. Look at source code!\n" "(Exit rsp debugger with 'C')\n\n", stderr); break; case 'd': if(sscanf(line+1, "%llx", &dword) == 1) prefs.debug = dword; else print_debugging_options(); break; case '.': if(sscanf(line+1, "%x", &n) == 1) { switch(n) { case 0: rsp_reg.halt = 0; break; case 1: rsp_reg.halt = 1; break; } /* switch(n) */ break; } /* if(sscanf(line+1, "%x", &n) == 1) */ fputs("n64_rsp_debugger: Use '. n' set/reset halt state\n" " n = 0: rsp run\n" " n = 1: rsp halt\n\n", stderr); break; case 'J': for(;;) { #ifdef HALT if(rsp_reg.halt) { rsp_reg.halt = 0; break; } #endif rsp_step(); } break; #if DISPLAY_SUPPORT case 'r': dispatch(DISPLAY_REFRESH, 0); break; #endif case 'b': if(sscanf(line+1, "%lx", &addr) == 1) { breakp[0] += 1; breakp[ breakp[0] ] = addr; printf("Breakpoint #%d set @ %08lx\n", (int)breakp[0], breakp[ breakp[0] ]); } else if(line[1] == '-') { if(breakp[0] > 0) { breakp[0] -= 1; printf("Breakpoint #%d removed\n", (int)breakp[0] + 1); } else printf("There is no breakpoint to remove (set one!)\n"); } else if(line[1] == 'l') { for(i=1; i<=breakp[0]; i++) printf("Breakpoint #%d: %08lx\n", i, breakp[i]); putchar('\n'); } else { fputs("n64_rsp_debugger: 'b pos' ... sets breakpoint @ pos\n" " 'b-' ... remove last breakpoint\n" " 'bl' ... lists all breakpoints\n\n'", stderr); } break; case 't': if(sscanf(line + 1, "%llu", &dword) == 1) { for(i=0; i