nsz Git - libfirm/blob - ir/adt/xmalloc.c

   1 /*
   2  * Copyright (C) 1995-2008 University of Karlsruhe.  All right reserved.
   3  *
   4  * This file is part of libFirm.
   5  *
   6  * This file may be distributed and/or modified under the terms of the
   7  * GNU General Public License version 2 as published by the Free Software
   8  * Foundation and appearing in the file LICENSE.GPL included in the
   9  * packaging of this file.
  10  *
  11  * Licensees holding valid libFirm Professional Edition licenses may use
  12  * this file in accordance with the libFirm Commercial License.
  13  * Agreement provided with the Software.
  14  *
  15  * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
  16  * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  17  * PURPOSE.
  18  */
  19
  20 /**
  21  * @file
  22  * @brief       implementation of xmalloc & friends
  23  * @author      Markus Armbruster
  24  * @version     $Id$
  25  */
  26
  27 /* @@@ ToDo: replace this file with the one from liberty.
  28    [reimplement xstrdup, ... ] */
  29 #ifdef HAVE_CONFIG_H
  30 # include "config.h"
  31 #endif
  32
  33 #ifdef HAVE_STRING_H
  34 # include <string.h>
  35 #endif
  36 #ifdef HAVE_STDLIB_H
  37 # include <stdlib.h>
  38 #endif
  39
  40 #include "xmalloc.h"
  41 #include "error.h"
  42
  43 static NORETURN xnomem(void) {
  44   panic("out of memory");
  45 }
  46
  47 void *xmalloc(size_t size) {
  48   void *res = malloc(size);
  49
  50   if (!res) xnomem();
  51   return res;
  52 }
  53
  54 void *xcalloc(size_t num, size_t size) {
  55   void *res = calloc(num, size);
  56
  57   if (!res) xnomem();
  58   return res;
  59 }
  60
  61 void *xrealloc(void *ptr, size_t size) {
  62   /* ANSI blesses realloc (0, x) but SunOS chokes on it */
  63   void *res = ptr ? realloc (ptr, size) : malloc (size);
  64
  65   if (!res) xnomem();
  66   return res;
  67 }
  68
  69 char *xstrdup(const char *str) {
  70   size_t len = strlen (str) + 1;
  71   return memcpy((xmalloc) (len), str, len);
  72 }