Import selfpipe code from skalibs 1.2.5

[andersk@mit.edu: Move code to new third/libstddjb directory]
This commit is contained in:
Quentin Smith
2012-02-26 15:58:37 -05:00
committed by Keith Winstein
parent 9a3ab83783
commit 77f3a9073f
24 changed files with 697 additions and 0 deletions
+42
View File
@@ -0,0 +1,42 @@
/* ISC license. */
#include <signal.h>
#include "sysdeps.h"
#include "sig.h"
#ifdef HASSIGACTION
int skasigaction (int sig, struct skasigaction const *new, struct skasigaction *old)
{
struct sigaction sanew, saold ;
if (((new->flags & SKASA_MASKALL) ? sigfillset(&sanew.sa_mask) : sigemptyset(&sanew.sa_mask)) == -1) return -1 ;
sanew.sa_handler = new->handler ;
sanew.sa_flags = (new->flags & SKASA_NOCLDSTOP) ? SA_NOCLDSTOP : 0 ;
if (sigaction(sig, &sanew, &saold) == -1) return -1 ;
if (old)
{
register int r = sigismember(&saold.sa_mask, (sig == SIGTERM) ? SIGPIPE : SIGTERM) ;
if (r == -1) return -1 ;
old->flags = 0 ;
if (r) old->flags |= SKASA_MASKALL ;
if (saold.sa_flags & SA_NOCLDSTOP) old->flags |= SKASA_NOCLDSTOP ;
old->handler = saold.sa_handler ;
}
return 0 ;
}
#else
int skasigaction (int sig, struct skasigaction const *new, struct skasigaction *old)
{
skasighandler_t_ref haold = signal(sig, new->handler) ;
if (haold == SIG_ERR) return -1 ;
if (old)
{
old->handler = haold ;
old->flags = 0 ;
}
return 0 ;
}
#endif