1
0
kolibrios/programs/develop/open watcom/trunk/clib/process/signl.c
Sergey Semyonov (Serge) 97918755c2 SIGFPE handling
git-svn-id: svn://kolibrios.org@703 a494cfbc-eb01-0410-851d-a64ba20cac60
2008-01-26 21:57:46 +00:00

188 lines
5.5 KiB
C

/****************************************************************************
*
* Open Watcom Project
*
* Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved.
*
* ========================================================================
*
* This file contains Original Code and/or Modifications of Original
* Code as defined in and that are subject to the Sybase Open Watcom
* Public License version 1.0 (the 'License'). You may not use this file
* except in compliance with the License. BY USING THIS FILE YOU AGREE TO
* ALL TERMS AND CONDITIONS OF THE LICENSE. A copy of the License is
* provided with the Original Code and Modifications, and is also
* available at www.sybase.com/developer/opensource.
*
* The Original Code and all software distributed under the License are
* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
* EXPRESS OR IMPLIED, AND SYBASE AND ALL CONTRIBUTORS HEREBY DISCLAIM
* ALL SUCH WARRANTIES, INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR
* NON-INFRINGEMENT. Please see the License for the specific language
* governing rights and limitations under the License.
*
* ========================================================================
*
* Description: signal handling ( for DOS, Windows 3.x and ? Netware )
*
****************************************************************************/
#include "variety.h"
#include <stdio.h>
#include <signal.h>
//#include <dos.h>
#include <errno.h>
#include <float.h>
#include "rtdata.h"
#include "sigtab.h"
#include "sigfunc.h"
#include "seterrno.h"
#ifndef __WINDOWS_386__
#ifndef __NETWARE__
//extern void __grab_int23( void );
//extern void __restore_int23( void );
//extern void __grab_int_ctrl_break( void );
//extern void __restore_int_ctrl_break( void );
#endif
#endif
#define __SIGLAST SIGIOVFL
static __sig_func SignalTable[] = {
SIG_IGN, /* unused */
SIG_DFL, /* SIGABRT */
SIG_DFL, /* SIGFPE */
SIG_DFL, /* SIGILL */
SIG_DFL, /* SIGINT */
SIG_DFL, /* SIGSEGV */
SIG_DFL, /* SIGTERM */
SIG_DFL, /* SIGBREAK */
SIG_IGN, /* SIGUSR1 */
SIG_IGN, /* SIGUSR2 */
SIG_IGN, /* SIGUSR3 */
SIG_DFL, /* SIGIDIVZ */
SIG_DFL /* SIGIOVFL */
};
static FPEhandler *__old_FPE_handler = NULL;
void __sigabort( void )
{
raise( SIGABRT );
}
//extern void _fpmath( void );
//#pragma aux _fpmath "__fpmath";
_WCRTLINK void __sigfpe_handler( int fpe_type )
{
__sig_func func;
func = SignalTable[ SIGFPE ];
if( func != SIG_IGN && func != SIG_DFL && func != SIG_ERR ) {
SignalTable[ SIGFPE ] = SIG_DFL; /* 09-nov-87 FWC */
(*(__sigfpe_func)func)( SIGFPE, fpe_type ); /* so we can pass 2'nd parm */
}
}
_WCRTLINK __sig_func signal( int sig, __sig_func func )
{
__sig_func prev_func;
if(( sig < 1 ) || ( sig > __SIGLAST )) {
__set_errno( EINVAL );
return( SIG_ERR );
}
_RWD_abort = __sigabort; /* change the abort rtn address */
if( sig == SIGINT ) {
if( func == SIG_DFL ) {
// __restore_int23();
} else if( func != SIG_ERR ) {
// __grab_int23();
}
} else if( sig == SIGBREAK ) {
if( func == SIG_DFL ) {
// __restore_int_ctrl_break();
} else if( func != SIG_ERR ) {
// __grab_int_ctrl_break();
}
} else if( sig == SIGFPE ) {
if( func == SIG_DFL ) {
__restore_FPE_handler();
} else if( func != SIG_ERR ) {
__grab_FPE_handler();
}
}
prev_func = _RWD_sigtab[ sig ];
_RWD_sigtab[ sig ] = func;
return( prev_func );
}
_WCRTLINK int raise( int sig )
{
__sig_func func;
func = _RWD_sigtab[ sig ];
switch( sig ) {
case SIGFPE:
__sigfpe_handler( FPE_EXPLICITGEN );
break;
case SIGABRT:
if( func == SIG_DFL ) {
__terminate();
}
case SIGINT:
if( func != SIG_IGN && func != SIG_DFL && func != SIG_ERR ) {
_RWD_sigtab[ sig ] = SIG_DFL; /* 09-nov-87 FWC */
// __restore_int23();
(*func)( sig );
}
break;
case SIGBREAK:
if( func != SIG_IGN && func != SIG_DFL && func != SIG_ERR ) {
_RWD_sigtab[ sig ] = SIG_DFL; /* 09-nov-87 FWC */
// __restore_int_ctrl_break();
(*func)( sig );
}
break;
case SIGILL:
case SIGSEGV:
case SIGTERM:
case SIGUSR1:
case SIGUSR2:
case SIGUSR3:
case SIGIDIVZ:
case SIGIOVFL:
if( func != SIG_IGN && func != SIG_DFL && func != SIG_ERR ) {
_RWD_sigtab[ sig ] = SIG_DFL; /* 09-nov-87 FWC */
(*func)( sig );
}
break;
default:
return( -1 );
}
return( 0 );
}
void __restore_FPE_handler( void )
{
if( __old_FPE_handler == NULL ) {
return;
}
__FPE_handler = __old_FPE_handler;
__old_FPE_handler = NULL;
}
void __grab_FPE_handler( void )
{
if( __old_FPE_handler == NULL ) {
__old_FPE_handler = __FPE_handler;
__FPE_handler = __sigfpe_handler;
}
}