2 Copyright (C) 2003-2005 Mathieu Olivier
4 This program is free software; you can redistribute it and/or
5 modify it under the terms of the GNU General Public License
6 as published by the Free Software Foundation; either version 2
7 of the License, or (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13 See the GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to:
18 Free Software Foundation, Inc.
19 59 Temple Place - Suite 330
20 Boston, MA 02111-1307, USA
32 =================================================================
34 Minimal set of definitions from the Ogg Vorbis lib
35 (C) COPYRIGHT 1994-2001 by the XIPHOPHORUS Company
38 WARNING: for a matter of simplicity, several pointer types are
39 casted to "void*", and most enumerated values are not included
41 =================================================================
45 typedef __int64 ogg_int64_t;
47 typedef long long ogg_int64_t;
52 size_t (*read_func) (void *ptr, size_t size, size_t nmemb, void *datasource);
53 int (*seek_func) (void *datasource, ogg_int64_t offset, int whence);
54 int (*close_func) (void *datasource);
55 long (*tell_func) (void *datasource);
83 unsigned char *body_data;
88 ogg_int64_t *granule_vals;
93 unsigned char header[282];
100 ogg_int64_t granulepos;
118 ogg_int64_t granulepos;
119 ogg_int64_t sequence;
120 ogg_int64_t glue_bits;
121 ogg_int64_t time_bits;
122 ogg_int64_t floor_bits;
123 ogg_int64_t res_bits;
131 unsigned char *buffer;
146 ogg_int64_t granulepos;
147 ogg_int64_t sequence;
148 vorbis_dsp_state *vd;
153 void *reap; // VOIDED POINTER
169 ogg_int64_t *offsets;
170 ogg_int64_t *dataoffsets;
172 ogg_int64_t *pcmlengths;
174 void *vc; // VOIDED POINTER
175 ogg_int64_t pcm_offset;
177 long current_serialno;
184 ov_callbacks callbacks;
189 =================================================================
191 DarkPlaces definitions
193 =================================================================
196 // Functions exported from the vorbisfile library
197 static int (*qov_clear) (OggVorbis_File *vf);
198 static vorbis_info* (*qov_info) (OggVorbis_File *vf,int link);
199 static int (*qov_open_callbacks) (void *datasource, OggVorbis_File *vf,
200 char *initial, long ibytes,
201 ov_callbacks callbacks);
202 static int (*qov_pcm_seek) (OggVorbis_File *vf,ogg_int64_t pos);
203 static ogg_int64_t (*qov_pcm_total) (OggVorbis_File *vf,int i);
204 static long (*qov_read) (OggVorbis_File *vf,char *buffer,int length,
205 int bigendianp,int word,int sgned,int *bitstream);
207 static dllfunction_t oggvorbisfuncs[] =
209 {"ov_clear", (void **) &qov_clear},
210 {"ov_info", (void **) &qov_info},
211 {"ov_open_callbacks", (void **) &qov_open_callbacks},
212 {"ov_pcm_seek", (void **) &qov_pcm_seek},
213 {"ov_pcm_total", (void **) &qov_pcm_total},
214 {"ov_read", (void **) &qov_read},
218 // Handles for the Vorbis and Vorbisfile DLLs
219 static dllhandle_t vo_dll = NULL;
220 static dllhandle_t vf_dll = NULL;
224 unsigned char *buffer;
225 ogg_int64_t ind, buffsize;
229 static size_t ovcb_read (void *ptr, size_t size, size_t nb, void *datasource)
231 ov_decode_t *ov_decode = (ov_decode_t*)datasource;
234 remain = ov_decode->buffsize - ov_decode->ind;
237 len = remain - remain % size;
239 memcpy (ptr, ov_decode->buffer + ov_decode->ind, len);
240 ov_decode->ind += len;
245 static int ovcb_seek (void *datasource, ogg_int64_t offset, int whence)
247 ov_decode_t *ov_decode = (ov_decode_t*)datasource;
254 offset += ov_decode->ind;
257 offset += ov_decode->buffsize;
262 if (offset < 0 || offset > ov_decode->buffsize)
265 ov_decode->ind = offset;
269 static int ovcb_close (void *ov_decode)
274 static long ovcb_tell (void *ov_decode)
276 return ((ov_decode_t*)ov_decode)->ind;
281 =================================================================
285 =================================================================
292 Try to load the VorbisFile DLL
295 qboolean OGG_OpenLibrary (void)
297 const char* dllnames_vo [] =
304 #elif defined(MACOSX)
312 const char* dllnames_vf [] =
315 "libvorbisfile64.dll",
319 #elif defined(MACOSX)
320 "libvorbisfile.dylib",
322 "libvorbisfile.so.3",
332 // COMMANDLINEOPTION: Sound: -novorbis disables ogg vorbis sound support
333 if (COM_CheckParm("-novorbis"))
337 // We need to load both by hand because some OSes seem to not load
338 // the vorbis DLL automatically when loading the VorbisFile DLL
339 if (! Sys_LoadLibrary (dllnames_vo, &vo_dll, NULL) ||
340 ! Sys_LoadLibrary (dllnames_vf, &vf_dll, oggvorbisfuncs))
342 Sys_UnloadLibrary (&vo_dll);
343 Con_Printf ("Ogg Vorbis support disabled\n");
347 Con_Printf ("Ogg Vorbis support enabled\n");
356 Unload the VorbisFile DLL
359 void OGG_CloseLibrary (void)
361 Sys_UnloadLibrary (&vf_dll);
362 Sys_UnloadLibrary (&vo_dll);
367 =================================================================
371 =================================================================
374 #define STREAM_BUFFER_DURATION 1.5f // 1.5 sec
375 #define STREAM_BUFFER_SIZE(format_ptr) (ceil (STREAM_BUFFER_DURATION * ((format_ptr)->speed * (format_ptr)->width * (format_ptr)->channels)))
377 // We work with 1 sec sequences, so this buffer must be able to contain
378 // 1 sec of sound of the highest quality (48 KHz, 16 bit samples, stereo)
379 static unsigned char resampling_buffer [48000 * 2 * 2];
382 // Per-sfx data structure
388 } ogg_stream_persfx_t;
390 // Per-channel data structure
394 ov_decode_t ov_decode;
396 sfxbuffer_t sb; // must be at the end due to its dynamically allocated size
397 } ogg_stream_perchannel_t;
400 static const ov_callbacks callbacks = {ovcb_read, ovcb_seek, ovcb_close, ovcb_tell};
407 static const sfxbuffer_t* OGG_FetchSound (channel_t* ch, unsigned int start, unsigned int nbsamples)
409 ogg_stream_perchannel_t* per_ch;
412 snd_format_t* format;
413 ogg_stream_persfx_t* per_sfx;
414 int newlength, done, ret, bigendian;
418 per_ch = (ogg_stream_perchannel_t *)ch->fetcher_data;
420 per_sfx = (ogg_stream_persfx_t *)sfx->fetcher_data;
421 format = &sfx->format;
422 buff_len = STREAM_BUFFER_SIZE(format);
424 // If there's no fetcher structure attached to the channel yet
428 ogg_stream_persfx_t* per_sfx;
430 memsize = sizeof (*per_ch) - sizeof (per_ch->sb.data) + buff_len;
431 per_ch = (ogg_stream_perchannel_t *)Mem_Alloc (snd_mempool, memsize);
432 sfx->memsize += memsize;
433 per_sfx = (ogg_stream_persfx_t *)sfx->fetcher_data;
435 // Open it with the VorbisFile API
436 per_ch->ov_decode.buffer = per_sfx->file;
437 per_ch->ov_decode.ind = 0;
438 per_ch->ov_decode.buffsize = per_sfx->filesize;
439 if (qov_open_callbacks (&per_ch->ov_decode, &per_ch->vf, NULL, 0, callbacks) < 0)
441 Con_Printf("error while reading Ogg Vorbis stream \"%s\"\n", sfx->name);
446 per_ch->sb.offset = 0;
447 per_ch->sb.length = 0;
450 ch->fetcher_data = per_ch;
454 factor = per_sfx->format.width * per_sfx->format.channels;
456 // If the stream buffer can't contain that much samples anyway
457 if (nbsamples * factor > buff_len)
459 Con_Printf ("OGG_FetchSound: stream buffer too small (%u bytes required)\n", nbsamples * factor);
463 // If the data we need has already been decompressed in the sfxbuffer, just return it
464 if (sb->offset <= start && sb->offset + sb->length >= start + nbsamples)
467 newlength = (int)(sb->offset + sb->length) - start;
469 // If we need to skip some data before decompressing the rest, or if the stream has looped
470 if (newlength < 0 || sb->offset > start)
472 if (qov_pcm_seek (&per_ch->vf, (ogg_int64_t)start) != 0)
476 // Else, move forward the samples we need to keep in the sfxbuffer
479 memmove (sb->data, sb->data + (start - sb->offset) * factor, newlength * factor);
480 sb->length = newlength;
485 // We add exactly 1 sec of sound to the buffer:
486 // 1- to ensure we won't lose any sample during the resampling process
487 // 2- to force one call to OGG_FetchSound per second to regulate the workload
488 if ((sfx->format.speed + sb->length) * factor > buff_len)
490 Con_Printf ("OGG_FetchSound: stream buffer overflow (%u bytes / %u)\n",
491 (sfx->format.speed + sb->length) * factor, buff_len);
494 newlength = per_sfx->format.speed * factor; // -> 1 sec of sound before resampling
496 // Decompress in the resampling_buffer
497 #if BYTE_ORDER == BIG_ENDIAN
503 while ((ret = qov_read (&per_ch->vf, (char *)&resampling_buffer[done], (int)(newlength - done), bigendian, 2, 1, &per_ch->bs)) > 0)
506 // Resample in the sfxbuffer
507 newlength = (int)ResampleSfx (resampling_buffer, (size_t)done / (size_t)factor, &per_sfx->format, sb->data + sb->length * (size_t)factor, sfx->name);
508 sb->length += newlength;
519 static void OGG_FetchEnd (channel_t* ch)
521 ogg_stream_perchannel_t* per_ch;
523 per_ch = (ogg_stream_perchannel_t *)ch->fetcher_data;
527 snd_format_t* format;
529 // Free the ogg vorbis decoder
530 qov_clear (&per_ch->vf);
533 ch->fetcher_data = NULL;
535 format = &ch->sfx->format;
536 buff_len = STREAM_BUFFER_SIZE(format);
537 ch->sfx->memsize -= sizeof (*per_ch) - sizeof (per_ch->sb.data) + buff_len;
547 static void OGG_FreeSfx (sfx_t* sfx)
549 ogg_stream_persfx_t* per_sfx = (ogg_stream_persfx_t *)sfx->fetcher_data;
551 // Free the Ogg Vorbis file
552 Mem_Free(per_sfx->file);
553 sfx->memsize -= per_sfx->filesize;
555 // Free the stream structure
557 sfx->memsize -= sizeof (*per_sfx);
559 sfx->fetcher_data = NULL;
563 static const snd_fetcher_t ogg_fetcher = { OGG_FetchSound, OGG_FetchEnd, OGG_FreeSfx };
570 Load an Ogg Vorbis file into memory
573 qboolean OGG_LoadVorbisFile (const char *filename, sfx_t *s)
576 fs_offset_t filesize;
577 ov_decode_t ov_decode;
580 ogg_int64_t len, buff_len;
586 if (s->fetcher != NULL)
590 data = FS_LoadFile (filename, snd_mempool, false, &filesize);
594 Con_DPrintf ("Loading Ogg Vorbis file \"%s\"\n", filename);
596 // Open it with the VorbisFile API
597 ov_decode.buffer = data;
599 ov_decode.buffsize = filesize;
600 if (qov_open_callbacks (&ov_decode, &vf, NULL, 0, callbacks) < 0)
602 Con_Printf ("error while opening Ogg Vorbis file \"%s\"\n", filename);
607 // Get the stream information
608 vi = qov_info (&vf, -1);
609 if (vi->channels < 1 || vi->channels > 2)
611 Con_Printf("%s has an unsupported number of channels (%i)\n",
612 s->name, vi->channels);
618 len = qov_pcm_total (&vf, -1) * vi->channels * 2; // 16 bits => "* 2"
620 // Decide if we go for a stream or a simple PCM cache
621 buff_len = ceil (STREAM_BUFFER_DURATION * (shm->format.speed * 2 * vi->channels));
622 if (snd_streaming.integer && len > (ogg_int64_t)filesize + 3 * buff_len)
624 ogg_stream_persfx_t* per_sfx;
626 Con_DPrintf ("\"%s\" will be streamed\n", filename);
627 per_sfx = (ogg_stream_persfx_t *)Mem_Alloc (snd_mempool, sizeof (*per_sfx));
628 s->memsize += sizeof (*per_sfx);
629 per_sfx->file = data;
630 per_sfx->filesize = filesize;
631 s->memsize += filesize;
633 per_sfx->format.speed = vi->rate;
634 per_sfx->format.width = 2; // We always work with 16 bits samples
635 per_sfx->format.channels = vi->channels;
636 s->format.speed = shm->format.speed;
637 s->format.width = per_sfx->format.width;
638 s->format.channels = per_sfx->format.channels;
640 s->fetcher_data = per_sfx;
641 s->fetcher = &ogg_fetcher;
643 s->flags |= SFXFLAG_STREAMED;
644 s->total_length = (size_t)len / per_sfx->format.channels / 2 * ((float)s->format.speed / per_sfx->format.speed);
655 Con_DPrintf ("\"%s\" will be cached\n", filename);
658 buff = (char *)Mem_Alloc (snd_mempool, (int)len);
661 #if BYTE_ORDER == LITTLE_ENDIAN
666 while ((ret = qov_read (&vf, &buff[done], (int)(len - done), bigendian, 2, 1, &bs)) > 0)
669 // Calculate resampled length
670 len = (double)done * (double)shm->format.speed / (double)vi->rate;
673 memsize = (size_t)len + sizeof (*sb) - sizeof (sb->data);
674 sb = (sfxbuffer_t *)Mem_Alloc (snd_mempool, memsize);
675 s->memsize += memsize;
676 s->fetcher_data = sb;
677 s->fetcher = &wav_fetcher;
678 s->format.speed = vi->rate;
679 s->format.width = 2; // We always work with 16 bits samples
680 s->format.channels = vi->channels;
682 s->flags &= ~SFXFLAG_STREAMED;
684 sb->length = (unsigned int)ResampleSfx ((unsigned char *)buff, (size_t)done / (vi->channels * 2), &s->format, sb->data, s->name);
685 s->format.speed = shm->format.speed;
686 s->total_length = sb->length;