aboutsummaryrefslogtreecommitdiff
path: root/utils/hxascdmp.c
blob: 467e3a7c92229e8e38061bf2930f1c5914b14c6f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
#include <stdlib.h>
#include <stdio.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <string.h>

#define DEF_BYTES_PER_LINE 16

static int bytes_per_line = DEF_BYTES_PER_LINE;

#define CHARS_PER_HEX_BYTE 3
#define BINARY_START_COL 6
#define MAX_LINE_LENGTH 257


static void dStrHex(const char* str, int len, long start)
{
    const char* p = str;
    unsigned char c;
    char buff[MAX_LINE_LENGTH];
    long a = start;
    const int bpstart = BINARY_START_COL;
    const int cpstart = BINARY_START_COL + 
			((CHARS_PER_HEX_BYTE * bytes_per_line) + 1) + 5;
    int cpos = cpstart;
    int bpos = bpstart;
    int midline_space = (bytes_per_line / 2) + 1;
    int i, k, line_length;
    
    if (len <= 0) 
	return;
    line_length = BINARY_START_COL + 
	          (bytes_per_line * (1 + CHARS_PER_HEX_BYTE)) + 7;
    if (line_length >= MAX_LINE_LENGTH)
    {
	fprintf(stderr, "bytes_per_line causes maximum line length of %d "
			"to be exceeded\n", MAX_LINE_LENGTH);
	return;
    }
    memset(buff, ' ', line_length);
    buff[line_length] = '\0';
    k = sprintf(buff + 1, "%.2lx", a);
    buff[k + 1] = ' ';
    if (bpos >= ((bpstart + (midline_space * CHARS_PER_HEX_BYTE))))
        bpos++;

    for(i = 0; i < len; i++)
    {
        c = *p++;
        bpos += CHARS_PER_HEX_BYTE;
        if (bpos == (bpstart + (midline_space * CHARS_PER_HEX_BYTE)))
            bpos++;
        sprintf(&buff[bpos], "%.2x", (int)(unsigned char)c);
        buff[bpos + 2] = ' ';
        if ((c < ' ') || (c >= 0x7f))
            c='.';
        buff[cpos++] = c;
        if (cpos >= (cpstart + bytes_per_line))
        {
            printf("%s\n", buff);
            bpos = bpstart;
            cpos = cpstart;
            a += bytes_per_line;
            memset(buff,' ', line_length);
            k = sprintf(buff + 1, "%.2lx", a);
            buff[k + 1] = ' ';
        }
    }
    if (cpos > cpstart)
        printf("%s\n", buff);
}


static void usage()
{
    fprintf(stderr, "Usage: hxascdmp [-b=<n>] [-h] [-?] [file+] \n");
    fprintf(stderr, "  Sends hex ASCII dump of stdin/file to stdout\n");
    fprintf(stderr, "  where:\n");
    fprintf(stderr, "          -b=<n>         bytes per line to display "
		    "(def: 16)\n");
    fprintf(stderr, "          -h             print this usage message\n");
    fprintf(stderr, "          -?             print this usage message\n");
    fprintf(stderr, "          file           reads file(s) and outputs it "
		    "as hex ASCII\n");
    fprintf(stderr, "                         if no files reads stdin\n");
}

int main(int argc, const char ** argv)
{
    char buff[8192];
    int num = 8192;
    long start = 0;
    int res, k, u;
    int inFile = 0;	/* stdin */
    int doHelp = 0;
    int hasFilename = 0;

    for (k = 1; k < argc; k++)
    {
	if (0 == strncmp("-b=", argv[k], 3)) 
	{
	    res = sscanf(argv[k] + 3, "%d", &u);
	    if ((1 != res) || (u < 1)) 
	    {
		printf("Bad value after '-b' switch\n");
		usage();
		return 1;
	    }
	    bytes_per_line = u;
	}
    	else if (0 == strcmp("-h", argv[k]))
    	    doHelp = 1;
    	else if (0 == strcmp("-?", argv[k]))
    	    doHelp = 1;
	else if (*argv[k] == '-')
	{
	    fprintf(stderr, "unknown switch: %s\n", argv[k]);
	    usage();
	    return 1;
	}
	else
	{
	    hasFilename = 1;
	    break;
	}
    }
    if (doHelp)
    {
	usage();
	return 0;
    }

    /* Make sure num to fetch is integral multiple of bytes_per_line */
    if (0 != (num % bytes_per_line))
	num = (num / bytes_per_line) * bytes_per_line;

    if (hasFilename)
    {
	for ( ; k < argc; k++)
	{
	    inFile = open(argv[k], O_RDONLY);
	    if (inFile < 0)
	    {
	    	fprintf(stderr, "Couldn't open file: %s\n", argv[k]);
	    }
	    else
	    {
	    	start = 0;
	    	printf("ASCII hex dump of file: %s\n", argv[k]);
		while ((res = read(inFile, buff, num)) > 0)
		{
		    dStrHex(buff, res, start);
		    start += (long)res;
		}
	    }
	    close(inFile);
	    printf("\n");
	}
    }
    else
    {
	while ((res = read(inFile, buff, num)) > 0)
	{
	    dStrHex(buff, res, start);
	    start += (long)res;
	}
    }
    return 0;
}