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
|
/*
Hex dump utility
by John Walker
WWW home page: http://www.fourmilab.ch/
This program is in the public domain.
*/
#ifdef HEXDUMP
#include <stdio.h>
#include <string.h>
#define EOS '\0'
static char addrformat[80] = "%6X";
static char dataformat1[80] = "%02X";
static int bytesperline = 16, doublechar = 0,
dflen = 2;
static unsigned long fileaddr;
static unsigned char lineecho[32];
/* OUTLINE -- Edit a line of binary data into the selected output
format. */
static void outline(FILE *out, unsigned char *dat, int len)
{
char oline[132];
int i;
sprintf(oline, addrformat, fileaddr);
strcat(oline, ":");
for (i = 0; i < len; i++) {
char outedit[80];
sprintf(outedit, dataformat1, dat[i]);
strcat(oline, (i == (bytesperline / 2)) ? " " : " ");
strcat(oline, outedit);
}
if (doublechar) {
char oc[2];
int shortfall = ((bytesperline - len) * (dflen + 1)) +
(len <= (bytesperline / 2) ? 1 : 0);
while (shortfall-- > 0) {
strcat(oline, " ");
}
oc[1] = EOS;
strcat(oline, " | ");
for (i = 0; i < len; i++) {
int b = dat[i];
/* Map non-printing characters to "." according to the
definitions for ISO 8859/1 Latin-1. */
if (b < ' ' || (b > '~' && b < 145)
|| (b > 146 && b < 160)) {
b = '.';
}
oc[0] = b;
strcat(oline, oc);
}
}
strcat(oline, "\n");
fputs(oline, out);
}
/* XD -- Dump a buffer.
xd(out, buf, bufl, dochar);
out FILE * to which output is sent.
buf Address of buffer to dump.
bufl Buffer length in bytes.
dochar If nonzero, show ASCII/ISO characters
as well as hexadecimal.
*/
void xd(FILE *out, void *bub, int bufl, int dochar)
{
int b, bp;
unsigned char *buf = (unsigned char *) bub;
bp = 0;
fileaddr = 0;
doublechar = dochar;
while (bufl-- > 0) {
b = *buf++;
if (bp >= bytesperline) {
outline(out, lineecho, bp);
bp = 0;
fileaddr += bytesperline;
}
lineecho[bp++] = b;
}
if (bp > 0) {
outline(out, lineecho, bp);
}
}
#endif
|
