Mercurial > emacs
annotate src/syswait.h @ 58072:4ebc52bf6429
(Fmake_network_process): Remove kludge for interrupted
connects on BSD. If connect is interrupted, just close socket and
start over rather than sleeping and retry with same socket.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Tue, 09 Nov 2004 09:40:37 +0000 |
| parents | 695cf19ef79e |
| children | a8fa7c632ee4 375f2633d815 |
| rev | line source |
|---|---|
| 4626 | 1 /* Define wait system call interface for Emacs. |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
2 Copyright (C) 1993, 1994, 1995, 2000 Free Software Foundation, Inc. |
| 4626 | 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 | |
|
14186
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
11235
diff
changeset
|
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330, |
|
ee40177f6c68
Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents:
11235
diff
changeset
|
19 Boston, MA 02111-1307, USA. */ |
| 4626 | 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 | |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
25 #ifndef EMACS_SYSWAIT_H |
|
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
26 #define EMACS_SYSWAIT_H |
|
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
27 |
| 4626 | 28 #ifndef VMS |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
29 |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
30 /* This is now really the approach recommended by Autoconf. If this |
|
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
31 doesn't cause trouble anywhere, remove the original code, which is |
|
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
32 #if'd out below. */ |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
33 |
|
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
34 #if 1 |
| 30465 | 35 #include <sys/types.h> |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
36 |
|
41185
d12c8d3334f4
Delete conditionals for HPUX7, ISC 4.1, and convex.
Richard M. Stallman <rms@gnu.org>
parents:
41138
diff
changeset
|
37 #ifdef HAVE_SYS_WAIT_H /* We have sys/wait.h with POSIXoid definitions. */ |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
38 #include <sys/wait.h> |
|
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
39 #endif /* !HAVE_SYS_WAIT_H */ |
| 30465 | 40 |
| 41 #ifndef WCOREDUMP /* not POSIX */ | |
| 42 #define WCOREDUMP(status) ((status) & 0x80) | |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
43 #endif |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
44 #ifndef WEXITSTATUS |
| 30465 | 45 #define WEXITSTATUS(status) (((status) & 0xff00) >> 8) |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
46 #endif |
|
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
47 #ifndef WIFEXITED |
| 30465 | 48 #define WIFEXITED(status) (WTERMSIG(status) == 0) |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
49 #endif |
|
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
50 #ifndef WIFSTOPPED |
| 30465 | 51 #define WIFSTOPPED(status) (((status) & 0xff) == 0x7f) |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
52 #endif |
|
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
53 #ifndef WIFSIGNALED |
| 30465 | 54 #define WIFSIGNALED(status) (!WIFSTOPPED(status) && !WIFEXITED(status)) |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
55 #endif |
|
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
56 #ifndef WSTOPSIG |
| 30465 | 57 #define WSTOPSIG(status) WEXITSTATUS(status) |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
58 #endif |
|
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
59 #ifndef WTERMSIG |
| 30465 | 60 #define WTERMSIG(status) ((status) & 0x7f) |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
61 #endif |
| 30465 | 62 |
| 63 #undef WAITTYPE | |
| 64 #define WAITTYPE int | |
| 65 #undef WRETCODE | |
| 66 #define WRETCODE(status) WEXITSTATUS (status) | |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
67 |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
68 #else /* 0 */ |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
69 |
| 4626 | 70 #ifndef WAITTYPE |
|
10773
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
71 |
|
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
72 #ifdef WAIT_USE_INT |
|
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
73 /* Some systems have union wait in their header, but we should use |
|
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
74 int regardless of that. */ |
|
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
75 #include <sys/wait.h> |
|
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
76 #define WAITTYPE int |
|
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
77 #define WRETCODE(w) WEXITSTATUS (w) |
|
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
78 |
|
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
79 #else /* not WAIT_USE_INT */ |
|
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
80 |
|
16220
02044b05d8e0
Replaced symbol BSD with BSD_SYSTEM.
Karl Heuer <kwzh@gnu.org>
parents:
15000
diff
changeset
|
81 #if (!defined (BSD_SYSTEM) && !defined (UNIPLUS) && !defined (STRIDE) && !(defined (HPUX) && !defined (NOMULTIPLEJOBS)) && !defined (HAVE_WAIT_HEADER)) |
| 4626 | 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) | |
| 30465 | 88 #define WTERMSIG(w) (w & 0177) |
| 4626 | 89 #ifndef WCOREDUMP |
| 90 #define WCOREDUMP(w) ((w&0200) != 0) | |
| 91 #endif | |
|
10773
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
92 |
|
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
46865
diff
changeset
|
93 #else |
|
10773
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
94 |
| 4626 | 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 | |
|
6015
1a2b17eab8d9
[BSD]: #undef WCOREDUMP before defining it.
Roland McGrath <roland@gnu.org>
parents:
4955
diff
changeset
|
103 #undef WCOREDUMP /* Later BSDs define this name differently. */ |
| 4626 | 104 #define WCOREDUMP(w) w.w_coredump |
| 105 | |
| 4955 | 106 #if defined (HPUX) || defined (convex) |
| 4626 | 107 /* HPUX version 7 has broken definitions of these. */ |
| 4955 | 108 /* pvogel@convex.com says the convex does too. */ |
| 4626 | 109 #undef WTERMSIG |
| 110 #undef WSTOPSIG | |
| 111 #undef WIFSTOPPED | |
| 112 #undef WIFSIGNALED | |
| 113 #undef WIFEXITED | |
| 4955 | 114 #endif /* HPUX | convex */ |
| 4626 | 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 | |
|
16220
02044b05d8e0
Replaced symbol BSD with BSD_SYSTEM.
Karl Heuer <kwzh@gnu.org>
parents:
15000
diff
changeset
|
131 #endif /* BSD_SYSTEM || UNIPLUS || STRIDE || HPUX */ |
|
10773
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
132 #endif /* not WAIT_USE_INT */ |
| 4626 | 133 #endif /* no WAITTYPE */ |
|
10773
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
134 |
|
46865
971ae7795f13
Only the include of sys/wait.h tests HAVE_SYS_WAIT_H.
Richard M. Stallman <rms@gnu.org>
parents:
41185
diff
changeset
|
135 #endif /* 0 */ |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
136 |
| 4626 | 137 #else /* VMS */ |
|
10773
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
138 |
| 4626 | 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" | |
|
10773
d8bc42dd7235
New alternative specified by WAIT_USE_INT.
Richard M. Stallman <rms@gnu.org>
parents:
10715
diff
changeset
|
151 |
| 4626 | 152 #endif /* VMS */ |
|
30066
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
153 |
|
0c8b413f3f35
Use the autoconf recommended approach. Old code #if'd out in case we
Dave Love <fx@gnu.org>
parents:
16220
diff
changeset
|
154 #endif /* EMACS_SYSWAIT_H */ |
| 52401 | 155 |
| 156 /* arch-tag: 7e5d9719-ec66-4b6f-89bb-563eea16a899 | |
| 157 (do not change this comment) */ |
