Formerly ../stdlib/Makefile.~9~
[kopensolaris-gnu/glibc.git] / stdlib / exit.c
1 /* Copyright (C) 1991 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Library General Public License as
6 published by the Free Software Foundation; either version 2 of the
7 License, or (at your option) any later version.
8
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12 Library General Public License for more details.
13
14 You should have received a copy of the GNU Library General Public
15 License along with the GNU C Library; see the file COPYING.LIB.  If
16 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
17 Cambridge, MA 02139, USA.  */
18
19 #include <ansidecl.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <unistd.h>
23 #include "exit.h"
24
25 #ifdef  __GNU_STAB__
26 CONST unsigned long int __libc_atexit[1];
27 #endif
28
29 /* Call all functions registered with `atexit' and `on_exit',
30    in the reverse of the order in which they were registered
31    perform stdio cleanup, and terminate program execution with STATUS.  */
32 __NORETURN
33 void
34 DEFUN(exit, (status), int status)
35 {
36   register CONST struct exit_function_list *l;
37
38   for (l = __exit_funcs; l != NULL; l = l->next)
39     {
40       register size_t i = l->idx;
41       while (i-- > 0)
42         {
43           CONST struct exit_function *CONST f = &l->fns[i];
44           switch (f->flavor)
45             {
46             case ef_free:
47               break;
48             case ef_on:
49               (*f->func.on.fn)(status, f->func.on.arg);
50               break;
51             case ef_at:
52               (*f->func.at)();
53               break;
54             }
55         }
56     }
57
58 #ifdef  __GNU_STAB__
59   {
60     register unsigned long int i;
61     for (i = 1; i <= __libc_atexit[0]; ++i)
62       (*(void EXFUN((*), (NOARGS))) __libc_atexit[i])();
63   }
64 #else
65   {
66     extern void EXFUN(_cleanup, (NOARGS));
67     _cleanup();
68   }
69 #endif
70
71   _exit(status);
72 }
73