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

annotate src/audio/mint/SDL_mintaudio_xbios.c @ 3784:37c9c4590689 SDL-ryan-multiple-audio-device

First batch of heavy lifting on supporting multiple audio devices at once. This has a long way to go yet, most of the drivers aren't updated for the new interfaces, and it's still got some obvious bugs, FIXMEs, and wistlist items. Don't use yet.

author	Ryan C. Gordon <icculus@icculus.org>
date	Sun, 01 Oct 2006 05:24:03 +0000
parents	adf732f1f016
children	5f6550e5184f b19680c84cdf

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
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	158 return this;
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	159 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	160
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	161 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	162 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	163 Audio_Available, Audio_CreateDevice
644 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
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	166 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	167 Mint_LockAudio(_THIS)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	168 {
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	169 /* 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	170 Buffoper(0);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	171 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	172
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	173 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	174 Mint_UnlockAudio(_THIS)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	175 {
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	176 /* 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	177 Buffoper(SB_PLA_ENA \| SB_PLA_RPT);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	178 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	179
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	180 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	181 Mint_CloseAudio(_THIS)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	182 {
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	183 /* 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	184 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	185 Buffoper(0);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	186
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	187 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	188 /* 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	189 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	190 }
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 /* 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	193 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	194 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	195
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	196 /* 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	197 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	198 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	199 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	200 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	201
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	202 /* 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	203 Unlocksnd();
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	204 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	205
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	206 /* 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	207 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	208 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	209 {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	210 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	211 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	212 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	213 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	214 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	215 void *oldstack;
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	216
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	217 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	218 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	219 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	220
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	221 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	222
c121d94672cb SDL 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 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	224 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	225 dev_ctrl &= MASK2[src];
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	226
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	227 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	228 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	229 } 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	230 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	231 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	232
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	233 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	234 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	235 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	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 & 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	239 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	240 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	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 & 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	244 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	245 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	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 & 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	249 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	250 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	251 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	252 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	253 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	254
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	255 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	256 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	257 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	258 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	259 } 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	260 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	261 }
c121d94672cb SDL 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 sync_div \|= pre;
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	263
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	264 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	265 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	266 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	267
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	268 Super(oldstack);
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	269 }
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	270
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	271 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	272 Mint_CheckExternalClock(_THIS)
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	273 {
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	274 #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	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 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	277 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	278 int i, j;
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	279
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	280 /* 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	281 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	282 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	283 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	284 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	285 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	286 }
c121d94672cb SDL 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
c121d94672cb SDL 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 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	289 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	290 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	291 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	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 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	294
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	295 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	296 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	297 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	298 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	299 Jdisint(MFP_TIMERA);
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	300
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	301 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	302 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	303 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	304 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	305 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	306 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	307 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	308 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	309 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	310 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	311
c121d94672cb SDL 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 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	313 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	314 unsigned long khz;
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	315
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	316 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	317 ((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	318 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	319 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	320 i + 1, khz));
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	321
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	322 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	323 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	324 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	325 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	326 /
c121d94672cb SDL 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 (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	328 * (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	329 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	330 (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	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 } 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	333 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	334 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	335 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	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 (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	338 * (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	339 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	340 (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	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 }
c121d94672cb SDL 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 } 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	344 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	345 }
c121d94672cb SDL 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 } 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	347 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	348 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	349
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	350 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	351 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	352 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	353
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	354 Mfree(buffer);
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	355 }
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	356
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	357 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	358 Mint_CheckAudio(_THIS, SDL_AudioSpec * spec)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	359 {
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	360 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	361 Uint32 extclock;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	362
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	363 DEBUG_PRINT((DEBUG_NAME "asked: %d bits, ",
adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	364 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	365 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	366 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	367 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	368 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	369 DEBUG_PRINT(("freq=%d\n", spec->freq));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	370
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	371 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	372
45af7d69f8eb MiNT audio driver cleanups for clamping types and channels to supported Ryan C. Gordon <icculus@icculus.org> parents: 1895 diff changeset	373 /* 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	374 if (SDL_AUDIO_BITSIZE(spec->format) >= 16) {
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	375 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	376 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	377 } else if (spec->channels > 2) {
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	378 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	379 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	380
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 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	382
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	383 /* 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	384 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	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 /* 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	387 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	388 /* 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	389 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	390 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	391 }
c121d94672cb SDL 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 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	393 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	394 (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	395 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	396 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	397
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	398 #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	399 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	400 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	401 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	402 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	403 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	404 }
961 185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	405 #endif
185acc07127a Date: Fri, 29 Oct 2004 11:47:09 +0200 Patrice Mandin <patmandin@gmail.com> parents: 769 diff changeset	406
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	407 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	408 spec->freq = MINTAUDIO_frequencies[MINTAUDIO_numfreq].frequency;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	409
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	410 DEBUG_PRINT((DEBUG_NAME "obtained: %d bits, ",
adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	411 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	412 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	413 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	414 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	415 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	416 DEBUG_PRINT(("freq=%d\n", spec->freq));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	417
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	418 return 0;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	419 }
594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	420
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	421 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	422 Mint_InitAudio(_THIS, SDL_AudioSpec * spec)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	423 {
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	424 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	425 void *buffer;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	426
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	427 /* 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	428 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	429 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	430 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	431 Buffoper(0);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	432
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	433 /* 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	434 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	435 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	436
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1412 diff changeset	437 /* 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	438 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	439 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	440 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	441 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	442 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	443 } 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	444 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	445 }
c121d94672cb SDL 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 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	447 }
c121d94672cb SDL 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 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	449 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	450 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	451
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	452 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	453 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	454 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	455 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	456 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	457 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	458 } 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	459 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	460 }
c121d94672cb SDL 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
c121d94672cb SDL 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 /* 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	463 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	464 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	465 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	466 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	467
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	468 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	469 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	470 } 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	471 /* 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	472 Jdisint(MFP_DMASOUND);
2043 adf732f1f016 Formatting update Sam Lantinga <slouken@libsdl.org> parents: 2027 diff changeset	473 /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	474 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	475 Jenabint(MFP_DMASOUND);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	476
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	477 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	478 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	479 }
c121d94672cb SDL 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 }
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 /* 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	483 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	484 DEBUG_PRINT((DEBUG_NAME "hardware initialized\n"));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	485 }
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 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	488 Mint_OpenAudio(_THIS, SDL_AudioSpec * spec)
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	489 {
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	490 /* 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	491 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	492 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	493 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	494 }
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	495
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	496 SDL_MintAudio_device = this;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	497
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	498 /* 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	499 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	500 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	501 }
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 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	504
c121d94672cb SDL 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 /* 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	506 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	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_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	509 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	510 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	511 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	512 }
c121d94672cb SDL 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[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	514 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	515 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	516 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	517 SDL_MintAudio_mutex = 0;
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	518
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	519 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	520 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	521 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	522 SDL_MintAudio_audiobuf[1]));
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	523
2027 d48ead2d2ba5 Save/restore FPU registers in interrupt Patrice Mandin <patmandin@gmail.com> parents: 2022 diff changeset	524 SDL_MintAudio_CheckFpu();
d48ead2d2ba5 Save/restore FPU registers in interrupt Patrice Mandin <patmandin@gmail.com> parents: 2022 diff changeset	525
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	526 /* 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	527 Mint_InitAudio(this, spec);
644 594422ab8f9f Atari MiNT: added more audio drivers Patrice Mandin <patmandin@gmail.com> parents: diff changeset	528
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	529 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	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
c121d94672cb SDL 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 /* vi: set ts=4 sw=4 expandtab: */

Mercurial > sdl-ios-xcode

annotate src/audio/mint/SDL_mintaudio_xbios.c @ 3784:37c9c4590689 SDL-ryan-multiple-audio-device