/*
   Dump hexa + ascii (if printable) more friendly than od -xc output
   JMM
*/
#include <ctype.h>
#include <stdio.h>
#include <unistd.h>


#define MAX_CHARS_PER_OUTPUTLINE 64


int chars_per_outputline=16;


main(argc,argv)
int argc;
char **argv;
{
    int opt;
    extern int optind;
    extern char *optarg;


    /* Options treatment */
    while ((opt=getopt(argc,argv,"w:")) != EOF)
    {
        switch (opt)
        {
            case 'w':   /* width -> number of decoded chars per output line */
                chars_per_outputline=((MAX_CHARS_PER_OUTPUTLINE)<(atoi(optarg)) ? (MAX_CHARS_PER_OUTPUTLINE) : (atoi(optarg)));
                break;
            case '?':   /* wrong option */
                fprintf(stderr,"Usage: %s [-w linewidth] [file1 [file2 [...]]]\n",argv[0]);
                exit(2);
        } /* switch */
    } /* while */


    if (optind == argc)
        odxa_output(stdin);
    else
    {
        FILE *fd;
        for ( ; optind<argc ; optind++)
        {
            if (access(argv[optind],R_OK) == 0)
            {
                if ((fd = fopen(argv[optind],"r")) != NULL)
                {
                    odxa_output(fd);
                    fclose(fd);
                }
                else
                    fprintf(stderr,"Unable to open %s for reading\n",argv[optind]);
            }
            else
                fprintf(stderr,"Cannot access %s\n",argv[optind]);
        } /* for */
    } /* if */
}/* main */


/*
Formatted output of dumped filedesc content
*/
odxa_output(filedesc)
FILE *filedesc;
{
    register c;
    register long i;
    char ascii[MAX_CHARS_PER_OUTPUTLINE+1], hexa[(3*MAX_CHARS_PER_OUTPUTLINE)+1] ;

    for (i=0;;i++)
    {
        sprintf(&ascii[i%chars_per_outputline], "%c", isprint(c=fgetc(filedesc))?c:'.');
        sprintf(&hexa[(i%chars_per_outputline)*3], "%02x ", c);
        if (i%chars_per_outputline == chars_per_outputline-1 || c == EOF )
        {
            if (c == EOF)
            {
                ascii[i%chars_per_outputline]='\0';
                hexa[(i%chars_per_outputline)*3]='\0';
            }
            printf("%07ld  %-*s| %-*s |\n", i-(i%chars_per_outputline), chars_per_outputline*3, hexa, chars_per_outputline, ascii);
        }
        if (feof(filedesc)) break;
    } /* for */
} /* odxa_output */