Blame tests/TestFloat32.cc

Packit a4aae4
Packit a4aae4
// -*- mode: c++; c-basic-offset:4 -*-
Packit a4aae4
Packit a4aae4
// This file is part of libdap, A C++ implementation of the OPeNDAP Data
Packit a4aae4
// Access Protocol.
Packit a4aae4
Packit a4aae4
// Copyright (c) 2002,2003 OPeNDAP, Inc.
Packit a4aae4
// Author: James Gallagher <jgallagher@opendap.org>
Packit a4aae4
//
Packit a4aae4
// This library is free software; you can redistribute it and/or
Packit a4aae4
// modify it under the terms of the GNU Lesser General Public
Packit a4aae4
// License as published by the Free Software Foundation; either
Packit a4aae4
// version 2.1 of the License, or (at your option) any later version.
Packit a4aae4
// 
Packit a4aae4
// This library is distributed in the hope that it will be useful,
Packit a4aae4
// but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit a4aae4
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit a4aae4
// Lesser General Public License for more details.
Packit a4aae4
// 
Packit a4aae4
// You should have received a copy of the GNU Lesser General Public
Packit a4aae4
// License along with this library; if not, write to the Free Software
Packit a4aae4
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
Packit a4aae4
//
Packit a4aae4
// You can contact OPeNDAP, Inc. at PO Box 112, Saunderstown, RI. 02874-0112.
Packit a4aae4
 
Packit a4aae4
// (c) COPYRIGHT URI/MIT 1999
Packit a4aae4
// Please read the full copyright statement in the file COPYRIGHT_URI.
Packit a4aae4
//
Packit a4aae4
// Authors:
Packit a4aae4
//      jhrg,jimg       James Gallagher <jgallagher@gso.uri.edu>
Packit a4aae4
Packit a4aae4
// Implementation for TestFloat32. See TestByte.cc
Packit a4aae4
//
Packit a4aae4
// 3/22/99 jhrg
Packit a4aae4
Packit a4aae4
Packit a4aae4
#include "config.h"
Packit a4aae4
Packit a4aae4
#include <math.h>
Packit a4aae4
Packit a4aae4
#ifndef WIN32
Packit a4aae4
#include <unistd.h>
Packit a4aae4
#else
Packit a4aae4
#include <io.h>
Packit a4aae4
#include <fcntl.h>
Packit a4aae4
#include <process.h>
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
#include "TestFloat32.h"
Packit a4aae4
#include "debug.h"
Packit a4aae4
Packit a4aae4
extern int test_variable_sleep_interval;
Packit a4aae4
Packit a4aae4
#if ( defined(__sun__) && ( HOST_SOLARIS < 10 ))
Packit a4aae4
double trunc(double x)
Packit a4aae4
{
Packit a4aae4
       return x < 0 ? -floor(-x) : floor(x);
Packit a4aae4
}
Packit a4aae4
#endif
Packit a4aae4
Packit a4aae4
void
Packit a4aae4
TestFloat32::_duplicate(const TestFloat32 &ts)
Packit a4aae4
{
Packit a4aae4
    d_series_values = ts.d_series_values;
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
TestFloat32::TestFloat32(const string &n) : Float32(n), d_series_values(false)
Packit a4aae4
{
Packit a4aae4
    d_buf = 0.0;
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
TestFloat32::TestFloat32(const string &n, const string &d)
Packit a4aae4
    : Float32(n, d), d_series_values(false)
Packit a4aae4
{
Packit a4aae4
    d_buf = 0.0;
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
TestFloat32::TestFloat32(const TestFloat32 &rhs) : Float32(rhs), TestCommon(rhs)
Packit a4aae4
{
Packit a4aae4
    _duplicate(rhs);
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
TestFloat32 &
Packit a4aae4
TestFloat32::operator=(const TestFloat32 &rhs)
Packit a4aae4
{
Packit a4aae4
    if (this == &rhs)
Packit a4aae4
	return *this;
Packit a4aae4
Packit a4aae4
    dynamic_cast<Float32 &>(*this) = rhs; // run Constructor=
Packit a4aae4
Packit a4aae4
    _duplicate(rhs);
Packit a4aae4
Packit a4aae4
    return *this;
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
BaseType *
Packit a4aae4
TestFloat32::ptr_duplicate()
Packit a4aae4
{
Packit a4aae4
    return new TestFloat32(*this); // Copy ctor calls duplicate to do the work
Packit a4aae4
}
Packit a4aae4
 
Packit a4aae4
void 
Packit a4aae4
TestFloat32::output_values(std::ostream &out)
Packit a4aae4
{
Packit a4aae4
    print_val(out, "", false);
Packit a4aae4
}
Packit a4aae4
Packit a4aae4
bool
Packit a4aae4
TestFloat32::read()
Packit a4aae4
{
Packit a4aae4
    DBG(cerr << "Entering TestFloat32::read for " << name() << endl);
Packit a4aae4
    if (read_p())
Packit a4aae4
	return true;
Packit a4aae4
Packit a4aae4
    if (test_variable_sleep_interval > 0)
Packit a4aae4
	sleep(test_variable_sleep_interval);
Packit a4aae4
Packit a4aae4
    if (get_series_values()) {
Packit a4aae4
        d_buf += 10.0;
Packit a4aae4
        d_buf = (float)(trunc(10000 * sin(trunc(d_buf))) / 100);
Packit a4aae4
    }
Packit a4aae4
    else {
Packit a4aae4
        d_buf = (float)99.999;
Packit a4aae4
    }
Packit a4aae4
    
Packit a4aae4
    set_read_p(true);
Packit a4aae4
Packit a4aae4
    DBG(cerr << "In TestFloat32::read, _buf = " << d_buf << endl);
Packit a4aae4
    
Packit a4aae4
    return true;
Packit a4aae4
}