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