X-Git-Url: http://j8takagi.net/cgi-bin/gitweb.cgi?p=YACASL2.git;a=blobdiff_plain;f=src%2Fcmd.c;h=c108b46c23ef19e9240973259857156b60dcad07;hp=7e2b7fa6e01892d2a4541dee977ea3edff371311;hb=b0f981469cdea23225ca5c3ef0ca6759d6a92b43;hpb=44cde08e6cf148928a219593c78a57abfd89b424

diff --git a/src/cmd.c b/src/cmd.c
index 7e2b7fa..c108b46 100644
--- a/src/cmd.c
+++ b/src/cmd.c
@@ -38,11 +38,28 @@ CMDCODEARRAY cmdcodearray[] = {
     { "POP", R_, 0x7100 },
     { "CALL", ADR_X, 0x8000 },
     { "SVC", ADR_X, 0xF000 },
-    { "RET", NONE, 0x8100 }
+    { "RET", NONE, 0x8100 },
 };
 
 int cmdcodesize = ARRAYSIZE(cmdcodearray);
-CMDCODETAB *cmdtype_code[ARRAYSIZE(cmdcodearray)], *code_type[ARRAYSIZE(cmdcodearray)];
+int cmdtabsize;
+CMDCODETAB **cmdtype_code, **code_type;
+
+/* 命令と命令タイプからハッシュ値を生成する */
+unsigned hash_cmdtype(const char *cmd, CMDTYPE type) {
+    HKEY *keys[2];
+
+    /* 命令をセット */
+    keys[0] = malloc(sizeof(HKEY));
+    keys[0]->type = CHARS;
+    keys[0]->val.s = strdup(cmd);
+    /* 命令タイプをセット */
+    keys[1] = malloc(sizeof(HKEY));
+    keys[1]->type = INT;
+    keys[1]->val.i = (int)(type & 070);
+    /* ハッシュ値を返す */
+    return hash(2, keys, cmdtabsize);
+}
 
 /* 命令と命令タイプがキーのハッシュ表を作成する */
 bool create_cmdtype_code()
@@ -50,15 +67,16 @@ bool create_cmdtype_code()
     CMDCODETAB *np;
     unsigned hashval;
     int i;
-    
+
+    cmdtabsize = cmdcodesize;
+    cmdtype_code = malloc(cmdtabsize * sizeof(CMDCODETAB *));
     for(i = 0; i < cmdcodesize; i++) {
-        np = (CMDCODETAB *) malloc(sizeof(*np));
-        if(np == NULL) {
+        if((np = malloc(sizeof(CMDCODETAB))) == NULL) {
             setcerr(122, NULL);    /* cannot create hash table */
             return false;
         }
         /* ハッシュ値の生成 */
-        hashval = hash_cmdtype((&cmdcodearray[i])->cmd, (&cmdcodearray[i])->type);
+        hashval = hash_cmdtype(cmdcodearray[i].cmd, cmdcodearray[i].type);
         /* ハッシュ表に値を追加 */
         np->next = cmdtype_code[hashval];
         cmdtype_code[hashval] = np;
@@ -67,19 +85,8 @@ bool create_cmdtype_code()
     return true;
 }
 
-/* 命令と命令タイプからハッシュ値を生成する */
-unsigned hash_cmdtype(const char *cmd, CMDTYPE type) {
-    int i;
-    unsigned hashval = 0;
-    for(i = 0; *cmd != '\0'; cmd++) {
-        hashval = *cmd + 31 * hashval;
-    }
-    hashval = (int)(type & 070) + 31 * hashval;
-    return hashval % cmdcodesize;
-}
-
-/* 命令と命令タイプから、命令コードを取得する。
-   無効な場合は0xFFFFを返す */
+/* 命令と命令タイプから、命令コードを取得する */
+/* 無効な場合は0xFFFFを返す */
 WORD getcmdcode(const char *cmd, CMDTYPE type)
 {
     CMDCODETAB *np;
@@ -92,27 +99,12 @@ WORD getcmdcode(const char *cmd, CMDTYPE type)
     return 0xFFFF;
 }
 
-/* 命令と命令タイプがキーのハッシュ表を表示する */
-void print_cmdtype_code()
-{
-    int i;
-    CMDCODETAB *np;
-    for(i = 0; i < cmdcodesize; i++){
-        np = cmdtype_code[i];
-        while(np != NULL) {
-            fprintf(stdout, "(%2d) - %s\t0%02o\t#%04X\n",
-                    i, np->cca->cmd, np->cca->type, np->cca->code);
-            np = np->next;
-        }
-    }
-}
-
 /* 命令と命令タイプがキーのハッシュ表を解放する */
 void free_cmdtype_code()
 {
     int i;
     CMDCODETAB *np, *nq;
-    for(i = 0; i < cmdcodesize; i++){
+    for(i = 0; i < cmdtabsize; i++){
         np = cmdtype_code[i];
         while(np != NULL) {
             nq = np->next;
@@ -122,16 +114,30 @@ void free_cmdtype_code()
     }
 }
 
+/* 命令コードからハッシュ値を生成する */
+unsigned hash_code(WORD code)
+{
+    HKEY *keys[1];
+
+    /* 命令コードをセット */
+    keys[0] = malloc(sizeof(HKEY));
+    keys[0]->type = INT;
+    keys[0]->val.i = (int)(code >> 8);
+    /* ハッシュ値を返す */
+    return hash(1, keys, cmdtabsize);
+}
+
 /* 命令コードがキーのハッシュ表を作成する */
 bool create_code_type()
 {
     CMDCODETAB *np;
     unsigned hashval;
     int i;
-    
+
+    cmdtabsize = hashtabsize(cmdcodesize);
+    code_type = malloc(cmdtabsize * sizeof(CMDCODETAB *));
     for(i = 0; i < cmdcodesize; i++) {
-        np = (CMDCODETAB *) malloc(sizeof(*np));
-        if(np == NULL) {
+        if((np = malloc(sizeof(CMDCODETAB))) == NULL) {
             setcerr(122, NULL);    /* cannot create hash table */
             return false;
         }
@@ -145,16 +151,8 @@ bool create_code_type()
     return true;
 }
 
-/* 命令コードからハッシュ値を生成する */
-unsigned hash_code(WORD code)
-{
-    unsigned hashval = 0;
-    hashval = (code >> 8);
-    return hashval % cmdcodesize;
-}
-
-/* 命令コードから命令タイプを取得する。
-   無効な場合はNONEを返す */
+/* 命令コードから命令タイプを取得する */
+/* 無効な場合はNONEを返す */
 CMDTYPE getcmdtype(WORD code)
 {
     CMDCODETAB *np;
@@ -166,25 +164,12 @@ CMDTYPE getcmdtype(WORD code)
     return NONE;
 }
 
-/* 命令コードがキーのハッシュ表を表示する */
-void print_code_type()
-{
-    int i;
-    CMDCODETAB *np;
-    for(i = 0; i < cmdcodesize; i++){
-        for(np = code_type[i]; np != NULL; np = np->next) {
-            fprintf(stdout, "(%2d) - #%04X\t0%02o\t%s\n",
-                    i, np->cca->code, np->cca->type, np->cca->cmd);
-        }
-    }
-}
-
 /* 命令コードがキーのハッシュ表を解放する */
 void free_code_type()
 {
     int i;
     CMDCODETAB *np, *nq;
-    for(i = 0; i < cmdcodesize; i++){
+    for(i = 0; i < cmdtabsize; i++){
         np = code_type[i];
         while(np != NULL) {
             nq = np->next;