/****************************************************************************
 *                                                                          *
 * The contents of this file are subject to the WebStone Public License     *
 * Version 1.0 (the "License"); you may not use this file except in         *
 * compliance with the License. You may obtain a copy of the License        *
 * at http://www.mindcraft.com/webstone/license10.html                      *
 *                                                                          *
 * Software distributed under the License is distributed on an "AS IS"      *
 * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See      *
 * the License for the specific language governing rights and limitations   *
 * under the License.                                                       *
 *                                                                          *
 * The Original Code is WebStone 2.5.                                       *
 *                                                                          *
 * The Initial Developer of the Original Code is Silicon Graphics, Inc.     *
 * and Mindcraft, Inc.. Portions created by Silicon Graphics. and           *
 * Mindcraft. are Copyright (C) 1995-1998 Silicon Graphics, Inc. and        *
 * Mindcraft, Inc. All Rights Reserved.                                     *
 *                                                                          *
 * Contributor(s): ______________________________________.                  *
 *                                                                          *
 * @(#) bench.c 2.4@(#)                                                     *
 ***************************************************************************/


#ifndef WIN32
#include <netdb.h>
#include <sys/time.h>
#include <sys/param.h>
#else
#include <windows.h>
#include <winsock.h>
#include <time.h>
#endif /* WIN32 */
#include <math.h>
#include <stdio.h>
#include "sysdep.h"
#include "bench.h"

double
timevaldouble(struct timeval *tin)
{
	return ((double)tin->tv_sec + ((double)tin->tv_usec / USECINSEC));
}


void
doubletimeval(const double tin, struct timeval *tout)
{
	tout->tv_sec = (long)floor(tin);	
	tout->tv_usec = (long)((tin - tout->tv_sec) * USECINSEC );
}


void
addtime(struct timeval *OrigTime, struct timeval *NewTime)
{
	OrigTime->tv_usec += NewTime->tv_usec;
	if(OrigTime->tv_usec >= USECINSEC)
	{
		/*
		 * NEED TO CARRY 1.
		 */
		OrigTime->tv_sec++;
		OrigTime->tv_usec -= USECINSEC;
	}
	OrigTime->tv_sec += NewTime->tv_sec;
}


void
compdifftime(struct timeval *EndTime, struct timeval *StartTime, struct timeval *DiffTime)
{
	struct timeval endtime = *EndTime;

	if((endtime.tv_usec - StartTime->tv_usec) < 0)
	{
		 /*
		  * NEED TO BORROW.
		  */
		  endtime.tv_usec += USECINSEC;
		  endtime.tv_sec--;
	}
	DiffTime->tv_usec = endtime.tv_usec - StartTime->tv_usec;
	DiffTime->tv_sec =  endtime.tv_sec  - StartTime->tv_sec;
}


void
mintime(struct timeval *CurrMinTime, struct timeval *CheckMinTime)
{
	if((unsigned long)CheckMinTime->tv_sec < (unsigned long)CurrMinTime->tv_sec)
	{
		*CurrMinTime = *CheckMinTime;
		return;
	}
	if(CheckMinTime->tv_sec == CurrMinTime->tv_sec)
	{
		if((unsigned long)CheckMinTime->tv_usec <
			(unsigned long)CurrMinTime->tv_usec)
		{
			*CurrMinTime = *CheckMinTime;
			return;
		}
	}
}


void
maxtime(struct timeval *CurrMaxTime, struct timeval *CheckMaxTime)
{
	if((unsigned long)CheckMaxTime->tv_sec > (unsigned long)CurrMaxTime->tv_sec)
	{
		*CurrMaxTime = *CheckMaxTime;
		return;
	}
	if(CheckMaxTime->tv_sec == CurrMaxTime->tv_sec)
	{
		if((unsigned long)CheckMaxTime->tv_usec >
			(unsigned long)CurrMaxTime->tv_usec)
		{
			*CurrMaxTime = *CheckMaxTime;
			return;
		}
	}
}

void
avgtime(struct timeval *TotalTime, int NumTimes, struct timeval *AvgTime)
{
	double	meantime;

	meantime = mean(timevaldouble(TotalTime), NumTimes);

	doubletimeval(meantime, AvgTime);
}


void
sqtime(struct timeval *Time, struct timeval *SqTime)
{
	double 	sec;

	sec = timevaldouble(Time);
	sec *= sec;	 /* square */

	doubletimeval(sec, SqTime);
}


void
variancetime(struct timeval *SumTime, double SumSquareTime, int NumTimes, struct timeval *VarianceTime)
{
	double	result;

	result = variance(timevaldouble(SumTime), SumSquareTime, NumTimes);

	doubletimeval(result, VarianceTime);
}


void
stddevtime(struct timeval *SumTime, double SumSquareTime,
	int NumTimes, struct timeval *StdDevTime)
{
	double	result;

	result = stddev(timevaldouble(SumTime), SumSquareTime, NumTimes);

	doubletimeval(result, StdDevTime);
}

double
thruputpersec(const double n, struct timeval *t)
{
	double tv;
	
	tv = timevaldouble(t);
	if (tv != 0)
	return n / timevaldouble(t);
	else
	return 0;
}