From: Christopher Faylor <me@cgf.cx>
Date: Fri, 16 Aug 2002 19:50:22 +0000 (+0000)
Subject: Missed this commit in last checkin.
X-Git-Tag: pre-no-this~170
X-Git-Url: https://sourceware.org/git/?a=commitdiff_plain;h=e0f61e607c336e5ad589afd95a13161a202dd1ba;p=newlib-cygwin.git

Missed this commit in last checkin.
---

diff --git a/winsup/cygwin/malloc_wrapper.cc b/winsup/cygwin/malloc_wrapper.cc
index ee039f30f..96c6d2d12 100644
--- a/winsup/cygwin/malloc_wrapper.cc
+++ b/winsup/cygwin/malloc_wrapper.cc
@@ -1,4 +1,4 @@
-/* malloc.cc
+/* malloc_wrapper.cc
 
    Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
 
@@ -24,6 +24,7 @@ details. */
 #include "heap.h"
 #include "sync.h"
 #include "perprocess.h"
+#include "cygmalloc.h"
 
 /* we provide these stubs to call into a user's
    provided malloc if there is one - otherwise
@@ -103,105 +104,191 @@ strdup (const char *s)
   return strdup_dbg (s, __FILE__, __LINE__);
 }
 #else
-/* Call though the application pointer,
-   which either points to export_malloc, or the application's
-   own version. */
+#endif
+/* These routines are used by the application if it
+   doesn't provide its own malloc. */
 
-void *
-malloc (size_t size)
+extern "C" void
+free (void *p)
 {
-  void *res;
-  res = user_data->malloc (size);
-  return res;
+  malloc_printf ("(%p), called by %x", p, ((int *)&p)[-1]);
+  if (!use_internal_malloc)
+    user_data->free (p);
+  else
+    {
+      __malloc_lock ();
+      dlfree (p);
+      __malloc_unlock ();
+    }
 }
 
-void
-free (void *p)
+extern "C" void *
+malloc (size_t size)
 {
-  user_data->free (p);
+  void *res;
+  export_malloc_called = 1;
+  if (!use_internal_malloc)
+    res = user_data->malloc (size);
+  else
+    {
+      __malloc_lock ();
+      res = dlmalloc (size);
+      __malloc_unlock ();
+    }
+  malloc_printf ("(%d) = %x, called by %x", size, res, ((int *)&size)[-1]);
+  return res;
 }
 
-void *
+extern "C" void *
 realloc (void *p, size_t size)
 {
   void *res;
-  res = user_data->realloc (p, size);
+  if (!use_internal_malloc)
+    res = user_data->realloc (p, size);
+  else
+    {
+      __malloc_lock ();
+      res = dlrealloc (p, size);
+      __malloc_unlock ();
+    }
+  malloc_printf ("(%x, %d) = %x, called by %x", p, size, res, ((int *)&p)[-1]);
   return res;
 }
 
-void *
+extern "C" void *
 calloc (size_t nmemb, size_t size)
 {
   void *res;
-  res = user_data->calloc (nmemb, size);
+  if (!use_internal_malloc)
+    res = user_data->calloc (nmemb, size);
+  else
+    {
+      __malloc_lock ();
+      res = dlcalloc (nmemb, size);
+      __malloc_unlock ();
+    }
+  malloc_printf ("(%d, %d) = %x, called by %x", nmemb, size, res, ((int *)&nmemb)[-1]);
   return res;
 }
 
-extern "C" char *
-strdup (const char *s)
+extern "C" void *
+memalign (size_t alignment, size_t bytes)
 {
-  char *p;
-  size_t len = strlen (s) + 1;
-  if ((p = (char *) malloc (len)) != NULL)
-      memcpy (p, s, len);
-  return p;
+  void *res;
+  if (!use_internal_malloc)
+    {
+      set_errno (ENOSYS);
+      res = NULL;
+    }
+  else
+    {
+      __malloc_lock ();
+      res = dlmemalign (alignment, bytes);
+      __malloc_unlock ();
+    }
+
+  return res;
 }
 
-extern "C" char *
-_strdup_r (struct _reent *, const char *s)
+extern "C" void *
+valloc (size_t bytes)
 {
-  return strdup (s);
-}
-#endif
+  void *res;
+  if (!use_internal_malloc)
+    {
+      set_errno (ENOSYS);
+      res = NULL;
+    }
+  else
+    {
+      __malloc_lock ();
+      res = dlvalloc (bytes);
+      __malloc_unlock ();
+    }
 
