| 1 | /* depend: */ |
| 2 | /* cflags: */ |
| 3 | /* linker: atoi.o fdprintf.o */ |
| 4 | |
| 5 | #include <stddef.h> |
| 6 | |
| 7 | #include "atoi.h" |
| 8 | #include "fdprintf.h" |
| 9 | |
| 10 | /* macros */ |
| 11 | |
| 12 | #define VERBOSE(level, statement...) do { if (level <= verbose) { statement; } } while(0) |
| 13 | #define VERSION "0.9" |
| 14 | |
| 15 | /* gobal variables */ |
| 16 | |
| 17 | char *progname = NULL; |
| 18 | int verbose = 0; |
| 19 | int nbcols = 4; |
| 20 | |
| 21 | char tablechars[256][4] = { |
| 22 | "NUL", "SOH", "STX", "ETX", "EOT", "ENQ", "ACK", "DEL", |
| 23 | "DS", "HT", "LF", "VT", "FF", "CR", "SO", "SI", |
| 24 | "DLE", "DC1", "DC2", "DC3", "DC4", "NAK", "SYN", "ETB", |
| 25 | "CAN", "EM", "SUB", "ESC", "FS", "GS", "RS", "US", |
| 26 | "SP", "", "", "", "", "", "", "", |
| 27 | "", "", "", "", "", "", "", "", |
| 28 | "", "", "", "", "", "", "", "", |
| 29 | "", "", "", "", "", "", "", "", |
| 30 | "", "", "", "", "", "", "", "", |
| 31 | "", "", "", "", "", "", "", "", |
| 32 | "", "", "", "", "", "", "", "", |
| 33 | "", "", "", "", "", "", "", "", |
| 34 | "", "", "", "", "", "", "", "", |
| 35 | "", "", "", "", "", "", "", "", |
| 36 | "", "", "", "", "", "", "", "", |
| 37 | "", "", "", "", "", "", "", "DEL"}; |
| 38 | |
| 39 | /* help function */ |
| 40 | |
| 41 | int usage (int ret) |
| 42 | { |
| 43 | int fd = ret ? stdfderr : stdfdout; |
| 44 | fdprintf (fd, "usage: %s\n", progname); |
| 45 | fdprintf (fd, " -c : number of columns (%d)\n", nbcols); |
| 46 | fdprintf (fd, " -h : help message\n"); |
| 47 | fdprintf (fd, " -v : show version\n"); |
| 48 | |
| 49 | return ret; |
| 50 | } |
| 51 | |
| 52 | /* main function */ |
| 53 | |
| 54 | int main (int argc, char *argv[]) |
| 55 | { |
| 56 | int i = 0; |
| 57 | |
| 58 | /* programm name */ |
| 59 | |
| 60 | progname = argv[0]; |
| 61 | while (progname[i] != '\0') { |
| 62 | if ((progname[i] == '/') || (progname[i] == '\\')) { |
| 63 | progname += i + 1; |
| 64 | i = 0; |
| 65 | } else { |
| 66 | i++; |
| 67 | } |
| 68 | } |
| 69 | |
| 70 | /* argument processing */ |
| 71 | |
| 72 | while (argc-- > 1) { |
| 73 | char *arg = *(++argv); |
| 74 | if (arg[0] != '-') { |
| 75 | PRINTERR ("%s: invalid option -- %s\n", progname, arg); |
| 76 | return usage (1); |
| 77 | } |
| 78 | char c = arg[1]; |
| 79 | switch (c) { |
| 80 | case 'c': |
| 81 | arg = (arg[2]) ? arg + 2 : (--argc > 0) ? *(++argv) : NULL; |
| 82 | if (arg == NULL) { |
| 83 | PRINTERR ("%s: missing number of columns\n", progname); |
| 84 | return usage (1); |
| 85 | } |
| 86 | nbcols = atoi (arg); |
| 87 | break; |
| 88 | case 'v': |
| 89 | PRINTOUT ("%s: version %s\n", progname, VERSION); |
| 90 | return 0; |
| 91 | break; |
| 92 | case 'h': |
| 93 | default: |
| 94 | return usage (c != 'h'); |
| 95 | } |
| 96 | } |
| 97 | |
| 98 | /* main */ |
| 99 | |
| 100 | int n = (256 + nbcols - 1) / nbcols; |
| 101 | for (i = 0; i < n * nbcols; i++) { |
| 102 | char line[] = " [ ] x"; |
| 103 | int j = i / nbcols + (i % nbcols) * n; |
| 104 | |
| 105 | if (j > 255) { |
| 106 | PRINTOUT ("\n"); |
| 107 | continue; |
| 108 | } |
| 109 | |
| 110 | if (j > 99) line[0] = '0' + j / 100; |
| 111 | if (j > 9) line[1] = '0' + (j / 10) % 10; |
| 112 | line[2] = '0' + j % 10; |
| 113 | line[4] = '0' + j / 16; |
| 114 | if (line[4] > '9') line[4] += 'a' - '0' - 10; |
| 115 | line[5] = '0' + j % 16; |
| 116 | if (line[5] > '9') line[5] += 'a' - '0' - 10; |
| 117 | |
| 118 | if (tablechars[j][0] != '\0') { |
| 119 | int k = 0; |
| 120 | while (tablechars[j][k] != '\0') { |
| 121 | line[8 + k] = tablechars[j][k]; |
| 122 | k++; |
| 123 | } |
| 124 | } else { |
| 125 | line[8] = j; |
| 126 | } |
| 127 | line[11] = ((i + 1) % nbcols == 0) ? '\n' : ' '; |
| 128 | |
| 129 | PRINTOUT ("%s", line); |
| 130 | } |
| 131 | |
| 132 | return 0; |
| 133 | } |
| 134 | |
| 135 | // test: ascii.exe -h |
| 136 | // test: ascii.exe -h | awk '/usage:/ { rc=1 } END { exit (1-rc) }' |
| 137 | // test: ascii.exe -_ 2>/dev/null | awk 'END { if (NR == 0) { exit(0) } else exit (1) }' |
| 138 | // test: ascii.exe error 2>&1 | grep -q 'invalid option' |
| 139 | // test: ascii.exe -_ 2>&1 | awk '/usage:/ { rc=1 } END { exit (1-rc) }' |
| 140 | |
| 141 | // test: ascii.exe | awk '/ 64\[40\] @/ { rc=1 } END { exit (1-rc) }' |
| 142 | // test: ascii.exe | awk '/127\[7f\] DEL/ { rc=1 } END { exit (1-rc) }' |
| 143 | // test: ascii.exe -v | grep -q version |
| 144 | // test: ascii.exe -c 4 | tail -1 | awk '/63/ { rc=1 } END { exit (1-rc) }' |
| 145 | // test: ascii.exe -c 5 | tail -1 | awk '/51/ { rc=1 } END { exit (1-rc) }' |
| 146 | // test: ascii.exe -c 6 | tail -1 | awk '/42/ { rc=1 } END { exit (1-rc) }' |
| 147 | // test: ascii.exe -c 2>&1 | grep -q 'missing number of columns' |
| 148 | |
| 149 | /* vim: set ts=4 sw=4 et: */ |