186d7f5d3SJohn Marino#!/bin/sh 286d7f5d3SJohn Marino 386d7f5d3SJohn Marino# 486d7f5d3SJohn Marino# Copyright (c) 2010 Peter Holm <pho@FreeBSD.org> 586d7f5d3SJohn Marino# All rights reserved. 686d7f5d3SJohn Marino# 786d7f5d3SJohn Marino# Redistribution and use in source and binary forms, with or without 886d7f5d3SJohn Marino# modification, are permitted provided that the following conditions 986d7f5d3SJohn Marino# are met: 1086d7f5d3SJohn Marino# 1. Redistributions of source code must retain the above copyright 1186d7f5d3SJohn Marino# notice, this list of conditions and the following disclaimer. 1286d7f5d3SJohn Marino# 2. Redistributions in binary form must reproduce the above copyright 1386d7f5d3SJohn Marino# notice, this list of conditions and the following disclaimer in the 1486d7f5d3SJohn Marino# documentation and/or other materials provided with the distribution. 1586d7f5d3SJohn Marino# 1686d7f5d3SJohn Marino# THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 1786d7f5d3SJohn Marino# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 1886d7f5d3SJohn Marino# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 1986d7f5d3SJohn Marino# ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 2086d7f5d3SJohn Marino# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 2186d7f5d3SJohn Marino# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 2286d7f5d3SJohn Marino# OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 2386d7f5d3SJohn Marino# HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 2486d7f5d3SJohn Marino# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 2586d7f5d3SJohn Marino# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 2686d7f5d3SJohn Marino# SUCH DAMAGE. 2786d7f5d3SJohn Marino# 2886d7f5d3SJohn Marino# $FreeBSD$ 2986d7f5d3SJohn Marino# 3086d7f5d3SJohn Marino 3186d7f5d3SJohn Marino# Regression test for FPU changes in r208833 3286d7f5d3SJohn Marino 3386d7f5d3SJohn Marino. ../default.cfg 3486d7f5d3SJohn Marino 3586d7f5d3SJohn Marinohere=`pwd` 3686d7f5d3SJohn Marinocd /tmp 3786d7f5d3SJohn Marinosed '1,/^EOF/d' < $here/$0 > fpu.c 3886d7f5d3SJohn Marinocc -o fpu -Wall -O2 fpu.c 3986d7f5d3SJohn Marinorm -f fpu.c 4086d7f5d3SJohn Marino[ -d $RUNDIR ] || mkdir -p $RUNDIR 4186d7f5d3SJohn Marinocd $RUNDIR 4286d7f5d3SJohn Marino 4386d7f5d3SJohn Marinor=`/tmp/fpu` 4486d7f5d3SJohn Marino[ "$r" = "-0.000000017, 0.000000000, 0.000000000" ] || echo $r 4586d7f5d3SJohn Marino 4686d7f5d3SJohn Marinocd $here 4786d7f5d3SJohn Marinorm -f /tmp/fpu 4886d7f5d3SJohn Marino 4986d7f5d3SJohn Marinoexit 0 5086d7f5d3SJohn MarinoEOF 5186d7f5d3SJohn Marino#include <sys/types.h> 5286d7f5d3SJohn Marino#include <signal.h> 5386d7f5d3SJohn Marino#include <stdio.h> 5486d7f5d3SJohn Marino#include <stdlib.h> 5586d7f5d3SJohn Marino#include <sys/wait.h> 5686d7f5d3SJohn Marino#include <unistd.h> 5786d7f5d3SJohn Marino 5886d7f5d3SJohn Marinovoid 5986d7f5d3SJohn Marinohandler(int i) 6086d7f5d3SJohn Marino{ 6186d7f5d3SJohn Marino} 6286d7f5d3SJohn Marino 6386d7f5d3SJohn Marinovoid 6486d7f5d3SJohn Marinotest() 6586d7f5d3SJohn Marino{ 6686d7f5d3SJohn Marino float val = 0; 6786d7f5d3SJohn Marino double lval = 0; 6886d7f5d3SJohn Marino long double llval = 0; 6986d7f5d3SJohn Marino int i, j; 7086d7f5d3SJohn Marino 7186d7f5d3SJohn Marino for (i = 0; i < 100000; i++) { 7286d7f5d3SJohn Marino for (j = 0; j < 100000; j++) { 7386d7f5d3SJohn Marino val = val + 0.00001; 7486d7f5d3SJohn Marino lval = lval + 0.00001; 7586d7f5d3SJohn Marino llval = llval + 0.00001; 7686d7f5d3SJohn Marino } 7786d7f5d3SJohn Marino for (j = 0; j < 100000; j++) { 7886d7f5d3SJohn Marino val = val - 0.00001; 7986d7f5d3SJohn Marino lval = lval - 0.00001; 8086d7f5d3SJohn Marino llval = llval - 0.00001; 8186d7f5d3SJohn Marino } 8286d7f5d3SJohn Marino } 8386d7f5d3SJohn Marino printf("%.9f, %.9f, %.9Lf\n", val, lval, llval); 8486d7f5d3SJohn Marino exit(0); 8586d7f5d3SJohn Marino 8686d7f5d3SJohn Marino} 8786d7f5d3SJohn Marino 8886d7f5d3SJohn Marinoint 8986d7f5d3SJohn Marinomain() 9086d7f5d3SJohn Marino{ 9186d7f5d3SJohn Marino pid_t pid; 9286d7f5d3SJohn Marino int i; 9386d7f5d3SJohn Marino 9486d7f5d3SJohn Marino signal(SIGHUP, handler); 9586d7f5d3SJohn Marino 9686d7f5d3SJohn Marino if ((pid = fork()) == 0) 9786d7f5d3SJohn Marino test(); 9886d7f5d3SJohn Marino 9986d7f5d3SJohn Marino for (i = 0; i < 10000; i++) 10086d7f5d3SJohn Marino kill(pid, SIGHUP); 10186d7f5d3SJohn Marino 10286d7f5d3SJohn Marino wait(NULL); 10386d7f5d3SJohn Marino 10486d7f5d3SJohn Marino return (0); 10586d7f5d3SJohn Marino} 106