compiler/arossupport/hexdump.c

   1 /*
   2     Copyright © 1995-2016, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: Prints a hexdump of a memory region
   6     Lang: english
   7 */
   8
   9 #include <aros/debug.h>
  10
  11 /*****************************************************************************
  12
  13     NAME */
  14 #include <proto/arossupport.h>
  15
  16         void hexdump (
  17
  18 /*  SYNOPSIS */
  19         const void * data,
  20         IPTR         offset,
  21         ULONG        count)
  22
  23 /*  FUNCTION
  24         Prints a hexdump of the data beginning at 'data'. The format
  25         is like this:
  26
  27         xxxxxxxx: dddddddd dddddddd dddddddd dddddddd aaaaaaaaaaaaaaaa
  28
  29         Where x is the address (8 chars hex), dd is a data byte (2 chars
  30         hex) and a is the ASCII representation of a data byte or "." if
  31         the data byte is not printable.
  32
  33     INPUTS
  34         data - Start here with the dump
  35         offset - This offset is used as the address in the output. If
  36                 you give 0L here, then the first address will be
  37                 00000000. If you give (IPTR)data here, then the
  38                 first address will be the memory address of the data.
  39         count - How many bytes to print.
  40
  41     RESULT
  42         None.
  43
  44     NOTES
  45
  46     EXAMPLE
  47
  48     BUGS
  49
  50     SEE ALSO
  51
  52     INTERNALS
  53
  54 ******************************************************************************/
  55 {
  56     ULONG t, end;
  57     int   i;
  58
  59     end = (count + 15) & -16;
  60
  61     for (t=0; t<end; t++)
  62     {
  63         if ((t&15) == 0)
  64             kprintf ("%p:", offset+t);
  65
  66         if ((t&3) == 0)
  67             kprintf (" ");
  68
  69         if (t < count)
  70             kprintf ("%02x", ((UBYTE *)data)[t]);
  71         else
  72             kprintf ("  ");
  73
  74         if ((t&15) == 15)
  75         {
  76             kprintf (" ");
  77
  78             for (i=15; i>=0; i--)
  79             {
  80                 UBYTE c = ((UBYTE *)data)[t-i];
  81
  82                 /*
  83                  * isprint() introduces dependency on stdc.library, which
  84                  * prevents using this function from within KS code.
  85                  */
  86                 if ((c > 0x1F) && (c < 0x7E))
  87                     kprintf ("%c", c);
  88                 else
  89                     kprintf (".");
  90             }
  91
  92             kprintf ("\n");
  93         }
  94     }
  95 } /* hexdump */