This repository has been archived by the owner on Feb 11, 2021. It is now read-only.
SDL_systimer.c
1
2
/*
SDL - Simple DirectMedia Layer
3
Copyright (C) 1997-2006 Sam Lantinga
4
5
This library is free software; you can redistribute it and/or
6
modify it under the terms of the GNU Lesser General Public
7
License as published by the Free Software Foundation; either
8
version 2.1 of the License, or (at your option) any later version.
9
10
11
12
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
13
Lesser General Public License for more details.
15
16
17
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
18
19
20
21
Sam Lantinga
slouken@libsdl.org
*/
22
#include "SDL_config.h"
24
25
#ifdef SDL_TIMER_MINT
26
27
28
29
30
31
32
33
34
35
36
37
38
39
/*
* TOS/MiNT timer driver
* based on vbl vector
*
* Patrice Mandin
*/
#include <stdio.h>
#include <sys/time.h>
#include <signal.h>
#include <unistd.h>
#include <string.h>
#include <errno.h>
40
#include <mint/cookie.h>
41
#include <mint/sysvars.h>
42
43
#include <mint/osbind.h>
#include <mint/mintbind.h>
44
45
#include "SDL_timer.h"
46
#include "../SDL_timer_c.h"
47
48
#include "SDL_thread.h"
49
#include "SDL_vbltimer_s.h"
50
51
52
53
/* The first ticks value of the application */
static Uint32 start;
static SDL_bool supervisor;
54
static int mint_present; /* can we use Syield() ? */
56
57
void
SDL_StartTicks(void)
59
60
void *oldpile;
unsigned long dummy;
62
63
64
65
/* Set first ticks value */
oldpile = (void *) Super(0);
start = *((volatile long *) _hz_200);
Super(oldpile);
67
start *= 5; /* One _hz_200 tic is 5ms */
69
mint_present = (Getcookie(C_MiNT, &dummy) == C_FOUND);
72
73
Uint32
SDL_GetTicks(void)
75
76
Uint32 now;
void *oldpile = NULL;
78
79
80
81
82
83
84
/* Check if we are in supervisor mode
(this is the case when called from SDL_ThreadedTimerCheck,
which is called from RunTimer, running in the vbl vector)
*/
if (!supervisor) {
oldpile = (void *) Super(0);
}
86
now = *((volatile long *) _hz_200);
88
89
90
if (!supervisor) {
Super(oldpile);
}
92
return ((now * 5) - start);
95
96
void
SDL_Delay(Uint32 ms)
98
99
100
101
102
103
104
105
Uint32 now;
now = SDL_GetTicks();
while ((SDL_GetTicks() - now) < ms) {
if (mint_present) {
Syield();
}
}
106
107
108
}
/* Data to handle a single periodic alarm */
109
static SDL_bool timer_installed = SDL_FALSE;
111
112
static void
RunTimer(void)
114
115
116
supervisor = SDL_TRUE;
SDL_ThreadedTimerCheck();
supervisor = SDL_FALSE;
117
118
119
}
/* This is only called if the event thread is not running */
120
121
int
SDL_SYS_TimerInit(void)
123
void *oldpile;
125
supervisor = SDL_FALSE;
127
128
129
130
/* Install RunTimer in vbl vector */
oldpile = (void *) Super(0);
timer_installed = !SDL_AtariVblInstall(RunTimer);
Super(oldpile);
132
133
134
135
if (!timer_installed) {
return (-1);
}
return (SDL_SetTimerThreaded(0));
138
139
void
SDL_SYS_TimerQuit(void)
141
142
143
144
145
146
147
148
149
void *oldpile;
if (timer_installed) {
/* Uninstall RunTimer vbl vector */
oldpile = (void *) Super(0);
SDL_AtariVblUninstall(RunTimer);
Super(oldpile);
timer_installed = SDL_FALSE;
}
152
153
int
SDL_SYS_StartTimer(void)
155
156
SDL_SetError("Internal logic error: MiNT uses vbl timer");
return (-1);
159
160
void
SDL_SYS_StopTimer(void)
164
165
#endif /* SDL_TIMER_MINT */
166
/* vi: set ts=4 sw=4 expandtab: */