summaryrefslogtreecommitdiff
path: root/util/lxbios/hexdump.c
blob: b5c81f08663fd5f0e406dd30ad76a5506f88918f (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
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
/*****************************************************************************\
 * hexdump.c
 * $Id$
\*****************************************************************************/

#include "hexdump.h"

/* hexdump.c
 *
 * Copyright (C) 2002
 *     David S. Peterson.  All rights reserved.
 *
 * Author: David S. Peterson <dave_peterson@pobox.com>
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are
 * met:
 * 1. Redistributions of source code must retain the above copyright notice,
 *    this list of conditions, and the entire permission notice, including
 *    the following disclaimer of warranties.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions, and the entire permission notice,
 *    including the following disclaimer in the documentation and/or other
 *    materials provided with the distribution.
 * 3. The name(s) of the author(s) may not be used to endorse or promote
 *    products derived from this software without specific prior written
 *    permission.
 *
 * ALTERNATIVELY, this product may be distributed under the terms of the GNU
 * General Public License, in which case the provisions of the GPL are
 * required INSTEAD OF the above restrictions.  (This clause is necessary due
 * to a potential bad interaction between the GPL and the restrictions
 * contained in a BSD-style copyright.)
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE, ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

static void addrprint (FILE *outfile, uint64_t address, int width);
static void hexprint (FILE *outfile, unsigned char byte);
static void charprint (FILE *outfile, unsigned char byte,
                       unsigned char nonprintable,
                       is_printable_fn_t is_printable_fn);

/*--------------------------------------------------------------------------
 * hexdump
 *
 * Write a hex dump of 'mem' to 'outfile'.
 *
 * parameters:
 *     mem:             a pointer to the memory to display
 *     bytes:           the number of bytes of data to display
 *     addrprint_start: The address to associate with the first byte of
 *                      data.  For instance, a value of 0 indicates that the
 *                      first byte displayed should be labeled as byte 0.
 *     outfile:         The place where the hex dump should be written.
 *                      For instance, stdout or stderr may be passed here.
 *     format:          A structure specifying how the hex dump should be
 *                      formatted.
 *--------------------------------------------------------------------------*/
void hexdump (const void *mem, int bytes, uint64_t addrprint_start,
              FILE *outfile, const hexdump_format_t *format)
 { int bytes_left, index, i;
   const unsigned char *p;
   is_printable_fn_t is_printable_fn;

   /* Quietly return if the caller asks us to do something unreasonable. */
   if ((format->bytes_per_line <= 0) || (bytes < 0))
      return;

   is_printable_fn = format->is_printable_fn;

   if (is_printable_fn == NULL)
      is_printable_fn = default_is_printable_fn;

   p = (const unsigned char *) mem;
   index = 0;

   /* Each iteration handles one full line of output.  When loop terminates,
    * the number of remaining bytes to display (if any) will not be enough to
    * fill an entire line.
    */
   for (bytes_left = bytes;
        bytes_left >= format->bytes_per_line;
        bytes_left -= format->bytes_per_line)
    { /* print start address for current line */
      fprintf(outfile, format->indent);
      addrprint(outfile, addrprint_start + index, format->addrprint_width);
      fprintf(outfile, format->sep1);

      /* display the bytes in hex */
      for (i = 0; ; )
       { hexprint(outfile, p[index++]);

         if (++i >= format->bytes_per_line)
            break;

         fprintf(outfile, format->sep2);
       }

      index -= format->bytes_per_line;
      fprintf(outfile, format->sep3);

      /* display the bytes as characters */
      for (i = 0; i < format->bytes_per_line; i++)
         charprint(outfile, p[index++], format->nonprintable,
                   is_printable_fn);

      fprintf(outfile, "\n");
    }

   if (bytes_left == 0)
      return;

   /* print start address for last line */
   fprintf(outfile, format->indent);
   addrprint(outfile, addrprint_start + index, format->addrprint_width);
   fprintf(outfile, format->sep1);

   /* display bytes for last line in hex */
   for (i = 0; i < bytes_left; i++)
    { hexprint(outfile, p[index++]);
      fprintf(outfile, format->sep2);
    }

   index -= bytes_left;

   /* pad the rest of the hex byte area with spaces */
   for (; ; )
    { fprintf(outfile, "  ");

      if (++i >= format->bytes_per_line)
         break;

      fprintf(outfile, format->sep2);
    }

   fprintf(outfile, format->sep3);

   /* display bytes for last line as characters */
   for (i = 0; i < bytes_left; i++)
      charprint(outfile, p[index++], format->nonprintable, is_printable_fn);

   /* pad the rest of the character area with spaces */
   for (; i < format->bytes_per_line; i++)
      fprintf(outfile, " ");

   fprintf(outfile, "\n");
 }

/*--------------------------------------------------------------------------
 * default_is_printable_fn
 *
 * Determine whether the input character is printable.  The proper behavior
 * for this type of function may be system-dependent.  This function takes a
 * conservative approach.  If it is not adequate for your purposes, you can
 * write your own.
 *
 * parameters:
 *     c: the input character
 *
 * return value:
 *     Return 1 if the input character is printable.  Otherwise return 0.
 *--------------------------------------------------------------------------*/
int default_is_printable_fn (unsigned char c)
 { return (c >= 0x20) && (c <= 0x7e); }

/*--------------------------------------------------------------------------
 * addrprint
 *
 * Display an address as a hexadecimal number.
 *
 * parameters:
 *     outfile: the place where the output should be written
 *     address: the address to display
 *     width:   The number of bytes wide the address should be displayed as.
 *              Must be a value from 1 to 8.
 *--------------------------------------------------------------------------*/
static void addrprint (FILE *outfile, uint64_t address, int width)
 { char s[17];
   int i;

   /* force the user's input to be valid */
   if (width < 1)
      width = 1;
   else if (width > 8)
      width = 8;

   /* convert address to string */
   sprintf(s, "%016llx", (unsigned long long) address);

   /* write it out, with colons separating consecutive 16-bit chunks of the
    * address
    */
   for (i = 16 - (2 * width); ; )
    { fprintf(outfile, "%c", s[i]);

      if (++i >= 16)
         break;

      if ((i % 4) == 0)
         fprintf(outfile, ":");
    }
 }

/*--------------------------------------------------------------------------
 * hexprint
 *
 * Display a byte as a two digit hex value.
 *
 * parameters:
 *     outfile: the place where the output should be written
 *     byte:    the byte to display
 *--------------------------------------------------------------------------*/
static void hexprint (FILE *outfile, unsigned char byte)
 { static const char tbl[] =
    { '0', '1', '2', '3', '4', '5', '6', '7',
      '8', '9', 'a', 'b', 'c', 'd', 'e', 'f'
    };

   fprintf(outfile, "%c%c", tbl[byte >> 4], tbl[byte & 0x0f]);
 }

/*--------------------------------------------------------------------------
 * charprint
 *
 * Display a byte as its character representation.
 *
 * parameters:
 *     outfile:         the place where the output should be written
 *     byte:            the byte to display
 *     nonprintable:    a substitute character to display if the byte
 *                      represents a nonprintable character
 *     is_printable_fn: a function that returns a boolean value indicating
 *                      whether a given character is printable
 *--------------------------------------------------------------------------*/
static void charprint (FILE *outfile, unsigned char byte,
                       unsigned char nonprintable,
                       is_printable_fn_t is_printable_fn)
 { fprintf(outfile, "%c", is_printable_fn(byte) ? byte : nonprintable); }