Blame ETL/test/clock.cpp

darco b3016b
/*! ========================================================================
darco b3016b
** Extended Template and Library Test Suite
darco b3016b
** Clock Test
dooglus 36d01e
** $Id$
darco b3016b
**
darco b3016b
** Copyright (c) 2002 Robert B. Quattlebaum Jr.
darco b3016b
**
darco b3016b
** This package is free software; you can redistribute it and/or
darco b3016b
** modify it under the terms of the GNU General Public License as
darco b3016b
** published by the Free Software Foundation; either version 2 of
darco b3016b
** the License, or (at your option) any later version.
darco b3016b
**
darco b3016b
** This package is distributed in the hope that it will be useful,
darco b3016b
** but WITHOUT ANY WARRANTY; without even the implied warranty of
darco b3016b
** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
darco b3016b
** General Public License for more details.
darco b3016b
**
darco b3016b
** === N O T E S ===========================================================
darco b3016b
**
darco b3016b
** ========================================================================= */
darco b3016b
darco b3016b
/* === H E A D E R S ======================================================= */
darco b3016b
darco b3016b
#include <etl clock=""></etl>
darco b3016b
#include <stdio.h></stdio.h>
darco b3016b
darco b3016b
/* === M A C R O S ========================================================= */
darco b3016b
darco b3016b
using namespace etl;
darco b3016b
darco b3016b
/* === C L A S S E S ======================================================= */
darco b3016b
darco b3016b
darco b3016b
/* === P R O C E D U R E S ================================================= */
darco b3016b
darco b3016b
int basic_test(void)
darco b3016b
{
darco b3016b
	int ret=0;
darco b3016b
	fprintf(stderr,"default etl::clock precision:  %0.8f\n",etl::clock::precision());
darco b3016b
	fprintf(stderr,"realtime etl::clock precision: %0.8f\n",etl::clock_realtime::precision());
darco b3016b
	fprintf(stderr,"proctime etl::clock precision: %0.8f\n",etl::clock_proctime::precision());
dooglus cee594
darco b3016b
	etl::clock_realtime timer;
darco b3016b
	etl::clock::value_type amount,total;
dooglus cee594
darco b3016b
	for(amount=3.0;amount>=0.00015;amount/=2.0)
darco b3016b
	{
darco b3016b
		if(amount*1000000.0<1000.0f)
darco b3016b
			fprintf(stderr,"waiting %f microseconds...\n",amount*1000000.0);
darco b3016b
		else if(amount*1000.0<400.0f)
darco b3016b
			fprintf(stderr,"waiting %f milliseconds...\n",amount*1000.0);
darco b3016b
		else
darco b3016b
			fprintf(stderr,"waiting %f seconds...\n",amount);
darco b3016b
darco b3016b
		timer.reset();
darco b3016b
		etl::clock::sleep(amount);
darco b3016b
		total=timer();
darco b3016b
		if((total-amount)*1000000.0<1000.0f)
dooglus cee594
			fprintf(stderr," ** I waited %f seconds, error of %f microseconds\n",total,(total-amount)*1000000);
darco b3016b
		else if((total-amount)*1000.0<400.0f)
dooglus cee594
			fprintf(stderr," ** I waited %f seconds, error of %f milliseconds\n",total,(total-amount)*1000);
darco b3016b
		else
dooglus cee594
			fprintf(stderr," ** I waited %f seconds, error of %f seconds\n",total,total-amount);
dooglus cee594
darco b3016b
	}
darco b3016b
	return ret;
darco b3016b
}
darco b3016b
darco b3016b
/* === E N T R Y P O I N T ================================================= */
darco b3016b
darco b3016b
int main()
darco b3016b
{
darco b3016b
	int error=0;
dooglus cee594
darco b3016b
	error+=basic_test();
dooglus cee594
darco b3016b
	return error;
darco b3016b
}
darco b3016b