Descent3/ddio_mac/mactimer.cpp

/*
 * $Logfile: /DescentIII/Main/ddio_mac/mactimer.cpp $
 * $Revision: 1.1.1.1 $
 * $Date: 2003/08/26 03:56:55 $
 * $Author: kevinb $
 *
 * Macintosh timer
 *
 * $Log: mactimer.cpp,v $
 * Revision 1.1.1.1  2003/08/26 03:56:55  kevinb
 * initial 1.5 import
 *
 * 
 * 5     3/20/00 12:43p Matt
 * Merge of Duane's post-1.3 changes.
 * 
 * 4     10/21/99 3:33p Jeff
 * Macintosh merges
 * 
 * 3     7/28/99 3:31p Kevin
 * Mac Stuff!
 * 
 * 2     5/10/99 10:28p Ardussi
 * changes to compile on Mac
 * 
 * 3     5/15/97 1:43 AM Jeremy
 * changed mprintf's to be standard (with newline at end)
 * 
 * 2     5/7/97 11:26 AM Jeremy
 * completed implementation of timer based on microseconds (still need to
 * implement hook functions)
 *
 * $NoKeywords: $
 */
// ANSI Headers
#include <stdlib.h>
// Macintosh Headers
#include <Math64.h>
#include <Timer.h>
#include <MacTypes.h>
#include <DriverServices.h>
#include <InputSprocket.h>
// Descent 3 Headers
#include "ddio_mac.h"
#include "ddio.h"
#include "pserror.h"
#include "mono.h"
#include "maccontroller.h"
//===========================================
//	Local Data Types
//===========================================
class CTimerInfo
{
	public:
	CTimerInfo(void);
	
	bool	mInitted;
	float	mElapsedTime;
	float	mStartTime;
};
timer_info ktimer_info;
UniversalProcPtr timer_proc = NULL;
//===========================================
//	File Level Globals
//===========================================
static CTimerInfo	gTimerInfo;
static unsigned char Installed=0;
//===========================================
//	Helpful Inline Functions
//===========================================
//===========================================
//	Functions
//===========================================
CTimerInfo::CTimerInfo(void)
{
	mInitted = false;
	mElapsedTime = 0.0;
	mStartTime = 0.0;
}
bool timer_Init(int preemptive, bool /*force_lores*/)
{
	mprintf((0, "Initializing Timer.\n"));
//	long double		currentTimeLD	= 0.0;
//	UInt64			currentTimeUI	= 0;
	
	// Get the current time in microseconds
//	Microseconds((UnsignedWide*) &currentTimeUI);
	// Convert to a long double
//	currentTimeLD = UInt64ToLongDouble(currentTimeUI);

	float			currentTime;
	UnsignedWide startmicro;
	AbsoluteTime startAbs = UpTime();
	ISpTimeToMicroseconds(&startAbs, &startmicro);
//	currentTimeLD = UInt64ToLongDouble(* (UInt64 *) &startmicro);
	currentTime = (float)(* (UInt64 *) &startmicro);
	
	// Convert from microseconds to seconds
	gTimerInfo.mStartTime = currentTime / 1000000;
	gTimerInfo.mElapsedTime = 0;
	
	// Timer Initted
	gTimerInfo.mInitted = true;
	
	return (gTimerInfo.mInitted);
}
void timer_Close()
{
	mprintf((0, "Closing Timer.\n"));
	gTimerInfo.mInitted = false;
	gTimerInfo.mElapsedTime = 0.0;
}
//	returns time in seconds
float timer_GetTime()
{
	if (gTimerInfo.mInitted)
	{
//		long double		currentTimeLD	= 0.0;
//		UInt64			currentTimeUI	= 0;
		
		// Get the current time in microseconds
//		Microseconds((UnsignedWide*)(&currentTimeUI));
		// Convert to a long double
//		currentTimeLD = UInt64ToLongDouble(currentTimeUI);

		float			currentTime;
		UnsignedWide startmicro;
		AbsoluteTime startAbs = UpTime();
		ISpTimeToMicroseconds(&startAbs, &startmicro);
//		currentTimeLD = UInt64ToLongDouble(* (UInt64 *) &startmicro);
		currentTime = (float)(* (UInt64 *) &startmicro);
	
		// Convert from microseconds to seconds
		gTimerInfo.mElapsedTime = (currentTime / 1000000);
		gTimerInfo.mElapsedTime -= gTimerInfo.mStartTime;
	}
	
	return gTimerInfo.mElapsedTime;
}
longlong timer_GetMSTime()
{
	UInt64			currentTimeUI	= 0;
	
	// Get the current time in microseconds
//	Microseconds((UnsignedWide*)(&currentTimeUI));
//	return(currentTimeUI>>10);

	UnsignedWide startmicro;
	AbsoluteTime startAbs = UpTime();
	ISpTimeToMicroseconds(&startAbs, &startmicro);
	return((* (UInt64 *) &startmicro)>>10);
	
}
/*
//	hook in timer function at certain period.  returns a handle to this function
int timer_HookFunction(void (*fncptr)(), int period)
{
}
//	clears function from hook list specified by a handle returned from HookFunction
void timer_ReleaseFunction(int func)
{
}
*/
// Interrupt time routines
void interrupt_Handler(timer_info *tminfo)
{
	MacKeyboardHandler();
	MacInSprocketHandler();
	
	PrimeTime((QElemPtr)(&ktimer_info), INTERRUPT_MS);
}
void interrupt_Close()
{
	if (!Installed)
		return;
	_INTERRUPT_DISABLE();
	Installed = 0;
}
void interrupt_Flush()
{
	if (!Installed)
		interrupt_Init();
		
	_INTERRUPT_DISABLE();	
	FlushEvents(everyEvent, 0);
	_INTERRUPT_ENABLE();
}
void interrupt_Init()
{
#ifdef DAJ_DEBUG
	return;	
#endif
	if (Installed) 
		return;
	Installed = 1;
	
	SetEventMask(0xffff);
	LMSetSysEvtMask(0xffff);
	
//  now set up the structure for the keyboard timer
	if (timer_proc == NULL) {
		timer_proc = NewTimerProc(interrupt_Handler);
	}
	
	_INTERRUPT_ENABLE();
	
	// Clear the keyboard array
	interrupt_Flush();
	atexit(interrupt_Close);
}