This repository has been archived by the owner on Feb 11, 2021. It is now read-only.
/
SDL_alsa_audio.c
618 lines (552 loc) · 21.1 KB
1
2
/*
SDL - Simple DirectMedia Layer
3
Copyright (C) 1997-2004 Sam Lantinga
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation; either
version 2 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Library General Public License for more details.
You should have received a copy of the GNU Library General Public
License along with this library; if not, write to the Free
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
Sam Lantinga
20
slouken@libsdl.org
21
*/
22
#include "SDL_config.h"
23
24
25
26
/* Allow access to a raw mixing buffer */
#include <sys/types.h>
27
#include <signal.h> /* For kill() */
28
29
#include "SDL_timer.h"
30
31
32
#include "SDL_audio.h"
#include "../SDL_audiomem.h"
#include "../SDL_audio_c.h"
33
34
#include "SDL_alsa_audio.h"
35
#ifdef SDL_AUDIO_DRIVER_ALSA_DYNAMIC
36
37
38
39
40
41
42
43
#include <dlfcn.h>
#include "SDL_name.h"
#include "SDL_loadso.h"
#else
#define SDL_NAME(X) X
#endif
44
45
46
/* The tag name used by ALSA audio */
#define DRIVER_NAME "alsa"
47
/* The default ALSA audio driver */
48
#define DEFAULT_DEVICE "default"
49
50
/* Audio driver functions */
51
52
53
54
55
static int ALSA_OpenAudio (_THIS, SDL_AudioSpec * spec);
static void ALSA_WaitAudio (_THIS);
static void ALSA_PlayAudio (_THIS);
static Uint8 *ALSA_GetAudioBuf (_THIS);
static void ALSA_CloseAudio (_THIS);
56
57
#ifdef SDL_AUDIO_DRIVER_ALSA_DYNAMIC
58
59
static const char *alsa_library = SDL_AUDIO_DRIVER_ALSA_DYNAMIC;
60
61
62
static void *alsa_handle = NULL;
static int alsa_loaded = 0;
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
static int (*SDL_snd_pcm_open) (snd_pcm_t ** pcm, const char *name,
snd_pcm_stream_t stream, int mode);
static int (*SDL_NAME (snd_pcm_open)) (snd_pcm_t ** pcm, const char *name,
snd_pcm_stream_t stream, int mode);
static int (*SDL_NAME (snd_pcm_close)) (snd_pcm_t * pcm);
static snd_pcm_sframes_t (*SDL_NAME (snd_pcm_writei)) (snd_pcm_t * pcm,
const void *buffer,
snd_pcm_uframes_t
size);
static int (*SDL_NAME (snd_pcm_resume)) (snd_pcm_t * pcm);
static int (*SDL_NAME (snd_pcm_prepare)) (snd_pcm_t * pcm);
static int (*SDL_NAME (snd_pcm_drain)) (snd_pcm_t * pcm);
static const char *(*SDL_NAME (snd_strerror)) (int errnum);
static size_t (*SDL_NAME (snd_pcm_hw_params_sizeof)) (void);
static size_t (*SDL_NAME (snd_pcm_sw_params_sizeof)) (void);
static int (*SDL_NAME (snd_pcm_hw_params_any)) (snd_pcm_t * pcm,
snd_pcm_hw_params_t * params);
static int (*SDL_NAME (snd_pcm_hw_params_set_access)) (snd_pcm_t * pcm,
snd_pcm_hw_params_t *
params,
snd_pcm_access_t
access);
static int (*SDL_NAME (snd_pcm_hw_params_set_format)) (snd_pcm_t * pcm,
snd_pcm_hw_params_t *
params,
snd_pcm_format_t val);
static int (*SDL_NAME (snd_pcm_hw_params_set_channels)) (snd_pcm_t * pcm,
snd_pcm_hw_params_t *
params,
unsigned int val);
static int (*SDL_NAME (snd_pcm_hw_params_get_channels)) (const
snd_pcm_hw_params_t *
params);
static unsigned int (*SDL_NAME (snd_pcm_hw_params_set_rate_near)) (snd_pcm_t *
pcm,
snd_pcm_hw_params_t
* params,
unsigned
int val,
int *dir);
static snd_pcm_uframes_t (*SDL_NAME (snd_pcm_hw_params_set_period_size_near))
(snd_pcm_t * pcm, snd_pcm_hw_params_t * params, snd_pcm_uframes_t val,
int *dir);
static
snd_pcm_sframes_t (*SDL_NAME (snd_pcm_hw_params_get_period_size)) (const
snd_pcm_hw_params_t
* params);
static unsigned
int (*SDL_NAME (snd_pcm_hw_params_set_periods_near)) (snd_pcm_t * pcm,
snd_pcm_hw_params_t
* params,
unsigned int val,
int *dir);
static int (*SDL_NAME (snd_pcm_hw_params_get_periods)) (snd_pcm_hw_params_t *
params);
static int (*SDL_NAME (snd_pcm_hw_params)) (snd_pcm_t * pcm,
snd_pcm_hw_params_t * params);
127
128
/*
*/
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
static int (*SDL_NAME (snd_pcm_sw_params_current)) (snd_pcm_t * pcm,
snd_pcm_sw_params_t *
swparams);
static int (*SDL_NAME (snd_pcm_sw_params_set_start_threshold)) (snd_pcm_t *
pcm,
snd_pcm_sw_params_t
* params,
snd_pcm_uframes_t
val);
static int (*SDL_NAME (snd_pcm_sw_params_set_avail_min)) (snd_pcm_t * pcm,
snd_pcm_sw_params_t
* params,
snd_pcm_uframes_t
val);
static int (*SDL_NAME (snd_pcm_sw_params)) (snd_pcm_t * pcm,
snd_pcm_sw_params_t * params);
static int (*SDL_NAME (snd_pcm_nonblock)) (snd_pcm_t * pcm, int nonblock);
146
#define snd_pcm_hw_params_sizeof SDL_NAME(snd_pcm_hw_params_sizeof)
147
#define snd_pcm_sw_params_sizeof SDL_NAME(snd_pcm_sw_params_sizeof)
148
149
/* cast funcs to char* first, to please GCC's strict aliasing rules. */
150
151
152
153
static struct
{
const char *name;
void **func;
154
} alsa_functions[] = {
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
{
"snd_pcm_open", (void **) (char *) &SDL_NAME (snd_pcm_open)}, {
"snd_pcm_close", (void **) (char *) &SDL_NAME (snd_pcm_close)}, {
"snd_pcm_writei", (void **) (char *) &SDL_NAME (snd_pcm_writei)}, {
"snd_pcm_resume", (void **) (char *) &SDL_NAME (snd_pcm_resume)}, {
"snd_pcm_prepare", (void **) (char *) &SDL_NAME (snd_pcm_prepare)}, {
"snd_pcm_drain", (void **) (char *) &SDL_NAME (snd_pcm_drain)}, {
"snd_strerror", (void **) (char *) &SDL_NAME (snd_strerror)}, {
"snd_pcm_hw_params_sizeof",
(void **) (char *) &SDL_NAME (snd_pcm_hw_params_sizeof)}, {
"snd_pcm_sw_params_sizeof",
(void **) (char *) &SDL_NAME (snd_pcm_sw_params_sizeof)}, {
"snd_pcm_hw_params_any",
(void **) (char *) &SDL_NAME (snd_pcm_hw_params_any)}, {
"snd_pcm_hw_params_set_access",
(void **) (char *) &SDL_NAME (snd_pcm_hw_params_set_access)}, {
"snd_pcm_hw_params_set_format",
(void **) (char *) &SDL_NAME (snd_pcm_hw_params_set_format)}, {
"snd_pcm_hw_params_set_channels",
(void **) (char *) &SDL_NAME (snd_pcm_hw_params_set_channels)}, {
"snd_pcm_hw_params_get_channels",
(void **) (char *) &SDL_NAME (snd_pcm_hw_params_get_channels)}, {
"snd_pcm_hw_params_set_rate_near",
(void **) (char *) &SDL_NAME (snd_pcm_hw_params_set_rate_near)}, {
"snd_pcm_hw_params_set_period_size_near", (void **) (char *)
&SDL_NAME (snd_pcm_hw_params_set_period_size_near)}, {
"snd_pcm_hw_params_get_period_size",
(void **) (char *) &SDL_NAME (snd_pcm_hw_params_get_period_size)},
{
"snd_pcm_hw_params_set_periods_near", (void **) (char *)
&SDL_NAME (snd_pcm_hw_params_set_periods_near)}, {
"snd_pcm_hw_params_get_periods",
(void **) (char *) &SDL_NAME (snd_pcm_hw_params_get_periods)}, {
"snd_pcm_hw_params", (void **) (char *) &SDL_NAME (snd_pcm_hw_params)}, {
"snd_pcm_sw_params_current",
(void **) (char *) &SDL_NAME (snd_pcm_sw_params_current)}, {
"snd_pcm_sw_params_set_start_threshold", (void **) (char *)
&SDL_NAME (snd_pcm_sw_params_set_start_threshold)}, {
"snd_pcm_sw_params_set_avail_min",
(void **) (char *) &SDL_NAME (snd_pcm_sw_params_set_avail_min)}, {
"snd_pcm_sw_params", (void **) (char *) &SDL_NAME (snd_pcm_sw_params)}, {
"snd_pcm_nonblock", (void **) (char *) &SDL_NAME (snd_pcm_nonblock)},};
static void
UnloadALSALibrary (void)
{
if (alsa_loaded) {
202
/* SDL_UnloadObject(alsa_handle);*/
203
204
205
206
dlclose (alsa_handle);
alsa_handle = NULL;
alsa_loaded = 0;
}
207
208
}
209
210
211
212
static int
LoadALSALibrary (void)
{
int i, retval = -1;
213
214
/* alsa_handle = SDL_LoadObject(alsa_library);*/
215
216
217
218
219
alsa_handle = dlopen (alsa_library, RTLD_NOW);
if (alsa_handle) {
alsa_loaded = 1;
retval = 0;
for (i = 0; i < SDL_arraysize (alsa_functions); i++) {
220
/* *alsa_functions[i].func = SDL_LoadFunction(alsa_handle,alsa_functions[i].name);*/
221
#if HAVE_DLVSYM
222
223
224
*alsa_functions[i].func =
dlvsym (alsa_handle, alsa_functions[i].name, "ALSA_0.9");
if (!*alsa_functions[i].func)
225
#endif
226
227
228
229
230
231
232
233
234
235
*alsa_functions[i].func =
dlsym (alsa_handle, alsa_functions[i].name);
if (!*alsa_functions[i].func) {
retval = -1;
UnloadALSALibrary ();
break;
}
}
}
return retval;
236
237
238
239
}
#else
240
241
242
243
static void
UnloadALSALibrary (void)
{
return;
244
245
}
246
247
248
249
static int
LoadALSALibrary (void)
{
return 0;
250
251
}
252
#endif /* SDL_AUDIO_DRIVER_ALSA_DYNAMIC */
253
254
255
static const char *
get_audio_device (int channels)
256
{
257
258
259
260
261
262
263
264
265
266
267
268
const char *device;
device = SDL_getenv ("AUDIODEV"); /* Is there a standard variable name? */
if (device == NULL) {
if (channels == 6)
device = "surround51";
else if (channels == 4)
device = "surround40";
else
device = DEFAULT_DEVICE;
}
return device;
269
270
271
272
}
/* Audio driver bootstrap functions */
273
274
static int
Audio_Available (void)
275
{
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
int available;
int status;
snd_pcm_t *handle;
available = 0;
if (LoadALSALibrary () < 0) {
return available;
}
status =
SDL_NAME (snd_pcm_open) (&handle, get_audio_device (2),
SND_PCM_STREAM_PLAYBACK, SND_PCM_NONBLOCK);
if (status >= 0) {
available = 1;
SDL_NAME (snd_pcm_close) (handle);
}
UnloadALSALibrary ();
return (available);
293
294
}
295
296
static void
Audio_DeleteDevice (SDL_AudioDevice * device)
297
{
298
299
300
SDL_free (device->hidden);
SDL_free (device);
UnloadALSALibrary ();
301
302
}
303
304
static SDL_AudioDevice *
Audio_CreateDevice (int devindex)
305
{
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
SDL_AudioDevice *this;
/* Initialize all variables that we clean on shutdown */
LoadALSALibrary ();
this = (SDL_AudioDevice *) SDL_malloc (sizeof (SDL_AudioDevice));
if (this) {
SDL_memset (this, 0, (sizeof *this));
this->hidden = (struct SDL_PrivateAudioData *)
SDL_malloc ((sizeof *this->hidden));
}
if ((this == NULL) || (this->hidden == NULL)) {
SDL_OutOfMemory ();
if (this) {
SDL_free (this);
}
return (0);
}
SDL_memset (this->hidden, 0, (sizeof *this->hidden));
/* Set the function pointers */
this->OpenAudio = ALSA_OpenAudio;
this->WaitAudio = ALSA_WaitAudio;
this->PlayAudio = ALSA_PlayAudio;
this->GetAudioBuf = ALSA_GetAudioBuf;
this->CloseAudio = ALSA_CloseAudio;
this->free = Audio_DeleteDevice;
return this;
335
336
337
}
AudioBootStrap ALSA_bootstrap = {
338
339
DRIVER_NAME, "ALSA 0.9 PCM audio",
Audio_Available, Audio_CreateDevice
340
341
342
};
/* This function waits until it is possible to write a full sound buffer */
343
344
static void
ALSA_WaitAudio (_THIS)
345
{
346
347
348
349
350
351
352
353
354
355
356
357
/* Check to see if the thread-parent process is still alive */
{
static int cnt = 0;
/* Note that this only works with thread implementations
that use a different process id for each thread.
*/
if (parent && (((++cnt) % 10) == 0)) { /* Check every 10 loops */
if (kill (parent, 0) < 0) {
this->enabled = 0;
}
}
}
358
359
}
360
361
static void
ALSA_PlayAudio (_THIS)
362
{
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
int status;
int sample_len;
signed short *sample_buf;
sample_len = this->spec.samples;
sample_buf = (signed short *) mixbuf;
while (sample_len > 0) {
status =
SDL_NAME (snd_pcm_writei) (pcm_handle, sample_buf, sample_len);
if (status < 0) {
if (status == -EAGAIN) {
SDL_Delay (1);
continue;
}
if (status == -ESTRPIPE) {
do {
SDL_Delay (1);
status = SDL_NAME (snd_pcm_resume) (pcm_handle);
}
while (status == -EAGAIN);
}
if (status < 0) {
status = SDL_NAME (snd_pcm_prepare) (pcm_handle);
}
if (status < 0) {
/* Hmm, not much we can do - abort */
this->enabled = 0;
return;
}
continue;
}
sample_buf += status * this->spec.channels;
sample_len -= status;
}
397
398
}
399
400
static Uint8 *
ALSA_GetAudioBuf (_THIS)
401
{
402
return (mixbuf);
403
404
}
405
406
static void
ALSA_CloseAudio (_THIS)
407
{
408
409
410
411
412
413
414
415
416
if (mixbuf != NULL) {
SDL_FreeAudioMem (mixbuf);
mixbuf = NULL;
}
if (pcm_handle) {
SDL_NAME (snd_pcm_drain) (pcm_handle);
SDL_NAME (snd_pcm_close) (pcm_handle);
pcm_handle = NULL;
}
417
418
}
419
420
static int
ALSA_OpenAudio (_THIS, SDL_AudioSpec * spec)
421
{
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
int status;
snd_pcm_hw_params_t *hwparams;
snd_pcm_sw_params_t *swparams;
snd_pcm_format_t format;
snd_pcm_uframes_t frames;
Uint16 test_format;
/* Open the audio device */
/* Name of device should depend on # channels in spec */
status =
SDL_NAME (snd_pcm_open) (&pcm_handle,
get_audio_device (spec->channels),
SND_PCM_STREAM_PLAYBACK, SND_PCM_NONBLOCK);
if (status < 0) {
SDL_SetError ("Couldn't open audio device: %s",
SDL_NAME (snd_strerror) (status));
return (-1);
}
/* Figure out what the hardware is capable of */
snd_pcm_hw_params_alloca (&hwparams);
status = SDL_NAME (snd_pcm_hw_params_any) (pcm_handle, hwparams);
if (status < 0) {
SDL_SetError ("Couldn't get hardware config: %s",
SDL_NAME (snd_strerror) (status));
ALSA_CloseAudio (this);
return (-1);
}
/* SDL only uses interleaved sample output */
status =
SDL_NAME (snd_pcm_hw_params_set_access) (pcm_handle, hwparams,
SND_PCM_ACCESS_RW_INTERLEAVED);
if (status < 0) {
SDL_SetError ("Couldn't set interleaved access: %s",
SDL_NAME (snd_strerror) (status));
ALSA_CloseAudio (this);
return (-1);
}
/* Try for a closest match on audio format */
status = -1;
for (test_format = SDL_FirstAudioFormat (spec->format);
test_format && (status < 0);) {
switch (test_format) {
case AUDIO_U8:
format = SND_PCM_FORMAT_U8;
break;
case AUDIO_S8:
format = SND_PCM_FORMAT_S8;
break;
case AUDIO_S16LSB:
format = SND_PCM_FORMAT_S16_LE;
break;
case AUDIO_S16MSB:
format = SND_PCM_FORMAT_S16_BE;
break;
case AUDIO_U16LSB:
format = SND_PCM_FORMAT_U16_LE;
break;
case AUDIO_U16MSB:
format = SND_PCM_FORMAT_U16_BE;
break;
default:
format = 0;
break;
}
if (format != 0) {
status =
SDL_NAME (snd_pcm_hw_params_set_format) (pcm_handle,
hwparams, format);
}
if (status < 0) {
test_format = SDL_NextAudioFormat ();
}
}
if (status < 0) {
SDL_SetError ("Couldn't find any hardware audio formats");
ALSA_CloseAudio (this);
return (-1);
}
spec->format = test_format;
/* Set the number of channels */
status =
SDL_NAME (snd_pcm_hw_params_set_channels) (pcm_handle, hwparams,
spec->channels);
if (status < 0) {
status = SDL_NAME (snd_pcm_hw_params_get_channels) (hwparams);
if ((status <= 0) || (status > 2)) {
SDL_SetError ("Couldn't set audio channels");
ALSA_CloseAudio (this);
return (-1);
}
spec->channels = status;
}
/* Set the audio rate */
status =
SDL_NAME (snd_pcm_hw_params_set_rate_near) (pcm_handle, hwparams,
spec->freq, NULL);
if (status < 0) {
SDL_SetError ("Couldn't set audio frequency: %s",
SDL_NAME (snd_strerror) (status));
ALSA_CloseAudio (this);
return (-1);
}
spec->freq = status;
/* Set the buffer size, in samples */
frames = spec->samples;
frames =
SDL_NAME (snd_pcm_hw_params_set_period_size_near) (pcm_handle,
hwparams, frames,
NULL);
spec->samples = frames;
SDL_NAME (snd_pcm_hw_params_set_periods_near) (pcm_handle, hwparams, 2,
NULL);
/* "set" the hardware with the desired parameters */
status = SDL_NAME (snd_pcm_hw_params) (pcm_handle, hwparams);
if (status < 0) {
SDL_SetError ("Couldn't set hardware audio parameters: %s",
SDL_NAME (snd_strerror) (status));
ALSA_CloseAudio (this);
return (-1);
}
550
551
/* This is useful for debugging... */
552
/*
553
{ snd_pcm_sframes_t bufsize; int fragments;
554
555
556
557
558
559
560
bufsize = SDL_NAME(snd_pcm_hw_params_get_period_size)(hwparams);
fragments = SDL_NAME(snd_pcm_hw_params_get_periods)(hwparams);
fprintf(stderr, "ALSA: bufsize = %ld, fragments = %d\n", bufsize, fragments);
}
*/
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
/* Set the software parameters */
snd_pcm_sw_params_alloca (&swparams);
status = SDL_NAME (snd_pcm_sw_params_current) (pcm_handle, swparams);
if (status < 0) {
SDL_SetError ("Couldn't get software config: %s",
SDL_NAME (snd_strerror) (status));
ALSA_CloseAudio (this);
return (-1);
}
status =
SDL_NAME (snd_pcm_sw_params_set_start_threshold) (pcm_handle,
swparams, 0);
if (status < 0) {
SDL_SetError ("Couldn't set start threshold: %s",
SDL_NAME (snd_strerror) (status));
ALSA_CloseAudio (this);
return (-1);
}
status =
SDL_NAME (snd_pcm_sw_params_set_avail_min) (pcm_handle, swparams,
frames);
if (status < 0) {
SDL_SetError ("Couldn't set avail min: %s",
SDL_NAME (snd_strerror) (status));
ALSA_CloseAudio (this);
return (-1);
}
status = SDL_NAME (snd_pcm_sw_params) (pcm_handle, swparams);
if (status < 0) {
SDL_SetError ("Couldn't set software audio parameters: %s",
SDL_NAME (snd_strerror) (status));
ALSA_CloseAudio (this);
return (-1);
}
/* Calculate the final parameters for this audio specification */
SDL_CalculateAudioSpec (spec);
/* Allocate mixing buffer */
mixlen = spec->size;
mixbuf = (Uint8 *) SDL_AllocAudioMem (mixlen);
if (mixbuf == NULL) {
ALSA_CloseAudio (this);
return (-1);
}
SDL_memset (mixbuf, spec->silence, spec->size);
/* Get the parent process id (we're the parent of the audio thread) */
parent = getpid ();
/* Switch to blocking mode for playback */
SDL_NAME (snd_pcm_nonblock) (pcm_handle, 0);
/* We're ready to rock and roll. :-) */
return (0);
616
}
617
618
/* vi: set ts=4 sw=4 expandtab: */