|
Packit |
6c4009 |
/* Copyright (C) 1997-2018 Free Software Foundation, Inc.
|
|
Packit |
6c4009 |
This file is part of the GNU C Library.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is free software; you can redistribute it and/or
|
|
Packit |
6c4009 |
modify it under the terms of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License as published by the Free Software Foundation; either
|
|
Packit |
6c4009 |
version 2.1 of the License, or (at your option) any later version.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is distributed in the hope that it will be useful,
|
|
Packit |
6c4009 |
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit |
6c4009 |
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit |
6c4009 |
Lesser General Public License for more details.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
You should have received a copy of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License along with the GNU C Library; if not, see
|
|
Packit |
6c4009 |
<http://www.gnu.org/licenses/>. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include <atomic.h>
|
|
Packit |
6c4009 |
#include <stdlib.h>
|
|
Packit |
6c4009 |
#include <set-hooks.h>
|
|
Packit |
6c4009 |
#include <libc-internal.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include "../libio/libioP.h"
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
DEFINE_HOOK (__libc_subfreeres, (void));
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
symbol_set_define (__libc_freeres_ptrs);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
extern __attribute__ ((weak)) void __libdl_freeres (void);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
extern __attribute__ ((weak)) void __libpthread_freeres (void);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
void __libc_freeres_fn_section
|
|
Packit |
6c4009 |
__libc_freeres (void)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* This function might be called from different places. So better
|
|
Packit |
6c4009 |
protect for multiple executions since these are fatal. */
|
|
Packit |
6c4009 |
static long int already_called;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (!atomic_compare_and_exchange_bool_acq (&already_called, 1, 0))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
void *const *p;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
_IO_cleanup ();
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* We run the resource freeing after IO cleanup. */
|
|
Packit |
6c4009 |
RUN_HOOK (__libc_subfreeres, ());
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Call the libdl list of cleanup functions
|
|
Packit |
6c4009 |
(weak-ref-and-check). */
|
|
Packit |
6c4009 |
if (&__libdl_freeres != NULL)
|
|
Packit |
6c4009 |
__libdl_freeres ();
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Call the libpthread list of cleanup functions
|
|
Packit |
6c4009 |
(weak-ref-and-check). */
|
|
Packit |
6c4009 |
if (&__libpthread_freeres != NULL)
|
|
Packit |
6c4009 |
__libpthread_freeres ();
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
for (p = symbol_set_first_element (__libc_freeres_ptrs);
|
|
Packit |
6c4009 |
!symbol_set_end_p (__libc_freeres_ptrs, p); ++p)
|
|
Packit |
6c4009 |
free (*p);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (__libc_freeres)
|