casl2rev.c

Go to the documentation of this file.

#define _GNU_SOURCE
#include "package.h"
#include "disassemble.h"
#include "load.h"

static struct option longopts[] = {
    {"version", no_argument, NULL, 'v' },
    {"help", no_argument, NULL, 'h'},
    {0, 0, 0, 0},
};

int main(int argc, char *argv[])
{
    int opt = 0;
    int stat = 0;
    const char *version = PACKAGE_VERSION;
    const char *cmdversion = "disassemble of YACASL2 version %s\n";
    const char *usage = "Usage: %s [-vh] FILE\n";
 
    /* エラーの定義 */
    cerr_init();
    addcerrlist_load();
 
    /* オプションの処理 */
    while((opt = getopt_long(argc, argv, "vh", longopts, NULL)) != -1) {
        switch(opt) {
        case 'v':
            fprintf(stdout, cmdversion, version);
            goto casl2revfin;
        case 'h':
            fprintf(stdout, usage, argv[0]);
            goto casl2revfin;
        case '?':
            fprintf(stderr, usage, argv[0]);
            setcerr(212, "");    /* invalid option */
            goto casl2revfin;
        }
    }
    if(argv[optind] == NULL) {
        setcerr(211, "");    /* object file not specified */
        fprintf(stderr, "disassemble error - %d: %s\n", cerr->num, cerr->msg);
        goto casl2revfin;
    }
    create_cmdtable(HASH_CODE); /* 命令コードがキーのハッシュ表を作成 */
    disassemble_file(argv[optind]); /* プログラム実行 */
casl2revfin:
    if(cerr->num > 0) {
        stat = 1;
    }
    free_cmdtable(HASH_CODE); /* 命令のコードとタイプがキーのハッシュ表を解放 */
    freecerr();               /* エラーの解放 */
    return stat;
}