libao2/ao_openal.c

   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
  38 #include "audio_out.h"
  39 #include "audio_out_internal.h"
  40 #include "libaf/af_format.h"
  41 #include "osdep/timer.h"
  42 #include "subopt-helper.h"
  43
  44 static const ao_info_t info =
  45 {
  46   "OpenAL audio output",
  47   "openal",
  48   "Reimar Döffinger <Reimar.Doeffinger@stud.uni-karlsruhe.de>",
  49   ""
  50 };
  51
  52 LIBAO_EXTERN(openal)
  53
  54 #define MAX_CHANS 8
  55 #define NUM_BUF 128
  56 #define CHUNK_SIZE 512
  57 static ALuint buffers[MAX_CHANS][NUM_BUF];
  58 static ALuint sources[MAX_CHANS];
  59
  60 static int cur_buf[MAX_CHANS];
  61 static int unqueue_buf[MAX_CHANS];
  62 static int16_t *tmpbuf;
  63
  64
  65 static int control(int cmd, void *arg) {
  66   switch (cmd) {
  67     case AOCONTROL_GET_VOLUME:
  68     case AOCONTROL_SET_VOLUME: {
  69       ALfloat volume;
  70       ao_control_vol_t *vol = (ao_control_vol_t *)arg;
  71       if (cmd == AOCONTROL_SET_VOLUME) {
  72         volume = (vol->left + vol->right) / 200.0;
  73         alListenerf(AL_GAIN, volume);
  74       }
  75       alGetListenerf(AL_GAIN, &volume);
  76       vol->left = vol->right = volume * 100;
  77       return CONTROL_TRUE;
  78     }
  79   }
  80   return CONTROL_UNKNOWN;
  81 }
  82
  83 /**
  84  * \brief print suboption usage help
  85  */
  86 static void print_help(void) {
  87   mp_msg(MSGT_AO, MSGL_FATAL,
  88           "\n-ao openal commandline help:\n"
  89           "Example: mplayer -ao openal\n"
  90           "\nOptions:\n"
  91         );
  92 }
  93
  94 static int init(int rate, int channels, int format, int flags) {
  95   float position[3] = {0, 0, 0};
  96   float direction[6] = {0, 0, 1, 0, -1, 0};
  97   float sppos[MAX_CHANS][3] = {
  98     {-1, 0, 0.5}, {1, 0, 0.5},
  99     {-1, 0,  -1}, {1, 0,  -1},
 100     {0,  0,   1}, {0, 0, 0.1},
 101     {-1, 0,   0}, {1, 0,   0},
 102   };
 103   ALCdevice *dev = NULL;
 104   ALCcontext *ctx = NULL;
 105   ALCint freq = 0;
 106   ALCint attribs[] = {ALC_FREQUENCY, rate, 0, 0};
 107   int i;
 108   const opt_t subopts[] = {
 109     {NULL}
 110   };
 111   global_ao->no_persistent_volume = true;
 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
 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
 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  */
 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  */
 203 static void audio_pause(void) {
 204   alSourcePausev(ao_data.channels, sources);
 205 }
 206
 207 /**
 208  * \brief resume playing, after audio_pause()
 209  */
 210 static void audio_resume(void) {
 211   alSourcePlayv(ao_data.channels, sources);
 212 }
 213
 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  */
 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
 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 }