Home | History | Annotate | Line # | Download | only in stdlib
      1  1.1  christos /*	$NetBSD: quick_exit.c,v 1.1 2013/04/26 18:29:55 christos Exp $	*/
      2  1.1  christos 
      3  1.1  christos /*-
      4  1.1  christos  * Copyright (c) 2011 David Chisnall
      5  1.1  christos  * All rights reserved.
      6  1.1  christos  *
      7  1.1  christos  * Redistribution and use in source and binary forms, with or without
      8  1.1  christos  * modification, are permitted provided that the following conditions
      9  1.1  christos  * are met:
     10  1.1  christos  * 1. Redistributions of source code must retain the above copyright
     11  1.1  christos  *    notice, this list of conditions and the following disclaimer.
     12  1.1  christos  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.1  christos  *    notice, this list of conditions and the following disclaimer in the
     14  1.1  christos  *    documentation and/or other materials provided with the distribution.
     15  1.1  christos  *
     16  1.1  christos  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
     17  1.1  christos  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     18  1.1  christos  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     19  1.1  christos  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
     20  1.1  christos  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     21  1.1  christos  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     22  1.1  christos  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     23  1.1  christos  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     24  1.1  christos  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     25  1.1  christos  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     26  1.1  christos  * SUCH DAMAGE.
     27  1.1  christos  *
     28  1.1  christos  * $FreeBSD: src/lib/libc/stdlib/quick_exit.c,v 1.4 2012/11/17 01:49:41 svnexp Exp $
     29  1.1  christos  */
     30  1.1  christos #include <sys/cdefs.h>
     31  1.1  christos __RCSID("$NetBSD: quick_exit.c,v 1.1 2013/04/26 18:29:55 christos Exp $");
     32  1.1  christos 
     33  1.1  christos #include "namespace.h"
     34  1.1  christos #include "reentrant.h"
     35  1.1  christos 
     36  1.1  christos #include <stdlib.h>
     37  1.1  christos 
     38  1.1  christos /**
     39  1.1  christos  * Linked list of quick exit handlers.  This is simpler than the atexit()
     40  1.1  christos  * version, because it is not required to support C++ destructors or
     41  1.1  christos  * DSO-specific cleanups.
     42  1.1  christos  */
     43  1.1  christos struct quick_exit_handler {
     44  1.1  christos 	struct quick_exit_handler *next;
     45  1.1  christos 	void (*cleanup)(void);
     46  1.1  christos };
     47  1.1  christos 
     48  1.1  christos /**
     49  1.1  christos  * Lock protecting the handlers list.
     50  1.1  christos  */
     51  1.1  christos #ifdef _REENTRANT
     52  1.1  christos extern mutex_t __atexit_mutex;
     53  1.1  christos #endif
     54  1.1  christos 
     55  1.1  christos /**
     56  1.1  christos  * Stack of cleanup handlers.  These will be invoked in reverse order when
     57  1.1  christos  */
     58  1.1  christos static struct quick_exit_handler *handlers;
     59  1.1  christos 
     60  1.1  christos int
     61  1.1  christos at_quick_exit(void (*func)(void))
     62  1.1  christos {
     63  1.1  christos 	struct quick_exit_handler *h;
     64  1.1  christos 
     65  1.1  christos 	h = malloc(sizeof(*h));
     66  1.1  christos 
     67  1.1  christos 	if (NULL == h)
     68  1.1  christos 		return 1;
     69  1.1  christos 	h->cleanup = func;
     70  1.1  christos #ifdef _REENTRANT
     71  1.1  christos 	mutex_lock(&__atexit_mutex);
     72  1.1  christos #endif
     73  1.1  christos 	h->next = handlers;
     74  1.1  christos 	handlers = h;
     75  1.1  christos #ifdef _REENTRANT
     76  1.1  christos 	mutex_unlock(&__atexit_mutex);
     77  1.1  christos #endif
     78  1.1  christos 	return 0;
     79  1.1  christos }
     80  1.1  christos 
     81  1.1  christos void
     82  1.1  christos quick_exit(int status)
     83  1.1  christos {
     84  1.1  christos 	struct quick_exit_handler *h;
     85  1.1  christos 
     86  1.1  christos 	/*
     87  1.1  christos 	 * XXX: The C++ spec requires us to call std::terminate if there is an
     88  1.1  christos 	 * exception here.
     89  1.1  christos 	 */
     90  1.1  christos 	for (h = handlers; NULL != h; h = h->next)
     91  1.1  christos 		(*h->cleanup)();
     92  1.1  christos 	_Exit(status);
     93  1.1  christos }
     94