1 |
edhill |
1.1 |
/* |
2 |
edhill |
1.5 |
* $Header: /u/gcmpack/MITgcm/eesupp/src/sigreg.c,v 1.4 2006/05/23 14:55:19 edhill Exp $ |
3 |
edhill |
1.1 |
* $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 |
edhill |
1.3 |
#ifdef HAVE_SIGREG |
23 |
edhill |
1.1 |
#include <stdlib.h> |
24 |
|
|
#include <stdio.h> |
25 |
|
|
#include <signal.h> |
26 |
|
|
#include <errno.h> |
27 |
|
|
#include <ucontext.h> |
28 |
|
|
|
29 |
|
|
int * ip; |
30 |
|
|
|
31 |
|
|
static void killhandler( |
32 |
|
|
unsigned int sn, siginfo_t si, struct ucontext *sc ) |
33 |
|
|
{ |
34 |
|
|
*ip = *ip + 1; |
35 |
|
|
return; |
36 |
|
|
} |
37 |
edhill |
1.3 |
#endif |
38 |
edhill |
1.1 |
|
39 |
|
|
/* int main( int argc, char ** argv ) */ |
40 |
|
|
void FC_NAMEMANGLE(sigreg) (int * aip) |
41 |
|
|
{ |
42 |
edhill |
1.3 |
#ifdef HAVE_SIGREG |
43 |
edhill |
1.2 |
struct sigaction s; |
44 |
edhill |
1.4 |
ip = aip; |
45 |
edhill |
1.1 |
s.sa_flags = SA_SIGINFO; |
46 |
|
|
s.sa_sigaction = (void *)killhandler; |
47 |
|
|
if(sigaction (SIGTERM,&s,(struct sigaction *)NULL)) { |
48 |
|
|
printf("Sigaction returned error = %d\n", errno); |
49 |
|
|
exit(0); |
50 |
|
|
} |
51 |
edhill |
1.3 |
#endif |
52 |
edhill |
1.1 |
return; |
53 |
|
|
} |
54 |
|
|
|
55 |
|
|
|