#include "quakedef.h"
-int cache_full_cycle;
-
-byte *S_Alloc (int size);
+qbyte *S_Alloc (int size);
/*
================
ResampleSfx
================
*/
-void ResampleSfx (sfx_t *sfx, int inrate, byte *data)
+void ResampleSfx (sfx_t *sfx, int inrate, qbyte *data, char *name)
{
int outcount;
- int srcsample;
+ int srcsample, srclength;
float stepscale;
int i;
int samplefrac, fracstep;
sfxcache_t *sc;
- sc = Cache_Check (&sfx->cache);
+ sc = sfx->sfxcache;
if (!sc)
return;
stepscale = (float)inrate / shm->speed; // this is usually 0.5, 1, or 2
+ srclength = sc->length << sc->stereo;
+
outcount = sc->length / stepscale;
sc->length = outcount;
if (sc->loopstart != -1)
if (stepscale == 1/* && inwidth == 1*/ && sc->width == 1)
{
// fast special case
+ /*
// LordHavoc: I do not serve the readability gods...
int *indata, *outdata;
int count4, count1;
((short*)outdata)[0] = ((short*)indata)[0] ^ 0x8080;
if (count1 & 1)
((char*)outdata)[2] = ((char*)indata)[2] ^ 0x80;
- /*
- if (sc->stereo) // LordHavoc: stereo sound support
- {
- for (i=0 ; i<(outcount<<1) ; i++)
- ((signed char *)sc->data)[i] = (int)( (unsigned char)(data[i]) - 128);
- }
- else
- {
- for (i=0 ; i<outcount ; i++)
- ((signed char *)sc->data)[i] = (int)( (unsigned char)(data[i]) - 128);
- }
*/
+ if (sc->stereo) // LordHavoc: stereo sound support
+ outcount *= 2;
+ for (i=0 ; i<outcount ; i++)
+ ((signed char *)sc->data)[i] = ((unsigned char *)data)[i] - 128;
}
else if (stepscale == 1/* && inwidth == 2*/ && sc->width == 2) // LordHavoc: quick case for 16bit
{
if (sc->stereo) // LordHavoc: stereo sound support
- for (i=0 ; i<outcount*2 ;i++)
- ((short *)sc->data)[i] = LittleShort (((short *)data)[i]);
- else
- for (i=0 ; i<outcount ;i++)
- ((short *)sc->data)[i] = LittleShort (((short *)data)[i]);
+ outcount *= 2;
+ for (i=0 ; i<outcount ;i++)
+ ((short *)sc->data)[i] = LittleShort (((short *)data)[i]);
}
else
{
fracstep = stepscale*256;
if ((fracstep & 255) == 0) // skipping points on perfect multiple
{
- samplefrac >> 8;
srcsample = 0;
+ fracstep >>= 8;
if (sc->width == 2)
{
short *out = (void *)sc->data, *in = (void *)data;
if (sc->stereo) // LordHavoc: stereo sound support
{
fracstep <<= 1;
- for (i=0 ; i<outcount ;)
+ for (i=0 ; i<outcount ; i++)
{
- *out++ = (short) LittleShort (in[srcsample ]);
- *out++ = (short) LittleShort (in[srcsample+1]);
+ *out++ = LittleShort (in[srcsample ]);
+ *out++ = LittleShort (in[srcsample+1]);
srcsample += fracstep;
}
}
{
for (i=0 ; i<outcount ; i++)
{
- *out++ = (short) LittleShort (in[srcsample ]);
+ *out++ = LittleShort (in[srcsample ]);
srcsample += fracstep;
}
}
}
else
{
- signed char *out = (void *)sc->data, *in = (void *)data;
+ signed char *out = (void *)sc->data;
+ unsigned char *in = (void *)data;
if (sc->stereo) // LordHavoc: stereo sound support
{
fracstep <<= 1;
- for (i=0 ; i<outcount ;)
+ for (i=0 ; i<outcount ; i++)
{
- *out++ = (signed char) in[srcsample ] - 128;
- *out++ = (signed char) in[srcsample+1] - 128;
+ *out++ = in[srcsample ] - 128;
+ *out++ = in[srcsample+1] - 128;
srcsample += fracstep;
}
}
{
for (i=0 ; i<outcount ; i++)
{
- *out++ = (signed char) in[srcsample ] - 128;
+ *out++ = in[srcsample ] - 128;
srcsample += fracstep;
}
}
}
else
{
+ int sample;
+ int a, b;
if (sc->width == 2)
{
short *out = (void *)sc->data, *in = (void *)data;
if (sc->stereo) // LordHavoc: stereo sound support
{
- for (i=0 ; i<outcount ;)
+ for (i=0 ; i<outcount ; i++)
{
- srcsample = (samplefrac >> 7) & ~1;
+ srcsample = (samplefrac >> 8) << 1;
+ a = in[srcsample ];
+ if (srcsample+2 >= srclength)
+ b = 0;
+ else
+ b = in[srcsample+2];
+ sample = (((b - a) * (samplefrac & 255)) >> 8) + a;
+ *out++ = (short) sample;
+ a = in[srcsample+1];
+ if (srcsample+2 >= srclength)
+ b = 0;
+ else
+ b = in[srcsample+3];
+ sample = (((b - a) * (samplefrac & 255)) >> 8) + a;
+ *out++ = (short) sample;
samplefrac += fracstep;
- *out++ = (short) ((int) ((LittleShort (in[srcsample ]) * (256 - (samplefrac & 255)) + LittleShort (in[srcsample+2]) * (samplefrac & 255)) >> 8));
- *out++ = (short) ((int) ((LittleShort (in[srcsample+1]) * (256 - (samplefrac & 255)) + LittleShort (in[srcsample+3]) * (samplefrac & 255)) >> 8));
}
}
else
for (i=0 ; i<outcount ; i++)
{
srcsample = samplefrac >> 8;
+ a = in[srcsample ];
+ if (srcsample+1 >= srclength)
+ b = 0;
+ else
+ b = in[srcsample+1];
+ sample = (((b - a) * (samplefrac & 255)) >> 8) + a;
+ *out++ = (short) sample;
samplefrac += fracstep;
- *out++ = (short) ((int) ((LittleShort (in[srcsample] ) * (256 - (samplefrac & 255)) + LittleShort (in[srcsample+1]) * (samplefrac & 255)) >> 8));
}
}
}
else
{
- signed char *out = (void *)sc->data, *in = (void *)data;
+ signed char *out = (void *)sc->data;
+ unsigned char *in = (void *)data;
if (sc->stereo) // LordHavoc: stereo sound support
{
- for (i=0 ; i<outcount ;)
+ for (i=0 ; i<outcount ; i++)
{
- srcsample = (samplefrac >> 7) & ~1;
+ srcsample = (samplefrac >> 8) << 1;
+ a = (int) in[srcsample ] - 128;
+ if (srcsample+2 >= srclength)
+ b = 0;
+ else
+ b = (int) in[srcsample+2] - 128;
+ sample = (((b - a) * (samplefrac & 255)) >> 8) + a;
+ *out++ = (signed char) sample;
+ a = (int) in[srcsample+1] - 128;
+ if (srcsample+2 >= srclength)
+ b = 0;
+ else
+ b = (int) in[srcsample+3] - 128;
+ sample = (((b - a) * (samplefrac & 255)) >> 8) + a;
+ *out++ = (signed char) sample;
samplefrac += fracstep;
- *out++ = (signed char) ((int) (((((unsigned char) in[srcsample ] - 128) * (256 - (samplefrac & 255))) + (((unsigned char) in[srcsample+2] - 128) * (samplefrac & 255))) >> 8));
- *out++ = (signed char) ((int) (((((unsigned char) in[srcsample+1] - 128) * (256 - (samplefrac & 255))) + (((unsigned char) in[srcsample+3] - 128) * (samplefrac & 255))) >> 8));
}
}
else
for (i=0 ; i<outcount ; i++)
{
srcsample = samplefrac >> 8;
+ a = (int) in[srcsample ] - 128;
+ if (srcsample+1 >= srclength)
+ b = 0;
+ else
+ b = (int) in[srcsample+1] - 128;
+ sample = (((b - a) * (samplefrac & 255)) >> 8) + a;
+ *out++ = (signed char) sample;
samplefrac += fracstep;
- *out++ = (signed char) ((int) (((((unsigned char) in[srcsample ] - 128) * (256 - (samplefrac & 255))) + (((unsigned char) in[srcsample+1] - 128) * (samplefrac & 255))) >> 8));
}
}
}
}
}
+
+ // LordHavoc: use this for testing if it ever becomes useful again
+#if 0
+ COM_WriteFile (va("sound/%s.pcm", name), sc->data, (sc->length << sc->stereo) * sc->width);
+#endif
}
//=============================================================================
sfxcache_t *S_LoadSound (sfx_t *s)
{
char namebuffer[256];
- byte *data;
+ qbyte *data;
wavinfo_t info;
int len;
float stepscale;
sfxcache_t *sc;
- byte stackbuf[1*1024]; // avoid dirtying the cache heap
// see if still in memory
- sc = Cache_Check (&s->cache);
- if (sc)
- return sc;
+ if (s->sfxcache)
+ return s->sfxcache;
//Con_Printf ("S_LoadSound: %x\n", (int)stackbuf);
// load it in
// Con_Printf ("loading %s\n",namebuffer);
- data = COM_LoadStackFile(namebuffer, stackbuf, sizeof(stackbuf), false);
+ data = COM_LoadFile(namebuffer, false);
if (!data)
{
if (info.channels < 1 || info.channels > 2)
{
Con_Printf ("%s has an unsupported number of channels (%i)\n",s->name, info.channels);
+ Mem_Free(data);
return NULL;
}
/*
}
*/
- stepscale = (float)info.rate / shm->speed;
+ stepscale = (float)info.rate / shm->speed;
len = info.samples / stepscale;
len = len * info.width * info.channels;
- sc = Cache_Alloc ( &s->cache, len + sizeof(sfxcache_t), s->name);
+ // FIXME: add S_UnloadSounds or something?
+ Mem_FreePool(&s->mempool);
+ s->mempool = Mem_AllocPool(s->name);
+ sc = s->sfxcache = Mem_Alloc(s->mempool, len + sizeof(sfxcache_t));
if (!sc)
+ {
+ Mem_Free(data);
return NULL;
-
+ }
+
sc->length = info.samples;
sc->loopstart = info.loopstart;
sc->speed = info.rate;
sc->width = info.width;
sc->stereo = info.channels == 2;
- ResampleSfx (s, sc->speed, data + info.dataofs);
+ ResampleSfx (s, sc->speed, data + info.dataofs, s->name);
+ Mem_Free(data);
return sc;
}
*/
-byte *data_p;
-byte *iff_end;
-byte *last_chunk;
-byte *iff_data;
+qbyte *data_p;
+qbyte *iff_end;
+qbyte *last_chunk;
+qbyte *iff_data;
int iff_chunk_len;
GetWavinfo
============
*/
-wavinfo_t GetWavinfo (char *name, byte *wav, int wavlength)
+wavinfo_t GetWavinfo (char *name, qbyte *wav, int wavlength)
{
wavinfo_t info;
int i;