|
@@ -0,0 +1,339 @@
|
|
|
|
+/*
|
|
|
|
+ * Squeezelite - lightweight headless squeezebox emulator
|
|
|
|
+ *
|
|
|
|
+ * (c) Adrian Smith 2012-2015, triode1@btinternet.com
|
|
|
|
+ * Ralph Irving 2015-2017, ralph_irving@hotmail.com
|
|
|
|
+ *
|
|
|
|
+ * This program is free software: you can redistribute it and/or modify
|
|
|
|
+ * it under the terms of the GNU General Public License as published by
|
|
|
|
+ * the Free Software Foundation, either version 3 of the License, or
|
|
|
|
+ * (at your option) any later version.
|
|
|
|
+ *
|
|
|
|
+ * This program 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 General Public License for more details.
|
|
|
|
+ *
|
|
|
|
+ * You should have received a copy of the GNU General Public License
|
|
|
|
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
+ *
|
|
|
|
+ */
|
|
|
|
+
|
|
|
|
+#include "squeezelite.h"
|
|
|
|
+
|
|
|
|
+// automatically select between floating point (preferred) and fixed point libraries:
|
|
|
|
+// NOTE: works with Tremor version here: http://svn.xiph.org/trunk/Tremor, not vorbisidec.1.0.2 currently in ubuntu
|
|
|
|
+
|
|
|
|
+// we take common definations from <vorbis/vorbisfile.h> even though we can use tremor at run time
|
|
|
|
+// tremor's OggVorbis_File struct is normally smaller so this is ok, but padding added to malloc in case it is bigger
|
|
|
|
+#define OV_EXCLUDE_STATIC_CALLBACKS
|
|
|
|
+
|
|
|
|
+#include <vorbis/vorbisfile.h>
|
|
|
|
+
|
|
|
|
+struct vorbis {
|
|
|
|
+ OggVorbis_File *vf;
|
|
|
|
+ bool opened;
|
|
|
|
+#if !LINKALL
|
|
|
|
+ // vorbis symbols to be dynamically loaded - from either vorbisfile or vorbisidec (tremor) version of library
|
|
|
|
+ vorbis_info *(* ov_info)(OggVorbis_File *vf, int link);
|
|
|
|
+ int (* ov_clear)(OggVorbis_File *vf);
|
|
|
|
+ long (* ov_read)(OggVorbis_File *vf, char *buffer, int length, int bigendianp, int word, int sgned, int *bitstream);
|
|
|
|
+ long (* ov_read_tremor)(OggVorbis_File *vf, char *buffer, int length, int *bitstream);
|
|
|
|
+ int (* ov_open_callbacks)(void *datasource, OggVorbis_File *vf, const char *initial, long ibytes, ov_callbacks callbacks);
|
|
|
|
+#endif
|
|
|
|
+};
|
|
|
|
+
|
|
|
|
+static struct vorbis *v;
|
|
|
|
+
|
|
|
|
+extern log_level loglevel;
|
|
|
|
+
|
|
|
|
+extern struct buffer *streambuf;
|
|
|
|
+extern struct buffer *outputbuf;
|
|
|
|
+extern struct streamstate stream;
|
|
|
|
+extern struct outputstate output;
|
|
|
|
+extern struct decodestate decode;
|
|
|
|
+extern struct processstate process;
|
|
|
|
+
|
|
|
|
+#define LOCK_S mutex_lock(streambuf->mutex)
|
|
|
|
+#define UNLOCK_S mutex_unlock(streambuf->mutex)
|
|
|
|
+#define LOCK_O mutex_lock(outputbuf->mutex)
|
|
|
|
+#define UNLOCK_O mutex_unlock(outputbuf->mutex)
|
|
|
|
+#if PROCESS
|
|
|
|
+#define LOCK_O_direct if (decode.direct) mutex_lock(outputbuf->mutex)
|
|
|
|
+#define UNLOCK_O_direct if (decode.direct) mutex_unlock(outputbuf->mutex)
|
|
|
|
+#define LOCK_O_not_direct if (!decode.direct) mutex_lock(outputbuf->mutex)
|
|
|
|
+#define UNLOCK_O_not_direct if (!decode.direct) mutex_unlock(outputbuf->mutex)
|
|
|
|
+#define IF_DIRECT(x) if (decode.direct) { x }
|
|
|
|
+#define IF_PROCESS(x) if (!decode.direct) { x }
|
|
|
|
+#else
|
|
|
|
+#define LOCK_O_direct mutex_lock(outputbuf->mutex)
|
|
|
|
+#define UNLOCK_O_direct mutex_unlock(outputbuf->mutex)
|
|
|
|
+#define LOCK_O_not_direct
|
|
|
|
+#define UNLOCK_O_not_direct
|
|
|
|
+#define IF_DIRECT(x) { x }
|
|
|
|
+#define IF_PROCESS(x)
|
|
|
|
+#endif
|
|
|
|
+
|
|
|
|
+#if LINKALL
|
|
|
|
+#define OV(h, fn, ...) (ov_ ## fn)(__VA_ARGS__)
|
|
|
|
+#define TREMOR(h) 0
|
|
|
|
+#if !WIN
|
|
|
|
+extern int ov_read_tremor(); // needed to enable compilation, not linked
|
|
|
|
+#endif
|
|
|
|
+#else
|
|
|
|
+#define OV(h, fn, ...) (h)->ov_##fn(__VA_ARGS__)
|
|
|
|
+#define TREMOR(h) (h)->ov_read_tremor
|
|
|
|
+#endif
|
|
|
|
+
|
|
|
|
+// called with mutex locked within vorbis_decode to avoid locking O before S
|
|
|
|
+static size_t _read_cb(void *ptr, size_t size, size_t nmemb, void *datasource) {
|
|
|
|
+ size_t bytes;
|
|
|
|
+
|
|
|
|
+ bytes = min(_buf_used(streambuf), _buf_cont_read(streambuf));
|
|
|
|
+ bytes = min(bytes, size * nmemb);
|
|
|
|
+
|
|
|
|
+ memcpy(ptr, streambuf->readp, bytes);
|
|
|
|
+ _buf_inc_readp(streambuf, bytes);
|
|
|
|
+
|
|
|
|
+ return bytes / size;
|
|
|
|
+}
|
|
|
|
+
|
|
|
|
+// these are needed for older versions of tremor, later versions and libvorbis allow NULL to be used
|
|
|
|
+static int _seek_cb(void *datasource, ogg_int64_t offset, int whence) { return -1; }
|
|
|
|
+static int _close_cb(void *datasource) { return 0; }
|
|
|
|
+static long _tell_cb(void *datasource) { return 0; }
|
|
|
|
+
|
|
|
|
+static decode_state vorbis_decode(void) {
|
|
|
|
+ static int channels;
|
|
|
|
+ bool end;
|
|
|
|
+ frames_t frames;
|
|
|
|
+ int bytes, s, n;
|
|
|
|
+ u8_t *write_buf;
|
|
|
|
+
|
|
|
|
+ LOCK_S;
|
|
|
|
+ LOCK_O_direct;
|
|
|
|
+ end = (stream.state <= DISCONNECT);
|
|
|
|
+
|
|
|
|
+ IF_DIRECT(
|
|
|
|
+ frames = min(_buf_space(outputbuf), _buf_cont_write(outputbuf)) / BYTES_PER_FRAME;
|
|
|
|
+ );
|
|
|
|
+ IF_PROCESS(
|
|
|
|
+ frames = process.max_in_frames;
|
|
|
|
+ );
|
|
|
|
+
|
|
|
|
+ if (!frames && end) {
|
|
|
|
+ UNLOCK_O_direct;
|
|
|
|
+ UNLOCK_S;
|
|
|
|
+ return DECODE_COMPLETE;
|
|
|
|
+ }
|
|
|
|
+
|
|
|
|
+ if (decode.new_stream) {
|
|
|
|
+ ov_callbacks cbs;
|
|
|
|
+ int err;
|
|
|
|
+ struct vorbis_info *info;
|
|
|
|
+
|
|
|
|
+ cbs.read_func = _read_cb;
|
|
|
|
+
|
|
|
|
+ if (TREMOR(v)) {
|
|
|
|
+ cbs.seek_func = _seek_cb; cbs.close_func = _close_cb; cbs.tell_func = _tell_cb;
|
|
|
|
+ } else {
|
|
|
|
+ cbs.seek_func = NULL; cbs.close_func = NULL; cbs.tell_func = NULL;
|
|
|
|
+ }
|
|
|
|
+
|
|
|
|
+ if ((err = OV(v, open_callbacks, streambuf, v->vf, NULL, 0, cbs)) < 0) {
|
|
|
|
+ LOG_WARN("open_callbacks error: %d", err);
|
|
|
|
+ UNLOCK_O_direct;
|
|
|
|
+ UNLOCK_S;
|
|
|
|
+ return DECODE_COMPLETE;
|
|
|
|
+ }
|
|
|
|
+ v->opened = true;
|
|
|
|
+
|
|
|
|
+ info = OV(v, info, v->vf, -1);
|
|
|
|
+
|
|
|
|
+ LOG_INFO("setting track_start");
|
|
|
|
+ LOCK_O_not_direct;
|
|
|
|
+ output.next_sample_rate = decode_newstream(info->rate, output.supported_rates);
|
|
|
|
+ IF_DSD( output.next_fmt = PCM; )
|
|
|
|
+ output.track_start = outputbuf->writep;
|
|
|
|
+ if (output.fade_mode) _checkfade(true);
|
|
|
|
+ decode.new_stream = false;
|
|
|
|
+ UNLOCK_O_not_direct;
|
|
|
|
+
|
|
|
|
+ IF_PROCESS(
|
|
|
|
+ frames = process.max_in_frames;
|
|
|
|
+ );
|
|
|
|
+
|
|
|
|
+ channels = info->channels;
|
|
|
|
+
|
|
|
|
+ if (channels > 2) {
|
|
|
|
+ LOG_WARN("too many channels: %d", channels);
|
|
|
|
+ UNLOCK_O_direct;
|
|
|
|
+ UNLOCK_S;
|
|
|
|
+ return DECODE_ERROR;
|
|
|
|
+ }
|
|
|
|
+ }
|
|
|
|
+
|
|
|
|
+ bytes = frames * 2 * channels; // samples returned are 16 bits
|
|
|
|
+
|
|
|
|
+ IF_DIRECT(
|
|
|
|
+ write_buf = outputbuf->writep;
|
|
|
|
+ );
|
|
|
|
+ IF_PROCESS(
|
|
|
|
+ write_buf = process.inbuf;
|
|
|
|
+ );
|
|
|
|
+
|
|
|
|
+ // write the decoded frames into outputbuf even though they are 16 bits per sample, then unpack them
|
|
|
|
+#if 0
|
|
|
|
+ if (!TREMOR(v)) {
|
|
|
|
+#if SL_LITTLE_ENDIAN
|
|
|
|
+ n = OV(v, read, v->vf, (char *)write_buf, bytes, 0, 2, 1, &s);
|
|
|
|
+#else
|
|
|
|
+ n = OV(v, read, v->vf, (char *)write_buf, bytes, 1, 2, 1, &s);
|
|
|
|
+#endif
|
|
|
|
+#if !WIN
|
|
|
|
+ } else {
|
|
|
|
+ n = OV(v, read_tremor, v->vf, (char *)write_buf, bytes, &s);
|
|
|
|
+#endif
|
|
|
|
+ }
|
|
|
|
+#endif
|
|
|
|
+ n = OV(v, read, v->vf, (char *)write_buf, bytes, &s);
|
|
|
|
+
|
|
|
|
+ if (n > 0) {
|
|
|
|
+
|
|
|
|
+ frames_t count;
|
|
|
|
+ s16_t *iptr;
|
|
|
|
+ s32_t *optr;
|
|
|
|
+
|
|
|
|
+ frames = n / 2 / channels;
|
|
|
|
+ count = frames * channels;
|
|
|
|
+
|
|
|
|
+ // work backward to unpack samples to 4 bytes per sample
|
|
|
|
+ iptr = (s16_t *)write_buf + count;
|
|
|
|
+ optr = (s32_t *)write_buf + frames * 2;
|
|
|
|
+
|
|
|
|
+ if (channels == 2) {
|
|
|
|
+ while (count--) {
|
|
|
|
+ *--optr = *--iptr << 16;
|
|
|
|
+ }
|
|
|
|
+ } else if (channels == 1) {
|
|
|
|
+ while (count--) {
|
|
|
|
+ *--optr = *--iptr << 16;
|
|
|
|
+ *--optr = *iptr << 16;
|
|
|
|
+ }
|
|
|
|
+ }
|
|
|
|
+
|
|
|
|
+ IF_DIRECT(
|
|
|
|
+ _buf_inc_writep(outputbuf, frames * BYTES_PER_FRAME);
|
|
|
|
+ );
|
|
|
|
+ IF_PROCESS(
|
|
|
|
+ process.in_frames = frames;
|
|
|
|
+ );
|
|
|
|
+
|
|
|
|
+ LOG_SDEBUG("wrote %u frames", frames);
|
|
|
|
+
|
|
|
|
+ } else if (n == 0) {
|
|
|
|
+
|
|
|
|
+ LOG_INFO("end of stream");
|
|
|
|
+ UNLOCK_O_direct;
|
|
|
|
+ UNLOCK_S;
|
|
|
|
+ return DECODE_COMPLETE;
|
|
|
|
+
|
|
|
|
+ } else if (n == OV_HOLE) {
|
|
|
|
+
|
|
|
|
+ // recoverable hole in stream, seen when skipping
|
|
|
|
+ LOG_DEBUG("hole in stream");
|
|
|
|
+
|
|
|
|
+ } else {
|
|
|
|
+
|
|
|
|
+ LOG_INFO("ov_read error: %d", n);
|
|
|
|
+ UNLOCK_O_direct;
|
|
|
|
+ UNLOCK_S;
|
|
|
|
+ return DECODE_COMPLETE;
|
|
|
|
+ }
|
|
|
|
+
|
|
|
|
+ UNLOCK_O_direct;
|
|
|
|
+ UNLOCK_S;
|
|
|
|
+
|
|
|
|
+ return DECODE_RUNNING;
|
|
|
|
+}
|
|
|
|
+
|
|
|
|
+static void vorbis_open(u8_t size, u8_t rate, u8_t chan, u8_t endianness) {
|
|
|
|
+ if (!v->vf) {
|
|
|
|
+ v->vf = malloc(sizeof(OggVorbis_File) + 128); // add some padding as struct size may be larger
|
|
|
|
+ memset(v->vf, 0, sizeof(OggVorbis_File) + 128);
|
|
|
|
+ } else {
|
|
|
|
+ if (v->opened) {
|
|
|
|
+ OV(v, clear, v->vf);
|
|
|
|
+ v->opened = false;
|
|
|
|
+ }
|
|
|
|
+ }
|
|
|
|
+}
|
|
|
|
+
|
|
|
|
+static void vorbis_close(void) {
|
|
|
|
+ if (v->opened) {
|
|
|
|
+ OV(v, clear, v->vf);
|
|
|
|
+ v->opened = false;
|
|
|
|
+ }
|
|
|
|
+ free(v->vf);
|
|
|
|
+ v->vf = NULL;
|
|
|
|
+}
|
|
|
|
+
|
|
|
|
+static bool load_vorbis() {
|
|
|
|
+#if !LINKALL
|
|
|
|
+ void *handle = dlopen(LIBVORBIS, RTLD_NOW);
|
|
|
|
+ char *err;
|
|
|
|
+ bool tremor = false;
|
|
|
|
+
|
|
|
|
+ if (!handle) {
|
|
|
|
+ handle = dlopen(LIBTREMOR, RTLD_NOW);
|
|
|
|
+ if (handle) {
|
|
|
|
+ tremor = true;
|
|
|
|
+ } else {
|
|
|
|
+ LOG_INFO("dlerror: %s", dlerror());
|
|
|
|
+ return false;
|
|
|
|
+ }
|
|
|
|
+ }
|
|
|
|
+
|
|
|
|
+ v->ov_read = tremor ? NULL : dlsym(handle, "ov_read");
|
|
|
|
+ v->ov_read_tremor = tremor ? dlsym(handle, "ov_read") : NULL;
|
|
|
|
+ v->ov_info = dlsym(handle, "ov_info");
|
|
|
|
+ v->ov_clear = dlsym(handle, "ov_clear");
|
|
|
|
+ v->ov_open_callbacks = dlsym(handle, "ov_open_callbacks");
|
|
|
|
+
|
|
|
|
+ if ((err = dlerror()) != NULL) {
|
|
|
|
+ LOG_INFO("dlerror: %s", err);
|
|
|
|
+ return false;
|
|
|
|
+ }
|
|
|
|
+
|
|
|
|
+ LOG_INFO("loaded %s", tremor ? LIBTREMOR : LIBVORBIS);
|
|
|
|
+#endif
|
|
|
|
+
|
|
|
|
+ return true;
|
|
|
|
+}
|
|
|
|
+
|
|
|
|
+struct codec *register_vorbis(void) {
|
|
|
|
+ static struct codec ret = {
|
|
|
|
+ 'o', // id
|
|
|
|
+ "ogg", // types
|
|
|
|
+ 4096, // min read
|
|
|
|
+ 40960, // min space
|
|
|
|
+ vorbis_open, // open
|
|
|
|
+ vorbis_close, // close
|
|
|
|
+ vorbis_decode,// decode
|
|
|
|
+ };
|
|
|
|
+
|
|
|
|
+ v = malloc(sizeof(struct vorbis));
|
|
|
|
+ if (!v) {
|
|
|
|
+ return NULL;
|
|
|
|
+ }
|
|
|
|
+
|
|
|
|
+ v->vf = NULL;
|
|
|
|
+ v->opened = false;
|
|
|
|
+
|
|
|
|
+ if (!load_vorbis()) {
|
|
|
|
+ return NULL;
|
|
|
|
+ }
|
|
|
|
+
|
|
|
|
+ LOG_INFO("using vorbis to decode ogg");
|
|
|
|
+ return &ret;
|
|
|
|
+}
|