2 Copyright (C) 1996-1997 Id Software, Inc.
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
30 typedef struct wavinfo_s
37 int dataofs; // chunk starts this many bytes from file start
41 static unsigned char *data_p;
42 static unsigned char *iff_end;
43 static unsigned char *last_chunk;
44 static unsigned char *iff_data;
45 static int iff_chunk_len;
48 static short GetLittleShort(void)
52 val = BuffLittleShort (data_p);
58 static int GetLittleLong(void)
62 val = BuffLittleLong (data_p);
68 static void FindNextChunk(char *name)
74 if (data_p >= iff_end)
75 { // didn't find the chunk
81 iff_chunk_len = GetLittleLong();
82 if (iff_chunk_len < 0)
88 last_chunk = data_p + 8 + ( (iff_chunk_len + 1) & ~1 );
89 if (!strncmp((const char *)data_p, name, 4))
94 static void FindChunk(char *name)
96 last_chunk = iff_data;
102 static void DumpChunks(void)
110 memcpy (str, data_p, 4);
112 iff_chunk_len = GetLittleLong();
113 Con_Printf("0x%x : %s (%d)\n", (int)(data_p - 4), str, iff_chunk_len);
114 data_p += (iff_chunk_len + 1) & ~1;
115 } while (data_p < iff_end);
125 static wavinfo_t GetWavinfo (char *name, unsigned char *wav, int wavlength)
132 memset (&info, 0, sizeof(info));
138 iff_end = wav + wavlength;
142 if (!(data_p && !strncmp((const char *)data_p+8, "WAVE", 4)))
144 Con_Print("Missing RIFF/WAVE chunks\n");
149 iff_data = data_p + 12;
155 Con_Print("Missing fmt chunk\n");
159 format = GetLittleShort();
162 Con_Print("Microsoft PCM format only\n");
166 info.channels = GetLittleShort();
167 info.rate = GetLittleLong();
169 info.width = GetLittleShort() / 8;
176 info.loopstart = GetLittleLong();
178 // if the next chunk is a LIST chunk, look for a cue length marker
179 FindNextChunk ("LIST");
182 if (!strncmp ((const char *)data_p + 28, "mark", 4))
183 { // this is not a proper parse, but it works with cooledit...
185 i = GetLittleLong (); // samples in loop
186 info.samples = info.loopstart + i;
197 Con_Print("Missing data chunk\n");
202 samples = GetLittleLong () / info.width / info.channels;
206 if (samples < info.samples)
208 Con_Printf ("Sound %s has a bad loop length\n", name);
209 info.samples = samples;
213 info.samples = samples;
215 info.dataofs = data_p - wav;
226 static const snd_buffer_t* WAV_FetchSound (void *sfxfetcher, void **chfetcherpointer, unsigned int *start, unsigned int nbsampleframes)
229 return (snd_buffer_t *)sfxfetcher;
237 static void WAV_FreeSfx (void *sfxfetcherdata)
239 snd_buffer_t* sb = (snd_buffer_t *)sfxfetcherdata;
240 // Free the sound buffer
249 static const snd_format_t* WAV_GetFormat (sfx_t* sfx)
251 snd_buffer_t* sb = (snd_buffer_t *)sfx->fetcher_data;
255 const snd_fetcher_t wav_fetcher = { WAV_FetchSound, NULL, WAV_FreeSfx, WAV_GetFormat };
263 qboolean S_LoadWavFile (const char *filename, sfx_t *sfx)
265 fs_offset_t filesize;
268 snd_format_t wav_format;
272 if (sfx->fetcher != NULL)
276 data = FS_LoadFile(filename, snd_mempool, false, &filesize);
280 // Don't try to load it if it's not a WAV file
281 if (memcmp (data, "RIFF", 4) || memcmp (data + 8, "WAVE", 4))
287 if (developer_loading.integer >= 2)
288 Con_Printf ("Loading WAV file \"%s\"\n", filename);
290 info = GetWavinfo (sfx->name, data, (int)filesize);
291 if (info.channels < 1 || info.channels > 2) // Stereo sounds are allowed (intended for music)
293 Con_Printf("%s has an unsupported number of channels (%i)\n",sfx->name, info.channels);
297 //if (info.channels == 2)
298 // Log_Printf("stereosounds.log", "%s\n", sfx->name);
300 // We must convert the WAV data from little endian
301 // to the machine endianess before resampling it
302 if (info.width == 2 && mem_bigendian)
307 len = info.samples * info.channels;
308 ptr = (short*)(data + info.dataofs);
309 for (i = 0; i < len; i++)
310 ptr[i] = LittleShort (ptr[i]);
313 wav_format.speed = info.rate;
314 wav_format.width = info.width;
315 wav_format.channels = info.channels;
316 sb = Snd_CreateSndBuffer (data + info.dataofs, info.samples, &wav_format, snd_renderbuffer->format.speed);
322 sfx->fetcher = &wav_fetcher;
323 sfx->fetcher_data = sb;
325 sfx->total_length = sb->nbframes;
326 sfx->memsize += sb->maxframes * sb->format.channels * sb->format.width + sizeof (*sb) - sizeof (sb->samples);
328 if (info.loopstart < 0)
329 sfx->loopstart = sfx->total_length;
331 sfx->loopstart = (unsigned int) ((double)info.loopstart * (double)sb->format.speed / (double)info.rate);
332 sfx->loopstart = min(sfx->loopstart, sfx->total_length);
333 sfx->flags &= ~SFXFLAG_STREAMED;