diff options
Diffstat (limited to 'usr/src/lib/libbc/libc/gen/common/sigfpe.c')
| -rw-r--r-- | usr/src/lib/libbc/libc/gen/common/sigfpe.c | 203 |
1 files changed, 0 insertions, 203 deletions
diff --git a/usr/src/lib/libbc/libc/gen/common/sigfpe.c b/usr/src/lib/libbc/libc/gen/common/sigfpe.c deleted file mode 100644 index 24b24eb95f..0000000000 --- a/usr/src/lib/libbc/libc/gen/common/sigfpe.c +++ /dev/null @@ -1,203 +0,0 @@ -/* - * CDDL HEADER START - * - * The contents of this file are subject to the terms of the - * Common Development and Distribution License, Version 1.0 only - * (the "License"). You may not use this file except in compliance - * with the License. - * - * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE - * or http://www.opensolaris.org/os/licensing. - * See the License for the specific language governing permissions - * and limitations under the License. - * - * When distributing Covered Code, include this CDDL HEADER in each - * file and include the License file at usr/src/OPENSOLARIS.LICENSE. - * If applicable, add the following below this CDDL HEADER, with the - * fields enclosed by brackets "[]" replaced with your own identifying - * information: Portions Copyright [yyyy] [name of copyright owner] - * - * CDDL HEADER END - */ -#pragma ident "%Z%%M% %I% %E% SMI" - -/* - * Copyright (c) 1987 by Sun Microsystems, Inc. - */ - -/* Swap handler for SIGFPE codes. */ - -#include <errno.h> -#include <signal.h> -#include <floatingpoint.h> - -#ifndef FPE_INTDIV_TRAP -#define FPE_INTDIV_TRAP 0x14 /* integer divide by zero */ -#endif -#ifndef FPE_CHKINST_TRAP -#define FPE_CHKINST_TRAP 0x18 /* CHK [CHK2] instruction */ -#endif -#ifndef FPE_TRAPV_TRAP -#define FPE_TRAPV_TRAP 0x1c /* TRAPV [cpTRAPcc TRAPcc] instr */ -#endif -#ifndef FPE_FLTBSUN_TRAP -#define FPE_FLTBSUN_TRAP 0xc0 /* [branch or set on unordered cond] */ -#endif -#ifndef FPE_FLTINEX_TRAP -#define FPE_FLTINEX_TRAP 0xc4 /* [floating inexact result] */ -#endif -#ifndef FPE_FLTDIV_TRAP -#define FPE_FLTDIV_TRAP 0xc8 /* [floating divide by zero] */ -#endif -#ifndef FPE_FLTUND_TRAP -#define FPE_FLTUND_TRAP 0xcc /* [floating underflow] */ -#endif -#ifndef FPE_FLTOPERR_TRAP -#define FPE_FLTOPERR_TRAP 0xd0 /* [floating operand error] */ -#endif -#ifndef FPE_FLTOVF_TRAP -#define FPE_FLTOVF_TRAP 0xd4 /* [floating overflow] */ -#endif -#ifndef FPE_FLTNAN_TRAP -#define FPE_FLTNAN_TRAP 0xd8 /* [floating Not-A-Number] */ -#endif -#ifndef FPE_FPA_ENABLE -#define FPE_FPA_ENABLE 0x400 /* [FPA not enabled] */ -#endif -#ifndef FPE_FPA_ERROR -#define FPE_FPA_ERROR 0x404 /* [FPA arithmetic exception] */ -#endif - -#define N_SIGFPE_CODE 13 - -/* Array of SIGFPE codes. */ - -static sigfpe_code_type sigfpe_codes[N_SIGFPE_CODE] = { - FPE_INTDIV_TRAP, - FPE_CHKINST_TRAP, - FPE_TRAPV_TRAP, - FPE_FLTBSUN_TRAP, - FPE_FLTINEX_TRAP, - FPE_FLTDIV_TRAP, - FPE_FLTUND_TRAP, - FPE_FLTOPERR_TRAP, - FPE_FLTOVF_TRAP, - FPE_FLTNAN_TRAP, - FPE_FPA_ENABLE, - FPE_FPA_ERROR, - 0}; - -/* Array of handlers. */ - -static sigfpe_handler_type sigfpe_handlers[N_SIGFPE_CODE]; - -static int _sigfpe_master_enabled; -/* Originally zero, set to 1 by _enable_sigfpe_master. */ - -void -_sigfpe_master(sig, code, scp, addr) - int sig; - sigfpe_code_type code; - struct sigcontext *scp; - char *addr; -{ - int i; - enum fp_exception_type exception; - - for (i = 0; (i < N_SIGFPE_CODE) && (code != sigfpe_codes[i]); i++); - /* Find index of handler. */ - if (i >= N_SIGFPE_CODE) - i = N_SIGFPE_CODE - 1; - switch ((unsigned int)sigfpe_handlers[i]) { - case (unsigned int)SIGFPE_DEFAULT: - switch (code) { - case FPE_FLTBSUN_TRAP: - case FPE_FLTOPERR_TRAP: - case FPE_FLTNAN_TRAP: - exception = fp_invalid; - goto ieee; - case FPE_FLTINEX_TRAP: - exception = fp_inexact; - goto ieee; - case FPE_FLTDIV_TRAP: - exception = fp_division; - goto ieee; - case FPE_FLTUND_TRAP: - exception = fp_underflow; - goto ieee; - case FPE_FLTOVF_TRAP: - exception = fp_overflow; - goto ieee; - default: /* The common default treatment is to abort. */ - break; - } - case (unsigned int)SIGFPE_ABORT: - abort(); - case (unsigned int)SIGFPE_IGNORE: - return; - default: /* User-defined not SIGFPE_DEFAULT or - * SIGFPE_ABORT. */ - (sigfpe_handlers[i]) (sig, code, scp, addr); - return; - } -ieee: - switch ((unsigned int)ieee_handlers[(int) exception]) { - case (unsigned int)SIGFPE_DEFAULT: - /* Error condition but ignore it. */ - case (unsigned int)SIGFPE_IGNORE: - /* Error condition but ignore it. */ - return; - case (unsigned int)SIGFPE_ABORT: - abort(); - default: - (ieee_handlers[(int) exception]) (sig, code, scp, addr); - return; - } -} - -int -_enable_sigfpe_master() -{ - /* Enable the sigfpe master handler always. */ - struct sigvec newsigvec, oldsigvec; - - newsigvec.sv_handler = _sigfpe_master; - newsigvec.sv_mask = 0; - newsigvec.sv_onstack = 0; - _sigfpe_master_enabled = 1; - return sigvec(SIGFPE, &newsigvec, &oldsigvec); -} - -int -_test_sigfpe_master() -{ - /* - * Enable the sigfpe master handler if it's never been enabled - * before. - */ - - if (_sigfpe_master_enabled == 0) - return _enable_sigfpe_master(); - else - return _sigfpe_master_enabled; -} - -sigfpe_handler_type -sigfpe(code, hdl) - sigfpe_code_type code; - sigfpe_handler_type hdl; -{ - sigfpe_handler_type oldhdl; - int i; - - _test_sigfpe_master(); - for (i = 0; (i < N_SIGFPE_CODE) && (code != sigfpe_codes[i]); i++); - /* Find index of handler. */ - if (i >= N_SIGFPE_CODE) { - errno = EINVAL; - return (sigfpe_handler_type) BADSIG;/* Not 0 or SIGFPE code */ - } - oldhdl = sigfpe_handlers[i]; - sigfpe_handlers[i] = hdl; - return oldhdl; -} |