diff --git a/BasiliskII/src/Windows/timer_windows.cpp b/BasiliskII/src/Windows/timer_windows.cpp new file mode 100755 index 00000000..44d563bc --- /dev/null +++ b/BasiliskII/src/Windows/timer_windows.cpp @@ -0,0 +1,198 @@ +/* + * timer_windows.cpp - Time Manager emulation, Windows specific stuff + * + * Basilisk II (C) 1997-2004 Christian Bauer + * + * 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" + +#define WIN32_LEAN_AND_MEAN +#include + +#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 TICKS2MSECS(TICKS) (((uint64)(TICKS) * 1000) / frequency) +#define TICKS2USECS(TICKS) (((uint64)(TICKS) * 1000000) / frequency) + +// 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 + */ + +void SysTimerInit(void) +{ + 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 { + uint64 t = TICKS2MSECS(hosttime); + if (t > 0x7fffffff) + return t / 1000; // Time in milliseconds + else + return -t; // Time in negative microseconds + } +} + + +/* + * 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); +}