Alc/ALu.c

   1 /**
   2  * OpenAL cross platform audio library
   3  * Copyright (C) 1999-2007 by authors.
   4  * This library is free software; you can redistribute it and/or
   5  *  modify it under the terms of the GNU Library General Public
   6  *  License as published by the Free Software Foundation; either
   7  *  version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  *  Library General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Library General Public
  15  *  License along with this library; if not, write to the
  16  *  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  *  Boston, MA  02111-1307, USA.
  18  * Or go to http://www.gnu.org/copyleft/lgpl.html
  19  */
  20
  21 #define _CRT_SECURE_NO_DEPRECATE // get rid of sprintf security warnings on VS2005
  22
  23 #include "config.h"
  24
  25 #include <math.h>
  26 #include "alMain.h"
  27 #include "AL/al.h"
  28 #include "AL/alc.h"
  29 #include "alSource.h"
  30 #include "alBuffer.h"
  31 #include "alThunk.h"
  32 #include "alListener.h"
  33 #include "alAuxEffectSlot.h"
  34 #include "bs2b.h"
  35
  36 #if defined(HAVE_STDINT_H)
  37 #include <stdint.h>
  38 typedef int64_t ALint64;
  39 #elif defined(HAVE___INT64)
  40 typedef __int64 ALint64;
  41 #elif (SIZEOF_LONG == 8)
  42 typedef long ALint64;
  43 #elif (SIZEOF_LONG_LONG == 8)
  44 typedef long long ALint64;
  45 #endif
  46
  47 #ifdef HAVE_SQRTF
  48 #define aluSqrt(x) ((ALfloat)sqrtf((float)(x)))
  49 #else
  50 #define aluSqrt(x) ((ALfloat)sqrt((double)(x)))
  51 #endif
  52
  53 #ifdef HAVE_ACOSF
  54 #define aluAcos(x) ((ALfloat)acosf((float)(x)))
  55 #else
  56 #define aluAcos(x) ((ALfloat)acos((double)(x)))
  57 #endif
  58
  59 // fixes for mingw32.
  60 #if defined(max) && !defined(__max)
  61 #define __max max
  62 #endif
  63 #if defined(min) && !defined(__min)
  64 #define __min min
  65 #endif
  66
  67 #define BUFFERSIZE 48000
  68 #define FRACTIONBITS 14
  69 #define FRACTIONMASK ((1L<<FRACTIONBITS)-1)
  70 #define MAX_PITCH 4
  71
  72 enum {
  73     FRONT_LEFT = 0,
  74     FRONT_RIGHT,
  75     SIDE_LEFT,
  76     SIDE_RIGHT,
  77     BACK_LEFT,
  78     BACK_RIGHT,
  79     CENTER,
  80     LFE,
  81
  82     OUTPUTCHANNELS
  83 };
  84
  85 /* NOTE: The AL_FORMAT_REAR* enums aren't handled here be cause they're
  86  *       converted to AL_FORMAT_QUAD* when loaded */
  87 __inline ALuint aluBytesFromFormat(ALenum format)
  88 {
  89     switch(format)
  90     {
  91         case AL_FORMAT_MONO8:
  92         case AL_FORMAT_STEREO8:
  93         case AL_FORMAT_QUAD8_LOKI:
  94         case AL_FORMAT_QUAD8:
  95         case AL_FORMAT_51CHN8:
  96         case AL_FORMAT_61CHN8:
  97         case AL_FORMAT_71CHN8:
  98             return 1;
  99
 100         case AL_FORMAT_MONO16:
 101         case AL_FORMAT_STEREO16:
 102         case AL_FORMAT_QUAD16_LOKI:
 103         case AL_FORMAT_QUAD16:
 104         case AL_FORMAT_51CHN16:
 105         case AL_FORMAT_61CHN16:
 106         case AL_FORMAT_71CHN16:
 107             return 2;
 108
 109         case AL_FORMAT_MONO_FLOAT32:
 110         case AL_FORMAT_STEREO_FLOAT32:
 111         case AL_FORMAT_QUAD32:
 112         case AL_FORMAT_51CHN32:
 113         case AL_FORMAT_61CHN32:
 114         case AL_FORMAT_71CHN32:
 115             return 4;
 116
 117         default:
 118             return 0;
 119     }
 120 }
 121
 122 __inline ALuint aluChannelsFromFormat(ALenum format)
 123 {
 124     switch(format)
 125     {
 126         case AL_FORMAT_MONO8:
 127         case AL_FORMAT_MONO16:
 128         case AL_FORMAT_MONO_FLOAT32:
 129             return 1;
 130
 131         case AL_FORMAT_STEREO8:
 132         case AL_FORMAT_STEREO16:
 133         case AL_FORMAT_STEREO_FLOAT32:
 134             return 2;
 135
 136         case AL_FORMAT_QUAD8_LOKI:
 137         case AL_FORMAT_QUAD16_LOKI:
 138         case AL_FORMAT_QUAD8:
 139         case AL_FORMAT_QUAD16:
 140         case AL_FORMAT_QUAD32:
 141             return 4;
 142
 143         case AL_FORMAT_51CHN8:
 144         case AL_FORMAT_51CHN16:
 145         case AL_FORMAT_51CHN32:
 146             return 6;
 147
 148         case AL_FORMAT_61CHN8:
 149         case AL_FORMAT_61CHN16:
 150         case AL_FORMAT_61CHN32:
 151             return 7;
 152
 153         case AL_FORMAT_71CHN8:
 154         case AL_FORMAT_71CHN16:
 155         case AL_FORMAT_71CHN32:
 156             return 8;
 157
 158         default:
 159             return 0;
 160     }
 161 }
 162
 163 static __inline ALint aluF2L(ALfloat Value)
 164 {
 165 #if 0
 166     if(sizeof(ALint) == 4 && sizeof(double) == 8)
 167     {
 168         double temp;
 169         temp = Value + (((65536.0*65536.0*16.0)+(65536.0*65536.0*8.0))*65536.0);
 170         return *((ALint*)&temp);
 171     }
 172 #endif
 173     return (ALint)Value;
 174 }
 175
 176 static __inline ALshort aluF2S(ALfloat Value)
 177 {
 178     ALint i;
 179
 180     i = aluF2L(Value);
 181     i = __min( 32767, i);
 182     i = __max(-32768, i);
 183     return ((ALshort)i);
 184 }
 185
 186 static __inline ALvoid aluCrossproduct(ALfloat *inVector1,ALfloat *inVector2,ALfloat *outVector)
 187 {
 188     outVector[0] = inVector1[1]*inVector2[2] - inVector1[2]*inVector2[1];
 189     outVector[1] = inVector1[2]*inVector2[0] - inVector1[0]*inVector2[2];
 190     outVector[2] = inVector1[0]*inVector2[1] - inVector1[1]*inVector2[0];
 191 }
 192
 193 static __inline ALfloat aluDotproduct(ALfloat *inVector1,ALfloat *inVector2)
 194 {
 195     return inVector1[0]*inVector2[0] + inVector1[1]*inVector2[1] +
 196            inVector1[2]*inVector2[2];
 197 }
 198
 199 static __inline ALvoid aluNormalize(ALfloat *inVector)
 200 {
 201     ALfloat length, inverse_length;
 202
 203     length = (ALfloat)aluSqrt(aluDotproduct(inVector, inVector));
 204     if(length != 0)
 205     {
 206         inverse_length = 1.0f/length;
 207         inVector[0] *= inverse_length;
 208         inVector[1] *= inverse_length;
 209         inVector[2] *= inverse_length;
 210     }
 211 }
 212
 213 static __inline ALvoid aluMatrixVector(ALfloat *vector,ALfloat matrix[3][3])
 214 {
 215     ALfloat result[3];
 216
 217     result[0] = vector[0]*matrix[0][0] + vector[1]*matrix[1][0] + vector[2]*matrix[2][0];
 218     result[1] = vector[0]*matrix[0][1] + vector[1]*matrix[1][1] + vector[2]*matrix[2][1];
 219     result[2] = vector[0]*matrix[0][2] + vector[1]*matrix[1][2] + vector[2]*matrix[2][2];
 220     memcpy(vector, result, sizeof(result));
 221 }
 222
 223 static __inline ALfloat aluComputeDrySample(ALsource *source, ALfloat DryGainHF, ALfloat sample)
 224 {
 225     if(DryGainHF < 1.0f)
 226     {
 227         if(DryGainHF > 0.0f)
 228         {
 229             sample *= DryGainHF;
 230             sample += source->LastDrySample * (1.0f-DryGainHF);
 231         }
 232         else
 233             sample = 0.0f;
 234     }
 235
 236     source->LastDrySample = sample;
 237     return sample;
 238 }
 239
 240 static __inline ALfloat aluComputeWetSample(ALsource *source, ALfloat WetGainHF, ALfloat sample)
 241 {
 242     if(WetGainHF < 1.0f)
 243     {
 244         if(WetGainHF > 0.0f)
 245         {
 246             sample *= WetGainHF;
 247             sample += source->LastWetSample * (1.0f-WetGainHF);
 248         }
 249         else
 250             sample = 0.0f;
 251     }
 252
 253     source->LastWetSample = sample;
 254     return sample;
 255 }
 256
 257 static ALvoid CalcSourceParams(ALCcontext *ALContext, ALsource *ALSource,
 258                                ALenum isMono, ALenum OutputFormat,
 259                                ALfloat *drysend, ALfloat *wetsend,
 260                                ALfloat *pitch, ALfloat *drygainhf,
 261                                ALfloat *wetgainhf)
 262 {
 263     ALfloat InnerAngle,OuterAngle,Angle,Distance,DryMix,WetMix=0.0f;
 264     ALfloat Direction[3],Position[3],SourceToListener[3];
 265     ALfloat MinVolume,MaxVolume,MinDist,MaxDist,Rolloff,OuterGainHF;
 266     ALfloat ConeVolume,SourceVolume,PanningFB,PanningLR,ListenerGain;
 267     ALfloat U[3],V[3],N[3];
 268     ALfloat DopplerFactor, DopplerVelocity, flSpeedOfSound, flMaxVelocity;
 269     ALfloat Matrix[3][3];
 270     ALfloat flAttenuation;
 271     ALfloat RoomAttenuation;
 272     ALfloat MetersPerUnit;
 273     ALfloat RoomRolloff;
 274     ALfloat DryGainHF = 1.0f;
 275     ALfloat WetGainHF = 1.0f;
 276
 277     //Get context properties
 278     DopplerFactor   = ALContext->DopplerFactor;
 279     DopplerVelocity = ALContext->DopplerVelocity;
 280     flSpeedOfSound  = ALContext->flSpeedOfSound;
 281
 282     //Get listener properties
 283     ListenerGain = ALContext->Listener.Gain;
 284     MetersPerUnit = ALContext->Listener.MetersPerUnit;
 285
 286     //Get source properties
 287     SourceVolume = ALSource->flGain;
 288     memcpy(Position,  ALSource->vPosition,    sizeof(ALSource->vPosition));
 289     memcpy(Direction, ALSource->vOrientation, sizeof(ALSource->vOrientation));
 290     MinVolume    = ALSource->flMinGain;
 291     MaxVolume    = ALSource->flMaxGain;
 292     MinDist      = ALSource->flRefDistance;
 293     MaxDist      = ALSource->flMaxDistance;
 294     Rolloff      = ALSource->flRollOffFactor;
 295     InnerAngle   = ALSource->flInnerAngle;
 296     OuterAngle   = ALSource->flOuterAngle;
 297     OuterGainHF  = ALSource->OuterGainHF;
 298     RoomRolloff  = ALSource->RoomRolloffFactor;
 299
 300     //Only apply 3D calculations for mono buffers
 301     if(isMono != AL_FALSE)
 302     {
 303         //1. Translate Listener to origin (convert to head relative)
 304         if(ALSource->bHeadRelative==AL_FALSE)
 305         {
 306             Position[0] -= ALContext->Listener.Position[0];
 307             Position[1] -= ALContext->Listener.Position[1];
 308             Position[2] -= ALContext->Listener.Position[2];
 309         }
 310
 311         //2. Calculate distance attenuation
 312         Distance = aluSqrt(aluDotproduct(Position, Position));
 313
 314         if(ALSource->Send[0].Slot && !ALSource->Send[0].Slot->AuxSendAuto)
 315         {
 316             if(ALSource->Send[0].Slot->effect.type == AL_EFFECT_REVERB)
 317                 RoomRolloff = ALSource->Send[0].Slot->effect.Reverb.RoomRolloffFactor;
 318         }
 319
 320         flAttenuation = 1.0f;
 321         RoomAttenuation = 1.0f;
 322         switch (ALContext->DistanceModel)
 323         {
 324             case AL_INVERSE_DISTANCE_CLAMPED:
 325                 Distance=__max(Distance,MinDist);
 326                 Distance=__min(Distance,MaxDist);
 327                 if (MaxDist < MinDist)
 328                     break;
 329                 //fall-through
 330             case AL_INVERSE_DISTANCE:
 331                 if (MinDist > 0.0f)
 332                 {
 333                     if ((MinDist + (Rolloff * (Distance - MinDist))) > 0.0f)
 334                         flAttenuation = MinDist / (MinDist + (Rolloff * (Distance - MinDist)));
 335                     if ((MinDist + (RoomRolloff * (Distance - MinDist))) > 0.0f)
 336                         RoomAttenuation = MinDist / (MinDist + (RoomRolloff * (Distance - MinDist)));
 337                 }
 338                 break;
 339
 340             case AL_LINEAR_DISTANCE_CLAMPED:
 341                 Distance=__max(Distance,MinDist);
 342                 Distance=__min(Distance,MaxDist);
 343                 if (MaxDist < MinDist)
 344                     break;
 345                 //fall-through
 346             case AL_LINEAR_DISTANCE:
 347                 Distance=__min(Distance,MaxDist);
 348                 if (MaxDist != MinDist)
 349                 {
 350                     flAttenuation = 1.0f - (Rolloff*(Distance-MinDist)/(MaxDist - MinDist));
 351                     RoomAttenuation = 1.0f - (RoomRolloff*(Distance-MinDist)/(MaxDist - MinDist));
 352                 }
 353                 break;
 354
 355             case AL_EXPONENT_DISTANCE_CLAMPED:
 356                 Distance=__max(Distance,MinDist);
 357                 Distance=__min(Distance,MaxDist);
 358                 if (MaxDist < MinDist)
 359                     break;
 360                 //fall-through
 361             case AL_EXPONENT_DISTANCE:
 362                 if ((Distance > 0.0f) && (MinDist > 0.0f))
 363                 {
 364                     flAttenuation = (ALfloat)pow(Distance/MinDist, -Rolloff);
 365                     RoomAttenuation = (ALfloat)pow(Distance/MinDist, -RoomRolloff);
 366                 }
 367                 break;
 368
 369             case AL_NONE:
 370             default:
 371                 flAttenuation = 1.0f;
 372                 RoomAttenuation = 1.0f;
 373                 break;
 374         }
 375
 376         // Source Gain + Attenuation and clamp to Min/Max Gain
 377         DryMix = SourceVolume * flAttenuation;
 378         DryMix = __min(DryMix,MaxVolume);
 379         DryMix = __max(DryMix,MinVolume);
 380
 381         WetMix = SourceVolume * (ALSource->WetGainAuto ?
 382                                  RoomAttenuation : 1.0f);
 383         WetMix = __min(WetMix,MaxVolume);
 384         WetMix = __max(WetMix,MinVolume);
 385
 386         //3. Apply directional soundcones
 387         SourceToListener[0] = -Position[0];
 388         SourceToListener[1] = -Position[1];
 389         SourceToListener[2] = -Position[2];
 390         aluNormalize(Direction);
 391         aluNormalize(SourceToListener);
 392         Angle = aluAcos(aluDotproduct(Direction,SourceToListener)) * 180.0f /
 393                 3.141592654f;
 394         if(Angle >= InnerAngle && Angle <= OuterAngle)
 395         {
 396             ALfloat scale = (Angle-InnerAngle) / (OuterAngle-InnerAngle);
 397             ConeVolume = (1.0f+(ALSource->flOuterGain-1.0f)*scale);
 398             if(ALSource->WetGainAuto)
 399                 WetMix *= ConeVolume;
 400             if(ALSource->DryGainHFAuto)
 401                 DryGainHF *= (1.0f+(OuterGainHF-1.0f)*scale);
 402             if(ALSource->WetGainHFAuto)
 403                 WetGainHF *= (1.0f+(OuterGainHF-1.0f)*scale);
 404         }
 405         else if(Angle > OuterAngle)
 406         {
 407             ConeVolume = (1.0f+(ALSource->flOuterGain-1.0f));
 408             if(ALSource->WetGainAuto)
 409                 WetMix *= ConeVolume;
 410             if(ALSource->DryGainHFAuto)
 411                 DryGainHF *= (1.0f+(OuterGainHF-1.0f));
 412             if(ALSource->WetGainHFAuto)
 413                 WetGainHF *= (1.0f+(OuterGainHF-1.0f));
 414         }
 415         else
 416             ConeVolume = 1.0f;
 417
 418         //4. Calculate Velocity
 419         if(DopplerFactor != 0.0f)
 420         {
 421             ALfloat flVSS, flVLS;
 422
 423             flVLS = aluDotproduct(ALContext->Listener.Velocity,
 424                                   SourceToListener);
 425             flVSS = aluDotproduct(ALSource->vVelocity, SourceToListener);
 426
 427             flMaxVelocity = (DopplerVelocity * flSpeedOfSound) / DopplerFactor;
 428
 429             if (flVSS >= flMaxVelocity)
 430                 flVSS = (flMaxVelocity - 1.0f);
 431             else if (flVSS <= -flMaxVelocity)
 432                 flVSS = -flMaxVelocity + 1.0f;
 433
 434             if (flVLS >= flMaxVelocity)
 435                 flVLS = (flMaxVelocity - 1.0f);
 436             else if (flVLS <= -flMaxVelocity)
 437                 flVLS = -flMaxVelocity + 1.0f;
 438
 439             pitch[0] = ALSource->flPitch *
 440                        ((flSpeedOfSound * DopplerVelocity) - (DopplerFactor * flVLS)) /
 441                        ((flSpeedOfSound * DopplerVelocity) - (DopplerFactor * flVSS));
 442         }
 443         else
 444             pitch[0] = ALSource->flPitch;
 445
 446         //5. Align coordinate system axes
 447         aluCrossproduct(ALContext->Listener.Forward, ALContext->Listener.Up, U); // Right-vector
 448         aluNormalize(U);  // Normalized Right-vector
 449         memcpy(V, ALContext->Listener.Up, sizeof(V));   // Up-vector
 450         aluNormalize(V);  // Normalized Up-vector
 451         memcpy(N, ALContext->Listener.Forward, sizeof(N));  // At-vector
 452         aluNormalize(N);  // Normalized At-vector
 453         Matrix[0][0] = U[0]; Matrix[0][1] = V[0]; Matrix[0][2] = -N[0];
 454         Matrix[1][0] = U[1]; Matrix[1][1] = V[1]; Matrix[1][2] = -N[1];
 455         Matrix[2][0] = U[2]; Matrix[2][1] = V[2]; Matrix[2][2] = -N[2];
 456         aluMatrixVector(Position, Matrix);
 457
 458         //6. Apply filter gains and filters
 459         switch(ALSource->DirectFilter.filter)
 460         {
 461             case AL_FILTER_LOWPASS:
 462                 DryMix *= ALSource->DirectFilter.Gain;
 463                 DryGainHF *= ALSource->DirectFilter.GainHF;
 464                 break;
 465         }
 466
 467         switch(ALSource->Send[0].WetFilter.filter)
 468         {
 469             case AL_FILTER_LOWPASS:
 470                 WetMix *= ALSource->Send[0].WetFilter.Gain;
 471                 WetGainHF *= ALSource->Send[0].WetFilter.GainHF;
 472                 break;
 473         }
 474
 475         if(ALSource->AirAbsorptionFactor > 0.0f)
 476             DryGainHF *= pow(ALSource->AirAbsorptionFactor * AIRABSORBGAINHF,
 477                              Distance * MetersPerUnit);
 478
 479         if(ALSource->Send[0].Slot)
 480         {
 481             WetMix *= ALSource->Send[0].Slot->Gain;
 482
 483             if(ALSource->Send[0].Slot->effect.type == AL_EFFECT_REVERB)
 484             {
 485                 WetGainHF *= ALSource->Send[0].Slot->effect.Reverb.GainHF;
 486                 WetGainHF *= pow(ALSource->Send[0].Slot->effect.Reverb.AirAbsorptionGainHF,
 487                                  Distance * MetersPerUnit);
 488             }
 489         }
 490         else
 491         {
 492             WetMix = 0.0f;
 493             WetGainHF = 1.0f;
 494         }
 495
 496         //7. Convert normalized position into pannings, then into channel volumes
 497         aluNormalize(Position);
 498         switch(aluChannelsFromFormat(OutputFormat))
 499         {
 500             case 1:
 501                 drysend[FRONT_LEFT]  = ConeVolume * ListenerGain * DryMix * aluSqrt(1.0f); //Direct
 502                 drysend[FRONT_RIGHT] = ConeVolume * ListenerGain * DryMix * aluSqrt(1.0f); //Direct
 503                 wetsend[FRONT_LEFT]  =              ListenerGain * WetMix * aluSqrt(1.0f); //Room
 504                 wetsend[FRONT_RIGHT] =              ListenerGain * WetMix * aluSqrt(1.0f); //Room
 505                 break;
 506             case 2:
 507                 PanningLR = 0.5f + 0.5f*Position[0];
 508                 drysend[FRONT_LEFT]  = ConeVolume * ListenerGain * DryMix * aluSqrt(1.0f-PanningLR); //L Direct
 509                 drysend[FRONT_RIGHT] = ConeVolume * ListenerGain * DryMix * aluSqrt(     PanningLR); //R Direct
 510                 wetsend[FRONT_LEFT]  =              ListenerGain * WetMix * aluSqrt(1.0f-PanningLR); //L Room
 511                 wetsend[FRONT_RIGHT] =              ListenerGain * WetMix * aluSqrt(     PanningLR); //R Room
 512                 break;
 513             case 4:
 514             /* TODO: Add center/lfe channel in spatial calculations? */
 515             case 6:
 516                 // Apply a scalar so each individual speaker has more weight
 517                 PanningLR = 0.5f + (0.5f*Position[0]*1.41421356f);
 518                 PanningLR = __min(1.0f, PanningLR);
 519                 PanningLR = __max(0.0f, PanningLR);
 520                 PanningFB = 0.5f + (0.5f*Position[2]*1.41421356f);
 521                 PanningFB = __min(1.0f, PanningFB);
 522                 PanningFB = __max(0.0f, PanningFB);
 523                 drysend[FRONT_LEFT]  = ConeVolume * ListenerGain * DryMix * aluSqrt((1.0f-PanningLR)*(1.0f-PanningFB));
 524                 drysend[FRONT_RIGHT] = ConeVolume * ListenerGain * DryMix * aluSqrt((     PanningLR)*(1.0f-PanningFB));
 525                 drysend[BACK_LEFT]   = ConeVolume * ListenerGain * DryMix * aluSqrt((1.0f-PanningLR)*(     PanningFB));
 526                 drysend[BACK_RIGHT]  = ConeVolume * ListenerGain * DryMix * aluSqrt((     PanningLR)*(     PanningFB));
 527                 wetsend[FRONT_LEFT]  =              ListenerGain * WetMix * aluSqrt((1.0f-PanningLR)*(1.0f-PanningFB));
 528                 wetsend[FRONT_RIGHT] =              ListenerGain * WetMix * aluSqrt((     PanningLR)*(1.0f-PanningFB));
 529                 wetsend[BACK_LEFT]   =              ListenerGain * WetMix * aluSqrt((1.0f-PanningLR)*(     PanningFB));
 530                 wetsend[BACK_RIGHT]  =              ListenerGain * WetMix * aluSqrt((     PanningLR)*(     PanningFB));
 531                 break;
 532             case 7:
 533             case 8:
 534                 PanningFB = 1.0f - fabs(Position[2]*1.15470054f);
 535                 PanningFB = __min(1.0f, PanningFB);
 536                 PanningFB = __max(0.0f, PanningFB);
 537                 PanningLR = 0.5f + (0.5*Position[0]*((1.0f-PanningFB)*2.0f));
 538                 PanningLR = __min(1.0f, PanningLR);
 539                 PanningLR = __max(0.0f, PanningLR);
 540                 if(Position[2] > 0.0f)
 541                 {
 542                     drysend[BACK_LEFT]   = ConeVolume * ListenerGain * DryMix * aluSqrt((1.0f-PanningLR)*(1.0f-PanningFB));
 543                     drysend[BACK_RIGHT]  = ConeVolume * ListenerGain * DryMix * aluSqrt((     PanningLR)*(1.0f-PanningFB));
 544                     drysend[SIDE_LEFT]   = ConeVolume * ListenerGain * DryMix * aluSqrt((1.0f-PanningLR)*(     PanningFB));
 545                     drysend[SIDE_RIGHT]  = ConeVolume * ListenerGain * DryMix * aluSqrt((     PanningLR)*(     PanningFB));
 546                     drysend[FRONT_LEFT]  = 0.0f;
 547                     drysend[FRONT_RIGHT] = 0.0f;
 548                     wetsend[BACK_LEFT]   =              ListenerGain * WetMix * aluSqrt((1.0f-PanningLR)*(1.0f-PanningFB));
 549                     wetsend[BACK_RIGHT]  =              ListenerGain * WetMix * aluSqrt((     PanningLR)*(1.0f-PanningFB));
 550                     wetsend[SIDE_LEFT]   =              ListenerGain * WetMix * aluSqrt((1.0f-PanningLR)*(     PanningFB));
 551                     wetsend[SIDE_RIGHT]  =              ListenerGain * WetMix * aluSqrt((     PanningLR)*(     PanningFB));
 552                     wetsend[FRONT_LEFT]  = 0.0f;
 553                     wetsend[FRONT_RIGHT] = 0.0f;
 554                 }
 555                 else
 556                 {
 557                     drysend[FRONT_LEFT]  = ConeVolume * ListenerGain * DryMix * aluSqrt((1.0f-PanningLR)*(1.0f-PanningFB));
 558                     drysend[FRONT_RIGHT] = ConeVolume * ListenerGain * DryMix * aluSqrt((     PanningLR)*(1.0f-PanningFB));
 559                     drysend[SIDE_LEFT]   = ConeVolume * ListenerGain * DryMix * aluSqrt((1.0f-PanningLR)*(     PanningFB));
 560                     drysend[SIDE_RIGHT]  = ConeVolume * ListenerGain * DryMix * aluSqrt((     PanningLR)*(     PanningFB));
 561                     drysend[BACK_LEFT]   = 0.0f;
 562                     drysend[BACK_RIGHT]  = 0.0f;
 563                     wetsend[FRONT_LEFT]  =              ListenerGain * WetMix * aluSqrt((1.0f-PanningLR)*(1.0f-PanningFB));
 564                     wetsend[FRONT_RIGHT] =              ListenerGain * WetMix * aluSqrt((     PanningLR)*(1.0f-PanningFB));
 565                     wetsend[SIDE_LEFT]   =              ListenerGain * WetMix * aluSqrt((1.0f-PanningLR)*(     PanningFB));
 566                     wetsend[SIDE_RIGHT]  =              ListenerGain * WetMix * aluSqrt((     PanningLR)*(     PanningFB));
 567                     wetsend[BACK_LEFT]   = 0.0f;
 568                     wetsend[BACK_RIGHT]  = 0.0f;
 569                 }
 570             default:
 571                 break;
 572         }
 573
 574         *drygainhf = DryGainHF;
 575         *wetgainhf = WetGainHF;
 576     }
 577     else
 578     {
 579         *drygainhf = DryGainHF;
 580         *wetgainhf = WetGainHF;
 581
 582         //1. Multi-channel buffers always play "normal"
 583         drysend[FRONT_LEFT]  = SourceVolume * 1.0f * ListenerGain;
 584         drysend[FRONT_RIGHT] = SourceVolume * 1.0f * ListenerGain;
 585         drysend[SIDE_LEFT]   = SourceVolume * 1.0f * ListenerGain;
 586         drysend[SIDE_RIGHT]  = SourceVolume * 1.0f * ListenerGain;
 587         drysend[BACK_LEFT]   = SourceVolume * 1.0f * ListenerGain;
 588         drysend[BACK_RIGHT]  = SourceVolume * 1.0f * ListenerGain;
 589         drysend[CENTER]      = SourceVolume * 1.0f * ListenerGain;
 590         drysend[LFE]         = SourceVolume * 1.0f * ListenerGain;
 591         if(ALSource->Send[0].Slot)
 592         {
 593             wetsend[FRONT_LEFT]  = SourceVolume * 0.0f * ListenerGain;
 594             wetsend[FRONT_RIGHT] = SourceVolume * 0.0f * ListenerGain;
 595             wetsend[SIDE_LEFT]   = SourceVolume * 0.0f * ListenerGain;
 596             wetsend[SIDE_RIGHT]  = SourceVolume * 0.0f * ListenerGain;
 597             wetsend[BACK_LEFT]   = SourceVolume * 0.0f * ListenerGain;
 598             wetsend[BACK_RIGHT]  = SourceVolume * 0.0f * ListenerGain;
 599             wetsend[CENTER]      = SourceVolume * 0.0f * ListenerGain;
 600             wetsend[LFE]         = SourceVolume * 0.0f * ListenerGain;
 601         }
 602         else
 603         {
 604             wetsend[FRONT_LEFT]  = 0.0f;
 605             wetsend[FRONT_RIGHT] = 0.0f;
 606             wetsend[SIDE_LEFT]   = 0.0f;
 607             wetsend[SIDE_RIGHT]  = 0.0f;
 608             wetsend[BACK_LEFT]   = 0.0f;
 609             wetsend[BACK_RIGHT]  = 0.0f;
 610             wetsend[CENTER]      = 0.0f;
 611             wetsend[LFE]         = 0.0f;
 612             *wetgainhf = 1.0f;
 613         }
 614
 615         pitch[0] = ALSource->flPitch;
 616     }
 617 }
 618
 619 ALvoid aluMixData(ALCcontext *ALContext,ALvoid *buffer,ALsizei size,ALenum format)
 620 {
 621     static float DryBuffer[BUFFERSIZE][OUTPUTCHANNELS];
 622     static float WetBuffer[BUFFERSIZE][OUTPUTCHANNELS];
 623     static float ReverbBuffer[BUFFERSIZE];
 624     ALfloat DrySend[OUTPUTCHANNELS] = { 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f };
 625     ALfloat WetSend[OUTPUTCHANNELS] = { 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f, 0.0f };
 626     ALfloat DryGainHF = 0.0f;
 627     ALfloat WetGainHF = 0.0f;
 628     ALuint BlockAlign,BufferSize;
 629     ALuint DataSize=0,DataPosInt=0,DataPosFrac=0;
 630     ALuint Channels,Frequency,ulExtraSamples;
 631     ALboolean doReverb;
 632     ALfloat Pitch;
 633     ALint Looping,increment,State;
 634     ALuint Buffer,fraction;
 635     ALuint SamplesToDo;
 636     ALsource *ALSource;
 637     ALbuffer *ALBuffer;
 638     ALeffectslot *ALEffectSlot;
 639     ALfloat value;
 640     ALshort *Data;
 641     ALuint i,j,k;
 642     ALbufferlistitem *BufferListItem;
 643     ALuint loop;
 644     ALint64 DataSize64,DataPos64;
 645
 646     SuspendContext(ALContext);
 647
 648     if(buffer)
 649     {
 650         //Figure output format variables
 651         BlockAlign  = aluChannelsFromFormat(format);
 652         BlockAlign *= aluBytesFromFormat(format);
 653
 654         size /= BlockAlign;
 655         while(size > 0)
 656         {
 657             //Setup variables
 658             ALSource = (ALContext ? ALContext->Source : NULL);
 659             SamplesToDo = min(size, BUFFERSIZE);
 660
 661             //Clear mixing buffer
 662             memset(DryBuffer, 0, SamplesToDo*OUTPUTCHANNELS*sizeof(ALfloat));
 663             memset(WetBuffer, 0, SamplesToDo*OUTPUTCHANNELS*sizeof(ALfloat));
 664             memset(ReverbBuffer, 0, SamplesToDo*sizeof(ALfloat));
 665
 666             //Actual mixing loop
 667             while(ALSource)
 668             {
 669                 j = 0;
 670                 State = ALSource->state;
 671
 672                 doReverb = ((ALSource->Send[0].Slot &&
 673                              ALSource->Send[0].Slot->effect.type == AL_EFFECT_REVERB) ?
 674                             AL_TRUE : AL_FALSE);
 675
 676                 while(State == AL_PLAYING && j < SamplesToDo)
 677                 {
 678                     DataSize = 0;
 679                     DataPosInt = 0;
 680                     DataPosFrac = 0;
 681
 682                     //Get buffer info
 683                     if((Buffer = ALSource->ulBufferID))
 684                     {
 685                         ALBuffer = (ALbuffer*)ALTHUNK_LOOKUPENTRY(Buffer);
 686
 687                         Data      = ALBuffer->data;
 688                         Channels  = aluChannelsFromFormat(ALBuffer->format);
 689                         DataSize  = ALBuffer->size;
 690                         Frequency = ALBuffer->frequency;
 691
 692                         CalcSourceParams(ALContext, ALSource,
 693                                          (Channels==1) ? AL_TRUE : AL_FALSE,
 694                                          format, DrySend, WetSend, &Pitch,
 695                                          &DryGainHF, &WetGainHF);
 696
 697
 698                         Pitch = (Pitch*Frequency) / ALContext->Frequency;
 699                         DataSize /= Channels * aluBytesFromFormat(ALBuffer->format);
 700
 701                         //Get source info
 702                         DataPosInt = ALSource->position;
 703                         DataPosFrac = ALSource->position_fraction;
 704
 705                         //Compute 18.14 fixed point step
 706                         increment = aluF2L(Pitch*(1L<<FRACTIONBITS));
 707                         if(increment > (MAX_PITCH<<FRACTIONBITS))
 708                             increment = (MAX_PITCH<<FRACTIONBITS);
 709
 710                         //Figure out how many samples we can mix.
 711                         //Pitch must be <= 4 (the number below !)
 712                         DataSize64 = DataSize+MAX_PITCH;
 713                         DataSize64 <<= FRACTIONBITS;
 714                         DataPos64 = DataPosInt;
 715                         DataPos64 <<= FRACTIONBITS;
 716                         DataPos64 += DataPosFrac;
 717                         BufferSize = (ALuint)((DataSize64-DataPos64) / increment);
 718                         BufferListItem = ALSource->queue;
 719                         for(loop = 0; loop < ALSource->BuffersPlayed; loop++)
 720                         {
 721                             if(BufferListItem)
 722                                 BufferListItem = BufferListItem->next;
 723                         }
 724                         if (BufferListItem)
 725                         {
 726                             if (BufferListItem->next)
 727                             {
 728                                 if(BufferListItem->next->buffer &&
 729                                    ((ALbuffer*)ALTHUNK_LOOKUPENTRY(BufferListItem->next->buffer))->data)
 730                                 {
 731                                     ulExtraSamples = min(((ALbuffer*)ALTHUNK_LOOKUPENTRY(BufferListItem->next->buffer))->size, (ALint)(16*Channels));
 732                                     memcpy(&Data[DataSize*Channels], ((ALbuffer*)ALTHUNK_LOOKUPENTRY(BufferListItem->next->buffer))->data, ulExtraSamples);
 733                                 }
 734                             }
 735                             else if (ALSource->bLooping)
 736                             {
 737                                 if (ALSource->queue->buffer)
 738                                 {
 739                                     if(((ALbuffer*)ALTHUNK_LOOKUPENTRY(ALSource->queue->buffer))->data)
 740                                     {
 741                                         ulExtraSamples = min(((ALbuffer*)ALTHUNK_LOOKUPENTRY(ALSource->queue->buffer))->size, (ALint)(16*Channels));
 742                                         memcpy(&Data[DataSize*Channels], ((ALbuffer*)ALTHUNK_LOOKUPENTRY(ALSource->queue->buffer))->data, ulExtraSamples);
 743                                     }
 744                                 }
 745                             }
 746                         }
 747                         BufferSize = min(BufferSize, (SamplesToDo-j));
 748
 749                         //Actual sample mixing loop
 750                         Data += DataPosInt*Channels;
 751                         while(BufferSize--)
 752                         {
 753                             k = DataPosFrac>>FRACTIONBITS;
 754                             fraction = DataPosFrac&FRACTIONMASK;
 755                             if(Channels==1)
 756                             {
 757                                 //First order interpolator
 758                                 ALfloat sample = (ALfloat)((ALshort)(((Data[k]*((1L<<FRACTIONBITS)-fraction))+(Data[k+1]*(fraction)))>>FRACTIONBITS));
 759
 760                                 //Direct path final mix buffer and panning
 761                                 value = aluComputeDrySample(ALSource, DryGainHF, sample);
 762                                 DryBuffer[j][FRONT_LEFT]  += value*DrySend[FRONT_LEFT];
 763                                 DryBuffer[j][FRONT_RIGHT] += value*DrySend[FRONT_RIGHT];
 764                                 DryBuffer[j][SIDE_LEFT]   += value*DrySend[SIDE_LEFT];
 765                                 DryBuffer[j][SIDE_RIGHT]  += value*DrySend[SIDE_RIGHT];
 766                                 DryBuffer[j][BACK_LEFT]   += value*DrySend[BACK_LEFT];
 767                                 DryBuffer[j][BACK_RIGHT]  += value*DrySend[BACK_RIGHT];
 768                                 //Room path final mix buffer and panning
 769                                 value = aluComputeWetSample(ALSource, WetGainHF, sample);
 770                                 if(doReverb)
 771                                     ReverbBuffer[j] += value;
 772                                 else
 773                                 {
 774                                     WetBuffer[j][FRONT_LEFT]  += value*WetSend[FRONT_LEFT];
 775                                     WetBuffer[j][FRONT_RIGHT] += value*WetSend[FRONT_RIGHT];
 776                                     WetBuffer[j][SIDE_LEFT]   += value*WetSend[SIDE_LEFT];
 777                                     WetBuffer[j][SIDE_RIGHT]  += value*WetSend[SIDE_RIGHT];
 778                                     WetBuffer[j][BACK_LEFT]   += value*WetSend[BACK_LEFT];
 779                                     WetBuffer[j][BACK_RIGHT]  += value*WetSend[BACK_RIGHT];
 780                                 }
 781                             }
 782                             else
 783                             {
 784                                 //First order interpolator (front left)
 785                                 value = (ALfloat)((ALshort)(((Data[k*Channels  ]*((1L<<FRACTIONBITS)-fraction))+(Data[(k+1)*Channels  ]*(fraction)))>>FRACTIONBITS));
 786                                 DryBuffer[j][FRONT_LEFT] += value*DrySend[FRONT_LEFT];
 787                                 WetBuffer[j][FRONT_LEFT] += value*WetSend[FRONT_LEFT];
 788                                 //First order interpolator (front right)
 789                                 value = (ALfloat)((ALshort)(((Data[k*Channels+1]*((1L<<FRACTIONBITS)-fraction))+(Data[(k+1)*Channels+1]*(fraction)))>>FRACTIONBITS));
 790                                 DryBuffer[j][FRONT_RIGHT] += value*DrySend[FRONT_RIGHT];
 791                                 WetBuffer[j][FRONT_RIGHT] += value*WetSend[FRONT_RIGHT];
 792                                 if(Channels >= 4)
 793                                 {
 794                                     int i = 2;
 795                                     if(Channels >= 6)
 796                                     {
 797                                         if(Channels != 7)
 798                                         {
 799                                             //First order interpolator (center)
 800                                             value = (ALfloat)((ALshort)(((Data[k*Channels+i]*((1L<<FRACTIONBITS)-fraction))+(Data[(k+1)*Channels+i]*(fraction)))>>FRACTIONBITS));
 801                                             DryBuffer[j][CENTER] += value*DrySend[CENTER];
 802                                             WetBuffer[j][CENTER] += value*WetSend[CENTER];
 803                                             i++;
 804                                         }
 805                                         //First order interpolator (lfe)
 806                                         value = (ALfloat)((ALshort)(((Data[k*Channels+i]*((1L<<FRACTIONBITS)-fraction))+(Data[(k+1)*Channels+i]*(fraction)))>>FRACTIONBITS));
 807                                         DryBuffer[j][LFE] += value*DrySend[LFE];
 808                                         WetBuffer[j][LFE] += value*WetSend[LFE];
 809                                         i++;
 810                                     }
 811                                     //First order interpolator (back left)
 812                                     value = (ALfloat)((ALshort)(((Data[k*Channels+i]*((1L<<FRACTIONBITS)-fraction))+(Data[(k+1)*Channels+i]*(fraction)))>>FRACTIONBITS));
 813                                     DryBuffer[j][BACK_LEFT] += value*DrySend[BACK_LEFT];
 814                                     WetBuffer[j][BACK_LEFT] += value*WetSend[BACK_LEFT];
 815                                     i++;
 816                                     //First order interpolator (back right)
 817                                     value = (ALfloat)((ALshort)(((Data[k*Channels+i]*((1L<<FRACTIONBITS)-fraction))+(Data[(k+1)*Channels+i]*(fraction)))>>FRACTIONBITS));
 818                                     DryBuffer[j][BACK_RIGHT] += value*DrySend[BACK_RIGHT];
 819                                     WetBuffer[j][BACK_RIGHT] += value*WetSend[BACK_RIGHT];
 820                                     i++;
 821                                     if(Channels >= 7)
 822                                     {
 823                                         //First order interpolator (side left)
 824                                         value = (ALfloat)((ALshort)(((Data[k*Channels+i]*((1L<<FRACTIONBITS)-fraction))+(Data[(k+1)*Channels+i]*(fraction)))>>FRACTIONBITS));
 825                                         DryBuffer[j][SIDE_LEFT] += value*DrySend[SIDE_LEFT];
 826                                         WetBuffer[j][SIDE_LEFT] += value*WetSend[SIDE_LEFT];
 827                                         i++;
 828                                         //First order interpolator (side right)
 829                                         value = (ALfloat)((ALshort)(((Data[k*Channels+i]*((1L<<FRACTIONBITS)-fraction))+(Data[(k+1)*Channels+i]*(fraction)))>>FRACTIONBITS));
 830                                         DryBuffer[j][SIDE_RIGHT] += value*DrySend[SIDE_RIGHT];
 831                                         WetBuffer[j][SIDE_RIGHT] += value*WetSend[SIDE_RIGHT];
 832                                         i++;
 833                                     }
 834                                 }
 835                             }
 836                             DataPosFrac += increment;
 837                             j++;
 838                         }
 839                         DataPosInt += (DataPosFrac>>FRACTIONBITS);
 840                         DataPosFrac = (DataPosFrac&FRACTIONMASK);
 841
 842                         //Update source info
 843                         ALSource->position = DataPosInt;
 844                         ALSource->position_fraction = DataPosFrac;
 845                     }
 846
 847                     //Handle looping sources
 848                     if(!Buffer || DataPosInt >= DataSize)
 849                     {
 850                         //queueing
 851                         if(ALSource->queue)
 852                         {
 853                             Looping = ALSource->bLooping;
 854                             if(ALSource->BuffersPlayed < (ALSource->BuffersInQueue-1))
 855                             {
 856                                 BufferListItem = ALSource->queue;
 857                                 for(loop = 0; loop <= ALSource->BuffersPlayed; loop++)
 858                                 {
 859                                     if(BufferListItem)
 860                                     {
 861                                         if(!Looping)
 862                                             BufferListItem->bufferstate = PROCESSED;
 863                                         BufferListItem = BufferListItem->next;
 864                                     }
 865                                 }
 866                                 if(!Looping)
 867                                     ALSource->BuffersProcessed++;
 868                                 if(BufferListItem)
 869                                     ALSource->ulBufferID = BufferListItem->buffer;
 870                                 ALSource->position = DataPosInt-DataSize;
 871                                 ALSource->position_fraction = DataPosFrac;
 872                                 ALSource->BuffersPlayed++;
 873                             }
 874                             else
 875                             {
 876                                 if(!Looping)
 877                                 {
 878                                     /* alSourceStop */
 879                                     ALSource->state = AL_STOPPED;
 880                                     ALSource->inuse = AL_FALSE;
 881                                     ALSource->BuffersPlayed = ALSource->BuffersProcessed = ALSource->BuffersInQueue;
 882                                     BufferListItem = ALSource->queue;
 883                                     while(BufferListItem != NULL)
 884                                     {
 885                                         BufferListItem->bufferstate = PROCESSED;
 886                                         BufferListItem = BufferListItem->next;
 887                                     }
 888                                 }
 889                                 else
 890                                 {
 891                                     /* alSourceRewind */
 892                                     /* alSourcePlay */
 893                                     ALSource->state = AL_PLAYING;
 894                                     ALSource->inuse = AL_TRUE;
 895                                     ALSource->play = AL_TRUE;
 896                                     ALSource->BuffersPlayed = 0;
 897                                     ALSource->BufferPosition = 0;
 898                                     ALSource->lBytesPlayed = 0;
 899                                     ALSource->BuffersProcessed = 0;
 900                                     BufferListItem = ALSource->queue;
 901                                     while(BufferListItem != NULL)
 902                                     {
 903                                         BufferListItem->bufferstate = PENDING;
 904                                         BufferListItem = BufferListItem->next;
 905                                     }
 906                                     ALSource->ulBufferID = ALSource->queue->buffer;
 907
 908                                     ALSource->position = DataPosInt-DataSize;
 909                                     ALSource->position_fraction = DataPosFrac;
 910                                 }
 911                             }
 912                         }
 913                     }
 914
 915                     //Get source state
 916                     State = ALSource->state;
 917                 }
 918
 919                 ALSource = ALSource->next;
 920             }
 921
 922             ALEffectSlot = (ALContext ? ALContext->AuxiliaryEffectSlot : NULL);
 923             while(ALEffectSlot)
 924             {
 925                 if(ALEffectSlot->effect.type == AL_EFFECT_REVERB)
 926                 {
 927                     ALfloat *DelayBuffer = ALEffectSlot->ReverbBuffer;
 928                     ALuint Pos = ALEffectSlot->ReverbPos;
 929                     ALuint LatePos = ALEffectSlot->ReverbLatePos;
 930                     ALuint ReflectPos = ALEffectSlot->ReverbReflectPos;
 931                     ALuint Length = ALEffectSlot->ReverbLength;
 932                     ALfloat DecayGain = ALEffectSlot->ReverbDecayGain;
 933                     ALfloat DecayHFRatio = ALEffectSlot->effect.Reverb.DecayHFRatio;
 934                     ALfloat Gain = ALEffectSlot->effect.Reverb.Gain;
 935                     ALfloat ReflectGain = ALEffectSlot->effect.Reverb.ReflectionsGain;
 936                     ALfloat LateReverbGain = ALEffectSlot->effect.Reverb.LateReverbGain;
 937                     ALfloat LastDecaySample = ALEffectSlot->LastDecaySample;
 938                     ALfloat sample;
 939
 940                     for(i = 0;i < SamplesToDo;i++)
 941                     {
 942                         DelayBuffer[Pos] = ReverbBuffer[i] * Gain;
 943
 944                         sample = DelayBuffer[ReflectPos] * ReflectGain;
 945
 946                         DelayBuffer[LatePos] *= LateReverbGain;
 947
 948                         Pos = (Pos+1) % Length;
 949                         DelayBuffer[Pos] *= DecayHFRatio;
 950                         DelayBuffer[Pos] += LastDecaySample * (1.0f-DecayHFRatio);
 951                         LastDecaySample = DelayBuffer[Pos];
 952                         DelayBuffer[Pos] *= DecayGain;
 953
 954                         DelayBuffer[LatePos] += DelayBuffer[Pos];
 955
 956                         sample += DelayBuffer[LatePos];
 957
 958                         WetBuffer[i][FRONT_LEFT]  += sample;
 959                         WetBuffer[i][FRONT_RIGHT] += sample;
 960                         WetBuffer[i][SIDE_LEFT]   += sample;
 961                         WetBuffer[i][SIDE_RIGHT]  += sample;
 962                         WetBuffer[i][BACK_LEFT]   += sample;
 963                         WetBuffer[i][BACK_RIGHT]  += sample;
 964
 965                         LatePos = (LatePos+1) % Length;
 966                         ReflectPos = (ReflectPos+1) % Length;
 967                     }
 968
 969                     ALEffectSlot->ReverbPos = Pos;
 970                     ALEffectSlot->ReverbLatePos = LatePos;
 971                     ALEffectSlot->ReverbReflectPos = ReflectPos;
 972                     ALEffectSlot->LastDecaySample = LastDecaySample;
 973                 }
 974                 ALEffectSlot = ALEffectSlot->next;
 975             }
 976
 977             //Post processing loop
 978             switch(format)
 979             {
 980                 case AL_FORMAT_MONO8:
 981                     for(i = 0;i < SamplesToDo;i++)
 982                     {
 983                         ((ALubyte*)buffer)[0] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_LEFT]+DryBuffer[i][FRONT_RIGHT]+
 984                                                                   WetBuffer[i][FRONT_LEFT]+WetBuffer[i][FRONT_RIGHT])>>8)+128);
 985                         buffer = ((ALubyte*)buffer) + 1;
 986                     }
 987                     break;
 988                 case AL_FORMAT_STEREO8:
 989                     if(ALContext && ALContext->bs2b)
 990                     {
 991                         for(i = 0;i < SamplesToDo;i++)
 992                         {
 993                             float samples[2];
 994                             samples[0] = DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT];
 995                             samples[1] = DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT];
 996                             bs2b_cross_feed(ALContext->bs2b, samples);
 997                             ((ALubyte*)buffer)[0] = (ALubyte)((aluF2S(samples[0])>>8)+128);
 998                             ((ALubyte*)buffer)[1] = (ALubyte)((aluF2S(samples[1])>>8)+128);
 999                             buffer = ((ALubyte*)buffer) + 2;
