libitm/util.cc

   1 /* Copyright (C) 2009, 2011 Free Software Foundation, Inc.
   2    Contributed by Richard Henderson <rth@redhat.com>.
   3
   4    This file is part of the GNU Transactional Memory Library (libitm).
   5
   6    Libitm is free software; you can redistribute it and/or modify it
   7    under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 3 of the License, or
   9    (at your option) any later version.
  10
  11    Libitm is distributed in the hope that it will be useful, but WITHOUT ANY
  12    WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  13    FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
  14    more details.
  15
  16    Under Section 7 of GPL version 3, you are granted additional
  17    permissions described in the GCC Runtime Library Exception, version
  18    3.1, as published by the Free Software Foundation.
  19
  20    You should have received a copy of the GNU General Public License and
  21    a copy of the GCC Runtime Library Exception along with this program;
  22    see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
  23    <http://www.gnu.org/licenses/>.  */
  24
  25 #include "libitm_i.h"
  26 #include <stdarg.h>
  27 #include <stdio.h>
  28
  29 namespace GTM HIDDEN {
  30
  31 static void
  32 gtm_verror (const char *fmt, va_list list)
  33 {
  34   fputs ("\nlibitm: ", stderr);
  35   vfprintf (stderr, fmt, list);
  36   fputc ('\n', stderr);
  37 }
  38
  39 void
  40 GTM_error (const char *fmt, ...)
  41 {
  42   va_list list;
  43
  44   va_start (list, fmt);
  45   gtm_verror (fmt, list);
  46   va_end (list);
  47 }
  48
  49 void
  50 GTM_fatal (const char *fmt, ...)
  51 {
  52   va_list list;
  53
  54   va_start (list, fmt);
  55   gtm_verror (fmt, list);
  56   va_end (list);
  57
  58   exit (EXIT_FAILURE);
  59 }
  60
  61 void *
  62 xmalloc (size_t size, bool separate_cl)
  63 {
  64   // TODO Use posix_memalign if separate_cl is true, or some other allocation
  65   // method that will avoid sharing cache lines with data used by other
  66   // threads.
  67   void *r = malloc (size);
  68   if (r == 0)
  69     GTM_fatal ("Out of memory allocating %lu bytes", (unsigned long) size);
  70   return r;
  71 }
  72
  73 void *
  74 xcalloc (size_t size, bool separate_cl)
  75 {
  76   // TODO Use posix_memalign if separate_cl is true, or some other allocation
  77   // method that will avoid sharing cache lines with data used by other
  78   // threads.
  79   void *r = calloc (1, size);
  80   if (r == 0)
  81     GTM_fatal ("Out of memory allocating %lu bytes", (unsigned long) size);
  82   return r;
  83 }
  84
  85 void *
  86 xrealloc (void *old, size_t size, bool separate_cl)
  87 {
  88   // TODO Use posix_memalign if separate_cl is true, or some other allocation
  89   // method that will avoid sharing cache lines with data used by other
  90   // threads.
  91   void *r = realloc (old, size);
  92   if (r == 0)
  93     GTM_fatal ("Out of memory allocating %lu bytes", (unsigned long) size);
  94   return r;
  95 }
  96
  97 } // namespace GTM