-/* These routines are used by the application if it
-   doesn't provide its own malloc. */
+  return res;
+}
 
-extern "C" void
-export_free (void *p)
+extern "C" size_t
+malloc_usable_size (void *p)
 {
-  malloc_printf ("(%p), called by %x", p, ((int *)&p)[-1]);
-  if (use_internal_malloc)
-    _free_r (_impure_ptr, p);
+  size_t res;
+  if (!use_internal_malloc)
+    {
+      set_errno (ENOSYS);
+      res = 0;
+    }
   else
-    user_data->free (p);
+    {
+      __malloc_lock ();
+      res = dlmalloc_usable_size (p);
+      __malloc_unlock ();
+    }
+
+  return res;
 }
 
-extern "C" void *
-export_malloc (int size)
+extern "C" int
+malloc_trim (size_t pad)
 {
-  void *res;
-  export_malloc_called = 1;
-  if (use_internal_malloc)
-    res = _malloc_r (_impure_ptr, size);
+  size_t res;
+  if (!use_internal_malloc)
+    {
+      set_errno (ENOSYS);
+      res = 0;
+    }
   else
-    res = user_data->malloc (size);
-  malloc_printf ("(%d) = %x, called by %x", size, res, ((int *)&size)[-1]);
+    {
+      __malloc_lock ();
+      res = dlmalloc_trim (pad);
+      __malloc_unlock ();
+    }
+
   return res;
 }
 
-extern "C" void *
-export_realloc (void *p, int size)
+extern "C" int
+mallopt (int p, int v)
 {
-  void *res;
-  if (use_internal_malloc)
-    res = _realloc_r (_impure_ptr, p, size);
+  int res;
+  if (!use_internal_malloc)
+    {
+      set_errno (ENOSYS);
+      res = 0;
+    }
   else
-    res = user_data->realloc (p, size);
-  malloc_printf ("(%x, %d) = %x, called by %x", p, size, res, ((int *)&p)[-1]);
+    {
+      __malloc_lock ();
+      res = dlmallopt (p, v);
+      __malloc_unlock ();
+    }
+
   return res;
 }
 
-extern "C" void *
-export_calloc (size_t nmemb, size_t size)
+extern "C" void
+malloc_stats ()
 {
-  void *res;
-  if (use_internal_malloc)
-    res = _calloc_r (_impure_ptr, nmemb, size);
+  if (!use_internal_malloc)
+    set_errno (ENOSYS);
   else
-    res = user_data->calloc (nmemb, size);
-  malloc_printf ("(%d, %d) = %x, called by %x", nmemb, size, res, ((int *)&nmemb)[-1]);
-  return res;
+    {
+      __malloc_lock ();
+      dlmalloc_stats ();
+      __malloc_unlock ();
+    }
+
+  return;
+}
+
+extern "C" char *
+strdup (const char *s)
+{
+  char *p;
+  size_t len = strlen (s) + 1;
+  if ((p = (char *) malloc (len)) != NULL)
+    memcpy (p, s, len);
+  return p;
 }
 
 /* We use a critical section to lock access to the malloc data
@@ -211,14 +298,14 @@ export_calloc (size_t nmemb, size_t size)
    newlib will call __malloc_lock and __malloc_unlock at appropriate
    times.  */
 
-static NO_COPY muto *mprotect = NULL;
+NO_COPY muto *mallock = NULL;
 
 void
 malloc_init ()
 {
-  new_muto (mprotect);
+  new_muto (mallock);
   /* Check if mallock is provided by application. If so, redirect all
-     calls to export_malloc/free/realloc to application provided. This may
+     calls to malloc/free/realloc to application provided. This may
      happen if some other dll calls cygwin's malloc, but main code provides
      its own malloc */
   if (!user_data->forkee)
@@ -232,15 +319,3 @@ malloc_init ()
 	use_internal_malloc = 0;
     }
 }
-
-extern "C" void
-__malloc_lock (struct _reent *)
-{
-  mprotect->acquire ();
-}
-
-extern "C" void
-__malloc_unlock (struct _reent *)
-{
-  mprotect->release ();
-}