79 lines
1.7 KiB
C
79 lines
1.7 KiB
C
/*
|
|
* (c) Copyright 1990 Conor P. Cahill (uunet!virtech!cpcahil).
|
|
* You may copy, distribute, and use this software as long as this
|
|
* copyright statement is not removed.
|
|
*/
|
|
#include <stdio.h>
|
|
#include "malloc.h"
|
|
|
|
/*
|
|
* Function: malloc_init()
|
|
*
|
|
* Purpose: to initialize the pointers and variables use by the
|
|
* malloc() debugging library
|
|
*
|
|
* Arguments: none
|
|
*
|
|
* Returns: nothing of any value
|
|
*
|
|
* Narrative: Just initialize all the needed variables. Use mallopt
|
|
* to set options taken from the environment.
|
|
*
|
|
*/
|
|
#ifndef lint
|
|
static
|
|
char rcs_hdr[] = "$Id: m_init.c,v 1.2 2006-07-25 10:08:07 rt Exp $";
|
|
#endif
|
|
|
|
void
|
|
malloc_init()
|
|
{
|
|
char * cptr;
|
|
char * getenv();
|
|
union malloptarg m;
|
|
extern char * malloc_data_end;
|
|
extern char * malloc_data_start;
|
|
extern struct mlist * malloc_end;
|
|
extern struct mlist malloc_start;
|
|
char * sbrk();
|
|
|
|
/*
|
|
* If already initialized...
|
|
*/
|
|
if( malloc_data_start != (char *) 0)
|
|
{
|
|
return;
|
|
}
|
|
|
|
|
|
malloc_data_start = sbrk(0);
|
|
malloc_data_end = malloc_data_start;
|
|
malloc_start.s.size = 0;
|
|
malloc_end = &malloc_start;
|
|
|
|
if( (cptr=getenv("MALLOC_WARN")) != NULL )
|
|
{
|
|
m.i = atoi(cptr);
|
|
(void) mallopt(MALLOC_WARN,m);
|
|
}
|
|
|
|
if( (cptr=getenv("MALLOC_FATAL")) != NULL)
|
|
{
|
|
m.i = atoi(cptr);
|
|
(void) mallopt(MALLOC_FATAL,m);
|
|
}
|
|
|
|
if( (cptr=getenv("MALLOC_CKCHAIN")) != NULL)
|
|
{
|
|
m.i = atoi(cptr);
|
|
(void) mallopt(MALLOC_CKCHAIN,m);
|
|
}
|
|
|
|
if( (cptr=getenv("MALLOC_ERRFILE")) != NULL)
|
|
{
|
|
m.str = cptr;
|
|
(void) mallopt(MALLOC_ERRFILE,m);
|
|
}
|
|
|
|
}
|
|
|