#ifndef YACASL2_ASSEMBLE_INCLUDED
#define YACASL2_ASSEMBLE_INCLUDED
-/* CASL IIの制限 */
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdbool.h>
+#include <ctype.h>
+#include <assert.h>
+#include <errno.h>
+#include "cerr.h"
+#include "cmem.h"
+#include "exec.h"
+#include "hash.h"
+#include "struct.h"
+#include "word.h"
+
+/**
+ * @brief CASL IIの仕様
+ */
enum {
- LINESIZE = 1024, /* 行の最大文字数 */
- TOKENSIZE = 256, /* トークンの最大文字数 */
- LABELSIZE = 8, /* ラベルの最大文字数 */
- LABELTABSIZE = 256, /* ラベルの最大数 */
- OPDSIZE = 40, /* オペラントの最大数 */
+ LABELSIZE = 8, /**<ラベルの最大文字数 */
+ OPDSIZE = 40, /**<オペラントの最大数。CASL IIシミュレータの制限 */
};
-/* アセンブルモード */
+/**
+ * @brief YACASL2の制限
+ */
+enum {
+ LINESIZE = 1024, /**<行の最大文字数 */
+ TOKENSIZE = 256, /**<トークンの最大文字数 */
+};
+
+/**
+ * @brief アセンブルモードを表すデータ型
+ */
typedef struct {
- bool src; /* ソースを表示する場合はtrue */
- bool label; /* ラベル表を表示する場合はtrue */
- bool onlylabel; /* ラベル表を表示して終了する場合はtrue */
- bool asdetail; /* アセンブラ詳細結果を表示する場合はtrue */
- bool onlyassemble; /* アセンブルだけを行う場合はtrue */
+ bool src; /**<ソースを表示する場合はtrue */
+ bool label; /**<ラベル表を表示する場合はtrue */
+ bool onlylabel; /**<ラベル表を表示して終了する場合はtrue */
+ bool asdetail; /**<アセンブラ詳細結果を表示する場合はtrue */
+ bool onlyassemble; /**<アセンブルだけを行う場合はtrue */
} ASMODE;
-extern ASMODE asmode;
-
-/* 値を格納するポインタ */
-extern WORD ptr;
-/* リテラル（=付きの値）を格納するポインタ */
-extern WORD lptr;
-
-/* 他のプログラムで参照する入口名 */
-extern char *prog;
+/**
+ * @brief アセンブルモード: src, label, onlylabel, asdetail, onlyassemble
+ */
+extern ASMODE asmode;
-/* アセンブラ命令とマクロ命令を表す番号 */
-typedef enum {
- START = 01,
- END = 02,
- DS = 03,
- DC = 04,
- IN = 011,
- OUT = 012,
- RPUSH = 013,
- RPOP = 014,
-} CASLCMD;
-
-/* アセンブラ命令とマクロ命令を表す配列 */
+/**
+ * @brief アセンブル時の現在およびリテラルのアドレスとプログラム入口名を表すデータ型
+ */
typedef struct {
- CASLCMD cmdid;
- int opdc_min;
- int opdc_max;
- char *cmd;
-} CMDARRAY;
-
-/* ラベル表 */
+ WORD ptr; /**<現在のアドレス */
+ WORD lptr; /**<リテラル（=付きの値）のアドレス */
+ char *prog; /**<他のプログラムで参照する入口名 */
+} ASPTR;
+
+/**
+ * @brief アセンブル時の、現在およびリテラルのアドレスとプログラム入口名: ptr, lptr, prog
+ */
+extern ASPTR *asptr;
+
+/**
+ * @brief ラベル配列を表すデータ型
+ */
+typedef struct {
+ char *prog; /**<プログラム */
+ char *label; /**<ラベル */
+ WORD adr; /**<アドレス */
+} LABELARRAY;
+
+/**
+ * @brief ラベル表を表すデータ型
+ */
typedef struct _LABELTAB {
- struct _LABELTAB *next;
- char *prog;
- char *label;
- WORD adr;
+ struct _LABELTAB *next; /**<リスト次項目へのポインタ */
+ LABELARRAY *label; /**<ラベル配列 */
} LABELTAB;
-/* アセンブラが、1回目か、2回目か、を表す */
+/**
+ * ラベル表のサイズ
+ */
+enum {
+ LABELTABSIZE = 251, /**<ラベル表のサイズ */
+};
+
+/**
+ * @brief アセンブラが、1回目か2回目かを表す数値
+ */
typedef enum {
- FIRST = 0,
- SECOND = 1,
+ FIRST = 0, /**<アセンブラ1回目 */
+ SECOND = 1, /**<アセンブラ2回目 */
} PASS;
-/* プログラム名とラベルに対応するハッシュ値を返す */
-unsigned labelhash(const char *prog, const char *label);
-
-/* プログラム名とラベルに対応するアドレスをラベル表から検索する */
+/**
+ * @brief ラベルのエラーをエラーリストに追加する
+ *
+ * @return なし
+ */
+void addcerrlist_label();
+
+/**
+ * @brief プログラム名とラベルに対応するアドレスをラベル表から検索する
+ *
+ * @return プログラム名とラベルに対応するアドレス
+ *
+ * @param *prog プログラム名
+ * @param *label ラベル
+ */
WORD getlabel(const char *prog, const char *label);
-/* ラベルを表に追加する */
-bool addlabel(const char *prog, const char *label, WORD word);
-
-/* ラベル表を表示する */
+/**
+ * @brief プログラム名、ラベル、アドレスをラベル表に追加する
+ *
+ * @return 追加に成功した時はtrue、失敗した時はfalse
+ *
+ * @param *prog プログラム名
+ * @param *label ラベル
+ * @param adr アドレス
+ */
+bool addlabel(const char *prog, const char *label, WORD adr);
+
+/**
+ * @brief ラベル表を表示する
+ *
+ * @return なし
+ */
void printlabel();
-/* ラベル表を解放する */
+/**
+ * @brief ラベル表を解放する
+ *
+ * @return なし
+ */
void freelabel();
-/* オペランド */
+/**
+ * @brief オペランドを表すデータ型
+ */
typedef struct {
- int opdc;
- char *opdv[OPDSIZE];
+ int opdc; /**<オペランド数 */
+ char *opdv[OPDSIZE]; /**<オペランド配列 */
} OPD;
-/* 命令行 */
+/**
+ * @brief 命令行を表すデータ型
+ */
typedef struct {
- char *label;
- char *cmd;
- OPD *opd;
+ char *label; /**<ラベル */
+ char *cmd; /**<コマンド */
+ OPD *opd; /**<オペランド */
} CMDLINE;
-/* 命令がマクロ命令の場合はメモリに書込
- 書込に成功した場合TRUE、それ以外の場合はFALSEを返す */
-bool macrocmd(const CMDLINE *cmdl, PASS pass);
-
-/* 「,」区切りの文字列から、オペランドを取得する */
-OPD *opdtok(const char *str);
-
-/* 1行を解析する */
+/**
+ * @brief トークン取得のエラーを追加する
+ *
+ * @return なし
+ */
+void addcerrlist_tok();
+
+/**
+ * @brief 行から、ラベル・コマンド・オペランドを取得する
+ *
+ * @return ラベル・コマンド・オペランド
+ *
+ * @param *line 行
+ */
CMDLINE *linetok(const char *line);
-/* 汎用レジスタを表す文字列「GR[0-7]」から、レジスタ番号[0-7]をWORD値で返す */
-/* 文字列が汎用レジスタを表さない場合は、0xFFFFを返す */
-/* is_xがtrueの場合は指標レジスタ。GR0は、COMET IIの仕様により、エラー発生 */
-WORD getgr(const char *str, bool is_x);
-
-/* 10進定数をWORDに変換 */
-WORD getint(const char *str);
-
-/* 16進定数をWORDに変換 */
-WORD gethex(const char *str);
-
-/* アドレスを返す */
-/* アドレスには、リテラル／10進定数／16進定数／アドレス定数が含まれる */
-WORD getadr(const char *prog, const char *str, PASS pass);
-
-/* 定数の前に等号（=）をつけて記述される、リテラルを返す */
-/* リテラルには、10進定数／16進定数／文字定数が含まれる */
-WORD getliteral(const char *str, PASS pass);
-
-/* COMET IIのメモリにアドレス値を書き込む */
-bool writememory(WORD word, WORD adr, PASS pass);
-
-/* ' 'で囲まれた、文字定数をメモリに書込 */
-/* DC命令とリテラルで使い、リテラルの場合はリテラル領域に書込 */
-void writestr(const char *str, bool literal, PASS pass);
-
-/* アセンブラ命令DCをメモリに書込 */
-void writeDC(const char *str, PASS pass);
-
-/* 命令がアセンブラ命令の場合は処理を実行する。
- 実行に成功した場合TRUE、それ以外の場合はFALSEを返す */
-bool assemblecmd(const CMDLINE *cmdl, PASS pass);
-
-/* 命令のコードを返す
- 命令が無効な場合は0xFFFF */
-WORD getcmd(CMDTYPE type, const char *cmd);
-
-/* 命令が機械語命令の場合は処理を実行
- 実行に成功した場合TRUE、それ以外の場合はFALSEを返す */
-bool cometcmd(const CMDLINE *cmdl, PASS pass);
-
-/* 1行のアセンブル */
-/* アセンブル完了時はTRUE、未完了時はFALSEを返す */
-bool assembleline(const CMDLINE *cmdl, PASS pass);
-
-/* 指定された名前のファイルをアセンブル */
-/* 2回実行される */
-bool assemble(const char *file, PASS pass);
-
-/* マクロ命令「IN IBUF,LEN」をメモリに書込 */
-bool writeIN(const char *ibuf, const char *len, PASS pass);
-
-/* マクロ命令「OUT OBUF,LEN」をメモリに書込 */
-bool writeOUT(const char *obuf, const char *len, PASS pass);
-
-/* マクロ命令「RPUSH」をメモリに書込 */
-bool writeRPUSH(PASS pass);
-
-/* マクロ命令「RPOP」をメモリに書込 */
-bool writeRPOP(PASS pass);
+/**
+ * @brief アセンブルエラーをエラーリストに追加する
+ *
+ * @return なし
+ */
+void addcerrlist_assemble();
+
+/**
+ * @brief 指定された名前のファイルをアセンブル\n
+ *
+ * 1回目ではラベルを登録し、2回目ではラベルからアドレスを読み込む
+ *
+ * @return アセンブル完了時はtrue、エラー発生時はfalseを返す
+ *
+ * @param *file ファイル名
+ * @param pass アセンブラが何回目かを表す数
+ */
+bool assemblefile(const char *file, PASS pass);
+
+/**
+ * @brief 指定された1つまたは複数のファイルを2回アセンブル
+ *
+ * @return なし
+ *
+ * @param filec アセンブルするファイルの数
+ * @param filev アセンブルするファイル名の配列
+ * @param adr アセンブル結果を格納するアドレス
+ */
+void assemble(int filec, char *filev[], WORD adr);
+
+/**
+ * @brief ファイルにアセンブル結果を書き込む
+ *
+ * @return なし
+ *
+ * @param *file ファイル名
+ */
+void outassemble(const char *file);
#endif /* YACASL2_ASSEMBLE_INCLUDEDの終端 */
projects / YACASL2.git / blobdiff