sdl-ios-xcode: src/audio/mint/SDL_mintaudio

annotate src/audio/mint/SDL_mintaudio_xbios.c @ 3796:b19680c84cdf SDL-ryan-multiple-audio-device

Bunch of 1.3 audio cleanups to remove FIXMEs, get driver specific crap out of the core and into the drivers where it belongs, and push generic responsibilities out of the drivers and into the core where they belong.

author	Ryan C. Gordon <icculus@icculus.org>
date	Wed, 04 Oct 2006 19:54:23 +0000
parents	adf732f1f016
children	c8b3d3d13ed1

rev	line source
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	1 /*
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	2 SDL - Simple DirectMedia Layer
769 b8d311d90021 Updated copyright information for 2004 (Happy New Year!) Sam Lantinga <slouken@libsdl.org> parents: 704 diff changeset	3 Copyright (C) 1997-2004 Sam Lantinga
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	4
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	5 This library is free software; you can redistribute it and/or
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	6 modify it under the terms of the GNU Library General Public
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	7 License as published by the Free Software Foundation; either
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	8 version 2 of the License, or (at your option) any later version.
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	9
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	10 This library is distributed in the hope that it will be useful,
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	11 but WITHOUT ANY WARRANTY; without even the implied warranty of
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	13 Library General Public License for more details.
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	14
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	15 You should have received a copy of the GNU Library General Public
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	16 License along with this library; if not, write to the Free
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	17 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	18
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	19 Sam Lantinga
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	20 slouken@libsdl.org
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	21 */
1402 d910939febfa Use consistent identifiers for the various platforms we support. Sam Lantinga <slouken@libsdl.org> parents: 1361 diff changeset	22 #include "SDL_config.h"
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	23
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	24 /*
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	25 MiNT audio driver
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	26 using XBIOS functions (Falcon)
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	27
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	28 Patrice Mandin, Didier M�quignon
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	29 */
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	30
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	31 #include <unistd.h>
1111 12c49532be00 Use MiNT thread to update DMA pointers instead of unusable MFP interrupt Patrice Mandin <patmandin@gmail.com> parents: 1107 diff changeset	32 #include <support.h>
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	33
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	34 /* Mint includes */
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	35 #include <mint/osbind.h>
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	36 #include <mint/falcon.h>
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	37 #include <mint/cookie.h>
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	38
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	39 #include "SDL_audio.h"
1361 19418e4422cb New configure-based build system. Still work in progress, but much improved Sam Lantinga <slouken@libsdl.org> parents: 1358 diff changeset	40 #include "../SDL_audio_c.h"
19418e4422cb New configure-based build system. Still work in progress, but much improved Sam Lantinga <slouken@libsdl.org> parents: 1358 diff changeset	41 #include "../SDL_sysaudio.h"
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	42
1412 a8181c4040b8 Fixed include files Patrice Mandin <patmandin@gmail.com> parents: 1402 diff changeset	43 #include "../../video/ataricommon/SDL_atarimxalloc_c.h"
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	44
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	45 #include "SDL_mintaudio.h"
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	46 #include "SDL_mintaudio_dma8.h"
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	47
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	48 /--- Defines ---/
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	49
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	50 #define MINT_AUDIO_DRIVER_NAME "mint_xbios"
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	51
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	52 /* Debug print info */
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	53 #define DEBUG_NAME "audio:xbios: "
962 176240cf4405 Forgot to disable debug messages Patrice Mandin <patmandin@gmail.com> parents: 961 diff changeset	54 #if 0
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	55 #define DEBUG_PRINT(what) \
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	56 { \
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	57 printf what; \
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	58 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	59 #else
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	60 #define DEBUG_PRINT(what)
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	61 #endif
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	62
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	63 /--- Static variables ---/
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	64
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	65 static unsigned long cookie_snd;
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	66
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	67 /--- Audio driver functions ---/
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	68
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	69 static void Mint_CloseAudio(_THIS);
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	70 static int Mint_OpenAudio(_THIS, SDL_AudioSpec * spec);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	71 static void Mint_LockAudio(_THIS);
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	72 static void Mint_UnlockAudio(_THIS);
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	73
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	74 /* To check/init hardware audio */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	75 static int Mint_CheckAudio(_THIS, SDL_AudioSpec * spec);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	76 static void Mint_InitAudio(_THIS, SDL_AudioSpec * spec);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	77
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	78 /--- Audio driver bootstrap functions ---/
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	79
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	80 static int
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	81 Audio_Available(void)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	82 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	83 unsigned long dummy;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	84 const char *envr = SDL_getenv("SDL_AUDIODRIVER");
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	85
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	86 /SDL_MintAudio_mint_present = (Getcookie(C_MiNT, &dummy) == C_FOUND); /
2022 649e9ac39f74 Disable MiNT thread usage and use hw access for updating DMA audio pointers Patrice Mandin <patmandin@gmail.com> parents: 2005 diff changeset	87 SDL_MintAudio_mint_present = SDL_FALSE;
1095 f10892fa2e48 XBIOS in interrupt not usable under MiNT Patrice Mandin <patmandin@gmail.com> parents: 962 diff changeset	88
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	89 /* We can't use XBIOS in interrupt with Magic, don't know about thread */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	90 if (Getcookie(C_MagX, &dummy) == C_FOUND) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	91 return (0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	92 }
1106 524fd51f5d2c Disable XBIOS in interrupt also under Magic Patrice Mandin <patmandin@gmail.com> parents: 1100 diff changeset	93
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	94 /* Check if user asked a different audio driver */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	95 if ((envr) && (SDL_strcmp(envr, MINT_AUDIO_DRIVER_NAME) != 0)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	96 DEBUG_PRINT((DEBUG_NAME "user asked a different audio driver\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	97 return (0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	98 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	99
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	100 /* Cookie _SND present ? if not, assume ST machine */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	101 if (Getcookie(C__SND, &cookie_snd) == C_NOTFOUND) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	102 cookie_snd = SND_PSG;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	103 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	104
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	105 /* Check if we have 16 bits audio */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	106 if ((cookie_snd & SND_16BIT) == 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	107 DEBUG_PRINT((DEBUG_NAME "no 16 bits sound\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	108 return (0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	109 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	110
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	111 /* Check if audio is lockable */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	112 if (Locksnd() != 1) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	113 DEBUG_PRINT((DEBUG_NAME "audio locked by other application\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	114 return (0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	115 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	116
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	117 Unlocksnd();
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	118
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	119 DEBUG_PRINT((DEBUG_NAME "XBIOS audio available!\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	120 return (1);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	121 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	122
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	123 static void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	124 Audio_DeleteDevice(SDL_AudioDevice * device)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	125 {
1336 3692456e7b0f Use SDL_ prefixed versions of C library functions. Sam Lantinga <slouken@libsdl.org> parents: 1111 diff changeset	126 SDL_free(device->hidden);
3692456e7b0f Use SDL_ prefixed versions of C library functions. Sam Lantinga <slouken@libsdl.org> parents: 1111 diff changeset	127 SDL_free(device);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	128 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	129
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	130 static SDL_AudioDevice *
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	131 Audio_CreateDevice(int devindex)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	132 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	133 SDL_AudioDevice *this;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	134
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	135 /* Initialize all variables that we clean on shutdown */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	136 this = (SDL_AudioDevice *) SDL_malloc(sizeof(SDL_AudioDevice));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	137 if (this) {
1336 3692456e7b0f Use SDL_ prefixed versions of C library functions. Sam Lantinga <slouken@libsdl.org> parents: 1111 diff changeset	138 SDL_memset(this, 0, (sizeof *this));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	139 this->hidden = (struct SDL_PrivateAudioData *)
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	140 SDL_malloc((sizeof *this->hidden));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	141 }
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	142 if ((this == NULL) \|\| (this->hidden == NULL)) {
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	143 SDL_OutOfMemory();
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	144 if (this) {
1336 3692456e7b0f Use SDL_ prefixed versions of C library functions. Sam Lantinga <slouken@libsdl.org> parents: 1111 diff changeset	145 SDL_free(this);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	146 }
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	147 return (0);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	148 }
1336 3692456e7b0f Use SDL_ prefixed versions of C library functions. Sam Lantinga <slouken@libsdl.org> parents: 1111 diff changeset	149 SDL_memset(this->hidden, 0, (sizeof *this->hidden));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	150
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	151 /* Set the function pointers */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	152 this->OpenAudio = Mint_OpenAudio;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	153 this->CloseAudio = Mint_CloseAudio;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	154 this->LockAudio = Mint_LockAudio;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	155 this->UnlockAudio = Mint_UnlockAudio;
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	156 this->free = Audio_DeleteDevice;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	157
3796 b19680c84cdf Bunch of 1.3 audio cleanups to remove FIXMEs, get driver specific crap out of Ryan C. Gordon <icculus@icculus.org> parents: 2043 diff changeset	158 /* Uses interrupt driven audio, without thread */
b19680c84cdf Bunch of 1.3 audio cleanups to remove FIXMEs, get driver specific crap out of Ryan C. Gordon <icculus@icculus.org> parents: 2043 diff changeset	159 #if SDL_THREADS_DISABLED
b19680c84cdf Bunch of 1.3 audio cleanups to remove FIXMEs, get driver specific crap out of Ryan C. Gordon <icculus@icculus.org> parents: 2043 diff changeset	160 this->SkipMixerLock = 1;
b19680c84cdf Bunch of 1.3 audio cleanups to remove FIXMEs, get driver specific crap out of Ryan C. Gordon <icculus@icculus.org> parents: 2043 diff changeset	161 #endif
b19680c84cdf Bunch of 1.3 audio cleanups to remove FIXMEs, get driver specific crap out of Ryan C. Gordon <icculus@icculus.org> parents: 2043 diff changeset	162
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	163 return this;
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	164 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	165
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	166 AudioBootStrap MINTAUDIO_XBIOS_bootstrap = {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	167 MINT_AUDIO_DRIVER_NAME, "MiNT XBIOS audio driver",
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	168 Audio_Available, Audio_CreateDevice
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	169 };
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	170
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	171 static void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	172 Mint_LockAudio(_THIS)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	173 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	174 /* Stop replay */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	175 Buffoper(0);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	176 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	177
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	178 static void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	179 Mint_UnlockAudio(_THIS)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	180 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	181 /* Restart replay */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	182 Buffoper(SB_PLA_ENA \| SB_PLA_RPT);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	183 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	184
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	185 static void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	186 Mint_CloseAudio(_THIS)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	187 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	188 /* Stop replay */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	189 SDL_MintAudio_WaitThread();
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	190 Buffoper(0);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	191
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	192 if (!SDL_MintAudio_mint_present) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	193 /* Uninstall interrupt */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	194 Jdisint(MFP_DMASOUND);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	195 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	196
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	197 /* Wait if currently playing sound */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	198 while (SDL_MintAudio_mutex != 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	199 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	200
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	201 /* Clear buffers */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	202 if (SDL_MintAudio_audiobuf[0]) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	203 Mfree(SDL_MintAudio_audiobuf[0]);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	204 SDL_MintAudio_audiobuf[0] = SDL_MintAudio_audiobuf[1] = NULL;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	205 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	206
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	207 /* Unlock sound system */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	208 Unlocksnd();
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	209 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	210
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	211 /* Falcon XBIOS implementation of Devconnect() is buggy with external clock */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	212 static void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	213 Devconnect2(int src, int dst, int sclk, int pre)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	214 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	215 static const unsigned short MASK1[3] = { 0, 0x6000, 0 };
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	216 static const unsigned short MASK2[4] = { 0xFFF0, 0xFF8F, 0xF0FF, 0x0FFF };
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	217 static const unsigned short INDEX1[4] = { 1, 3, 5, 7 };
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	218 static const unsigned short INDEX2[4] = { 0, 2, 4, 6 };
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	219 unsigned short sync_div, dev_ctrl, dest_ctrl;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	220 void *oldstack;
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	221
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	222 if (dst == 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	223 return;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	224 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	225
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	226 oldstack = (void *) Super(0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	227
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	228 dev_ctrl = DMAAUDIO_IO.dev_ctrl;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	229 dest_ctrl = DMAAUDIO_IO.dest_ctrl;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	230 dev_ctrl &= MASK2[src];
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	231
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	232 if (src == ADC) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	233 dev_ctrl \|= MASK1[sclk];
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	234 } else {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	235 dev_ctrl \|= (INDEX1[sclk] << (src << 4));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	236 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	237
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	238 if (dst & DMAREC) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	239 dest_ctrl &= 0xFFF0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	240 dest_ctrl \|= INDEX1[src];
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	241 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	242
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	243 if (dst & DSPRECV) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	244 dest_ctrl &= 0xFF8F;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	245 dest_ctrl \|= (INDEX1[src] << 4);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	246 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	247
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	248 if (dst & EXTOUT) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	249 dest_ctrl &= 0xF0FF;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	250 dest_ctrl \|= (INDEX1[src] << 8);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	251 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	252
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	253 if (dst & DAC) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	254 dev_ctrl &= 0x0FFF;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	255 dev_ctrl \|= MASK1[sclk];
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	256 dest_ctrl &= 0x0FFF;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	257 dest_ctrl \|= (INDEX2[src] << 12);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	258 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	259
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	260 sync_div = DMAAUDIO_IO.sync_div;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	261 if (sclk == CLKEXT) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	262 pre <<= 8;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	263 sync_div &= 0xF0FF;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	264 } else {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	265 sync_div &= 0xFFF0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	266 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	267 sync_div \|= pre;
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	268
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	269 DMAAUDIO_IO.dev_ctrl = dev_ctrl;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	270 DMAAUDIO_IO.dest_ctrl = dest_ctrl;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	271 DMAAUDIO_IO.sync_div = sync_div;
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	272
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	273 Super(oldstack);
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	274 }
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	275
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	276 static void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	277 Mint_CheckExternalClock(_THIS)
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	278 {
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	279 #define SIZE_BUF_CLOCK_MEASURE (44100/10)
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	280
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	281 unsigned long cookie_snd;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	282 char *buffer;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	283 int i, j;
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	284
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	285 /* DSP present with its GPIO port ? */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	286 if (Getcookie(C__SND, &cookie_snd) == C_NOTFOUND) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	287 return;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	288 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	289 if ((cookie_snd & SND_DSP) == 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	290 return;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	291 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	292
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	293 buffer = Atari_SysMalloc(SIZE_BUF_CLOCK_MEASURE, MX_STRAM);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	294 if (buffer == NULL) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	295 DEBUG_PRINT((DEBUG_NAME "Not enough memory for the measure\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	296 return;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	297 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	298 SDL_memset(buffer, 0, SIZE_BUF_CLOCK_MEASURE);
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	299
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	300 Buffoper(0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	301 Settracks(0, 0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	302 Setmontracks(0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	303 Setmode(MONO8);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	304 Jdisint(MFP_TIMERA);
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	305
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	306 for (i = 0; i < 2; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	307 Gpio(GPIO_SET, 7); /* DSP port gpio outputs */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	308 Gpio(GPIO_WRITE, 2 + i); /* 22.5792/24.576 MHz for 44.1/48KHz */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	309 Devconnect2(DMAPLAY, DAC, CLKEXT, CLK50K); /* Matrix and clock source */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	310 Setbuffer(0, buffer, buffer + SIZE_BUF_CLOCK_MEASURE); /* Set buffer */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	311 Xbtimer(XB_TIMERA, 5, 38, SDL_MintAudio_XbiosInterruptMeasureClock); /* delay mode timer A, prediv /64, 1KHz */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	312 Jenabint(MFP_TIMERA);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	313 SDL_MintAudio_clocktics = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	314 Buffoper(SB_PLA_ENA);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	315 usleep(110000);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	316
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	317 if ((Buffoper(-1) & 1) == 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	318 if (SDL_MintAudio_clocktics) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	319 unsigned long khz;
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	320
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	321 khz =
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	322 ((SIZE_BUF_CLOCK_MEASURE /
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	323 SDL_MintAudio_clocktics) + 1) & 0xFFFFFFFE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	324 DEBUG_PRINT((DEBUG_NAME "measure %d: freq=%lu KHz\n",
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	325 i + 1, khz));
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	326
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	327 if (khz == 44) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	328 for (j = 1; j < 4; j++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	329 SDL_MintAudio_AddFrequency(this,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	330 MASTERCLOCK_44K
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	331 /
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	332 (MASTERPREDIV_FALCON
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	333 * (1 << j)),
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	334 MASTERCLOCK_44K,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	335 (1 << j) - 1, 2 + i);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	336 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	337 } else if (khz == 48) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	338 for (j = 1; j < 4; j++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	339 SDL_MintAudio_AddFrequency(this,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	340 MASTERCLOCK_48K
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	341 /
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	342 (MASTERPREDIV_FALCON
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	343 * (1 << j)),
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	344 MASTERCLOCK_48K,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	345 (1 << j) - 1, 2 + i);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	346 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	347 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	348 } else {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	349 DEBUG_PRINT((DEBUG_NAME "No measure\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	350 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	351 } else {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	352 DEBUG_PRINT((DEBUG_NAME "No SDMA clock\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	353 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	354
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	355 Buffoper(0); /* stop */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	356 Jdisint(MFP_TIMERA); /* Uninstall interrupt */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	357 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	358
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	359 Mfree(buffer);
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	360 }
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	361
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	362 static int
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	363 Mint_CheckAudio(_THIS, SDL_AudioSpec * spec)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	364 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	365 int i;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	366 Uint32 extclock;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	367
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	368 DEBUG_PRINT((DEBUG_NAME "asked: %d bits, ",
adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	369 SDL_AUDIO_BITSIZE(spec->format)));
2005 45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	370 DEBUG_PRINT(("float=%d, ", SDL_AUDIO_ISFLOAT(spec->format)));
45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	371 DEBUG_PRINT(("signed=%d, ", SDL_AUDIO_ISSIGNED(spec->format)));
45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	372 DEBUG_PRINT(("big endian=%d, ", SDL_AUDIO_ISBIGENDIAN(spec->format)));
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	373 DEBUG_PRINT(("channels=%d, ", spec->channels));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	374 DEBUG_PRINT(("freq=%d\n", spec->freq));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	375
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	376 spec->format \|= SDL_AUDIO_MASK_SIGNED; /* Audio is always signed */
2005 45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	377
45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	378 /* clamp out int32/float32 */
45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	379 if (SDL_AUDIO_BITSIZE(spec->format) >= 16) {
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	380 spec->format = AUDIO_S16MSB; /* Audio is always big endian */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	381 spec->channels = 2; /* 16 bits always stereo */
2005 45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	382 } else if (spec->channels > 2) {
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	383 spec->channels = 2; /* no more than stereo! */
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	384 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	385
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	386 MINTAUDIO_freqcount = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	387
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	388 /* Add external clocks if present */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	389 Mint_CheckExternalClock(this);
1107 856f76a099c7 Can use both clocks of FDI interface on Falcon, plus digital output Patrice Mandin <patmandin@gmail.com> parents: 1106 diff changeset	390
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	391 /* Standard clocks */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	392 for (i = 1; i < 12; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	393 /* Remove unusable Falcon codec predivisors */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	394 if ((i == 6) \|\| (i == 8) \|\| (i == 10)) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	395 continue;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	396 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	397 SDL_MintAudio_AddFrequency(this,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	398 MASTERCLOCK_FALCON1 /
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	399 (MASTERPREDIV_FALCON * (i + 1)),
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	400 MASTERCLOCK_FALCON1, i, -1);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	401 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	402
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	403 #if 1
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	404 for (i = 0; i < MINTAUDIO_freqcount; i++) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	405 DEBUG_PRINT((DEBUG_NAME "freq %d: %lu Hz, clock %lu, prediv %d\n",
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	406 i, MINTAUDIO_frequencies[i].frequency,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	407 MINTAUDIO_frequencies[i].masterclock,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	408 MINTAUDIO_frequencies[i].predivisor));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	409 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	410 #endif
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	411
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	412 MINTAUDIO_numfreq = SDL_MintAudio_SearchFrequency(this, spec->freq);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	413 spec->freq = MINTAUDIO_frequencies[MINTAUDIO_numfreq].frequency;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	414
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	415 DEBUG_PRINT((DEBUG_NAME "obtained: %d bits, ",
adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	416 SDL_AUDIO_BITSIZE(spec->format)));
2005 45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	417 DEBUG_PRINT(("float=%d, ", SDL_AUDIO_ISFLOAT(spec->format)));
45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	418 DEBUG_PRINT(("signed=%d, ", SDL_AUDIO_ISSIGNED(spec->format)));
45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	419 DEBUG_PRINT(("big endian=%d, ", SDL_AUDIO_ISBIGENDIAN(spec->format)));
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	420 DEBUG_PRINT(("channels=%d, ", spec->channels));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	421 DEBUG_PRINT(("freq=%d\n", spec->freq));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	422
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	423 return 0;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	424 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	425
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	426 static void
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	427 Mint_InitAudio(_THIS, SDL_AudioSpec * spec)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	428 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	429 int channels_mode, dmaclock, prediv;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	430 void *buffer;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	431
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	432 /* Stop currently playing sound */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	433 SDL_MintAudio_quit_thread = SDL_FALSE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	434 SDL_MintAudio_thread_finished = SDL_TRUE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	435 SDL_MintAudio_WaitThread();
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	436 Buffoper(0);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	437
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	438 /* Set replay tracks */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	439 Settracks(0, 0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	440 Setmontracks(0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	441
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	442 /* Select replay format */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	443 channels_mode = STEREO16;
2005 45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	444 switch (SDL_AUDIO_BITSIZE(spec->format)) {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	445 case 8:
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	446 if (spec->channels == 2) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	447 channels_mode = STEREO8;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	448 } else {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	449 channels_mode = MONO8;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	450 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	451 break;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	452 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	453 if (Setmode(channels_mode) < 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	454 DEBUG_PRINT((DEBUG_NAME "Setmode() failed\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	455 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	456
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	457 dmaclock = MINTAUDIO_frequencies[MINTAUDIO_numfreq].masterclock;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	458 prediv = MINTAUDIO_frequencies[MINTAUDIO_numfreq].predivisor;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	459 if (MINTAUDIO_frequencies[MINTAUDIO_numfreq].gpio_bits != -1) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	460 Gpio(GPIO_SET, 7); /* DSP port gpio outputs */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	461 Gpio(GPIO_WRITE, MINTAUDIO_frequencies[MINTAUDIO_numfreq].gpio_bits);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	462 Devconnect2(DMAPLAY, DAC \| EXTOUT, CLKEXT, prediv);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	463 } else {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	464 Devconnect2(DMAPLAY, DAC, CLK25M, prediv);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	465 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	466
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	467 /* Set buffer */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	468 buffer = SDL_MintAudio_audiobuf[SDL_MintAudio_numbuf];
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	469 if (Setbuffer(0, buffer, buffer + spec->size) < 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	470 DEBUG_PRINT((DEBUG_NAME "Setbuffer() failed\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	471 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	472
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	473 if (SDL_MintAudio_mint_present) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	474 SDL_MintAudio_thread_pid = tfork(SDL_MintAudio_Thread, 0);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	475 } else {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	476 /* Install interrupt */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	477 Jdisint(MFP_DMASOUND);
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	478 /Xbtimer(XB_TIMERA, 8, 1, SDL_MintAudio_XbiosInterrupt); /
2022 649e9ac39f74 Disable MiNT thread usage and use hw access for updating DMA audio pointers Patrice Mandin <patmandin@gmail.com> parents: 2005 diff changeset	479 Xbtimer(XB_TIMERA, 8, 1, SDL_MintAudio_Dma8Interrupt);
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	480 Jenabint(MFP_DMASOUND);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	481
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	482 if (Setinterrupt(SI_TIMERA, SI_PLAY) < 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	483 DEBUG_PRINT((DEBUG_NAME "Setinterrupt() failed\n"));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	484 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	485 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	486
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	487 /* Go */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	488 Buffoper(SB_PLA_ENA \| SB_PLA_RPT);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	489 DEBUG_PRINT((DEBUG_NAME "hardware initialized\n"));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	490 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	491
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	492 static int
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	493 Mint_OpenAudio(_THIS, SDL_AudioSpec * spec)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	494 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	495 /* Lock sound system */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	496 if (Locksnd() != 1) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	497 SDL_SetError("Mint_OpenAudio: Audio system already in use");
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	498 return (-1);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	499 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	500
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	501 SDL_MintAudio_device = this;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	502
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	503 /* Check audio capabilities */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	504 if (Mint_CheckAudio(this, spec) == -1) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	505 return -1;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	506 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	507
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	508 SDL_CalculateAudioSpec(spec);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	509
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	510 /* Allocate memory for audio buffers in DMA-able RAM */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	511 DEBUG_PRINT((DEBUG_NAME "buffer size=%d\n", spec->size));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	512
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	513 SDL_MintAudio_audiobuf[0] = Atari_SysMalloc(spec->size * 2, MX_STRAM);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	514 if (SDL_MintAudio_audiobuf[0] == NULL) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	515 SDL_SetError("MINT_OpenAudio: Not enough memory for audio buffer");
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	516 return (-1);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	517 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	518 SDL_MintAudio_audiobuf[1] = SDL_MintAudio_audiobuf[0] + spec->size;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	519 SDL_MintAudio_numbuf = 0;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	520 SDL_memset(SDL_MintAudio_audiobuf[0], spec->silence, spec->size * 2);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	521 SDL_MintAudio_audiosize = spec->size;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	522 SDL_MintAudio_mutex = 0;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	523
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	524 DEBUG_PRINT((DEBUG_NAME "buffer 0 at 0x%08x\n",
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	525 SDL_MintAudio_audiobuf[0]));
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	526 DEBUG_PRINT((DEBUG_NAME "buffer 1 at 0x%08x\n",
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	527 SDL_MintAudio_audiobuf[1]));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	528
2027 d48ead2d2ba5 Save/restore FPU registers in interrupt Patrice Mandin <patmandin@gmail.com> parents: 2022 diff changeset	529 SDL_MintAudio_CheckFpu();
d48ead2d2ba5 Save/restore FPU registers in interrupt Patrice Mandin <patmandin@gmail.com> parents: 2022 diff changeset	530
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	531 /* Setup audio hardware */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	532 Mint_InitAudio(this, spec);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	533
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	534 return (1); /* We don't use SDL threaded audio */
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	535 }
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	536
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	537 /* vi: set ts=4 sw=4 expandtab: */

Mercurial > sdl-ios-xcode

annotate src/audio/mint/SDL_mintaudio_xbios.c @ 3796:b19680c84cdf SDL-ryan-multiple-audio-device