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 (channel_t* ch, unsigned int *start, unsigned int nbsampleframes)
229 return (snd_buffer_t *)ch->sfx->fetcher_data;
237 static void WAV_FreeSfx (sfx_t* sfx)
239 snd_buffer_t* sb = (snd_buffer_t *)sfx->fetcher_data;
241 // Free the sound buffer
242 sfx->memsize -= (sb->maxframes * sb->format.channels * sb->format.width) + sizeof (*sb) - sizeof (sb->samples);
245 sfx->fetcher_data = NULL;
254 static const snd_format_t* WAV_GetFormat (sfx_t* sfx)
256 snd_buffer_t* sb = (snd_buffer_t *)sfx->fetcher_data;
260 const snd_fetcher_t wav_fetcher = { WAV_FetchSound, NULL, WAV_FreeSfx, WAV_GetFormat };
268 qboolean S_LoadWavFile (const char *filename, sfx_t *sfx)
270 fs_offset_t filesize;
273 snd_format_t wav_format;
277 if (sfx->fetcher != NULL)
281 data = FS_LoadFile(filename, snd_mempool, false, &filesize);
285 // Don't try to load it if it's not a WAV file
286 if (memcmp (data, "RIFF", 4) || memcmp (data + 8, "WAVE", 4))
292 Con_DPrintf ("Loading WAV file \"%s\"\n", filename);
294 info = GetWavinfo (sfx->name, data, (int)filesize);
295 if (info.channels < 1 || info.channels > 2) // Stereo sounds are allowed (intended for music)
297 Con_Printf("%s has an unsupported number of channels (%i)\n",sfx->name, info.channels);
301 //if (info.channels == 2)
302 // Log_Printf("stereosounds.log", "%s\n", sfx->name);
304 #if BYTE_ORDER != LITTLE_ENDIAN
305 // We must convert the WAV data from little endian
306 // to the machine endianess before resampling it
312 len = info.samples * info.channels;
313 ptr = (short*)(data + info.dataofs);
314 for (i = 0; i < len; i++)
315 ptr[i] = LittleShort (ptr[i]);
319 wav_format.speed = info.rate;
320 wav_format.width = info.width;
321 wav_format.channels = info.channels;
322 sb = Snd_CreateSndBuffer (data + info.dataofs, info.samples, &wav_format, snd_renderbuffer->format.speed);
328 sfx->fetcher = &wav_fetcher;
329 sfx->fetcher_data = sb;
331 sfx->total_length = sb->nbframes;
332 sfx->memsize += sb->maxframes * sb->format.channels * sb->format.width + sizeof (*sb) - sizeof (sb->samples);
334 if (info.loopstart < 0)
337 sfx->loopstart = (double)info.loopstart * (double)snd_renderbuffer->format.speed / (double)sb->format.speed;
338 sfx->flags &= ~SFXFLAG_STREAMED;