snd_ogg.c

   1 /*
   2         Copyright (C) 2003-2005  Mathieu Olivier
   3
   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.
   8
   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.
  12
  13         See the GNU General Public License for more details.
  14
  15         You should have received a copy of the GNU General Public License
  16         along with this program; if not, write to:
  17
  18                 Free Software Foundation, Inc.
  19                 59 Temple Place - Suite 330
  20                 Boston, MA  02111-1307, USA
  21
  22 */
  23
  24
  25 #include "quakedef.h"
  26 #include "snd_main.h"
  27 #include "snd_ogg.h"
  28 #include "snd_wav.h"
  29
  30
  31 /*
  32 =================================================================
  33
  34   Minimal set of definitions from the Ogg Vorbis lib
  35   (C) COPYRIGHT 1994-2001 by the XIPHOPHORUS Company
  36   http://www.xiph.org/
  37
  38   WARNING: for a matter of simplicity, several pointer types are
  39   casted to "void*", and most enumerated values are not included
  40
  41 =================================================================
  42 */
  43
  44 #ifdef _MSC_VER
  45 typedef __int64 ogg_int64_t;
  46 #else
  47 typedef long long ogg_int64_t;
  48 #endif
  49
  50 typedef struct
  51 {
  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);
  56 } ov_callbacks;
  57
  58 typedef struct
  59 {
  60         unsigned char   *data;
  61         int                             storage;
  62         int                             fill;
  63         int                             returned;
  64         int                             unsynced;
  65         int                             headerbytes;
  66         int                             bodybytes;
  67 } ogg_sync_state;
  68
  69 typedef struct
  70 {
  71         int             version;
  72         int             channels;
  73         long    rate;
  74         long    bitrate_upper;
  75         long    bitrate_nominal;
  76         long    bitrate_lower;
  77         long    bitrate_window;
  78         void    *codec_setup;
  79 } vorbis_info;
  80
  81 typedef struct
  82 {
  83         unsigned char   *body_data;
  84         long                    body_storage;
  85         long                    body_fill;
  86         long                    body_returned;
  87         int                             *lacing_vals;
  88         ogg_int64_t             *granule_vals;
  89         long                    lacing_storage;
  90         long                    lacing_fill;
  91         long                    lacing_packet;
  92         long                    lacing_returned;
  93         unsigned char   header[282];
  94         int                             header_fill;
  95         int                             e_o_s;
  96         int                             b_o_s;
  97         long                    serialno;
  98         long                    pageno;
  99         ogg_int64_t             packetno;
 100         ogg_int64_t             granulepos;
 101 } ogg_stream_state;
 102
 103 typedef struct
 104 {
 105         int                     analysisp;
 106         vorbis_info     *vi;
 107         float           **pcm;
 108         float           **pcmret;
 109         int                     pcm_storage;
 110         int                     pcm_current;
 111         int                     pcm_returned;
 112         int                     preextrapolate;
 113         int                     eofflag;
 114         long            lW;
 115         long            W;
 116         long            nW;
 117         long            centerW;
 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;
 124         void            *backend_state;
 125 } vorbis_dsp_state;
 126
 127 typedef struct
 128 {
 129         long                    endbyte;
 130         int                             endbit;
 131         unsigned char   *buffer;
 132         unsigned char   *ptr;
 133         long                    storage;
 134 } oggpack_buffer;
 135
 136 typedef struct
 137 {
 138         float                           **pcm;
 139         oggpack_buffer          opb;
 140         long                            lW;
 141         long                            W;
 142         long                            nW;
 143         int                                     pcmend;
 144         int                                     mode;
 145         int                                     eofflag;
 146         ogg_int64_t                     granulepos;
 147         ogg_int64_t                     sequence;
 148         vorbis_dsp_state        *vd;
 149         void                            *localstore;
 150         long                            localtop;
 151         long                            localalloc;
 152         long                            totaluse;
 153         void                            *reap;  // VOIDED POINTER
 154         long                            glue_bits;
 155         long                            time_bits;
 156         long                            floor_bits;
 157         long                            res_bits;
 158         void                            *internal;
 159 } vorbis_block;
 160
 161 typedef struct
 162 {
 163         char **user_comments;
 164         int   *comment_lengths;
 165         int    comments;
 166         char  *vendor;
 167 } vorbis_comment;
 168
 169 typedef struct
 170 {
 171         void                            *datasource;
 172         int                                     seekable;
 173         ogg_int64_t                     offset;
 174         ogg_int64_t                     end;
 175         ogg_sync_state          oy;
 176         int                                     links;
 177         ogg_int64_t                     *offsets;
 178         ogg_int64_t                     *dataoffsets;
 179         long                            *serialnos;
 180         ogg_int64_t                     *pcmlengths;
 181         vorbis_info                     *vi;
 182         vorbis_comment          *vc;
 183         ogg_int64_t                     pcm_offset;
 184         int                                     ready_state;
 185         long                            current_serialno;
 186         int                                     current_link;
 187         double                          bittrack;
 188         double                          samptrack;
 189         ogg_stream_state        os;
 190         vorbis_dsp_state        vd;
 191         vorbis_block            vb;
 192         ov_callbacks            callbacks;
 193 } OggVorbis_File;
 194
 195
 196 /*
 197 =================================================================
 198
 199   DarkPlaces definitions
 200
 201 =================================================================
 202 */
 203
 204 // Functions exported from the vorbisfile library
 205 static int (*qov_clear) (OggVorbis_File *vf);
 206 static vorbis_info* (*qov_info) (OggVorbis_File *vf,int link);
 207 static vorbis_comment* (*qov_comment) (OggVorbis_File *vf,int link);
 208 static char * (*qvorbis_comment_query) (vorbis_comment *vc, char *tag, int count);
 209 static int (*qov_open_callbacks) (void *datasource, OggVorbis_File *vf,
 210                                                                   char *initial, long ibytes,
 211                                                                   ov_callbacks callbacks);
 212 static int (*qov_pcm_seek) (OggVorbis_File *vf,ogg_int64_t pos);
 213 static ogg_int64_t (*qov_pcm_total) (OggVorbis_File *vf,int i);
 214 static long (*qov_read) (OggVorbis_File *vf,char *buffer,int length,
 215                                                  int bigendianp,int word,int sgned,int *bitstream);
 216
 217 static dllfunction_t vorbisfilefuncs[] =
 218 {
 219         {"ov_clear",                            (void **) &qov_clear},
 220         {"ov_info",                                     (void **) &qov_info},
 221         {"ov_comment",                          (void **) &qov_comment},
 222         {"ov_open_callbacks",           (void **) &qov_open_callbacks},
 223         {"ov_pcm_seek",                         (void **) &qov_pcm_seek},
 224         {"ov_pcm_total",                        (void **) &qov_pcm_total},
 225         {"ov_read",                                     (void **) &qov_read},
 226         {NULL, NULL}
 227 };
 228
 229 static dllfunction_t vorbisfuncs[] =
 230 {
 231         {"vorbis_comment_query",        (void **) &qvorbis_comment_query},
 232         {NULL, NULL}
 233 };
 234
 235 // Handles for the Vorbis and Vorbisfile DLLs
 236 static dllhandle_t vo_dll = NULL;
 237 static dllhandle_t vf_dll = NULL;
 238
 239 typedef struct
 240 {
 241         unsigned char *buffer;
 242         ogg_int64_t ind, buffsize;
 243 } ov_decode_t;
 244
 245
 246 static size_t ovcb_read (void *ptr, size_t size, size_t nb, void *datasource)
 247 {
 248         ov_decode_t *ov_decode = (ov_decode_t*)datasource;
 249         size_t remain, len;
 250
 251         remain = ov_decode->buffsize - ov_decode->ind;
 252         len = size * nb;
 253         if (remain < len)
 254                 len = remain - remain % size;
 255
 256         memcpy (ptr, ov_decode->buffer + ov_decode->ind, len);
 257         ov_decode->ind += len;
 258
 259         return len / size;
 260 }
 261
 262 static int ovcb_seek (void *datasource, ogg_int64_t offset, int whence)
 263 {
 264         ov_decode_t *ov_decode = (ov_decode_t*)datasource;
 265
 266         switch (whence)
 267         {
 268                 case SEEK_SET:
 269                         break;
 270                 case SEEK_CUR:
 271                         offset += ov_decode->ind;
 272                         break;
 273                 case SEEK_END:
 274                         offset += ov_decode->buffsize;
 275                         break;
 276                 default:
 277                         return -1;
 278         }
 279         if (offset < 0 || offset > ov_decode->buffsize)
 280                 return -1;
 281
 282         ov_decode->ind = offset;
 283         return 0;
 284 }
 285
 286 static int ovcb_close (void *ov_decode)
 287 {
 288         return 0;
 289 }
 290
 291 static long ovcb_tell (void *ov_decode)
 292 {
 293         return ((ov_decode_t*)ov_decode)->ind;
 294 }
 295
 296
 297 /*
 298 =================================================================
 299
 300   DLL load & unload
 301
 302 =================================================================
 303 */
 304
 305 /*
 306 ====================
 307 OGG_OpenLibrary
 308
 309 Try to load the VorbisFile DLL
 310 ====================
 311 */
 312 qboolean OGG_OpenLibrary (void)
 313 {
 314         const char* dllnames_vo [] =
 315         {
 316 #if defined(WIN64)
 317                 "libvorbis64.dll",
 318 #elif defined(WIN32)
 319                 "libvorbis.dll",
 320                 "vorbis.dll",
 321 #elif defined(MACOSX)
 322                 "libvorbis.dylib",
 323 #else
 324                 "libvorbis.so.0",
 325                 "libvorbis.so",
 326 #endif
 327                 NULL
 328         };
 329         const char* dllnames_vf [] =
 330         {
 331 #if defined(WIN64)
 332                 "libvorbisfile64.dll",
 333 #elif defined(WIN32)
 334                 "libvorbisfile.dll",
 335                 "vorbisfile.dll",
 336 #elif defined(MACOSX)
 337                 "libvorbisfile.dylib",
 338 #else
 339                 "libvorbisfile.so.3",
 340                 "libvorbisfile.so",
 341 #endif
 342                 NULL
 343         };
 344
 345         // Already loaded?
 346         if (vf_dll)
 347                 return true;
 348
 349 // COMMANDLINEOPTION: Sound: -novorbis disables ogg vorbis sound support
 350         if (COM_CheckParm("-novorbis"))
 351                 return false;
 352
 353         // Load the DLLs
 354         // We need to load both by hand because some OSes seem to not load
 355         // the vorbis DLL automatically when loading the VorbisFile DLL
 356         return Sys_LoadLibrary (dllnames_vo, &vo_dll, vorbisfuncs) && Sys_LoadLibrary (dllnames_vf, &vf_dll, vorbisfilefuncs);
 357 }
 358
 359
 360 /*
 361 ====================
 362 OGG_CloseLibrary
 363
 364 Unload the VorbisFile DLL
 365 ====================
 366 */
 367 void OGG_CloseLibrary (void)
 368 {
 369         Sys_UnloadLibrary (&vf_dll);
 370         Sys_UnloadLibrary (&vo_dll);
 371 }
 372
 373
 374 /*
 375 =================================================================
 376
 377         Ogg Vorbis decoding
 378
 379 =================================================================
 380 */
 381
 382 #define STREAM_BUFFER_DURATION 1.5f     // 1.5 sec
 383 #define STREAM_BUFFER_SIZE(format_ptr) ((int)(ceil (STREAM_BUFFER_DURATION * ((format_ptr)->speed * (format_ptr)->width * (format_ptr)->channels))))
 384
 385 // We work with 1 sec sequences, so this buffer must be able to contain
 386 // 1 sec of sound of the highest quality (48 KHz, 16 bit samples, stereo)
 387 static unsigned char resampling_buffer [48000 * 2 * 2];
 388
 389
 390 // Per-sfx data structure
 391 typedef struct
 392 {
 393         unsigned char   *file;
 394         size_t                  filesize;
 395         snd_format_t    format;
 396         unsigned int    total_length;
 397         char                    name[128];
 398 } ogg_stream_persfx_t;
 399
 400 // Per-channel data structure
 401 typedef struct
 402 {
 403         OggVorbis_File  vf;
 404         ov_decode_t             ov_decode;
 405         unsigned int    sb_offset;
 406         int                             bs;
 407         snd_buffer_t    sb;             // must be at the end due to its dynamically allocated size
 408 } ogg_stream_perchannel_t;
 409
 410
 411 static const ov_callbacks callbacks = {ovcb_read, ovcb_seek, ovcb_close, ovcb_tell};
 412
 413 /*
 414 ====================
 415 OGG_FetchSound
 416 ====================
 417 */
 418 static const snd_buffer_t* OGG_FetchSound (void *sfxfetcher, void **chfetcherpointer, unsigned int *start, unsigned int nbsampleframes)
 419 {
 420         ogg_stream_perchannel_t* per_ch = (ogg_stream_perchannel_t *)*chfetcherpointer;
 421         ogg_stream_persfx_t* per_sfx = (ogg_stream_persfx_t *)sfxfetcher;
 422         snd_buffer_t* sb;
 423         int newlength, done, ret, bigendian;
 424         unsigned int real_start;
 425         unsigned int factor;
 426
 427         // If there's no fetcher structure attached to the channel yet
 428         if (per_ch == NULL)
 429         {
 430                 size_t buff_len, memsize;
 431                 snd_format_t sb_format;
 432
 433                 sb_format.speed = snd_renderbuffer->format.speed;
 434                 sb_format.width = per_sfx->format.width;
 435                 sb_format.channels = per_sfx->format.channels;
 436
 437                 buff_len = STREAM_BUFFER_SIZE(&sb_format);
 438                 memsize = sizeof (*per_ch) - sizeof (per_ch->sb.samples) + buff_len;
 439                 per_ch = (ogg_stream_perchannel_t *)Mem_Alloc (snd_mempool, memsize);
 440
 441                 // Open it with the VorbisFile API
 442                 per_ch->ov_decode.buffer = per_sfx->file;
 443                 per_ch->ov_decode.ind = 0;
 444                 per_ch->ov_decode.buffsize = per_sfx->filesize;
 445                 if (qov_open_callbacks (&per_ch->ov_decode, &per_ch->vf, NULL, 0, callbacks) < 0)
 446                 {
 447                         Con_Printf("error while reading Ogg Vorbis stream \"%s\"\n", per_sfx->name);
 448                         Mem_Free (per_ch);
 449                         return NULL;
 450                 }
 451                 per_ch->bs = 0;
 452
 453                 per_ch->sb_offset = 0;
 454                 per_ch->sb.format = sb_format;
 455                 per_ch->sb.nbframes = 0;
 456                 per_ch->sb.maxframes = buff_len / (per_ch->sb.format.channels * per_ch->sb.format.width);
 457
 458                 *chfetcherpointer = per_ch;
 459         }
 460
 461         real_start = *start;
 462
 463         sb = &per_ch->sb;
 464         factor = per_sfx->format.width * per_sfx->format.channels;
 465
 466         // If the stream buffer can't contain that much samples anyway
 467         if (nbsampleframes > sb->maxframes)
 468         {
 469                 Con_Printf ("OGG_FetchSound: stream buffer too small (%u sample frames required)\n", nbsampleframes);
 470                 return NULL;
 471         }
 472
 473         // If the data we need has already been decompressed in the sfxbuffer, just return it
 474         if (per_ch->sb_offset <= real_start && per_ch->sb_offset + sb->nbframes >= real_start + nbsampleframes)
 475         {
 476                 *start = per_ch->sb_offset;
 477                 return sb;
 478         }
 479
 480         newlength = (int)(per_ch->sb_offset + sb->nbframes) - real_start;
 481
 482         // If we need to skip some data before decompressing the rest, or if the stream has looped
 483         if (newlength < 0 || per_ch->sb_offset > real_start)
 484         {
 485                 unsigned int time_start;
 486                 ogg_int64_t ogg_start;
 487                 int err;
 488
 489                 if (real_start > (unsigned int)per_sfx->total_length)
 490                 {
 491                         Con_Printf ("OGG_FetchSound: asked for a start position after the end of the sfx! (%u > %u)\n",
 492                                                 real_start, per_sfx->total_length);
 493                         return NULL;
 494                 }
 495
 496                 // We work with 200ms (1/5 sec) steps to avoid rounding errors
 497                 time_start = real_start * 5 / snd_renderbuffer->format.speed;
 498                 ogg_start = time_start * (per_sfx->format.speed / 5);
 499                 err = qov_pcm_seek (&per_ch->vf, ogg_start);
 500                 if (err != 0)
 501                 {
 502                         Con_Printf ("OGG_FetchSound: qov_pcm_seek(..., %d) returned %d\n",
 503                                                 real_start, err);
 504                         return NULL;
 505                 }
 506                 sb->nbframes = 0;
 507
 508                 real_start = (float)ogg_start / per_sfx->format.speed * snd_renderbuffer->format.speed;
 509                 if (*start - real_start + nbsampleframes > sb->maxframes)
 510                 {
 511                         Con_Printf ("OGG_FetchSound: stream buffer too small after seek (%u sample frames required)\n",
 512                                                 *start - real_start + nbsampleframes);
 513                         per_ch->sb_offset = real_start;
 514                         return NULL;
 515                 }
 516         }
 517         // Else, move forward the samples we need to keep in the sound buffer
 518         else
 519         {
 520                 memmove (sb->samples, sb->samples + (real_start - per_ch->sb_offset) * factor, newlength * factor);
 521                 sb->nbframes = newlength;
 522         }
 523
 524         per_ch->sb_offset = real_start;
 525
 526         // We add exactly 1 sec of sound to the buffer:
 527         // 1- to ensure we won't lose any sample during the resampling process
 528         // 2- to force one call to OGG_FetchSound per second to regulate the workload
 529         if (sb->format.speed + sb->nbframes > sb->maxframes)
 530         {
 531                 Con_Printf ("OGG_FetchSound: stream buffer overflow (%u sample frames / %u)\n",
 532                                         sb->format.speed + sb->nbframes, sb->maxframes);
 533                 return NULL;
 534         }
 535         newlength = per_sfx->format.speed * factor;  // -> 1 sec of sound before resampling
 536         if(newlength > (int)sizeof(resampling_buffer))
 537                 newlength = sizeof(resampling_buffer);
 538
 539         // Decompress in the resampling_buffer
 540 #if BYTE_ORDER == BIG_ENDIAN
 541         bigendian = 1;
 542 #else
 543         bigendian = 0;
 544 #endif
 545         done = 0;
 546         while ((ret = qov_read (&per_ch->vf, (char *)&resampling_buffer[done], (int)(newlength - done), bigendian, 2, 1, &per_ch->bs)) > 0)
 547                 done += ret;
 548
 549         Snd_AppendToSndBuffer (sb, resampling_buffer, (size_t)done / (size_t)factor, &per_sfx->format);
 550
 551         *start = per_ch->sb_offset;
 552         return sb;
 553 }
 554
 555
 556 /*
 557 ====================
 558 OGG_FetchEnd
 559 ====================
 560 */
 561 static void OGG_FetchEnd (void *chfetcherdata)
 562 {
 563         ogg_stream_perchannel_t* per_ch = (ogg_stream_perchannel_t *)chfetcherdata;
 564
 565         if (per_ch != NULL)
 566         {
 567                 // Free the ogg vorbis decoder
 568                 qov_clear (&per_ch->vf);
 569
 570                 Mem_Free (per_ch);
 571         }
 572 }
 573
 574
 575 /*
 576 ====================
 577 OGG_FreeSfx
 578 ====================
 579 */
 580 static void OGG_FreeSfx (void *sfxfetcherdata)
 581 {
 582         ogg_stream_persfx_t* per_sfx = (ogg_stream_persfx_t *)sfxfetcherdata;
 583
 584         // Free the Ogg Vorbis file
 585         Mem_Free(per_sfx->file);
 586
 587         // Free the stream structure
 588         Mem_Free(per_sfx);
 589 }
 590
 591
 592 /*
 593 ====================
 594 OGG_GetFormat
 595 ====================
 596 */
 597 static const snd_format_t* OGG_GetFormat (sfx_t* sfx)
 598 {
 599         ogg_stream_persfx_t* per_sfx = (ogg_stream_persfx_t *)sfx->fetcher_data;
 600         return &per_sfx->format;
 601 }
 602
 603 static const snd_fetcher_t ogg_fetcher = { OGG_FetchSound, OGG_FetchEnd, OGG_FreeSfx, OGG_GetFormat };
 604
 605 static void OGG_DecodeTags(vorbis_comment *vc, unsigned int *start, unsigned int *length, double samplesfactor, unsigned int numsamples, double *peak, double *gaindb)
 606 {
 607         const char *startcomment = NULL, *lengthcomment = NULL, *endcomment = NULL, *thiscomment = NULL;
 608
 609         *start = numsamples;
 610         *length = numsamples;
 611         *peak = 0.0;
 612         *gaindb = 0.0;
 613
 614         if(!vc)
 615                 return;
 616
 617         thiscomment = qvorbis_comment_query(vc, "REPLAYGAIN_TRACK_PEAK", 0);
 618         if(thiscomment)
 619                 *peak = atof(thiscomment);
 620         thiscomment = qvorbis_comment_query(vc, "REPLAYGAIN_TRACK_GAIN", 0);
 621         if(thiscomment)
 622                 *gaindb = atof(thiscomment);
 623
 624         startcomment = qvorbis_comment_query(vc, "LOOP_START", 0); // DarkPlaces, and some Japanese app
 625         if(startcomment)
 626         {
 627                 endcomment = qvorbis_comment_query(vc, "LOOP_END", 0);
 628                 if(!endcomment)
 629                         lengthcomment = qvorbis_comment_query(vc, "LOOP_LENGTH", 0);
 630         }
 631         else
 632         {
 633                 startcomment = qvorbis_comment_query(vc, "LOOPSTART", 0); // RPG Maker VX
 634                 if(startcomment)
 635                 {
 636                         lengthcomment = qvorbis_comment_query(vc, "LOOPLENGTH", 0);
 637                         if(!lengthcomment)
 638                                 endcomment = qvorbis_comment_query(vc, "LOOPEND", 0);
 639                 }
 640                 else
 641                 {
 642                         startcomment = qvorbis_comment_query(vc, "LOOPPOINT", 0); // Sonic Robo Blast 2
 643                 }
 644         }
 645
 646         if(startcomment)
 647         {
 648                 *start = bound(0, atof(startcomment) * samplesfactor, numsamples);
 649                 if(endcomment)
 650                         *length = bound(0, atof(endcomment) * samplesfactor, numsamples);
 651                 else if(lengthcomment)
 652                         *length = bound(0, *start + atof(lengthcomment) * samplesfactor, numsamples);
 653         }
 654 }
 655
 656 /*
 657 ====================
 658 OGG_LoadVorbisFile
 659
 660 Load an Ogg Vorbis file into memory
 661 ====================
 662 */
 663 qboolean OGG_LoadVorbisFile (const char *filename, sfx_t *sfx)
 664 {
 665         unsigned char *data;
 666         fs_offset_t filesize;
 667         ov_decode_t ov_decode;
 668         OggVorbis_File vf;
 669         vorbis_info *vi;
 670         vorbis_comment *vc;
 671         ogg_int64_t len, buff_len;
 672         double peak, gaindb;
 673
 674         if (!vf_dll)
 675                 return false;
 676
 677         // Already loaded?
 678         if (sfx->fetcher != NULL)
 679                 return true;
 680
 681         // Load the file
 682         data = FS_LoadFile (filename, snd_mempool, false, &filesize);
 683         if (data == NULL)
 684                 return false;
 685
 686         if (developer_loading.integer >= 2)
 687                 Con_Printf ("Loading Ogg Vorbis file \"%s\"\n", filename);
 688
 689         // Open it with the VorbisFile API
 690         ov_decode.buffer = data;
 691         ov_decode.ind = 0;
 692         ov_decode.buffsize = filesize;
 693         if (qov_open_callbacks (&ov_decode, &vf, NULL, 0, callbacks) < 0)
 694         {
 695                 Con_Printf ("error while opening Ogg Vorbis file \"%s\"\n", filename);
 696                 Mem_Free(data);
 697                 return false;
 698         }
 699
 700         // Get the stream information
 701         vi = qov_info (&vf, -1);
 702         if (vi->channels < 1 || vi->channels > 2)
 703         {
 704                 Con_Printf("%s has an unsupported number of channels (%i)\n",
 705                                         sfx->name, vi->channels);
 706                 qov_clear (&vf);
 707                 Mem_Free(data);
 708                 return false;
 709         }
 710
 711         len = qov_pcm_total (&vf, -1) * vi->channels * 2;  // 16 bits => "* 2"
 712
 713         // Decide if we go for a stream or a simple PCM cache
 714         buff_len = (int)ceil (STREAM_BUFFER_DURATION * (snd_renderbuffer->format.speed * 2 * vi->channels));
 715         if (snd_streaming.integer && len > (ogg_int64_t)filesize + 3 * buff_len)
 716         {
 717                 ogg_stream_persfx_t* per_sfx;
 718
 719                 if (developer_loading.integer >= 2)
 720                         Con_Printf ("Ogg sound file \"%s\" will be streamed\n", filename);
 721                 per_sfx = (ogg_stream_persfx_t *)Mem_Alloc (snd_mempool, sizeof (*per_sfx));
 722                 strlcpy(per_sfx->name, sfx->name, sizeof(per_sfx->name));
 723                 sfx->memsize += sizeof (*per_sfx);
 724                 per_sfx->file = data;
 725                 per_sfx->filesize = filesize;
 726                 sfx->memsize += filesize;
 727
 728                 per_sfx->format.speed = vi->rate;
 729                 per_sfx->format.width = 2;  // We always work with 16 bits samples
 730                 per_sfx->format.channels = vi->channels;
 731
 732                 sfx->fetcher_data = per_sfx;
 733                 sfx->fetcher = &ogg_fetcher;
 734                 sfx->flags |= SFXFLAG_STREAMED;
 735                 sfx->total_length = (int)((size_t)len / (per_sfx->format.channels * 2) * ((double)snd_renderbuffer->format.speed / per_sfx->format.speed));
 736                 vc = qov_comment(&vf, -1);
 737                 OGG_DecodeTags(vc, &sfx->loopstart, &sfx->total_length, (double)snd_renderbuffer->format.speed / (double)per_sfx->format.speed, sfx->total_length, &peak, &gaindb);
 738                 per_sfx->total_length = sfx->total_length;
 739                 qov_clear (&vf);
 740         }
 741         else
 742         {
 743                 char *buff;
 744                 ogg_int64_t done;
 745                 int bs, bigendian;
 746                 long ret;
 747                 snd_buffer_t *sb;
 748                 snd_format_t ogg_format;
 749
 750                 if (developer_loading.integer >= 2)
 751                         Con_Printf ("Ogg sound file \"%s\" will be cached\n", filename);
 752
 753                 // Decode it
 754                 buff = (char *)Mem_Alloc (snd_mempool, (int)len);
 755                 done = 0;
 756                 bs = 0;
 757 #if BYTE_ORDER == BIG_ENDIAN
 758                 bigendian = 1;
 759 #else
 760                 bigendian = 0;
 761 #endif
 762                 while ((ret = qov_read (&vf, &buff[done], (int)(len - done), bigendian, 2, 1, &bs)) > 0)
 763                         done += ret;
 764
 765                 // Build the sound buffer
 766                 ogg_format.speed = vi->rate;
 767                 ogg_format.channels = vi->channels;
 768                 ogg_format.width = 2;  // We always work with 16 bits samples
 769                 sb = Snd_CreateSndBuffer ((unsigned char *)buff, (size_t)done / (vi->channels * 2), &ogg_format, snd_renderbuffer->format.speed);
 770                 if (sb == NULL)
 771                 {
 772                         qov_clear (&vf);
 773                         Mem_Free (data);
 774                         Mem_Free (buff);
 775                         return false;
 776                 }
 777
 778                 sfx->fetcher = &wav_fetcher;
 779                 sfx->fetcher_data = sb;
 780
 781                 sfx->total_length = sb->nbframes;
 782                 sfx->memsize += sb->maxframes * sb->format.channels * sb->format.width + sizeof (*sb) - sizeof (sb->samples);
 783
 784                 sfx->flags &= ~SFXFLAG_STREAMED;
 785                 vc = qov_comment(&vf, -1);
 786                 OGG_DecodeTags(vc, &sfx->loopstart, &sfx->total_length, (double)snd_renderbuffer->format.speed / (double)sb->format.speed, sfx->total_length, &peak, &gaindb);
 787                 sb->nbframes = sfx->total_length;
 788                 qov_clear (&vf);
 789                 Mem_Free (data);
 790                 Mem_Free (buff);
 791         }
 792
 793         if(peak)
 794         {
 795                 sfx->volume_mult = min(1 / peak, exp(gaindb * 0.05 * log(10)));
 796                 sfx->volume_peak = peak;
 797                 if (developer_loading.integer >= 2)
 798                         Con_Printf ("Ogg sound file \"%s\" uses ReplayGain (gain %f, peak %f)\n", filename, sfx->volume_mult, sfx->volume_peak);
 799         }
 800
 801         return true;
 802 }