eesupp/src/sigreg.c

/*
 * $Header: /u/gcmpack/MITgcm/eesupp/src/sigreg.c,v 1.3 2006/05/22 22:05:18 edhill Exp $
 * $Name:  $

//BOP
// !ROUTINE: sigreg
// !INTERFACE:
   sigreg()

// !DESCRIPTION:
// Register a signal handler

//EOP

*/

/*  Here, we get the definition of the FC_NAMEMANGLE() macro. */
#include "FC_NAMEMANGLE.h"

/* #define FC_NAMEMANGLE(X) X ## _ */

#ifdef HAVE_SIGREG
#include <stdlib.h>
#include <stdio.h>
#include <signal.h>
#include <errno.h>
#include <ucontext.h>
#endif

int * ip;

#ifdef HAVE_SIGREG
static void killhandler(
    unsigned int sn, siginfo_t  si, struct ucontext *sc )
{
    *ip = *ip + 1;
    return;
}
#endif

/* int main( int argc, char ** argv ) */
void FC_NAMEMANGLE(sigreg) (int * aip)
{
#ifdef HAVE_SIGREG
    struct sigaction s;
    ip = aip;
    s.sa_flags = SA_SIGINFO;
    s.sa_sigaction = (void *)killhandler;
    if(sigaction (SIGTERM,&s,(struct sigaction *)NULL)) {
        printf("Sigaction returned error = %d\n", errno);
        exit(0);
    }
#endif
    return;
}


1	/*
2	* $Header: /u/gcmpack/MITgcm/eesupp/src/sigreg.c,v 1.3 2006/05/22 22:05:18 edhill Exp $
3	* $Name: $
4
5	//BOP
6	// !ROUTINE: sigreg
7	// !INTERFACE:
8	sigreg()
9
10	// !DESCRIPTION:
11	// Register a signal handler
12
13	//EOP
14
15	*/
16
17	/* Here, we get the definition of the FC_NAMEMANGLE() macro. */
18	#include "FC_NAMEMANGLE.h"
19
20	/* #define FC_NAMEMANGLE(X) X ## _ */
21
22	#ifdef HAVE_SIGREG
23	#include <stdlib.h>
24	#include <stdio.h>
25	#include <signal.h>
26	#include <errno.h>
27	#include <ucontext.h>
28	#endif
29
30	int * ip;
31
32	#ifdef HAVE_SIGREG
33	static void killhandler(
34	unsigned int sn, siginfo_t si, struct ucontext *sc )
35	{
36	ip = ip + 1;
37	return;
38	}
39	#endif
40
41	/* int main( int argc, char ** argv ) */
42	void FC_NAMEMANGLE(sigreg) (int * aip)
43	{
44	#ifdef HAVE_SIGREG
45	struct sigaction s;
46	ip = aip;
47	s.sa_flags = SA_SIGINFO;
48	s.sa_sigaction = (void *)killhandler;
49	if(sigaction (SIGTERM,&s,(struct sigaction *)NULL)) {
50	printf("Sigaction returned error = %d\n", errno);
51	exit(0);
52	}
53	#endif
54	return;
55	}
56
57