Home | History | Annotate | Line # | Download | only in libm 
      1 /* $NetBSD: t_ilogb.c,v 1.11 2024/05/14 15:31:42 riastradh Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 2016 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Maya Rashish.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 __RCSID("$NetBSD: t_ilogb.c,v 1.11 2024/05/14 15:31:42 riastradh Exp $");
     34 
     35 #include <atf-c.h>
     36 #include <fenv.h>
     37 #include <limits.h>
     38 #include <math.h>
     39 
     40 #ifndef __HAVE_FENV
     41 
     42 # define ATF_CLEAR_EXCEPTS		__nothing
     43 # define ATF_CHECK_RAISED_INVALID	__nothing
     44 # define ATF_CHECK_RAISED_NOTHING	__nothing
     45 
     46 #else  /* __HAVE_FENV */
     47 
     48 # define ATF_CLEAR_EXCEPTS		(void)feclearexcept(FE_ALL_EXCEPT);
     49 
     50 # define ATF_CHECK_RAISED_INVALID do { \
     51 	int r = fetestexcept(FE_ALL_EXCEPT); \
     52 	ATF_CHECK_MSG((r & FE_INVALID) != 0, \
     53 	    "r & FE_INVALID == 0 (r=%#x, FE_INVALID=%#x)", \
     54 	     r, FE_INVALID); \
     55 	(void)feclearexcept(FE_ALL_EXCEPT); \
     56 } while (/*CONSTCOND*/0)
     57 
     58 # define ATF_CHECK_RAISED_NOTHING do { \
     59 	int r = fetestexcept(FE_ALL_EXCEPT); \
     60 	ATF_CHECK_MSG(r == 0, "r=%#x != 0", r); \
     61 	(void)feclearexcept(FE_ALL_EXCEPT); \
     62 } while (/*CONSTCOND*/0)
     63 
     64 #endif	/* __HAVE_FENV */
     65 
     66 ATF_TC(ilogb);
     67 ATF_TC_HEAD(ilogb, tc)
     68 {
     69 	atf_tc_set_md_var(tc, "descr", "Check ilogb family");
     70 }
     71 
     72 ATF_TC_BODY(ilogb, tc)
     73 {
     74 
     75 	ATF_CLEAR_EXCEPTS;
     76 
     77 	ATF_CHECK(ilogbf(0) == FP_ILOGB0);
     78 	ATF_CHECK_RAISED_INVALID;
     79 	ATF_CHECK(ilogb(0) == FP_ILOGB0);
     80 	ATF_CHECK_RAISED_INVALID;
     81 	ATF_CHECK(ilogbl(0) == FP_ILOGB0);
     82 	ATF_CHECK_RAISED_INVALID;
     83 
     84 	ATF_CHECK(ilogbf(-0.) == FP_ILOGB0);
     85 	ATF_CHECK_RAISED_INVALID;
     86 	ATF_CHECK(ilogb(-0.) == FP_ILOGB0);
     87 	ATF_CHECK_RAISED_INVALID;
     88 	ATF_CHECK(ilogbl(-0.) == FP_ILOGB0);
     89 	ATF_CHECK_RAISED_INVALID;
     90 
     91 	if (isinf(INFINITY)) {
     92 		ATF_CHECK(ilogbf(INFINITY) == INT_MAX);
     93 		ATF_CHECK_RAISED_INVALID;
     94 		ATF_CHECK(ilogb(INFINITY) == INT_MAX);
     95 		ATF_CHECK_RAISED_INVALID;
     96 		ATF_CHECK(ilogbl(INFINITY) == INT_MAX);
     97 		ATF_CHECK_RAISED_INVALID;
     98 
     99 		ATF_CHECK(ilogbf(-INFINITY) == INT_MAX);
    100 		ATF_CHECK_RAISED_INVALID;
    101 		ATF_CHECK(ilogb(-INFINITY) == INT_MAX);
    102 		ATF_CHECK_RAISED_INVALID;
    103 		ATF_CHECK(ilogbl(-INFINITY) == INT_MAX);
    104 		ATF_CHECK_RAISED_INVALID;
    105 	}
    106 
    107 	ATF_CHECK(ilogbf(1024) == 10);
    108 	ATF_CHECK_RAISED_NOTHING;
    109 	ATF_CHECK(ilogb(1024) == 10);
    110 	ATF_CHECK_RAISED_NOTHING;
    111 	ATF_CHECK(ilogbl(1024) == 10);
    112 	ATF_CHECK_RAISED_NOTHING;
    113 
    114 #ifdef NAN
    115 	ATF_CHECK(ilogbf(NAN) == FP_ILOGBNAN);
    116 	ATF_CHECK_RAISED_INVALID;
    117 	ATF_CHECK(ilogb(NAN) == FP_ILOGBNAN);
    118 	ATF_CHECK_RAISED_INVALID;
    119 	ATF_CHECK(ilogbl(NAN) == FP_ILOGBNAN);
    120 	ATF_CHECK_RAISED_INVALID;
    121 #endif
    122 }
    123 
    124 ATF_TP_ADD_TCS(tp)
    125 {
    126 
    127 	ATF_TP_ADD_TC(tp, ilogb);
    128 
    129 	return atf_no_error();
    130 }
    131