/* vorbis.c Ogg Vorbis support Copyright (C) 2001 Bill Currie Author: Bill Currie Date: 2002/6/14 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 2 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, write to: Free Software Foundation, Inc. 59 Temple Place - Suite 330 Boston, MA 02111-1307, USA */ #ifdef HAVE_CONFIG_H # include "config.h" #endif static __attribute__ ((used)) const char rcsid[] = "$Id$"; #ifdef HAVE_VORBIS #ifdef HAVE_STRING_H # include "string.h" #endif #ifdef HAVE_STRINGS_H # include "strings.h" #endif #include #include #include "QF/cvar.h" #include "QF/quakefs.h" #include "QF/sound.h" #include "QF/sys.h" #include "snd_render.h" static size_t read_func (void *ptr, size_t size, size_t nmemb, void *datasource) { return Qread (datasource, ptr, size * nmemb); } static int seek_func (void *datasource, ogg_int64_t offset, int whence) { return Qseek (datasource, offset, whence); } static int close_func (void *datasource) { Qclose (datasource); return 0; } static long tell_func (void *datasource) { return Qtell (datasource); } static ov_callbacks callbacks = { read_func, seek_func, close_func, tell_func, }; static wavinfo_t get_info (OggVorbis_File *vf) { vorbis_info *vi; int sample_start = -1, sample_count = 0; int samples; char **ptr; wavinfo_t info; vi = ov_info (vf, -1); samples = ov_pcm_total (vf, -1); for (ptr = ov_comment (vf, -1)->user_comments; *ptr; ptr++) { Sys_DPrintf ("%s\n", *ptr); if (strncmp ("CUEPOINT=", *ptr, 9) == 0) { sscanf (*ptr + 9, "%d %d", &sample_start, &sample_count); } } if (sample_start != -1) samples = sample_start + sample_count; info.rate = vi->rate; info.width = 2; info.channels = vi->channels; info.loopstart = sample_start; info.samples = samples; info.dataofs = 0; info.datalen = samples * 2; if (developer->int_val) { Sys_Printf ("\nBitstream is %d channel, %dHz\n", info.channels, info.rate); Sys_Printf ("\nDecoded length: %d samples (%d bytes)\n", info.samples, info.samples * info.channels * 2); Sys_Printf ("Encoded by: %s\n\n", ov_comment (vf, -1)->vendor); } return info; } static int vorbis_read (OggVorbis_File *vf, byte *buf, int len) { int count = 0; int current_section; while (len) { int res = ov_read (vf, (char *) buf, len, 0, 2, 1, ¤t_section); if (res > 0) { count += res; len -= res; buf += res; } else if (res < 0) { Sys_Printf ("vorbis error %d\n", res); return -1; } else { Sys_Printf ("unexpected eof\n"); break; } } return count; } static sfxbuffer_t * vorbis_load (OggVorbis_File *vf, sfxblock_t *block, cache_allocator_t allocator) { byte *data; sfxbuffer_t *sc = 0; sfx_t *sfx = block->sfx; void (*resample)(sfxbuffer_t *, byte *, int); wavinfo_t *info = &block->wavinfo; switch (info->channels) { case 1: resample = SND_ResampleMono; break; case 2: resample = SND_ResampleStereo; break; default: Sys_Printf ("%s: unsupported channel count: %d\n", sfx->name, info->channels); return 0; } data = malloc (info->datalen); if (!data) goto bail; sc = SND_GetCache (info->samples, info->rate, info->width, info->channels, block, allocator); if (!sc) goto bail; sc->sfx = sfx; if (vorbis_read (vf, data, info->datalen) < 0) goto bail; SND_SetPaint (sc); resample (sc, data, info->samples); sc->head = sc->length; bail: if (data) free (data); ov_clear (vf); return sc; } static void vorbis_callback_load (void *object, cache_allocator_t allocator) { QFile *file; OggVorbis_File vf; sfxblock_t *block = (sfxblock_t *) object; QFS_FOpenFile (block->file, &file); if (!file) return; //FIXME Sys_Error? if (ov_open_callbacks (file, &vf, 0, 0, callbacks) < 0) { Sys_Printf ("Input does not appear to be an Ogg bitstream.\n"); Qclose (file); return; //FIXME Sys_Error? } vorbis_load (&vf, block, allocator); } static void vorbis_cache (sfx_t *sfx, char *realname, OggVorbis_File *vf, wavinfo_t info) { ov_clear (vf); SND_SFX_Cache (sfx, realname, info, vorbis_callback_load); } static int vorbis_stream_read (void *file, byte *buf, int count, wavinfo_t *info) { return vorbis_read (file, buf, count); } static int vorbis_stream_seek (void *file, int pos, wavinfo_t *info) { return ov_pcm_seek (file, pos); } static void vorbis_stream_close (sfx_t *sfx) { sfxstream_t *stream = sfx->data.stream; ov_clear (stream->file); free (stream); free (sfx); } static sfx_t * vorbis_stream_open (sfx_t *sfx) { sfxstream_t *stream = sfx->data.stream; QFile *file; void *f; QFS_FOpenFile (stream->file, &file); if (!file) return 0; f = malloc (sizeof (OggVorbis_File)); if (ov_open_callbacks (file, f, 0, 0, callbacks) < 0) { Sys_Printf ("Input does not appear to be an Ogg bitstream.\n"); Qclose (file); free (f); return 0; } return SND_SFX_StreamOpen (sfx, f, vorbis_stream_read, vorbis_stream_seek, vorbis_stream_close); } static void vorbis_stream (sfx_t *sfx, char *realname, OggVorbis_File *vf, wavinfo_t info) { ov_clear (vf); SND_SFX_Stream (sfx, realname, info, vorbis_stream_open); } void SND_LoadOgg (QFile *file, sfx_t *sfx, char *realname) { OggVorbis_File vf; wavinfo_t info; if (ov_open_callbacks (file, &vf, 0, 0, callbacks) < 0) { Sys_Printf ("Input does not appear to be an Ogg bitstream.\n"); Qclose (file); free (realname); return; } info = get_info (&vf); if (info.channels < 1 || info.channels > 2) { Sys_Printf ("unsupported number of channels"); return; } if (info.samples / info.rate < 3) { Sys_DPrintf ("cache %s\n", realname); vorbis_cache (sfx, realname, &vf, info); } else { Sys_DPrintf ("stream %s\n", realname); vorbis_stream (sfx, realname, &vf, info); } } #endif//HAVE_VORBIS