include/assemble.h

   1 #ifndef YACASL2_ASSEMBLE_INCLUDED
   2 #define YACASL2_ASSEMBLE_INCLUDED
   3
   4 /* CASL IIの制限 */
   5 enum {
   6     LINESIZE = 1024,       /* 行の最大文字数 */
   7     TOKENSIZE = 256,       /* トークンの最大文字数 */
   8     LABELSIZE = 8,         /* ラベルの最大文字数 */
   9     LABELTABSIZE = 256,    /* ラベルの最大数 */
  10     OPDSIZE = 40,          /* オペラントの最大数 */
  11 };
  12
  13 /* 値を格納するポインタ */
  14 extern WORD ptr;
  15
  16 /* リテラル（=付きの値）を格納するポインタ */
  17 extern WORD lptr;
  18
  19 /* 他のプログラムで参照する入口名 */
  20 extern char *prog;
  21
  22 /* アセンブラ命令とマクロ命令を表す番号 */
  23 typedef enum {
  24     START = 01,
  25     END = 02,
  26     DS = 03,
  27     DC = 04,
  28     IN = 011,
  29     OUT = 012,
  30     RPUSH = 013,
  31     RPOP = 014,
  32 } CASLCMD;
  33
  34 /* アセンブラ命令とマクロ命令を表す配列 */
  35 typedef struct {
  36     CASLCMD cmdid;
  37     int opdc_min;
  38     int opdc_max;
  39     char *cmd;
  40 } CMDARRAY;
  41
  42 /* ラベル表 */
  43 typedef struct _LABELTAB {
  44     struct _LABELTAB *next;
  45     char *prog;
  46     char *label;
  47     WORD adr;
  48 } LABELTAB;
  49
  50 /* アセンブラが、1回目か、2回目か、を表す */
  51 typedef enum {
  52     FIRST = 0,
  53     SECOND = 1,
  54 } PASS;
  55
  56 /* プログラム名とラベルに対応するハッシュ値を返す */
  57 unsigned labelhash(const char *prog, const char *label);
  58
  59 /* プログラム名とラベルに対応するアドレスをラベル表から検索する */
  60 WORD getlabel(const char *prog, const char *label);
  61
  62 /* ラベルを表に追加する */
  63 bool addlabel(const char *prog, const char *label, WORD word);
  64
  65 /* ラベル表を表示する */
  66 void printlabel();
  67
  68 /* ラベル表を解放する */
  69 void freelabel();
  70
  71 /* オペランド */
  72 typedef struct {
  73     int opdc;
  74     char *opdv[OPDSIZE];
  75 } OPD;
  76
  77 /* 命令行 */
  78 typedef struct {
  79     char *label;
  80     char *cmd;
  81     OPD *opd;
  82 } CMDLINE;
  83
  84 /* 命令がマクロ命令の場合はメモリに書込
  85    書込に成功した場合TRUE、それ以外の場合はFALSEを返す */
  86 bool macrocmd(const CMDLINE *cmdl, PASS pass);
  87
  88 /* 「,」区切りの文字列から、オペランドを取得する */
  89 OPD *opdtok(const char *str);
  90
  91 /* 1行を解析する */
  92 CMDLINE *linetok(const char *line);
  93
  94 /* 汎用レジスタを表す文字列「GR[0-7]」をWORD値に変換
  95    is_xがTRUEの場合は、指標レジスタとして用いる汎用レジスタ
  96    文字列が汎用レジスタを表さない場合は、0xFFFFを返す */
  97 WORD getgr(const char *str, bool is_x);
  98
  99 /* 10進定数をWORDに変換 */
 100 WORD getint(const char *str);
 101
 102 /* 16進定数をWORDに変換 */
 103 WORD gethex(const char *str);
 104
 105 /* アドレスを返す */
 106 /* アドレスには、リテラル／10進定数／16進定数／アドレス定数が含まれる */
 107 WORD getadr(const char *prog, const char *str, PASS pass);
 108
 109 /* 定数の前に等号（=）をつけて記述される、リテラルを返す */
 110 /* リテラルには、10進定数／16進定数／文字定数が含まれる */
 111 WORD getliteral(const char *str, PASS pass);
 112
 113 /* COMET IIのメモリにアドレス値を書き込む */
 114 bool writememory(WORD word, WORD adr, PASS pass);
 115
 116 /* ' 'で囲まれた、文字定数をメモリに書込 */
 117 /* DC命令とリテラルで使い、リテラルの場合はリテラル領域に書込 */
 118 void writestr(const char *str, bool literal, PASS pass);
 119
 120 /* アセンブラ命令DCをメモリに書込 */
 121 void writeDC(const char *str, PASS pass);
 122
 123 /* 命令がアセンブラ命令の場合は処理を実行する。
 124    実行に成功した場合TRUE、それ以外の場合はFALSEを返す */
 125 bool assemblecmd(const CMDLINE *cmdl, PASS pass);
 126
 127 /* 命令のコードを返す
 128    命令が無効な場合は0xFFFF */
 129 WORD getcmd(CMDTYPE type, const char *cmd);
 130
 131 /* 命令が機械語命令の場合は処理を実行
 132    実行に成功した場合TRUE、それ以外の場合はFALSEを返す */
 133 bool cometcmd(const CMDLINE *cmdl, PASS pass);
 134
 135 /* 1行のアセンブル */
 136 /* アセンブル完了時はTRUE、未完了時はFALSEを返す */
 137 bool assembleline(const CMDLINE *cmdl, PASS pass);
 138
 139 /* 指定された名前のファイルをアセンブル */
 140 /* 2回実行される */
 141 bool assemble(const char *file, PASS pass);
 142
 143 /* マクロ命令「IN IBUF,LEN」をメモリに書込 */
 144 bool writeIN(const char *ibuf, const char *len, PASS pass);
 145
 146 /* マクロ命令「OUT OBUF,LEN」をメモリに書込 */
 147 bool writeOUT(const char *obuf, const char *len, PASS pass);
 148
 149 /* マクロ命令「RPUSH」をメモリに書込 */
 150 bool writeRPUSH(PASS pass);
 151
 152 /* マクロ命令「RPOP」をメモリに書込 */
 153 bool writeRPOP(PASS pass);
 154
 155 #endif