tools/MetaMake/mem.c

   1 /* MetaMake - A Make extension
   2    Copyright © 1995-2004, The AROS Development Team. All rights reserved.
   3
   4 This file is part of MetaMake.
   5
   6 MetaMake is free software; you can redistribute it and/or modify
   7 it under the terms of the GNU General Public License as published by
   8 the Free Software Foundation; either version 2, or (at your option)
   9 any later version.
  10
  11 MetaMake is distributed in the hope that it will be useful,
  12 but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 GNU General Public License for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with GNU CC; see the file COPYING.  If not, write to
  18 the Free Software Foundation, 59 Temple Place - Suite 330,
  19 Boston, MA 02111-1307, USA.  */
  20
  21 #define _GNU_SOURCE /* for string.h:strndup() */
  22 #include "config.h"
  23
  24 #include <stdio.h>
  25 #include <assert.h>
  26 #ifdef HAVE_STRING_H
  27 #   include <string.h>
  28 #else
  29 #   include <strings.h>
  30 #endif
  31 #include <stdlib.h>
  32
  33 #include "mem.h"
  34
  35 /* Functions */
  36 char *
  37 _xstrdup (const char * str, const char * file, int line)
  38 {
  39     char * nstr;
  40
  41     assert (str);
  42
  43     nstr = strdup (str);
  44
  45     if (!nstr)
  46     {
  47         fprintf (stderr, "Out of memory in %s:%d", file, line);
  48         exit (20);
  49     }
  50
  51     return nstr;
  52 }
  53
  54 char *
  55 _xstrndup (const char * str, size_t len, const char * file, int line)
  56 {
  57     char * nstr;
  58
  59     assert (str);
  60
  61 #ifdef HAVE_STRNDUP
  62     nstr = strndup (str, len);
  63 #else
  64     nstr = malloc(strlen(str) >= len ? len : strlen(str) + 1);
  65     if (nstr)
  66         strncpy (nstr, str, len);
  67 #endif
  68
  69     if (!nstr)
  70     {
  71         fprintf (stderr, "Out of memory in %s:%d", file, line);
  72         exit (20);
  73     }
  74
  75     return nstr;
  76 }
  77
  78 void *
  79 _xmalloc (size_t size, const char * file, int line)
  80 {
  81     void * ptr;
  82
  83     ptr = malloc (size);
  84
  85     if (size && !ptr)
  86     {
  87         fprintf (stderr, "Out of memory in %s:%d", file, line);
  88         exit (20);
  89     }
  90
  91     return ptr;
  92 }
  93
  94 void
  95 _xfree (void * ptr, const char * file, int line)
  96 {
  97     if (ptr)
  98         free (ptr);
  99     else
 100         fprintf (stderr, "Illegal free(NULL) in %s:%d", file, line);
 101 }
 102