dmu.h

/* dmu.h */
/* $Revision: 1.5 $ dmu.h   $Date: 2000/02/11 12:55:24 $ */
#ifndef __dmu_h
#define __dmu_h

/***********************************************************************
 *
 *            Debugging Memory Usage library ``PAMPERS''
 *
 ***********************************************************************/

#include <malloc.h>
#include <stdlib.h>

/* only for Fortran() macro */
#include <mix/Types.h>


#define DMU_SAFEBAND_ENV    "DMU_SAFEBAND"  /* 256 default */
#define DMU_LEVEL_ENV       "DMU_LEVEL" /* "" */
#define DMU_FILLCHAR_ENV    "DMU_FILLCHAR"  /* 0xbe */
#define DMU_ABORT_ENV       "DMU_ABORT" /* "" (or non-zero) */

#ifdef __cplusplus
extern "C" {
#endif /* __cplusplus */

/* Overload standard methods of memory handling */
void*   dmu_malloc (size_t size, const char* file, int line);
void*   dmu_calloc (size_t nmemb, size_t size, const char* file, int line);
void*   dmu_realloc (void* ptr, size_t size, const char* file, int line);
void    dmu_free (void* ptr, const char* file, int line);

/* Assign fill character code and check band around each memory block */
void    dmu_init (char fill_char, size_t safe_band);

/* Check pointed memory block allocated by dmu_*alloc.  0 is OK */
int dmu_check (void* ptr, const char* file, int line);
/* FORTRAN specially */
int Fortran(dmucheck) (void* ptr);


#ifdef __cplusplus
};
#endif /* __cplusplus */


#ifndef __use_standard_malloc__

/***********************************************************************
 *          Obscure standard memory handler functions
 ***********************************************************************/

#ifndef __FILE__
#define __FILE__    0
#endif /* __FILE__ */

#ifndef __LINE__
#define __LINE__    -1
#endif /* __LINE__ */

#define malloc(size)        dmu_malloc((size),__FILE__,__LINE__)
#define calloc(nmemb,size)  dmu_calloc((nmemb),(size),__FILE__,__LINE__)
#define realloc(ptr,size)   dmu_realloc((ptr),(size),__FILE__,__LINE__)
#define free(ptr)       dmu_free((ptr),__FILE__,__LINE__)

#endif /* __dmu_hides_malloc__ */

#endif /* dmu.h */