X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=src%2Fmonitor.c;h=831a47acc36578b5a5113512324c61395b77af6d;hp=24f2156b224d02ad7b0343fc4c52f0cf2e51c8ba;hb=8365c3016d2564c0498d2dc21300b1bff57e929b;hpb=15a07be760d84746bbace2d70326cd939f4568fd diff --git a/src/monitor.c b/src/monitor.c index 24f2156..831a47a 100644 --- a/src/monitor.c +++ b/src/monitor.c @@ -132,7 +132,7 @@ MONARGS *monargstok(const char *str) } sepp = r + strcspn(r, " "); sepc = *sepp; - *sepp = '\0'; + strcpy(sepp, ""); args->argv[++(args->argc)-1] = strdup_chk(q, "args.argv[]"); q = r = sepp + 1; } while(sepc == ' '); @@ -146,7 +146,7 @@ MONCMDLINE *monlinetok(const char *line) long l; MONCMDLINE *moncmdl = NULL; - if(*line == '\n' || *line == '\0') { + if(!line[0] || line[0] == '\n') { return NULL; } p = tokens = strdup_chk(line, "tokens"); @@ -253,13 +253,26 @@ void mon_dump(int argc, char *argv[]) MONCMDTYPE monitorcmd(char *cmd, MONARGS *args) { MONCMDTYPE cmdtype = MONREPEAT; - if(stracmp(cmd, 2, (char* []){"b", "break"})) { + if(stracmp(cmd, 2, (char* []){"a", "assemble"})) { + if(args->argc == 0) { + fprintf(stderr, "Error: Input file name.\n"); + } else if(args->argc == 1) { + assemble(1, (char* []){args->argv[0]}, 0); + } else { + assemble(1, (char* []){args->argv[0]}, nh2word(args->argv[1])); + } + } else if(stracmp(cmd, 2, (char* []){"b", "break"})) { mon_break(args->argc, args->argv); } else if(stracmp(cmd, 2, (char* []){"c", "continue"})) { execmode.step = false; cmdtype = MONNEXT; } else if(stracmp(cmd, 2, (char* []){"d", "dump"})) { mon_dump(args->argc, args->argv); + } else if(stracmp(cmd, 2, (char* []){"l", "load"})) { + loadassemble(args->argv[0], nh2word(args->argv[1])); + } else if(stracmp(cmd, 2, (char* []){"n", "next"})) { + execmode.step = true; + cmdtype = MONNEXT; } else if(stracmp(cmd, 2, (char* []){"q", "quit"})) { fprintf(stdout, "Quit: COMET II monitor\n"); cmdtype = MONQUIT; @@ -267,9 +280,9 @@ MONCMDTYPE monitorcmd(char *cmd, MONARGS *args) if(args->argc == 2) { disassemble_memory(nh2word(args->argv[0]), nh2word(args->argv[1])); } - } else if(stracmp(cmd, 2, (char* []){"s", "step"})) { - execmode.step = true; - cmdtype = MONNEXT; + } else if(stracmp(cmd, 1, (char* []){"reset"})) { + fprintf(stdout, "Reset COMET II.\n"); + reset(sys->memsize, sys->clocks); /* COMET II仮想マシンのリセット */ } else if(stracmp(cmd, 2, (char* []){"t", "trace"})) { if(args->argc > 0 && stracmp(args->argv[0], 2, (char* []){"a", "auto"})) { execmode.logical = false; @@ -294,9 +307,12 @@ MONCMDTYPE monitorcmd(char *cmd, MONARGS *args) fprintf(stdout, "b[reak] -- Manipulate Breakpoints. See details, `b ?'.\n"); fprintf(stdout, "c[ontinue] -- Continue running your program.\n"); fprintf(stdout, "d[ump] -- Display memory dump. `d[ump] a[uto]/n[oauto]' set auto/noauto display.\n"); + fprintf(stdout, "l[oad] -- Load object from a file to the memory. `l[oad]
' if address is omitted, load to address 0.\n"); + fprintf(stdout, "n[ext] -- Go next instruction.\n"); fprintf(stdout, "q[uit] -- Quit running your program.\n"); + fprintf(stdout, "reset -- Reset the system.\n"); fprintf(stdout, "r[everse] -- Disassemble memory. `r[everse] .\n"); - fprintf(stdout, "s[tep] -- Step by step running your program until next interaction.\n"); + fprintf(stdout, "s[ave] -- Save object from the memory to a file. `s[ave] [ []]' if and is omitted, save the whole memory. if is omitted, save the memory after .\n"); fprintf(stdout, "t[race] -- Display CPU register. `t[race] a[uto]/n[oauto]' set auto/noauto display. \n"); fprintf(stdout, "T[race] -- Display CPU register as logical value. `t[race] a[uto]/n[oauto]' set auto/noauto display. \n"); fprintf(stdout, "?/h[elp] -- Display this help.\n"); @@ -327,12 +343,13 @@ void monitor() char *buf, *p; MONCMDLINE *moncmdl; MONCMDTYPE cmdtype = MONREPEAT; + do { - fprintf(stdout, "COMET II (Type ? for help) > "); + fprintf(stdout, "- "); buf = malloc_chk(MONINSIZE + 1, "monitor.buf"); fgets(buf, MONINSIZE, stdin); if((p = strchr(buf, '\n')) != NULL) { - *p = '\0'; + strcpy(p, ""); } if((moncmdl = monlinetok(buf)) != NULL) { cmdtype = monitorcmd(moncmdl->cmd, moncmdl->args); @@ -342,7 +359,7 @@ void monitor() if(cmdtype == MONQUIT) { shutdown(); freebps(); - free_code_cmdtype(); + free_cmdtable(HASH_CODE); freecerr(); exit(0); }