ascii is working

[ascii.git] / ascii.c

/* depend: */
/* cflags: */
/* linker: atoi.o fdprintf.o */

#include <stddef.h>

#include "atoi.h"
#include "fdprintf.h"

/* macros */

#define VERBOSE(level, statement...) do { if (level <= verbose) { statement; } } while(0)
#define VERSION "0.9"

/* gobal variables */

char *progname = NULL;
int verbose = 0;
int nbcols = 4;

char tablechars[256][4] = {
    "NUL", "SOH", "STX", "ETX", "EOT", "ENQ", "ACK", "DEL",
    "DS",  "HT",  "LF",  "VT",  "FF",  "CR",  "SO",  "SI",
    "DLE", "DC1", "DC2", "DC3", "DC4", "NAK", "SYN", "ETB",
    "CAN", "EM",  "SUB", "ESC", "FS",  "GS",  "RS",  "US",
    "SP",  "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "",
    "",    "",    "",    "",    "",    "",    "",    "DEL"};

/* help function */

int usage (int ret)
{
    int fd = ret ? _fd_stderr : _fd_stdout;
    fdprintf (fd, "usage: %s\n", progname);
    fdprintf (fd, " -c : number of columns (%d)\n", nbcols);
    fdprintf (fd, " -h : help message\n");
    fdprintf (fd, " -v : show version\n");

    return ret;
}

/* main function */

int main (int argc, char *argv[]) 
{
    int i = 0;

    progname = argv[0];
    while (progname[i] != '\0') {
        if ((progname[i] == '/') || (progname[i] == '\\')) {
            progname += i + 1;
            i = 0;
        } else {
            i++;
        }
    }

    while (argc-- > 1) {
        char *arg = *(++argv);
        if (arg[0] != '-') {
            PRINTERR ("%s: invalid option -- %s\n", progname, arg);
            return usage (1);
        }
        char c = arg[1];
        switch (c) {
        case 'c':
            arg = (arg[2]) ? arg + 2 : (--argc > 0) ? *(++argv) : NULL;
            if (arg == NULL) {
                PRINTERR ("%s: missing number of columns\n", progname);
                return usage (1);
            }
            nbcols = atoi (arg);
            break;
        case 'v':
            PRINTOUT ("%s: version %s\n", progname, VERSION);
            return 0;
            break;
        case 'h':
        default:
            return usage (c != 'h');
        }
    }

    /* main */

    for (i = 0; i < 256; i++) {
        char line[] = "   [  ]    x";

        if (i > 99) line[0] = '0' + i / 100;
        if (i > 9) line[1] = '0' + (i / 10) % 10;
        line[2] = '0' + i % 10;
        line[4] = '0' + i / 16;
        if (line[4] > '9') line[4] += 'a' - '0' - 10;
        line[5] = '0' + i % 16;
        if (line[5] > '9') line[5] += 'a' - '0' - 10;
        
        if (tablechars[i][0] != '\0') {
            int j = 0;
            while (tablechars[i][j] != '\0') {
                line[8 + j] = tablechars[i][j];
                j++;
            }
        } else {
            line[8] = i;
        }
        line[11] = (((i + 1) % nbcols == 0) || (i == 255)) ? '\n' : ' ';

        fdprintf (_fd_stdout, "%s", line);
    }

    return 0;
}

// test: ascii.exe -h
// test: ascii.exe -h | awk '/usage:/ { rc=1 } END { exit (1-rc) }'
// test: ascii.exe -_ 2> /dev/null | awk 'END { if (NR == 0) { exit(0) } else exit (1) }'
// test: ascii.exe -_ 2>&1 | awk '/usage:/ { rc=1 } END { exit (1-rc) }'

/* vim: set ts=4 sw=4 et: */