名前¶

書式¶

#define _SVID_SOURCE             /* feature_test_macros(7) 参照 */
#include <math.h>

int matherr(struct exception *exc);

extern _LIB_VERSION_TYPE _LIB_VERSION;

説明¶

struct exception {
    int    type;      /* Exception type */
    char  *name;      /* Name of function causing exception */
    double arg1;      /* 1st argument to function */
    double arg2;      /* 2nd argument to function */
    double retval;    /* Function return value */
}

DOMAIN

領域エラー (domain error) が発生した (関数の引き数が関数が定義された範囲外であった)。 返り値は関数によって異なり、 error には EDOM が設定される。

SING

極エラー (pole error) が発生した (関数の結果が無限大である)。 返り値はほとんどの場合 HUGE (最大の単精度浮動小数点数) となり、 たいていは符号付きである。 ほとんどの場合、 errno には EDOM が設定される。

OVERFLOW

オーバーフローが発生した。 ほとんどの場合、値 HUGE が返され、 errno には ERANGE が設定される。

UNDERFLOW

アンダーフローが発生した。 0.0 が返され、 errno に ERANGE が設定される。

TLOSS

Total loss of significance が発生した。 0.0 が返され、 errno に ERANGE が設定される。

PLOSS

Partial loss of significance が発生した。 この値は glibc (や他の多くのシステム) で使用されていない。

matherr() を利用している数学関数¶

x        関数の最初の引き数
y        関数の二番目の引き数
fin      引き数の値が無限大
neg      引き数が負の値
int      引き数が整数値
o/f      結果のオーバーフロー
u/f      結果のアンダーフロー
|x|      x の絶対値
X_TLOSS   <math.h> で定義される定数

例¶

$  ./a.out 0.0
errno: Numerical result out of range
x=-inf

$  ./a.out 0.0 0
matherr SING exception in log() function
        args:   0.000000, 0.000000
        retval: -340282346638528859811704183484516925440.000000
log: SING error
errno: Numerical argument out of domain
x=-340282346638528859811704183484516925440.000000

$  ./a.out 0.0 1
matherr SING exception in log() function
        args:   0.000000, 0.000000
        retval: -340282346638528859811704183484516925440.000000
x=-340282346638528859811704183484516925440.000000

$  ./a.out 0.0 1 12345.0
matherr SING exception in log() function
        args:   0.000000, 0.000000
        retval: -340282346638528859811704183484516925440.000000
x=12345.000000

プログラムのソース¶

#define _SVID_SOURCE
#include <errno.h>
#include <math.h>
#include <stdio.h>
#include <stdlib.h>

static int matherr_ret = 0;     /* Value that matherr()
                                   should return */
static int change_retval = 0;   /* Should matherr() change
                                   function's return value? */
static double new_retval;       /* New function return value */

int
matherr(struct exception *exc)
{
    fprintf(stderr, "matherr %s exception in %s() function\n",
           (exc->type == DOMAIN) ?    "DOMAIN" :
           (exc->type == OVERFLOW) ?  "OVERFLOW" :
           (exc->type == UNDERFLOW) ? "UNDERFLOW" :
           (exc->type == SING) ?      "SING" :
           (exc->type == TLOSS) ?     "TLOSS" :
           (exc->type == PLOSS) ?     "PLOSS" : "???",
            exc->name);
    fprintf(stderr, "        args:   %f, %f\n",
            exc->arg1, exc->arg2);
    fprintf(stderr, "        retval: %f\n", exc->retval);

    if (change_retval)
        exc->retval = new_retval;

    return matherr_ret;
}

int
main(int argc, char *argv[])
{
    double x;

    if (argc < 2) {
        fprintf(stderr, "Usage: %s <argval>"
                " [<matherr-ret> [<new-func-retval>]]\n", argv[0]);
        exit(EXIT_FAILURE);
    }

    if (argc > 2) {
        _LIB_VERSION = _SVID_;
        matherr_ret = atoi(argv[2]);
    }

    if (argc > 3) {
        change_retval = 1;
        new_retval = atof(argv[3]);
    }

    x = log(atof(argv[1]));
    if (errno != 0)
        perror("errno");

    printf("x=%f\n", x);
    exit(EXIT_SUCCESS);
}

関連項目¶

この文書について¶