elf/dl-scope.c

   1 /* Memory handling for the scope data structures.
   2    Copyright (C) 2009-2021 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    The GNU C Library 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 GNU
  13    Lesser General Public License for more details.
  14
  15    You should have received a copy of the GNU Lesser General Public
  16    License along with the GNU C Library; if not, see
  17    <https://www.gnu.org/licenses/>.  */
  18
  19 #include <stdlib.h>
  20 #include <ldsodefs.h>
  21 #include <sysdep-cancel.h>
  22
  23
  24 int
  25 _dl_scope_free (void *old)
  26 {
  27   struct dl_scope_free_list *fsl;
  28 #define DL_SCOPE_FREE_LIST_SIZE (sizeof (fsl->list) / sizeof (fsl->list[0]))
  29
  30   if (RTLD_SINGLE_THREAD_P)
  31     free (old);
  32   else if ((fsl = GL(dl_scope_free_list)) == NULL)
  33     {
  34       GL(dl_scope_free_list) = fsl = malloc (sizeof (*fsl));
  35       if (fsl == NULL)
  36         {
  37           THREAD_GSCOPE_WAIT ();
  38           free (old);
  39           return 1;
  40         }
  41       else
  42         {
  43           fsl->list[0] = old;
  44           fsl->count = 1;
  45         }
  46     }
  47   else if (fsl->count < DL_SCOPE_FREE_LIST_SIZE)
  48     fsl->list[fsl->count++] = old;
  49   else
  50     {
  51       THREAD_GSCOPE_WAIT ();
  52       while (fsl->count > 0)
  53         free (fsl->list[--fsl->count]);
  54       return 1;
  55     }
  56   return 0;
  57 }