-#include "casl2.h"
#define _GNU_SOURCE
+#include <stdio.h>
+#include <stdlib.h>
#include <getopt.h>
+#include "word.h"
+#include "cerr.h"
+/**
+ * dumpwordコマンドのオプション
+ */
static struct option longopts[] = {
- {"arithmetic", no_argument, NULL, 'a'},
- {"logical", no_argument, NULL, 'l'},
- {"help", no_argument, NULL, 'h'},
- {0, 0, 0, 0}
+ { "arithmetic", no_argument, NULL, 'a' },
+ { "logical", no_argument, NULL, 'l' },
+ { "help", no_argument, NULL, 'h' },
+ { 0, 0, 0, 0 },
};
+/**
+ * dumpwordコマンドのメイン
+ */
int main(int argc, char *argv[])
{
+ bool logicalmode = false; /* レジストリの内容を論理値(0から65535)で表示する場合はtrue */
int opt;
- WORD w;
- char *check;
+ WORD word;
const char *usage = "Usage: %s [-alh] WORD\n";
- logicalmode = false;
+ cerr_init();
+ addcerrlist_word();
while((opt = getopt_long(argc, argv, "alh", longopts, NULL)) != -1) {
switch(opt) {
case 'l':
break;
case 'h':
fprintf(stdout, usage, argv[0]);
- exit(-1);
+ return 0;
case '?':
fprintf(stderr, usage, argv[0]);
exit(-1);
fprintf(stderr, usage, argv[0]);
exit(-1);
}
- if(*argv[optind] == '-' || strlen(argv[optind]) > 4) {
- setcerr(116, argv[optind]); /* out of hex range */
- }
/* WORD値に変換 */
- w = (WORD)strtol(argv[optind], &check, 16);
- if(*check != '\0') {
- setcerr(115, argv[optind]); /* not hex */
- }
- if(cerrno > 0) {
- fprintf(stderr, "Dumpword Error - %d: %s\n", cerrno, cerrmsg);
+ word = nh2word(argv[optind]);
+ if(cerr->num > 0) {
+ fprintf(stderr, "Dumpword Error - %d: %s\n", cerr->num, cerr->msg);
exit(-1);
}
- if(logicalmode == true) {
- fprintf(stdout, "%4s: %6d = #%04X = %s\n", argv[optind], w, w, word2bit(w));
- } else {
- fprintf(stdout, "%4s: %6d = #%04X = %s\n", argv[optind], (short)w, w, word2bit(w));
- }
+ fprintf(stdout, "%6s: ", argv[optind]);
+ print_dumpword(word, logicalmode);
return 0;
}