hexdump.c
Author: cmaier@cmassoc.net

    /*====================================================================*
     *
     *   void hexdump (void const * memory, size_t offset, size_t extent, FILE * fp);
     *
     *   memory.h
     *
     *   print memory as a hexadecimal dump showing relative offsets and
     *   an ASCII character display; this function is similar to but not
     *   the same as function hexview;
     *
     *   Motley Tools by Charles Maier <cmaier@cmassoc.net>;
     *   Copyright (c) 2001-2006 by Charles Maier Associates;
     *   Licensed under the Internet Software Consortium License;
     *
     *--------------------------------------------------------------------*/

    #ifndef HEXDUMP_SOURCE
    #define HEXDUMP_SOURCE

    #include <stdio.h>
    #include <ctype.h>
    #include <stdint.h>

    #include "../tools/memory.h"
    #include "../tools/number.h"

    void hexdump (void const * memory, size_t offset, size_t extent, FILE * fp)

    {
    	byte * origin = (byte *)(memory);
    	unsigned block = 0x10;
    	size_t lower = block * (offset / block);
    	size_t upper = block + lower;
    	size_t index = 0;
    	char buffer [ADDRSIZE + 72];
    	char * output;
    	while (lower < extent)
    	{
    		output = buffer + ADDRSIZE;
    		for (index = lower; output-- > buffer; index >>= 4)
    		{
    			*output = DIGITS_HEX [index & 0x0F];
    		}
    		output = buffer + ADDRSIZE;
    		for (index = lower; index < upper; index++)
    		{
    			*output++ = ' ';
    			if (index < offset)
    			{
    				*output++ = ' ';
    				*output++ = ' ';
    			}
    			else if (index < extent)
    			{
    				*output++ = DIGITS_HEX [(origin [index] >> 4) & 0x0F];
    				*output++ = DIGITS_HEX [(origin [index] >> 0) & 0x0F];
    			}
    			else
    			{
    				*output++ = ' ';
    				*output++ = ' ';
    			}
    		}
    		*output++ = ' ';
    		for (index = lower; index < upper; index++)
    		{
    			if (index < offset)
    			{
    				*output++ = ' ';
    			}
    			else if (index < extent)
    			{
    				unsigned c = origin [index];
    				*output++ = isprint (c)? c: '.';
    			}
    			else
    			{
    				*output++ = ' ';
    			}
    		}
    		*output++ = '\n';
    		*output++ = '\0';
    		fputs (buffer, fp);
    		lower += block;
    		upper += block;
    	}
    	if (extent)
    	{
    		output = buffer;
    		*output++ = '\n';
    		*output++ = '\0';
    		fputs (buffer, fp);
    	}
    	fflush (fp);
    	return;
    }

    #endif

[PREV] [HOME] [NEXT]