This repository has been archived by the owner on Feb 11, 2021. It is now read-only.
/
SDL_mintaudio_mcsn.c
433 lines (359 loc) · 12.3 KB
1
2
/*
SDL - Simple DirectMedia Layer
3
Copyright (C) 1997-2004 Sam Lantinga
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.
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
Library General Public License for more details.
You should have received a copy of the GNU Library General Public
License along with this library; if not, write to the Free
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
Sam Lantinga
slouken@libsdl.org
*/
22
#include "SDL_config.h"
23
24
25
26
27
28
29
30
/*
MiNT audio driver
using XBIOS functions (MacSound compatible driver)
Patrice Mandin
*/
31
#include <support.h>
32
33
34
35
36
37
38
/* Mint includes */
#include <mint/osbind.h>
#include <mint/falcon.h>
#include <mint/cookie.h>
#include "SDL_audio.h"
39
40
#include "../SDL_audio_c.h"
#include "../SDL_sysaudio.h"
41
42
#include "../../video/ataricommon/SDL_atarimxalloc_c.h"
43
44
45
46
47
48
49
50
51
52
#include "SDL_mintaudio.h"
#include "SDL_mintaudio_mcsn.h"
/*--- Defines ---*/
#define MINT_AUDIO_DRIVER_NAME "mint_mcsn"
/* Debug print info */
#define DEBUG_NAME "audio:mcsn: "
53
#if 0
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
#define DEBUG_PRINT(what) \
{ \
printf what; \
}
#else
#define DEBUG_PRINT(what)
#endif
/*--- Static variables ---*/
static unsigned long cookie_snd, cookie_mch;
static cookie_mcsn_t *cookie_mcsn;
/*--- Audio driver functions ---*/
static void Mint_CloseAudio(_THIS);
70
static int Mint_OpenAudio(_THIS, SDL_AudioSpec * spec);
71
72
73
74
static void Mint_LockAudio(_THIS);
static void Mint_UnlockAudio(_THIS);
/* To check/init hardware audio */
75
76
static int Mint_CheckAudio(_THIS, SDL_AudioSpec * spec);
static void Mint_InitAudio(_THIS, SDL_AudioSpec * spec);
77
78
79
/*--- Audio driver bootstrap functions ---*/
80
81
static int
Audio_Available(void)
82
{
83
84
unsigned long dummy;
const char *envr = SDL_getenv("SDL_AUDIODRIVER");
85
86
SDL_MintAudio_mint_present = (Getcookie(C_MiNT, &dummy) == C_FOUND);
87
88
89
90
91
/* We can't use XBIOS in interrupt with Magic, don't know about thread */
if (Getcookie(C_MagX, &dummy) == C_FOUND) {
return (0);
}
92
93
94
95
96
97
/* Check if user asked a different audio driver */
if ((envr) && (SDL_strcmp(envr, MINT_AUDIO_DRIVER_NAME) != 0)) {
DEBUG_PRINT((DEBUG_NAME "user asked a different audio driver\n"));
return (0);
}
98
99
100
101
102
/* Cookie _MCH present ? if not, assume ST machine */
if (Getcookie(C__MCH, &cookie_mch) == C_NOTFOUND) {
cookie_mch = MCH_ST;
}
103
104
105
106
107
/* Cookie _SND present ? if not, assume ST machine */
if (Getcookie(C__SND, &cookie_snd) == C_NOTFOUND) {
cookie_snd = SND_PSG;
}
108
109
110
111
112
113
/* Check if we have 16 bits audio */
if ((cookie_snd & SND_16BIT) == 0) {
DEBUG_PRINT((DEBUG_NAME "no 16 bits sound\n"));
return (0);
}
114
115
116
117
118
119
/* Cookie MCSN present ? */
if (Getcookie(C_McSn, (long *) &cookie_mcsn) != C_FOUND) {
DEBUG_PRINT((DEBUG_NAME "no MCSN audio\n"));
return (0);
}
120
121
122
123
124
125
/* Check if interrupt at end of replay */
if (cookie_mcsn->pint == 0) {
DEBUG_PRINT((DEBUG_NAME "no interrupt at end of replay\n"));
return (0);
}
126
127
128
129
130
131
/* Check if audio is lockable */
if (Locksnd() != 1) {
DEBUG_PRINT((DEBUG_NAME "audio locked by other application\n"));
return (0);
}
132
133
Unlocksnd();
134
135
136
DEBUG_PRINT((DEBUG_NAME "MCSN audio available!\n"));
return (1);
137
138
}
139
140
static void
Audio_DeleteDevice(SDL_AudioDevice * device)
141
{
142
143
SDL_free(device->hidden);
SDL_free(device);
144
145
}
146
147
static SDL_AudioDevice *
Audio_CreateDevice(int devindex)
148
{
149
SDL_AudioDevice *this;
150
151
152
153
/* Initialize all variables that we clean on shutdown */
this = (SDL_AudioDevice *) SDL_malloc(sizeof(SDL_AudioDevice));
if (this) {
154
SDL_memset(this, 0, (sizeof *this));
155
this->hidden = (struct SDL_PrivateAudioData *)
156
SDL_malloc((sizeof *this->hidden));
157
}
158
if ((this == NULL) || (this->hidden == NULL)) {
159
SDL_OutOfMemory();
160
if (this) {
161
SDL_free(this);
162
}
163
return (0);
164
}
165
SDL_memset(this->hidden, 0, (sizeof *this->hidden));
166
167
/* Set the function pointers */
168
169
170
this->OpenAudio = Mint_OpenAudio;
this->CloseAudio = Mint_CloseAudio;
this->LockAudio = Mint_LockAudio;
171
this->UnlockAudio = Mint_UnlockAudio;
172
this->free = Audio_DeleteDevice;
173
174
175
176
177
178
/* Uses interrupt driven audio, without thread */
#if SDL_THREADS_DISABLED
this->SkipMixerLock = 1;
#endif
179
180
181
182
return this;
}
AudioBootStrap MINTAUDIO_MCSN_bootstrap = {
183
184
MINT_AUDIO_DRIVER_NAME, "MiNT MCSN audio driver",
Audio_Available, Audio_CreateDevice
185
186
};
187
188
static void
Mint_LockAudio(_THIS)
189
{
190
191
/* Stop replay */
Buffoper(0);
192
193
}
194
195
static void
Mint_UnlockAudio(_THIS)
196
{
197
198
/* Restart replay */
Buffoper(SB_PLA_ENA | SB_PLA_RPT);
199
200
}
201
202
static void
Mint_CloseAudio(_THIS)
203
{
204
205
206
/* Stop replay */
SDL_MintAudio_WaitThread();
Buffoper(0);
207
208
209
210
211
if (!SDL_MintAudio_mint_present) {
/* Uninstall interrupt */
Jdisint(MFP_DMASOUND);
}
212
213
214
215
/* Wait if currently playing sound */
while (SDL_MintAudio_mutex != 0) {
}
216
217
218
219
220
221
/* Clear buffers */
if (SDL_MintAudio_audiobuf[0]) {
Mfree(SDL_MintAudio_audiobuf[0]);
SDL_MintAudio_audiobuf[0] = SDL_MintAudio_audiobuf[1] = NULL;
}
222
223
224
/* Unlock sound system */
Unlocksnd();
225
226
}
227
228
static int
Mint_CheckAudio(_THIS, SDL_AudioSpec * spec)
229
{
230
231
232
int i;
unsigned long masterclock, masterprediv;
233
234
DEBUG_PRINT((DEBUG_NAME "asked: %d bits, ",
SDL_AUDIO_BITSIZE(spec->format)));
235
236
237
DEBUG_PRINT(("float=%d, ", SDL_AUDIO_ISFLOAT(spec->format)));
DEBUG_PRINT(("signed=%d, ", SDL_AUDIO_ISSIGNED(spec->format)));
DEBUG_PRINT(("big endian=%d, ", SDL_AUDIO_ISBIGENDIAN(spec->format)));
238
239
240
DEBUG_PRINT(("channels=%d, ", spec->channels));
DEBUG_PRINT(("freq=%d\n", spec->freq));
241
if (spec->channels > 2) {
242
spec->channels = 2; /* no more than stereo! */
243
244
}
245
246
247
248
249
/* Check formats available */
MINTAUDIO_freqcount = 0;
switch (cookie_mcsn->play) {
case MCSN_ST:
spec->channels = 1;
250
spec->format = AUDIO_S8; /* FIXME: is it signed or unsigned ? */
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
SDL_MintAudio_AddFrequency(this, 12500, 0, 0, -1);
break;
case MCSN_TT: /* Also STE, Mega STE */
spec->format = AUDIO_S8;
masterclock = MASTERCLOCK_STE;
masterprediv = MASTERPREDIV_STE;
if ((cookie_mch >> 16) == MCH_TT) {
masterclock = MASTERCLOCK_TT;
masterprediv = MASTERPREDIV_TT;
}
for (i = 0; i < 4; i++) {
SDL_MintAudio_AddFrequency(this,
masterclock / (masterprediv *
(1 << i)),
masterclock, 3 - i, -1);
}
break;
case MCSN_FALCON: /* Also Mac */
for (i = 1; i < 12; i++) {
/* Remove unusable Falcon codec predivisors */
if ((i == 6) || (i == 8) || (i == 10)) {
continue;
}
SDL_MintAudio_AddFrequency(this,
MASTERCLOCK_FALCON1 /
(MASTERPREDIV_FALCON * (i + 1)),
CLK25M, i + 1, -1);
}
if (cookie_mcsn->res1 != 0) {
for (i = 1; i < 4; i++) {
SDL_MintAudio_AddFrequency(this,
(cookie_mcsn->res1) /
(MASTERPREDIV_FALCON *
(1 << i)), CLKEXT,
(1 << i) - 1, -1);
}
}
288
spec->format |= SDL_AUDIO_MASK_SIGNED; /* Audio is always signed */
289
if ((SDL_AUDIO_BITSIZE(spec->format)) == 16) {
290
spec->format |= SDL_AUDIO_MASK_ENDIAN; /* Audio is always big endian */
291
292
293
294
spec->channels = 2; /* 16 bits always stereo */
}
break;
}
295
296
#if 1
297
298
299
300
301
302
for (i = 0; i < MINTAUDIO_freqcount; i++) {
DEBUG_PRINT((DEBUG_NAME "freq %d: %lu Hz, clock %lu, prediv %d\n",
i, MINTAUDIO_frequencies[i].frequency,
MINTAUDIO_frequencies[i].masterclock,
MINTAUDIO_frequencies[i].predivisor));
}
303
304
#endif
305
306
MINTAUDIO_numfreq = SDL_MintAudio_SearchFrequency(this, spec->freq);
spec->freq = MINTAUDIO_frequencies[MINTAUDIO_numfreq].frequency;
307
308
309
DEBUG_PRINT((DEBUG_NAME "obtained: %d bits, ",
SDL_AUDIO_BITSIZE(spec->format)));
310
311
312
DEBUG_PRINT(("float=%d, ", SDL_AUDIO_ISFLOAT(spec->format)));
DEBUG_PRINT(("signed=%d, ", SDL_AUDIO_ISSIGNED(spec->format)));
DEBUG_PRINT(("big endian=%d, ", SDL_AUDIO_ISBIGENDIAN(spec->format)));
313
314
DEBUG_PRINT(("channels=%d, ", spec->channels));
DEBUG_PRINT(("freq=%d\n", spec->freq));
315
316
return 0;
317
318
}
319
320
static void
Mint_InitAudio(_THIS, SDL_AudioSpec * spec)
321
{
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
int channels_mode, prediv, dmaclock;
void *buffer;
/* Stop currently playing sound */
SDL_MintAudio_quit_thread = SDL_FALSE;
SDL_MintAudio_thread_finished = SDL_TRUE;
SDL_MintAudio_WaitThread();
Buffoper(0);
/* Set replay tracks */
Settracks(0, 0);
Setmontracks(0);
/* Select replay format */
channels_mode = STEREO16;
337
switch (SDL_AUDIO_BITSIZE(spec->format)) {
338
339
340
341
342
343
344
345
346
347
348
case 8:
if (spec->channels == 2) {
channels_mode = STEREO8;
} else {
channels_mode = MONO8;
}
break;
}
if (Setmode(channels_mode) < 0) {
DEBUG_PRINT((DEBUG_NAME "Setmode() failed\n"));
}
349
350
351
352
353
354
355
356
357
358
359
360
361
362
dmaclock = MINTAUDIO_frequencies[MINTAUDIO_numfreq].masterclock;
prediv = MINTAUDIO_frequencies[MINTAUDIO_numfreq].predivisor;
switch (cookie_mcsn->play) {
case MCSN_TT:
Devconnect(DMAPLAY, DAC, CLK25M, CLKOLD, 1);
Soundcmd(SETPRESCALE, prediv);
DEBUG_PRINT((DEBUG_NAME "STE/TT prescaler selected\n"));
break;
case MCSN_FALCON:
Devconnect(DMAPLAY, DAC, dmaclock, prediv, 1);
DEBUG_PRINT((DEBUG_NAME "Falcon prescaler selected\n"));
break;
}
363
364
365
366
367
368
/* Set buffer */
buffer = SDL_MintAudio_audiobuf[SDL_MintAudio_numbuf];
if (Setbuffer(0, buffer, buffer + spec->size) < 0) {
DEBUG_PRINT((DEBUG_NAME "Setbuffer() failed\n"));
}
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
if (SDL_MintAudio_mint_present) {
SDL_MintAudio_thread_pid = tfork(SDL_MintAudio_Thread, 0);
} else {
/* Install interrupt */
Jdisint(MFP_DMASOUND);
Xbtimer(XB_TIMERA, 8, 1, SDL_MintAudio_XbiosInterrupt);
Jenabint(MFP_DMASOUND);
if (Setinterrupt(SI_TIMERA, SI_PLAY) < 0) {
DEBUG_PRINT((DEBUG_NAME "Setinterrupt() failed\n"));
}
}
/* Go */
Buffoper(SB_PLA_ENA | SB_PLA_RPT);
DEBUG_PRINT((DEBUG_NAME "hardware initialized\n"));
386
387
}
388
389
static int
Mint_OpenAudio(_THIS, SDL_AudioSpec * spec)
390
{
391
392
393
394
395
/* Lock sound system */
if (Locksnd() != 1) {
SDL_SetError("Mint_OpenAudio: Audio system already in use");
return (-1);
}
396
397
SDL_MintAudio_device = this;
398
399
400
401
402
/* Check audio capabilities */
if (Mint_CheckAudio(this, spec) == -1) {
return -1;
}
403
404
SDL_CalculateAudioSpec(spec);
405
406
407
/* Allocate memory for audio buffers in DMA-able RAM */
DEBUG_PRINT((DEBUG_NAME "buffer size=%d\n", spec->size));
408
409
410
411
412
413
414
415
416
417
418
SDL_MintAudio_audiobuf[0] = Atari_SysMalloc(spec->size * 2, MX_STRAM);
if (SDL_MintAudio_audiobuf[0] == NULL) {
SDL_SetError("MINT_OpenAudio: Not enough memory for audio buffer");
return (-1);
}
SDL_MintAudio_audiobuf[1] = SDL_MintAudio_audiobuf[0] + spec->size;
SDL_MintAudio_numbuf = 0;
SDL_memset(SDL_MintAudio_audiobuf[0], spec->silence, spec->size * 2);
SDL_MintAudio_audiosize = spec->size;
SDL_MintAudio_mutex = 0;
419
420
421
422
423
DEBUG_PRINT((DEBUG_NAME "buffer 0 at 0x%08x\n",
SDL_MintAudio_audiobuf[0]));
DEBUG_PRINT((DEBUG_NAME "buffer 1 at 0x%08x\n",
SDL_MintAudio_audiobuf[1]));
424
425
426
SDL_MintAudio_CheckFpu();
427
428
/* Setup audio hardware */
Mint_InitAudio(this, spec);
429
430
return (1); /* We don't use SDL threaded audio */
431
}
432
433
/* vi: set ts=4 sw=4 expandtab: */