1000                         }
1001                     }
1002                     else
1003                     {
1004                         for(i = 0;i < SamplesToDo;i++)
1005                         {
1006                             ((ALubyte*)buffer)[0] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT])>>8)+128);
1007                             ((ALubyte*)buffer)[1] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT])>>8)+128);
1008                             buffer = ((ALubyte*)buffer) + 2;
1009                         }
1010                     }
1011                     break;
1012                 case AL_FORMAT_QUAD8:
1013                     for(i = 0;i < SamplesToDo;i++)
1014                     {
1015                         ((ALubyte*)buffer)[0] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT])>>8)+128);
1016                         ((ALubyte*)buffer)[1] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT])>>8)+128);
1017                         ((ALubyte*)buffer)[2] = (ALubyte)((aluF2S(DryBuffer[i][BACK_LEFT]  +WetBuffer[i][BACK_LEFT])>>8)+128);
1018                         ((ALubyte*)buffer)[3] = (ALubyte)((aluF2S(DryBuffer[i][BACK_RIGHT] +WetBuffer[i][BACK_RIGHT])>>8)+128);
1019                         buffer = ((ALubyte*)buffer) + 4;
1020                     }
1021                     break;
1022                 case AL_FORMAT_51CHN8:
1023                     for(i = 0;i < SamplesToDo;i++)
1024                     {
1025                         ((ALubyte*)buffer)[0] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT])>>8)+128);
1026                         ((ALubyte*)buffer)[1] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT])>>8)+128);
1027                         ((ALubyte*)buffer)[2] = (ALubyte)((aluF2S(DryBuffer[i][BACK_LEFT]  +WetBuffer[i][BACK_LEFT])>>8)+128);
1028                         ((ALubyte*)buffer)[3] = (ALubyte)((aluF2S(DryBuffer[i][BACK_RIGHT] +WetBuffer[i][BACK_RIGHT])>>8)+128);
1029                         ((ALubyte*)buffer)[4] = (ALubyte)((aluF2S(DryBuffer[i][CENTER]     +WetBuffer[i][CENTER])>>8)+128);
1030                         ((ALubyte*)buffer)[5] = (ALubyte)((aluF2S(DryBuffer[i][LFE]        +WetBuffer[i][LFE])>>8)+128);
1031                         buffer = ((ALubyte*)buffer) + 6;
1032                     }
1033                     break;
1034                 case AL_FORMAT_61CHN8:
1035                     for(i = 0;i < SamplesToDo;i++)
1036                     {
1037                         ((ALubyte*)buffer)[0] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT])>>8)+128);
1038                         ((ALubyte*)buffer)[1] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT])>>8)+128);
1039                         ((ALubyte*)buffer)[2] = (ALubyte)((aluF2S(DryBuffer[i][SIDE_LEFT]  +WetBuffer[i][SIDE_LEFT])>>8)+128);
1040                         ((ALubyte*)buffer)[3] = (ALubyte)((aluF2S(DryBuffer[i][SIDE_RIGHT] +WetBuffer[i][SIDE_RIGHT])>>8)+128);
1041                         ((ALubyte*)buffer)[4] = (ALubyte)((aluF2S(DryBuffer[i][BACK_LEFT]  +WetBuffer[i][BACK_LEFT])>>8)+128);
1042                         ((ALubyte*)buffer)[5] = (ALubyte)((aluF2S(DryBuffer[i][BACK_RIGHT] +WetBuffer[i][BACK_RIGHT])>>8)+128);
1043                         ((ALubyte*)buffer)[6] = (ALubyte)((aluF2S(DryBuffer[i][LFE]        +WetBuffer[i][LFE])>>8)+128);
1044                         buffer = ((ALubyte*)buffer) + 7;
1045                     }
1046                     break;
1047                 case AL_FORMAT_71CHN8:
1048                     for(i = 0;i < SamplesToDo;i++)
1049                     {
1050                         ((ALubyte*)buffer)[0] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT])>>8)+128);
1051                         ((ALubyte*)buffer)[1] = (ALubyte)((aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT])>>8)+128);
1052                         ((ALubyte*)buffer)[2] = (ALubyte)((aluF2S(DryBuffer[i][SIDE_LEFT]  +WetBuffer[i][SIDE_LEFT])>>8)+128);
1053                         ((ALubyte*)buffer)[3] = (ALubyte)((aluF2S(DryBuffer[i][SIDE_RIGHT] +WetBuffer[i][SIDE_RIGHT])>>8)+128);
1054                         ((ALubyte*)buffer)[4] = (ALubyte)((aluF2S(DryBuffer[i][BACK_LEFT]  +WetBuffer[i][BACK_LEFT])>>8)+128);
1055                         ((ALubyte*)buffer)[5] = (ALubyte)((aluF2S(DryBuffer[i][BACK_RIGHT] +WetBuffer[i][BACK_RIGHT])>>8)+128);
1056                         ((ALubyte*)buffer)[6] = (ALubyte)((aluF2S(DryBuffer[i][CENTER]     +WetBuffer[i][CENTER])>>8)+128);
1057                         ((ALubyte*)buffer)[7] = (ALubyte)((aluF2S(DryBuffer[i][LFE]        +WetBuffer[i][LFE])>>8)+128);
1058                         buffer = ((ALubyte*)buffer) + 8;
1059                     }
1060                     break;
1061
1062                 case AL_FORMAT_MONO16:
1063                     for(i = 0;i < SamplesToDo;i++)
1064                     {
1065                         ((ALshort*)buffer)[0] = aluF2S(DryBuffer[i][FRONT_LEFT]+DryBuffer[i][FRONT_RIGHT]+
1066                                                        WetBuffer[i][FRONT_LEFT]+WetBuffer[i][FRONT_RIGHT]);
1067                         buffer = ((ALshort*)buffer) + 1;
1068                     }
1069                     break;
1070                 case AL_FORMAT_STEREO16:
1071                     if(ALContext && ALContext->bs2b)
1072                     {
1073                         for(i = 0;i < SamplesToDo;i++)
1074                         {
1075                             float samples[2];
1076                             samples[0] = DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT];
1077                             samples[1] = DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT];
1078                             bs2b_cross_feed(ALContext->bs2b, samples);
1079                             ((ALshort*)buffer)[0] = aluF2S(samples[0]);
1080                             ((ALshort*)buffer)[1] = aluF2S(samples[1]);
1081                             buffer = ((ALshort*)buffer) + 2;
1082                         }
1083                     }
1084                     else
1085                     {
1086                         for(i = 0;i < SamplesToDo;i++)
1087                         {
1088                             ((ALshort*)buffer)[0] = aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT]);
1089                             ((ALshort*)buffer)[1] = aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT]);
1090                             buffer = ((ALshort*)buffer) + 2;
1091                         }
1092                     }
1093                     break;
1094                 case AL_FORMAT_QUAD16:
1095                     for(i = 0;i < SamplesToDo;i++)
1096                     {
1097                         ((ALshort*)buffer)[0] = aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT]);
1098                         ((ALshort*)buffer)[1] = aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT]);
1099                         ((ALshort*)buffer)[2] = aluF2S(DryBuffer[i][BACK_LEFT]  +WetBuffer[i][BACK_LEFT]);
1100                         ((ALshort*)buffer)[3] = aluF2S(DryBuffer[i][BACK_RIGHT] +WetBuffer[i][BACK_RIGHT]);
1101                         buffer = ((ALshort*)buffer) + 4;
1102                     }
1103                     break;
1104                 case AL_FORMAT_51CHN16:
1105                     for(i = 0;i < SamplesToDo;i++)
1106                     {
1107                         ((ALshort*)buffer)[0] = aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT]);
1108                         ((ALshort*)buffer)[1] = aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT]);
1109                         ((ALshort*)buffer)[2] = aluF2S(DryBuffer[i][BACK_LEFT]  +WetBuffer[i][BACK_LEFT]);
1110                         ((ALshort*)buffer)[3] = aluF2S(DryBuffer[i][BACK_RIGHT] +WetBuffer[i][BACK_RIGHT]);
1111                         ((ALshort*)buffer)[4] = aluF2S(DryBuffer[i][CENTER]     +WetBuffer[i][CENTER]);
1112                         ((ALshort*)buffer)[5] = aluF2S(DryBuffer[i][LFE]        +WetBuffer[i][LFE]);
1113                         buffer = ((ALshort*)buffer) + 6;
1114                     }
1115                     break;
1116                 case AL_FORMAT_61CHN16:
1117                     for(i = 0;i < SamplesToDo;i++)
1118                     {
1119                         ((ALshort*)buffer)[0] = aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT]);
1120                         ((ALshort*)buffer)[1] = aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT]);
1121                         ((ALshort*)buffer)[2] = aluF2S(DryBuffer[i][SIDE_LEFT]  +WetBuffer[i][SIDE_LEFT]);
1122                         ((ALshort*)buffer)[3] = aluF2S(DryBuffer[i][SIDE_RIGHT] +WetBuffer[i][SIDE_RIGHT]);
1123                         ((ALshort*)buffer)[4] = aluF2S(DryBuffer[i][BACK_LEFT]  +WetBuffer[i][BACK_LEFT]);
1124                         ((ALshort*)buffer)[5] = aluF2S(DryBuffer[i][BACK_RIGHT] +WetBuffer[i][BACK_RIGHT]);
1125                         ((ALshort*)buffer)[6] = aluF2S(DryBuffer[i][LFE]        +WetBuffer[i][LFE]);
1126                         buffer = ((ALshort*)buffer) + 7;
1127                     }
1128                     break;
1129                 case AL_FORMAT_71CHN16:
1130                     for(i = 0;i < SamplesToDo;i++)
1131                     {
1132                         ((ALshort*)buffer)[0] = aluF2S(DryBuffer[i][FRONT_LEFT] +WetBuffer[i][FRONT_LEFT]);
1133                         ((ALshort*)buffer)[1] = aluF2S(DryBuffer[i][FRONT_RIGHT]+WetBuffer[i][FRONT_RIGHT]);
1134                         ((ALshort*)buffer)[2] = aluF2S(DryBuffer[i][SIDE_LEFT]  +WetBuffer[i][SIDE_LEFT]);
1135                         ((ALshort*)buffer)[3] = aluF2S(DryBuffer[i][SIDE_RIGHT] +WetBuffer[i][SIDE_RIGHT]);
1136                         ((ALshort*)buffer)[4] = aluF2S(DryBuffer[i][BACK_LEFT]  +WetBuffer[i][BACK_LEFT]);
1137                         ((ALshort*)buffer)[5] = aluF2S(DryBuffer[i][BACK_RIGHT] +WetBuffer[i][BACK_RIGHT]);
1138                         ((ALshort*)buffer)[6] = aluF2S(DryBuffer[i][CENTER]     +WetBuffer[i][CENTER]);
1139                         ((ALshort*)buffer)[7] = aluF2S(DryBuffer[i][LFE]        +WetBuffer[i][LFE]);
1140                         buffer = ((ALshort*)buffer) + 8;
1141                     }
1142                     break;
1143
1144                 default:
1145                     break;
1146             }
1147
1148             size -= SamplesToDo;
1149         }
1150     }
1151
1152     ProcessContext(ALContext);
1153 }