/*
 *  malloc_report_statistics with plugin Implementation
 *
 *  COPYRIGHT (c) 1989-2007.
 *  On-Line Applications Research Corporation (OAR).
 *
 *  The license and distribution terms for this file may be
 *  found in the file LICENSE in this distribution or at
 *  http://www.rtems.com/license/LICENSE.
 *
 *  $Id$
 */

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

#ifdef RTEMS_NEWLIB
#include "malloc_p.h"
#include "inttypes.h"

void malloc_report_statistics_with_plugin(
  void                  *context,
  rtems_printk_plugin_t  print
)
{
  rtems_malloc_statistics_t *s = &rtems_malloc_statistics;
  uint32_t space_available = s->space_available;
  uint32_t allocated = (uint32_t) (s->lifetime_allocated - s->lifetime_freed);
  uint32_t max_depth = s->max_depth;
    /* avoid float! */
  uint32_t allocated_per_cent = (allocated * 100) / space_available;
  uint32_t max_depth_per_cent = (max_depth * 100) / space_available;

  (*print)(
    context,
    "Malloc statistics\n"
    "  avail:%"PRIu32"k  allocated:%"PRIu32"k (%"PRIu32"%%) "
      "max:%"PRIu32"k (%"PRIu32"%%)"
      " lifetime:%"PRIuMAX"k freed:%"PRIuMAX"k\n",
    space_available / 1024,
    allocated / 1024,
    allocated_per_cent,
    max_depth / 1024,
    max_depth_per_cent,
    s->lifetime_allocated / 1024,
    s->lifetime_freed / 1024
  );
  (*print)(
    context,
    "  Call counts:   malloc:%"PRIu32"   memalign:%"PRIu32"   free:%"PRIu32
       "   realloc:%"PRIu32"   calloc:%"PRIu32"\n",
    s->malloc_calls,
    s->memalign_calls,
    s->free_calls,
    s->realloc_calls,
    s->calloc_calls
  );
}

#endif