malloc/tst-calloc.c

   1 /* Copyright (C) 2000-2023 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3
   4    The GNU C Library is free software; you can redistribute it and/or
   5    modify it under the terms of the GNU Lesser General Public
   6    License as published by the Free Software Foundation; either
   7    version 2.1 of the License, or (at your option) any later version.
   8
   9    The GNU C Library is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12    Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public
  15    License along with the GNU C Library; if not, see
  16    <https://www.gnu.org/licenses/>.  */
  17
  18 #include <errno.h>
  19 #include <error.h>
  20 #include <limits.h>
  21 #include <malloc.h>
  22 #include <stdlib.h>
  23 #include <stdio.h>
  24 #include <libc-diag.h>
  25
  26
  27 /* Number of samples per size.  */
  28 #define N 50000
  29
  30
  31 static void
  32 fixed_test (int size)
  33 {
  34   char *ptrs[N];
  35   int i;
  36
  37   for (i = 0; i < N; ++i)
  38     {
  39       int j;
  40
  41       ptrs[i] = (char *) calloc (1, size);
  42
  43       if (ptrs[i] == NULL)
  44         break;
  45
  46       for (j = 0; j < size; ++j)
  47         {
  48           if (ptrs[i][j] != '\0')
  49             error (EXIT_FAILURE, 0,
  50                    "byte not cleared (size %d, element %d, byte %d)",
  51                    size, i, j);
  52           ptrs[i][j] = '\xff';
  53         }
  54     }
  55
  56   while (i-- > 0)
  57     free (ptrs[i]);
  58 }
  59
  60
  61 static void
  62 random_test (void)
  63 {
  64   char *ptrs[N];
  65   int i;
  66
  67   for (i = 0; i < N; ++i)
  68     {
  69       int j;
  70       int n = 1 + random () % 10;
  71       int elem = 1 + random () % 100;
  72       int size = n * elem;
  73
  74       ptrs[i] = (char *) calloc (n, elem);
  75
  76       if (ptrs[i] == NULL)
  77         break;
  78
  79       for (j = 0; j < size; ++j)
  80         {
  81           if (ptrs[i][j] != '\0')
  82             error (EXIT_FAILURE, 0,
  83                    "byte not cleared (size %d, element %d, byte %d)",
  84                    size, i, j);
  85           ptrs[i][j] = '\xff';
  86         }
  87     }
  88
  89   while (i-- > 0)
  90     free (ptrs[i]);
  91 }
  92
  93
  94 static void
  95 null_test (void)
  96 {
  97   /* If the size is 0 the result is implementation defined.  Just make
  98      sure the program doesn't crash.  The result of calloc is
  99      deliberately ignored, so do not warn about that.  */
 100   DIAG_PUSH_NEEDS_COMMENT;
 101   DIAG_IGNORE_NEEDS_COMMENT (10, "-Wunused-result");
 102   calloc (0, 0);
 103   calloc (0, UINT_MAX);
 104   calloc (UINT_MAX, 0);
 105   calloc (0, ~((size_t) 0));
 106   calloc (~((size_t) 0), 0);
 107   DIAG_POP_NEEDS_COMMENT;
 108 }
 109
 110
 111 static int
 112 do_test (void)
 113 {
 114   /* We are allocating blocks with `calloc' and check whether every
 115      block is completely cleared.  We first try this for some fixed
 116      times and then with random size.  */
 117   fixed_test (15);
 118   fixed_test (5);
 119   fixed_test (17);
 120   fixed_test (6);
 121   fixed_test (31);
 122   fixed_test (96);
 123
 124   random_test ();
 125
 126   null_test ();
 127
 128   return 0;
 129 }
 130
 131 #define TEST_FUNCTION do_test ()
 132 #include "../test-skeleton.c"