1 files changed, 79 insertions, 0 deletions
diff --git a/dmake/dbug/malloc/m_init.c b/dmake/dbug/malloc/m_init.c
new file mode 100644
index 000000000000..d4fdc0788f4b
--- /dev/null
+++ b/dmake/dbug/malloc/m_init.c
@@ -0,0 +1,79 @@
+/*
+ * (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);
+    }
+
+}
+