blob: 2a82c6edb6e41faa5da56d0ef1dea3cac59cf58a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
|
/* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk>
* This file is part of the Linux-8086 C library and is distributed
* under the GNU Library General Public License.
*/
/*
* This deals with both the atexit and on_exit function calls
*
* Note calls installed with atexit are called with the same args as on_exit
* fuctions; the void* is given the NULL value.
*
*/
#include <errno.h>
/* ATEXIT.H */
#define MAXONEXIT 20 /* AIUI Posix requires 10 */
typedef void (*vfuncp) ();
extern vfuncp __cleanup;
extern void __do_exit();
extern struct exit_table
{
vfuncp called;
void *argument;
}
__on_exit_table[MAXONEXIT];
extern int __on_exit_count;
/* End ATEXIT.H */
#ifdef L_atexit
vfuncp __cleanup;
int
atexit(ptr)
vfuncp ptr;
{
if( __on_exit_count < 0 || __on_exit_count >= MAXONEXIT)
{
errno = ENOMEM;
return -1;
}
__cleanup = __do_exit;
if( ptr )
{
__on_exit_table[__on_exit_count].called = ptr;
__on_exit_table[__on_exit_count].argument = 0;
__on_exit_count++;
}
return 0;
}
#endif
#ifdef L_on_exit
int
on_exit(ptr, arg)
vfuncp ptr;
void *arg;
{
if( __on_exit_count < 0 || __on_exit_count >= MAXONEXIT)
{
errno = ENOMEM;
return -1;
}
__cleanup = __do_exit;
if( ptr )
{
__on_exit_table[__on_exit_count].called = ptr;
__on_exit_table[__on_exit_count].argument = arg;
__on_exit_count++;
}
return 0;
}
#endif
#ifdef L___do_exit
int __on_exit_count = 0;
struct exit_table __on_exit_table[MAXONEXIT];
void
__do_exit(rv)
int rv;
{
register int count = __on_exit_count-1;
register vfuncp ptr;
__on_exit_count = -1; /* ensure no more will be added */
__cleanup = 0; /* Calling exit won't re-do this */
/* In reverse order */
for (; count >= 0; count--)
{
ptr = __on_exit_table[count].called;
(*ptr) (rv, __on_exit_table[count].argument);
}
}
#endif
#ifdef L_exit
void
exit(rv)
int rv;
{
if (__cleanup)
__cleanup();
_exit(rv);
}
#endif
|