Commit | Line | Data |
---|---|---|
43626ea4 | 1 | /* Define wait system call interface for Emacs. |
d72c1cad | 2 | Copyright (C) 1993, 1994, 1995, 2000 Free Software Foundation, Inc. |
43626ea4 RS |
3 | |
4 | This file is part of GNU Emacs. | |
5 | ||
6 | GNU Emacs is free software; you can redistribute it and/or modify | |
7 | it under the terms of the GNU General Public License as published by | |
8 | the Free Software Foundation; either version 2, or (at your option) | |
9 | any later version. | |
10 | ||
11 | GNU Emacs is distributed in the hope that it will be useful, | |
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | GNU General Public License for more details. | |
15 | ||
16 | You should have received a copy of the GNU General Public License | |
17 | along with GNU Emacs; see the file COPYING. If not, write to | |
3b7ad313 EN |
18 | the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
19 | Boston, MA 02111-1307, USA. */ | |
43626ea4 RS |
20 | |
21 | /* Define the structure that the wait system call stores. | |
22 | On many systems, there is a structure defined for this. | |
23 | But on vanilla-ish USG systems there is not. */ | |
24 | ||
d72c1cad DL |
25 | #ifndef EMACS_SYSWAIT_H |
26 | #define EMACS_SYSWAIT_H | |
27 | ||
43626ea4 | 28 | #ifndef VMS |
d72c1cad | 29 | |
557713d8 RS |
30 | /* This is now really the approach recommended by Autoconf. If this |
31 | doesn't cause trouble anywhere, remove the original code, which is | |
32 | #if'd out below. */ | |
d72c1cad DL |
33 | |
34 | #if 1 | |
d72c1cad | 35 | #include <sys/types.h> |
1f0bb0ab | 36 | |
3bddb272 | 37 | #ifdef HAVE_SYS_WAIT_H /* We have sys/wait.h with POSIXoid definitions. */ |
d72c1cad | 38 | #include <sys/wait.h> |
557713d8 RS |
39 | #endif /* !HAVE_SYS_WAIT_H */ |
40 | ||
1f0bb0ab DL |
41 | #ifndef WCOREDUMP /* not POSIX */ |
42 | #define WCOREDUMP(status) ((status) & 0x80) | |
d72c1cad | 43 | #endif |
557713d8 | 44 | #ifndef WEXITSTATUS |
1f0bb0ab | 45 | #define WEXITSTATUS(status) (((status) & 0xff00) >> 8) |
557713d8 RS |
46 | #endif |
47 | #ifndef WIFEXITED | |
1f0bb0ab | 48 | #define WIFEXITED(status) (WTERMSIG(status) == 0) |
557713d8 RS |
49 | #endif |
50 | #ifndef WIFSTOPPED | |
1f0bb0ab | 51 | #define WIFSTOPPED(status) (((status) & 0xff) == 0x7f) |
557713d8 RS |
52 | #endif |
53 | #ifndef WIFSIGNALED | |
1f0bb0ab | 54 | #define WIFSIGNALED(status) (!WIFSTOPPED(status) && !WIFEXITED(status)) |
557713d8 RS |
55 | #endif |
56 | #ifndef WSTOPSIG | |
1f0bb0ab | 57 | #define WSTOPSIG(status) WEXITSTATUS(status) |
557713d8 RS |
58 | #endif |
59 | #ifndef WTERMSIG | |
1f0bb0ab | 60 | #define WTERMSIG(status) ((status) & 0x7f) |
557713d8 | 61 | #endif |
d72c1cad | 62 | |
1f0bb0ab DL |
63 | #undef WAITTYPE |
64 | #define WAITTYPE int | |
65 | #undef WRETCODE | |
66 | #define WRETCODE(status) WEXITSTATUS (status) | |
d72c1cad | 67 | |
557713d8 | 68 | #else /* 0 */ |
d72c1cad | 69 | |
43626ea4 | 70 | #ifndef WAITTYPE |
da149a8f RS |
71 | |
72 | #ifdef WAIT_USE_INT | |
73 | /* Some systems have union wait in their header, but we should use | |
74 | int regardless of that. */ | |
75 | #include <sys/wait.h> | |
76 | #define WAITTYPE int | |
77 | #define WRETCODE(w) WEXITSTATUS (w) | |
78 | ||
79 | #else /* not WAIT_USE_INT */ | |
80 | ||
6df54671 | 81 | #if (!defined (BSD_SYSTEM) && !defined (UNIPLUS) && !defined (STRIDE) && !(defined (HPUX) && !defined (NOMULTIPLEJOBS)) && !defined (HAVE_WAIT_HEADER)) |
43626ea4 RS |
82 | #define WAITTYPE int |
83 | #define WIFSTOPPED(w) ((w&0377) == 0177) | |
84 | #define WIFSIGNALED(w) ((w&0377) != 0177 && (w&~0377) == 0) | |
85 | #define WIFEXITED(w) ((w&0377) == 0) | |
86 | #define WRETCODE(w) (w >> 8) | |
87 | #define WSTOPSIG(w) (w >> 8) | |
1f0bb0ab | 88 | #define WTERMSIG(w) (w & 0177) |
43626ea4 RS |
89 | #ifndef WCOREDUMP |
90 | #define WCOREDUMP(w) ((w&0200) != 0) | |
91 | #endif | |
da149a8f | 92 | |
177c0ea7 | 93 | #else |
da149a8f | 94 | |
43626ea4 RS |
95 | #ifdef BSD4_1 |
96 | #include <wait.h> | |
97 | #else | |
98 | #include <sys/wait.h> | |
99 | #endif /* not BSD 4.1 */ | |
100 | ||
101 | #define WAITTYPE union wait | |
102 | #define WRETCODE(w) w.w_retcode | |
4f480b74 | 103 | #undef WCOREDUMP /* Later BSDs define this name differently. */ |
43626ea4 RS |
104 | #define WCOREDUMP(w) w.w_coredump |
105 | ||
b01b093a | 106 | #if defined (HPUX) || defined (convex) |
43626ea4 | 107 | /* HPUX version 7 has broken definitions of these. */ |
b01b093a | 108 | /* pvogel@convex.com says the convex does too. */ |
43626ea4 RS |
109 | #undef WTERMSIG |
110 | #undef WSTOPSIG | |
111 | #undef WIFSTOPPED | |
112 | #undef WIFSIGNALED | |
113 | #undef WIFEXITED | |
b01b093a | 114 | #endif /* HPUX | convex */ |
43626ea4 RS |
115 | |
116 | #ifndef WTERMSIG | |
117 | #define WTERMSIG(w) w.w_termsig | |
118 | #endif | |
119 | #ifndef WSTOPSIG | |
120 | #define WSTOPSIG(w) w.w_stopsig | |
121 | #endif | |
122 | #ifndef WIFSTOPPED | |
123 | #define WIFSTOPPED(w) (WTERMSIG (w) == 0177) | |
124 | #endif | |
125 | #ifndef WIFSIGNALED | |
126 | #define WIFSIGNALED(w) (WTERMSIG (w) != 0177 && (WSTOPSIG (w)) == 0) | |
127 | #endif | |
128 | #ifndef WIFEXITED | |
129 | #define WIFEXITED(w) (WTERMSIG (w) == 0) | |
130 | #endif | |
6df54671 | 131 | #endif /* BSD_SYSTEM || UNIPLUS || STRIDE || HPUX */ |
da149a8f | 132 | #endif /* not WAIT_USE_INT */ |
43626ea4 | 133 | #endif /* no WAITTYPE */ |
da149a8f | 134 | |
557713d8 | 135 | #endif /* 0 */ |
d72c1cad | 136 | |
43626ea4 | 137 | #else /* VMS */ |
da149a8f | 138 | |
43626ea4 RS |
139 | #define WAITTYPE int |
140 | #define WIFSTOPPED(w) 0 | |
141 | #define WIFSIGNALED(w) 0 | |
142 | #define WIFEXITED(w) ((w) != -1) | |
143 | #define WRETCODE(w) (w) | |
144 | #define WSTOPSIG(w) (w) | |
145 | #define WCOREDUMP(w) 0 | |
146 | #define WTERMSIG(w) (w) | |
147 | #include <ssdef.h> | |
148 | #include <iodef.h> | |
149 | #include <clidef.h> | |
150 | #include "vmsproc.h" | |
da149a8f | 151 | |
43626ea4 | 152 | #endif /* VMS */ |
d72c1cad DL |
153 | |
154 | #endif /* EMACS_SYSWAIT_H */ |