source: trunk/packages/xen-3.1/xen-3.1/tools/ioemu/audio/sdlaudio.c @ 34

Last change on this file since 34 was 34, checked in by hartmans, 18 years ago

Add xen and xen-common

File size: 9.7 KB
Line 
1/*
2 * QEMU SDL audio driver
3 *
4 * Copyright (c) 2004-2005 Vassili Karpov (malc)
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 * THE SOFTWARE.
23 */
24#include <SDL.h>
25#include <SDL_thread.h>
26#include "vl.h"
27
28#define AUDIO_CAP "sdl"
29#include "audio_int.h"
30
31typedef struct SDLVoiceOut {
32    HWVoiceOut hw;
33    int live;
34    int rpos;
35    int decr;
36} SDLVoiceOut;
37
38static struct {
39    int nb_samples;
40} conf = {
41    1024
42};
43
44struct SDLAudioState {
45    int exit;
46    SDL_mutex *mutex;
47    SDL_sem *sem;
48    int initialized;
49} glob_sdl;
50typedef struct SDLAudioState SDLAudioState;
51
52static void GCC_FMT_ATTR (1, 2) sdl_logerr (const char *fmt, ...)
53{
54    va_list ap;
55
56    va_start (ap, fmt);
57    AUD_vlog (AUDIO_CAP, fmt, ap);
58    va_end (ap);
59
60    AUD_log (AUDIO_CAP, "Reason: %s\n", SDL_GetError ());
61}
62
63static int sdl_lock (SDLAudioState *s, const char *forfn)
64{
65    if (SDL_LockMutex (s->mutex)) {
66        sdl_logerr ("SDL_LockMutex for %s failed\n", forfn);
67        return -1;
68    }
69    return 0;
70}
71
72static int sdl_unlock (SDLAudioState *s, const char *forfn)
73{
74    if (SDL_UnlockMutex (s->mutex)) {
75        sdl_logerr ("SDL_UnlockMutex for %s failed\n", forfn);
76        return -1;
77    }
78    return 0;
79}
80
81static int sdl_post (SDLAudioState *s, const char *forfn)
82{
83    if (SDL_SemPost (s->sem)) {
84        sdl_logerr ("SDL_SemPost for %s failed\n", forfn);
85        return -1;
86    }
87    return 0;
88}
89
90static int sdl_wait (SDLAudioState *s, const char *forfn)
91{
92    if (SDL_SemWait (s->sem)) {
93        sdl_logerr ("SDL_SemWait for %s failed\n", forfn);
94        return -1;
95    }
96    return 0;
97}
98
99static int sdl_unlock_and_post (SDLAudioState *s, const char *forfn)
100{
101    if (sdl_unlock (s, forfn)) {
102        return -1;
103    }
104
105    return sdl_post (s, forfn);
106}
107
108static int aud_to_sdlfmt (audfmt_e fmt, int *shift)
109{
110    switch (fmt) {
111    case AUD_FMT_S8:
112        *shift = 0;
113        return AUDIO_S8;
114
115    case AUD_FMT_U8:
116        *shift = 0;
117        return AUDIO_U8;
118
119    case AUD_FMT_S16:
120        *shift = 1;
121        return AUDIO_S16LSB;
122
123    case AUD_FMT_U16:
124        *shift = 1;
125        return AUDIO_U16LSB;
126
127    default:
128        dolog ("Internal logic error: Bad audio format %d\n", fmt);
129#ifdef DEBUG_AUDIO
130        abort ();
131#endif
132        return AUDIO_U8;
133    }
134}
135
136static int sdl_to_audfmt (int sdlfmt, audfmt_e *fmt, int *endianess)
137{
138    switch (sdlfmt) {
139    case AUDIO_S8:
140        *endianess = 0;
141        *fmt = AUD_FMT_S8;
142        break;
143
144    case AUDIO_U8:
145        *endianess = 0;
146        *fmt = AUD_FMT_U8;
147        break;
148
149    case AUDIO_S16LSB:
150        *endianess = 0;
151        *fmt = AUD_FMT_S16;
152        break;
153
154    case AUDIO_U16LSB:
155        *endianess = 0;
156        *fmt = AUD_FMT_U16;
157        break;
158
159    case AUDIO_S16MSB:
160        *endianess = 1;
161        *fmt = AUD_FMT_S16;
162        break;
163
164    case AUDIO_U16MSB:
165        *endianess = 1;
166        *fmt = AUD_FMT_U16;
167        break;
168
169    default:
170        dolog ("Unrecognized SDL audio format %d\n", sdlfmt);
171        return -1;
172    }
173
174    return 0;
175}
176
177static int sdl_open (SDL_AudioSpec *req, SDL_AudioSpec *obt)
178{
179    int status;
180
181    status = SDL_OpenAudio (req, obt);
182    if (status) {
183        sdl_logerr ("SDL_OpenAudio failed\n");
184    }
185    return status;
186}
187
188static void sdl_close (SDLAudioState *s)
189{
190    if (s->initialized) {
191        sdl_lock (s, "sdl_close");
192        s->exit = 1;
193        sdl_unlock_and_post (s, "sdl_close");
194        SDL_PauseAudio (1);
195        SDL_CloseAudio ();
196        s->initialized = 0;
197    }
198}
199
200static void sdl_callback (void *opaque, Uint8 *buf, int len)
201{
202    SDLVoiceOut *sdl = opaque;
203    SDLAudioState *s = &glob_sdl;
204    HWVoiceOut *hw = &sdl->hw;
205    int samples = len >> hw->info.shift;
206
207    if (s->exit) {
208        return;
209    }
210
211    while (samples) {
212        int to_mix, decr;
213
214        /* dolog ("in callback samples=%d\n", samples); */
215        sdl_wait (s, "sdl_callback");
216        if (s->exit) {
217            return;
218        }
219
220        if (sdl_lock (s, "sdl_callback")) {
221            return;
222        }
223
224        if (audio_bug (AUDIO_FUNC, sdl->live < 0 || sdl->live > hw->samples)) {
225            dolog ("sdl->live=%d hw->samples=%d\n",
226                   sdl->live, hw->samples);
227            return;
228        }
229
230        if (!sdl->live) {
231            goto again;
232        }
233
234        /* dolog ("in callback live=%d\n", live); */
235        to_mix = audio_MIN (samples, sdl->live);
236        decr = to_mix;
237        while (to_mix) {
238            int chunk = audio_MIN (to_mix, hw->samples - hw->rpos);
239            st_sample_t *src = hw->mix_buf + hw->rpos;
240
241            /* dolog ("in callback to_mix %d, chunk %d\n", to_mix, chunk); */
242            hw->clip (buf, src, chunk);
243            sdl->rpos = (sdl->rpos + chunk) % hw->samples;
244            to_mix -= chunk;
245            buf += chunk << hw->info.shift;
246        }
247        samples -= decr;
248        sdl->live -= decr;
249        sdl->decr += decr;
250
251    again:
252        if (sdl_unlock (s, "sdl_callback")) {
253            return;
254        }
255    }
256    /* dolog ("done len=%d\n", len); */
257}
258
259static int sdl_write_out (SWVoiceOut *sw, void *buf, int len)
260{
261    return audio_pcm_sw_write (sw, buf, len);
262}
263
264static int sdl_run_out (HWVoiceOut *hw)
265{
266    int decr, live;
267    SDLVoiceOut *sdl = (SDLVoiceOut *) hw;
268    SDLAudioState *s = &glob_sdl;
269
270    if (sdl_lock (s, "sdl_callback")) {
271        return 0;
272    }
273
274    live = audio_pcm_hw_get_live_out (hw);
275
276    if (sdl->decr > live) {
277        ldebug ("sdl->decr %d live %d sdl->live %d\n",
278                sdl->decr,
279                live,
280                sdl->live);
281    }
282
283    decr = audio_MIN (sdl->decr, live);
284    sdl->decr -= decr;
285
286    sdl->live = live - decr;
287    hw->rpos = sdl->rpos;
288
289    if (sdl->live > 0) {
290        sdl_unlock_and_post (s, "sdl_callback");
291    }
292    else {
293        sdl_unlock (s, "sdl_callback");
294    }
295    return decr;
296}
297
298static void sdl_fini_out (HWVoiceOut *hw)
299{
300    (void) hw;
301
302    sdl_close (&glob_sdl);
303}
304
305static int sdl_init_out (HWVoiceOut *hw, audsettings_t *as)
306{
307    SDLVoiceOut *sdl = (SDLVoiceOut *) hw;
308    SDLAudioState *s = &glob_sdl;
309    SDL_AudioSpec req, obt;
310    int shift;
311    int endianess;
312    int err;
313    audfmt_e effective_fmt;
314    audsettings_t obt_as;
315
316    shift <<= as->nchannels == 2;
317
318    req.freq = as->freq;
319    req.format = aud_to_sdlfmt (as->fmt, &shift);
320    req.channels = as->nchannels;
321    req.samples = conf.nb_samples;
322    req.callback = sdl_callback;
323    req.userdata = sdl;
324
325    if (sdl_open (&req, &obt)) {
326        return -1;
327    }
328
329    err = sdl_to_audfmt (obt.format, &effective_fmt, &endianess);
330    if (err) {
331        sdl_close (s);
332        return -1;
333    }
334
335    obt_as.freq = obt.freq;
336    obt_as.nchannels = obt.channels;
337    obt_as.fmt = effective_fmt;
338    obt_as.endianness = endianess;
339
340    audio_pcm_init_info (&hw->info, &obt_as);
341    hw->samples = obt.samples;
342
343    s->initialized = 1;
344    s->exit = 0;
345    SDL_PauseAudio (0);
346    return 0;
347}
348
349static int sdl_ctl_out (HWVoiceOut *hw, int cmd, ...)
350{
351    (void) hw;
352
353    switch (cmd) {
354    case VOICE_ENABLE:
355        SDL_PauseAudio (0);
356        break;
357
358    case VOICE_DISABLE:
359        SDL_PauseAudio (1);
360        break;
361    }
362    return 0;
363}
364
365static void *sdl_audio_init (void)
366{
367    SDLAudioState *s = &glob_sdl;
368
369    if (SDL_InitSubSystem (SDL_INIT_AUDIO)) {
370        sdl_logerr ("SDL failed to initialize audio subsystem\n");
371        return NULL;
372    }
373
374    s->mutex = SDL_CreateMutex ();
375    if (!s->mutex) {
376        sdl_logerr ("Failed to create SDL mutex\n");
377        SDL_QuitSubSystem (SDL_INIT_AUDIO);
378        return NULL;
379    }
380
381    s->sem = SDL_CreateSemaphore (0);
382    if (!s->sem) {
383        sdl_logerr ("Failed to create SDL semaphore\n");
384        SDL_DestroyMutex (s->mutex);
385        SDL_QuitSubSystem (SDL_INIT_AUDIO);
386        return NULL;
387    }
388
389    return s;
390}
391
392static void sdl_audio_fini (void *opaque)
393{
394    SDLAudioState *s = opaque;
395    sdl_close (s);
396    SDL_DestroySemaphore (s->sem);
397    SDL_DestroyMutex (s->mutex);
398    SDL_QuitSubSystem (SDL_INIT_AUDIO);
399}
400
401static struct audio_option sdl_options[] = {
402    {"SAMPLES", AUD_OPT_INT, &conf.nb_samples,
403     "Size of SDL buffer in samples", NULL, 0},
404    {NULL, 0, NULL, NULL, NULL, 0}
405};
406
407static struct audio_pcm_ops sdl_pcm_ops = {
408    sdl_init_out,
409    sdl_fini_out,
410    sdl_run_out,
411    sdl_write_out,
412    sdl_ctl_out,
413
414    NULL,
415    NULL,
416    NULL,
417    NULL,
418    NULL
419};
420
421struct audio_driver sdl_audio_driver = {
422    INIT_FIELD (name           = ) "sdl",
423    INIT_FIELD (descr          = ) "SDL http://www.libsdl.org",
424    INIT_FIELD (options        = ) sdl_options,
425    INIT_FIELD (init           = ) sdl_audio_init,
426    INIT_FIELD (fini           = ) sdl_audio_fini,
427    INIT_FIELD (pcm_ops        = ) &sdl_pcm_ops,
428    INIT_FIELD (can_be_default = ) 1,
429    INIT_FIELD (max_voices_out = ) 1,
430    INIT_FIELD (max_voices_in  = ) 0,
431    INIT_FIELD (voice_size_out = ) sizeof (SDLVoiceOut),
432    INIT_FIELD (voice_size_in  = ) 0
433};
Note: See TracBrowser for help on using the repository browser.