diff options
Diffstat (limited to 'gl/calloc.c')
-rw-r--r-- | gl/calloc.c | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/gl/calloc.c b/gl/calloc.c new file mode 100644 index 0000000..08843ac --- /dev/null +++ b/gl/calloc.c | |||
@@ -0,0 +1,55 @@ | |||
1 | /* calloc() function that is glibc compatible. | ||
2 | This wrapper function is required at least on Tru64 UNIX 5.1 and mingw. | ||
3 | Copyright (C) 2004-2007, 2009-2023 Free Software Foundation, Inc. | ||
4 | |||
5 | This file is free software: you can redistribute it and/or modify | ||
6 | it under the terms of the GNU Lesser General Public License as | ||
7 | published by the Free Software Foundation; either version 2.1 of the | ||
8 | License, or (at your option) any later version. | ||
9 | |||
10 | This file is distributed in the hope that it will be useful, | ||
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
13 | GNU Lesser General Public License for more details. | ||
14 | |||
15 | You should have received a copy of the GNU Lesser General Public License | ||
16 | along with this program. If not, see <https://www.gnu.org/licenses/>. */ | ||
17 | |||
18 | /* written by Jim Meyering and Bruno Haible */ | ||
19 | |||
20 | #include <config.h> | ||
21 | |||
22 | /* Specification. */ | ||
23 | #include <stdlib.h> | ||
24 | |||
25 | #include <errno.h> | ||
26 | |||
27 | #include "xalloc-oversized.h" | ||
28 | |||
29 | /* Call the system's calloc below. */ | ||
30 | #undef calloc | ||
31 | |||
32 | /* Allocate and zero-fill an NxS-byte block of memory from the heap, | ||
33 | even if N or S is zero. */ | ||
34 | |||
35 | void * | ||
36 | rpl_calloc (size_t n, size_t s) | ||
37 | { | ||
38 | if (n == 0 || s == 0) | ||
39 | n = s = 1; | ||
40 | |||
41 | if (xalloc_oversized (n, s)) | ||
42 | { | ||
43 | errno = ENOMEM; | ||
44 | return NULL; | ||
45 | } | ||
46 | |||
47 | void *result = calloc (n, s); | ||
48 | |||
49 | #if !HAVE_MALLOC_POSIX | ||
50 | if (result == NULL) | ||
51 | errno = ENOMEM; | ||
52 | #endif | ||
53 | |||
54 | return result; | ||
55 | } | ||