1  /* Free data allocated by a call to setlocale_r
       2     Copyright (C) 1996-2023 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 <locale.h>
      20  #include <stdlib.h>
      21  #include <libc-lock.h>
      22  
      23  #include "localeinfo.h"
      24  
      25  
      26  /* Lock for protecting global data.  */
      27  __libc_rwlock_define (extern , __libc_setlocale_lock attribute_hidden)
      28  
      29  
      30  void
      31  __freelocale (locale_t dataset)
      32  {
      33    int cnt;
      34  
      35    /* This static object is returned for newlocale (LC_ALL_MASK, "C").  */
      36    if (dataset == _nl_C_locobj_ptr)
      37      return;
      38  
      39    /* We modify global data (the usage counts).  */
      40    __libc_rwlock_wrlock (__libc_setlocale_lock);
      41  
      42    for (cnt = 0; cnt < __LC_LAST; ++cnt)
      43      if (cnt != LC_ALL && dataset->__locales[cnt]->usage_count != UNDELETABLE)
      44        /* We can remove the data.  */
      45        _nl_remove_locale (cnt, dataset->__locales[cnt]);
      46  
      47    /* It's done.  */
      48    __libc_rwlock_unlock (__libc_setlocale_lock);
      49  
      50    /* Free the locale_t handle itself.  */
      51    free (dataset);
      52  }
      53  weak_alias (__freelocale, freelocale)