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"
51
52
53
/* from audio/mint */
void SDL_MintAudio_CheckFpu(void);
54
55
/* The first ticks value of the application */
static Uint32 start;
56
static volatile SDL_bool supervisor;
57
static int mint_present; /* can we use Syield() ? */
59
60
void
SDL_StartTicks(void)
62
63
void *oldpile;
unsigned long dummy;
65
66
67
68
/* Set first ticks value */
oldpile = (void *) Super(0);
start = *((volatile long *) _hz_200);
Super(oldpile);
70
start *= 5; /* One _hz_200 tic is 5ms */
72
mint_present = (Getcookie(C_MiNT, &dummy) == C_FOUND);
75
76
Uint32
SDL_GetTicks(void)
78
79
Uint32 now;
void *oldpile = NULL;
81
82
83
84
85
86
87
/* 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);
}
89
now = *((volatile long *) _hz_200);
91
92
93
if (!supervisor) {
Super(oldpile);
}
95
return ((now * 5) - start);
98
99
void
SDL_Delay(Uint32 ms)
101
102
103
104
105
106
107
108
Uint32 now;
now = SDL_GetTicks();
while ((SDL_GetTicks() - now) < ms) {
if (mint_present) {
Syield();
}
}
109
110
111
}
/* Data to handle a single periodic alarm */
112
static SDL_bool timer_installed = SDL_FALSE;
114
115
static void
RunTimer(void)
117
118
119
supervisor = SDL_TRUE;
SDL_ThreadedTimerCheck();
supervisor = SDL_FALSE;
120
121
122
}
/* This is only called if the event thread is not running */
123
124
int
SDL_SYS_TimerInit(void)
126
void *oldpile;
128
supervisor = SDL_FALSE;
130
131
SDL_MintAudio_CheckFpu();
132
133
134
135
/* Install RunTimer in vbl vector */
oldpile = (void *) Super(0);
timer_installed = !SDL_AtariVblInstall(RunTimer);
Super(oldpile);
137
138
139
140
if (!timer_installed) {
return (-1);
}
return (SDL_SetTimerThreaded(0));
143
144
void
SDL_SYS_TimerQuit(void)
146
147
148
149
150
151
152
153
154
void *oldpile;
if (timer_installed) {
/* Uninstall RunTimer vbl vector */
oldpile = (void *) Super(0);
SDL_AtariVblUninstall(RunTimer);
Super(oldpile);
timer_installed = SDL_FALSE;
}
157
158
int
SDL_SYS_StartTimer(void)
160
161
SDL_SetError("Internal logic error: MiNT uses vbl timer");
return (-1);
164
165
void
SDL_SYS_StopTimer(void)
169
170
#endif /* SDL_TIMER_MINT */
171
/* vi: set ts=4 sw=4 expandtab: */