include/casl2.h

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <malloc.h>
   5 #include <ctype.h>
   6 #include <assert.h>
   7 #include <stdbool.h>
   8 #include <time.h>
   9 #include "hash.h"
  10
  11 #define ARRAYSIZE(array) (sizeof(array)/sizeof(array[0]))
  12
  13 /* COMET IIの規格 */
  14 enum {
  15     CMDSIZE = 4,      /* 命令の最大文字数 */
  16     REGSIZE = 8,      /* 汎用レジスタの数 */
  17     DEFAULT_MEMSIZE = 512,    /* デフォルトのメモリ容量。COMET II規格では、65536語 */
  18     DEFAULT_CLOCKS = 5000000, /* デフォルトのクロック周波数。COMET II規格では、未定義 */
  19 };
  20
  21 /* COMET IIの基本データサイズ */
  22 typedef unsigned short WORD;
  23
  24 /* COMET IIのメモリ */
  25 extern WORD *memory;
  26
  27 /* COMET IIのCPUレジスタ */
  28 extern WORD GR[REGSIZE], SP, PR, FR;
  29
  30 /* COMET II フラグのマスク値 */
  31 enum {
  32     OF = 0x4,    /* Overflow Flag */
  33     SF = 0x2,    /* Sign Flag */
  34     ZF = 0x1,    /* Zero Flag */
  35 };
  36
  37 /* エラー番号 */
  38 extern int cerrno;
  39
  40 /* エラーメッセージ */
  41 extern char *cerrmsg;
  42
  43 /* レジストリの内容を表示する場合はTRUE */
  44 extern bool tracemode;
  45
  46 /* レジストリの内容を論理値（0〜65535）で表示する場合はTRUE */
  47 extern bool logicalmode;
  48
  49 /* メモリの内容を表示する場合はTRUE */
  50 extern bool dumpmode;
  51
  52 /* ソースを表示する場合はTRUE */
  53 extern bool srcmode;
  54
  55 /* ラベル表を表示する場合はTRUE */
  56 extern bool labelmode;
  57
  58 /* ラベル表を表示して終了する場合はTRUE */
  59 extern bool onlylabelmode;
  60
  61 /* アセンブラ詳細結果を表示するならTRUE */
  62 extern bool asdetailmode;
  63
  64 /* アセンブルだけを行う場合はTRUE */
  65 extern bool onlyassemblemode;
  66
  67 /* メモリーサイズ */
  68 extern int memsize;
  69
  70 /* クロック周波数 */
  71 extern int clocks;
  72
  73 /* 実行開始番地 */
  74 extern WORD startptr;
  75
  76 /* 実行終了番地 */
  77 extern WORD endptr;
  78
  79 /* COMET II 命令
  80    命令タイプは、オペランドにより6つに分類
  81        R_ADR_X = 010: オペランド数2または3。
  82                 第1オペランドは汎用レジスタ、第2オペランドはアドレス、第3オペランドは指標レジスタ
  83        R_ADR_X_ = 011: 同上。ただし、実効アドレスに格納されている内容を示す
  84        R1_R2 = 020: オペランド数2。第1オペランド、第2オペランドともに汎用レジスタ
  85        ADR_X = 030: オペランド数1または2。第1オペランドはアドレス、第2オペランドは指標レジスタ
  86        R_ = 040: オペランド数1。第1オペランドはGR
  87        NONE = 0: オペランドなし
  88 */
  89 typedef enum {
  90     R_ADR_X = 010,
  91     R_ADR_X_ = 011,
  92     R1_R2 = 020,
  93     ADR_X = 030,
  94     R_ = 040,
  95     NONE = 0,
  96 } CMDTYPE;
  97
  98 typedef struct {
  99     char *cmd;
 100     CMDTYPE type;
 101     WORD code;
 102 } CMDCODEARRAY;
 103
 104 /* 命令コードのハッシュ表 */
 105 typedef struct _CMDCODETAB {
 106     struct _CMDCODETAB *next;
 107     CMDCODEARRAY *cca;
 108 } CMDCODETAB;
 109
 110 /* 命令と命令タイプがキーのハッシュ表を作成する */
 111 bool create_cmdtype_code();
 112
 113 /* 命令と命令タイプから、命令コードを取得する。
 114    無効な場合は0xFFFFを返す */
 115 WORD getcmdcode(const char *cmd, CMDTYPE type);
 116
 117 /* 命令と命令タイプからハッシュ値を生成する */
 118 unsigned hash_cmdtype(const char *cmd, CMDTYPE type);
 119
 120 /* 命令と命令タイプがキーのハッシュ表を表示する */
 121 void print_cmdtype_code();
 122
 123 /* 命令と命令タイプがキーのハッシュ表を解放する */
 124 void free_cmdtype_code();
 125
 126 /* 命令コードがキーのハッシュ表を作成する */
 127 bool create_code_type();
 128
 129 /* 命令コードからハッシュ値を生成する */
 130 unsigned hash_code(WORD code);
 131
 132 /* 命令コードから命令タイプを取得する。
 133    無効な場合はNONEを返す */
 134 CMDTYPE getcmdtype(WORD code);
 135
 136 /* 命令コードがキーのハッシュ表を表示する */
 137 void print_code_type();
 138
 139 /* 命令コードがキーのハッシュ表を解放する */
 140 void free_code_type();
 141
 142 /* エラー番号とエラーメッセージを設定 */
 143 void setcerr(int num, const char *val);
 144
 145 /* エラー番号からメッセージを返す */
 146 char *getcerrmsg(int num);
 147
 148 /* WORD値を文字列に変換 */
 149 char *wtoa(WORD word);
 150
 151 /* エラーを解放する */
 152 void freecerr();
 153
 154 /* 指定されたファイルにアセンブル結果を書込 */
 155 void outassemble(char *file);
 156
 157 /* WORD値を2進数表記に変換 */
 158 char *word2bit(const WORD word);
 159
 160 /* COMET IIのメモリを表示 */
 161 void dumpmemory();
 162
 163 /* COMET IIのレジスタを表示 */
 164 void dspregister();