2004-11-28 17:54:05 +00:00
|
|
|
/*
|
|
|
|
* timer_windows.cpp - Time Manager emulation, Windows specific stuff
|
|
|
|
*
|
2008-01-01 09:40:36 +00:00
|
|
|
* Basilisk II (C) 1997-2008 Christian Bauer
|
2004-11-28 17:54:05 +00:00
|
|
|
*
|
|
|
|
* This program is free software; you can redistribute it and/or modify
|
|
|
|
* it under the terms of the GNU General Public License as published by
|
|
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
|
|
* (at your option) any later version.
|
|
|
|
*
|
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
* GNU General Public License for more details.
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
|
|
* along with this program; if not, write to the Free Software
|
|
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include "sysdeps.h"
|
|
|
|
|
|
|
|
#include "main.h"
|
|
|
|
#include "macos_util.h"
|
|
|
|
#include "timer.h"
|
|
|
|
|
|
|
|
#define DEBUG 0
|
|
|
|
#include "debug.h"
|
|
|
|
|
|
|
|
|
|
|
|
// Helper time functions
|
|
|
|
#define MSECS2TICKS(MSECS) (((uint64)(MSECS) * frequency) / 1000)
|
|
|
|
#define USECS2TICKS(USECS) (((uint64)(USECS) * frequency) / 1000000)
|
|
|
|
#define TICKS2USECS(TICKS) (((uint64)(TICKS) * 1000000) / frequency)
|
|
|
|
|
2006-05-01 06:12:50 +00:00
|
|
|
// From main_windows.cpp
|
|
|
|
extern HANDLE emul_thread;
|
|
|
|
|
2004-11-28 17:54:05 +00:00
|
|
|
// Global variables
|
|
|
|
static uint32 frequency; // CPU frequency in Hz (< 4 GHz)
|
|
|
|
static tm_time_t mac_boot_ticks;
|
|
|
|
static tm_time_t mac_1904_ticks;
|
|
|
|
static tm_time_t mac_now_diff;
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Initialize native Windows timers
|
|
|
|
*/
|
|
|
|
|
2004-12-03 22:05:36 +00:00
|
|
|
void timer_init(void)
|
2004-11-28 17:54:05 +00:00
|
|
|
{
|
|
|
|
D(bug("SysTimerInit\n"));
|
|
|
|
|
|
|
|
LARGE_INTEGER tt;
|
|
|
|
if (!QueryPerformanceFrequency(&tt)) {
|
|
|
|
ErrorAlert("No high resolution timers available\n");
|
|
|
|
QuitEmulator();
|
|
|
|
}
|
|
|
|
frequency = tt.LowPart;
|
|
|
|
D(bug(" frequency %d\n", frequency));
|
|
|
|
|
|
|
|
// mac_boot_ticks is 1.18 us since Basilisk II was started
|
|
|
|
QueryPerformanceCounter(&tt);
|
|
|
|
mac_boot_ticks = tt.QuadPart;
|
|
|
|
|
|
|
|
// mac_1904_ticks is 1.18 us since Mac time started 1904
|
|
|
|
mac_1904_ticks = time(NULL) * frequency;
|
|
|
|
mac_now_diff = mac_1904_ticks - mac_boot_ticks;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Return microseconds since boot (64 bit)
|
|
|
|
*/
|
|
|
|
|
|
|
|
void Microseconds(uint32 &hi, uint32 &lo)
|
|
|
|
{
|
|
|
|
D(bug("Microseconds\n"));
|
|
|
|
LARGE_INTEGER tt;
|
|
|
|
QueryPerformanceCounter(&tt);
|
|
|
|
tt.QuadPart = TICKS2USECS(tt.QuadPart - mac_boot_ticks);
|
|
|
|
hi = tt.HighPart;
|
|
|
|
lo = tt.LowPart;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Return local date/time in Mac format (seconds since 1.1.1904)
|
|
|
|
*/
|
|
|
|
|
|
|
|
uint32 TimerDateTime(void)
|
|
|
|
{
|
|
|
|
return TimeToMacTime(time(NULL));
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Get current time
|
|
|
|
*/
|
|
|
|
|
|
|
|
void timer_current_time(tm_time_t &t)
|
|
|
|
{
|
|
|
|
LARGE_INTEGER tt;
|
|
|
|
QueryPerformanceCounter(&tt);
|
|
|
|
t = tt.QuadPart + mac_now_diff;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Add times
|
|
|
|
*/
|
|
|
|
|
|
|
|
void timer_add_time(tm_time_t &res, tm_time_t a, tm_time_t b)
|
|
|
|
{
|
|
|
|
res = a + b;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Subtract times
|
|
|
|
*/
|
|
|
|
|
|
|
|
void timer_sub_time(tm_time_t &res, tm_time_t a, tm_time_t b)
|
|
|
|
{
|
|
|
|
res = a - b;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Compare times (<0: a < b, =0: a = b, >0: a > b)
|
|
|
|
*/
|
|
|
|
|
|
|
|
int timer_cmp_time(tm_time_t a, tm_time_t b)
|
|
|
|
{
|
|
|
|
tm_time_t r = a - b;
|
|
|
|
return r < 0 ? -1 : (r > 0 ? 1 : 0);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Convert Mac time value (>0: microseconds, <0: microseconds) to tm_time_t
|
|
|
|
*/
|
|
|
|
|
|
|
|
void timer_mac2host_time(tm_time_t &res, int32 mactime)
|
|
|
|
{
|
|
|
|
if (mactime > 0) {
|
|
|
|
// Time in milliseconds
|
|
|
|
res = MSECS2TICKS(mactime);
|
|
|
|
} else {
|
|
|
|
// Time in negative microseconds
|
|
|
|
res = USECS2TICKS(-mactime);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Convert positive tm_time_t to Mac time value (>0: microseconds, <0: microseconds)
|
|
|
|
* A negative input value for hosttime results in a zero return value
|
|
|
|
* As long as the microseconds value fits in 32 bit, it must not be converted to milliseconds!
|
|
|
|
*/
|
|
|
|
|
|
|
|
int32 timer_host2mac_time(tm_time_t hosttime)
|
|
|
|
{
|
|
|
|
if (hosttime < 0)
|
|
|
|
return 0;
|
|
|
|
else {
|
2004-11-29 00:15:14 +00:00
|
|
|
uint64 t = TICKS2USECS(hosttime);
|
2004-11-28 17:54:05 +00:00
|
|
|
if (t > 0x7fffffff)
|
2015-08-06 09:31:42 +00:00
|
|
|
return int32(t / 1000); // Time in milliseconds
|
2004-11-28 17:54:05 +00:00
|
|
|
else
|
2015-08-06 09:31:42 +00:00
|
|
|
return -int32(t); // Time in negative microseconds
|
2004-11-28 17:54:05 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Get current value of microsecond timer
|
|
|
|
*/
|
|
|
|
|
|
|
|
uint64 GetTicks_usec(void)
|
|
|
|
{
|
|
|
|
LARGE_INTEGER tt;
|
|
|
|
QueryPerformanceCounter(&tt);
|
|
|
|
return TICKS2USECS(tt.QuadPart - mac_boot_ticks);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Delay by specified number of microseconds (<1 second)
|
|
|
|
*/
|
|
|
|
|
|
|
|
void Delay_usec(uint32 usec)
|
|
|
|
{
|
|
|
|
// FIXME: fortunately, Delay_usec() is generally used with
|
|
|
|
// millisecond resolution anyway
|
|
|
|
Sleep(usec / 1000);
|
|
|
|
}
|
2005-06-30 10:20:18 +00:00
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Suspend emulator thread, virtual CPU in idle mode
|
|
|
|
*/
|
|
|
|
|
2006-05-01 06:12:50 +00:00
|
|
|
struct idle_sentinel {
|
|
|
|
idle_sentinel();
|
|
|
|
~idle_sentinel();
|
|
|
|
};
|
|
|
|
static idle_sentinel idle_sentinel;
|
|
|
|
|
|
|
|
static int idle_sem_ok = -1;
|
|
|
|
static HANDLE idle_sem = NULL;
|
|
|
|
|
|
|
|
static HANDLE idle_lock = NULL;
|
|
|
|
#define LOCK_IDLE WaitForSingleObject(idle_lock, INFINITE)
|
|
|
|
#define UNLOCK_IDLE ReleaseMutex(idle_lock)
|
|
|
|
|
|
|
|
idle_sentinel::idle_sentinel()
|
|
|
|
{
|
|
|
|
idle_sem_ok = 1;
|
|
|
|
if ((idle_sem = CreateSemaphore(0, 0, 1, NULL)) == NULL)
|
|
|
|
idle_sem_ok = 0;
|
|
|
|
if ((idle_lock = CreateMutex(NULL, FALSE, NULL)) == NULL)
|
|
|
|
idle_sem_ok = 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
idle_sentinel::~idle_sentinel()
|
|
|
|
{
|
|
|
|
if (idle_lock) {
|
|
|
|
ReleaseMutex(idle_lock);
|
|
|
|
CloseHandle(idle_lock);
|
|
|
|
}
|
|
|
|
if (idle_sem) {
|
|
|
|
ReleaseSemaphore(idle_sem, 1, NULL);
|
|
|
|
CloseHandle(idle_sem);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2005-06-30 10:20:18 +00:00
|
|
|
void idle_wait(void)
|
|
|
|
{
|
2006-05-01 06:12:50 +00:00
|
|
|
LOCK_IDLE;
|
|
|
|
if (idle_sem_ok > 0) {
|
|
|
|
idle_sem_ok++;
|
|
|
|
UNLOCK_IDLE;
|
|
|
|
WaitForSingleObject(idle_sem, INFINITE);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
UNLOCK_IDLE;
|
|
|
|
|
|
|
|
// Fallback: sleep 10 ms (this should not happen though)
|
2005-06-30 10:20:18 +00:00
|
|
|
Delay_usec(10000);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
* Resume execution of emulator thread, events just arrived
|
|
|
|
*/
|
|
|
|
|
|
|
|
void idle_resume(void)
|
|
|
|
{
|
2006-05-01 06:12:50 +00:00
|
|
|
LOCK_IDLE;
|
|
|
|
if (idle_sem_ok > 1) {
|
|
|
|
idle_sem_ok--;
|
|
|
|
UNLOCK_IDLE;
|
|
|
|
ReleaseSemaphore(idle_sem, 1, NULL);
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
UNLOCK_IDLE;
|
2005-06-30 10:20:18 +00:00
|
|
|
}
|