2 SDL - Simple DirectMedia Layer
3 Copyright (C) 1997-2009 Sam Lantinga
5 This library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public
7 License as published by the Free Software Foundation; either
8 version 2 of the License, or (at your option) any later version.
10 This library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Library General Public License for more details.
15 You should have received a copy of the GNU Library General Public
16 License along with this library; if not, write to the Free
17 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22 #include "SDL_config.h"
26 using XBIOS functions (MacSound compatible driver)
34 #include <mint/osbind.h>
35 #include <mint/falcon.h>
36 #include <mint/cookie.h>
38 #include "SDL_audio.h"
39 #include "../SDL_audio_c.h"
40 #include "../SDL_sysaudio.h"
42 #include "../../video/ataricommon/SDL_atarimxalloc_c.h"
44 #include "SDL_mintaudio.h"
45 #include "SDL_mintaudio_mcsn.h"
49 #define MINT_AUDIO_DRIVER_NAME "mint_mcsn"
51 /* Debug print info */
52 #define DEBUG_NAME "audio:mcsn: "
54 #define DEBUG_PRINT(what) \
59 #define DEBUG_PRINT(what)
62 /*--- Static variables ---*/
64 static unsigned long cookie_snd, cookie_mch;
65 static cookie_mcsn_t *cookie_mcsn;
67 /*--- Audio driver functions ---*/
69 static void Mint_CloseAudio(_THIS);
70 static int Mint_OpenAudio(_THIS, SDL_AudioSpec *spec);
71 static void Mint_LockAudio(_THIS);
72 static void Mint_UnlockAudio(_THIS);
74 /* To check/init hardware audio */
75 static int Mint_CheckAudio(_THIS, SDL_AudioSpec *spec);
76 static void Mint_InitAudio(_THIS, SDL_AudioSpec *spec);
78 /*--- Audio driver bootstrap functions ---*/
80 static int Audio_Available(void)
83 const char *envr = SDL_getenv("SDL_AUDIODRIVER");
85 SDL_MintAudio_mint_present = (Getcookie(C_MiNT, &dummy) == C_FOUND);
87 /* We can't use XBIOS in interrupt with Magic, don't know about thread */
88 if (Getcookie(C_MagX, &dummy) == C_FOUND) {
92 /* Check if user asked a different audio driver */
93 if ((envr) && (SDL_strcmp(envr, MINT_AUDIO_DRIVER_NAME)!=0)) {
94 DEBUG_PRINT((DEBUG_NAME "user asked a different audio driver\n"));
98 /* Cookie _MCH present ? if not, assume ST machine */
99 if (Getcookie(C__MCH, &cookie_mch) == C_NOTFOUND) {
103 /* Cookie _SND present ? if not, assume ST machine */
104 if (Getcookie(C__SND, &cookie_snd) == C_NOTFOUND) {
105 cookie_snd = SND_PSG;
108 /* Check if we have 16 bits audio */
109 if ((cookie_snd & SND_16BIT)==0) {
110 DEBUG_PRINT((DEBUG_NAME "no 16 bits sound\n"));
114 /* Cookie MCSN present ? */
115 if (Getcookie(C_McSn, (long *) &cookie_mcsn) != C_FOUND) {
116 DEBUG_PRINT((DEBUG_NAME "no MCSN audio\n"));
120 /* Check if interrupt at end of replay */
121 if (cookie_mcsn->pint == 0) {
122 DEBUG_PRINT((DEBUG_NAME "no interrupt at end of replay\n"));
126 /* Check if audio is lockable */
128 DEBUG_PRINT((DEBUG_NAME "audio locked by other application\n"));
134 DEBUG_PRINT((DEBUG_NAME "MCSN audio available!\n"));
138 static void Audio_DeleteDevice(SDL_AudioDevice *device)
140 SDL_free(device->hidden);
144 static SDL_AudioDevice *Audio_CreateDevice(int devindex)
146 SDL_AudioDevice *this;
148 /* Initialize all variables that we clean on shutdown */
149 this = (SDL_AudioDevice *)SDL_malloc(sizeof(SDL_AudioDevice));
151 SDL_memset(this, 0, (sizeof *this));
152 this->hidden = (struct SDL_PrivateAudioData *)
153 SDL_malloc((sizeof *this->hidden));
155 if ( (this == NULL) || (this->hidden == NULL) ) {
162 SDL_memset(this->hidden, 0, (sizeof *this->hidden));
164 /* Set the function pointers */
165 this->OpenAudio = Mint_OpenAudio;
166 this->CloseAudio = Mint_CloseAudio;
167 this->LockAudio = Mint_LockAudio;
168 this->UnlockAudio = Mint_UnlockAudio;
169 this->free = Audio_DeleteDevice;
174 AudioBootStrap MINTAUDIO_MCSN_bootstrap = {
175 MINT_AUDIO_DRIVER_NAME, "MiNT MCSN audio driver",
176 Audio_Available, Audio_CreateDevice
179 static void Mint_LockAudio(_THIS)
185 static void Mint_UnlockAudio(_THIS)
188 Buffoper(SB_PLA_ENA|SB_PLA_RPT);
191 static void Mint_CloseAudio(_THIS)
194 SDL_MintAudio_WaitThread();
197 if (!SDL_MintAudio_mint_present) {
198 /* Uninstall interrupt */
199 Jdisint(MFP_DMASOUND);
202 /* Wait if currently playing sound */
203 while (SDL_MintAudio_mutex != 0) {
207 if (SDL_MintAudio_audiobuf[0]) {
208 Mfree(SDL_MintAudio_audiobuf[0]);
209 SDL_MintAudio_audiobuf[0] = SDL_MintAudio_audiobuf[1] = NULL;
212 /* Unlock sound system */
216 static int Mint_CheckAudio(_THIS, SDL_AudioSpec *spec)
219 unsigned long masterclock, masterprediv;
221 DEBUG_PRINT((DEBUG_NAME "asked: %d bits, ",spec->format & 0x00ff));
222 DEBUG_PRINT(("signed=%d, ", ((spec->format & 0x8000)!=0)));
223 DEBUG_PRINT(("big endian=%d, ", ((spec->format & 0x1000)!=0)));
224 DEBUG_PRINT(("channels=%d, ", spec->channels));
225 DEBUG_PRINT(("freq=%d\n", spec->freq));
227 if (spec->channels > 2) {
228 spec->channels = 2; /* no more than stereo! */
231 /* Check formats available */
232 MINTAUDIO_freqcount=0;
233 switch(cookie_mcsn->play) {
236 spec->format=8; /* FIXME: is it signed or unsigned ? */
237 SDL_MintAudio_AddFrequency(this, 12500, 0, 0, -1);
239 case MCSN_TT: /* Also STE, Mega STE */
240 spec->format=AUDIO_S8;
241 masterclock=MASTERCLOCK_STE;
242 masterprediv=MASTERPREDIV_STE;
243 if ((cookie_mch>>16)==MCH_TT) {
244 masterclock=MASTERCLOCK_TT;
245 masterprediv=MASTERPREDIV_TT;
247 for (i=0; i<4; i++) {
248 SDL_MintAudio_AddFrequency(this, masterclock/(masterprediv*(1<<i)),
249 masterclock, 3-i, -1);
252 case MCSN_FALCON: /* Also Mac */
253 for (i=1; i<12; i++) {
254 /* Remove unusable Falcon codec predivisors */
255 if ((i==6) || (i==8) || (i==10)) {
258 SDL_MintAudio_AddFrequency(this, MASTERCLOCK_FALCON1/(MASTERPREDIV_FALCON*(i+1)),
261 if (cookie_mcsn->res1 != 0) {
262 for (i=1; i<4; i++) {
263 SDL_MintAudio_AddFrequency(this, (cookie_mcsn->res1)/(MASTERPREDIV_FALCON*(1<<i)),
264 CLKEXT, (1<<i)-1, -1);
267 spec->format |= 0x8000; /* Audio is always signed */
268 if ((spec->format & 0x00ff)==16) {
269 spec->format |= 0x1000; /* Audio is always big endian */
270 spec->channels=2; /* 16 bits always stereo */
276 for (i=0; i<MINTAUDIO_freqcount; i++) {
277 DEBUG_PRINT((DEBUG_NAME "freq %d: %lu Hz, clock %lu, prediv %d\n",
278 i, MINTAUDIO_frequencies[i].frequency, MINTAUDIO_frequencies[i].masterclock,
279 MINTAUDIO_frequencies[i].predivisor
284 MINTAUDIO_numfreq=SDL_MintAudio_SearchFrequency(this, spec->freq);
285 spec->freq=MINTAUDIO_frequencies[MINTAUDIO_numfreq].frequency;
287 DEBUG_PRINT((DEBUG_NAME "obtained: %d bits, ",spec->format & 0x00ff));
288 DEBUG_PRINT(("signed=%d, ", ((spec->format & 0x8000)!=0)));
289 DEBUG_PRINT(("big endian=%d, ", ((spec->format & 0x1000)!=0)));
290 DEBUG_PRINT(("channels=%d, ", spec->channels));
291 DEBUG_PRINT(("freq=%d\n", spec->freq));
296 static void Mint_InitAudio(_THIS, SDL_AudioSpec *spec)
298 int channels_mode, prediv, dmaclock;
301 /* Stop currently playing sound */
302 SDL_MintAudio_quit_thread = SDL_FALSE;
303 SDL_MintAudio_thread_finished = SDL_TRUE;
304 SDL_MintAudio_WaitThread();
307 /* Set replay tracks */
311 /* Select replay format */
312 channels_mode=STEREO16;
313 switch (spec->format & 0xff) {
315 if (spec->channels==2) {
316 channels_mode=STEREO8;
322 if (Setmode(channels_mode)<0) {
323 DEBUG_PRINT((DEBUG_NAME "Setmode() failed\n"));
326 dmaclock = MINTAUDIO_frequencies[MINTAUDIO_numfreq].masterclock;
327 prediv = MINTAUDIO_frequencies[MINTAUDIO_numfreq].predivisor;
328 switch(cookie_mcsn->play) {
330 Devconnect(DMAPLAY, DAC, CLK25M, CLKOLD, 1);
331 Soundcmd(SETPRESCALE, prediv);
332 DEBUG_PRINT((DEBUG_NAME "STE/TT prescaler selected\n"));
335 Devconnect(DMAPLAY, DAC, dmaclock, prediv, 1);
336 DEBUG_PRINT((DEBUG_NAME "Falcon prescaler selected\n"));
341 buffer = SDL_MintAudio_audiobuf[SDL_MintAudio_numbuf];
342 if (Setbuffer(0, buffer, buffer + spec->size)<0) {
343 DEBUG_PRINT((DEBUG_NAME "Setbuffer() failed\n"));
346 if (SDL_MintAudio_mint_present) {
347 SDL_MintAudio_thread_pid = tfork(SDL_MintAudio_Thread, 0);
349 /* Install interrupt */
350 Jdisint(MFP_DMASOUND);
351 Xbtimer(XB_TIMERA, 8, 1, SDL_MintAudio_XbiosInterrupt);
352 Jenabint(MFP_DMASOUND);
354 if (Setinterrupt(SI_TIMERA, SI_PLAY)<0) {
355 DEBUG_PRINT((DEBUG_NAME "Setinterrupt() failed\n"));
360 Buffoper(SB_PLA_ENA|SB_PLA_RPT);
361 DEBUG_PRINT((DEBUG_NAME "hardware initialized\n"));
364 static int Mint_OpenAudio(_THIS, SDL_AudioSpec *spec)
366 /* Lock sound system */
368 SDL_SetError("Mint_OpenAudio: Audio system already in use");
372 SDL_MintAudio_device = this;
374 /* Check audio capabilities */
375 if (Mint_CheckAudio(this, spec)==-1) {
379 SDL_CalculateAudioSpec(spec);
381 /* Allocate memory for audio buffers in DMA-able RAM */
382 DEBUG_PRINT((DEBUG_NAME "buffer size=%d\n", spec->size));
384 SDL_MintAudio_audiobuf[0] = Atari_SysMalloc(spec->size *2, MX_STRAM);
385 if (SDL_MintAudio_audiobuf[0]==NULL) {
386 SDL_SetError("MINT_OpenAudio: Not enough memory for audio buffer");
389 SDL_MintAudio_audiobuf[1] = SDL_MintAudio_audiobuf[0] + spec->size ;
390 SDL_MintAudio_numbuf=0;
391 SDL_memset(SDL_MintAudio_audiobuf[0], spec->silence, spec->size *2);
392 SDL_MintAudio_audiosize = spec->size;
393 SDL_MintAudio_mutex = 0;
395 DEBUG_PRINT((DEBUG_NAME "buffer 0 at 0x%08x\n", SDL_MintAudio_audiobuf[0]));
396 DEBUG_PRINT((DEBUG_NAME "buffer 1 at 0x%08x\n", SDL_MintAudio_audiobuf[1]));
398 SDL_MintAudio_CheckFpu();
400 /* Setup audio hardware */
401 Mint_InitAudio(this, spec);
403 return(1); /* We don't use SDL threaded audio */