Counter Strike : Global Offensive Source Code
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

5438 lines
164 KiB

//========= Copyright (c) 1996-2005, Valve Corporation, All rights reserved. ============//
//
// Purpose: Portable code to mix sounds for snd_dma.cpp.
//
//=============================================================================//
#include "audio_pch.h"
#include "mouthinfo.h"
#include "../../cl_main.h"
#include "icliententitylist.h"
#include "icliententity.h"
#include "../../sys_dll.h"
#include "avi/iavi.h"
#include "snd_op_sys/sos_system.h"
#include "tier0/cache_hints.h"
#ifdef GNUC
// we don't suport the ASM in this file right now under GCC, fallback to C libs
#undef id386
#endif
// memdbgon must be the last include file in a .cpp file!!!
#include "tier0/memdbgon.h"
#if defined(_WIN32) && id386
// warning C4731: frame pointer register 'ebp' modified by inline assembly code
#pragma warning(disable : 4731)
#endif
// NOTE: !!!!!! YOU MUST UPDATE SND_MIXA.S IF THIS VALUE IS CHANGED !!!!!
#define SND_SCALE_BITS 7
#define SND_SCALE_SHIFT (8-SND_SCALE_BITS)
#define SND_SCALE_LEVELS (1<<SND_SCALE_BITS)
#define SND_SCALE_BITS16 8
#define SND_SCALE_SHIFT16 (8-SND_SCALE_BITS16)
#define SND_SCALE_LEVELS16 (1<<SND_SCALE_BITS16)
// In debug, we are going to compare the old code and the new code and make sure we get the exact same output
#if _DEBUG
# define CHECK_VALUES_AFTER_REFACTORING 1
# define CULLED_VOLUME 0 // If we check value, we can't cull the volume (otherwise will create false-positive asserts)
portable_samplepair_t * DuplicateSamplePairs(portable_samplepair_t * pInputBuffer, int nSampleCount);
void FreeDuplicatedSamplePairs( portable_samplepair_t * pInputBuffer, int nSampleCount );
#else
# define CHECK_VALUES_AFTER_REFACTORING 0
# define CULLED_VOLUME 1 // Volume of 1 or less will be culled
#endif
ConVar snd_mix_optimization( "snd_mix_optimization", "0", FCVAR_NONE, "Turns optimization on for mixing if set to 1 (default). 0 to turn the optimization off." );
ConVar snd_mix_soundchar_enabled( "snd_mix_soundchar_enabled", "1", FCVAR_NONE, "Turns sound char on for mixing if set to 1 (default). 0 to turn the sound char off and use default behavior (spatial instead of doppler, directional, etc...)." );
ConVar snd_hrtf_volume("snd_hrtf_volume", "0.8", FCVAR_CHEAT, "Controls volume of HRTF sounds");
#define SKIP_MIXING_IF_TOTAL_VOLUME_LESS_OR_EQUAL_THAN 0
void Snd_WriteLinearBlastStereo16(void);
void SND_PaintChannelFrom8( portable_samplepair_t *pOutput, int *volume, byte *pData8, int count );
bool Con_IsVisible( void );
void SND_RecordBuffer( void );
bool DSP_RoomDSPIsOff( void );
bool BChannelLowVolume( channel_t *pch, float vol_min );
void ChannelCopyVolumes( channel_t *pch, float *pvolume_dest, int ivol_start, int cvol );
float ChannelLoudestCurVolume( const channel_t * RESTRICT pch );
extern int64 g_soundtime;
extern float host_frametime;
extern float host_frametime_unbounded;
extern CScratchPad g_scratchpad;
#if !defined( NO_VOICE )
extern int g_SND_VoiceOverdriveInt;
#endif
extern ConVar dsp_room;
extern ConVar dsp_water;
extern ConVar dsp_player;
extern ConVar dsp_facingaway;
extern ConVar snd_showstart;
extern ConVar dsp_automatic;
extern ConVar snd_pitchquality;
extern float DSP_ROOM_MIX;
extern float DSP_NOROOM_MIX;
portable_samplepair_t *g_paintbuffer;
// temp paintbuffer - not included in main list of paintbuffers
// NOTE: this paintbuffer is also used as a copy buffer by interpolating pitch
// shift routines. Decreasing TEMP_COPY_BUFFER_SIZE (or PAINTBUFFER_MEM_SIZE)
// will decrease the maximum pitch level (current 4.0)!
portable_samplepair_t *g_temppaintbuffer = NULL;
paintbuffer_t *g_paintBuffers = NULL;
#define IPAINTBUFFER 0
#define IROOMBUFFER 1
#define IFACINGBUFFER 2
#define IFACINGAWAYBUFFER 3
#define IDRYBUFFER 4
#define ISPEAKERBUFFER 5
// pointer to current paintbuffer (front and rear), used by all mixing, upsampling and dsp routines
portable_samplepair_t *g_curpaintbuffer = NULL;
portable_samplepair_t *g_currearpaintbuffer = NULL;
portable_samplepair_t *g_curcenterpaintbuffer = NULL;
bool g_bdirectionalfx;
bool g_bDspOff;
float g_dsp_volume;
// dsp performance timing
unsigned g_snd_call_time_debug = 0;
unsigned g_snd_time_debug = 0;
unsigned g_snd_count_debug = 0;
unsigned g_snd_samplecount = 0;
unsigned g_snd_frametime = 0;
unsigned g_snd_frametime_total = 0;
int g_snd_profile_type = 0; // type 1 dsp, type 2 mixer, type 3 load sound, type 4 all sound
#define FILTERTYPE_NONE 0
#define FILTERTYPE_LINEAR 1
#define FILTERTYPE_CUBIC 2
// filter memory for upsampling
portable_samplepair_t cubicfilter1[3] = {{0,0},{0,0},{0,0}};
portable_samplepair_t cubicfilter2[3] = {{0,0},{0,0},{0,0}};
portable_samplepair_t linearfilter1[1] = {0,0};
portable_samplepair_t linearfilter2[1] = {0,0};
portable_samplepair_t linearfilter3[1] = {0,0};
portable_samplepair_t linearfilter4[1] = {0,0};
portable_samplepair_t linearfilter5[1] = {0,0};
portable_samplepair_t linearfilter6[1] = {0,0};
portable_samplepair_t linearfilter7[1] = {0,0};
portable_samplepair_t linearfilter8[1] = {0,0};
int snd_scaletable[SND_SCALE_LEVELS][256]; // 32k*4 = 128K
int *snd_p, snd_linear_count, snd_vol;
short *snd_out;
extern CThreadFastMutex g_SoundMapMutex; // From snd_dma.cpp
bool DSP_CheckDspAutoEnabled( void );
int Get_idsp_room ( void );
int dsp_room_GetInt ( void );
void DSP_SetDspAuto( int dsp_preset );
bool DSP_CheckDspAutoEnabled( void );
// Get a pointer to a buffer that summarizes the state of the audio system, for
// ETW or crash dump purposes. It is char* instead of const char* so that we
// can optionally convert line-feeds to tabs in-place for better ETW compatibility.
char* Status_UpdateAudioBuffer()
{
static char buffer[4094];
buffer[0] = 0;
CUtlBuffer buf( buffer, sizeof(buffer), CUtlBuffer::TEXT_BUFFER );
buf.Printf( "Audio: total_channels=%d, Active Channels=%d, g_bdirectionalfx=%d, g_bDspOff=%d\n", total_channels, g_ActiveChannels.GetActiveCount(), g_bdirectionalfx, g_bDspOff );
g_ActiveChannels.DumpChannelInfo( buf );
return buffer;
}
void MIX_ScalePaintBuffer( int bufferIndex, int count, float fgain );
//-----------------------------------------------------------------------------
// Free allocated memory buffers
//-----------------------------------------------------------------------------
void MIX_FreeAllPaintbuffers(void)
{
if ( g_paintBuffers )
{
if ( g_temppaintbuffer )
{
_aligned_free( g_temppaintbuffer );
g_temppaintbuffer = NULL;
}
for ( int i = 0; i < CPAINTBUFFERS; i++ )
{
if ( g_paintBuffers[i].pbuf )
{
_aligned_free( g_paintBuffers[i].pbuf );
}
if ( g_paintBuffers[i].pbufrear )
{
_aligned_free( g_paintBuffers[i].pbufrear );
}
if ( g_paintBuffers[i].pbufcenter )
{
_aligned_free( g_paintBuffers[i].pbufcenter );
}
}
free( g_paintBuffers );
g_paintBuffers = NULL;
}
}
//-----------------------------------------------------------------------------
// Allocate memory buffers
// Initialize paintbuffers array, set current paint buffer to main output buffer IPAINTBUFFER
//-----------------------------------------------------------------------------
bool MIX_InitAllPaintbuffers(void)
{
bool bSurround;
bool bSurroundCenter;
int i;
bSurroundCenter = g_AudioDevice->IsSurroundCenter();
bSurround = g_AudioDevice->IsSurround() || bSurroundCenter;
g_paintBuffers = (paintbuffer_t *)malloc( CPAINTBUFFERS*sizeof( paintbuffer_t ) );
V_memset( g_paintBuffers, 0, CPAINTBUFFERS*sizeof( paintbuffer_t ) );
g_temppaintbuffer = (portable_samplepair_t*)_aligned_malloc( TEMP_COPY_BUFFER_SIZE*sizeof(portable_samplepair_t), 16 );
V_memset( g_temppaintbuffer, 0, TEMP_COPY_BUFFER_SIZE*sizeof(portable_samplepair_t) );
for ( i=0; i<CPAINTBUFFERS; i++ )
{
g_paintBuffers[i].pbuf = (portable_samplepair_t *)_aligned_malloc( PAINTBUFFER_MEM_SIZE*sizeof(portable_samplepair_t), 16 );
V_memset( g_paintBuffers[i].pbuf, 0, PAINTBUFFER_MEM_SIZE*sizeof(portable_samplepair_t) );
if ( bSurround )
{
g_paintBuffers[i].pbufrear = (portable_samplepair_t *)_aligned_malloc( PAINTBUFFER_MEM_SIZE*sizeof(portable_samplepair_t), 16 );
V_memset( g_paintBuffers[i].pbufrear, 0, PAINTBUFFER_MEM_SIZE*sizeof(portable_samplepair_t) );
}
if ( bSurroundCenter )
{
g_paintBuffers[i].pbufcenter = (portable_samplepair_t *)_aligned_malloc( PAINTBUFFER_MEM_SIZE*sizeof(portable_samplepair_t), 16 );
V_memset( g_paintBuffers[i].pbufcenter, 0, PAINTBUFFER_MEM_SIZE*sizeof(portable_samplepair_t) );
}
}
g_paintbuffer = g_paintBuffers[IPAINTBUFFER].pbuf;
// buffer flags
g_paintBuffers[IROOMBUFFER].flags = SOUND_BUSS_ROOM;
g_paintBuffers[IFACINGBUFFER].flags = SOUND_BUSS_FACING;
g_paintBuffers[IFACINGAWAYBUFFER].flags = SOUND_BUSS_FACINGAWAY;
g_paintBuffers[ISPEAKERBUFFER].flags = SOUND_BUSS_SPEAKER;
g_paintBuffers[IDRYBUFFER].flags = SOUND_BUSS_DRY;
// buffer surround sound flag
g_paintBuffers[IPAINTBUFFER].fsurround = bSurround;
g_paintBuffers[IFACINGBUFFER].fsurround = bSurround;
g_paintBuffers[IFACINGAWAYBUFFER].fsurround = bSurround;
g_paintBuffers[IDRYBUFFER].fsurround = bSurround;
// buffer 5 channel surround sound flag
g_paintBuffers[IPAINTBUFFER].fsurround_center = bSurroundCenter;
g_paintBuffers[IFACINGBUFFER].fsurround_center = bSurroundCenter;
g_paintBuffers[IFACINGAWAYBUFFER].fsurround_center = bSurroundCenter;
g_paintBuffers[IDRYBUFFER].fsurround_center = bSurroundCenter;
// room buffer mixes down to mono or stereo, never to 4 or 5 ch
g_paintBuffers[IROOMBUFFER].fsurround = false;
g_paintBuffers[IROOMBUFFER].fsurround_center = false;
// speaker buffer mixes to mono
g_paintBuffers[ISPEAKERBUFFER].fsurround = false;
g_paintBuffers[ISPEAKERBUFFER].fsurround_center = false;
MIX_SetCurrentPaintbuffer( IPAINTBUFFER );
return true;
}
// called before loading samples to mix - cap the mix rate (ie: pitch) so that
// we never overflow the mix copy buffer.
double MIX_GetMaxRate( double rate, int sampleCount )
{
if (rate <= 2.0)
return rate;
// copybuf_bytes = rate_max * samples_max * samplesize_max
// so:
// rate_max = copybuf_bytes / (samples_max * samplesize_max )
double samplesize_max = 4.0; // stereo 16bit samples
double copybuf_bytes = (double)(TEMP_COPY_BUFFER_SIZE * sizeof(portable_samplepair_t));
double samples_max = (double)(PAINTBUFFER_SIZE);
double rate_max = copybuf_bytes / (samples_max * samplesize_max);
// make sure sampleCount is never greater than paintbuffer samples
// (this should have been set up in MIX_PaintChannels)
Assert (sampleCount <= PAINTBUFFER_SIZE);
return fpmin( rate, rate_max );
}
// Transfer (endtime - lpaintedtime) stereo samples in pfront out to hardware
// pfront - pointer to stereo paintbuffer - 32 bit samples, interleaved stereo
// lpaintedtime - total number of 32 bit stereo samples previously output to hardware
// endtime - total number of 32 bit stereo samples currently mixed in paintbuffer
#if USE_AUDIO_DEVICE_V1
void S_TransferStereo16( void *pOutput, const portable_samplepair_t *pfront, int64 lpaintedtime, int64 endtime )
{
int lpos;
if ( IsX360() )
{
// not the right path for 360
Assert( 0 );
return;
}
Assert( pOutput );
snd_vol = S_GetMasterVolume()*256;
snd_p = (int *)pfront;
// get size of output buffer in full samples (LR pairs)
int samplePairCount = g_AudioDevice->DeviceSampleCount() >> 1;
int sampleMask = samplePairCount - 1;
bool bShouldPlaySound = !cl_movieinfo.IsRecording();
while ( lpaintedtime < endtime )
{
// pbuf can hold 16384, 16 bit L/R samplepairs.
// lpaintedtime - where to start painting into dma buffer.
// (modulo size of dma buffer for current position).
// handle recirculating buffer issues
// lpos - samplepair index into dma buffer. First samplepair from paintbuffer to be xfered here.
lpos = lpaintedtime & sampleMask;
// snd_out is L/R sample index into dma buffer. First L sample from paintbuffer goes here.
snd_out = (short *)pOutput + (lpos<<1);
// snd_linear_count is number of samplepairs between end of dma buffer and xfer start index.
snd_linear_count = samplePairCount - lpos;
// clamp snd_linear_count to be only as many samplepairs premixed
if ( snd_linear_count > endtime - lpaintedtime )
{
// endtime - lpaintedtime = number of premixed sample pairs ready for xfer.
snd_linear_count = endtime - lpaintedtime;
}
// snd_linear_count is now number of mono 16 bit samples (L and R) to xfer.
snd_linear_count <<= 1;
// write a linear blast of samples
SND_RecordBuffer();
if ( bShouldPlaySound )
{
// transfer 16bit samples from snd_p into snd_out, multiplying each sample by volume.
Snd_WriteLinearBlastStereo16();
}
// advance paintbuffer pointer
snd_p += snd_linear_count;
// advance lpaintedtime by number of samplepairs just xfered.
lpaintedtime += (snd_linear_count>>1);
}
}
#endif
/*
===============================================================================
CHANNEL MIXING
===============================================================================
*/
// free channel so that it may be allocated by the
// next request to play a sound. If sound is a
// word in a sentence, release the sentence.
// Works for static, dynamic, sentence and stream sounds
extern ConVar snd_find_channel;
void PrintChannel( const char *pText1, const char *pFileName, channel_t * pChannel, const char *pText2 = NULL );
void S_FreeChannel(channel_t *ch)
{
// Don't reenter in here (can happen inside voice code).
if ( ch->flags.m_bIsFreeingChannel )
return;
ch->flags.m_bIsFreeingChannel = true;
if ( (*snd_find_channel.GetString()) != '\0' )
{
if ( ch->sfx != NULL )
{
char sndname[MAX_PATH];
ch->sfx->GetFileName( sndname, sizeof( sndname ) );
if ( Q_stristr( sndname, snd_find_channel.GetString() ) != 0 )
{
PrintChannel( "FreeChannel", sndname, ch, "from ConVar snd_find_channel." );
}
}
}
SND_CloseMouth(ch);
if ( !IsGameConsole() )
{
char nameBuf[MAX_PATH];
g_pSoundServices->OnSoundStopped( ch->guid, ch->soundsource, ch->entchannel, ch->sfx->getname(nameBuf, sizeof(nameBuf)) );
}
ch->flags.isSentence = false;
// Msg("End sound %s\n", ch->sfx->getname() );
delete ch->pMixer;
ch->pMixer = NULL;
ch->sfx = NULL;
ch->m_nSoundScriptHash = SOUNDEMITTER_INVALID_HASH;
if( ch->m_pStackList )
{
delete ch->m_pStackList;
ch->m_pStackList = NULL;
}
// zero all data in channel
g_ActiveChannels.Remove( ch );
Q_memset(ch, 0, sizeof(channel_t));
}
extern ConVar host_timescale;
ConVar snd_pause_all( "snd_pause_all", "1", FCVAR_CHEAT, "Specifies to pause all sounds and not just voice" );
// Mix all channels into active paintbuffers until paintbuffer is full or 'endtime' is reached.
// endtime: time in 44khz samples to mix
// rate: ignore samples which are not natively at this rate (for multipass mixing/filtering)
// if rate == SOUND_ALL_RATES then mix all samples this pass
// flags: if SOUND_MIX_DRY, then mix only samples with channel flagged as 'dry'
// outputRate: target mix rate for all samples. Note, if outputRate = SOUND_DMA_SPEED, then
// this routine will fill the paintbuffer to endtime. Otherwise, fewer samples are mixed.
// if (endtime - paintedtime) is not aligned on boundaries of 4,
// we'll miss data if outputRate < SOUND_DMA_SPEED!
void MIX_MixChannelsToPaintbuffer( CChannelList &list, int64 endtime, int flags, int rate, int outputRate )
{
VPROF( "MixChannelsToPaintbuffer" );
int i;
int sampleCount;
// mix each channel into paintbuffer
// validate parameters
Assert( outputRate <= SOUND_DMA_SPEED );
Assert( !((endtime - g_paintedtime) & 0x3) || (outputRate == SOUND_DMA_SPEED) ); // make sure we're not discarding data
// 44k: try to mix this many samples at outputRate
sampleCount = ( endtime - g_paintedtime ) / ( SOUND_DMA_SPEED / outputRate );
if ( sampleCount <= 0 )
return;
// Apply host_timescale as a global pitch shift
float flGlobalPitchScale = host_timescale.GetFloat();
extern IVEngineClient *engineClient;
if ( engineClient )
{
flGlobalPitchScale = engineClient->GetTimescale();
}
for ( i = list.Count(); --i >= 0; )
{
channel_t *ch = list.GetChannel( i );
Assert( ch->sfx );
// must never have a 'dry' and 'speaker' set - causes double mixing & double data reading
Assert ( !( ch->flags.bdry && ch->flags.bSpeaker ) );
// if mixing with SOUND_MIX_DRY flag, ignore (don't even load) all channels not flagged as 'dry'
if ( flags == SOUND_MIX_DRY )
{
if ( !ch->flags.bdry )
continue;
}
// if mixing with SOUND_MIX_WET flag, ignore (don't even load) all channels flagged as 'dry' or 'speaker'
if ( flags == SOUND_MIX_WET )
{
if ( ch->flags.bdry || ch->flags.bSpeaker )
continue;
}
// if mixing with SOUND_MIX_SPEAKER flag, ignore (don't even load) all channels not flagged as 'speaker'
if ( flags == SOUND_MIX_SPEAKER )
{
if ( !ch->flags.bSpeaker )
continue;
}
// multipass mixing - only mix samples of specified sample rate
switch ( rate )
{
case SOUND_11k:
case SOUND_22k:
case SOUND_44k:
if ( rate != ch->sfx->pSource->SampleRate() )
continue;
break;
default:
case SOUND_ALL_RATES:
break;
}
// Tracker 20771, if breen is speaking through the monitor, the client doesn't have an entity
// for the "soundsource" but we still need the lipsync to pause if the game is paused. Therefore
// I changed SND_IsMouth to look for any .wav on any channels which has sentence data
bool bIsMouth = ch->flags.m_bHasMouth;
bool bShouldPause = IsGameConsole() ? !ch->sfx->m_bIsUISound : bIsMouth;
if( snd_pause_all.GetInt() )
{
bShouldPause = !ch->sfx->m_bIsUISound;
}
// Tracker 14637: Pausing the game pauses voice sounds, but not other sounds...
if ( bShouldPause && g_pSoundServices->IsGamePaused() )
{
continue;
}
if ( bIsMouth && ch->flags.m_bHasMouth )
{
SND_MoveMouth8(ch, ch->sfx->pSource, sampleCount);
}
// mix channel to all active paintbuffers:
// mix 'dry' sounds only to dry paintbuffer.
// mix 'speaker' sounds only to speaker paintbuffer.
// mix all other sounds between room, facing & facingaway paintbuffers
// NOTE: must be called once per channel only - consecutive calls retrieve additional data.
float flPitch = ch->pitch;
ch->pitch *= flGlobalPitchScale;
if (list.IsQuashed(i))
{
// If the sound has been silenced as a performance heuristic, quash it.
ch->pMixer->SkipSamples( ch, sampleCount, outputRate, 0 );
// DevMsg("Quashed channel %d (%s)\n", i, ch->sfx->GetFileName());
}
else
{
ch->pMixer->MixDataToDevice( ch, sampleCount, outputRate, 0 );
}
// restore to original pitch settings
ch->pitch = flPitch;
if ( !ch->pMixer->ShouldContinueMixing() )
{
// stopping due to file elapsing
if( ch->m_pStackList )
{
ch->m_pStackList->Execute( CSosOperatorStack::SOS_STOP, ch, &g_scratchpad );
}
S_FreeChannel( ch );
list.RemoveChannelFromList(i);
}
}
}
// pass in index -1...count+2, return pointer to source sample in either paintbuffer or delay buffer
inline portable_samplepair_t * S_GetNextpFilter(int i, portable_samplepair_t *pbuffer, portable_samplepair_t *pfiltermem)
{
// The delay buffer is assumed to precede the paintbuffer by 6 duplicated samples
if (i == -1)
return (&(pfiltermem[0]));
if (i == 0)
return (&(pfiltermem[1]));
if (i == 1)
return (&(pfiltermem[2]));
// return from paintbuffer, where samples are doubled.
// even samples are to be replaced with interpolated value.
return (&(pbuffer[(i-2)*2 + 1]));
}
// pass forward over passed in buffer and cubic interpolate all odd samples
// pbuffer: buffer to filter (in place)
// prevfilter: filter memory. NOTE: this must match the filtertype ie: filtercubic[] for FILTERTYPE_CUBIC
// if NULL then perform no filtering. UNDONE: should have a filter memory array type
// count: how many samples to upsample. will become count*2 samples in buffer, in place.
void S_Interpolate2xCubic( portable_samplepair_t *pbuffer, portable_samplepair_t *pfiltermem, int cfltmem, int count )
{
// implement cubic interpolation on 2x upsampled buffer. Effectively delays buffer contents by 2 samples.
// pbuffer: contains samples at 0, 2, 4, 6...
// temppaintbuffer is temp buffer, of same or larger size than a paintbuffer, used to store processed values
// count: number of samples to process in buffer ie: how many samples at 0, 2, 4, 6...
// finpos is the fractional, inpos the integer part.
// finpos = 0.5 for upsampling by 2x
// inpos is the position of the sample
// xm1 = x [inpos - 1];
// x0 = x [inpos + 0];
// x1 = x [inpos + 1];
// x2 = x [inpos + 2];
// a = (3 * (x0-x1) - xm1 + x2) / 2;
// b = 2*x1 + xm1 - (5*x0 + x2) / 2;
// c = (x1 - xm1) / 2;
// y [outpos] = (((a * finpos) + b) * finpos + c) * finpos + x0;
int i, upCount = count << 1;
int a, b, c;
int xm1, x0, x1, x2;
portable_samplepair_t *psamp0;
portable_samplepair_t *psamp1;
portable_samplepair_t *psamp2;
portable_samplepair_t *psamp3;
int outpos = 0;
Assert (upCount <= PAINTBUFFER_SIZE);
// pfiltermem holds 6 samples from previous buffer pass
// process 'count' samples
for ( i = 0; i < count; i++)
{
// get source sample pointer
psamp0 = S_GetNextpFilter(i-1, pbuffer, pfiltermem);
psamp1 = S_GetNextpFilter(i, pbuffer, pfiltermem);
psamp2 = S_GetNextpFilter(i+1, pbuffer, pfiltermem);
psamp3 = S_GetNextpFilter(i+2, pbuffer, pfiltermem);
// write out original sample to interpolation buffer
g_temppaintbuffer[outpos++] = *psamp1;
// get all left samples for interpolation window
xm1 = psamp0->left;
x0 = psamp1->left;
x1 = psamp2->left;
x2 = psamp3->left;
// interpolate
a = (3 * (x0-x1) - xm1 + x2) / 2;
b = 2*x1 + xm1 - (5*x0 + x2) / 2;
c = (x1 - xm1) / 2;
// write out interpolated sample
g_temppaintbuffer[outpos].left = a/8 + b/4 + c/2 + x0;
// get all right samples for window
xm1 = psamp0->right;
x0 = psamp1->right;
x1 = psamp2->right;
x2 = psamp3->right;
// interpolate
a = (3 * (x0-x1) - xm1 + x2) / 2;
b = 2*x1 + xm1 - (5*x0 + x2) / 2;
c = (x1 - xm1) / 2;
// write out interpolated sample, increment output counter
g_temppaintbuffer[outpos++].right = a/8 + b/4 + c/2 + x0;
Assert( outpos <= TEMP_COPY_BUFFER_SIZE );
}
Assert(cfltmem >= 3);
// save last 3 samples from paintbuffer
pfiltermem[0] = pbuffer[upCount - 5];
pfiltermem[1] = pbuffer[upCount - 3];
pfiltermem[2] = pbuffer[upCount - 1];
// copy temppaintbuffer back into paintbuffer
for (i = 0; i < upCount; i++)
pbuffer[i] = g_temppaintbuffer[i];
}
// pass forward over passed in buffer and linearly interpolate all odd samples
// pbuffer: buffer to filter (in place)
// prevfilter: filter memory. NOTE: this must match the filtertype ie: filterlinear[] for FILTERTYPE_LINEAR
// if NULL then perform no filtering.
// count: how many samples to upsample. will become count*2 samples in buffer, in place.
void S_Interpolate2xLinear( portable_samplepair_t *pbuffer, portable_samplepair_t *pfiltermem, int cfltmem, int count )
{
int i, upCount = count<<1;
Assert (upCount <= PAINTBUFFER_SIZE);
Assert (cfltmem >= 1);
// use interpolation value from previous mix
pbuffer[0].left = (pfiltermem->left + pbuffer[0].left) >> 1;
pbuffer[0].right = (pfiltermem->right + pbuffer[0].right) >> 1;
for ( i = 2; i < upCount; i+=2)
{
// use linear interpolation for upsampling
pbuffer[i].left = (pbuffer[i].left + pbuffer[i-1].left) >> 1;
pbuffer[i].right = (pbuffer[i].right + pbuffer[i-1].right) >> 1;
}
// save last value to be played out in buffer
*pfiltermem = pbuffer[upCount - 1];
}
// Optimized routine. 2.27X faster than the above routine
void S_Interpolate2xLinear_2( int count, portable_samplepair_t *pbuffer, portable_samplepair_t *pfiltermem, int cfltmem )
{
Assert (cfltmem >= 1);
int sample = count-1;
int end = (count*2)-1;
portable_samplepair_t *pwrite = &pbuffer[end];
portable_samplepair_t *pread = &pbuffer[sample];
portable_samplepair_t last = pread[0];
pread--;
// PERFORMANCE: Unroll the loop 8 times. This improves speed quite a bit
// Looking at this code, there is a potential to make it SIMD friendly, the logic is simple, don't know if that would save though.
for ( ;sample >= 8; sample -= 8 )
{
pwrite[0] = last;
pwrite[-1].left = (pread[0].left + last.left)>>1;
pwrite[-1].right = (pread[0].right + last.right)>>1;
last = pread[0];
pwrite[-2] = last;
pwrite[-3].left = (pread[-1].left + last.left)>>1;
pwrite[-3].right = (pread[-1].right + last.right)>>1;
last = pread[-1];
pwrite[-4] = last;
pwrite[-5].left = (pread[-2].left + last.left)>>1;
pwrite[-5].right = (pread[-2].right + last.right)>>1;
last = pread[-2];
pwrite[-6] = last;
pwrite[-7].left = (pread[-3].left + last.left)>>1;
pwrite[-7].right = (pread[-3].right + last.right)>>1;
last = pread[-3];
pwrite[-8] = last;
pwrite[-9].left = (pread[-4].left + last.left)>>1;
pwrite[-9].right = (pread[-4].right + last.right)>>1;
last = pread[-4];
pwrite[-10] = last;
pwrite[-11].left = (pread[-5].left + last.left)>>1;
pwrite[-11].right = (pread[-5].right + last.right)>>1;
last = pread[-5];
pwrite[-12] = last;
pwrite[-13].left = (pread[-6].left + last.left)>>1;
pwrite[-13].right = (pread[-6].right + last.right)>>1;
last = pread[-6];
pwrite[-14] = last;
pwrite[-15].left = (pread[-7].left + last.left)>>1;
pwrite[-15].right = (pread[-7].right + last.right)>>1;
last = pread[-7];
pread -= 8;
pwrite -= 16;
}
while ( pread >= pbuffer )
{
pwrite[0] = last;
pwrite[-1].left = (pread[0].left + last.left)>>1;
pwrite[-1].right = (pread[0].right + last.right)>>1;
last = pread[0];
pread--;
pwrite-=2;
}
pbuffer[1] = last;
pbuffer[0].left = (pfiltermem->left + last.left) >> 1;
pbuffer[0].right = (pfiltermem->right + last.right) >> 1;
*pfiltermem = pbuffer[end];
}
FORCEINLINE
void WriteLeftRight( portable_samplepair_t *pWriteBuffer, int nLeft, int nRight )
{
// This should be replaced by one instruction by the compiler on X360 and PS3.
// Unfortunately it does not on X360, 4 instructions on top of the store. So do 2 stores instead like on PC.
//int64 nValue = ( (int64)nLeft << 32L ) | ( (int64)nRight & 0xffffffff );
//*(int64 *)pWriteBuffer = nValue;
pWriteBuffer->left = nLeft;
pWriteBuffer->right = nRight;
}
// Version with reduced LHS for console. (Optimized version ended up being much much slower than the "slow" version).
// This should be as fast or faster on PC too.
// TODO: Add code to compare before and after.
void S_Interpolate2xLinear_3( int count, portable_samplepair_t *pbuffer, portable_samplepair_t *pfiltermem, int cfltmem )
{
Assert (cfltmem >= 1);
int sample = count-1;
int end = (count*2)-1;
portable_samplepair_t *pwrite = &pbuffer[end];
portable_samplepair_t *pread = &pbuffer[sample];
int nLastLeft, nLastRight;
nLastLeft = pread[0].left;
nLastRight = pread[0].right;
pread--;
// PERFORMANCE: Unroll the loop 8 times. This improves speed quite a bit
// Looking at this code, there is a potential to make it SIMD friendly, the logic is simple, don't know if that would save though.
for ( ;sample >= 8; sample -= 8 )
{
WriteLeftRight( pwrite - 0, nLastLeft, nLastRight );
// We also alternate between nLeft0|nRight0 and nLeft1|nRight1 to avoid storing temp values back and forth.
int nLeft0, nRight0, nLeft1, nRight1;
nLeft0 = pread[0].left;
nRight0 = pread[0].right;
WriteLeftRight( pwrite - 1, (nLeft0 + nLastLeft) >> 1, (nRight0 + nLastRight) >> 1 );
WriteLeftRight( pwrite - 2, nLeft0, nRight0 );
nLeft1 = pread[-1].left;
nRight1 = pread[-1].right;
WriteLeftRight( pwrite - 3, (nLeft1 + nLeft0) >> 1, (nRight1 + nRight0) >> 1 );
WriteLeftRight( pwrite - 4, nLeft1, nRight1 );
nLeft0 = pread[-2].left;
nRight0 = pread[-2].right;
WriteLeftRight( pwrite - 5, ( nLeft0 + nLeft1 ) >> 1, ( nRight0 + nRight1 ) >> 1 );
WriteLeftRight( pwrite - 6, nLeft0, nRight0 );
nLeft1 = pread[-3].left;
nRight1 = pread[-3].right;
WriteLeftRight( pwrite - 7, ( nLeft1 + nLeft0 ) >> 1, ( nRight1 + nRight0 ) >> 1 );
WriteLeftRight( pwrite - 8, nLeft1, nRight1 );
nLeft0 = pread[-4].left;
nRight0 = pread[-4].right;
WriteLeftRight( pwrite - 9, ( nLeft0 + nLeft1 ) >> 1, ( nRight0 + nRight1 ) >> 1 );
WriteLeftRight( pwrite - 10, nLeft0, nRight0 );
nLeft1 = pread[-5].left;
nRight1 = pread[-5].right;
WriteLeftRight( pwrite - 11, ( nLeft1 + nLeft0 ) >> 1, ( nRight1 + nRight0 ) >> 1 );
WriteLeftRight( pwrite - 12, nLeft1, nRight1 );
nLeft0 = pread[-6].left;
nRight0 = pread[-6].right;
WriteLeftRight( pwrite - 13, (nLeft0 + nLeft1 ) >> 1, (nRight0 + nRight1 ) >> 1 );
WriteLeftRight( pwrite - 14, nLeft0, nRight0 );
// Use nLastLeft and nLastRight for next iteration or final loop.
nLastLeft = pread[-7].left;
nLastRight = pread[-7].right;
WriteLeftRight( pwrite - 15, (nLastLeft + nLeft0 ) >> 1, ( nLastRight + nRight0 ) >> 1 );
pread -= 8;
pwrite -= 16;
}
while ( pread >= pbuffer )
{
WriteLeftRight( pwrite - 0, nLastLeft, nLastRight );
int nLeft = pread[0].left;
int nRight = pread[0].right;
WriteLeftRight( pwrite - 1, ( nLeft + nLastLeft ) >> 1, ( nRight + nLastRight ) >> 1 );
nLastLeft = nLeft;
nLastRight = nRight;
pread--;
pwrite-=2;
}
WriteLeftRight( pbuffer + 1, nLastLeft, nLastRight );
WriteLeftRight( pbuffer + 0, (pfiltermem->left + nLastLeft) >> 1, (pfiltermem->right + nLastRight) >> 1);
*pfiltermem = pbuffer[end];
}
// upsample by 2x, optionally using interpolation
// count: how many samples to upsample. will become count*2 samples in buffer, in place.
// pbuffer: buffer to upsample into (in place)
// pfiltermem: filter memory. NOTE: this must match the filtertype ie: filterlinear[] for FILTERTYPE_LINEAR
// if NULL then perform no filtering.
// cfltmem: max number of sample pairs filter can use
// filtertype: FILTERTYPE_NONE, _LINEAR, _CUBIC etc. Must match prevfilter.
void S_MixBufferUpsample2x( int count, portable_samplepair_t *pbuffer, portable_samplepair_t *pfiltermem, int cfltmem, int filtertype )
{
// JAY: Optimized this routine. Test then remove old routine.
// NOTE: Has been proven equivalent by comparing output.
if ( filtertype == FILTERTYPE_LINEAR )
{
#if CHECK_VALUES_AFTER_REFACTORING
portable_samplepair_t *pTempBuffer = (portable_samplepair_t *)alloca( 2 * count * sizeof(portable_samplepair_t) );
memcpy( pTempBuffer, pbuffer, count * sizeof(portable_samplepair_t) ); // Copy the source data
portable_samplepair_t oldFiltermem = *pfiltermem;
// Run the older implementation on the temp buffer
S_Interpolate2xLinear_2( count, pTempBuffer, &oldFiltermem, cfltmem );
#endif
// Run the faster implementation
if ( snd_mix_optimization.GetBool() )
{
S_Interpolate2xLinear_3( count, pbuffer, pfiltermem, cfltmem );
}
else
{
S_Interpolate2xLinear_2( count, pbuffer, pfiltermem, cfltmem );
}
#if CHECK_VALUES_AFTER_REFACTORING
bool bIsSame = ( memcmp( pbuffer, pTempBuffer, 2 * count * sizeof(portable_samplepair_t) ) == 0 );
Assert( bIsSame );
Assert( oldFiltermem.left == pfiltermem->left );
Assert( oldFiltermem.right == pfiltermem->right );
#endif
return;
}
int i, j, upCount = count<<1;
// reverse through buffer, duplicating contents for 'count' samples
for (i = upCount - 1, j = count - 1; j >= 0; i-=2, j--)
{
pbuffer[i] = pbuffer[j];
pbuffer[i-1] = pbuffer[j];
}
// pass forward through buffer, interpolate all even slots
switch (filtertype)
{
default:
break;
case FILTERTYPE_LINEAR:
S_Interpolate2xLinear(pbuffer, pfiltermem, cfltmem, count);
break;
case FILTERTYPE_CUBIC:
S_Interpolate2xCubic(pbuffer, pfiltermem, cfltmem, count);
break;
}
}
//===============================================================================
// PAINTBUFFER ROUTINES
//===============================================================================
// Set current paintbuffer to pbuf.
// The set paintbuffer is used by all subsequent mixing, upsampling and dsp routines.
// Also sets the rear paintbuffer if paintbuffer has fsurround true.
// (otherwise, rearpaintbuffer is NULL)
void MIX_SetCurrentPaintbuffer(int ipaintbuffer)
{
// set front and rear paintbuffer
Assert(ipaintbuffer < CPAINTBUFFERS);
g_curpaintbuffer = g_paintBuffers[ipaintbuffer].pbuf;
if ( g_paintBuffers[ipaintbuffer].fsurround )
{
g_currearpaintbuffer = g_paintBuffers[ipaintbuffer].pbufrear;
g_curcenterpaintbuffer = NULL;
if ( g_paintBuffers[ipaintbuffer].fsurround_center )
g_curcenterpaintbuffer = g_paintBuffers[ipaintbuffer].pbufcenter;
}
else
{
g_currearpaintbuffer = NULL;
g_curcenterpaintbuffer = NULL;
}
Assert(g_curpaintbuffer != NULL);
}
// return index to current paintbuffer
int MIX_GetCurrentPaintbufferIndex( void )
{
int i;
for (i = 0; i < CPAINTBUFFERS; i++)
{
if (g_curpaintbuffer == g_paintBuffers[i].pbuf)
return i;
}
return 0;
}
// return pointer to current paintbuffer struct
paintbuffer_t *MIX_GetCurrentPaintbufferPtr( void )
{
int ipaint = MIX_GetCurrentPaintbufferIndex();
Assert(ipaint < CPAINTBUFFERS);
return &g_paintBuffers[ipaint];
}
// return pointer to front paintbuffer pbuf, given index
inline portable_samplepair_t *MIX_GetPFrontFromIPaint(int ipaintbuffer)
{
return g_paintBuffers[ipaintbuffer].pbuf;
}
inline paintbuffer_t *MIX_GetPPaintFromIPaint( int ipaint )
{
Assert(ipaint < CPAINTBUFFERS);
return &g_paintBuffers[ipaint];
}
// return pointer to rear buffer, given index.
// returns null if fsurround is false;
inline portable_samplepair_t *MIX_GetPRearFromIPaint(int ipaintbuffer)
{
if ( g_paintBuffers[ipaintbuffer].fsurround )
return g_paintBuffers[ipaintbuffer].pbufrear;
return NULL;
}
// return pointer to center buffer, given index.
// returns null if fsurround_center is false;
inline portable_samplepair_t *MIX_GetPCenterFromIPaint(int ipaintbuffer)
{
if ( g_paintBuffers[ipaintbuffer].fsurround_center )
return g_paintBuffers[ipaintbuffer].pbufcenter;
return NULL;
}
// return index to paintbuffer, given buffer pointer
inline int MIX_GetIPaintFromPFront( portable_samplepair_t *pbuf )
{
int i;
for (i = 0; i < CPAINTBUFFERS; i++)
{
if (pbuf == g_paintBuffers[i].pbuf)
return i;
}
return 0;
}
// return pointer to paintbuffer struct, given ptr to buffer data
inline paintbuffer_t *MIX_GetPPaintFromPFront( portable_samplepair_t *pbuf )
{
int i;
i = MIX_GetIPaintFromPFront( pbuf );
return &g_paintBuffers[i];
}
// up convert mono buffer to full surround
inline void MIX_ConvertBufferToSurround( int ipaintbuffer )
{
paintbuffer_t *ppaint = &g_paintBuffers[ipaintbuffer];
// duplicate channel data as needed
if ( g_AudioDevice->IsSurround() )
{
// set buffer flags
ppaint->fsurround = g_AudioDevice->IsSurround();
ppaint->fsurround_center = g_AudioDevice->IsSurroundCenter();
portable_samplepair_t *pfront = MIX_GetPFrontFromIPaint( ipaintbuffer );
portable_samplepair_t *prear = MIX_GetPRearFromIPaint( ipaintbuffer );
portable_samplepair_t *pcenter = MIX_GetPCenterFromIPaint( ipaintbuffer );
// copy front to rear
Q_memcpy(prear, pfront, sizeof(portable_samplepair_t) * PAINTBUFFER_SIZE);
// copy front to center
if ( g_AudioDevice->IsSurroundCenter() )
Q_memcpy(pcenter, pfront, sizeof(portable_samplepair_t) * PAINTBUFFER_SIZE);
}
}
// Activate a paintbuffer. All active paintbuffers are mixed in parallel within
// MIX_MixChannelsToPaintbuffer, according to flags
inline void MIX_ActivatePaintbuffer(int ipaintbuffer)
{
Assert(ipaintbuffer < CPAINTBUFFERS);
g_paintBuffers[ipaintbuffer].factive = true;
}
// Don't mix into this paintbuffer
inline void MIX_DeactivatePaintbuffer(int ipaintbuffer)
{
Assert(ipaintbuffer < CPAINTBUFFERS);
g_paintBuffers[ipaintbuffer].factive = false;
}
// Don't mix into any paintbuffers
inline void MIX_DeactivateAllPaintbuffers(void)
{
int i;
for (i = 0; i < CPAINTBUFFERS; i++)
g_paintBuffers[i].factive = false;
}
// set upsampling filter indexes back to 0
inline void MIX_ResetPaintbufferFilterCounters( void )
{
int i;
for (i = 0; i < CPAINTBUFFERS; i++)
g_paintBuffers[i].ifilter = 0;
}
inline void MIX_ResetPaintbufferFilterCounter( int ipaintbuffer )
{
Assert (ipaintbuffer < CPAINTBUFFERS);
g_paintBuffers[ipaintbuffer].ifilter = 0;
}
// Change paintbuffer's flags
inline void MIX_SetPaintbufferFlags(int ipaintbuffer, int flags)
{
Assert(ipaintbuffer < CPAINTBUFFERS);
g_paintBuffers[ipaintbuffer].flags = flags;
}
// zero out all paintbuffers
void ZeroBuffer( void * pBuffer, int nSize )
{
#if IsGameConsole() || IsDebug()
// On console we are going to use prefetch and pre-zero as much as we can...
// We do it on PC debug as well, for debugging purpose.
if ( nSize < 2 * CACHE_LINE_SIZE )
{
// If less than a few cache lines, don't use the complex version. Just use the simple one.
PREFETCH_128( pBuffer, 0 * CACHE_LINE_SIZE );
PREFETCH_128( pBuffer, 1 * CACHE_LINE_SIZE );
PREFETCH_128( pBuffer, 2 * CACHE_LINE_SIZE ); // In some cases, this prefetch could actually prefetch after the buffer we are trying to fill
// TODO: Improve this
Q_memset(pBuffer, 0, nSize );
return;
}
// We have 3 zones. Prefetch the first cache line (then memset it).
// Pre-zero the cache lines in the middle. Then prefetch the last cache line (and memset it).
char * pBufferStartFirstCacheLine = (char *)pBuffer;
char * pBufferEndFirstCacheLine = (char *)ALIGN_VALUE( (intp)pBuffer, CACHE_LINE_SIZE );
int nSizeFirstCacheLine = pBufferEndFirstCacheLine - pBufferStartFirstCacheLine;
if ( nSizeFirstCacheLine != 0 )
{
// It means that the beginning is not aligned, so we have to prefetch / then memset the cache line before
PREFETCH_128( pBufferStartFirstCacheLine, 0 );
}
char * pBufferEndLastCacheLine = (char *)pBuffer + nSize;
char * pBufferStartLastCacheLine = (char *)( (intp)pBufferEndLastCacheLine & ~( CACHE_LINE_SIZE - 1 ) );
int nSizeLastCacheLine = pBufferEndLastCacheLine - pBufferStartLastCacheLine;
if ( nSizeLastCacheLine != 0 )
{
// It means that the end is not aligned, so we have to prefetch / then memset the cache line before
PREFETCH_128( pBufferStartLastCacheLine, 0 );
}
// And then we have to fill everything
int nSizeToZero = pBufferStartLastCacheLine - pBufferEndFirstCacheLine;
Assert( (nSizeToZero % CACHE_LINE_SIZE) == 0 ); // This should be multiple of cache line size
int nNumberOfCacheLinesToZero = nSizeToZero / CACHE_LINE_SIZE;
char * pCurrentCacheLineToZero = pBufferEndFirstCacheLine;
while ( nNumberOfCacheLinesToZero > 0 )
{
PREZERO_128( pCurrentCacheLineToZero, 0 );
pCurrentCacheLineToZero += CACHE_LINE_SIZE;
--nNumberOfCacheLinesToZero;
}
// At that point the initial pre-fetches should be over, we can clear them normally now
// The if tests should be unnecessary - Q_memset() should be a mo-op, still keep them to have more correct profile usage.
if ( nSizeFirstCacheLine != 0)
{
Q_memset( pBufferStartFirstCacheLine, 0, nSizeFirstCacheLine );
}
if ( nSizeLastCacheLine != 0)
{
Q_memset( pBufferStartLastCacheLine, 0, nSizeLastCacheLine );
}
#else
// Slow version here
Q_memset(pBuffer, 0, nSize );
#endif
}
void MIX_ClearAllPaintBuffers( int SampleCount, bool clearFilters )
{
// g_paintBuffers can be NULL with -nosound
if( !g_paintBuffers )
{
return;
}
int i;
int count = MIN(SampleCount, PAINTBUFFER_SIZE);
// zero out all paintbuffer data (ignore sampleCount)
for (i = 0; i < CPAINTBUFFERS; i++)
{
if (g_paintBuffers[i].pbuf != NULL)
ZeroBuffer(g_paintBuffers[i].pbuf, (count+1) * sizeof(portable_samplepair_t));
if (g_paintBuffers[i].pbufrear != NULL)
ZeroBuffer(g_paintBuffers[i].pbufrear, (count+1) * sizeof(portable_samplepair_t));
if (g_paintBuffers[i].pbufcenter != NULL)
ZeroBuffer(g_paintBuffers[i].pbufcenter, (count+1) * sizeof(portable_samplepair_t));
if ( clearFilters )
{
Q_memset( g_paintBuffers[i].fltmem, 0, sizeof(g_paintBuffers[i].fltmem) );
Q_memset( g_paintBuffers[i].fltmemrear, 0, sizeof(g_paintBuffers[i].fltmemrear) );
Q_memset( g_paintBuffers[i].fltmemcenter, 0, sizeof(g_paintBuffers[i].fltmemcenter) );
}
}
if ( clearFilters )
{
MIX_ResetPaintbufferFilterCounters();
}
}
#define SWAP(a,b,t) {(t) = (a); (a) = (b); (b) = (t);}
#define AVG(a,b) (((a) + (b)) >> 1 )
#define AVG4(a,b,c,d) (((a) + (b) + (c) + (d)) >> 2 )
// Synthesize center channel from left/right values (average).
// Currently just averages, but could actually remove
// the center signal from the l/r channels...
inline int MIX_CenterFromLeftRight( int l, int r )
{
int sum = l + r;
return sum / 2;
}
inline int MIX_CenterFromLeftRightRounded( int l, int r )
{
int sum = l + r;
#if IsGameConsole()
// To match VMX operation (and avoid asserts due to minor differences), we do the rounding.
// If sum is positive, we add 1. Not for negative sum though. (the X360 documentation only states +1 in all cases but that's incorrect).
int nSign = sum >> 31; // 0 if sum was positive, 0xffffffff if negative
sum += nSign + 1;
#else
int nSign = sum >> 31; // 0 if sum was positive, 0xffffffff if negative
sum += nSign;
#endif
return sum / 2;
}
// mixes pbuf1 + pbuf2 into pbuf3, count samples
// fgain is output gain 0-1.0
// NOTE: pbuf3 may equal pbuf1 or pbuf2!
// mixing algorithms:
// destination 2ch:
// pb1 2ch + pb2 2ch -> pb3 2ch
// pb1 (4ch->2ch) + pb2 2ch -> pb3 2ch
// pb1 2ch + pb2 (4ch->2ch) -> pb3 2ch
// pb1 (4ch->2ch) + pb2 (4ch->2ch) -> pb3 2ch
// destination 4ch:
// pb1 4ch + pb2 4ch -> pb3 4ch
// pb1 (2ch->4ch) + pb2 4ch -> pb3 4ch
// pb1 4ch + pb2 (2ch->4ch) -> pb3 4ch
// pb1 (2ch->4ch) + pb2 (2ch->4ch) -> pb3 4ch
// if all buffers are 4 or 5 ch surround, mix rear & center channels into ibuf3 as well.
// NOTE: for performance, conversion and mixing are done in a single pass instead of
// a two pass channel convert + mix scheme.
class CMixData
{
public:
CMixData()
{
memset( this, 0, sizeof(*this) );
}
int count;
portable_samplepair_t *pbuf1, *pbuf2, *pbuf3;
portable_samplepair_t *pbufrear1, *pbufrear2, *pbufrear3;
portable_samplepair_t *pbufcenter1, *pbufcenter2, *pbufcenter3;
};
// Move these intrinsics to ssemath.h (once they are in a better shape).
// Have some trouble with intx4, define own type and will handle this better at a later point during the refactoring of ssemath.
#if IsPlatformX360()
typedef __vector4 samplex4;
#elif IsPlatformPS3_PPU()
typedef vector signed int samplex4;
#else
// Assume that's intel / SSE
typedef __m128i samplex4;
#endif
FORCEINLINE
samplex4 AddSignedSIMD( const samplex4 & first, const samplex4 & second )
{
#if IsPlatformX360()
return __vaddsws( first, second );
#elif IsPlatformPS3_PPU()
return vec_vaddsws( first, second );
#else
// Assume that's intel / SSE
return _mm_add_epi32( first, second );
#endif
}
FORCEINLINE
samplex4 AverageSIMD( const samplex4 & first, const samplex4 & second )
{
#if IsPlatformX360()
return __vavgsw( first, second );
#elif IsPlatformPS3_PPU()
return vec_vavgsw( first, second );
#else
// There is no SSE2 average for 32 bits, do it with 2 operations (the code was not rounding).
samplex4 sum = _mm_add_epi32( first, second );
return _mm_srai_epi32( sum, 1 );
#endif
}
FORCEINLINE
samplex4 AverageLeftAndRightSIMD( const samplex4 & first )
{
#if IsPlatformX360()
// Swap left and right of each sample pair
samplex4 second = __vpermwi( first, (1 << 6) | (0 << 4) | (3 << 2) | (2 << 0) );
#elif IsPlatformPS3_PPU()
samplex4 second = vec_perm( first, first, _VEC_SWIZZLE_YXWZ );
#else
// SSE is not as good as VMX in term of converting similar types to one another
const __m128 & first128 = (const __m128 &)first;
__m128 result = _mm_shuffle_ps( first128, first128, MM_SHUFFLE_REV( 1, 0, 3, 2 ) );
samplex4 second = (samplex4&)result;
#endif
// Then average them (both pairs should be the same).
return AverageSIMD( first, second );
}
// In these Mix methods, the input buffers and ouput buffer may alias, so we can't really use restrict.
void Mix255_SIMD( CMixData & data )
{
#if CHECK_VALUES_AFTER_REFACTORING
CMixData backupData( data );
// Because the values are replaced in place (the first buffer is also the destination buffer, we need to backup first).
backupData.pbuf1 = DuplicateSamplePairs( data.pbuf1, data.count );
backupData.pbufrear1 = DuplicateSamplePairs( data.pbufrear1, data.count );
backupData.pbufcenter1 = DuplicateSamplePairs( data.pbufcenter1, data.count );
#endif
int nCount = data.count;
samplex4 * pDst = ( samplex4 * )data.pbuf3;
samplex4 * pSrc1 = ( samplex4 * )data.pbuf1;
samplex4 * pSrc2 = ( samplex4 * )data.pbuf2;
samplex4 * pRearDst = ( samplex4 * )data.pbufrear3;
samplex4 * pRearSrc2 = ( samplex4 * )data.pbufrear2;
samplex4 * pCenterDst = ( samplex4 * )data.pbufcenter3; // Although for center, we only care about left, we are going to do the full calculation anyway
samplex4 * pCenterSrc2 = ( samplex4 * )data.pbufcenter2; // We can still do 2 lefts at a time
intp nAddresses = (intp)pDst | (intp)pSrc1 | (intp)pSrc2;
nAddresses |= (intp)pRearDst | (intp)pRearSrc2;
nAddresses |= (intp)pCenterDst | (intp)pCenterSrc2;
if ( ( nAddresses & 0xf ) == 0 )
{
// Addresses are 16 bytes aligned, we can VMX it
// One intx4 vector has LRLR (so 2 samples). Thus we need to do 4 loads / stores per iteration.
while ( nCount >= 8 )
{
samplex4 buf1_0 = pSrc1[0];
samplex4 buf1_1 = pSrc1[1];
samplex4 buf1_2 = pSrc1[2];
samplex4 buf1_3 = pSrc1[3];
// Use temporary variables so the compiler pipelines better.
// Otherwise the compiler will do load / add / store / load / add / store (thus creating some stalls)
// as we can't use restrict due to potential aliasing.
samplex4 temp0 = AddSignedSIMD( buf1_0, pSrc2[0] );
samplex4 temp1 = AddSignedSIMD( buf1_1, pSrc2[1] );
samplex4 temp2 = AddSignedSIMD( buf1_2, pSrc2[2] );
samplex4 temp3 = AddSignedSIMD( buf1_3, pSrc2[3] );
pDst[0] = temp0;
pDst[1] = temp1;
pDst[2] = temp2;
pDst[3] = temp3;
temp0 = AddSignedSIMD( buf1_0, pRearSrc2[0] );
temp1 = AddSignedSIMD( buf1_1, pRearSrc2[1] );
temp2 = AddSignedSIMD( buf1_2, pRearSrc2[2] );
temp3 = AddSignedSIMD( buf1_3, pRearSrc2[3] );
pRearDst[0] = temp0;
pRearDst[1] = temp1;
pRearDst[2] = temp2;
pRearDst[3] = temp3;
samplex4 center1_0 = AverageLeftAndRightSIMD( buf1_0 );
samplex4 center1_1 = AverageLeftAndRightSIMD( buf1_1 );
samplex4 center1_2 = AverageLeftAndRightSIMD( buf1_2 );
samplex4 center1_3 = AverageLeftAndRightSIMD( buf1_3 );
temp0 = AddSignedSIMD( center1_0, pCenterSrc2[0] );
temp1 = AddSignedSIMD( center1_1, pCenterSrc2[1] );
temp2 = AddSignedSIMD( center1_2, pCenterSrc2[2] );
temp3 = AddSignedSIMD( center1_3, pCenterSrc2[3] );
pCenterDst[0] = temp0;
pCenterDst[1] = temp1;
pCenterDst[2] = temp2;
pCenterDst[3] = temp3;
pDst += 4;
pSrc1 += 4;
pSrc2 += 4;
pRearDst += 4;
pRearSrc2 += 4;
pCenterDst += 4;
pCenterSrc2 += 4;
nCount -= 8;
}
}
portable_samplepair_t * pDstSample = (portable_samplepair_t *)pDst;
portable_samplepair_t * pSrc1Sample = (portable_samplepair_t *)pSrc1;
portable_samplepair_t * pSrc2Sample = (portable_samplepair_t *)pSrc2;
portable_samplepair_t * pRearDstSample = (portable_samplepair_t *)pRearDst;
portable_samplepair_t * pRearSrc2Sample = (portable_samplepair_t *)pRearSrc2;
portable_samplepair_t * pCenterDstSample = (portable_samplepair_t *)pCenterDst;
portable_samplepair_t * pCenterSrc2Sample = (portable_samplepair_t *)pCenterSrc2;
while ( nCount > 0 )
{
int l = pSrc1Sample->left;
int r = pSrc1Sample->right;
pDstSample->left = l + pSrc2Sample->left;
pDstSample->right = r + pSrc2Sample->right;
pRearDstSample->left = l + pRearSrc2Sample->left;
pRearDstSample->right = r + pRearSrc2Sample->right;
int c = MIX_CenterFromLeftRightRounded( l, r );
pCenterDstSample->left = c + pCenterSrc2Sample->left;
++pDstSample;
++pSrc1Sample;
++pSrc2Sample;
++pRearDstSample;
++pRearSrc2Sample;
++pCenterDstSample;
++pCenterSrc2Sample;
--nCount;
}
#if CHECK_VALUES_AFTER_REFACTORING
// Verify that we would get the same result with the old code
for ( int i = 0; i < data.count ; ++i )
{
int l = backupData.pbuf1[i].left;
int r = backupData.pbuf1[i].right;
int c = MIX_CenterFromLeftRightRounded( l, r );
Assert( data.pbuf3[i].left == l + backupData.pbuf2[i].left );
Assert( data.pbuf3[i].right == r + backupData.pbuf2[i].right );
Assert( data.pbufrear3[i].left == l + backupData.pbufrear2[i].left );
Assert( data.pbufrear3[i].right == r + backupData.pbufrear2[i].right );
Assert( data.pbufcenter3[i].left == c + backupData.pbufcenter2[i].left );
}
FreeDuplicatedSamplePairs( backupData.pbuf1, data.count );
FreeDuplicatedSamplePairs( backupData.pbufrear1, data.count );
FreeDuplicatedSamplePairs( backupData.pbufcenter1, data.count );
#endif
}
void Mix255( CMixData & data )
{
for ( int i = 0; i < data.count; ++i )
{
int l = data.pbuf1[i].left;
int r = data.pbuf1[i].right;
int c = MIX_CenterFromLeftRight( l, r );
data.pbuf3[i].left = l + data.pbuf2[i].left;
data.pbuf3[i].right = r + data.pbuf2[i].right;
data.pbufrear3[i].left = l + data.pbufrear2[i].left;
data.pbufrear3[i].right = r + data.pbufrear2[i].right;
data.pbufcenter3[i].left = c + data.pbufcenter2[i].left;
}
}
void Mix555_SIMD( CMixData & data )
{
#if CHECK_VALUES_AFTER_REFACTORING
CMixData backupData( data );
// Because the values are replaced in place (the first buffer is also the destination buffer, we need to backup first).
backupData.pbuf1 = DuplicateSamplePairs( data.pbuf1, data.count );
backupData.pbufrear1 = DuplicateSamplePairs( data.pbufrear1, data.count );
backupData.pbufcenter1 = DuplicateSamplePairs( data.pbufcenter1, data.count );
#endif
int nCount = data.count;
samplex4 * pDst = ( samplex4 * )data.pbuf3;
samplex4 * pSrc1 = ( samplex4 * )data.pbuf1;
samplex4 * pSrc2 = ( samplex4 * )data.pbuf2;
samplex4 * pRearDst = ( samplex4 * )data.pbufrear3;
samplex4 * pRearSrc1 = ( samplex4 * )data.pbufrear1;
samplex4 * pRearSrc2 = ( samplex4 * )data.pbufrear2;
samplex4 * pCenterDst = ( samplex4 * )data.pbufcenter3; // Although for center, we only care about left, we are going to do the full calculation anyway
samplex4 * pCenterSrc1 = ( samplex4 * )data.pbufcenter1; // We can still do 2 lefts at a time
samplex4 * pCenterSrc2 = ( samplex4 * )data.pbufcenter2;
intp nAddresses = (intp)pDst | (intp)pSrc1 | (intp)pSrc2;
nAddresses |= (intp)pRearDst | (intp)pRearSrc1 | (intp)pRearSrc2;
nAddresses |= (intp)pCenterDst | (intp)pCenterSrc1 | (intp)pCenterSrc2;
if ( ( nAddresses & 0xf ) == 0 )
{
// Addresses are 16 bytes aligned, we can VMX it
// One intx4 vector has LRLR (so 2 samples). Thus we need to do 4 loads / stores per iteration.
while ( nCount >= 8 )
{
// Use temporary variables so the compiler pipelines better.
// Otherwise the compiler will do load / add / store / load / add / store (thus creating some stalls)
// as we can't use restrict due to potential aliasing.
samplex4 temp0 = AddSignedSIMD( pSrc1[0], pSrc2[0] );
samplex4 temp1 = AddSignedSIMD( pSrc1[1], pSrc2[1] );
samplex4 temp2 = AddSignedSIMD( pSrc1[2], pSrc2[2] );
samplex4 temp3 = AddSignedSIMD( pSrc1[3], pSrc2[3] );
pDst[0] = temp0;
pDst[1] = temp1;
pDst[2] = temp2;
pDst[3] = temp3;
temp0 = AddSignedSIMD( pRearSrc1[0], pRearSrc2[0] );
temp1 = AddSignedSIMD( pRearSrc1[1], pRearSrc2[1] );
temp2 = AddSignedSIMD( pRearSrc1[2], pRearSrc2[2] );
temp3 = AddSignedSIMD( pRearSrc1[3], pRearSrc2[3] );
pRearDst[0] = temp0;
pRearDst[1] = temp1;
pRearDst[2] = temp2;
pRearDst[3] = temp3;
temp0 = AddSignedSIMD( pCenterSrc1[0], pCenterSrc2[0] );
temp1 = AddSignedSIMD( pCenterSrc1[1], pCenterSrc2[1] );
temp2 = AddSignedSIMD( pCenterSrc1[2], pCenterSrc2[2] );
temp3 = AddSignedSIMD( pCenterSrc1[3], pCenterSrc2[3] );
pCenterDst[0] = temp0;
pCenterDst[1] = temp1;
pCenterDst[2] = temp2;
pCenterDst[3] = temp3;
pDst += 4;
pSrc1 += 4;
pSrc2 += 4;
pRearDst += 4;
pRearSrc1 += 4;
pRearSrc2 += 4;
pCenterDst += 4;
pCenterSrc1 += 4;
pCenterSrc2 += 4;
nCount -= 8;
}
}
portable_samplepair_t * pDstSample = (portable_samplepair_t *)pDst;
portable_samplepair_t * pSrc1Sample = (portable_samplepair_t *)pSrc1;
portable_samplepair_t * pSrc2Sample = (portable_samplepair_t *)pSrc2;
portable_samplepair_t * pRearDstSample = (portable_samplepair_t *)pRearDst;
portable_samplepair_t * pRearSrc1Sample = (portable_samplepair_t *)pRearSrc1;
portable_samplepair_t * pRearSrc2Sample = (portable_samplepair_t *)pRearSrc2;
portable_samplepair_t * pCenterDstSample = (portable_samplepair_t *)pCenterDst;
portable_samplepair_t * pCenterSrc1Sample = (portable_samplepair_t *)pCenterSrc1;
portable_samplepair_t * pCenterSrc2Sample = (portable_samplepair_t *)pCenterSrc2;
while ( nCount > 0 )
{
pDstSample->left = pSrc1Sample->left + pSrc2Sample->left;
pDstSample->right = pSrc1Sample->right + pSrc2Sample->right;
pRearDstSample->left = pRearSrc1Sample->left + pRearSrc2Sample->left;
pRearDstSample->right = pRearSrc1Sample->right + pRearSrc2Sample->right;
pCenterDstSample->left = pCenterSrc1Sample->left + pCenterSrc2Sample->left;
++pDstSample;
++pSrc1Sample;
++pSrc2Sample;
++pRearDstSample;
++pRearSrc1Sample;
++pRearSrc2Sample;
++pCenterDstSample;
++pCenterSrc1Sample;
++pCenterSrc2Sample;
--nCount;
}
#if CHECK_VALUES_AFTER_REFACTORING
// Verify that we would get the same result with the old code
for ( int i = 0; i < data.count; ++i )
{
Assert( data.pbuf3[i].left == backupData.pbuf1[i].left + backupData.pbuf2[i].left );
Assert( data.pbuf3[i].right == backupData.pbuf1[i].right + backupData.pbuf2[i].right );
Assert( data.pbufrear3[i].left == backupData.pbufrear1[i].left + backupData.pbufrear2[i].left );
Assert( data.pbufrear3[i].right == backupData.pbufrear1[i].right + backupData.pbufrear2[i].right );
Assert( data.pbufcenter3[i].left == backupData.pbufcenter1[i].left + backupData.pbufcenter2[i].left );
}
FreeDuplicatedSamplePairs( backupData.pbuf1, data.count );
FreeDuplicatedSamplePairs( backupData.pbufrear1, data.count );
FreeDuplicatedSamplePairs( backupData.pbufcenter1, data.count );
#endif
}
void Mix555( CMixData & data )
{
for ( int i = 0; i < data.count; ++i )
{
data.pbuf3[i].left = data.pbuf1[i].left + data.pbuf2[i].left;
data.pbuf3[i].right = data.pbuf1[i].right + data.pbuf2[i].right;
data.pbufrear3[i].left = data.pbufrear1[i].left + data.pbufrear2[i].left;
data.pbufrear3[i].right = data.pbufrear1[i].right + data.pbufrear2[i].right;
data.pbufcenter3[i].left = data.pbufcenter1[i].left + data.pbufcenter2[i].left;
}
}
void MIX_MixPaintbuffers(int ibuf1, int ibuf2, int ibuf3, int count, float fgain_out)
{
VPROF("Mixpaintbuffers");
int i;
portable_samplepair_t *pbuf1, *pbuf2, *pbuf3, *pbuft;
portable_samplepair_t *pbufrear1, *pbufrear2, *pbufrear3, *pbufreart;
portable_samplepair_t *pbufcenter1, *pbufcenter2, *pbufcenter3, *pbufcentert;
int cchan1, cchan2, cchan3, cchant;
int xl,xr;
int l,r,l2,r2,c, c2;
int gain_out;
gain_out = 256 * fgain_out;
Assert (count <= PAINTBUFFER_SIZE);
Assert (ibuf1 < CPAINTBUFFERS);
Assert (ibuf2 < CPAINTBUFFERS);
Assert (ibuf3 < CPAINTBUFFERS);
pbuf1 = g_paintBuffers[ibuf1].pbuf;
pbuf2 = g_paintBuffers[ibuf2].pbuf;
pbuf3 = g_paintBuffers[ibuf3].pbuf;
pbufrear1 = g_paintBuffers[ibuf1].pbufrear;
pbufrear2 = g_paintBuffers[ibuf2].pbufrear;
pbufrear3 = g_paintBuffers[ibuf3].pbufrear;
pbufcenter1 = g_paintBuffers[ibuf1].pbufcenter;
pbufcenter2 = g_paintBuffers[ibuf2].pbufcenter;
pbufcenter3 = g_paintBuffers[ibuf3].pbufcenter;
cchan1 = 2 + (g_paintBuffers[ibuf1].fsurround ? 2 : 0) + (g_paintBuffers[ibuf1].fsurround_center ? 1 : 0);
cchan2 = 2 + (g_paintBuffers[ibuf2].fsurround ? 2 : 0) + (g_paintBuffers[ibuf2].fsurround_center ? 1 : 0);
cchan3 = 2 + (g_paintBuffers[ibuf3].fsurround ? 2 : 0) + (g_paintBuffers[ibuf3].fsurround_center ? 1 : 0);
// make sure pbuf1 always has fewer or equal channels than pbuf2
// NOTE: pbuf3 may equal pbuf1 or pbuf2!
if ( cchan2 < cchan1 )
{
SWAP( cchan1, cchan2, cchant );
SWAP( pbuf1, pbuf2, pbuft );
SWAP( pbufrear1, pbufrear2, pbufreart );
SWAP( pbufcenter1, pbufcenter2, pbufcentert);
}
CMixData data;
data.count = count;
data.pbuf1 = pbuf1;
data.pbuf2 = pbuf2;
data.pbuf3 = pbuf3;
data.pbufcenter1 = pbufcenter1;
data.pbufcenter2 = pbufcenter2;
data.pbufcenter3 = pbufcenter3;
data.pbufrear1 = pbufrear1;
data.pbufrear2 = pbufrear2;
data.pbufrear3 = pbufrear3;
// UNDONE: implement fast mixing routines for each of the following sections
// destination buffer stereo - average n chans down to stereo
if ( cchan3 == 2 )
{
// destination 2ch:
// pb1 2ch + pb2 2ch -> pb3 2ch
// pb1 2ch + pb2 (4ch->2ch) -> pb3 2ch
// pb1 (4ch->2ch) + pb2 (4ch->2ch) -> pb3 2ch
if ( cchan1 == 2 && cchan2 == 2 )
{
// mix front channels
for (i = 0; i < count; i++)
{
pbuf3[i].left = pbuf1[i].left + pbuf2[i].left;
pbuf3[i].right = pbuf1[i].right + pbuf2[i].right;
}
goto gain2ch;
}
if ( cchan1 == 2 && cchan2 == 4 )
{
// avg rear chan l/r
for (i = 0; i < count; i++)
{
pbuf3[i].left = pbuf1[i].left + AVG( pbuf2[i].left, pbufrear2[i].left );
pbuf3[i].right = pbuf1[i].right + AVG( pbuf2[i].right, pbufrear2[i].right );
}
goto gain2ch;
}
if ( cchan1 == 4 && cchan2 == 4 )
{
// avg rear chan l/r
for (i = 0; i < count; i++)
{
pbuf3[i].left = AVG( pbuf1[i].left, pbufrear1[i].left) + AVG( pbuf2[i].left, pbufrear2[i].left );
pbuf3[i].right = AVG( pbuf1[i].right, pbufrear1[i].right) + AVG( pbuf2[i].right, pbufrear2[i].right );
}
goto gain2ch;
}
if ( cchan1 == 2 && cchan2 == 5 )
{
// avg rear chan l/r + center split into left/right
for (i = 0; i < count; i++)
{
l = pbuf2[i].left + ((pbufcenter2[i].left) >> 1);
r = pbuf2[i].right + ((pbufcenter2[i].left) >> 1);
pbuf3[i].left = pbuf1[i].left + AVG( l, pbufrear2[i].left );
pbuf3[i].right = pbuf1[i].right + AVG( r, pbufrear2[i].right );
}
goto gain2ch;
}
if ( cchan1 == 4 && cchan2 == 5)
{
for (i = 0; i < count; i++)
{
l = pbuf2[i].left + ((pbufcenter2[i].left) >> 1);
r = pbuf2[i].right + ((pbufcenter2[i].left) >> 1);
pbuf3[i].left = AVG( pbuf1[i].left, pbufrear1[i].left) + AVG( l, pbufrear2[i].left );
pbuf3[i].right = AVG( pbuf1[i].right, pbufrear1[i].right) + AVG( r, pbufrear2[i].right );
}
goto gain2ch;
}
if ( cchan1 == 5 && cchan2 == 5)
{
for (i = 0; i < count; i++)
{
l = pbuf1[i].left + ((pbufcenter1[i].left) >> 1);
r = pbuf1[i].right + ((pbufcenter1[i].left) >> 1);
l2 = pbuf2[i].left + ((pbufcenter2[i].left) >> 1);
r2 = pbuf2[i].right + ((pbufcenter2[i].left) >> 1);
pbuf3[i].left = AVG( l, pbufrear1[i].left) + AVG( l2, pbufrear2[i].left );
pbuf3[i].right = AVG( r, pbufrear1[i].right) + AVG( r2, pbufrear2[i].right );
} goto gain2ch;
}
}
// destination buffer quad - duplicate n chans up to quad
if ( cchan3 == 4 )
{
// pb1 4ch + pb2 4ch -> pb3 4ch
// pb1 (2ch->4ch) + pb2 4ch -> pb3 4ch
// pb1 (2ch->4ch) + pb2 (2ch->4ch) -> pb3 4ch
if ( cchan1 == 4 && cchan2 == 4)
{
// mix front -> front, rear -> rear
for (i = 0; i < count; i++)
{
pbuf3[i].left = pbuf1[i].left + pbuf2[i].left;
pbuf3[i].right = pbuf1[i].right + pbuf2[i].right;
pbufrear3[i].left = pbufrear1[i].left + pbufrear2[i].left;
pbufrear3[i].right = pbufrear1[i].right + pbufrear2[i].right;
}
goto gain4ch;
}
if ( cchan1 == 2 && cchan2 == 4)
{
for (i = 0; i < count; i++)
{
// split 2 ch left -> front left, rear left
// split 2 ch right -> front right, rear right
xl = pbuf1[i].left;
xr = pbuf1[i].right;
pbuf3[i].left = xl + pbuf2[i].left;
pbuf3[i].right = xr + pbuf2[i].right;
pbufrear3[i].left = xl + pbufrear2[i].left;
pbufrear3[i].right = xr + pbufrear2[i].right;
}
goto gain4ch;
}
if ( cchan1 == 2 && cchan2 == 2)
{
// mix l,r, split into front l, front r
for (i = 0; i < count; i++)
{
xl = pbuf1[i].left + pbuf2[i].left;
xr = pbuf1[i].right + pbuf2[i].right;
pbufrear3[i].left = pbuf3[i].left = xl;
pbufrear3[i].right = pbuf3[i].right = xr;
}
goto gain4ch;
}
if ( cchan1 == 2 && cchan2 == 5 )
{
for (i = 0; i < count; i++)
{
// split center of chan2 into left/right
l2 = pbuf2[i].left + ((pbufcenter2[i].left) >> 1);
r2 = pbuf2[i].right + ((pbufcenter2[i].left) >> 1);
xl = pbuf1[i].left;
xr = pbuf1[i].right;
pbuf3[i].left = xl + l2;
pbuf3[i].right = xr + r2;
pbufrear3[i].left = xl + pbufrear2[i].left;
pbufrear3[i].right = xr + pbufrear2[i].right;
}
goto gain4ch;
}
if ( cchan1 == 4 && cchan2 == 5)
{
for (i = 0; i < count; i++)
{
l2 = pbuf2[i].left + ((pbufcenter2[i].left) >> 1);
r2 = pbuf2[i].right + ((pbufcenter2[i].left) >> 1);
pbuf3[i].left = pbuf1[i].left + l2;
pbuf3[i].right = pbuf1[i].right + r2;
pbufrear3[i].left = pbufrear1[i].left + pbufrear2[i].left;
pbufrear3[i].right = pbufrear1[i].right + pbufrear2[i].right;
}
goto gain4ch;
}
if ( cchan1 == 5 && cchan2 == 5 )
{
for (i = 0; i < count; i++)
{
l = pbuf1[i].left + ((pbufcenter1[i].left) >> 1);
r = pbuf1[i].right + ((pbufcenter1[i].left) >> 1);
l2 = pbuf2[i].left + ((pbufcenter2[i].left) >> 1);
r2 = pbuf2[i].right + ((pbufcenter2[i].left) >> 1);
pbuf3[i].left = l + l2;
pbuf3[i].right = r + r2;
pbufrear3[i].left = pbufrear1[i].left + pbufrear2[i].left;
pbufrear3[i].right = pbufrear1[i].right + pbufrear2[i].right;
}
goto gain4ch;
}
}
// 5 channel destination
if (cchan3 == 5)
{
// up convert from 2 or 4 ch buffer to 5 ch buffer:
// center channel is synthesized from front left, front right
if (cchan1 == 2 && cchan2 == 2)
{
for (i = 0; i < count; i++)
{
// split 2 ch left -> front left, center, rear left
// split 2 ch right -> front right, center, rear right
l = pbuf1[i].left;
r = pbuf1[i].right;
c = MIX_CenterFromLeftRight( l, r );
l2 = pbuf2[i].left;
r2 = pbuf2[i].right;
c2 = MIX_CenterFromLeftRight( l2, r2 );
pbuf3[i].left = l + l2;
pbuf3[i].right = r + r2;
pbufrear3[i].left = pbuf1[i].left + pbuf2[i].left;
pbufrear3[i].right = pbuf1[i].right + pbuf2[i].right;
pbufcenter3[i].left = c + c2;
}
goto gain5ch;
}
if (cchan1 == 2 && cchan2 == 4)
{
for (i = 0; i < count; i++)
{
l = pbuf1[i].left;
r = pbuf1[i].right;
c = MIX_CenterFromLeftRight( l, r );
l2 = pbuf2[i].left;
r2 = pbuf2[i].right;
c2 = MIX_CenterFromLeftRight( l2, r2 );
pbuf3[i].left = l + l2;
pbuf3[i].right = r + r2;
pbufrear3[i].left = pbuf1[i].left + pbufrear2[i].left;
pbufrear3[i].right = pbuf1[i].right + pbufrear2[i].right;
pbufcenter3[i].left = c + c2;
}
goto gain5ch;
}
if (cchan1 == 2 && cchan2 == 5)
{
if ( snd_mix_optimization.GetBool() )
{
Mix255_SIMD( data );
}
else
{
Mix255( data );
}
goto gain5ch;
}
if (cchan1 == 4 && cchan2 == 4)
{
for (i = 0; i < count; i++)
{
l = pbuf1[i].left;
r = pbuf1[i].right;
c = MIX_CenterFromLeftRight( l, r );
l2 = pbuf2[i].left;
r2 = pbuf2[i].right;
c2 = MIX_CenterFromLeftRight( l2, r2 );
pbuf3[i].left = l + l2;
pbuf3[i].right = r + r2;
pbufrear3[i].left = pbufrear1[i].left + pbufrear2[i].left;
pbufrear3[i].right = pbufrear1[i].right + pbufrear2[i].right;
pbufcenter3[i].left = c + c2;
}
goto gain5ch;
}
if (cchan1 == 4 && cchan2 == 5)
{
for (i = 0; i < count; i++)
{
l = pbuf1[i].left;
r = pbuf1[i].right;
c = MIX_CenterFromLeftRight( l, r );
pbuf3[i].left = l + pbuf2[i].left;
pbuf3[i].right = r + pbuf2[i].right;
pbufrear3[i].left = pbufrear1[i].left + pbufrear2[i].left;
pbufrear3[i].right = pbufrear1[i].right + pbufrear2[i].right;
pbufcenter3[i].left = c + pbufcenter2[i].left;
}
goto gain5ch;
}
if ( cchan2 == 5 && cchan1 == 5 )
{
if ( snd_mix_optimization.GetBool() )
{
Mix555_SIMD( data );
}
else
{
Mix555( data );
}
goto gain5ch;
}
}
gain2ch:
if ( gain_out == 256) // KDB: perf
return;
for (i = 0; i < count; i++)
{
pbuf3[i].left = (pbuf3[i].left * gain_out) >> 8;
pbuf3[i].right = (pbuf3[i].right * gain_out) >> 8;
}
return;
gain4ch:
if ( gain_out == 256) // KDB: perf
return;
for (i = 0; i < count; i++)
{
pbuf3[i].left = (pbuf3[i].left * gain_out) >> 8;
pbuf3[i].right = (pbuf3[i].right * gain_out) >> 8;
pbufrear3[i].left = (pbufrear3[i].left * gain_out) >> 8;
pbufrear3[i].right = (pbufrear3[i].right * gain_out) >> 8;
}
return;
gain5ch:
if ( gain_out == 256) // KDB: perf
return;
for (i = 0; i < count; i++)
{
pbuf3[i].left = (pbuf3[i].left * gain_out) >> 8;
pbuf3[i].right = (pbuf3[i].right * gain_out) >> 8;
pbufrear3[i].left = (pbufrear3[i].left * gain_out) >> 8;
pbufrear3[i].right = (pbufrear3[i].right * gain_out) >> 8;
pbufcenter3[i].left = (pbufcenter3[i].left * gain_out) >> 8;
}
return;
}
// multiply all values in paintbuffer by fgain
void MIX_ScalePaintBuffer( int bufferIndex, int count, float fgain )
{
portable_samplepair_t *pbuf = g_paintBuffers[bufferIndex].pbuf;
portable_samplepair_t *pbufrear = g_paintBuffers[bufferIndex].pbufrear;
portable_samplepair_t *pbufcenter = g_paintBuffers[bufferIndex].pbufcenter;
int gain = 256 * fgain;
int i;
if (gain == 256)
return;
if ( !g_paintBuffers[bufferIndex].fsurround )
{
for (i = 0; i < count; i++)
{
pbuf[i].left = (pbuf[i].left * gain) >> 8;
pbuf[i].right = (pbuf[i].right * gain) >> 8;
}
}
else
{
for (i = 0; i < count; i++)
{
pbuf[i].left = (pbuf[i].left * gain) >> 8;
pbuf[i].right = (pbuf[i].right * gain) >> 8;
pbufrear[i].left = (pbufrear[i].left * gain) >> 8;
pbufrear[i].right = (pbufrear[i].right * gain) >> 8;
}
if (g_paintBuffers[bufferIndex].fsurround_center)
{
for (i = 0; i < count; i++)
{
pbufcenter[i].left = (pbufcenter[i].left * gain) >> 8;
// pbufcenter[i].right = (pbufcenter[i].right * gain) >> 8; mono center channel
}
}
}
}
// DEBUG peak detection values
#define _SDEBUG 1
#ifdef _SDEBUG
float sdebug_avg_in = 0.0;
float sdebug_in_count = 0.0;
float sdebug_avg_out = 0.0;
float sdebug_out_count = 0.0;
#define SDEBUG_TOTAL_COUNT (3*44100)
#endif // DEBUG
// DEBUG code - get and show peak value of specified paintbuffer
// DEBUG code - ibuf is buffer index, count is # samples to test, pppeakprev stores peak
void SDEBUG_GetAvgValue( int ibuf, int count, float *pav )
{
#ifdef _SDEBUG
if (snd_showstart.GetInt() != 4 )
return;
float av = 0.0;
for (int i = 0; i < count; i++)
av += (float)(abs(g_paintBuffers[ibuf].pbuf->left) + abs(g_paintBuffers[ibuf].pbuf->right))/2.0;
*pav = av / count;
#endif // DEBUG
}
void SDEBUG_GetAvgIn( int ibuf, int count)
{
float av = 0.0;
SDEBUG_GetAvgValue( ibuf, count, &av );
sdebug_avg_in = ((av * count ) + (sdebug_avg_in * sdebug_in_count)) / (count + sdebug_in_count);
sdebug_in_count += count;
}
void SDEBUG_GetAvgOut( int ibuf, int count)
{
float av = 0.0;
SDEBUG_GetAvgValue( ibuf, count, &av );
sdebug_avg_out = ((av * count ) + (sdebug_avg_out * sdebug_out_count)) / (count + sdebug_out_count);
sdebug_out_count += count;
}
void SDEBUG_ShowAvgValue()
{
#ifdef _SDEBUG
if (sdebug_in_count > SDEBUG_TOTAL_COUNT)
{
if ((int)sdebug_avg_in > 20.0 && (int)sdebug_avg_out > 20.0)
DevMsg("dsp avg gain:%1.2f in:%1.2f out:%1.2f 1/gain:%1.2f\n", sdebug_avg_out/sdebug_avg_in, sdebug_avg_in, sdebug_avg_out, sdebug_avg_in/sdebug_avg_out);
sdebug_avg_in = 0.0;
sdebug_avg_out = 0.0;
sdebug_in_count = 0.0;
sdebug_out_count = 0.0;
}
#endif // DEBUG
}
void ClipStereo( portable_samplepair_t * pBuffer, int nCount )
{
while ( nCount >= 4 )
{
pBuffer[0].left = iclip( pBuffer[0].left );
pBuffer[0].right = iclip( pBuffer[0].right );
pBuffer[1].left = iclip( pBuffer[1].left );
pBuffer[1].right = iclip( pBuffer[1].right );
pBuffer[2].left = iclip( pBuffer[2].left );
pBuffer[2].right = iclip( pBuffer[2].right );
pBuffer[3].left = iclip( pBuffer[3].left );
pBuffer[3].right = iclip( pBuffer[3].right );
nCount -= 4;
pBuffer += 4;
}
while ( nCount > 0 )
{
pBuffer->left = iclip( pBuffer->left );
pBuffer->right = iclip(pBuffer->right );
--nCount;
++pBuffer;
}
}
void ClipLeft( portable_samplepair_t * pBuffer, int nCount )
{
while ( nCount >= 8 )
{
pBuffer[0].left = iclip( pBuffer[0].left );
pBuffer[1].left = iclip( pBuffer[1].left );
pBuffer[2].left = iclip( pBuffer[2].left );
pBuffer[3].left = iclip( pBuffer[3].left );
pBuffer[4].left = iclip( pBuffer[4].left );
pBuffer[5].left = iclip( pBuffer[5].left );
pBuffer[6].left = iclip( pBuffer[6].left );
pBuffer[7].left = iclip( pBuffer[7].left );
nCount -= 8;
pBuffer += 8;
}
while ( nCount > 0 )
{
pBuffer->left = iclip( pBuffer->left );
--nCount;
++pBuffer;
}
}
// clip all values in paintbuffer to 16bit.
// if fsurround is set for paintbuffer, also process rear buffer samples
void MIX_CompressPaintbuffer(int ipaint, int count)
{
VPROF("CompressPaintbuffer");
paintbuffer_t *ppaint = MIX_GetPPaintFromIPaint(ipaint);
portable_samplepair_t *pbf;
portable_samplepair_t *pbr;
portable_samplepair_t *pbc;
pbf = ppaint->pbuf;
pbr = ppaint->pbufrear;
pbc = ppaint->pbufcenter;
ClipStereo( pbf, count );
if ( ppaint->fsurround )
{
Assert (pbr);
ClipStereo( pbr, count );
}
if ( ppaint->fsurround_center )
{
Assert (pbc);
// mono - left channel
ClipLeft( pbc, count );
}
}
// mix and upsample channels to 44khz 'ipaintbuffer'
// mix channels matching 'flags' (SOUND_MIX_DRY, SOUND_MIX_WET, SOUND_MIX_SPEAKER) into specified paintbuffer
// upsamples 11khz, 22khz channels to 44khz.
// NOTE: only call this on channels that will be mixed into only 1 paintbuffer
// and that will not be mixed until the next mix pass! otherwise, MIX_MixChannelsToPaintbuffer
// will advance any internal pointers on mixed channels; subsequent calls will be at
// incorrect offset.
void MIX_MixUpsampleBuffer( CChannelList &list, int ipaintbuffer, int64 end, int count, int flags )
{
VPROF("MixUpsampleBuffer");
int ipaintcur = MIX_GetCurrentPaintbufferIndex(); // save current paintbuffer
// reset paintbuffer upsampling filter index
MIX_ResetPaintbufferFilterCounter( ipaintbuffer );
// prevent other paintbuffers from being mixed
MIX_DeactivateAllPaintbuffers();
MIX_ActivatePaintbuffer( ipaintbuffer ); // operates on MIX_MixChannelsToPaintbuffer
MIX_SetCurrentPaintbuffer( ipaintbuffer ); // operates on MixUpSample
// mix 11khz channels to buffer
if ( list.m_has11kChannels )
{
MIX_MixChannelsToPaintbuffer( list, end, flags, SOUND_11k, SOUND_11k );
// upsample 11khz buffer by 2x
Device_MixUpsample( count / (SOUND_DMA_SPEED / SOUND_11k), FILTERTYPE_LINEAR );
}
if ( list.m_has22kChannels || list.m_has11kChannels )
{
// mix 22khz channels to buffer
MIX_MixChannelsToPaintbuffer( list, end, flags, SOUND_22k, SOUND_22k );
#if (SOUND_DMA_SPEED > SOUND_22k)
// upsample 22khz buffer by 2x
Device_MixUpsample( count / (SOUND_DMA_SPEED / SOUND_22k), FILTERTYPE_LINEAR );
#endif
}
// mix 44khz channels to buffer
MIX_MixChannelsToPaintbuffer( list, end, flags, SOUND_44k, SOUND_DMA_SPEED);
MIX_DeactivateAllPaintbuffers();
// restore previous paintbuffer
MIX_SetCurrentPaintbuffer( ipaintcur );
}
// upsample and mix sounds into final 44khz versions of the following paintbuffers:
// IROOMBUFFER, IFACINGBUFFER, IFACINGAWAY, IDRYBUFFER, ISPEAKERBUFFER
// dsp fx are then applied to these buffers by the caller.
// caller also remixes all into final IPAINTBUFFER output.
void MIX_UpsampleAllPaintbuffers( CChannelList &list, int64 end, int count )
{
VPROF( "MixUpsampleAll" );
// 'dry' and 'speaker' channel sounds mix 100% into their corresponding buffers
// mix and upsample all 'dry' sounds (channels) to 44khz IDRYBUFFER paintbuffer
if ( list.m_hasDryChannels )
MIX_MixUpsampleBuffer( list, IDRYBUFFER, end, count, SOUND_MIX_DRY );
// mix and upsample all 'speaker' sounds (channels) to 44khz ISPEAKERBUFFER paintbuffer
if ( list.m_hasSpeakerChannels )
MIX_MixUpsampleBuffer( list, ISPEAKERBUFFER, end, count, SOUND_MIX_SPEAKER );
// 'room', 'facing' 'facingaway' sounds are mixed into up to 3 buffers:
// 11khz sounds are mixed into 3 buffers based on distance from listener, and facing direction
// These buffers are room, facing, facingaway
// These 3 mixed buffers are then each upsampled to 22khz.
// 22khz sounds are mixed into the 3 buffers based on distance from listener, and facing direction
// These 3 mixed buffers are then each upsampled to 44khz.
// 44khz sounds are mixed into the 3 buffers based on distance from listener, and facing direction
MIX_DeactivateAllPaintbuffers();
// set paintbuffer upsample filter indices to 0
MIX_ResetPaintbufferFilterCounters();
if ( !g_bDspOff )
{
// only mix to roombuffer if dsp fx are on KDB: perf
MIX_ActivatePaintbuffer(IROOMBUFFER); // operates on MIX_MixChannelsToPaintbuffer
}
MIX_ActivatePaintbuffer(IFACINGBUFFER);
if ( g_bdirectionalfx )
{
// mix to facing away buffer only if directional presets are set
MIX_ActivatePaintbuffer(IFACINGAWAYBUFFER);
}
// mix 11khz sounds:
// pan sounds between 3 busses: facing, facingaway and room buffers
MIX_MixChannelsToPaintbuffer( list, end, SOUND_MIX_WET, SOUND_11k, SOUND_11k);
// upsample all 11khz buffers by 2x
if ( !g_bDspOff )
{
// only upsample roombuffer if dsp fx are on KDB: perf
MIX_SetCurrentPaintbuffer(IROOMBUFFER); // operates on MixUpSample
Device_MixUpsample( count / (SOUND_DMA_SPEED / SOUND_11k), FILTERTYPE_LINEAR );
}
MIX_SetCurrentPaintbuffer(IFACINGBUFFER);
Device_MixUpsample( count / (SOUND_DMA_SPEED / SOUND_11k), FILTERTYPE_LINEAR );
if ( g_bdirectionalfx )
{
MIX_SetCurrentPaintbuffer(IFACINGAWAYBUFFER);
Device_MixUpsample( count / (SOUND_DMA_SPEED / SOUND_11k), FILTERTYPE_LINEAR );
}
// mix 22khz sounds:
// pan sounds between 3 busses: facing, facingaway and room buffers
MIX_MixChannelsToPaintbuffer( list, end, SOUND_MIX_WET, SOUND_22k, SOUND_22k);
// upsample all 22khz buffers by 2x
#if ( SOUND_DMA_SPEED > SOUND_22k )
if ( !g_bDspOff )
{
// only upsample roombuffer if dsp fx are on KDB: perf
MIX_SetCurrentPaintbuffer(IROOMBUFFER);
Device_MixUpsample( count / (SOUND_DMA_SPEED / SOUND_22k), FILTERTYPE_LINEAR );
}
MIX_SetCurrentPaintbuffer(IFACINGBUFFER);
Device_MixUpsample( count / (SOUND_DMA_SPEED / SOUND_22k), FILTERTYPE_LINEAR );
if ( g_bdirectionalfx )
{
MIX_SetCurrentPaintbuffer(IFACINGAWAYBUFFER);
Device_MixUpsample( count / (SOUND_DMA_SPEED / SOUND_22k), FILTERTYPE_LINEAR );
}
#endif
// mix all 44khz sounds to all active paintbuffers
MIX_MixChannelsToPaintbuffer( list, end, SOUND_MIX_WET, SOUND_44k, SOUND_DMA_SPEED);
MIX_DeactivateAllPaintbuffers();
MIX_SetCurrentPaintbuffer(IPAINTBUFFER);
}
ConVar snd_cull_duplicates("snd_cull_duplicates","0",FCVAR_NONE,"If nonzero, aggressively cull duplicate sounds during mixing. The number specifies the number of duplicates allowed to be played.");
// Helper class for determining whether a given channel number should be culled from
// mixing, if snd_cull_duplicates is enabled (psychoacoustic quashing).
class CChannelCullList
{
public:
// default constructor
CChannelCullList() : m_numChans(0) {};
// call if you plan on culling channels - and not otherwise, it's a little expensive
// (that's why it's not in the constructor)
void Initialize( CChannelList &list );
// returns true if a given channel number has been marked for culling
inline bool ShouldCull( int channelNum )
{
return (m_numChans > channelNum) ? m_bShouldCull[channelNum] : false;
}
// an array of sound names and their volumes
// TODO: there may be a way to do this faster on 360 (eg, pad to 128bit, use SIMD)
struct sChannelVolData
{
int m_channelNum;
int m_vol; // max volume of sound. -1 means "do not cull, ever, do not even do the math"
uintp m_nameHash; // a unique id for a sound file
};
protected:
sChannelVolData m_channelInfo[MAX_CHANNELS];
bool m_bShouldCull[MAX_CHANNELS]; // in ChannelList order, not sorted order
int m_numChans;
};
// comparator for qsort as used below (eg a lambda)
// returns < 0 if a should come before b, > 0 if a should come after, 0 otherwise
static int __cdecl ChannelVolComparator ( const void * a, const void * b )
{
// greater numbers come first.
return static_cast<const CChannelCullList::sChannelVolData *>(b)->m_vol - static_cast<const CChannelCullList::sChannelVolData *>(a)->m_vol;
}
void CChannelCullList::Initialize( CChannelList &list )
{
VPROF("CChannelCullList::Initialize");
// First, build a sorted list of channels by decreasing volume, and by a hash of their wavname.
m_numChans = list.Count();
for ( int i = m_numChans - 1 ; i >= 0 ; --i )
{
channel_t *ch = list.GetChannel(i);
m_channelInfo[i].m_channelNum = i;
if ( ch && ch->pMixer->IsReadyToMix() )
{
m_channelInfo[i].m_vol = ChannelLoudestCurVolume(ch);
AssertMsg(m_channelInfo[i].m_vol >= 0, "Sound channel has a negative volume?");
m_channelInfo[i].m_nameHash = (uintp) ch->sfx;
}
else
{
m_channelInfo[i].m_vol = -1;
m_channelInfo[i].m_nameHash = (uintp) 0; // doesn't matter
}
}
// set the unused channels to invalid data
for ( int i = m_numChans ; i < MAX_CHANNELS ; ++i )
{
m_channelInfo[i].m_channelNum = -1;
m_channelInfo[i].m_vol = -1;
}
// Sort the list.
qsort( m_channelInfo, MAX_CHANNELS, sizeof(sChannelVolData), ChannelVolComparator );
// Then, determine if the given sound is less than the nth loudest of its hash. If so, mark its flag
// for removal.
// TODO: use an actual algorithm rather than this bogus quadratic technique.
// (I'm using it for now because we don't have convenient/fast hash table
// classes, which would be the linear-time way to deal with this).
const int cutoff = snd_cull_duplicates.GetInt();
for ( int i = 0 ; i < m_numChans ; ++i ) // i is index in original channel list
{
channel_t *ch = list.GetChannel(i);
// for each sound, determine where it ranks in loudness
int howManyLouder = 0;
for ( int j = 0 ;
m_channelInfo[j].m_channelNum != i && m_channelInfo[j].m_vol >= 0 && j < MAX_CHANNELS ;
++j )
{
// j steps through the sorted list until we find ourselves:
if (m_channelInfo[j].m_nameHash == (uintp)(ch->sfx))
{
// that's another channel playing this sound but louder than me
++howManyLouder;
}
}
if (howManyLouder >= cutoff)
{
// this sound should be culled
m_bShouldCull[i] = true;
}
else
{
// this sound should not be culled
m_bShouldCull[i] = false;
}
}
}
// build a list of channels that will actually do mixing in this update
// remove all active channels that won't mix for some reason
void MIX_BuildChannelList( CChannelList &list )
{
VPROF("MIX_BuildChannelList");
g_ActiveChannels.GetActiveChannels( list );
list.m_hasDryChannels = false;
list.m_hasSpeakerChannels = false;
list.m_has11kChannels = false;
list.m_has22kChannels = false;
list.m_has44kChannels = false;
bool delayStartServer = false;
bool delayStartClient = false;
bool bPaused = g_pSoundServices->IsGamePaused();
CChannelCullList cullList;
if (snd_cull_duplicates.GetInt() > 0)
{
cullList.Initialize(list);
}
AUTO_LOCK( g_SoundMapMutex );
// int numQuashed = 0;
for ( int i = list.Count(); --i >= 0; )
{
channel_t *ch = list.GetChannel(i);
bool bRemove = false;
// Certain async loaded sounds lazily load into memory in the background, use this to determine
// if the sound is ready for mixing
CAudioSource *pSource = NULL;
if ( ch->pMixer->IsReadyToMix() )
{
SoundError soundError;
pSource = S_LoadSound( ch->sfx, ch, soundError );
// Don't mix sound data for sounds with 'zero' volume. If it's a non-looping sound,
// just remove the sound when its volume goes to zero. If it's a 'dry' channel sound (ie: music)
// then assume bZeroVolume is fade in - don't restart
// To be 'zero' volume, all target volume and current volume values must all be less than 5
bool bZeroVolume = BChannelLowVolume( ch, 0 );
if ( !pSource || ( bZeroVolume && !pSource->IsLooped() && !ch->flags.bdry ) )
{
// NOTE: Since we've loaded the sound, check to see if it's a sentence. Play them at zero anyway
// to keep the character's lips moving and the captions happening.
if ( !pSource || pSource->GetSentence() == NULL )
{
S_FreeChannel( ch );
bRemove = true;
}
}
else if ( bZeroVolume )
{
list.m_quashed[i] = true;
}
// If the sound wants to stop when the game pauses, do so
if ( bPaused && SND_ShouldPause(ch) )
{
bRemove = true;
}
// On lowend, aggressively cull duplicate sounds.
if ( !bRemove && snd_cull_duplicates.GetInt() > 0 )
{
// We can't simply remove them, because then sounds will pile up waiting to finish later.
// We need to flag them for not mixing.
list.m_quashed[i] = cullList.ShouldCull(i);
/*
if (list.m_quashed[i])
{
numQuashed++;
// Msg("removed %i\n", i);
}
*/
}
else
{
list.m_quashed[i] = false;
}
}
else
{
if ( ch->pMixer->GetSource()->GetCacheStatus() == CAudioSource::AUDIO_ERROR_LOADING )
{
S_FreeChannel( ch );
}
bRemove = true;
}
if ( bRemove )
{
list.RemoveChannelFromList(i);
continue;
}
if ( ch->flags.bSpeaker )
{
list.m_hasSpeakerChannels = true;
}
if ( ch->flags.bdry )
{
list.m_hasDryChannels = true;
}
int rate = pSource->SampleRate();
if ( rate == SOUND_11k )
{
list.m_has11kChannels = true;
}
else if ( rate == SOUND_22k )
{
list.m_has22kChannels = true;
}
else if ( rate == SOUND_44k )
{
list.m_has44kChannels = true;
}
if ( ch->flags.delayed_start && !ch->flags.m_bHasMouth )
{
if ( ch->flags.fromserver )
{
delayStartServer = true;
}
else
{
delayStartClient = true;
}
}
// get playback pitch
ch->pitch = ch->pMixer->ModifyPitch( ch->basePitch * 0.01f );
}
// DevMsg( "%d channels quashed.\n", numQuashed );
// This code will resync the delay calculation clock really often
// any time there are no scheduled waves or the game is paused
// we go ahead and reset the clock
// That way the clock is only used for short periods of time
// and we need no solution for drift
if ( bPaused || (host_frametime_unbounded > host_frametime) )
{
delayStartClient = false;
delayStartServer = false;
}
if (!delayStartServer)
{
S_SyncClockAdjust(CLOCK_SYNC_SERVER);
}
if (!delayStartClient)
{
S_SyncClockAdjust(CLOCK_SYNC_CLIENT);
}
}
// main mixing rountine - mix up to 'endtime' samples.
// All channels are mixed in a paintbuffer and then sent to
// hardware.
// A mix pass is performed, resulting in mixed sounds in IROOMBUFFER, IFACINGBUFFER, IFACINGAWAYBUFFER, IDRYBUFFER, ISPEAKERBUFFER:
// directional sounds are panned and mixed between IFACINGBUFFER and IFACINGAWAYBUFFER
// omnidirectional sounds are panned 100% into IFACINGBUFFER
// sound sources far from player (ie: near back of room ) are mixed in proportion to this distance
// into IROOMBUFFER
// sounds with ch->bSpeaker set are mixed in mono into ISPEAKERBUFFER
// dsp_facingaway fx (2 or 4ch filtering) are then applied to the IFACINGAWAYBUFFER
// dsp_speaker fx (1ch) are then applied to the ISPEAKERBUFFER
// dsp_room fx (1ch reverb) are then applied to the IROOMBUFFER
// All buffers are recombined into the IPAINTBUFFER
// The dsp_water and dsp_player fx are applied in series to the IPAINTBUFFER
// Finally, the IDRYBUFFER buffer is mixed into the IPAINTBUFFER
extern ConVar dsp_off;
extern ConVar snd_profile;
extern void DEBUG_StartSoundMeasure(int type, int samplecount );
extern void DEBUG_StopSoundMeasure(int type, int samplecount );
extern ConVar dsp_enhance_stereo;
extern ConVar dsp_volume;
extern ConVar dsp_vol_5ch;
extern ConVar dsp_vol_4ch;
extern ConVar dsp_vol_2ch;
extern void MXR_SetCurrentSoundMixer( const char *szsoundmixer );
extern ConVar snd_soundmixer;
ConVar snd_mix_dry_volume("snd_mix_dry_volume", "1.0", FCVAR_NONE );
ConVar snd_mix_test1( "snd_mix_test1", "1.0", FCVAR_NONE );
ConVar snd_mix_test2( "snd_mix_test2", "1.0", FCVAR_NONE );
void MIX_PaintChannels( int64 endtime, bool bIsUnderwater )
{
VPROF("MIX_PaintChannels");
#if !defined( USE_AUDIO_DEVICE_V1 ) && defined( USE_SDL )
//Our path for make snd_mute_losefocus work on Linux/Mac.
extern IVEngineClient *engineClient;
if ( engineClient && g_AudioDevice )
{
g_AudioDevice->UpdateFocus( engineClient->IsActiveApp() );
}
#endif
int64 end;
int count;
#ifdef CSTRIKE15
bool b_spatial_delays = false;
#else
bool b_spatial_delays = dsp_enhance_stereo.GetBool();
#endif
bool room_fsurround_sav;
bool room_fsurround_center_sav;
paintbuffer_t *proom = MIX_GetPPaintFromIPaint(IROOMBUFFER);
CheckNewDspPresets();
MXR_SetCurrentSoundMixer( snd_soundmixer.GetString() );
// dsp performance tuning
g_snd_profile_type = snd_profile.GetInt();
// dsp_off is true if no dsp processing is to run
// directional dsp processing is enabled if dsp_facingaway is non-zero
g_bDspOff = dsp_off.GetInt() ? 1 : 0;
CChannelList list;
MIX_BuildChannelList(list);
// get master dsp volume
g_dsp_volume = dsp_volume.GetFloat();
// attenuate master dsp volume by 2,4 or 5 ch settings
if ( g_AudioDevice->IsSurround() )
{
g_dsp_volume *= ( g_AudioDevice->IsSurroundCenter() ? dsp_vol_5ch.GetFloat() : dsp_vol_4ch.GetFloat() );
}
else
{
g_dsp_volume *= dsp_vol_2ch.GetFloat();
}
if ( !g_bDspOff )
{
g_bdirectionalfx = dsp_facingaway.GetInt() ? 1 : 0;
}
else
{
g_bdirectionalfx = 0;
}
// get dsp preset gain values, update gain crossfaders, used when mixing dsp processed buffers into paintbuffer
SDEBUG_ShowAvgValue();
while ( g_paintedtime < endtime )
{
VPROF("MIX_PaintChannels inner loop");
// mix a full 'paintbuffer' of sound
// clamp at paintbuffer size
end = endtime;
if (endtime - g_paintedtime > PAINTBUFFER_SIZE)
{
end = g_paintedtime + PAINTBUFFER_SIZE;
}
// number of 44khz samples to mix into paintbuffer, up to paintbuffer size
count = end - g_paintedtime;
// clear all mix buffers
MIX_ClearAllPaintBuffers( count, false );
// upsample all mix buffers.
// results in 44khz versions of:
// IROOMBUFFER, IFACINGBUFFER, IFACINGAWAYBUFFER, IDRYBUFFER, ISPEAKERBUFFER
MIX_UpsampleAllPaintbuffers( list, end, count );
// apply appropriate dsp fx to each buffer, remix buffers into single quad output buffer
// apply 2 or 4ch filtering to IFACINGAWAY buffer
if ( g_bdirectionalfx )
{
Device_ApplyDSPEffects( idsp_facingaway, MIX_GetPFrontFromIPaint(IFACINGAWAYBUFFER), MIX_GetPRearFromIPaint(IFACINGAWAYBUFFER), MIX_GetPCenterFromIPaint(IFACINGAWAYBUFFER), count );
}
if ( !g_bDspOff && list.m_hasSpeakerChannels )
{
// apply 1ch filtering to ISPEAKERBUFFER
Device_ApplyDSPEffects( idsp_speaker, MIX_GetPFrontFromIPaint(ISPEAKERBUFFER), MIX_GetPRearFromIPaint(ISPEAKERBUFFER), MIX_GetPCenterFromIPaint(ISPEAKERBUFFER), count );
// mix ISPEAKERBUFFER with IROOMBUFFER and IFACINGBUFFER
MIX_ScalePaintBuffer( ISPEAKERBUFFER, count, 0.7 );
MIX_MixPaintbuffers( ISPEAKERBUFFER, IFACINGBUFFER, IFACINGBUFFER, count, 1.0 ); // +70% dry speaker
MIX_ScalePaintBuffer( ISPEAKERBUFFER, count, 0.43 );
MIX_MixPaintbuffers( ISPEAKERBUFFER, IROOMBUFFER, IROOMBUFFER, count, 1.0 ); // +30% wet speaker
}
// apply dsp_room effects to room buffer
Device_ApplyDSPEffects( Get_idsp_room(), MIX_GetPFrontFromIPaint(IROOMBUFFER), MIX_GetPRearFromIPaint(IROOMBUFFER), MIX_GetPCenterFromIPaint(IROOMBUFFER), count );
// save room buffer surround status, in case we upconvert it
room_fsurround_sav = proom->fsurround;
room_fsurround_center_sav = proom->fsurround_center;
// apply left/center/right/lrear/rrear spatial delays to room buffer
if ( b_spatial_delays && !g_bDspOff && !DSP_RoomDSPIsOff() )
{
// upgrade mono room buffer to surround status so we can apply spatial delays to all channels
MIX_ConvertBufferToSurround( IROOMBUFFER );
Device_ApplyDSPEffects( idsp_spatial, MIX_GetPFrontFromIPaint(IROOMBUFFER), MIX_GetPRearFromIPaint(IROOMBUFFER), MIX_GetPCenterFromIPaint(IROOMBUFFER), count );
}
if ( g_bdirectionalfx ) // KDB: perf
{
// Recombine IFACING and IFACINGAWAY buffers into IPAINTBUFFER
MIX_MixPaintbuffers( IFACINGBUFFER, IFACINGAWAYBUFFER, IPAINTBUFFER, count, DSP_NOROOM_MIX );
// Add in dsp room fx to paintbuffer, mix at 75%
MIX_MixPaintbuffers( IROOMBUFFER, IPAINTBUFFER, IPAINTBUFFER, count, DSP_ROOM_MIX );
}
else
{
// Mix IFACING buffer with IROOMBUFFER
// (IFACINGAWAYBUFFER contains no data, IFACINGBBUFFER has full dry mix based on distance from listener)
// if dsp disabled, mix 100% facingbuffer, otherwise, mix 75% facingbuffer + roombuffer
/*MIX_ScalePaintBuffer( IROOMBUFFER, count, snd_mix_test1.GetFloat() );*/
float flDryVolume = snd_mix_dry_volume.GetFloat();
if( flDryVolume < 1.0 )
{
MIX_ScalePaintBuffer( IFACINGBUFFER, count, flDryVolume );
}
float mix = g_bDspOff ? 1.0 : DSP_ROOM_MIX;
MIX_MixPaintbuffers( IROOMBUFFER, IFACINGBUFFER, IPAINTBUFFER, count, mix );
}
// restore room buffer surround status, in case we upconverted it
proom->fsurround = room_fsurround_sav;
proom->fsurround_center = room_fsurround_center_sav;
// Apply underwater fx dsp_water (serial in-line)
if ( bIsUnderwater )
{
// BUG: if out of water, previous delays will be heard. must clear dly buffers.
Device_ApplyDSPEffects( idsp_water, MIX_GetPFrontFromIPaint(IPAINTBUFFER), MIX_GetPRearFromIPaint(IPAINTBUFFER), MIX_GetPCenterFromIPaint(IPAINTBUFFER), count );
}
// find dsp gain
SDEBUG_GetAvgIn(IPAINTBUFFER, count);
// Apply player fx dsp_player (serial in-line) - does nothing if dsp fx are disabled
Device_ApplyDSPEffects( idsp_player, MIX_GetPFrontFromIPaint(IPAINTBUFFER), MIX_GetPRearFromIPaint(IPAINTBUFFER), MIX_GetPCenterFromIPaint(IPAINTBUFFER), count );
// display dsp gain
SDEBUG_GetAvgOut(IPAINTBUFFER, count);
/*
// apply left/center/right/lrear/rrear spatial delays to paint buffer
if ( b_spatial_delays )
Device_ApplyDSPEffects( idsp_spatial, MIX_GetPFrontFromIPaint(IPAINTBUFFER), MIX_GetPRearFromIPaint(IPAINTBUFFER), MIX_GetPCenterFromIPaint(IPAINTBUFFER), count );
*/
// Add dry buffer, set output gain to water * player dsp gain (both 1.0 if not active)
MIX_MixPaintbuffers( IPAINTBUFFER, IDRYBUFFER, IPAINTBUFFER, count, 1.0);
// clip all values > 16 bit down to 16 bit
// NOTE: This is required - the hardware buffer transfer routines no longer perform clipping.
MIX_CompressPaintbuffer( IPAINTBUFFER, count );
// transfer IPAINTBUFFER paintbuffer out to DMA buffer
MIX_SetCurrentPaintbuffer( IPAINTBUFFER );
g_AudioDevice->TransferSamples( end );
g_paintedtime = end;
}
}
// Applies volume scaling (evenly) to all fl,fr,rl,rr volumes
// used for voice ducking and panning between various mix busses
// Ensures if mixing to speaker buffer, only speaker sounds pass through
// Called just before mixing wav data to current paintbuffer.
// a) if another player in a multiplayer game is speaking, scale all volumes down.
// b) if mixing to IROOMBUFFER, scale all volumes by ch.dspmix and dsp_room gain
// c) if mixing to IFACINGAWAYBUFFER, scale all volumes by ch.dspface and dsp_facingaway gain
// d) If SURROUND_ON, but buffer is not surround, recombined front/rear volumes
// returns false if channel is to be entirely skipped.
bool MIX_ScaleChannelVolume( paintbuffer_t *ppaint, channel_t *pChannel, float volume[CCHANVOLUMES], int mixchans )
{
int i;
int mixflag = ppaint->flags;
float scale;
char wavtype = pChannel->wavtype;
float dspmix;
// copy current channel volumes into output array
ChannelCopyVolumes( pChannel, volume, 0, CCHANVOLUMES );
dspmix = pChannel->dspmix;
dspmix *= 256.0; // Pre-multiply the dspmix by 256 so we can do integer arithmetic
// It will reduce LHS on game console.
// if dsp is off, or room dsp is off, mix 0% to mono room buffer, 100% to facing buffer
if ( g_bDspOff || DSP_RoomDSPIsOff() )
dspmix = 0.0;
// duck all sound volumes except speaker's voice
#if !defined( NO_VOICE )
int duckScale = MIN(g_DuckScaleInt256, g_SND_VoiceOverdriveInt); // g_SND_VoiceOverdriveInt is already multipled by 256
#else
int duckScale = g_DuckScaleInt256;
#endif
if( duckScale < 256 )
{
if( pChannel->pMixer )
{
CAudioSource *pSource = pChannel->pMixer->GetSource();
if( !pSource->IsVoiceSource() )
{
// Apply voice overdrive..
for (i = 0; i < CCHANVOLUMES; i++)
volume[i] = (volume[i] * duckScale) / 256.0;
}
}
}
// If mixing to the room buss, adjust volume based on channel's dspmix setting.
// dspmix is DSP_MIX_MAX (~0.78) if sound is far from player, DSP_MIX_MIN (~0.24) if sound is near player
if ( mixflag & SOUND_BUSS_ROOM )
{
// set dsp mix volume, scaled by global dsp_volume
// Values are pre-multiplied by 256
int dspmixvol = imin( (int)(dspmix * g_dsp_volume), 256 ); // LHS
// if dspmix is 1.0, 100% of sound goes to IROOMBUFFER and 0% to IFACINGBUFFER
for (i = 0; i < CCHANVOLUMES; i++)
volume[i] = ( volume[i] * dspmixvol ) / 256.0f;
}
// If global dsp volume is less than 1, reduce dspmix (ie: increase dry volume)
// If gloabl dsp volume is greater than 1, do not reduce dspmix
if (g_dsp_volume < 1.0)
dspmix *= g_dsp_volume;
// If mixing to facing/facingaway buss, adjust volume based on sound entity's facing direction.
// If sound directly faces player, ch->dspface = 1.0. If facing directly away, ch->dspface = -1.0.
// mix to lowpass buffer if facing away, to allpass if facing
// scale 1.0 - facing player, scale 0, facing away
scale = (pChannel->dspface + 1.0) / 2.0;
// UNDONE: get front cone % from channel to set this.
// bias scale such that 1.0 to 'cone' is considered facing. Facing cone narrows as cone -> 1.0
// and 'cone' -> 0.0 becomes 1.0 -> 0.0
float cone = 0.6f;
scale = scale * (1/cone);
scale = clamp( scale, 0.0f, 1.0f );
// pan between facing and facing away buffers
// if ( !g_bdirectionalfx || wavtype == CHAR_DOPPLER || wavtype == CHAR_OMNI || (wavtype == CHAR_DIRECTIONAL && mixchans == 2) )
if ( !g_bdirectionalfx || wavtype != CHAR_DIRECTIONAL )
{
// if no directional fx mix 0% to facingaway buffer
// if wavtype is DOPPLER, mix 0% to facingaway buffer - DOPPLER wavs have a custom mixer
// if wavtype is OMNI, mix 0% to facingaway buffer - OMNI wavs have no directionality
// if wavtype is DIRECTIONAL and stereo encoded, mix 0% to facingaway buffer - DIRECTIONAL STEREO wavs have a custom mixer
scale = 1.0;
}
if ( mixflag & SOUND_BUSS_FACING )
{
// facing player
// if dspface is 1.0, 100% of sound goes to IFACINGBUFFER
float fMultiplier = scale * ( 256.0f - dspmix ); // dspmix is pre-multiplied by 256
int nMultiplier = (int)fMultiplier; // LHS
for (i = 0; i < CCHANVOLUMES; i++)
volume[i] = ( volume[i] * nMultiplier ) / 256.0f;
}
else if ( mixflag & SOUND_BUSS_FACINGAWAY )
{
// facing away from player
// if dspface is 0.0, 100% of sound goes to IFACINGAWAYBUFFER
float fMultiplier = ( 1.0f - scale ) * ( 256.0f - dspmix ); // dspmix is pre-multiplied by 256
int nMultiplier = (int)fMultiplier; // LHS
for (i = 0; i < CCHANVOLUMES; i++)
volume[i] = ( volume[i] * nMultiplier ) / 256.0f;
}
// NOTE: this must occur last in this routine:
if ( g_AudioDevice->IsSurround() && !ppaint->fsurround )
{
// if 4ch or 5ch spatialization on, but current mix buffer is 2ch,
// recombine front + rear volumes (revert to 2ch spatialization)
// Use temp variables to reduce LHS
int nFrontRight = volume[IFRONT_RIGHT];
int nFrontLeft = volume[IFRONT_LEFT];
int nFrontRightD = volume[IFRONT_RIGHTD];
int nFrontLeftD = volume[IFRONT_LEFTD];
nFrontRight += volume[IREAR_RIGHT];
nFrontLeft += volume[IREAR_LEFT];
nFrontRightD += volume[IREAR_RIGHTD];
nFrontLeftD += volume[IREAR_LEFTD];
// if 5 ch, recombine center channel vol
if ( g_AudioDevice->IsSurroundCenter() )
{
nFrontRight += volume[IFRONT_CENTER] / 2;
nFrontLeft += volume[IFRONT_CENTER] / 2;
nFrontRightD += volume[IFRONT_CENTERD] / 2;
nFrontLeftD += volume[IFRONT_CENTERD] / 2;
}
volume[IFRONT_RIGHT] = nFrontRight;
volume[IFRONT_LEFT] = nFrontLeft;
volume[IFRONT_RIGHTD] = nFrontRightD;
volume[IFRONT_LEFTD] = nFrontLeftD;
// clear rear & center volumes
volume[IREAR_RIGHT] = 0;
volume[IREAR_LEFT] = 0;
volume[IFRONT_CENTER] = 0;
volume[IREAR_RIGHTD] = 0;
volume[IREAR_LEFTD] = 0;
volume[IFRONT_CENTERD] = 0;
// Note that we pay another set of LHS with iclamp below, we could embed the iclamp above (and have a simpler fzerovolume test).
}
bool fzerovolume = true;
for (i = 0; i < CCHANVOLUMES; i++)
{
volume[i] = iclamp(volume[i], 0, 255);
if (volume[i])
fzerovolume = false;
}
if ( fzerovolume )
{
// DevMsg ("Skipping mix of 0 volume sound! \n");
return false;
}
return true;
}
//===============================================================================
// Low level mixing routines
//===============================================================================
void Snd_WriteLinearBlastStereo16( void )
{
#if !id386
int i;
int val;
for ( i=0; i<snd_linear_count; i+=2 )
{
// scale and clamp left 16bit signed: [0x8000, 0x7FFF]
val = ( snd_p[i] * snd_vol )>>8;
if ( val > 32767 )
snd_out[i] = 32767;
else if ( val < -32768 )
snd_out[i] = -32768;
else
snd_out[i] = val;
// scale and clamp right 16bit signed: [0x8000, 0x7FFF]
val = ( snd_p[i+1] * snd_vol )>>8;
if ( val > 32767 )
snd_out[i+1] = 32767;
else if ( val < -32768 )
snd_out[i+1] = -32768;
else
snd_out[i+1] = val;
}
#else
__asm
{
// input data
mov ebx,snd_p
// output data
mov edi,snd_out
// iterate from end to beginning
mov ecx,snd_linear_count
// scale table
mov esi,snd_vol
// scale and clamp 16bit signed lsw: [0x8000, 0x7FFF]
WLBS16_LoopTop:
mov eax,[ebx+ecx*4-8]
imul eax,esi
sar eax,0x08
cmp eax,0x7FFF
jg WLBS16_ClampHigh
cmp eax,0xFFFF8000
jnl WLBS16_ClampDone
mov eax,0xFFFF8000
jmp WLBS16_ClampDone
WLBS16_ClampHigh:
mov eax,0x7FFF
WLBS16_ClampDone:
// scale and clamp 16bit signed msw: [0x8000, 0x7FFF]
mov edx,[ebx+ecx*4-4]
imul edx,esi
sar edx,0x08
cmp edx,0x7FFF
jg WLBS16_ClampHigh2
cmp edx,0xFFFF8000
jnl WLBS16_ClampDone2
mov edx,0xFFFF8000
jmp WLBS16_ClampDone2
WLBS16_ClampHigh2:
mov edx,0x7FFF
WLBS16_ClampDone2:
shl edx,0x10
and eax,0xFFFF
or edx,eax
mov [edi+ecx*2-4],edx
// two shorts per iteration
sub ecx,0x02
jnz WLBS16_LoopTop
}
#endif
}
void SND_InitScaletable (void)
{
int i, j;
for (i=0 ; i<SND_SCALE_LEVELS; i++)
for (j=0 ; j<256 ; j++)
snd_scaletable[i][j] = ((signed char)j) * i * (1<<SND_SCALE_SHIFT);
}
void SND_PaintChannelFrom8(portable_samplepair_t *pOutput, float *volume, byte *pData8, int count)
{
#if 1
int data;
int *lscale, *rscale;
int i;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
for (i=0 ; i<count ; i++)
{
data = pData8[i];
pOutput[i].left += lscale[data];
pOutput[i].right += rscale[data];
}
#else
// portable_samplepair_t structure
#define psp_left 0
#define psp_right 4
#define psp_size 8
static int tempStore;
__asm
{
// prologue
push ebp
// esp = pOutput
mov eax, pOutput
mov tempStore, eax
xchg esp,tempStore
// ebx = volume
mov ebx,volume
// esi = pData8
mov esi,pData8
// ecx = count
mov ecx,count
// These values depend on the setting of SND_SCALE_BITS
// The mask must mask off all the lower bits you aren't using in the multiply
// so for 7 bits, the mask is 0xFE, 6 bits 0xFC, etc.
// The shift must multiply by the table size. There are 256 4-byte values in the table at each level.
// So each index must be shifted left by 10, but since the bits we use are in the MSB rather than LSB
// they must be shifted right by 8 - SND_SCALE_BITS. e.g., for a 7 bit number the left shift is:
// 10 - (8-7) = 9. For a 5 bit number it's 10 - (8-5) = 7.
mov eax,[ebx]
mov edx,[ebx + 4]
and eax,0xFE
and edx,0xFE
// shift up by 10 to index table, down by 1 to make the 7 MSB of the bytes an index
// eax = lscale
// edx = rscale
shl eax,0x09
shl edx,0x09
add eax,OFFSET snd_scaletable
add edx,OFFSET snd_scaletable
// ebx = data byte
sub ebx,ebx
mov bl,[esi+ecx-1]
// odd or even number of L/R samples
test ecx,0x01
jz PCF8_Loop
// process odd L/R sample
mov edi,[eax+ebx*4]
mov ebp,[edx+ebx*4]
add edi,[esp+ecx*psp_size-psp_size+psp_left]
add ebp,[esp+ecx*psp_size-psp_size+psp_right]
mov [esp+ecx*psp_size-psp_size+psp_left],edi
mov [esp+ecx*psp_size-psp_size+psp_right],ebp
mov bl,[esi+ecx-1-1]
dec ecx
jz PCF8_Done
PCF8_Loop:
// process L/R sample N
mov edi,[eax+ebx*4]
mov ebp,[edx+ebx*4]
add edi,[esp+ecx*psp_size-psp_size+psp_left]
add ebp,[esp+ecx*psp_size-psp_size+psp_right]
mov [esp+ecx*psp_size-psp_size+psp_left],edi
mov [esp+ecx*psp_size-psp_size+psp_right],ebp
mov bl,[esi+ecx-1-1]
// process L/R sample N-1
mov edi,[eax+ebx*4]
mov ebp,[edx+ebx*4]
add edi,[esp+ecx*psp_size-psp_size*2+psp_left]
add ebp,[esp+ecx*psp_size-psp_size*2+psp_right]
mov [esp+ecx*psp_size-psp_size*2+psp_left],edi
mov [esp+ecx*psp_size-psp_size*2+psp_right],ebp
mov bl,[esi+ecx-1-2]
// two L/R samples per iteration
sub ecx,0x02
jnz PCF8_Loop
PCF8_Done:
// epilogue
xchg esp,tempStore
pop ebp
}
#endif
}
//===============================================================================
// SOFTWARE MIXING ROUTINES
//===============================================================================
// UNDONE: optimize these
// grab samples from left source channel only and mix as if mono.
// volume array contains appropriate spatialization volumes for doppler left (incoming sound)
void SW_Mix8StereoDopplerLeft( portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
for ( int i = 0; i < outCount; i++ )
{
pOutput[i].left += lscale[pData[sampleIndex]];
pOutput[i].right += rscale[pData[sampleIndex]];
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
// grab samples from right source channel only and mix as if mono.
// volume array contains appropriate spatialization volumes for doppler right (outgoing sound)
void SW_Mix8StereoDopplerRight( portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
for ( int i = 0; i < outCount; i++ )
{
pOutput[i].left += lscale[pData[sampleIndex+1]];
pOutput[i].right += rscale[pData[sampleIndex+1]];
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
// grab samples from left source channel only and mix as if mono.
// volume array contains appropriate spatialization volumes for doppler left (incoming sound)
void SW_Mix16StereoDopplerLeft( portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
for ( int i = 0; i < outCount; i++ )
{
pOutput[i].left += int((volume[0] * (int)(pData[sampleIndex]))/256.0f);
pOutput[i].right += int((volume[1] * (int)(pData[sampleIndex]))/256.0f);
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
void SW_Mix16StereoDopplerLeft_Interp( portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int sampleIndex = 0;
fixedint rateScaleFix14 = FIX_28TO14(rateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(inputOffset);
for ( int i = 0; i < outCount; i++ )
{
int first = (int)(pData[sampleIndex]);
int second = (int)(pData[sampleIndex + 2]);
int interpl = first + (((second - first) * (int)sampleFrac14) >> 14);
pOutput[i].left += int((volume[0] * interpl) / 256.0f);
pOutput[i].right += int((volume[1] * interpl) / 256.0f);
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14) << 1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
}
// grab samples from right source channel only and mix as if mono.
// volume array contains appropriate spatialization volumes for doppler right (outgoing sound)
void SW_Mix16StereoDopplerRight( portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
for ( int i = 0; i < outCount; i++ )
{
pOutput[i].left += int((volume[0] * (int)(pData[sampleIndex+1])) / 256.0f);
pOutput[i].right += int((volume[1] * (int)(pData[sampleIndex+1])) / 256.0f);
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
void SW_Mix16StereoDopplerRight_Interp( portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
SW_Mix16StereoDopplerLeft_Interp( pOutput, volume, pData + 1, inputOffset, rateScaleFix, outCount );
}
// mix left wav (front facing) with right wav (rear facing) based on soundfacing direction
void SW_Mix8StereoDirectional( float soundfacing, portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
int x;
int l,r;
signed char lb,rb;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
// if soundfacing -1.0, sound source is facing away from player
// if soundfacing 0.0, sound source is perpendicular to player
// if soundfacing 1.0, sound source is facing player
int frontmix = (int)(256.0f * ((1.f + soundfacing) / 2.f)); // 0 -> 256
for ( int i = 0; i < outCount; i++ )
{
lb = (pData[sampleIndex]); // get left byte
rb = (pData[sampleIndex+1]); // get right byte
l = ((int)lb);
r = ((int)rb);
x = ( r + ((( l - r ) * frontmix) >> 8) );
pOutput[i].left += lscale[x & 0xFF]; // multiply by volume and convert to 16 bit
pOutput[i].right += rscale[x & 0xFF];
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
// mix left wav (front facing) with right wav (rear facing) based on soundfacing direction
// interpolating pitch shifter - sample(s) from preceding buffer are preloaded in
// pData buffer, ensuring we can always provide 'outCount' samples.
void SW_Mix8StereoDirectional_Interp( float soundfacing, portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
fixedint sampleIndex = 0;
fixedint rateScaleFix14 = FIX_28TO14(rateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(inputOffset);
int first, second, interpl, interpr;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
int x;
// if soundfacing -1.0, sound source is facing away from player
// if soundfacing 0.0, sound source is perpendicular to player
// if soundfacing 1.0, sound source is facing player
int frontmix = (int)(256.0f * ((1.f + soundfacing) / 2.f)); // 0 -> 256
for ( int i = 0; i < outCount; i++ )
{
// interpolate between first & second sample (the samples bordering sampleFrac12 fraction)
first = (int)((signed char)(pData[sampleIndex])); // left byte
second = (int)((signed char)(pData[sampleIndex+2]));
interpl = first + ( ((second - first) * (int)sampleFrac14) >> 14 );
first = (int)((signed char)(pData[sampleIndex+1])); // right byte
second = (int)((signed char)(pData[sampleIndex+3]));
interpr = first + ( ((second - first) * (int)sampleFrac14) >> 14 );
// crossfade between right/left based on directional mix
x = ( interpr + ((( interpl - interpr ) * frontmix) >> 8) );
pOutput[i].left += lscale[x & 0xFF]; // scale and convert to 16 bit
pOutput[i].right += rscale[x & 0xFF];
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
}
// mix left wav (front facing) with right wav (rear facing) based on soundfacing direction
void SW_Mix16StereoDirectional( float soundfacing, portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
fixedint sampleIndex = 0;
fixedint sampleFrac = inputOffset;
int x;
int l, r;
// if soundfacing -1.0, sound source is facing away from player
// if soundfacing 0.0, sound source is perpendicular to player
// if soundfacing 1.0, sound source is facing player
int frontmix = (int)(256.0f * ((1.f + soundfacing) / 2.f)); // 0 -> 256
for ( int i = 0; i < outCount; i++ )
{
// get left, right samples
l = (int)(pData[sampleIndex]);
r = (int)(pData[sampleIndex+1]);
// crossfade between left & right based on front/rear facing
x = ( r + ((( l - r ) * frontmix) >> 8) );
pOutput[i].left += int((volume[0] * x) / 256.0f);
pOutput[i].right += int((volume[1] * x) / 256.0f);
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
// mix left wav (front facing) with right wav (rear facing) based on soundfacing direction
// interpolating pitch shifter - sample(s) from preceding buffer are preloaded in
// pData buffer, ensuring we can always provide 'outCount' samples.
void SW_Mix16StereoDirectional_Interp( float soundfacing, portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
fixedint sampleIndex = 0;
fixedint rateScaleFix14 = FIX_28TO14(rateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(inputOffset);
int x;
int first, second, interpl, interpr;
// if soundfacing -1.0, sound source is facing away from player
// if soundfacing 0.0, sound source is perpendicular to player
// if soundfacing 1.0, sound source is facing player
int frontmix = (int)(256.0f * ((1.f + soundfacing) / 2.f)); // 0 -> 256
for ( int i = 0; i < outCount; i++ )
{
// get interpolated left, right samples
first = (int)(pData[sampleIndex]);
second = (int)(pData[sampleIndex+2]);
interpl = first + (((second - first) * (int)sampleFrac14) >> 14);
first = (int)(pData[sampleIndex+1]);
second = (int)(pData[sampleIndex+3]);
interpr = first + (((second - first) * (int)sampleFrac14) >> 14);
// crossfade between left & right based on front/rear facing
x = ( interpr + ((( interpl - interpr ) * frontmix) >> 8) );
pOutput[i].left += int((volume[0] * x) / 256.0f);
pOutput[i].right += int((volume[1] * x) / 256.0f);
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
}
// distance variant wav (left is close, right is far)
void SW_Mix8StereoDistVar( float distmix, portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
int x;
int l,r;
signed char lb, rb;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
// distmix 0 - sound is near player (100% wav left)
// distmix 1.0 - sound is far from player (100% wav right)
int nearmix = (int)(256.0f * (1.0f - distmix));
int farmix = (int)(256.0f * distmix);
// if mixing at max or min range, skip crossfade (KDB: perf)
if (!nearmix)
{
for ( int i = 0; i < outCount; i++ )
{
rb = (pData[sampleIndex+1]); // get right byte
x = (int) rb;
pOutput[i].left += lscale[x & 0xFF]; // multiply by volume and convert to 16 bit
pOutput[i].right += rscale[x & 0xFF];
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
return;
}
if (!farmix)
{
for ( int i = 0; i < outCount; i++ )
{
lb = (pData[sampleIndex]); // get left byte
x = (int) lb;
pOutput[i].left += lscale[x & 0xFF]; // multiply by volume and convert to 16 bit
pOutput[i].right += rscale[x & 0xFF];
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
return;
}
// crossfade left/right
for ( int i = 0; i < outCount; i++ )
{
lb = (pData[sampleIndex]); // get left byte
rb = (pData[sampleIndex+1]); // get right byte
l = (int)lb;
r = (int)rb;
x = ( l + (((r - l) * farmix ) >> 8) );
pOutput[i].left += lscale[x & 0xFF]; // multiply by volume and convert to 16 bit
pOutput[i].right += rscale[x & 0xFF];
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
// distance variant wav (left is close, right is far)
// interpolating pitch shifter - sample(s) from preceding buffer are preloaded in
// pData buffer, ensuring we can always provide 'outCount' samples.
void SW_Mix8StereoDistVar_Interp( float distmix, portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int x;
// distmix 0 - sound is near player (100% wav left)
// distmix 1.0 - sound is far from player (100% wav right)
int nearmix = (int)(256.0f * (1.0f - distmix));
int farmix = (int)(256.0f * distmix);
fixedint sampleIndex = 0;
fixedint rateScaleFix14 = FIX_28TO14(rateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(inputOffset);
int first, second, interpl, interpr;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
// if mixing at max or min range, skip crossfade (KDB: perf)
if (!nearmix)
{
for ( int i = 0; i < outCount; i++ )
{
first = (int)((signed char)(pData[sampleIndex+1])); // right sample
second = (int)((signed char)(pData[sampleIndex+3]));
interpr = first + ( ((second - first) * (int)sampleFrac14) >> 14 );
pOutput[i].left += lscale[interpr & 0xFF]; // scale and convert to 16 bit
pOutput[i].right += rscale[interpr & 0xFF];
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
return;
}
if (!farmix)
{
for ( int i = 0; i < outCount; i++ )
{
first = (int)((signed char)(pData[sampleIndex])); // left sample
second = (int)((signed char)(pData[sampleIndex+2]));
interpl = first + ( ((second - first) * (int)sampleFrac14) >> 14 );
pOutput[i].left += lscale[interpl & 0xFF]; // scale and convert to 16 bit
pOutput[i].right += rscale[interpl & 0xFF];
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
return;
}
// crossfade left/right
for ( int i = 0; i < outCount; i++ )
{
// interpolate between first & second sample (the samples bordering sampleFrac14 fraction)
first = (int)((signed char)(pData[sampleIndex]));
second = (int)((signed char)(pData[sampleIndex+2]));
interpl = first + ( ((second - first) * (int)sampleFrac14) >> 14 );
first = (int)((signed char)(pData[sampleIndex+1]));
second = (int)((signed char)(pData[sampleIndex+3]));
interpr = first + ( ((second - first) * (int)sampleFrac14) >> 14 );
// crossfade between left and right based on distance mix
x = ( interpl + (((interpr - interpl) * farmix ) >> 8) );
pOutput[i].left += lscale[x & 0xFF]; // scale and convert to 16 bit
pOutput[i].right += rscale[x & 0xFF];
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
}
// distance variant wav (left is close, right is far)
void SW_Mix16StereoDistVar( float distmix, portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
int x;
int l,r;
// distmix 0 - sound is near player (100% wav left)
// distmix 1.0 - sound is far from player (100% wav right)
int nearmix = Float2Int(256.0f * (1.f - distmix));
int farmix = Float2Int(256.0f * distmix);
// if mixing at max or min range, skip crossfade (KDB: perf)
if (!nearmix)
{
for ( int i = 0; i < outCount; i++ )
{
x = pData[sampleIndex+1]; // right sample
pOutput[i].left += int((volume[0] * x) / 256.0f);
pOutput[i].right += int((volume[1] * x) / 256.0f);
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
return;
}
if (!farmix)
{
for ( int i = 0; i < outCount; i++ )
{
x = pData[sampleIndex]; // left sample
pOutput[i].left += int((volume[0] * x)/256.0f);
pOutput[i].right += int((volume[1] * x)/256.0f);
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
return;
}
// crossfade left/right
for ( int i = 0; i < outCount; i++ )
{
l = pData[sampleIndex];
r = pData[sampleIndex+1];
x = ( l + (((r - l) * farmix) >> 8) );
pOutput[i].left += int((volume[0] * x)/256.0f);
pOutput[i].right += int((volume[1] * x)/256.0f);
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
// distance variant wav (left is close, right is far)
// interpolating pitch shifter - sample(s) from preceding buffer are preloaded in
// pData buffer, ensuring we can always provide 'outCount' samples.
void SW_Mix16StereoDistVar_Interp( float distmix, portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int x;
fixedint sampleIndex = 0;
fixedint rateScaleFix14 = FIX_28TO14(rateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(inputOffset);
int first, second, interpl, interpr;
// distmix 0 - sound is near player (100% wav left)
// distmix 1.0 - sound is far from player (100% wav right)
int nearmix = Float2Int(256.0f * (1.f - distmix));
int farmix = Float2Int(256.0f * distmix);
// if mixing at max or min range, skip crossfade (KDB: perf)
if (!nearmix)
{
for ( int i = 0; i < outCount; i++ )
{
first = (int)(pData[sampleIndex+1]); // right sample
second = (int)(pData[sampleIndex+3]);
interpr = first + (((second - first) * (int)sampleFrac14) >> 14);
pOutput[i].left += int((volume[0] * interpr)/256.0f);
pOutput[i].right += int((volume[1] * interpr)/256.0f);
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
return;
}
if (!farmix)
{
for ( int i = 0; i < outCount; i++ )
{
first = (int)(pData[sampleIndex]); // left sample
second = (int)(pData[sampleIndex+2]);
interpl = first + (((second - first) * (int)sampleFrac14) >> 14);
pOutput[i].left += int((volume[0] * interpl)/256.0f);
pOutput[i].right += int((volume[1] * interpl)/256.0f);
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
return;
}
// crossfade left/right
for ( int i = 0; i < outCount; i++ )
{
first = (int)(pData[sampleIndex]);
second = (int)(pData[sampleIndex+2]);
interpl = first + (((second - first) * (int)sampleFrac14) >> 14);
first = (int)(pData[sampleIndex+1]);
second = (int)(pData[sampleIndex+3]);
interpr = first + (((second - first) * (int)sampleFrac14) >> 14);
// crossfade between left & right samples
x = ( interpl + (((interpr - interpl) * farmix) >> 8) );
pOutput[i].left += int((volume[0] * x)/256.0f);
pOutput[i].right += int((volume[1] * x)/256.0f);
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
}
void SW_Mix8Mono( portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
// Not using pitch shift?
if ( rateScaleFix == FIX(1) )
{
// native code
SND_PaintChannelFrom8( pOutput, volume, (byte *)pData, outCount );
return;
}
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
for ( int i = 0; i < outCount; i++ )
{
pOutput[i].left += lscale[pData[sampleIndex]];
pOutput[i].right += rscale[pData[sampleIndex]];
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac);
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
// interpolating pitch shifter - sample(s) from preceding buffer are preloaded in
// pData buffer, ensuring we can always provide 'outCount' samples.
void SW_Mix8Mono_Interp( portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount)
{
fixedint sampleIndex = 0;
fixedint rateScaleFix14 = FIX_28TO14(rateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(inputOffset);
int first, second, interp;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
// iterate 0th sample to outCount-1 sample
for (int i = 0; i < outCount; i++ )
{
// interpolate between first & second sample (the samples bordering sampleFrac12 fraction)
first = (int)((signed char)(pData[sampleIndex]));
second = (int)((signed char)(pData[sampleIndex+1]));
interp = first + ( ((second - first) * (int)sampleFrac14) >> 14 );
pOutput[i].left += lscale[interp & 0xFF]; // multiply by volume and convert to 16 bit
pOutput[i].right += rscale[interp & 0xFF];
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14);
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
}
void SW_Mix8Stereo( portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
for ( int i = 0; i < outCount; i++ )
{
pOutput[i].left += lscale[pData[sampleIndex]];
pOutput[i].right += rscale[pData[sampleIndex+1]];
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac)<<1;
sampleFrac = FIX_FRACPART(sampleFrac);
}
}
// interpolating pitch shifter - sample(s) from preceding buffer are preloaded in
// pData buffer, ensuring we can always provide 'outCount' samples.
void SW_Mix8Stereo_Interp( portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount)
{
fixedint sampleIndex = 0;
fixedint rateScaleFix14 = FIX_28TO14(rateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(inputOffset);
int first, second, interpl, interpr;
int *lscale, *rscale;
lscale = snd_scaletable[int(volume[0]) >> SND_SCALE_SHIFT];
rscale = snd_scaletable[int(volume[1]) >> SND_SCALE_SHIFT];
// iterate 0th sample to outCount-1 sample
for (int i = 0; i < outCount; i++ )
{
// interpolate between first & second sample (the samples bordering sampleFrac12 fraction)
first = (int)((signed char)(pData[sampleIndex])); // left
second = (int)((signed char)(pData[sampleIndex+2]));
interpl = first + ( ((second - first) * (int)sampleFrac14) >> 14 );
first = (int)((signed char)(pData[sampleIndex+1])); // right
second = (int)((signed char)(pData[sampleIndex+3]));
interpr = first + ( ((second - first) * (int)sampleFrac14) >> 14 );
pOutput[i].left += lscale[interpl & 0xFF]; // multiply by volume and convert to 16 bit
pOutput[i].right += rscale[interpr & 0xFF];
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
}
void SW_Mix16Mono_Shift( portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
float vol0 = volume[0];
float vol1 = volume[1];
#if 1
int sampleIndex = 0;
fixedint sampleFrac = inputOffset;
for ( int i = 0; i < outCount; i++ )
{
pOutput[i].left += int((vol0 * (int)(pData[sampleIndex]))/256.0f);
pOutput[i].right += int((vol1 * (int)(pData[sampleIndex]))/256.0f);
sampleFrac += rateScaleFix;
sampleIndex += FIX_INTPART(sampleFrac);
sampleFrac = FIX_FRACPART(sampleFrac);
}
#else
// in assembly, you can make this 32.32 instead of 4.28 and use the carry flag instead of masking
int rateScaleInt = FIX_INTPART(rateScaleFix);
unsigned int rateScaleFrac = FIX_FRACPART(rateScaleFix) << (32-FIX_BITS);
__asm
{
mov eax, volume ;
movq mm0, DWORD PTR [eax] ; vol1, vol0 (32-bits each)
packssdw mm0, mm0 ; pack and replicate... vol1, vol0, vol1, vol0 (16-bits each)
//pxor mm7, mm7 ; mm7 is my zero register...
xor esi, esi
mov eax, DWORD PTR [pOutput] ; store initial output ptr
mov edx, DWORD PTR [pData] ; store initial input ptr
mov ebx, inputOffset;
mov ecx, outCount;
BEGINLOAD:
movd mm2, WORD PTR [edx+2*esi] ; load first piece of data from pData
punpcklwd mm2, mm2 ; 0, 0, pData_1st, pData_1st
add ebx, rateScaleFrac ; do the crazy fixed integer math
adc esi, rateScaleInt
movd mm3, WORD PTR [edx+2*esi] ; load second piece of data from pData
punpcklwd mm3, mm3 ; 0, 0, pData_2nd, pData_2nd
punpckldq mm2, mm3 ; pData_2nd, pData_2nd, pData_2nd, pData_2nd
add ebx, rateScaleFrac ; do the crazy fixed integer math
adc esi, rateScaleInt
movq mm3, mm2 ; copy the goods
pmullw mm2, mm0 ; pData_2nd*vol1, pData_2nd*vol0, pData_1st*vol1, pData_1st*vol0 (bits 0-15)
pmulhw mm3, mm0 ; pData_2nd*vol1, pData_2nd*vol0, pData_1st*vol1, pData_1st*vol0 (bits 16-31)
movq mm4, mm2 ; copy
movq mm5, mm3 ; copy
punpcklwd mm2, mm3 ; pData_1st*vol1, pData_1st*vol0 (bits 0-31)
punpckhwd mm4, mm5 ; pData_2nd*vol1, pData_2nd*vol0 (bits 0-31)
psrad mm2, 8 ; shift right by 8
psrad mm4, 8 ; shift right by 8
add ecx, -2 ; decrement i-value
paddd mm2, QWORD PTR [eax] ; add to existing vals
paddd mm4, QWORD PTR [eax+8] ;
movq QWORD PTR [eax], mm2 ; store back
movq QWORD PTR [eax+8], mm4 ;
add eax, 10h ;
cmp ecx, 01h ; see if we can quit
jg BEGINLOAD ; Kipp Owens is a doof...
jl END ; Nick Shaffner is killing me...
movsx edi, WORD PTR [edx+2*esi] ; load first 16 bit val and zero-extend
imul edi, vol0 ; multiply pData[sampleIndex] by volume[0]
sar edi, 08h ; divide by 256
add DWORD PTR [eax], edi ; add to pOutput[i].left
movsx edi, WORD PTR [edx+2*esi] ; load same 16 bit val and zero-extend (cuz I thrashed the reg)
imul edi, vol1 ; multiply pData[sampleIndex] by volume[1]
sar edi, 08h ; divide by 256
add DWORD PTR [eax+04h], edi ; add to pOutput[i].right
END:
emms;
}
#endif
}
void SW_Mix16Mono_NoShift( portable_samplepair_t *pOutput, float *volume, short *pData, int outCount )
{
float vol0 = volume[0];
float vol1 = volume[1];
#if 1
for ( int i = 0; i < outCount; i++ )
{
int x = *pData++;
pOutput[i].left += int((x * vol0) / 256.0f);
pOutput[i].right += int((x * vol1) / 256.0f);
}
#else
__asm
{
mov eax, volume ;
movq mm0, DWORD PTR [eax] ; vol1, vol0 (32-bits each)
packssdw mm0, mm0 ; pack and replicate... vol1, vol0, vol1, vol0 (16-bits each)
//pxor mm7, mm7 ; mm7 is my zero register...
mov eax, DWORD PTR [pOutput] ; store initial output ptr
mov edx, DWORD PTR [pData] ; store initial input ptr
mov ecx, outCount;
BEGINLOAD:
movd mm2, WORD PTR [edx] ; load first piece o data from pData
punpcklwd mm2, mm2 ; 0, 0, pData_1st, pData_1st
add edx,2 ; move to the next sample
movd mm3, WORD PTR [edx] ; load second piece o data from pData
punpcklwd mm3, mm3 ; 0, 0, pData_2nd, pData_2nd
punpckldq mm2, mm3 ; pData_2nd, pData_2nd, pData_2nd, pData_2nd
add edx,2 ; move to the next sample
movq mm3, mm2 ; copy the goods
pmullw mm2, mm0 ; pData_2nd*vol1, pData_2nd*vol0, pData_1st*vol1, pData_1st*vol0 (bits 0-15)
pmulhw mm3, mm0 ; pData_2nd*vol1, pData_2nd*vol0, pData_1st*vol1, pData_1st*vol0 (bits 16-31)
movq mm4, mm2 ; copy
movq mm5, mm3 ; copy
punpcklwd mm2, mm3 ; pData_1st*vol1, pData_1st*vol0 (bits 0-31)
punpckhwd mm4, mm5 ; pData_2nd*vol1, pData_2nd*vol0 (bits 0-31)
psrad mm2, 8 ; shift right by 8
psrad mm4, 8 ; shift right by 8
add ecx, -2 ; decrement i-value
paddd mm2, QWORD PTR [eax] ; add to existing vals
paddd mm4, QWORD PTR [eax+8] ;
movq QWORD PTR [eax], mm2 ; store back
movq QWORD PTR [eax+8], mm4 ;
add eax, 10h ;
cmp ecx, 01h ; see if we can quit
jg BEGINLOAD ; I can cut and paste code!
jl END ;
movsx edi, WORD PTR [edx] ; load first 16 bit val and zero-extend
mov esi,edi ; save a copy for the other channel
imul edi, vol0 ; multiply pData[sampleIndex] by volume[0]
sar edi, 08h ; divide by 256
add DWORD PTR [eax], edi ; add to pOutput[i].left
; esi has a copy, use it now
imul esi, vol1 ; multiply pData[sampleIndex] by volume[1]
sar esi, 08h ; divide by 256
add DWORD PTR [eax+04h], esi ; add to pOutput[i].right
END:
emms;
}
#endif
}
enum SW_FillMode
{
FM_SAME_VOL,
FM_LEFT_ZERO,
FM_RIGHT_ZERO,
FM_NORMAL,
};
// Try to keep the number of parameters to 4 to make sure the optimizer is not doing something too stupid.
// Pass the volume by pointer instead of left and right values. It seems that the compiler has harder time optimizing with one more variable.
template <SW_FillMode MODE>
void FillMonoOutput( int nValue, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume );
template <>
FORCEINLINE
void FillMonoOutput<FM_SAME_VOL>( int nValue, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume )
{
nValue = int(( pVolume[0] * nValue ) /256.0f);
pOutput->left += nValue;
pOutput->right += nValue;
}
template <>
FORCEINLINE
void FillMonoOutput<FM_LEFT_ZERO>( int nValue, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume )
{
pOutput->right += int(( pVolume[1] * nValue ) / 256.0f);
}
template <>
FORCEINLINE
void FillMonoOutput<FM_RIGHT_ZERO>( int nValue, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume )
{
pOutput->left += int(( pVolume[0] * nValue ) / 256.0f);
}
template <>
FORCEINLINE
void FillMonoOutput<FM_NORMAL>( int nValue, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume )
{
pOutput->left += int(( pVolume[0] * nValue ) /256.0f);
pOutput->right += int(( pVolume[1] * nValue ) /256.0f);
}
template <SW_FillMode MODE>
void SW_Mix16Mono_Shift_OptMeta( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nInputOffset, fixedint nRateScaleFix, int nOutCount )
{
fixedint nSampleFrac = nInputOffset;
while ( nOutCount >= 4 )
{
FillMonoOutput<MODE>( *pData, pOutput, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac);
nSampleFrac = FIX_FRACPART(nSampleFrac);
FillMonoOutput<MODE>( *pData, pOutput + 1, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac);
nSampleFrac = FIX_FRACPART(nSampleFrac);
FillMonoOutput<MODE>( *pData, pOutput + 2, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac);
nSampleFrac = FIX_FRACPART(nSampleFrac);
FillMonoOutput<MODE>( *pData, pOutput + 3, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac);
nSampleFrac = FIX_FRACPART(nSampleFrac);
pOutput += 4;
nOutCount -= 4;
}
while ( nOutCount > 0 )
{
FillMonoOutput<MODE>( *pData, pOutput, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac);
nSampleFrac = FIX_FRACPART(nSampleFrac);
++pOutput;
--nOutCount;
}
}
void SW_Mix16Mono_Shift_Opt( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nInputOffset, fixedint nRateScaleFix, int nOutCount )
{
int nVolumeLeft = pVolume[0];
int nVolumeRight = pVolume[1];
if ( nVolumeLeft == nVolumeRight )
{
SW_Mix16Mono_Shift_OptMeta<FM_SAME_VOL>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else
{
if ( nVolumeLeft <= CULLED_VOLUME )
{
SW_Mix16Mono_Shift_OptMeta<FM_LEFT_ZERO>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else if ( nVolumeRight <= CULLED_VOLUME )
{
SW_Mix16Mono_Shift_OptMeta<FM_RIGHT_ZERO>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else
{
SW_Mix16Mono_Shift_OptMeta<FM_NORMAL>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
}
}
template <SW_FillMode MODE>
void SW_Mix16Mono_NoShift_OptMeta( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nOutCount )
{
// This code is relatively lightweight, and usually 255 to 1020 samples are passed. So 8 at a time.
while ( nOutCount >= 4 )
{
FillMonoOutput<MODE>( pData[0], pOutput, pVolume );
FillMonoOutput<MODE>( pData[1], pOutput + 1, pVolume );
FillMonoOutput<MODE>( pData[2], pOutput + 2, pVolume );
FillMonoOutput<MODE>( pData[3], pOutput + 3, pVolume );
pData += 4;
pOutput += 4;
nOutCount -= 4;
}
while ( nOutCount > 0 )
{
FillMonoOutput<MODE>( pData[0], pOutput, pVolume );
++pData;
++pOutput;
--nOutCount;
}
}
void SW_Mix16Mono_NoShift_Opt( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nOutCount )
{
int nVolumeLeft = pVolume[0];
int nVolumeRight = pVolume[1];
if ( nVolumeLeft == nVolumeRight )
{
SW_Mix16Mono_NoShift_OptMeta<FM_SAME_VOL>( pOutput, pVolume, pData, nOutCount );
}
else
{
if ( nVolumeLeft <= CULLED_VOLUME )
{
SW_Mix16Mono_NoShift_OptMeta<FM_LEFT_ZERO>( pOutput, pVolume, pData, nOutCount );
}
else if ( nVolumeRight <= CULLED_VOLUME )
{
SW_Mix16Mono_NoShift_OptMeta<FM_RIGHT_ZERO>( pOutput, pVolume, pData, nOutCount );
}
else
{
SW_Mix16Mono_NoShift_OptMeta<FM_NORMAL>( pOutput, pVolume, pData, nOutCount );
}
}
}
void SW_Mix16Mono( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT volume, short * RESTRICT pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
if ( rateScaleFix == FIX(1) )
{
SW_Mix16Mono_NoShift( pOutput, volume, pData, outCount );
}
else
{
SW_Mix16Mono_Shift( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
}
}
void SW_Mix16Mono_Opt(portable_samplepair_t * RESTRICT pOutput, float * RESTRICT volume, short * RESTRICT pData, int inputOffset, fixedint rateScaleFix, int outCount)
{
if ( rateScaleFix == FIX(1) )
{
SW_Mix16Mono_NoShift_Opt( pOutput, volume, pData, outCount );
}
else
{
SW_Mix16Mono_Shift_Opt( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
}
}
// interpolating pitch shifter - sample(s) from preceding buffer are preloaded in
// pData buffer, ensuring we can always provide 'outCount' samples.
void SW_Mix16Mono_Interp(portable_samplepair_t * RESTRICT pOutput, float * RESTRICT volume, short * RESTRICT pData, int inputOffset, fixedint rateScaleFix, int outCount)
{
fixedint sampleIndex = 0;
fixedint rateScaleFix14 = FIX_28TO14(rateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(inputOffset);
int first, second, interp;
for ( int i = 0; i < outCount; i++ )
{
first = (int)(pData[sampleIndex]);
second = (int)(pData[sampleIndex+1]);
interp = first + (((second - first) * (int)sampleFrac14) >> 14);
pOutput[i].left += int( (volume[0] * interp) / 256.0f);
pOutput[i].right += int( (volume[1] * interp) / 256.0f);
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14);
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
}
template <SW_FillMode MODE>
void SW_Mix16Mono_Interp_OptMeta( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nInputOffset, fixedint nRateScaleFix, int nOutCount )
{
fixedint rateScaleFix14 = FIX_28TO14(nRateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(nInputOffset);
int first, second, interp;
while ( nOutCount >= 4 )
{
first = (int)(pData[0]);
second = (int)(pData[1]);
interp = first + (((second - first) * (int)sampleFrac14) >> 14);
FillMonoOutput<MODE>( interp, pOutput, pVolume );
sampleFrac14 += rateScaleFix14;
pData += FIX_INTPART14(sampleFrac14);
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
first = (int)(pData[0]);
second = (int)(pData[1]);
interp = first + (((second - first) * (int)sampleFrac14) >> 14);
FillMonoOutput<MODE>( interp, pOutput + 1, pVolume );
sampleFrac14 += rateScaleFix14;
pData += FIX_INTPART14(sampleFrac14);
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
first = (int)(pData[0]);
second = (int)(pData[1]);
interp = first + (((second - first) * (int)sampleFrac14) >> 14);
FillMonoOutput<MODE>( interp, pOutput + 2, pVolume );
sampleFrac14 += rateScaleFix14;
pData += FIX_INTPART14(sampleFrac14);
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
first = (int)(pData[0]);
second = (int)(pData[1]);
interp = first + (((second - first) * (int)sampleFrac14) >> 14);
FillMonoOutput<MODE>( interp, pOutput + 3, pVolume );
sampleFrac14 += rateScaleFix14;
pData += FIX_INTPART14(sampleFrac14);
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
pOutput += 4;
nOutCount -= 4;
}
while ( nOutCount > 0 )
{
first = (int)(pData[0]);
second = (int)(pData[1]);
interp = first + (((second - first) * (int)sampleFrac14) >> 14);
FillMonoOutput<MODE>( interp, pOutput, pVolume );
sampleFrac14 += rateScaleFix14;
pData += FIX_INTPART14(sampleFrac14);
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
++pOutput;
--nOutCount;
}
}
void SW_Mix16Mono_Interp_Opt( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nInputOffset, fixedint nRateScaleFix, int nOutCount )
{
// Besides unrolling, there are 2 other possible optimizations:
// In some cases both volumes are the same.
// In other cases, one of the volume is zero. (no case where both volumes are zero).
// Would doing one 32 bit load and one 64 bits write instead of 2 be better? (although the 32 bit load would be unaligned, so may not be possible).
// We "save" on the potential memory access, on the other hand we have to mask / shift, etc... to get the two members. (On PPC, it could save on the numbers of write that can be scheduled out of order).
// Except for the multiplication, there would be a potential to use integer VMX. It is not clear if that would be a real gain though as we would only do the calculation 2 samples at a time. :(
// There is also a potential for not always load 2 samples every time (can at least re-use a previous one) but I don't know how much this would save though.
// Would have to do a branch-less select and still load one regardless, may not be worth the effort.
int nVolumeLeft = pVolume[0];
int nVolumeRight = pVolume[1];
if ( nVolumeLeft == nVolumeRight )
{
SW_Mix16Mono_Interp_OptMeta<FM_SAME_VOL>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else
{
if ( nVolumeLeft <= CULLED_VOLUME )
{
SW_Mix16Mono_Interp_OptMeta<FM_LEFT_ZERO>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else if ( nVolumeRight <= CULLED_VOLUME )
{
SW_Mix16Mono_Interp_OptMeta<FM_RIGHT_ZERO>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else
{
SW_Mix16Mono_Interp_OptMeta<FM_NORMAL>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
}
}
// Try to keep the number of parameters to 4 to make sure the optimizer is not doing something too stupid.
// Pass the volume by pointer instead of left and right values. It seems that the compiler has harder time optimizing with one more variable.
template <SW_FillMode MODE>
void FillStereoOutput(short * RESTRICT pInput, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume);
template <>
FORCEINLINE
void FillStereoOutput<FM_SAME_VOL>(short * RESTRICT pInput, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume)
{
int nVolume = pVolume[0];
pOutput->left += int((nVolume * (int)(pInput[0])) / 256.0f);
pOutput->right += int((nVolume * (int)(pInput[1])) / 256.0f);
}
template <>
FORCEINLINE
void FillStereoOutput<FM_LEFT_ZERO>(short * RESTRICT pInput, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume)
{
pOutput->right += int((pVolume[1] * (int)(pInput[1])) / 256.0f);
}
template <>
FORCEINLINE
void FillStereoOutput<FM_RIGHT_ZERO>(short * RESTRICT pInput, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume)
{
pOutput->left += int((pVolume[0] * (int)(pInput[0])) / 256.0f);
}
template <>
FORCEINLINE
void FillStereoOutput<FM_NORMAL>( short * RESTRICT pInput, portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume )
{
pOutput->left += int((pVolume[0] * (int)(pInput[0])) / 256.0f);
pOutput->right += int((pVolume[1] * (int)(pInput[1])) / 256.0f);
}
template <SW_FillMode MODE>
void SW_Mix16Stereo_NoShift_OptMeta( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nOutCount )
{
while ( nOutCount >= 4 )
{
FillStereoOutput<MODE>( pData + 0, pOutput + 0, pVolume );
FillStereoOutput<MODE>( pData + 2, pOutput + 1, pVolume );
FillStereoOutput<MODE>( pData + 4, pOutput + 2, pVolume );
FillStereoOutput<MODE>( pData + 6, pOutput + 3, pVolume );
pOutput += 4;
pData += 8;
nOutCount -= 4;
}
while ( nOutCount > 0 )
{
FillStereoOutput<MODE>( pData, pOutput, pVolume );
++pOutput;
pData += 2;
--nOutCount;
}
}
template <SW_FillMode MODE>
void SW_Mix16Stereo_Shift_OptMeta( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nInputOffset, fixedint nRateScaleFix, int nOutCount )
{
fixedint nSampleFrac = nInputOffset;
while ( nOutCount >= 4 )
{
FillStereoOutput<MODE>( pData, pOutput, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac)<<1;
nSampleFrac = FIX_FRACPART(nSampleFrac);
FillStereoOutput<MODE>( pData, pOutput + 1, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac)<<1;
nSampleFrac = FIX_FRACPART(nSampleFrac);
FillStereoOutput<MODE>( pData, pOutput + 2, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac)<<1;
nSampleFrac = FIX_FRACPART(nSampleFrac);
FillStereoOutput<MODE>( pData, pOutput + 3, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac)<<1;
nSampleFrac = FIX_FRACPART(nSampleFrac);
pOutput += 4;
nOutCount -= 4;
}
while ( nOutCount > 0 )
{
FillStereoOutput<MODE>( pData, pOutput, pVolume );
nSampleFrac += nRateScaleFix;
pData += FIX_INTPART(nSampleFrac)<<1;
nSampleFrac = FIX_FRACPART(nSampleFrac);
++pOutput;
--nOutCount;
}
}
void SW_Mix16Stereo_Opt( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nInputOffset, fixedint nRateScaleFix, int nOutCount )
{
int nVolumeLeft = pVolume[0];
int nVolumeRight = pVolume[1];
if ( nRateScaleFix == FIX(1) )
{
if ( nVolumeLeft == nVolumeRight )
{
SW_Mix16Stereo_NoShift_OptMeta<FM_SAME_VOL>( pOutput, pVolume, pData, nOutCount );
}
else
{
if ( nVolumeLeft <= CULLED_VOLUME )
{
SW_Mix16Stereo_NoShift_OptMeta<FM_LEFT_ZERO>( pOutput, pVolume, pData, nOutCount );
}
else if ( nVolumeRight <= CULLED_VOLUME )
{
SW_Mix16Stereo_NoShift_OptMeta<FM_RIGHT_ZERO>( pOutput, pVolume, pData, nOutCount );
}
else
{
SW_Mix16Stereo_NoShift_OptMeta<FM_NORMAL>( pOutput, pVolume, pData, nOutCount );
}
}
}
else
{
if ( nVolumeLeft == nVolumeRight )
{
SW_Mix16Stereo_Shift_OptMeta<FM_SAME_VOL>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else
{
if ( nVolumeLeft <= CULLED_VOLUME )
{
SW_Mix16Stereo_Shift_OptMeta<FM_LEFT_ZERO>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else if ( nVolumeRight <= CULLED_VOLUME )
{
SW_Mix16Stereo_Shift_OptMeta<FM_RIGHT_ZERO>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else
{
SW_Mix16Stereo_Shift_OptMeta<FM_NORMAL>( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
}
}
}
void SW_Mix16Stereo_NoOpt( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nInputOffset, fixedint nRateScaleFix, int nOutCount )
{
int nSampleIndex = 0;
fixedint nSampleFrac = nInputOffset;
for ( int i = 0; i < nOutCount; i++ )
{
pOutput[i].left += int( (pVolume[0] * (int)(pData[nSampleIndex])) / 256.0f);
pOutput[i].right += int( (pVolume[1] * (int)(pData[nSampleIndex+1])) / 256.0f);
nSampleFrac += nRateScaleFix;
nSampleIndex += FIX_INTPART(nSampleFrac)<<1;
nSampleFrac = FIX_FRACPART(nSampleFrac);
}
}
void SW_Mix16Stereo( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int nInputOffset, fixedint nRateScaleFix, int nOutCount )
{
#if CHECK_VALUES_AFTER_REFACTORING
// Backup the output and apply the same changes
portable_samplepair_t * pOldOutput = DuplicateSamplePairs( pOutput, nOutCount );
// Run the old code
SW_Mix16Stereo_NoOpt( pOldOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
#endif
if ( snd_mix_optimization.GetBool() )
{
SW_Mix16Stereo_Opt( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
else
{
SW_Mix16Stereo_NoOpt( pOutput, pVolume, pData, nInputOffset, nRateScaleFix, nOutCount );
}
#if CHECK_VALUES_AFTER_REFACTORING
// Compare side by side
bool bFailed = ( memcmp( pOutput, pOldOutput, nOutCount * sizeof( portable_samplepair_t ) ) != 0 );
Assert( bFailed == false );
FreeDuplicatedSamplePairs( pOldOutput, nOutCount );
#endif
}
// interpolating pitch shifter - sample(s) from preceding buffer are preloaded in
// pData buffer, ensuring we can always provide 'outCount' samples.
// The loop is already long, unrolling more is not going to help much.
void SW_Mix16Stereo_Interp( portable_samplepair_t * RESTRICT pOutput, float * RESTRICT pVolume, short * RESTRICT pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
fixedint sampleIndex = 0;
fixedint rateScaleFix14 = FIX_28TO14(rateScaleFix); // convert 28 bit fixed point to 14 bit fixed point
fixedint sampleFrac14 = FIX_28TO14(inputOffset);
int first, second, interpl, interpr;
for ( int i = 0; i < outCount; i++ )
{
first = (int)(pData[sampleIndex]);
second = (int)(pData[sampleIndex+2]);
interpl = first + (((second - first) * (int)sampleFrac14) >> 14);
first = (int)(pData[sampleIndex+1]);
second = (int)(pData[sampleIndex+3]);
interpr = first + (((second - first) * (int)sampleFrac14) >> 14);
pOutput[i].left += int((pVolume[0] * interpl) / 256.0f);
pOutput[i].right += int((pVolume[1] * interpr) / 256.0f);
sampleFrac14 += rateScaleFix14;
sampleIndex += FIX_INTPART14(sampleFrac14)<<1;
sampleFrac14 = FIX_FRACPART14(sampleFrac14);
}
}
// return true if mixer should use high quality pitch interpolation for this sound
bool FUseHighQualityPitch( channel_t *pChannel )
{
// do not use interpolating pitch shifter if:
// low quality flag set on sound (ie: wave name is prepended with CHAR_FAST_PITCH)
// or pitch has no fractional part
// or snd_pitchquality is 0
if ( !snd_pitchquality.GetInt() || pChannel->flags.bfast_pitch )
return false;
return ( (pChannel->pitch != floor(pChannel->pitch)) );
}
//===============================================================================
// DISPATCHERS FOR MIXING ROUTINES
//===============================================================================
void Mix8MonoWavtype( channel_t *pChannel, portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
if ( FUseHighQualityPitch( pChannel ) )
SW_Mix8Mono_Interp( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
SW_Mix8Mono( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
}
void Mix16MonoWavtype( channel_t *pChannel, portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount )
{
float fTotalVolume = volume[0] + volume[1];
if ( fTotalVolume <= SKIP_MIXING_IF_TOTAL_VOLUME_LESS_OR_EQUAL_THAN )
{
// Not enough volume to mix, skip it
return;
}
#if CHECK_VALUES_AFTER_REFACTORING
// Backup the output and apply the same changes
portable_samplepair_t * pOldOutput = DuplicateSamplePairs( pOutput, outCount );
// Run the old code
if ( FUseHighQualityPitch( pChannel ) )
SW_Mix16Mono_Interp( pOldOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
// fast native coded mixers with lower quality pitch shift
SW_Mix16Mono( pOldOutput, volume, pData, inputOffset, rateScaleFix, outCount );
#endif
// The optimized path has not been ported to PC, run the normal mode, except in debug to test the optimization process.
#if ( !IsPlatformWindowsPC() || defined(_DEBUG) )
if ( snd_mix_optimization.GetBool() )
#else
if ( false )
#endif
{
if ( FUseHighQualityPitch( pChannel ) )
SW_Mix16Mono_Interp_Opt( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
// fast native coded mixers with lower quality pitch shift
SW_Mix16Mono_Opt( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
}
else
{
if ( FUseHighQualityPitch( pChannel ) )
SW_Mix16Mono_Interp( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
// fast native coded mixers with lower quality pitch shift
SW_Mix16Mono( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
}
#if CHECK_VALUES_AFTER_REFACTORING
// Compare side by side
bool bFailed = ( memcmp( pOutput, pOldOutput, outCount * sizeof( portable_samplepair_t ) ) != 0 );
Assert( bFailed == false );
FreeDuplicatedSamplePairs( pOldOutput, outCount );
#endif
}
void Mix8StereoWavtype(channel_t *pChannel, portable_samplepair_t *pOutput, float *volume, byte *pData, int inputOffset, fixedint rateScaleFix, int outCount)
{
char nWavType = pChannel->wavtype;
if ( snd_mix_soundchar_enabled.GetBool() == false )
{
nWavType = 0; // Let's use the default value
}
switch ( nWavType )
{
case CHAR_DIRSTEREO:
case CHAR_DOPPLER:
SW_Mix8StereoDopplerLeft( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
SW_Mix8StereoDopplerRight( pOutput, &volume[IFRONT_LEFTD], pData, inputOffset, rateScaleFix, outCount );
break;
case CHAR_DIRECTIONAL:
if ( FUseHighQualityPitch( pChannel ) )
SW_Mix8StereoDirectional_Interp( pChannel->dspface, pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
SW_Mix8StereoDirectional( pChannel->dspface, pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
break;
case CHAR_DISTVARIANT:
if ( FUseHighQualityPitch( pChannel ) )
SW_Mix8StereoDistVar_Interp( pChannel->distmix, pOutput, volume, pData, inputOffset, rateScaleFix, outCount);
else
SW_Mix8StereoDistVar( pChannel->distmix, pOutput, volume, pData, inputOffset, rateScaleFix, outCount);
break;
case CHAR_OMNI:
// non directional stereo - all channel volumes are the same
if ( FUseHighQualityPitch( pChannel ) )
SW_Mix8Stereo_Interp( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
SW_Mix8Stereo( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
break;
default:
case CHAR_SPATIALSTEREO:
if ( FUseHighQualityPitch( pChannel ) )
SW_Mix8Stereo_Interp( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
SW_Mix8Stereo( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
break;
}
}
void Mix16StereoWavtype(channel_t *pChannel, portable_samplepair_t *pOutput, float *volume, short *pData, int inputOffset, fixedint rateScaleFix, int outCount)
{
float fTotalVolume = volume[0] + volume[1];
if ( fTotalVolume <= SKIP_MIXING_IF_TOTAL_VOLUME_LESS_OR_EQUAL_THAN )
{
// Not enough volume to mix, skip it
return;
}
bool bUseHighQualityPitch = FUseHighQualityPitch( pChannel );
char nWavType = pChannel->wavtype;
if ( snd_mix_soundchar_enabled.GetBool() == false )
{
nWavType = 0; // Let's use the default value
}
switch ( nWavType )
{
case CHAR_HRTF:
float volumes_averaged[2];
volumes_averaged[0] = float((volume[0] + volume[1]) * 4 * pChannel->hrtf.lerp + volume[0] * 8 * (1.0f - pChannel->hrtf.lerp));
volumes_averaged[1] = float((volume[0] + volume[1]) * 4 * pChannel->hrtf.lerp + volume[1] * 8 * (1.0f - pChannel->hrtf.lerp));
if (bUseHighQualityPitch)
SW_Mix16Stereo_Interp(pOutput, volumes_averaged, pData, inputOffset, rateScaleFix, outCount);
else
SW_Mix16Stereo(pOutput, volumes_averaged, pData, inputOffset, rateScaleFix, outCount);
break;
case CHAR_DIRSTEREO:
case CHAR_DOPPLER:
if ( bUseHighQualityPitch )
{
SW_Mix16StereoDopplerLeft_Interp( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
SW_Mix16StereoDopplerRight_Interp( pOutput, &volume[IFRONT_LEFTD], pData, inputOffset, rateScaleFix, outCount );
}
else
{
SW_Mix16StereoDopplerLeft( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
SW_Mix16StereoDopplerRight( pOutput, &volume[IFRONT_LEFTD], pData, inputOffset, rateScaleFix, outCount );
}
break;
case CHAR_DIRECTIONAL:
if ( bUseHighQualityPitch )
SW_Mix16StereoDirectional_Interp( pChannel->dspface, pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
SW_Mix16StereoDirectional( pChannel->dspface, pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
break;
case CHAR_DISTVARIANT:
if ( bUseHighQualityPitch )
SW_Mix16StereoDistVar_Interp( pChannel->distmix, pOutput, volume, pData, inputOffset, rateScaleFix, outCount);
else
SW_Mix16StereoDistVar( pChannel->distmix, pOutput, volume, pData, inputOffset, rateScaleFix, outCount);
break;
case CHAR_OMNI:
// non directional stereo - all channel volumes are same
if ( bUseHighQualityPitch )
SW_Mix16Stereo_Interp( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
SW_Mix16Stereo( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
break;
default:
case CHAR_SPATIALSTEREO:
if ( bUseHighQualityPitch )
SW_Mix16Stereo_Interp( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
else
SW_Mix16Stereo( pOutput, volume, pData, inputOffset, rateScaleFix, outCount );
break;
}
}
//===============================================================================
// Client entity mouth movement code. Set entity mouthopen variable, based
// on the sound envelope of the voice channel playing.
// KellyB 10/22/97
//===============================================================================
// called when voice channel is first opened on this entity
static CMouthInfo *GetMouthInfoForChannel( channel_t *pChannel )
{
int mouthentity = pChannel->speakerentity == -1 ? pChannel->soundsource : pChannel->speakerentity;
IClientEntity *pClientEntity = entitylist->GetClientEntity( mouthentity );
if( !pClientEntity )
return NULL;
return pClientEntity->GetMouth();
}
//-----------------------------------------------------------------------------
// Purpose:
// Input : *pChannel -
// Output : Returns true on success, false on failure.
//-----------------------------------------------------------------------------
static bool SND_IsMouth( channel_t *pChannel )
{
if ( !entitylist )
{
return false;
}
if ( pChannel->entchannel == CHAN_VOICE )
{
return true;
}
if ( pChannel->sfx &&
pChannel->sfx->pSource &&
pChannel->sfx->pSource->GetSentence() )
{
return true;
}
return false;
}
void SND_InitMouth( channel_t *pChannel )
{
if ( SND_IsMouth( pChannel ) )
{
CMouthInfo *pMouth = GetMouthInfoForChannel(pChannel);
// init mouth movement vars
if ( pMouth )
{
pMouth->mouthopen = 0;
pMouth->sndavg = 0;
pMouth->sndcount = 0;
pChannel->flags.m_bHasMouth = true;
pChannel->flags.m_bMouthEnvelope = pMouth->NeedsEnvelope();
if ( pChannel->sfx->pSource && pChannel->sfx->pSource->GetSentence() )
{
pMouth->AddSource( pChannel->sfx->pSource, pChannel->flags.m_bIgnorePhonemes );
}
}
}
}
// called when channel stops
// mouth updates are queued into these entries during mixing
// That way they can be applied during a time when the sound is synchronized with the client
// instead of mutexing the code inside the callbacks
struct mouthoutput_t
{
int entityId;
CAudioSource *pSource;
float elapsedTime; // if this is negative, we want to clear the mouth data
};
// mouth envelope data is queued here until it can be processed by the main thread
struct mouthenvelope_t
{
int entityId;
int sampleTotal;
int sampleCount;
};
// a couple of simple arrays for queuing the mouth data
static CUtlVector<mouthoutput_t> g_MouthOutput;
static CUtlVector<mouthenvelope_t> g_MouthEnvelope;
#define CAVGSAMPLES 10
// queue up a command to remove the channel's mouth source if playing
void SND_CloseMouth(channel_t *pChannel)
{
if ( pChannel->flags.m_bHasMouth )
{
int mouthentity = pChannel->speakerentity == -1 ? pChannel->soundsource : pChannel->speakerentity;
IClientEntity *pClientEntity = entitylist->GetClientEntity( mouthentity );
if ( pClientEntity )
{
CMouthInfo *pMouth = pClientEntity->GetMouth();
if ( pMouth )
{
int index = g_MouthOutput.AddToTail();
g_MouthOutput[index].entityId = mouthentity;
g_MouthOutput[index].pSource = pChannel->sfx->pSource;
g_MouthOutput[index].elapsedTime = -1;
}
}
}
}
// This processes all queued mouth updates
// Call this from the main thread to avoid callbacks while the client thread is running
void SND_MouthUpdateAll()
{
for ( int i = 0; i < g_MouthOutput.Count(); i++ )
{
const mouthoutput_t &rec = g_MouthOutput[i];
IClientEntity *pClientEntity = entitylist->GetClientEntity( rec.entityId );
if( !pClientEntity )
continue;
CMouthInfo *pMouth = pClientEntity->GetMouth();
if ( !pMouth )
continue;
Assert(rec.pSource);
if ( rec.elapsedTime < 0 )
{
pMouth->RemoveSource( rec.pSource );
pMouth->mouthopen = 0;
continue;
}
int idx = pMouth->GetIndexForSource( rec.pSource );
CVoiceData *vd = NULL;
if ( idx == UNKNOWN_VOICE_SOURCE )
{
vd = pMouth->AddSource( rec.pSource, false );
if ( vd == NULL )
{
// clear, any sources still playing will re-add themselves within a frame
pMouth->ClearVoiceSources();
char nameBuf[MAX_PATH];
DevMsg( 2, "out of voice sources, won't lipsync %s\n", rec.pSource->GetFileName(nameBuf, sizeof(nameBuf)) );
#if 0
for ( int i = 0; i < pMouth->GetNumVoiceSources(); i++ )
{
CVoiceData *pVoice = pMouth->GetVoiceSource(i);
CAudioSourceWave *pWave = dynamic_cast<CAudioSourceWave *>(pVoice->GetSource());
const char *pName = "unknown";
if ( pWave && pWave->GetName() )
pName = pWave->GetName();
Msg("Playing %s...\n", pName );
}
#endif
// try again to add after clearing
vd = pMouth->AddSource( rec.pSource, false );
}
}
else
{
vd = pMouth->GetVoiceSource(idx);
}
if ( vd )
{
// Update elapsed time from mixer
vd->SetElapsedTime( rec.elapsedTime );
}
}
g_MouthOutput.RemoveAll();
for ( int i = 0; i < g_MouthEnvelope.Count(); i++ )
{
const mouthenvelope_t &rec = g_MouthEnvelope[i];
IClientEntity *pClientEntity = entitylist->GetClientEntity( rec.entityId );
if( !pClientEntity )
continue;
CMouthInfo *pMouth = pClientEntity->GetMouth();
if ( !pMouth )
continue;
if ( pMouth->NeedsEnvelope() )
{
pMouth->sndavg = rec.sampleTotal + pMouth->sndavg;
int count = rec.sampleCount + pMouth->sndcount;
if ( count >= CAVGSAMPLES )
{
pMouth->mouthopen = pMouth->sndavg / count;
pMouth->sndavg = 0;
pMouth->sndcount = 0;
}
else
{
pMouth->sndcount = count;
}
}
else
{
pMouth->mouthopen = 0;
}
}
g_MouthEnvelope.RemoveAll();
}
// need this to make the debug code below work.
//#include "snd_wave_source.h"
// this will queue up a command to update the client-entity's mouth data
void SND_MoveMouth8( channel_t *ch, CAudioSource *pSource, int count )
{
if ( !ch->flags.m_bHasMouth )
return;
int mouthentity = ch->speakerentity == -1 ? ch->soundsource : ch->speakerentity;
if ( !ch->flags.m_bIgnorePhonemes )
{
if ( pSource->GetSentence() )
{
int index = g_MouthOutput.AddToTail();
g_MouthOutput[index].entityId = mouthentity;
g_MouthOutput[index].pSource = pSource;
Assert( pSource->SampleRate() > 0 );
float elapsed = ( float )ch->pMixer->GetSamplePosition() / ( float )pSource->SampleRate();
g_MouthOutput[index].elapsedTime = elapsed;
}
}
}
void SND_MouthEnvelopeFollower( channel_t *pChannel, char *pData, int count )
{
if ( !pChannel->flags.m_bHasMouth )
return;
if ( !pChannel->flags.m_bMouthEnvelope )
return;
if ( pData == NULL || count == 0 )
return;
int mouthentity = pChannel->speakerentity == -1 ? pChannel->soundsource : pChannel->speakerentity;
int mix_sample_size = pChannel->pMixer->GetMixSampleSize();
int i = 0;
int scount = 0;
int savg = 0;
int sample = 0;
while ( i < count && scount < CAVGSAMPLES )
{
if ( mix_sample_size == 1 )
{
sample = *(((char *)pData) + i );
}
else if ( mix_sample_size == 2 )
{
sample = *(((short *)pData) + i ) >> 8;
}
savg += abs(sample);
// skip ahead pseudo randomly
i += 80 + ((byte)sample & 0x1F);
scount++;
}
int index = g_MouthEnvelope.AddToTail();
g_MouthEnvelope[index].entityId = mouthentity;
g_MouthEnvelope[index].sampleTotal = savg;
g_MouthEnvelope[index].sampleCount = scount;
}
// note: since mixing may be threaded these calls are all queued now
// queue up a command to clear the current source out of the mouth for this entity
void SND_ClearMouth( channel_t *pChannel )
{
if ( pChannel->flags.m_bHasMouth && pChannel->sfx )
{
int mouthentity = pChannel->speakerentity == -1 ? pChannel->soundsource : pChannel->speakerentity;
int index = g_MouthOutput.AddToTail();
g_MouthOutput[index].entityId = mouthentity;
g_MouthOutput[index].pSource = pChannel->sfx->pSource;
g_MouthOutput[index].elapsedTime = -1;
}
}
//-----------------------------------------------------------------------------
// Purpose:
// Input : *pChannel -
// Output : Returns true on success, false on failure.
//-----------------------------------------------------------------------------
bool SND_ShouldPause( channel_t *pChannel )
{
return pChannel->flags.m_bShouldPause;
}
//===============================================================================
// Movie recording support
//===============================================================================
extern float host_time;
extern double g_soundtimeerror;
static int g_nMovieSamples = 0;
extern int host_tickcount;
// We don't want to record sound until the tick after we start the movie
static int g_nMovieStartTick;
static ConVar snd_moviefix( "snd_moviefix", "1", 0, "Defer sound recording until next tick when laying off movies." );
float g_moviestart;
void SND_MovieStart( void )
{
if ( IsGameConsole() )
return;
if ( !cl_movieinfo.IsRecording() )
return;
g_paintedtime = 0;
#if USE_AUDIO_DEVICE_V1
g_soundtime = 0;
g_soundtimeerror = 0.0;
#endif
g_moviestart = host_time;
g_nMovieStartTick = host_tickcount;
// TMP Wave file supports stereo only, so force stereo
if ( snd_surround.GetInt() != 2 )
{
snd_surround.SetValue( 2 );
}
// 44k: engine playback rate is now 44100...changed from 22050
if ( cl_movieinfo.DoWav() )
{
WaveCreateTmpFile( cl_movieinfo.moviename, SOUND_DMA_SPEED, 16, 2 );
}
}
void SND_MovieEnd( void )
{
if ( IsGameConsole() )
return;
if ( !cl_movieinfo.IsRecording() )
{
return;
}
if ( cl_movieinfo.DoWav() )
{
WaveFixupTmpFile( cl_movieinfo.moviename );
}
}
bool SND_IsRecording()
{
if ( cl_movieinfo.IsRecording() && !Con_IsVisible() )
{
// Defer first buffer until next tick if snd_moviefix is true
if ( ( host_tickcount == g_nMovieStartTick ) &&
snd_moviefix.GetBool() )
{
return false;
}
return true;
}
return false;
}
void SND_RecordBuffer( void )
{
if ( IsGameConsole() )
return;
if ( !SND_IsRecording() )
return;
int i;
int val;
int bufferSize = snd_linear_count * sizeof(short);
short *tmp = (short *)stackalloc( bufferSize );
for (i=0 ; i<snd_linear_count ; i+=2)
{
val = (snd_p[i]*snd_vol)>>8;
tmp[i] = iclip(val);
val = (snd_p[i+1]*snd_vol)>>8;
tmp[i+1] = iclip(val);
}
if ( cl_movieinfo.DoWav() )
{
WaveAppendTmpFile( cl_movieinfo.moviename, tmp, 16, snd_linear_count );
}
if ( cl_movieinfo.DoAVISound() )
{
g_pAVI->AppendMovieSound( g_hCurrentAVI, tmp, bufferSize );
}
g_nMovieSamples += ( snd_linear_count >> 1 );
//Msg( "%d %f %f sound file time %f\n", host_tickcount, host_time, host_time - g_moviestart, (double)g_nMovieSamples/(double)44100);
}