1 files changed, 107 insertions, 0 deletions
diff --git a/tools/mem.c b/tools/mem.c
new file mode 100644
index 0000000..8b2da75
--- /dev/null
+++ b/tools/mem.c
@@ -0,0 +1,107 @@
+/* This file is part of GDBM, the GNU data base manager.
+   Copyright (C) 2011-2021 Free Software Foundation, Inc.
+
+   GDBM is free software; you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation; either version 3, or (at your option)
+   any later version.
+
+   GDBM is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with GDBM. If not, see <http://www.gnu.org/licenses/>.   */
+
+# include "autoconf.h"
+# include "gdbm.h"
+# include "gdbmapp.h"
+# include "gdbmdefs.h"
+
+void
+ealloc_die (void)
+{
+  error ("%s", strerror (ENOMEM));
+  exit (EXIT_FATAL);
+}
+
+void *
+emalloc (size_t size)
+{
+  void *p = malloc (size);
+  if (!p)
+    ealloc_die ();
+  return p;
+}
+
+void *
+erealloc (void *ptr, size_t size)
+{
+  void *newptr = realloc (ptr, size);
+  if (!newptr)
+    ealloc_die ();
+  return newptr;
+}
+
+void *
+ecalloc (size_t nmemb, size_t size)
+{
+  void *p = calloc (nmemb, size);
+  if (!p)
+    ealloc_die ();
+  return p;
+}
+
+void *
+ezalloc (size_t size)
+{
+  return ecalloc (1, size);
+}
+
+char *
+estrdup (const char *str)
+{
+  char *p;
+
+  if (!str)
+    return NULL;
+  p = emalloc (strlen (str) + 1);
+  strcpy (p, str);
+  return p;
+}
+
+void *
+e2nrealloc (void *p, size_t *pn, size_t s)
+{
+  size_t n = *pn;
+  char *newp;
+	
+  if (!p)
+    {
+      if (!n)
+	{
+	  /* The approximate size to use for initial small
+	     allocation requests, when the invoking code
+	     specifies an old size of zero.  64 bytes is
+	     the largest "small" request for the
+	     GNU C library malloc.  */
+	  enum { DEFAULT_MXFAST = 64 };
+	  
+	  n = DEFAULT_MXFAST / s;
+	  n += !n;
+	}
+    }
+  else if ((size_t) -1 / 3 * 2 / s <= n)
+    {
+      ealloc_die ();
+    }
+  else
+    n += (n + 1) / 2;
+
+  newp = erealloc (p, n * s);
+  *pn = n;
+  return newp;
+}
+
+