/**
 * @file
 *
 * @brief Dump Buffer
 * @ingroup libmisc_dumpbuf Print Memory Buffer
 */

/*
 *  COPYRIGHT (c) 1997-2007.
 *  On-Line Applications Research Corporation (OAR).
 *
 *  The license and distribution terms for this file may in
 *  the file LICENSE in this distribution or at
 *  http://www.rtems.com/license/LICENSE.
 */

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include <rtems/dumpbuf.h>
#include <rtems/bspIo.h>

/*
 *  Put the body below rtems_print_buffer so it won't get inlined.
 */

static inline void Dump_Line(
  const unsigned char *buffer,
  int                  length
);

void rtems_print_buffer(
  const unsigned char *buffer,
  int                  length
)
{

  int i, mod, max;

  if ( !length ) return;

  mod = length % 16;

  max = length - mod;

  for ( i=0 ; i<max ; i+=16 )
    Dump_Line( &buffer[ i ], 16 );

  if ( mod )
    Dump_Line( &buffer[ max ], mod );
}

static inline void Dump_Line(
  const unsigned char *buffer,
  int                  length
)
{

  int  i;
  char line_buffer[120];

  line_buffer[0] = '\0';

  for( i=0 ; i<length ; i++ )
    sprintf( line_buffer, "%s%02x ", line_buffer, buffer[ i ] );

  for( ; i<16 ; i++ )
    strcat( line_buffer, "   " );

  strcat( line_buffer, "|" );
  for( i=0 ; i<length ; i++ )
    sprintf( line_buffer, "%s%c", line_buffer,
             isprint( buffer[ i ] ) ? buffer[ i ] : '.' );

  for( ; i<16 ; i++ )
    strcat( line_buffer, " " );

  strcat( line_buffer, "|\n" );

  printk( line_buffer );
}