1 /* Memory handling for the scope data structures. 2 Copyright (C) 2009-2022 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 _dl_scope_free(void * old)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 } 58