GCC Code Coverage Report
Directory: ./ Exec Total Coverage
File: lib/libc/gen/fpclassify.c Lines: 0 18 0.0 %
Date: 2017-11-13 Branches: 0 20 0.0 %

Line Branch Exec Source
1
/*	$OpenBSD: fpclassify.c,v 1.9 2015/10/27 05:54:49 guenther Exp $	*/
2
/*
3
 * Copyright (c) 2008 Martynas Venckus <martynas@openbsd.org>
4
 *
5
 * Permission to use, copy, modify, and distribute this software for any
6
 * purpose with or without fee is hereby granted, provided that the above
7
 * copyright notice and this permission notice appear in all copies.
8
 *
9
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
10
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
12
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
15
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16
 */
17
18
#include <sys/types.h>
19
#include <machine/ieee.h>
20
#include <float.h>
21
#include <math.h>
22
23
int
24
__fpclassify(double d)
25
{
26
	struct ieee_double *p = (struct ieee_double *)&d;
27
28
	if (p->dbl_exp == 0) {
29
		if (p->dbl_frach == 0 && p->dbl_fracl == 0)
30
			return FP_ZERO;
31
		else
32
			return FP_SUBNORMAL;
33
	}
34
35
	if (p->dbl_exp == DBL_EXP_INFNAN) {
36
		if (p->dbl_frach == 0 && p->dbl_fracl == 0)
37
			return FP_INFINITE;
38
		else
39
			return FP_NAN;
40
	}
41
42
	return FP_NORMAL;
43
}
44
DEF_STRONG(__fpclassify);
45
46
int
47
__fpclassifyf(float f)
48
{
49
	struct ieee_single *p = (struct ieee_single *)&f;
50
51
	if (p->sng_exp == 0) {
52
		if (p->sng_frac == 0)
53
			return FP_ZERO;
54
		else
55
			return FP_SUBNORMAL;
56
	}
57
58
	if (p->sng_exp == SNG_EXP_INFNAN) {
59
		if (p->sng_frac == 0)
60
			return FP_INFINITE;
61
		else
62
			return FP_NAN;
63
	}
64
65
	return FP_NORMAL;
66
}
67
DEF_STRONG(__fpclassifyf);
68
69
#if	LDBL_MANT_DIG == DBL_MANT_DIG
70
MAKE_CLONE(__fpclassifyl, __fpclassify);
71
DEF_STRONG(__fpclassifyl);
72
#endif	/* LDBL_MANT_DIG == DBL_MANT_DIG */