This repository has been archived by the owner on Feb 11, 2021. It is now read-only.
/
SDL_systimer.c
249 lines (199 loc) · 5.09 KB
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.
14
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
Sam Lantinga
20
slouken@libsdl.org
21
*/
22
#include "SDL_config.h"
23
24
25
#ifdef SDL_TIMER_RISCOS
26
27
28
29
30
31
32
33
#include <stdio.h>
#include <time.h>
#include <sys/time.h>
#include <unistd.h>
#include <string.h>
#include <errno.h>
#include "SDL_timer.h"
34
#include "../SDL_timer_c.h"
35
36
37
#if SDL_THREADS_DISABLED
/* Timer SDL_arraysize(Timer ),start/reset time */
38
39
static Uint32 timerStart;
/* Timer running function */
40
void RISCOS_CheckTimer ();
41
42
43
44
#else
#include <pthread.h>
extern Uint32 riscos_main_thread;
extern int riscos_using_threads;
45
46
extern Uint32 SDL_ThreadID ();
extern Uint32 SDL_EventThreadID (void);
47
48
#endif
49
50
extern void RISCOS_BackgroundTasks (void);
51
52
53
54
/* The first ticks value of the application */
clock_t start;
55
56
void
SDL_StartTicks (void)
57
{
58
59
/* Set first ticks value */
start = clock ();
60
61
}
62
63
Uint32
SDL_GetTicks (void)
64
{
65
clock_t ticks;
66
67
ticks = clock () - start;
68
69
70
71
#if CLOCKS_PER_SEC == 1000
72
return (ticks);
73
74
75
#elif CLOCKS_PER_SEC == 100
76
return (ticks * 10);
77
78
79
#else
80
return ticks * (1000 / CLOCKS_PER_SEC);
81
82
83
84
85
#endif
}
86
87
void
SDL_Delay (Uint32 ms)
88
{
89
Uint32 now, then, elapsed;
90
#if !SDL_THREADS_DISABLED
91
int is_event_thread;
92
93
94
95
96
97
98
99
100
if (riscos_using_threads) {
is_event_thread = 0;
if (SDL_EventThreadID ()) {
if (SDL_EventThreadID () == SDL_ThreadID ())
is_event_thread = 1;
} else if (SDL_ThreadID () == riscos_main_thread)
is_event_thread = 1;
} else
is_event_thread = 1;
101
102
#endif
103
104
/*TODO: Next version of Unixlib may allow us to use usleep here */
/* for non event threads */
105
106
107
/* Set the timeout interval - Linux only needs to do this once */
then = SDL_GetTicks ();
108
109
110
do {
/* Do background tasks required while sleeping as we are not multithreaded */
111
#if SDL_THREADS_DISABLED
112
RISCOS_BackgroundTasks ();
113
#else
114
115
116
/* For threaded build only run background tasks in event thread */
if (is_event_thread)
RISCOS_BackgroundTasks ();
117
118
#endif
119
120
121
122
123
124
125
126
/* Calculate the time interval left (in case of interrupt) */
now = SDL_GetTicks ();
elapsed = (now - then);
then = now;
if (elapsed >= ms) {
break;
}
ms -= elapsed;
127
#if !SDL_THREADS_DISABLED
128
129
130
/* Need to yield to let other threads have a go */
if (riscos_using_threads)
pthread_yield ();
131
#endif
132
133
134
}
while (1);
135
136
}
137
#if SDL_THREADS_DISABLED
138
139
140
/* Non-threaded version of timer */
141
142
int
SDL_SYS_TimerInit (void)
143
{
144
return (0);
145
146
}
147
148
void
SDL_SYS_TimerQuit (void)
149
{
150
SDL_SetTimer (0, NULL);
151
152
}
153
154
int
SDL_SYS_StartTimer (void)
155
{
156
timerStart = SDL_GetTicks ();
157
158
return (0);
159
160
}
161
162
void
SDL_SYS_StopTimer (void)
163
{
164
165
/* Don't need to do anything as we use SDL_timer_running
to detect if we need to check the timer */
166
167
168
}
169
170
void
RISCOS_CheckTimer ()
171
{
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
if (SDL_timer_running
&& SDL_GetTicks () - timerStart >= SDL_alarm_interval) {
Uint32 ms;
ms = SDL_alarm_callback (SDL_alarm_interval);
if (ms != SDL_alarm_interval) {
if (ms) {
SDL_alarm_interval = ROUND_RESOLUTION (ms);
} else {
SDL_alarm_interval = 0;
SDL_timer_running = 0;
}
}
if (SDL_alarm_interval)
timerStart = SDL_GetTicks ();
}
188
}
189
190
191
192
193
194
195
196
197
198
199
#else
/* Threaded version of timer - based on code for linux */
#include "SDL_thread.h"
/* Data to handle a single periodic alarm */
static int timer_alive = 0;
static SDL_Thread *timer = NULL;
200
201
static int
RunTimer (void *unused)
202
{
203
204
205
206
207
208
209
while (timer_alive) {
if (SDL_timer_running) {
SDL_ThreadedTimerCheck ();
}
SDL_Delay (1);
}
return (0);
210
211
212
}
/* This is only called if the event thread is not running */
213
214
int
SDL_SYS_TimerInit (void)
215
{
216
217
218
219
220
timer_alive = 1;
timer = SDL_CreateThread (RunTimer, NULL);
if (timer == NULL)
return (-1);
return (SDL_SetTimerThreaded (1));
221
222
}
223
224
void
SDL_SYS_TimerQuit (void)
225
{
226
227
228
229
230
timer_alive = 0;
if (timer) {
SDL_WaitThread (timer, NULL);
timer = NULL;
}
231
232
}
233
234
int
SDL_SYS_StartTimer (void)
235
{
236
237
SDL_SetError ("Internal logic error: RISC OS uses threaded timer");
return (-1);
238
239
}
240
241
void
SDL_SYS_StopTimer (void)
242
{
243
return;
244
245
}
246
#endif /* SDL_THREADS_DISABLED */
247
248
#endif /* SDL_TIMER_RISCOS */
249
/* vi: set ts=4 sw=4 expandtab: */