traceback_handler.c File Reference

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <signal.h>

Go to the source code of this file.

Macros
#define	_FCALL
#define	trace_cf   trace_cf_

Functions
void	setignorecore (int *on)
void	ignoreCore (int s)
void	trace_cf (int *s, int *iw)
void	ARRET (int *n)
void	arret_ (int *n)
void	arret_c (int n)
void	user_abrt (int sig)
void _FCALL	SETIGNORECORE (int *on)
void	setignorecore__ (int *on)
void	setignorecore_ (int *on)

Macro Definition Documentation

_FCALL

#define _FCALL

Definition at line 31 of file traceback_handler.c.

trace_cf

#define trace_cf   trace_cf_

Definition at line 36 of file traceback_handler.c.

Function Documentation

ARRET()

void ARRET

(

int *

n

)

arret_()

void arret_

(

int *

n

)

arret_c()

void arret_c

(

int

n

)

---

Calls the Fortran Arret routine for termination

n is the error termination

Definition at line 132 of file write_routtines.c.

{
/*Appel a une routine Fortran */
#ifdef _WIN64
 ARRET(&n);
#else
 arret_(&n);
#endif
}

ignoreCore()

void ignoreCore

(

int

s

)

Definition at line 61 of file traceback_handler.c.

{
  int iw = 1, is;
  if     (s == SIGBUS ) is=1;
  else if(s == SIGFPE ) is=2;
  else if(s == SIGSEGV) is=3;
 
  trace_cf(&is,&iw);
}

SETIGNORECORE()

void _FCALL SETIGNORECORE

(

int *

on

)

Definition at line 82 of file traceback_handler.c.

{setignorecore (on);}

setignorecore()

void setignorecore

(

int *

on

)

Definition at line 89 of file traceback_handler.c.

{
if (*on ) {
#ifdef SIGBUS
    signal (SIGBUS, ignoreCore);   /* 7 bus error*/
#endif
#ifdef SIGFPE
    signal (SIGFPE, ignoreCore);   /* 8 i/0 */
#endif
#ifdef SIGSEGV
    signal (SIGSEGV, ignoreCore);  /* 11 segmentation violation*/
#endif
#ifdef SIGILL
    signal (SIGILL, ignoreCore);   /* 4 illegal instruction*/
#endif
}
else {                     /* acknowledging core */
#ifdef SIGBUS
    signal (SIGBUS, SIG_DFL);      /* 7 bus error*/
#endif
#ifdef SIGFPE
    signal (SIGFPE, SIG_DFL);      /* 8 i/0 */
#endif
#ifdef SIGSEGV
    signal (SIGSEGV, SIG_DFL);     /* 11 segmentation violation*/
#endif
#ifdef SIGILL
    signal (SIGILL, SIG_DFL);      /* 4 illegal instruction*/
#endif
}
 
#ifdef SIGINT
signal (SIGINT,user_abrt);
#endif
 
#ifdef SIGABRT
signal (SIGABRT,user_abrt);
#endif
 
#ifdef SIGBREAK
signal (SIGBREAK,user_abrt);
#endif
 
#ifdef SIGTERM
signal (SIGTERM, user_abrt);       /* 15 Termination signal*/
#endif
}

setignorecore_()

void setignorecore_

(

int *

on

)

Definition at line 86 of file traceback_handler.c.

{setignorecore (on);}

setignorecore__()

void setignorecore__

(

int *

on

)

Definition at line 84 of file traceback_handler.c.

{setignorecore (on);}

trace_cf()

void trace_cf	(	int *	s,
		int *	iw )

user_abrt()

void user_abrt

(

int

sig

)

Definition at line 72 of file traceback_handler.c.

{
 int val=3;
 printf("\n\nUser or system abort detected (CTRL-C) !\n\n");
 arret_c(val);
}