変数名の整理
[YACASL2.git] / 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の終端 */