1 /*
2  * OpenAL audio output driver for MPlayer
3  *
4  * Copyleft 2006 by Reimar Döffinger (Reimar.Doeffinger@stud.uni-karlsruhe.de)
5  *
6  * This file is part of MPlayer.
7  *
8  * MPlayer is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2 of the License, or
11  * (at your option) any later version.
12  *
13  * MPlayer is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License along
19  * along with MPlayer; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22 
23 #include "config.h"
24 
25 #include <stdlib.h>
26 #include <stdio.h>
27 #include <inttypes.h>
28 #ifdef OPENAL_AL_H
29 #include <OpenAL/alc.h>
30 #include <OpenAL/al.h>
31 #else
32 #include <AL/alc.h>
33 #include <AL/al.h>
34 #endif
35 
36 #include "mp_msg.h"
37 #include "help_mp.h"
38 
39 #include "audio_out.h"
40 #include "audio_out_internal.h"
41 #include "libaf/af_format.h"
42 #include "osdep/timer.h"
43 #include "subopt-helper.h"
44 
45 static const ao_info_t info =
46 {
47   "OpenAL audio output",
48   "openal",
49   "Reimar Döffinger <Reimar.Doeffinger@stud.uni-karlsruhe.de>",
50   ""
51 };
52 
53 LIBAO_EXTERN(openal)
54 
55 #define MAX_CHANS 8
56 #define NUM_BUF 128
57 #define CHUNK_SIZE 512
58 static ALuint buffers[MAX_CHANS][NUM_BUF];
59 static ALuint sources[MAX_CHANS];
60 
61 static int cur_buf[MAX_CHANS];
62 static int unqueue_buf[MAX_CHANS];
63 static int16_t *tmpbuf;
64 
65 
control(int cmd,void * arg)66 static int control(int cmd, void *arg) {
67   switch (cmd) {
68     case AOCONTROL_GET_VOLUME:
69     case AOCONTROL_SET_VOLUME: {
70       ALfloat volume;
71       ao_control_vol_t *vol = (ao_control_vol_t *)arg;
72       if (cmd == AOCONTROL_SET_VOLUME) {
73         volume = (vol->left + vol->right) / 200.0;
74         alListenerf(AL_GAIN, volume);
75       }
76       alGetListenerf(AL_GAIN, &volume);
77       vol->left = vol->right = volume * 100;
78       return CONTROL_TRUE;
79     }
80   }
81   return CONTROL_UNKNOWN;
82 }
83 
84 /**
85  * \brief print suboption usage help
86  */
print_help(void)87 static void print_help(void) {
88   mp_msg(MSGT_AO, MSGL_FATAL,
89           "\n-ao openal commandline help:\n"
90           "Example: mplayer -ao openal\n"
91           "\nOptions:\n"
92         );
93 }
94 
init(int rate,int channels,int format,int flags)95 static int init(int rate, int channels, int format, int flags) {
96   float position[3] = {0, 0, 0};
97   float direction[6] = {0, 0, 1, 0, -1, 0};
98   float sppos[MAX_CHANS][3] = {
99     {-1, 0, 0.5}, {1, 0, 0.5},
100     {-1, 0,  -1}, {1, 0,  -1},
101     {0,  0,   1}, {0, 0, 0.1},
102     {-1, 0,   0}, {1, 0,   0},
103   };
104   ALCdevice *dev = NULL;
105   ALCcontext *ctx = NULL;
106   ALCint freq = 0;
107   ALCint attribs[] = {ALC_FREQUENCY, rate, 0, 0};
108   int i;
109   const opt_t subopts[] = {
110     {NULL}
111   };
112   if (subopt_parse(ao_subdevice, subopts) != 0) {
113     print_help();
114     return 0;
115   }
116   if (channels > MAX_CHANS) {
117     mp_msg(MSGT_AO, MSGL_FATAL, "[OpenAL] Invalid number of channels: %i\n", channels);
118     goto err_out;
119   }
120   dev = alcOpenDevice(NULL);
121   if (!dev) {
122     mp_msg(MSGT_AO, MSGL_FATAL, "[OpenAL] could not open device\n");
123     goto err_out;
124   }
125   ctx = alcCreateContext(dev, attribs);
126   alcMakeContextCurrent(ctx);
127   alListenerfv(AL_POSITION, position);
128   alListenerfv(AL_ORIENTATION, direction);
129   alGenSources(channels, sources);
130   for (i = 0; i < channels; i++) {
131     cur_buf[i] = 0;
132     unqueue_buf[i] = 0;
133     alGenBuffers(NUM_BUF, buffers[i]);
134     alSourcefv(sources[i], AL_POSITION, sppos[i]);
135     alSource3f(sources[i], AL_VELOCITY, 0, 0, 0);
136   }
137   if (channels == 1)
138     alSource3f(sources[0], AL_POSITION, 0, 0, 1);
139   ao_data.channels = channels;
140   alcGetIntegerv(dev, ALC_FREQUENCY, 1, &freq);
141   if (alcGetError(dev) == ALC_NO_ERROR && freq)
142     rate = freq;
143   ao_data.samplerate = rate;
144   ao_data.format = AF_FORMAT_S16_NE;
145   ao_data.bps = channels * rate * 2;
146   ao_data.buffersize = CHUNK_SIZE * NUM_BUF;
147   ao_data.outburst = channels * CHUNK_SIZE;
148   tmpbuf = malloc(CHUNK_SIZE);
149   return 1;
150 
151 err_out:
152   return 0;
153 }
154 
155 // close audio device
uninit(int immed)156 static void uninit(int immed) {
157   ALCcontext *ctx = alcGetCurrentContext();
158   ALCdevice *dev = alcGetContextsDevice(ctx);
159   free(tmpbuf);
160   if (!immed) {
161     ALint state;
162     alGetSourcei(sources[0], AL_SOURCE_STATE, &state);
163     while (state == AL_PLAYING) {
164       usec_sleep(10000);
165       alGetSourcei(sources[0], AL_SOURCE_STATE, &state);
166     }
167   }
168   reset();
169   alcMakeContextCurrent(NULL);
170   alcDestroyContext(ctx);
171   alcCloseDevice(dev);
172 }
173 
unqueue_buffers(void)174 static void unqueue_buffers(void) {
175   ALint p;
176   int s;
177   for (s = 0;  s < ao_data.channels; s++) {
178     int till_wrap = NUM_BUF - unqueue_buf[s];
179     alGetSourcei(sources[s], AL_BUFFERS_PROCESSED, &p);
180     if (p >= till_wrap) {
181       alSourceUnqueueBuffers(sources[s], till_wrap, &buffers[s][unqueue_buf[s]]);
182       unqueue_buf[s] = 0;
183       p -= till_wrap;
184     }
185     if (p) {
186       alSourceUnqueueBuffers(sources[s], p, &buffers[s][unqueue_buf[s]]);
187       unqueue_buf[s] += p;
188     }
189   }
190 }
191 
192 /**
193  * \brief stop playing and empty buffers (for seeking/pause)
194  */
reset(void)195 static void reset(void) {
196   alSourceStopv(ao_data.channels, sources);
197   unqueue_buffers();
198 }
199 
200 /**
201  * \brief stop playing, keep buffers (for pause)
202  */
audio_pause(void)203 static void audio_pause(void) {
204   alSourcePausev(ao_data.channels, sources);
205 }
206 
207 /**
208  * \brief resume playing, after audio_pause()
209  */
audio_resume(void)210 static void audio_resume(void) {
211   alSourcePlayv(ao_data.channels, sources);
212 }
213 
get_space(void)214 static int get_space(void) {
215   ALint queued;
216   unqueue_buffers();
217   alGetSourcei(sources[0], AL_BUFFERS_QUEUED, &queued);
218   queued = NUM_BUF - queued - 3;
219   if (queued < 0) return 0;
220   return queued * CHUNK_SIZE * ao_data.channels;
221 }
222 
223 /**
224  * \brief write data into buffer and reset underrun flag
225  */
play(void * data,int len,int flags)226 static int play(void *data, int len, int flags) {
227   ALint state;
228   int i, j, k;
229   int ch;
230   int16_t *d = data;
231   len /= ao_data.channels * CHUNK_SIZE;
232   for (i = 0; i < len; i++) {
233     for (ch = 0; ch < ao_data.channels; ch++) {
234       for (j = 0, k = ch; j < CHUNK_SIZE / 2; j++, k += ao_data.channels)
235         tmpbuf[j] = d[k];
236       alBufferData(buffers[ch][cur_buf[ch]], AL_FORMAT_MONO16, tmpbuf,
237                      CHUNK_SIZE, ao_data.samplerate);
238       alSourceQueueBuffers(sources[ch], 1, &buffers[ch][cur_buf[ch]]);
239       cur_buf[ch] = (cur_buf[ch] + 1) % NUM_BUF;
240     }
241     d += ao_data.channels * CHUNK_SIZE / 2;
242   }
243   alGetSourcei(sources[0], AL_SOURCE_STATE, &state);
244   if (state != AL_PLAYING) // checked here in case of an underrun
245     alSourcePlayv(ao_data.channels, sources);
246   return len * ao_data.channels * CHUNK_SIZE;
247 }
248 
get_delay(void)249 static float get_delay(void) {
250   ALint queued;
251   unqueue_buffers();
252   alGetSourcei(sources[0], AL_BUFFERS_QUEUED, &queued);
253   return queued * CHUNK_SIZE / 2 / (float)ao_data.samplerate;
254 }
255