Move old compatiblity to cl.el. Remove cl-macroexpand-all.
[emacs.git] / src / syssignal.h
bloba2522f24429c9f3110b9230a89c7aed90b69ca36
1 /* syssignal.h - System-dependent definitions for signals.
3 Copyright (C) 1993, 1999, 2001-2012 Free Software Foundation, Inc.
5 This file is part of GNU Emacs.
7 GNU Emacs is free software: you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation, either version 3 of the License, or
10 (at your option) any later version.
12 GNU Emacs is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
20 extern void init_signals (void);
22 #ifdef HAVE_PTHREAD
23 #include <pthread.h>
24 /* If defined, asynchronous signals delivered to a non-main thread are
25 forwarded to the main thread. */
26 #define FORWARD_SIGNAL_TO_MAIN_THREAD
27 #endif
29 /* Don't #include <signal.h>. That header should always be #included
30 before "config.h", because some configuration files (like s/hpux.h)
31 indicate that SIGIO doesn't work by #undef-ing SIGIO. If this file
32 #includes <signal.h>, then that will re-#define SIGIO and confuse
33 things. */
34 /* XXX This is not correct anymore, there is a BROKEN_SIGIO macro. */
36 #define SIGMASKTYPE sigset_t
38 #define SIGEMPTYMASK (empty_mask)
39 extern sigset_t empty_mask;
41 /* POSIX pretty much destroys any possibility of writing sigmask as a
42 macro in standard C. We always define our own version because the
43 predefined macro in Glibc 2.1 is only provided for compatibility for old
44 programs that use int as signal mask type. */
45 #undef sigmask
46 #ifdef __GNUC__
47 #define sigmask(SIG) \
48 ({ \
49 sigset_t _mask; \
50 sigemptyset (&_mask); \
51 sigaddset (&_mask, SIG); \
52 _mask; \
54 #else /* ! defined (__GNUC__) */
55 extern sigset_t sys_sigmask ();
56 #define sigmask(SIG) (sys_sigmask (SIG))
57 #endif /* ! defined (__GNUC__) */
59 #undef sigpause
60 #define sigpause(MASK) sigsuspend (&(MASK))
62 #define sigblock(SIG) sys_sigblock (SIG)
63 #define sigunblock(SIG) sys_sigunblock (SIG)
64 #ifndef sigsetmask
65 #define sigsetmask(SIG) sys_sigsetmask (SIG)
66 #endif
67 #undef signal
68 #define signal(SIG,ACT) sys_signal(SIG,ACT)
70 /* Whether this is what all systems want or not, this is what
71 appears to be assumed in the source, for example data.c:arith_error. */
72 typedef void (*signal_handler_t) (int);
74 signal_handler_t sys_signal (int signal_number, signal_handler_t action);
75 sigset_t sys_sigblock (sigset_t new_mask);
76 sigset_t sys_sigunblock (sigset_t new_mask);
77 sigset_t sys_sigsetmask (sigset_t new_mask);
78 #if ! (defined TIOCNOTTY || defined USG5 || defined CYGWIN)
79 void croak (char *) NO_RETURN;
80 #endif
82 #define sys_sigdel(MASK,SIG) sigdelset (&MASK,SIG)
84 #define sigfree() sigsetmask (SIGEMPTYMASK)
86 #if defined (SIGIO) && defined (BROKEN_SIGIO)
87 # undef SIGIO
88 #endif
89 /* Last user: m/ibmrs6000.h */
90 #if defined (SIGPOLL) && defined (BROKEN_SIGPOLL)
91 #undef SIGPOLL
92 #endif
93 /* Last user: m/ibmrs6000.h */
94 #if defined (SIGAIO) && defined (BROKEN_SIGAIO)
95 #undef SIGAIO
96 #endif
97 /* Last user: m/ibmrs6000.h */
98 #if defined (SIGPTY) && defined (BROKEN_SIGPTY)
99 #undef SIGPTY
100 #endif
103 #if NSIG < NSIG_MINIMUM
104 # ifdef NSIG
105 # undef NSIG
106 # endif
107 # define NSIG NSIG_MINIMUM
108 #endif
110 /* On bsd, [man says] kill does not accept a negative number to kill a pgrp.
111 Must do that using the killpg call. */
112 #ifdef BSD_SYSTEM
113 #define EMACS_KILLPG(gid, signo) (killpg ( (gid), (signo)))
114 #else
115 #ifdef WINDOWSNT
116 #define EMACS_KILLPG(gid, signo) (kill (gid, signo))
117 #else
118 #define EMACS_KILLPG(gid, signo) (kill (-(gid), (signo)))
119 #endif
120 #endif
122 /* Define SIGCHLD as an alias for SIGCLD. There are many conditionals
123 testing SIGCHLD. */
124 #ifdef SIGCLD
125 #ifndef SIGCHLD
126 #define SIGCHLD SIGCLD
127 #endif /* SIGCHLD */
128 #endif /* ! defined (SIGCLD) */
130 #ifndef HAVE_STRSIGNAL
131 /* strsignal is in sysdep.c */
132 char *strsignal (int);
133 #endif
135 #ifdef FORWARD_SIGNAL_TO_MAIN_THREAD
136 extern pthread_t main_thread;
137 #define SIGNAL_THREAD_CHECK(signo) \
138 do { \
139 if (!pthread_equal (pthread_self (), main_thread)) \
141 /* POSIX says any thread can receive the signal. On GNU/Linux \
142 that is not true, but for other systems (FreeBSD at least) \
143 it is. So direct the signal to the correct thread and block \
144 it from this thread. */ \
145 sigset_t new_mask; \
147 sigemptyset (&new_mask); \
148 sigaddset (&new_mask, signo); \
149 pthread_sigmask (SIG_BLOCK, &new_mask, 0); \
150 pthread_kill (main_thread, signo); \
151 return; \
153 } while (0)
155 #else /* not FORWARD_SIGNAL_TO_MAIN_THREAD */
156 #define SIGNAL_THREAD_CHECK(signo)
157 #endif /* not FORWARD_SIGNAL_TO_MAIN_THREAD */