src/dumpword.c

   1 #include "casl2.h"
   2 #define _GNU_SOURCE
   3 #include <getopt.h>
   4
   5 static struct option longopts[] = {
   6     {"arithmetic", no_argument, NULL, 'a'},
   7     {"logical", no_argument, NULL, 'l'},
   8     {"help", no_argument, NULL, 'h'},
   9     {0, 0, 0, 0},
  10 };
  11
  12 int main(int argc, char *argv[])
  13 {
  14     bool logicalmode = false;    /* レジストリの内容を論理値（0〜65535）で表示する場合はtrue */
  15     int opt;
  16     WORD word;
  17     const char *usage = "Usage: %s [-alh] WORD\n";
  18
  19     while((opt = getopt_long(argc, argv, "alh", longopts, NULL)) != -1) {
  20         switch(opt) {
  21         case 'l':
  22             logicalmode = true;
  23             break;
  24         case 'h':
  25             fprintf(stdout, usage, argv[0]);
  26             return 0;
  27         case '?':
  28             fprintf(stderr, usage, argv[0]);
  29             exit(-1);
  30         }
  31     }
  32
  33     if(argv[optind] == NULL) {
  34         fprintf(stderr, usage, argv[0]);
  35         exit(-1);
  36     }
  37     /* WORD値に変換 */
  38     word = nh2word(argv[optind]);
  39     if(cerrno > 0) {
  40         fprintf(stderr, "Dumpword Error - %d: %s\n", cerrno, cerrmsg);
  41         exit(-1);
  42     }
  43     fprintf(stdout, "%6s: ", argv[optind]);
  44     print_dumpword(word, logicalmode);
  45     return 0;
  46 }