X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=src%2Fdebugger.c;fp=src%2Fdebugger.c;h=0000000000000000000000000000000000000000;hb=3614c0ec65e1548e52d9149e6ef6925f37458fc6;hp=b84a0135f0a126f2c0309a85fb9ddc9e2da5664a;hpb=a46594d66972fae37a609506bcf01f6b2bdc865e;p=YACASL2.git

diff --git a/src/debugger.c b/src/debugger.c
deleted file mode 100644
index b84a013..0000000
--- a/src/debugger.c
+++ /dev/null
@@ -1,335 +0,0 @@
-#include "debugger.h"
-
-/**
- * @brief ブレークポイント表
- */
-static BPSLIST *bps[BPSTABSIZE];
-
-/**
- * @brief ブレークポイントのエラー
- */
-static CERR cerr_bps[] = {
-    { 101, "break point already defined" },
-    { 102, "break point table is full" },
-    { 103, "break point not found" },
-    { 104, "break point address not set" },
-    { 105, "illegal break point address" },
-};
-
-/**
- * @brief ブレークポイントのエラーをエラーリストに追加する
- *
- * @return なし
- */
-void addcerrlist_bps();
-
-
-unsigned adrhash(WORD adr)
-{
-    HKEY *key[1];
-    unsigned h;
-    key[0] = malloc_chk(sizeof(HKEY), "adrhash.key");
-    key[0]->type = INT;
-    key[0]->val.i = adr;
-    h = hash(1, key, BPSTABSIZE);
-    FREE(key[0]);
-    return h;
-}
-
-void addcerrlist_bps()
-{
-    addcerrlist(ARRAYSIZE(cerr_bps), cerr_bps);
-}
-
-bool getbps(WORD adr)
-{
-    BPSLIST *p;
-
-    for(p = bps[adrhash(adr)]; p != NULL; p = p->next) {
-        if(p->adr == adr) {
-            return true;
-        }
-    }
-    return false;
-}
-
-bool addbps(WORD adr)
-{
-    BPSLIST *p;
-    unsigned h;
-
-    /* 登録されたラベルを検索。すでに登録されている場合は終了 */
-    if(getbps(adr) == true) {
-        fprintf(stderr, "%04X: Breakpoint is already defined.\n", adr);
-        return false;
-    }
-    /* メモリを確保 */
-    p = malloc_chk(sizeof(BPSLIST), "bps.next");
-    /* アドレスを設定 */
-    p->adr = adr;
-    /* ハッシュ表へ追加 */
-    p->next = bps[h = adrhash(adr)];
-    bps[h] = p;
-    return true;
-}
-
-bool delbps(WORD adr)
-{
-    BPSLIST *p, *q;
-    unsigned h;
-    bool res = false;
-
-    p = bps[h = adrhash(adr)];
-    if(p != NULL) {
-        if(p->adr == adr) {
-            if(p->next == NULL) {
-                FREE(bps[h]);
-            } else {
-                bps[h] = p->next;
-                FREE(p);
-            }
-            res = true;
-        } else {
-            for(; p->next != NULL; p = p->next) {
-                q = p->next;
-                if(q->adr == adr) {
-                    p->next = q->next;
-                    FREE(q);
-                    res = true;
-                    break;
-                }
-            }
-        }
-    }
-    return res;
-}
-
-void listbps()
-{
-    int i, cnt = 0;
-    BPSLIST *p;
-
-    fprintf(stdout, "List of breakpoints\n");
-    for(i = 0; i < BPSTABSIZE; i++) {
-        for(p = bps[i]; p != NULL; p = p->next) {
-            fprintf(stdout, "#%04X\n", p->adr);
-            cnt++;
-        }
-    }
-    if(cnt == 0) {
-        fprintf(stdout, "(No breakpoints.)\n");
-    }
-}
-
-void freebpslist(BPSLIST *head)
-{
-    BPSLIST *p, *q;
-    for(p = head; p != NULL; p = q) {
-        q = p->next;
-        FREE(p);
-    }
-}
-
-void freebps()
-{
-    int i;
-    for(i = 0; i < BPSTABSIZE; i++) {
-        freebpslist(bps[i]);
-        bps[i] = NULL;
-    }
-}
-
-DBARGS *dbargstok(const char *str)
-{
-    DBARGS *args = malloc_chk(sizeof(DBARGS), "args");
-    char *p, *q, *r, *sepp;     /* pは文字列全体の先頭位置、qはトークンの先頭位置、rは文字の位置 */
-    int sepc = ' ';
-
-    args->argc = 0;
-    if(str == NULL) {
-        return args;
-    }
-    p = q = r = strdup_chk(str, "argstok.p");
-    do {
-        while(*q == ' ' || *q == '\t'){
-            q = ++r;
-        }
-        sepp = r + strcspn(r, " ");
-        sepc = *sepp;
-        *sepp = '\0';
-        args->argv[++(args->argc)-1] = strdup_chk(q, "args.argv[]");
-        q = r = sepp + 1;
-    } while(sepc == ' ');
-    FREE(p);
-    return args;
-}
-
-DBCMDLINE *dblinetok(const char *line)
-{
-    char *tokens, *p;
-    long l;
-    DBCMDLINE *dbcmdl = NULL;
-
-    if(*line == '\n' || *line == '\0') {
-        return NULL;
-    }
-    p = tokens = strdup_chk(line, "tokens");
-    dbcmdl = malloc_chk(sizeof(DBCMDLINE), "dbcmdl");
-    /* コマンドの取得 */
-    dbcmdl->cmd = malloc_chk((l = strcspn(p, " \t\n")) + 1, "dbcmdl.cmd");
-    strncpy(dbcmdl->cmd, p, l);
-    /* コマンドと引数の間の空白をスキップ */
-    p += l;
-    while(*p == ' ' || *p == '\t') {
-        p++;
-    }
-    /* 引数として、改行までの文字列を取得 */
-    if((l = strcspn(p, "\n")) > 0) {
-        dbcmdl->args = dbargstok(p);
-    } else {
-        dbcmdl->args = malloc_chk(sizeof(DBARGS), "dbcmdl.args");
-        dbcmdl->args->argc = 0;
-    }
-    FREE(tokens);
-    return dbcmdl;
-}
-
-bool stracmp(char *str1, int str2c, char *str2v[])
-{
-    int i;
-    if(str1 == NULL) {
-        return false;
-    }
-    for(i = 0; i < str2c; i++) {
-        if(strcmp(str1, str2v[i]) == 0) {
-            return true;
-        }
-    }
-    return false;
-}
-
-void db_break(int argc, char *argv[])
-{
-    WORD w;
-    if(stracmp(argv[0], 2, (char* []){"l", "list"})) {
-        listbps();
-    } else if(stracmp(argv[0], 2, (char* []){"r", "reset"})) {
-        freebps();
-        fprintf(stdout, "All breakpoints are deleted.\n");
-    } else {
-        if(argc > 1) {
-            if((w = nh2word(argv[1])) == 0x0) {
-                fprintf(stderr, "%s: address error\n", argv[1]);
-            }
-        }
-        if(stracmp(argv[0], 2, (char* []){"a", "add"})) {
-            if(addbps(w) == true) {
-                fprintf(stdout, "#%04X: breakpoint added\n", w);
-            } else {
-                fprintf(stdout, "No breakpoint added\n");
-            }
-        } else if(stracmp(argv[0], 2, (char* []){"d", "del"})) {
-            if(delbps(w) == true) {
-                fprintf(stdout, "#%04X: breakpoint deleted\n", w);
-            } else {
-                fprintf(stdout, "No breakpoint deleted\n");
-            }
-        } else if(stracmp(argv[0], 3, (char* []){"?", "h", "help"})) {
-            fprintf(stdout, "breakpoint manipulate:\n");
-            fprintf(stdout, "    b[reak] a[dd] <address>\n");
-            fprintf(stdout, "    b[reak] d[el] <address>\n");
-            fprintf(stdout, "    b[reak] l[ist]\n");
-            fprintf(stdout, "    b[reak] r[eset]\n");
-        } else {
-            fprintf(stderr, "%s: Not breakpoint manipulate command. see `b ?'.\n", argv[0]);
-        }
-    }
-}
-
-bool debuggercmd(char *cmd, DBARGS *args)
-{
-    bool next = false;
-    if(stracmp(cmd, 2, (char* []){"s", "step"})) {
-        execmode.step = true;
-        next = true;
-    } else if(stracmp(cmd, 2, (char* []){"b", "break"})) {
-        db_break(args->argc, args->argv);
-    } else if(stracmp(cmd, 2, (char* []){"c", "continue"})) {
-        execmode.step = false;
-        next = true;
-    } else if(stracmp(cmd, 2, (char* []){"t", "trace"})) {
-        if(args->argc > 0 && stracmp(args->argv[0], 2, (char* []){"a", "auto"})) {
-            execmode.logical = false;
-            execmode.trace = true;
-        } else if(args->argc > 0 && stracmp(args->argv[0], 2, (char* []){"no", "noauto"})) {
-            execmode.trace = false;
-        } else {
-            fprintf(stdout, "#%04X: Register::::\n", sys->cpu->pr);
-            dspregister();
-        }
-    } else if(stracmp(cmd, 2, (char* []){"T", "tracelogical"})) {
-        if(args->argc > 0 && stracmp(args->argv[0], 2, (char* []){"a", "auto"})) {
-            execmode.logical = true;
-            execmode.trace = true;
-        } else if(args->argc > 0 && stracmp(args->argv[0], 2, (char* []){"no", "noauto"})) {
-            execmode.trace = false;
-        } else {
-            fprintf(stdout, "#%04X: Register::::\n", sys->cpu->pr);
-            dspregister();
-        }
-    } else if(stracmp(cmd, 2, (char* []){"d", "dump"})) {
-        if(args->argc > 0 && stracmp(args->argv[0], 2, (char* []){"a", "auto"})) {
-            execmode.dump = true;
-        } else if(args->argc > 0 && stracmp(args->argv[0], 2, (char* []){"no", "noauto"})) {
-            execmode.dump = false;
-        } else {
-            dumpmemory();
-        }
-    } else if(stracmp(cmd, 3, (char* []){"?", "h", "help"})) {
-        fprintf(stdout, "b[reak] -- Manipulate Breakpoints. Details in `b ?'.\n");
-        fprintf(stdout, "s[tep] -- Step by step running your program until next interaction.\n");
-        fprintf(stdout, "c[ontinue] -- Continue running your program.\n");
-        fprintf(stdout, "t[race] -- Display CPU register. `t[race] a[uto]/n[oauto]' set auto/noauto display. \n");
-        fprintf(stdout, "d[ump] -- Display memory dump. `d[ump] a[uto]/n[oauto]' set auto/noauto display.\n");
-        fprintf(stdout, "?/h[elp] -- Display this help.\n");
-    }
-    return next;
-}
-
-void free_dbcmdline(DBCMDLINE *dbcmdl)
-{
-    int i;
-    assert(dbcmdl != NULL);
-    if(dbcmdl->args != NULL) {
-        for(i = 0;  i < dbcmdl->args->argc; i++) {
-            FREE(dbcmdl->args->argv[i]);
-        }
-        FREE(dbcmdl->args);
-    }
-    if(dbcmdl->cmd != NULL) {
-        FREE(dbcmdl->cmd);
-    }
-    if(dbcmdl != NULL) {
-        FREE(dbcmdl);
-    }
-}
-
-void debugger()
-{
-    char *buf, *p;
-    DBCMDLINE *dbcmdl;
-    bool next = false;
-    do {
-        fprintf(stdout, "COMET II (Type ? for help) > ");
-        buf = malloc_chk(DBINSIZE + 1, "debugger.buf");
-        fgets(buf, DBINSIZE, stdin);
-        if((p = strchr(buf, '\n')) != NULL) {
-            *p = '\0';
-        }
-        if((dbcmdl = dblinetok(buf)) != NULL) {
-            next = debuggercmd(dbcmdl->cmd, dbcmdl->args);
-            free_dbcmdline(dbcmdl);
-        }
-        FREE(buf);
-    } while(next == false);
-}