Utils/Libs/GLib/gtimer.c

@@ -0,0 +1,225 @@
+/* ===========================================================================
+	File:		GTIMER.C
+
+	Notes:		Timing Stuff
+
+	Author:		G Robert Liddon @ 73b
+
+	Copyright (C) 1996 DCI Ltd All rights reserved. 
+  ============================================================================ */
+
+/* ---------------------------------------------------------------------------
+	Standard Lib Includes
+	--------------------- */
+
+/*	Standard Lib
+	------------ */
+
+/*	Glib
+	---- */
+#include "gal.h"
+
+/*	Headers
+	------- */
+#include "gtimer.h"
+#include "gtimsys.h"
+
+/* ---------------------------------------------------------------------------
+	Defines and Enums
+	----------------- */
+
+/* ---------------------------------------------------------------------------
+	Structs
+	------- */
+
+/* ---------------------------------------------------------------------------
+	Vars
+	---- */
+MHANDLE		hndClocks;
+CLOCK *		Clocks;
+int			ClocksOut;
+int			ClocksInAll;
+U32			TimeForAFrame;
+U32			ReadTime;
+
+/* ---------------------------------------------------------------------------
+	Function Prototypes
+	------------------- */
+static void		StartClock(CLOCK * C,U32 Id);
+static void		StopClock(CLOCK * C);
+static void		ReadTestFunc(void);
+
+static U32 GetTimer(void)
+{
+	return((GTIMSYS_GetTimer()*0x10000)/TimeForAFrame);
+}
+
+/*	---------------------------------------------------------------------------
+	Function:	BOOL GTIM_Open(int MaxClocks,U32 RamId);
+
+	Purpose:	Creates the timer moduler
+
+	Params:		MaxClocks	=	Max amount of clocks you can have
+
+	Returns:	FALSE if an error
+
+	--------------------------------------------------------------------------- */
+BOOL GTIM_Open(int MaxClocks,U32 RamId)
+{
+	hndClocks=GAL_Alloc(sizeof(CLOCK)*MaxClocks,RamId,NULL);
+
+	if (hndClocks != NULL_HANDLE)
+		{
+		Clocks=GAL_Lock(hndClocks);
+
+		if (Clocks)
+			{
+			ClocksInAll=MaxClocks;
+			TimeForAFrame=GTIMSYS_InitTimer();
+			GTIM_ClearClocks();
+
+			ReadTime=GTIM_TimeFunction(ReadTestFunc,5000);
+
+			return(TRUE);
+			}
+		}
+
+	return(FALSE);
+}
+
+/*	---------------------------------------------------------------------------
+	Function:	void GTIM_ClearClocks(void)
+
+	Purpose:	Reset all clocks
+
+	--------------------------------------------------------------------------- */
+void GTIM_ClearClocks(void)
+{
+	ClocksOut=0;
+	GTIMSYS_ResetTimer();
+}
+
+/*	---------------------------------------------------------------------------
+	Function:	GTHANDLE GTIM_StartClock(U32 Id)
+
+	Purpose:	Start a clock
+
+	Params:		Id for a clock
+
+	Returns:	Handle used to stop the clock
+
+	--------------------------------------------------------------------------- */
+GTHANDLE GTIM_StartClock(U32 Id)
+{
+	S32	RetHandle;
+
+	if (ClocksOut==ClocksInAll)
+		RetHandle=NULL_GTHANDLE;
+	else
+		{
+		RetHandle=ClocksOut;
+
+		ClocksOut++;
+
+		StartClock(&Clocks[RetHandle],Id);
+		}
+
+	return(RetHandle);
+}
+
+/*	---------------------------------------------------------------------------
+	Function:	void GTIM_StopClock(GTHANDLE Hnd)
+
+	Purpose:	Stop a clock
+
+	Params:		Id for a clock to stop
+
+	--------------------------------------------------------------------------- */
+U32 GTIM_StopClock(GTHANDLE Hnd)
+{
+	CLOCK *	C;
+
+	C=&Clocks[Hnd];
+	StopClock(C);
+	return(C->StopTime-C->StartTime);
+}
+
+/*	---------------------------------------------------------------------------
+	Function:	void GTIM_IterateClocks(void (*Func)(U32 Start,U32 End,U32 Id)
+
+	Purpose:	Callback through all the current clocks
+
+	Params:		Id for a clock to stop
+
+	--------------------------------------------------------------------------- */
+void GTIM_IterateClocks(void (*Func)(U32 Start,U32 End,U32 Id))
+{
+	int		f;
+	CLOCK *	C;
+
+	for (f=0,C=Clocks;f<ClocksOut;f++,C++)
+		Func(C->StartTime,C->StopTime,C->Id);
+}
+
+
+/*	---------------------------------------------------------------------------
+	Function:	U32 GTIM_TimeFunction(void (*Func)(void),int Tries)
+
+	Purpose:	Test this functions speed
+
+	Params:		Func ->		Function to test
+				Tries =		Number of tries to average it out against
+
+	Returns:	Time taken
+
+	--------------------------------------------------------------------------- */
+U32 GTIM_TimeFunction(void (*Func)(void),int Tries)
+{
+	U32		Time0;
+	U32		Time1;
+	int		f;
+
+	Time0=GetTimer();
+
+	for (f=0;f<Tries;f++)
+		Func();
+
+	Time1=GetTimer();
+
+	return ((Time1-Time0)/Tries);
+}
+
+
+/*	---------------------------------------------------------------------------
+	Helpy routines
+	--------------------------------------------------------------------------- */
+static void StartClock(CLOCK * C,U32 Id)
+{
+	int		RealTime;
+
+	RealTime=GetTimer();
+
+	C->StartTime=RealTime;
+	C->Id=Id;
+	C->Running=TRUE;
+}
+
+static void StopClock(CLOCK * C)
+{
+	int		RealTime;
+
+	RealTime=GetTimer();
+	C->StopTime=RealTime;
+	C->Running=FALSE;
+}
+
+static void ReadTestFunc(void)
+{
+	GTHANDLE	GtHnd0;
+
+	GtHnd0=GTIM_StartClock(0);
+	GTIM_StopClock(GtHnd0);
+}
+
+/* ---------------------------------------------------------------------------
+	ends */