Mercurial > sdl-ios-xcode
annotate src/audio/dmedia/SDL_irixaudio.c @ 1620:2fe5319df0e1
From Anders F Bjorklund:
The current definition of int32_t, uint32_t, uintptr_t
doesn't match what the Mac system headers already have...
Since it's an old 16/32 bit platform, the system headers
expect the types to use "long" and not "int" like they do.
author | Sam Lantinga <slouken@libsdl.org> |
---|---|
date | Wed, 12 Apr 2006 14:38:47 +0000 |
parents | d910939febfa |
children | 782fd950bd46 c121d94672cb 405a192b68e7 |
rev | line source |
---|---|
0 | 1 /* |
2 SDL - Simple DirectMedia Layer | |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
903
diff
changeset
|
3 Copyright (C) 1997-2006 Sam Lantinga |
0 | 4 |
5 This library is free software; you can redistribute it and/or | |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
903
diff
changeset
|
6 modify it under the terms of the GNU Lesser General Public |
0 | 7 License as published by the Free Software Foundation; either |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
903
diff
changeset
|
8 version 2.1 of the License, or (at your option) any later version. |
0 | 9 |
10 This library is distributed in the hope that it will be useful, | |
11 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
903
diff
changeset
|
13 Lesser General Public License for more details. |
0 | 14 |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
903
diff
changeset
|
15 You should have received a copy of the GNU Lesser General Public |
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
903
diff
changeset
|
16 License along with this library; if not, write to the Free Software |
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
903
diff
changeset
|
17 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
0 | 18 |
19 Sam Lantinga | |
252
e8157fcb3114
Updated the source with the correct e-mail address
Sam Lantinga <slouken@libsdl.org>
parents:
148
diff
changeset
|
20 slouken@libsdl.org |
0 | 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" |
0 | 23 |
24 /* Allow access to a raw mixing buffer (For IRIX 6.5 and higher) */ | |
903
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
25 /* patch for IRIX 5 by Georg Schwarz 18/07/2004 */ |
0 | 26 |
27 #include "SDL_timer.h" | |
28 #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
|
29 #include "../SDL_audiomem.h" |
19418e4422cb
New configure-based build system. Still work in progress, but much improved
Sam Lantinga <slouken@libsdl.org>
parents:
1358
diff
changeset
|
30 #include "../SDL_audio_c.h" |
0 | 31 #include "SDL_irixaudio.h" |
32 | |
33 | |
903
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
34 #ifndef AL_RESOURCE /* as a test whether we use the old IRIX audio libraries */ |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
35 #define OLD_IRIX_AUDIO |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
36 #define alClosePort(x) ALcloseport(x) |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
37 #define alFreeConfig(x) ALfreeconfig(x) |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
38 #define alGetFillable(x) ALgetfillable(x) |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
39 #define alNewConfig() ALnewconfig() |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
40 #define alOpenPort(x,y,z) ALopenport(x,y,z) |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
41 #define alSetChannels(x,y) ALsetchannels(x,y) |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
42 #define alSetQueueSize(x,y) ALsetqueuesize(x,y) |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
43 #define alSetSampFmt(x,y) ALsetsampfmt(x,y) |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
44 #define alSetWidth(x,y) ALsetwidth(x,y) |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
45 #endif |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
46 |
0 | 47 /* Audio driver functions */ |
48 static int AL_OpenAudio(_THIS, SDL_AudioSpec *spec); | |
49 static void AL_WaitAudio(_THIS); | |
50 static void AL_PlayAudio(_THIS); | |
51 static Uint8 *AL_GetAudioBuf(_THIS); | |
52 static void AL_CloseAudio(_THIS); | |
53 | |
54 /* Audio driver bootstrap functions */ | |
55 | |
56 static int Audio_Available(void) | |
57 { | |
58 return 1; | |
59 } | |
60 | |
61 static void Audio_DeleteDevice(SDL_AudioDevice *device) | |
62 { | |
1336
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
63 SDL_free(device->hidden); |
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
64 SDL_free(device); |
0 | 65 } |
66 | |
67 static SDL_AudioDevice *Audio_CreateDevice(int devindex) | |
68 { | |
69 SDL_AudioDevice *this; | |
70 | |
71 /* Initialize all variables that we clean on shutdown */ | |
1336
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
72 this = (SDL_AudioDevice *)SDL_malloc(sizeof(SDL_AudioDevice)); |
0 | 73 if ( this ) { |
1336
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
74 SDL_memset(this, 0, (sizeof *this)); |
0 | 75 this->hidden = (struct SDL_PrivateAudioData *) |
1336
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
76 SDL_malloc((sizeof *this->hidden)); |
0 | 77 } |
78 if ( (this == NULL) || (this->hidden == NULL) ) { | |
79 SDL_OutOfMemory(); | |
80 if ( this ) { | |
1336
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
81 SDL_free(this); |
0 | 82 } |
83 return(0); | |
84 } | |
1336
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
85 SDL_memset(this->hidden, 0, (sizeof *this->hidden)); |
0 | 86 |
87 /* Set the function pointers */ | |
88 this->OpenAudio = AL_OpenAudio; | |
89 this->WaitAudio = AL_WaitAudio; | |
90 this->PlayAudio = AL_PlayAudio; | |
91 this->GetAudioBuf = AL_GetAudioBuf; | |
92 this->CloseAudio = AL_CloseAudio; | |
93 | |
94 this->free = Audio_DeleteDevice; | |
95 | |
96 return this; | |
97 } | |
98 | |
148
8758b8d42cd9
Audio subsystem no longer assumes sun audio API on UNIX systems
Sam Lantinga <slouken@libsdl.org>
parents:
0
diff
changeset
|
99 AudioBootStrap DMEDIA_bootstrap = { |
0 | 100 "AL", "IRIX DMedia audio", |
101 Audio_Available, Audio_CreateDevice | |
102 }; | |
103 | |
104 | |
105 void static AL_WaitAudio(_THIS) | |
106 { | |
107 Sint32 timeleft; | |
108 | |
109 timeleft = this->spec.samples - alGetFillable(audio_port); | |
110 if ( timeleft > 0 ) { | |
111 timeleft /= (this->spec.freq/1000); | |
112 SDL_Delay((Uint32)timeleft); | |
113 } | |
114 } | |
115 | |
116 static void AL_PlayAudio(_THIS) | |
117 { | |
118 /* Write the audio data out */ | |
119 if ( alWriteFrames(audio_port, mixbuf, this->spec.samples) < 0 ) { | |
120 /* Assume fatal error, for now */ | |
121 this->enabled = 0; | |
122 } | |
123 } | |
124 | |
125 static Uint8 *AL_GetAudioBuf(_THIS) | |
126 { | |
127 return(mixbuf); | |
128 } | |
129 | |
130 static void AL_CloseAudio(_THIS) | |
131 { | |
132 if ( mixbuf != NULL ) { | |
133 SDL_FreeAudioMem(mixbuf); | |
134 mixbuf = NULL; | |
135 } | |
136 if ( audio_port != NULL ) { | |
605
6399f4e90211
IRIX patches from Andrea Suatoni
Sam Lantinga <slouken@libsdl.org>
parents:
252
diff
changeset
|
137 alClosePort(audio_port); |
0 | 138 audio_port = NULL; |
139 } | |
140 } | |
141 | |
142 static int AL_OpenAudio(_THIS, SDL_AudioSpec *spec) | |
143 { | |
144 ALconfig audio_config; | |
903
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
145 #ifdef OLD_IRIX_AUDIO |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
146 long audio_param[2]; |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
147 #else |
0 | 148 ALpv audio_param; |
903
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
149 #endif |
0 | 150 int width; |
151 | |
152 /* Determine the audio parameters from the AudioSpec */ | |
153 switch ( spec->format & 0xFF ) { | |
154 | |
155 case 8: { /* Signed 8 bit audio data */ | |
156 spec->format = AUDIO_S8; | |
157 width = AL_SAMPLE_8; | |
158 } | |
159 break; | |
160 | |
161 case 16: { /* Signed 16 bit audio data */ | |
162 spec->format = AUDIO_S16MSB; | |
163 width = AL_SAMPLE_16; | |
164 } | |
165 break; | |
166 | |
167 default: { | |
168 SDL_SetError("Unsupported audio format"); | |
169 return(-1); | |
170 } | |
171 } | |
172 | |
173 /* Update the fragment size as size in bytes */ | |
174 SDL_CalculateAudioSpec(spec); | |
175 | |
176 /* Set output frequency */ | |
903
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
177 #ifdef OLD_IRIX_AUDIO |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
178 audio_param[0] = AL_OUTPUT_RATE; |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
179 audio_param[1] = spec->freq; |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
180 if( ALsetparams(AL_DEFAULT_DEVICE, audio_param, 2) < 0 ) { |
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
181 #else |
0 | 182 audio_param.param = AL_RATE; |
183 audio_param.value.i = spec->freq; | |
184 if( alSetParams(AL_DEFAULT_OUTPUT, &audio_param, 1) < 0 ) { | |
903
6e6248801043
Date: Sun, 18 Jul 2004 16:46:44 +0200
Sam Lantinga <slouken@libsdl.org>
parents:
605
diff
changeset
|
185 #endif |
0 | 186 SDL_SetError("alSetParams failed"); |
187 return(-1); | |
188 } | |
189 | |
190 /* Open the audio port with the requested frequency */ | |
191 audio_port = NULL; | |
192 audio_config = alNewConfig(); | |
193 if ( audio_config && | |
194 (alSetSampFmt(audio_config, AL_SAMPFMT_TWOSCOMP) >= 0) && | |
195 (alSetWidth(audio_config, width) >= 0) && | |
196 (alSetQueueSize(audio_config, spec->samples*2) >= 0) && | |
197 (alSetChannels(audio_config, spec->channels) >= 0) ) { | |
605
6399f4e90211
IRIX patches from Andrea Suatoni
Sam Lantinga <slouken@libsdl.org>
parents:
252
diff
changeset
|
198 audio_port = alOpenPort("SDL audio", "w", audio_config); |
0 | 199 } |
200 alFreeConfig(audio_config); | |
201 if( audio_port == NULL ) { | |
202 SDL_SetError("Unable to open audio port"); | |
203 return(-1); | |
204 } | |
205 | |
206 /* Allocate mixing buffer */ | |
207 mixbuf = (Uint8 *)SDL_AllocAudioMem(spec->size); | |
208 if ( mixbuf == NULL ) { | |
209 SDL_OutOfMemory(); | |
210 return(-1); | |
211 } | |
1336
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
212 SDL_memset(mixbuf, spec->silence, spec->size); |
0 | 213 |
214 /* We're ready to rock and roll. :-) */ | |
215 return(0); | |
216 } |