include/casl2.h

   1 #ifndef YACASL2_CASL2_INCLUDED
   2 #define YACASL2_CASL2_INCLUDED
   3
   4 #include <stdio.h>
   5 #include <stdlib.h>
   6 #include <stdbool.h>
   7 #include <time.h>
   8 #include <assert.h>
   9 #include <ctype.h>
  10 #include <string.h>
  11
  12 #include "word.h"
  13 #include "hash.h"
  14 #include "cerr.h"
  15
  16 #ifndef ARRAYSIZE
  17 #define ARRAYSIZE(array) (sizeof(array)/sizeof(array[0]))
  18 #endif
  19
  20 /* COMET IIの規格 */
  21 enum {
  22     CMDSIZE = 4,              /* 命令の最大文字数 */
  23     GRSIZE = 8,               /* 汎用レジスタの数。COMET II規格で、7 */
  24     DEFAULT_MEMSIZE = 512,    /* デフォルトのメモリ容量。COMET II規格では、65536語 */
  25     DEFAULT_CLOCKS = 5000000, /* デフォルトのクロック周波数。COMET II規格では、未定義 */
  26 };
  27
  28 /* COMET IIのメモリ */
  29 extern WORD *memory;
  30
  31 /* メモリサイズ */
  32 extern int memsize;
  33
  34 /* COMET II フラグのマスク値 */
  35 enum {
  36     OF = 0x4,    /* Overflow Flag */
  37     SF = 0x2,    /* Sign Flag */
  38     ZF = 0x1,    /* Zero Flag */
  39 };
  40
  41 /* COMET IIのCPU */
  42 typedef struct {
  43     WORD gr[GRSIZE]; /* 汎用レジスタ */
  44     WORD sp;         /* スタックポインタ */
  45     WORD pr;         /* プログラムレジスタ */
  46     WORD fr;         /* フラグレジスタ */
  47 } CPU;
  48
  49 /* COMET IIのCPU */
  50 extern CPU *cpu;
  51
  52 /* クロック周波数 */
  53 extern int clocks;
  54
  55 /* COMET II 命令 */
  56 /* 命令タイプは、オペランドにより6種類に分類 */
  57 typedef enum {
  58     /* オペランド数2または3 */
  59     /*     第1オペランド: 汎用レジスタ */
  60     /*     第2オペランド: アドレス */
  61     /*     第3オペランド: 指標レジスタ */
  62     R_ADR_X = 010,
  63     /* オペランド数2または3 */
  64     /*     第1オペランド: 汎用レジスタ、*/
  65     /*     第2オペランド: アドレスに格納されている内容 */
  66     /*     第3オペランド: 指標レジスタ */
  67     R_ADR_X_ = 011,
  68     /* オペランド数2 */
  69     /*     第1オペランド: 汎用レジスタ */
  70     /*     第2オペランド: 汎用レジスタ */
  71     R1_R2 = 020,
  72     /* オペランド数1または2 */
  73     /*     第1オペランド: アドレス */
  74     /*     第2オペランド: 指標レジスタ */
  75     ADR_X = 030,
  76     /* オペランド数1 */
  77     /*     第1オペランド: 汎用レジスタ */
  78     R_ = 040,
  79     /* オペランドなし */
  80     NONE = 0,
  81 } CMDTYPE;
  82
  83 /* 命令コード配列 */
  84 typedef struct {
  85     char *name;
  86     CMDTYPE type;
  87     WORD code;
  88 } CMD;
  89
  90 /* 命令コード配列のサイズ */
  91 extern int comet2cmdsize;
  92
  93 /* 命令コードのハッシュ表 */
  94 typedef struct _CMDTAB {
  95     struct _CMDTAB *next;
  96     CMD *cmd;
  97 } CMDTAB;
  98
  99 extern CMDTAB **cmdtype_code;
 100 extern CMDTAB **code_type;
 101 extern int cmdtabsize;
 102
 103 /* CASL2プログラムのプロパティ */
 104 typedef struct {
 105     WORD start;   /* プログラムの開始番地 */
 106     WORD end;     /* プログラムの終了番地 */
 107 } PROGPROP;
 108
 109 extern PROGPROP *progprop;
 110
 111 /* COMET II仮想マシンのリセット */
 112 void reset();
 113
 114 /* COMET II仮想マシンのシャットダウン */
 115 void shutdown();
 116
 117 /* 命令と命令タイプがキーのハッシュ表を作成する */
 118 bool create_cmdtype_code();
 119
 120 /* 命令と命令タイプから、命令コードを取得する */
 121 /* 無効な場合は0xFFFFを返す */
 122 WORD getcmdcode(const char *cmd, CMDTYPE type);
 123
 124 /* 命令と命令タイプがキーのハッシュ表を表示する */
 125 void print_cmdtype_code();
 126
 127 /* 命令と命令タイプがキーのハッシュ表を解放する */
 128 void free_cmdtype_code();
 129
 130 /* 命令コードがキーのハッシュ表を作成する */
 131 bool create_code_type();
 132
 133 /* 命令コードから命令タイプを取得する */
 134 /* 無効な場合はNONEを返す */
 135 CMDTYPE getcmdtype(WORD code);
 136
 137 /* 命令コードがキーのハッシュ表を表示する */
 138 void print_code_type();
 139
 140 /* 命令コードがキーのハッシュ表を解放する */
 141 void free_code_type();
 142
 143 /* 指定されたファイルにアセンブル結果を書込 */
 144 void outassemble(const char *file);
 145
 146 #endif            /* YACASL2_CASL2_INCLUDEDの終端 */