• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*
2     SDL - Simple DirectMedia Layer
3     Copyright (C) 1997-2004 Sam Lantinga
4 
5     This library is free software; you can redistribute it and/or
6     modify it under the terms of the GNU Library General Public
7     License as published by the Free Software Foundation; either
8     version 2 of the License, or (at your option) any later version.
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
13     Library General Public License for more details.
14 
15     You should have received a copy of the GNU Library General Public
16     License along with this library; if not, write to the Free
17     Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18 
19     Sam Lantinga
20     slouken@libsdl.org
21 */
22 #include "SDL_config.h"
23 
24 #include <errno.h>
25 #include <unistd.h>
26 #include <fcntl.h>
27 #include <signal.h>
28 #include <sys/types.h>
29 #include <sys/time.h>
30 #include <sched.h>
31 #include <sys/select.h>
32 #include <sys/neutrino.h>
33 #include <sys/asoundlib.h>
34 
35 #include "SDL_timer.h"
36 #include "SDL_audio.h"
37 #include "../SDL_audiomem.h"
38 #include "../SDL_audio_c.h"
39 #include "SDL_nto_audio.h"
40 
41 /* The tag name used by NTO audio */
42 #define DRIVER_NAME "qsa-nto"
43 
44 /* default channel communication parameters */
45 #define DEFAULT_CPARAMS_RATE 22050
46 #define DEFAULT_CPARAMS_VOICES 1
47 /* FIXME: need to add in the near future flexible logic with frag_size and frags count */
48 #define DEFAULT_CPARAMS_FRAG_SIZE 4096
49 #define DEFAULT_CPARAMS_FRAGS_MIN 1
50 #define DEFAULT_CPARAMS_FRAGS_MAX 1
51 
52 /* Open the audio device for playback, and don't block if busy */
53 #define OPEN_FLAGS SND_PCM_OPEN_PLAYBACK
54 
55 #define QSA_NO_WORKAROUNDS  0x00000000
56 #define QSA_MMAP_WORKAROUND 0x00000001
57 
58 struct BuggyCards
59 {
60    char* cardname;
61    unsigned long bugtype;
62 };
63 
64 #define QSA_WA_CARDS 3
65 
66 struct BuggyCards buggycards[QSA_WA_CARDS]=
67 {
68    {"Sound Blaster Live!", QSA_MMAP_WORKAROUND},
69    {"Vortex 8820",         QSA_MMAP_WORKAROUND},
70    {"Vortex 8830",         QSA_MMAP_WORKAROUND},
71 };
72 
73 /* Audio driver functions */
74 static void NTO_ThreadInit(_THIS);
75 static int NTO_OpenAudio(_THIS, SDL_AudioSpec* spec);
76 static void NTO_WaitAudio(_THIS);
77 static void NTO_PlayAudio(_THIS);
78 static Uint8* NTO_GetAudioBuf(_THIS);
79 static void NTO_CloseAudio(_THIS);
80 
81 /* card names check to apply the workarounds */
NTO_CheckBuggyCards(_THIS,unsigned long checkfor)82 static int NTO_CheckBuggyCards(_THIS, unsigned long checkfor)
83 {
84     char scardname[33];
85     int it;
86 
87     if (snd_card_get_name(cardno, scardname, 32)<0)
88     {
89         return 0;
90     }
91 
92     for (it=0; it<QSA_WA_CARDS; it++)
93     {
94        if (SDL_strcmp(buggycards[it].cardname, scardname)==0)
95        {
96           if (buggycards[it].bugtype==checkfor)
97           {
98               return 1;
99           }
100        }
101     }
102 
103     return 0;
104 }
105 
NTO_ThreadInit(_THIS)106 static void NTO_ThreadInit(_THIS)
107 {
108    int status;
109    struct sched_param param;
110 
111    /* increasing default 10 priority to 25 to avoid jerky sound */
112    status=SchedGet(0, 0, &param);
113    param.sched_priority=param.sched_curpriority+15;
114    status=SchedSet(0, 0, SCHED_NOCHANGE, &param);
115 }
116 
117 /* PCM transfer channel parameters initialize function */
NTO_InitAudioParams(snd_pcm_channel_params_t * cpars)118 static void NTO_InitAudioParams(snd_pcm_channel_params_t* cpars)
119 {
120     SDL_memset(cpars, 0, sizeof(snd_pcm_channel_params_t));
121 
122     cpars->channel = SND_PCM_CHANNEL_PLAYBACK;
123     cpars->mode = SND_PCM_MODE_BLOCK;
124     cpars->start_mode = SND_PCM_START_DATA;
125     cpars->stop_mode  = SND_PCM_STOP_STOP;
126     cpars->format.format = SND_PCM_SFMT_S16_LE;
127     cpars->format.interleave = 1;
128     cpars->format.rate = DEFAULT_CPARAMS_RATE;
129     cpars->format.voices = DEFAULT_CPARAMS_VOICES;
130     cpars->buf.block.frag_size = DEFAULT_CPARAMS_FRAG_SIZE;
131     cpars->buf.block.frags_min = DEFAULT_CPARAMS_FRAGS_MIN;
132     cpars->buf.block.frags_max = DEFAULT_CPARAMS_FRAGS_MAX;
133 }
134 
NTO_AudioAvailable(void)135 static int NTO_AudioAvailable(void)
136 {
137     /*  See if we can open a nonblocking channel.
138         Return value '1' means we can.
139         Return value '0' means we cannot. */
140 
141     int available;
142     int rval;
143     snd_pcm_t* handle;
144 
145     available = 0;
146     handle = NULL;
147 
148     rval = snd_pcm_open_preferred(&handle, NULL, NULL, OPEN_FLAGS);
149 
150     if (rval >= 0)
151     {
152         available = 1;
153 
154         if ((rval = snd_pcm_close(handle)) < 0)
155         {
156             SDL_SetError("NTO_AudioAvailable(): snd_pcm_close failed: %s\n", snd_strerror(rval));
157             available = 0;
158         }
159     }
160     else
161     {
162         SDL_SetError("NTO_AudioAvailable(): there are no available audio devices.\n");
163     }
164 
165     return (available);
166 }
167 
NTO_DeleteAudioDevice(SDL_AudioDevice * device)168 static void NTO_DeleteAudioDevice(SDL_AudioDevice *device)
169 {
170     if ((device)&&(device->hidden))
171     {
172         SDL_free(device->hidden);
173     }
174     if (device)
175     {
176         SDL_free(device);
177     }
178 }
179 
NTO_CreateAudioDevice(int devindex)180 static SDL_AudioDevice* NTO_CreateAudioDevice(int devindex)
181 {
182     SDL_AudioDevice *this;
183 
184     /* Initialize all variables that we clean on shutdown */
185     this = (SDL_AudioDevice *)SDL_malloc(sizeof(SDL_AudioDevice));
186     if (this)
187     {
188         SDL_memset(this, 0, sizeof(SDL_AudioDevice));
189         this->hidden = (struct SDL_PrivateAudioData *)SDL_malloc(sizeof(struct SDL_PrivateAudioData));
190     }
191     if ((this == NULL) || (this->hidden == NULL))
192     {
193         SDL_OutOfMemory();
194         if (this)
195         {
196             SDL_free(this);
197 	}
198         return (0);
199     }
200     SDL_memset(this->hidden, 0, sizeof(struct SDL_PrivateAudioData));
201     audio_handle = NULL;
202 
203     /* Set the function pointers */
204     this->ThreadInit = NTO_ThreadInit;
205     this->OpenAudio = NTO_OpenAudio;
206     this->WaitAudio = NTO_WaitAudio;
207     this->PlayAudio = NTO_PlayAudio;
208     this->GetAudioBuf = NTO_GetAudioBuf;
209     this->CloseAudio = NTO_CloseAudio;
210 
211     this->free = NTO_DeleteAudioDevice;
212 
213     return this;
214 }
215 
216 AudioBootStrap QNXNTOAUDIO_bootstrap =
217 {
218     DRIVER_NAME, "QNX6 QSA-NTO Audio",
219     NTO_AudioAvailable,
220     NTO_CreateAudioDevice
221 };
222 
223 /* This function waits until it is possible to write a full sound buffer */
NTO_WaitAudio(_THIS)224 static void NTO_WaitAudio(_THIS)
225 {
226     fd_set wfds;
227     int selectret;
228 
229     FD_ZERO(&wfds);
230     FD_SET(audio_fd, &wfds);
231 
232     do {
233         selectret=select(audio_fd + 1, NULL, &wfds, NULL, NULL);
234         switch (selectret)
235         {
236             case -1:
237             case  0: SDL_SetError("NTO_WaitAudio(): select() failed: %s\n", strerror(errno));
238                      return;
239             default: if (FD_ISSET(audio_fd, &wfds))
240                      {
241                          return;
242                      }
243                      break;
244         }
245     } while(1);
246 }
247 
NTO_PlayAudio(_THIS)248 static void NTO_PlayAudio(_THIS)
249 {
250     int written, rval;
251     int towrite;
252     void* pcmbuffer;
253 
254     if (!this->enabled)
255     {
256         return;
257     }
258 
259     towrite = this->spec.size;
260     pcmbuffer = pcm_buf;
261 
262     /* Write the audio data, checking for EAGAIN (buffer full) and underrun */
263     do {
264         written = snd_pcm_plugin_write(audio_handle, pcm_buf, towrite);
265         if (written != towrite)
266         {
267             if ((errno == EAGAIN) || (errno == EWOULDBLOCK))
268             {
269                 /* Let a little CPU time go by and try to write again */
270                 SDL_Delay(1);
271                 /* if we wrote some data */
272                 towrite -= written;
273                 pcmbuffer += written * this->spec.channels;
274                 continue;
275             }
276             else
277             {
278                 if ((errno == EINVAL) || (errno == EIO))
279                 {
280                     SDL_memset(&cstatus, 0, sizeof(cstatus));
281                     cstatus.channel = SND_PCM_CHANNEL_PLAYBACK;
282                     if ((rval = snd_pcm_plugin_status(audio_handle, &cstatus)) < 0)
283                     {
284                         SDL_SetError("NTO_PlayAudio(): snd_pcm_plugin_status failed: %s\n", snd_strerror(rval));
285                         return;
286                     }
287                     if ((cstatus.status == SND_PCM_STATUS_UNDERRUN) || (cstatus.status == SND_PCM_STATUS_READY))
288                     {
289                         if ((rval = snd_pcm_plugin_prepare(audio_handle, SND_PCM_CHANNEL_PLAYBACK)) < 0)
290                         {
291                             SDL_SetError("NTO_PlayAudio(): snd_pcm_plugin_prepare failed: %s\n", snd_strerror(rval));
292                             return;
293                         }
294                     }
295                     continue;
296                 }
297                 else
298                 {
299                     return;
300                 }
301             }
302         }
303         else
304         {
305             /* we wrote all remaining data */
306             towrite -= written;
307             pcmbuffer += written * this->spec.channels;
308         }
309     } while ((towrite > 0)  && (this->enabled));
310 
311     /* If we couldn't write, assume fatal error for now */
312     if (towrite != 0)
313     {
314         this->enabled = 0;
315     }
316 
317     return;
318 }
319 
NTO_GetAudioBuf(_THIS)320 static Uint8* NTO_GetAudioBuf(_THIS)
321 {
322     return pcm_buf;
323 }
324 
NTO_CloseAudio(_THIS)325 static void NTO_CloseAudio(_THIS)
326 {
327     int rval;
328 
329     this->enabled = 0;
330 
331     if (audio_handle != NULL)
332     {
333         if ((rval = snd_pcm_plugin_flush(audio_handle, SND_PCM_CHANNEL_PLAYBACK)) < 0)
334         {
335             SDL_SetError("NTO_CloseAudio(): snd_pcm_plugin_flush failed: %s\n", snd_strerror(rval));
336             return;
337         }
338         if ((rval = snd_pcm_close(audio_handle)) < 0)
339         {
340             SDL_SetError("NTO_CloseAudio(): snd_pcm_close failed: %s\n",snd_strerror(rval));
341             return;
342         }
343         audio_handle = NULL;
344     }
345 }
346 
NTO_OpenAudio(_THIS,SDL_AudioSpec * spec)347 static int NTO_OpenAudio(_THIS, SDL_AudioSpec* spec)
348 {
349     int rval;
350     int format;
351     Uint16 test_format;
352     int found;
353 
354     audio_handle = NULL;
355     this->enabled = 0;
356 
357     if (pcm_buf != NULL)
358     {
359         SDL_FreeAudioMem(pcm_buf);
360         pcm_buf = NULL;
361     }
362 
363     /* initialize channel transfer parameters to default */
364     NTO_InitAudioParams(&cparams);
365 
366     /* Open the audio device */
367     rval = snd_pcm_open_preferred(&audio_handle, &cardno, &deviceno, OPEN_FLAGS);
368     if (rval < 0)
369     {
370         SDL_SetError("NTO_OpenAudio(): snd_pcm_open failed: %s\n", snd_strerror(rval));
371         return (-1);
372     }
373 
374     if (!NTO_CheckBuggyCards(this, QSA_MMAP_WORKAROUND))
375     {
376         /* enable count status parameter */
377         if ((rval = snd_pcm_plugin_set_disable(audio_handle, PLUGIN_DISABLE_MMAP)) < 0)
378         {
379             SDL_SetError("snd_pcm_plugin_set_disable failed: %s\n", snd_strerror(rval));
380             return (-1);
381         }
382     }
383 
384     /* Try for a closest match on audio format */
385     format = 0;
386     /* can't use format as SND_PCM_SFMT_U8 = 0 in nto */
387     found = 0;
388 
389     for (test_format=SDL_FirstAudioFormat(spec->format); !found ;)
390     {
391         /* if match found set format to equivalent ALSA format */
392         switch (test_format)
393         {
394             case AUDIO_U8:
395                            format = SND_PCM_SFMT_U8;
396                            found = 1;
397                            break;
398             case AUDIO_S8:
399                            format = SND_PCM_SFMT_S8;
400                            found = 1;
401                            break;
402             case AUDIO_S16LSB:
403                            format = SND_PCM_SFMT_S16_LE;
404                            found = 1;
405                            break;
406             case AUDIO_S16MSB:
407                            format = SND_PCM_SFMT_S16_BE;
408                            found = 1;
409                            break;
410             case AUDIO_U16LSB:
411                            format = SND_PCM_SFMT_U16_LE;
412                            found = 1;
413                            break;
414             case AUDIO_U16MSB:
415                            format = SND_PCM_SFMT_U16_BE;
416                            found = 1;
417                            break;
418             default:
419                            break;
420         }
421 
422         if (!found)
423         {
424             test_format = SDL_NextAudioFormat();
425         }
426     }
427 
428     /* assumes test_format not 0 on success */
429     if (test_format == 0)
430     {
431         SDL_SetError("NTO_OpenAudio(): Couldn't find any hardware audio formats");
432         return (-1);
433     }
434 
435     spec->format = test_format;
436 
437     /* Set the audio format */
438     cparams.format.format = format;
439 
440     /* Set mono or stereo audio (currently only two channels supported) */
441     cparams.format.voices = spec->channels;
442 
443     /* Set rate */
444     cparams.format.rate = spec->freq;
445 
446     /* Setup the transfer parameters according to cparams */
447     rval = snd_pcm_plugin_params(audio_handle, &cparams);
448     if (rval < 0)
449     {
450         SDL_SetError("NTO_OpenAudio(): snd_pcm_channel_params failed: %s\n", snd_strerror(rval));
451         return (-1);
452     }
453 
454     /* Make sure channel is setup right one last time */
455     SDL_memset(&csetup, 0x00, sizeof(csetup));
456     csetup.channel = SND_PCM_CHANNEL_PLAYBACK;
457     if (snd_pcm_plugin_setup(audio_handle, &csetup) < 0)
458     {
459         SDL_SetError("NTO_OpenAudio(): Unable to setup playback channel\n");
460         return -1;
461     }
462 
463 
464     /* Calculate the final parameters for this audio specification */
465     SDL_CalculateAudioSpec(spec);
466 
467     pcm_len = spec->size;
468 
469     if (pcm_len==0)
470     {
471         pcm_len = csetup.buf.block.frag_size * spec->channels * (snd_pcm_format_width(format)/8);
472     }
473 
474     /* Allocate memory to the audio buffer and initialize with silence (Note that
475        buffer size must be a multiple of fragment size, so find closest multiple)
476     */
477     pcm_buf = (Uint8*)SDL_AllocAudioMem(pcm_len);
478     if (pcm_buf == NULL)
479     {
480         SDL_SetError("NTO_OpenAudio(): pcm buffer allocation failed\n");
481         return (-1);
482     }
483     SDL_memset(pcm_buf, spec->silence, pcm_len);
484 
485     /* get the file descriptor */
486     if ((audio_fd = snd_pcm_file_descriptor(audio_handle, SND_PCM_CHANNEL_PLAYBACK)) < 0)
487     {
488         SDL_SetError("NTO_OpenAudio(): snd_pcm_file_descriptor failed with error code: %s\n", snd_strerror(rval));
489         return (-1);
490     }
491 
492     /* Trigger audio playback */
493     rval = snd_pcm_plugin_prepare(audio_handle, SND_PCM_CHANNEL_PLAYBACK);
494     if (rval < 0)
495     {
496         SDL_SetError("snd_pcm_plugin_prepare failed: %s\n", snd_strerror(rval));
497         return (-1);
498     }
499 
500     this->enabled = 1;
501 
502     /* Get the parent process id (we're the parent of the audio thread) */
503     parent = getpid();
504 
505     /* We're really ready to rock and roll. :-) */
506     return (0);
507 }
508