2001-04-26 16:50:19 +00:00
|
|
|
/*
|
|
|
|
SDL - Simple DirectMedia Layer
|
2010-01-24 21:10:53 +00:00
|
|
|
Copyright (C) 1997-2010 Sam Lantinga
|
2001-04-26 16:50:19 +00:00
|
|
|
|
|
|
|
This library is free software; you can redistribute it and/or
|
2006-02-01 06:32:25 +00:00
|
|
|
modify it under the terms of the GNU Lesser General Public
|
2001-04-26 16:50:19 +00:00
|
|
|
License as published by the Free Software Foundation; either
|
2006-02-01 06:32:25 +00:00
|
|
|
version 2.1 of the License, or (at your option) any later version.
|
2001-04-26 16:50:19 +00:00
|
|
|
|
|
|
|
This library 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
|
2006-02-01 06:32:25 +00:00
|
|
|
Lesser General Public License for more details.
|
2001-04-26 16:50:19 +00:00
|
|
|
|
2006-02-01 06:32:25 +00:00
|
|
|
You should have received a copy of the GNU Lesser General Public
|
|
|
|
License along with this library; if not, write to the Free Software
|
|
|
|
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
|
2001-04-26 16:50:19 +00:00
|
|
|
|
|
|
|
Sam Lantinga
|
2001-12-14 12:38:15 +00:00
|
|
|
slouken@libsdl.org
|
2001-04-26 16:50:19 +00:00
|
|
|
*/
|
2006-02-21 08:46:50 +00:00
|
|
|
#include "SDL_config.h"
|
2001-04-26 16:50:19 +00:00
|
|
|
|
|
|
|
#include "SDL_timer.h"
|
|
|
|
#include "SDL_timer_c.h"
|
|
|
|
#include "SDL_mutex.h"
|
|
|
|
#include "SDL_systimer.h"
|
|
|
|
|
|
|
|
/* #define DEBUG_TIMERS */
|
|
|
|
|
|
|
|
int SDL_timer_started = 0;
|
|
|
|
int SDL_timer_running = 0;
|
|
|
|
|
|
|
|
/* Data to handle a single periodic alarm */
|
|
|
|
Uint32 SDL_alarm_interval = 0;
|
|
|
|
SDL_TimerCallback SDL_alarm_callback;
|
|
|
|
|
|
|
|
/* Data used for a thread-based timer */
|
|
|
|
static int SDL_timer_threaded = 0;
|
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
struct _SDL_TimerID
|
|
|
|
{
|
|
|
|
Uint32 interval;
|
|
|
|
SDL_NewTimerCallback cb;
|
|
|
|
void *param;
|
|
|
|
Uint32 last_alarm;
|
|
|
|
struct _SDL_TimerID *next;
|
2001-04-26 16:50:19 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
static SDL_TimerID SDL_timers = NULL;
|
|
|
|
static SDL_mutex *SDL_timer_mutex;
|
2005-01-13 23:24:56 +00:00
|
|
|
static volatile SDL_bool list_changed = SDL_FALSE;
|
2001-04-26 16:50:19 +00:00
|
|
|
|
|
|
|
/* Set whether or not the timer should use a thread.
|
|
|
|
This should not be called while the timer subsystem is running.
|
|
|
|
*/
|
2006-07-10 21:04:37 +00:00
|
|
|
int
|
|
|
|
SDL_SetTimerThreaded(int value)
|
2001-04-26 16:50:19 +00:00
|
|
|
{
|
2006-07-10 21:04:37 +00:00
|
|
|
int retval;
|
2001-04-26 16:50:19 +00:00
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
if (SDL_timer_started) {
|
|
|
|
SDL_SetError("Timer already initialized");
|
|
|
|
retval = -1;
|
|
|
|
} else {
|
|
|
|
retval = 0;
|
|
|
|
SDL_timer_threaded = value;
|
|
|
|
}
|
|
|
|
return retval;
|
2001-04-26 16:50:19 +00:00
|
|
|
}
|
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
int
|
|
|
|
SDL_TimerInit(void)
|
2001-04-26 16:50:19 +00:00
|
|
|
{
|
2006-07-10 21:04:37 +00:00
|
|
|
int retval;
|
2001-04-26 16:50:19 +00:00
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
retval = 0;
|
|
|
|
if (SDL_timer_started) {
|
|
|
|
SDL_TimerQuit();
|
|
|
|
}
|
|
|
|
if (!SDL_timer_threaded) {
|
|
|
|
retval = SDL_SYS_TimerInit();
|
|
|
|
}
|
|
|
|
if (SDL_timer_threaded) {
|
|
|
|
SDL_timer_mutex = SDL_CreateMutex();
|
|
|
|
}
|
|
|
|
if (retval == 0) {
|
|
|
|
SDL_timer_started = 1;
|
|
|
|
}
|
|
|
|
return (retval);
|
2001-04-26 16:50:19 +00:00
|
|
|
}
|
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
void
|
|
|
|
SDL_TimerQuit(void)
|
2001-04-26 16:50:19 +00:00
|
|
|
{
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_SetTimer(0, NULL);
|
|
|
|
if (SDL_timer_threaded < 2) {
|
|
|
|
SDL_SYS_TimerQuit();
|
|
|
|
}
|
|
|
|
if (SDL_timer_threaded) {
|
|
|
|
SDL_DestroyMutex(SDL_timer_mutex);
|
|
|
|
SDL_timer_mutex = NULL;
|
|
|
|
}
|
|
|
|
SDL_timer_started = 0;
|
|
|
|
SDL_timer_threaded = 0;
|
2001-04-26 16:50:19 +00:00
|
|
|
}
|
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
void
|
|
|
|
SDL_ThreadedTimerCheck(void)
|
2001-04-26 16:50:19 +00:00
|
|
|
{
|
2006-07-10 21:04:37 +00:00
|
|
|
Uint32 now, ms;
|
|
|
|
SDL_TimerID t, prev, next;
|
|
|
|
SDL_bool removed;
|
2001-04-26 16:50:19 +00:00
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_mutexP(SDL_timer_mutex);
|
2011-01-22 00:33:37 -08:00
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
now = SDL_GetTicks();
|
2011-01-22 00:33:37 -08:00
|
|
|
do {
|
|
|
|
list_changed = SDL_FALSE;
|
|
|
|
for (prev = NULL, t = SDL_timers; t; t = next) {
|
|
|
|
removed = SDL_FALSE;
|
|
|
|
ms = t->interval - SDL_TIMESLICE;
|
|
|
|
next = t->next;
|
|
|
|
if ((int) (now - t->last_alarm) > (int) ms) {
|
|
|
|
struct _SDL_TimerID timer;
|
|
|
|
|
|
|
|
if ((now - t->last_alarm) < t->interval) {
|
|
|
|
t->last_alarm += t->interval;
|
2006-07-10 21:04:37 +00:00
|
|
|
} else {
|
2011-01-22 00:33:37 -08:00
|
|
|
t->last_alarm = now;
|
|
|
|
}
|
2001-04-26 16:50:19 +00:00
|
|
|
#ifdef DEBUG_TIMERS
|
2011-01-22 00:33:37 -08:00
|
|
|
printf("Executing timer %p (thread = %lu)\n",
|
|
|
|
t, SDL_ThreadID());
|
2001-04-26 16:50:19 +00:00
|
|
|
#endif
|
2011-01-22 00:33:37 -08:00
|
|
|
timer = *t;
|
|
|
|
SDL_mutexV(SDL_timer_mutex);
|
|
|
|
ms = timer.cb(timer.interval, timer.param);
|
|
|
|
SDL_mutexP(SDL_timer_mutex);
|
|
|
|
if (list_changed) {
|
|
|
|
next = t->next;
|
|
|
|
for (prev = SDL_timers; prev; prev = prev->next) {
|
|
|
|
if (prev->next == t)
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (ms != t->interval) {
|
|
|
|
if (ms) {
|
|
|
|
t->interval = ROUND_RESOLUTION(ms);
|
2006-07-10 21:04:37 +00:00
|
|
|
} else {
|
2011-01-22 00:33:37 -08:00
|
|
|
/* Remove timer from the list */
|
|
|
|
#ifdef DEBUG_TIMERS
|
|
|
|
printf("SDL: Removing timer %p\n", t);
|
|
|
|
#endif
|
|
|
|
if (prev) {
|
|
|
|
prev->next = next;
|
|
|
|
} else {
|
|
|
|
SDL_timers = next;
|
|
|
|
}
|
|
|
|
SDL_free(t);
|
|
|
|
--SDL_timer_running;
|
|
|
|
removed = SDL_TRUE;
|
2006-07-10 21:04:37 +00:00
|
|
|
}
|
2011-01-22 00:33:37 -08:00
|
|
|
}
|
|
|
|
if (list_changed) {
|
|
|
|
/* Abort, list of timers modified */
|
|
|
|
break;
|
2006-07-10 21:04:37 +00:00
|
|
|
}
|
|
|
|
}
|
2011-01-22 00:33:37 -08:00
|
|
|
/* Don't update prev if the timer has disappeared */
|
|
|
|
if (!removed) {
|
|
|
|
prev = t;
|
|
|
|
}
|
2006-07-10 21:04:37 +00:00
|
|
|
}
|
2011-01-22 00:33:37 -08:00
|
|
|
} while (list_changed);
|
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_mutexV(SDL_timer_mutex);
|
2001-04-26 16:50:19 +00:00
|
|
|
}
|
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
static SDL_TimerID
|
|
|
|
SDL_AddTimerInternal(Uint32 interval, SDL_NewTimerCallback callback,
|
|
|
|
void *param)
|
2005-01-13 23:24:56 +00:00
|
|
|
{
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_TimerID t;
|
|
|
|
t = (SDL_TimerID) SDL_malloc(sizeof(struct _SDL_TimerID));
|
|
|
|
if (t) {
|
|
|
|
t->interval = ROUND_RESOLUTION(interval);
|
|
|
|
t->cb = callback;
|
|
|
|
t->param = param;
|
|
|
|
t->last_alarm = SDL_GetTicks();
|
|
|
|
t->next = SDL_timers;
|
|
|
|
SDL_timers = t;
|
|
|
|
++SDL_timer_running;
|
|
|
|
list_changed = SDL_TRUE;
|
|
|
|
}
|
2005-01-13 23:24:56 +00:00
|
|
|
#ifdef DEBUG_TIMERS
|
2006-07-10 21:04:37 +00:00
|
|
|
printf("SDL_AddTimer(%d) = %08x num_timers = %d\n", interval, (Uint32) t,
|
|
|
|
SDL_timer_running);
|
2005-01-13 23:24:56 +00:00
|
|
|
#endif
|
2006-07-10 21:04:37 +00:00
|
|
|
return t;
|
2005-01-13 23:24:56 +00:00
|
|
|
}
|
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_TimerID
|
|
|
|
SDL_AddTimer(Uint32 interval, SDL_NewTimerCallback callback, void *param)
|
2001-04-26 16:50:19 +00:00
|
|
|
{
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_TimerID t;
|
|
|
|
if (!SDL_timer_mutex) {
|
|
|
|
if (SDL_timer_started) {
|
|
|
|
SDL_SetError("This platform doesn't support multiple timers");
|
|
|
|
} else {
|
|
|
|
SDL_SetError("You must call SDL_Init(SDL_INIT_TIMER) first");
|
|
|
|
}
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
if (!SDL_timer_threaded) {
|
|
|
|
SDL_SetError("Multiple timers require threaded events!");
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
SDL_mutexP(SDL_timer_mutex);
|
|
|
|
t = SDL_AddTimerInternal(interval, callback, param);
|
|
|
|
SDL_mutexV(SDL_timer_mutex);
|
|
|
|
return t;
|
2001-04-26 16:50:19 +00:00
|
|
|
}
|
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_bool
|
|
|
|
SDL_RemoveTimer(SDL_TimerID id)
|
2001-04-26 16:50:19 +00:00
|
|
|
{
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_TimerID t, prev = NULL;
|
|
|
|
SDL_bool removed;
|
2001-04-26 16:50:19 +00:00
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
removed = SDL_FALSE;
|
|
|
|
SDL_mutexP(SDL_timer_mutex);
|
|
|
|
/* Look for id in the linked list of timers */
|
|
|
|
for (t = SDL_timers; t; prev = t, t = t->next) {
|
|
|
|
if (t == id) {
|
|
|
|
if (prev) {
|
|
|
|
prev->next = t->next;
|
|
|
|
} else {
|
|
|
|
SDL_timers = t->next;
|
|
|
|
}
|
|
|
|
SDL_free(t);
|
|
|
|
--SDL_timer_running;
|
|
|
|
removed = SDL_TRUE;
|
|
|
|
list_changed = SDL_TRUE;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
2001-04-26 16:50:19 +00:00
|
|
|
#ifdef DEBUG_TIMERS
|
2009-12-16 04:48:11 +00:00
|
|
|
printf("SDL_RemoveTimer(%08x) = %d num_timers = %d thread = %lu\n",
|
2006-07-10 21:04:37 +00:00
|
|
|
(Uint32) id, removed, SDL_timer_running, SDL_ThreadID());
|
2001-04-26 16:50:19 +00:00
|
|
|
#endif
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_mutexV(SDL_timer_mutex);
|
|
|
|
return removed;
|
2001-04-26 16:50:19 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/* Old style callback functions are wrapped through this */
|
2006-07-10 21:04:37 +00:00
|
|
|
static Uint32 SDLCALL
|
|
|
|
callback_wrapper(Uint32 ms, void *param)
|
2001-04-26 16:50:19 +00:00
|
|
|
{
|
2006-07-10 21:04:37 +00:00
|
|
|
SDL_TimerCallback func = (SDL_TimerCallback) param;
|
|
|
|
return (*func) (ms);
|
2001-04-26 16:50:19 +00:00
|
|
|
}
|
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
int
|
|
|
|
SDL_SetTimer(Uint32 ms, SDL_TimerCallback callback)
|
2001-04-26 16:50:19 +00:00
|
|
|
{
|
2006-07-10 21:04:37 +00:00
|
|
|
int retval;
|
2001-04-26 16:50:19 +00:00
|
|
|
|
|
|
|
#ifdef DEBUG_TIMERS
|
2006-07-10 21:04:37 +00:00
|
|
|
printf("SDL_SetTimer(%d)\n", ms);
|
2001-04-26 16:50:19 +00:00
|
|
|
#endif
|
2006-07-10 21:04:37 +00:00
|
|
|
retval = 0;
|
2005-01-13 23:24:56 +00:00
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
if (SDL_timer_threaded) {
|
|
|
|
SDL_mutexP(SDL_timer_mutex);
|
|
|
|
}
|
|
|
|
if (SDL_timer_running) { /* Stop any currently running timer */
|
|
|
|
if (SDL_timer_threaded) {
|
|
|
|
while (SDL_timers) {
|
|
|
|
SDL_TimerID freeme = SDL_timers;
|
|
|
|
SDL_timers = SDL_timers->next;
|
|
|
|
SDL_free(freeme);
|
|
|
|
}
|
|
|
|
SDL_timer_running = 0;
|
|
|
|
list_changed = SDL_TRUE;
|
|
|
|
} else {
|
|
|
|
SDL_SYS_StopTimer();
|
|
|
|
SDL_timer_running = 0;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (ms) {
|
|
|
|
if (SDL_timer_threaded) {
|
|
|
|
if (SDL_AddTimerInternal
|
|
|
|
(ms, callback_wrapper, (void *) callback) == NULL) {
|
|
|
|
retval = -1;
|
|
|
|
}
|
|
|
|
} else {
|
|
|
|
SDL_timer_running = 1;
|
|
|
|
SDL_alarm_interval = ms;
|
|
|
|
SDL_alarm_callback = callback;
|
|
|
|
retval = SDL_SYS_StartTimer();
|
|
|
|
}
|
|
|
|
}
|
|
|
|
if (SDL_timer_threaded) {
|
|
|
|
SDL_mutexV(SDL_timer_mutex);
|
|
|
|
}
|
2005-01-13 23:24:56 +00:00
|
|
|
|
2006-07-10 21:04:37 +00:00
|
|
|
return retval;
|
2001-04-26 16:50:19 +00:00
|
|
|
}
|
2006-07-10 21:04:37 +00:00
|
|
|
|
|
|
|
/* vi: set ts=4 sw=4 expandtab: */
|