aboutsummaryrefslogtreecommitdiffstats
path: root/contrib/tools/bison/gnulib/src/calloc.c
blob: 2372dd24efda389ee3f7d6e317ebcd5aedad30dc (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
/* calloc() function that is glibc compatible. 
   This wrapper function is required at least on Tru64 UNIX 5.1 and mingw. 
   Copyright (C) 2004-2007, 2009-2013 Free Software Foundation, Inc. 
 
   This program 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 of the License, or 
   (at your option) any later version. 
 
   This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.  */ 
 
/* written by Jim Meyering and Bruno Haible */ 
 
#include <config.h> 
/* Only the AC_FUNC_CALLOC macro defines 'calloc' already in config.h.  */ 
#ifdef calloc 
# define NEED_CALLOC_GNU 1 
# undef calloc 
/* Whereas the gnulib module 'calloc-gnu' defines HAVE_CALLOC_GNU.  */ 
#elif GNULIB_CALLOC_GNU && !HAVE_CALLOC_GNU 
# define NEED_CALLOC_GNU 1 
#endif 
 
/* Specification.  */ 
#include <stdlib.h> 
 
#include <errno.h> 
 
/* Call the system's calloc below.  */ 
#undef calloc 
 
/* Allocate and zero-fill an NxS-byte block of memory from the heap. 
   If N or S is zero, allocate and zero-fill a 1-byte block.  */ 
 
void * 
rpl_calloc (size_t n, size_t s) 
{ 
  void *result; 
 
#if NEED_CALLOC_GNU 
  if (n == 0 || s == 0) 
    { 
      n = 1; 
      s = 1; 
    } 
  else 
    { 
      /* Defend against buggy calloc implementations that mishandle 
         size_t overflow.  */ 
      size_t bytes = n * s; 
      if (bytes / s != n) 
        { 
          errno = ENOMEM; 
          return NULL; 
        } 
    } 
#endif 
 
  result = calloc (n, s); 
 
#if !HAVE_CALLOC_POSIX 
  if (result == NULL) 
    errno = ENOMEM; 
#endif 
 
  return result; 
}