?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Use WARN when implicitly deleting resources with the context
[openal-soft.git] / Alc / ALu.c
bloba44c04b34c0326cd06eb255645588caf9ad0a6f8
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 #include "config.h"
22
23 #include <math.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <ctype.h>
27 #include <assert.h>
28
29 #include "alMain.h"
30 #include "alSource.h"
31 #include "alBuffer.h"
32 #include "alListener.h"
33 #include "alAuxEffectSlot.h"
34 #include "alu.h"
35 #include "bs2b.h"
36
37 #include "mixer_defs.h"
38
39
40 struct ChanMap {
41 enum Channel channel;
42 ALfloat angle;
43 };
44
45 /* Cone scalar */
46 ALfloat ConeScale = 1.0f;
47
48 /* Localized Z scalar for mono sources */
49 ALfloat ZScale = 1.0f;
50
51
52 static ResamplerFunc SelectResampler(enum Resampler Resampler, ALuint increment)
53 {
54 if(increment == FRACTIONONE)
55 return Resample_copy32_C;
56 switch(Resampler)
57 {
58 case PointResampler:
59 return Resample_point32_C;
60 case LinearResampler:
61 return Resample_lerp32_C;
62 case CubicResampler:
63 return Resample_cubic32_C;
64 case ResamplerMax:
65 /* Shouldn't happen */
66 break;
67 }
68
69 return Resample_point32_C;
70 }
71
72
73 static DryMixerFunc SelectHrtfMixer(void)
74 {
75 #ifdef HAVE_SSE
76 if((CPUCapFlags&CPU_CAP_SSE))
77 return MixDirect_Hrtf_SSE;
78 #endif
79 #ifdef HAVE_NEON
80 if((CPUCapFlags&CPU_CAP_NEON))
81 return MixDirect_Hrtf_Neon;
82 #endif
83
84 return MixDirect_Hrtf_C;
85 }
86
87 static DryMixerFunc SelectDirectMixer(void)
88 {
89 #ifdef HAVE_SSE
90 if((CPUCapFlags&CPU_CAP_SSE))
91 return MixDirect_SSE;
92 #endif
93
94 return MixDirect_C;
95 }
96
97 static WetMixerFunc SelectSendMixer(void)
98 {
99 #ifdef HAVE_SSE
100 if((CPUCapFlags&CPU_CAP_SSE))
101 return MixSend_SSE;
102 #endif
103
104 return MixSend_C;
105 }
106
107
108 static __inline void aluCrossproduct(const ALfloat *inVector1, const ALfloat *inVector2, ALfloat *outVector)
109 {
110 outVector[0] = inVector1[1]*inVector2[2] - inVector1[2]*inVector2[1];
111 outVector[1] = inVector1[2]*inVector2[0] - inVector1[0]*inVector2[2];
112 outVector[2] = inVector1[0]*inVector2[1] - inVector1[1]*inVector2[0];
113 }
114
115 static __inline ALfloat aluDotproduct(const ALfloat *inVector1, const ALfloat *inVector2)
116 {
117 return inVector1[0]*inVector2[0] + inVector1[1]*inVector2[1] +
118 inVector1[2]*inVector2[2];
119 }
120
121 static __inline void aluNormalize(ALfloat *inVector)
122 {
123 ALfloat lengthsqr = aluDotproduct(inVector, inVector);
124 if(lengthsqr > 0.0f)
125 {
126 ALfloat inv_length = 1.0f/sqrtf(lengthsqr);
127 inVector[0] *= inv_length;
128 inVector[1] *= inv_length;
129 inVector[2] *= inv_length;
130 }
131 }
132
133 static __inline ALvoid aluMatrixVector(ALfloat *vector, ALfloat w, ALfloat (*RESTRICT matrix)[4])
134 {
135 ALfloat temp[4] = {
136 vector[0], vector[1], vector[2], w
137 };
138
139 vector[0] = temp[0]*matrix[0][0] + temp[1]*matrix[1][0] + temp[2]*matrix[2][0] + temp[3]*matrix[3][0];
140 vector[1] = temp[0]*matrix[0][1] + temp[1]*matrix[1][1] + temp[2]*matrix[2][1] + temp[3]*matrix[3][1];
141 vector[2] = temp[0]*matrix[0][2] + temp[1]*matrix[1][2] + temp[2]*matrix[2][2] + temp[3]*matrix[3][2];
142 }
143
144
145 static ALvoid CalcListenerParams(ALlistener *Listener)
146 {
147 ALfloat N[3], V[3], U[3], P[3];
148
149 /* AT then UP */
150 N[0] = Listener->Forward[0];
151 N[1] = Listener->Forward[1];
152 N[2] = Listener->Forward[2];
153 aluNormalize(N);
154 V[0] = Listener->Up[0];
155 V[1] = Listener->Up[1];
156 V[2] = Listener->Up[2];
157 aluNormalize(V);
158 /* Build and normalize right-vector */
159 aluCrossproduct(N, V, U);
160 aluNormalize(U);
161
162 Listener->Params.Matrix[0][0] = U[0];
163 Listener->Params.Matrix[0][1] = V[0];
164 Listener->Params.Matrix[0][2] = -N[0];
165 Listener->Params.Matrix[0][3] = 0.0f;
166 Listener->Params.Matrix[1][0] = U[1];
167 Listener->Params.Matrix[1][1] = V[1];
168 Listener->Params.Matrix[1][2] = -N[1];
169 Listener->Params.Matrix[1][3] = 0.0f;
170 Listener->Params.Matrix[2][0] = U[2];
171 Listener->Params.Matrix[2][1] = V[2];
172 Listener->Params.Matrix[2][2] = -N[2];
173 Listener->Params.Matrix[2][3] = 0.0f;
174 Listener->Params.Matrix[3][0] = 0.0f;
175 Listener->Params.Matrix[3][1] = 0.0f;
176 Listener->Params.Matrix[3][2] = 0.0f;
177 Listener->Params.Matrix[3][3] = 1.0f;
178
179 P[0] = Listener->Position[0];
180 P[1] = Listener->Position[1];
181 P[2] = Listener->Position[2];
182 aluMatrixVector(P, 1.0f, Listener->Params.Matrix);
183 Listener->Params.Matrix[3][0] = -P[0];
184 Listener->Params.Matrix[3][1] = -P[1];
185 Listener->Params.Matrix[3][2] = -P[2];
186
187 Listener->Params.Velocity[0] = Listener->Velocity[0];
188 Listener->Params.Velocity[1] = Listener->Velocity[1];
189 Listener->Params.Velocity[2] = Listener->Velocity[2];
190 aluMatrixVector(Listener->Params.Velocity, 0.0f, Listener->Params.Matrix);
191 }
192
193 ALvoid CalcNonAttnSourceParams(ALsource *ALSource, const ALCcontext *ALContext)
194 {
195 static const struct ChanMap MonoMap[1] = { { FrontCenter, 0.0f } };
196 static const struct ChanMap StereoMap[2] = {
197 { FrontLeft, -30.0f * F_PI/180.0f },
198 { FrontRight, 30.0f * F_PI/180.0f }
199 };
200 static const struct ChanMap StereoWideMap[2] = {
201 { FrontLeft, -90.0f * F_PI/180.0f },
202 { FrontRight, 90.0f * F_PI/180.0f }
203 };
204 static const struct ChanMap RearMap[2] = {
205 { BackLeft, -150.0f * F_PI/180.0f },
206 { BackRight, 150.0f * F_PI/180.0f }
207 };
208 static const struct ChanMap QuadMap[4] = {
209 { FrontLeft, -45.0f * F_PI/180.0f },
210 { FrontRight, 45.0f * F_PI/180.0f },
211 { BackLeft, -135.0f * F_PI/180.0f },
212 { BackRight, 135.0f * F_PI/180.0f }
213 };
214 static const struct ChanMap X51Map[6] = {
215 { FrontLeft, -30.0f * F_PI/180.0f },
216 { FrontRight, 30.0f * F_PI/180.0f },
217 { FrontCenter, 0.0f * F_PI/180.0f },
218 { LFE, 0.0f },
219 { BackLeft, -110.0f * F_PI/180.0f },
220 { BackRight, 110.0f * F_PI/180.0f }
221 };
222 static const struct ChanMap X61Map[7] = {
223 { FrontLeft, -30.0f * F_PI/180.0f },
224 { FrontRight, 30.0f * F_PI/180.0f },
225 { FrontCenter, 0.0f * F_PI/180.0f },
226 { LFE, 0.0f },
227 { BackCenter, 180.0f * F_PI/180.0f },
228 { SideLeft, -90.0f * F_PI/180.0f },
229 { SideRight, 90.0f * F_PI/180.0f }
230 };
231 static const struct ChanMap X71Map[8] = {
232 { FrontLeft, -30.0f * F_PI/180.0f },
233 { FrontRight, 30.0f * F_PI/180.0f },
234 { FrontCenter, 0.0f * F_PI/180.0f },
235 { LFE, 0.0f },
236 { BackLeft, -150.0f * F_PI/180.0f },
237 { BackRight, 150.0f * F_PI/180.0f },
238 { SideLeft, -90.0f * F_PI/180.0f },
239 { SideRight, 90.0f * F_PI/180.0f }
240 };
241
242 ALCdevice *Device = ALContext->Device;
243 ALfloat SourceVolume,ListenerGain,MinVolume,MaxVolume;
244 ALbufferlistitem *BufferListItem;
245 enum FmtChannels Channels;
246 ALfloat (*SrcMatrix)[MaxChannels];
247 ALfloat DryGain, DryGainHF;
248 ALfloat WetGain[MAX_SENDS];
249 ALfloat WetGainHF[MAX_SENDS];
250 ALint NumSends, Frequency;
251 const struct ChanMap *chans = NULL;
252 enum Resampler Resampler;
253 ALint num_channels = 0;
254 ALboolean DirectChannels;
255 ALfloat hwidth = 0.0f;
256 ALfloat Pitch;
257 ALfloat cw;
258 ALint i, c;
259
260 /* Get device properties */
261 NumSends = Device->NumAuxSends;
262 Frequency = Device->Frequency;
263
264 /* Get listener properties */
265 ListenerGain = ALContext->Listener->Gain;
266
267 /* Get source properties */
268 SourceVolume = ALSource->Gain;
269 MinVolume = ALSource->MinGain;
270 MaxVolume = ALSource->MaxGain;
271 Pitch = ALSource->Pitch;
272 Resampler = ALSource->Resampler;
273 DirectChannels = ALSource->DirectChannels;
274
275 /* Calculate the stepping value */
276 Channels = FmtMono;
277 BufferListItem = ALSource->queue;
278 while(BufferListItem != NULL)
279 {
280 ALbuffer *ALBuffer;
281 if((ALBuffer=BufferListItem->buffer) != NULL)
282 {
283 ALsizei maxstep = BUFFERSIZE;
284 maxstep -= ResamplerPadding[Resampler] +
285 ResamplerPrePadding[Resampler] + 1;
286 maxstep = mini(maxstep, INT_MAX>>FRACTIONBITS);
287
288 Pitch = Pitch * ALBuffer->Frequency / Frequency;
289 if(Pitch > (ALfloat)maxstep)
290 ALSource->Params.Step = maxstep<<FRACTIONBITS;
291 else
292 {
293 ALSource->Params.Step = fastf2i(Pitch*FRACTIONONE);
294 if(ALSource->Params.Step == 0)
295 ALSource->Params.Step = 1;
296 }
297 ALSource->Params.Resample = SelectResampler(Resampler, ALSource->Params.Step);
298
299 Channels = ALBuffer->FmtChannels;
300 break;
301 }
302 BufferListItem = BufferListItem->next;
303 }
304 if(!DirectChannels && Device->Hrtf)
305 ALSource->Params.DryMix = SelectHrtfMixer();
306 else
307 ALSource->Params.DryMix = SelectDirectMixer();
308 ALSource->Params.WetMix = SelectSendMixer();
309
310 /* Calculate gains */
311 DryGain = clampf(SourceVolume, MinVolume, MaxVolume);
312 DryGain *= ALSource->DirectGain * ListenerGain;
313 DryGainHF = ALSource->DirectGainHF;
314 for(i = 0;i < NumSends;i++)
315 {
316 WetGain[i] = clampf(SourceVolume, MinVolume, MaxVolume);
317 WetGain[i] *= ALSource->Send[i].Gain * ListenerGain;
318 WetGainHF[i] = ALSource->Send[i].GainHF;
319 }
320
321 SrcMatrix = ALSource->Params.Direct.Gains;
322 for(i = 0;i < MaxChannels;i++)
323 {
324 for(c = 0;c < MaxChannels;c++)
325 SrcMatrix[i][c] = 0.0f;
326 }
327 switch(Channels)
328 {
329 case FmtMono:
330 chans = MonoMap;
331 num_channels = 1;
332 break;
333
334 case FmtStereo:
335 if(!(Device->Flags&DEVICE_WIDE_STEREO))
336 chans = StereoMap;
337 else
338 {
339 chans = StereoWideMap;
340 hwidth = 60.0f * F_PI/180.0f;
341 }
342 num_channels = 2;
343 break;
344
345 case FmtRear:
346 chans = RearMap;
347 num_channels = 2;
348 break;
349
350 case FmtQuad:
351 chans = QuadMap;
352 num_channels = 4;
353 break;
354
355 case FmtX51:
356 chans = X51Map;
357 num_channels = 6;
358 break;
359
360 case FmtX61:
361 chans = X61Map;
362 num_channels = 7;
363 break;
364
365 case FmtX71:
366 chans = X71Map;
367 num_channels = 8;
368 break;
369 }
370
371 if(DirectChannels != AL_FALSE)
372 {
373 for(c = 0;c < num_channels;c++)
374 {
375 for(i = 0;i < (ALint)Device->NumChan;i++)
376 {
377 enum Channel chan = Device->Speaker2Chan[i];
378 if(chan == chans[c].channel)
379 {
380 SrcMatrix[c][chan] = DryGain;
381 break;
382 }
383 }
384 }
385 }
386 else if(Device->Hrtf)
387 {
388 for(c = 0;c < num_channels;c++)
389 {
390 if(chans[c].channel == LFE)
391 {
392 /* Skip LFE */
393 ALSource->Params.Direct.Hrtf.Params.Delay[c][0] = 0;
394 ALSource->Params.Direct.Hrtf.Params.Delay[c][1] = 0;
395 for(i = 0;i < HRIR_LENGTH;i++)
396 {
397 ALSource->Params.Direct.Hrtf.Params.Coeffs[c][i][0] = 0.0f;
398 ALSource->Params.Direct.Hrtf.Params.Coeffs[c][i][1] = 0.0f;
399 }
400 }
401 else
402 {
403 /* Get the static HRIR coefficients and delays for this
404 * channel. */
405 GetLerpedHrtfCoeffs(Device->Hrtf,
406 0.0f, chans[c].angle, DryGain,
407 ALSource->Params.Direct.Hrtf.Params.Coeffs[c],
408 ALSource->Params.Direct.Hrtf.Params.Delay[c]);
409 }
410 }
411 ALSource->Hrtf.Counter = 0;
412 ALSource->Params.Direct.Hrtf.Params.IrSize = GetHrtfIrSize(Device->Hrtf);
413
414 ALSource->Params.Direct.Hrtf.State = &ALSource->Hrtf;
415 }
416 else
417 {
418 DryGain *= lerp(1.0f, 1.0f/sqrtf((float)Device->NumChan), hwidth/F_PI);
419 for(c = 0;c < num_channels;c++)
420 {
421 /* Special-case LFE */
422 if(chans[c].channel == LFE)
423 {
424 SrcMatrix[c][chans[c].channel] = DryGain;
425 continue;
426 }
427 ComputeAngleGains(Device, chans[c].angle, hwidth, DryGain,
428 SrcMatrix[c]);
429 }
430 }
431
432 ALSource->Params.Direct.OutBuffer = Device->DryBuffer;
433 ALSource->Params.Direct.ClickRemoval = Device->ClickRemoval;
434 ALSource->Params.Direct.PendingClicks = Device->PendingClicks;
435 for(i = 0;i < NumSends;i++)
436 {
437 ALeffectslot *Slot = ALSource->Send[i].Slot;
438
439 if(!Slot && i == 0)
440 Slot = Device->DefaultSlot;
441 if(Slot && Slot->effect.type == AL_EFFECT_NULL)
442 Slot = NULL;
443 ALSource->Params.Send[i].Slot = Slot;
444 ALSource->Params.Send[i].Gain = WetGain[i];
445 }
446
447 /* Update filter coefficients. Calculations based on the I3DL2
448 * spec. */
449 cw = cosf(F_PI*2.0f * LOWPASSFREQREF / Frequency);
450
451 /* We use two chained one-pole filters, so we need to take the
452 * square root of the squared gain, which is the same as the base
453 * gain. */
454 ALSource->Params.Direct.iirFilter.coeff = lpCoeffCalc(DryGainHF, cw);
455 for(i = 0;i < NumSends;i++)
456 {
457 ALfloat a = lpCoeffCalc(WetGainHF[i], cw);
458 ALSource->Params.Send[i].iirFilter.coeff = a;
459 }
460 }
461
462 ALvoid CalcSourceParams(ALsource *ALSource, const ALCcontext *ALContext)
463 {
464 ALCdevice *Device = ALContext->Device;
465 ALfloat Velocity[3],Direction[3],Position[3],SourceToListener[3];
466 ALfloat InnerAngle,OuterAngle,Angle,Distance,ClampedDist;
467 ALfloat MinVolume,MaxVolume,MinDist,MaxDist,Rolloff;
468 ALfloat ConeVolume,ConeHF,SourceVolume,ListenerGain;
469 ALfloat DopplerFactor, SpeedOfSound;
470 ALfloat AirAbsorptionFactor;
471 ALfloat RoomAirAbsorption[MAX_SENDS];
472 ALbufferlistitem *BufferListItem;
473 ALfloat Attenuation;
474 ALfloat RoomAttenuation[MAX_SENDS];
475 ALfloat MetersPerUnit;
476 ALfloat RoomRolloffBase;
477 ALfloat RoomRolloff[MAX_SENDS];
478 ALfloat DecayDistance[MAX_SENDS];
479 ALfloat DryGain;
480 ALfloat DryGainHF;
481 ALboolean DryGainHFAuto;
482 ALfloat WetGain[MAX_SENDS];
483 ALfloat WetGainHF[MAX_SENDS];
484 ALboolean WetGainAuto;
485 ALboolean WetGainHFAuto;
486 enum Resampler Resampler;
487 ALfloat Pitch;
488 ALuint Frequency;
489 ALint NumSends;
490 ALfloat cw;
491 ALint i, j;
492
493 DryGainHF = 1.0f;
494 for(i = 0;i < MAX_SENDS;i++)
495 WetGainHF[i] = 1.0f;
496
497 /* Get context/device properties */
498 DopplerFactor = ALContext->DopplerFactor * ALSource->DopplerFactor;
499 SpeedOfSound = ALContext->SpeedOfSound * ALContext->DopplerVelocity;
500 NumSends = Device->NumAuxSends;
501 Frequency = Device->Frequency;
502
503 /* Get listener properties */
504 ListenerGain = ALContext->Listener->Gain;
505 MetersPerUnit = ALContext->Listener->MetersPerUnit;
506
507 /* Get source properties */
508 SourceVolume = ALSource->Gain;
509 MinVolume = ALSource->MinGain;
510 MaxVolume = ALSource->MaxGain;
511 Pitch = ALSource->Pitch;
512 Resampler = ALSource->Resampler;
513 Position[0] = ALSource->Position[0];
514 Position[1] = ALSource->Position[1];
515 Position[2] = ALSource->Position[2];
516 Direction[0] = ALSource->Orientation[0];
517 Direction[1] = ALSource->Orientation[1];
518 Direction[2] = ALSource->Orientation[2];
519 Velocity[0] = ALSource->Velocity[0];
520 Velocity[1] = ALSource->Velocity[1];
521 Velocity[2] = ALSource->Velocity[2];
522 MinDist = ALSource->RefDistance;
523 MaxDist = ALSource->MaxDistance;
524 Rolloff = ALSource->RollOffFactor;
525 InnerAngle = ALSource->InnerAngle;
526 OuterAngle = ALSource->OuterAngle;
527 AirAbsorptionFactor = ALSource->AirAbsorptionFactor;
528 DryGainHFAuto = ALSource->DryGainHFAuto;
529 WetGainAuto = ALSource->WetGainAuto;
530 WetGainHFAuto = ALSource->WetGainHFAuto;
531 RoomRolloffBase = ALSource->RoomRolloffFactor;
532
533 ALSource->Params.Direct.OutBuffer = Device->DryBuffer;
534 ALSource->Params.Direct.ClickRemoval = Device->ClickRemoval;
535 ALSource->Params.Direct.PendingClicks = Device->PendingClicks;
536 for(i = 0;i < NumSends;i++)
537 {
538 ALeffectslot *Slot = ALSource->Send[i].Slot;
539
540 if(!Slot && i == 0)
541 Slot = Device->DefaultSlot;
542 if(!Slot || Slot->effect.type == AL_EFFECT_NULL)
543 {
544 Slot = NULL;
545 RoomRolloff[i] = 0.0f;
546 DecayDistance[i] = 0.0f;
547 RoomAirAbsorption[i] = 1.0f;
548 }
549 else if(Slot->AuxSendAuto)
550 {
551 RoomRolloff[i] = RoomRolloffBase;
552 if(IsReverbEffect(Slot->effect.type))
553 {
554 RoomRolloff[i] += Slot->effect.Reverb.RoomRolloffFactor;
555 DecayDistance[i] = Slot->effect.Reverb.DecayTime *
556 SPEEDOFSOUNDMETRESPERSEC;
557 RoomAirAbsorption[i] = Slot->effect.Reverb.AirAbsorptionGainHF;
558 }
559 else
560 {
561 DecayDistance[i] = 0.0f;
562 RoomAirAbsorption[i] = 1.0f;
563 }
564 }
565 else
566 {
567 /* If the slot's auxiliary send auto is off, the data sent to the
568 * effect slot is the same as the dry path, sans filter effects */
569 RoomRolloff[i] = Rolloff;
570 DecayDistance[i] = 0.0f;
571 RoomAirAbsorption[i] = AIRABSORBGAINHF;
572 }
573
574 ALSource->Params.Send[i].Slot = Slot;
575 }
576
577 /* Transform source to listener space (convert to head relative) */
578 if(ALSource->HeadRelative == AL_FALSE)
579 {
580 ALfloat (*RESTRICT Matrix)[4] = ALContext->Listener->Params.Matrix;
581 /* Transform source vectors */
582 aluMatrixVector(Position, 1.0f, Matrix);
583 aluMatrixVector(Direction, 0.0f, Matrix);
584 aluMatrixVector(Velocity, 0.0f, Matrix);
585 }
586 else
587 {
588 const ALfloat *ListenerVel = ALContext->Listener->Params.Velocity;
589 /* Offset the source velocity to be relative of the listener velocity */
590 Velocity[0] += ListenerVel[0];
591 Velocity[1] += ListenerVel[1];
592 Velocity[2] += ListenerVel[2];
593 }
594
595 SourceToListener[0] = -Position[0];
596 SourceToListener[1] = -Position[1];
597 SourceToListener[2] = -Position[2];
598 aluNormalize(SourceToListener);
599 aluNormalize(Direction);
600
601 /* Calculate distance attenuation */
602 Distance = sqrtf(aluDotproduct(Position, Position));
603 ClampedDist = Distance;
604
605 Attenuation = 1.0f;
606 for(i = 0;i < NumSends;i++)
607 RoomAttenuation[i] = 1.0f;
608 switch(ALContext->SourceDistanceModel ? ALSource->DistanceModel :
609 ALContext->DistanceModel)
610 {
611 case InverseDistanceClamped:
612 ClampedDist = clampf(ClampedDist, MinDist, MaxDist);
613 if(MaxDist < MinDist)
614 break;
615 /*fall-through*/
616 case InverseDistance:
617 if(MinDist > 0.0f)
618 {
619 if((MinDist + (Rolloff * (ClampedDist - MinDist))) > 0.0f)
620 Attenuation = MinDist / (MinDist + (Rolloff * (ClampedDist - MinDist)));
621 for(i = 0;i < NumSends;i++)
622 {
623 if((MinDist + (RoomRolloff[i] * (ClampedDist - MinDist))) > 0.0f)
624 RoomAttenuation[i] = MinDist / (MinDist + (RoomRolloff[i] * (ClampedDist - MinDist)));
625 }
626 }
627 break;
628
629 case LinearDistanceClamped:
630 ClampedDist = clampf(ClampedDist, MinDist, MaxDist);
631 if(MaxDist < MinDist)
632 break;
633 /*fall-through*/
634 case LinearDistance:
635 if(MaxDist != MinDist)
636 {
637 Attenuation = 1.0f - (Rolloff*(ClampedDist-MinDist)/(MaxDist - MinDist));
638 Attenuation = maxf(Attenuation, 0.0f);
639 for(i = 0;i < NumSends;i++)
640 {
641 RoomAttenuation[i] = 1.0f - (RoomRolloff[i]*(ClampedDist-MinDist)/(MaxDist - MinDist));
642 RoomAttenuation[i] = maxf(RoomAttenuation[i], 0.0f);
643 }
644 }
645 break;
646
647 case ExponentDistanceClamped:
648 ClampedDist = clampf(ClampedDist, MinDist, MaxDist);
649 if(MaxDist < MinDist)
650 break;
651 /*fall-through*/
652 case ExponentDistance:
653 if(ClampedDist > 0.0f && MinDist > 0.0f)
654 {
655 Attenuation = powf(ClampedDist/MinDist, -Rolloff);
656 for(i = 0;i < NumSends;i++)
657 RoomAttenuation[i] = powf(ClampedDist/MinDist, -RoomRolloff[i]);
658 }
659 break;
660
661 case DisableDistance:
662 ClampedDist = MinDist;
663 break;
664 }
665
666 /* Source Gain + Attenuation */
667 DryGain = SourceVolume * Attenuation;
668 for(i = 0;i < NumSends;i++)
669 WetGain[i] = SourceVolume * RoomAttenuation[i];
670
671 /* Distance-based air absorption */
672 if(AirAbsorptionFactor > 0.0f && ClampedDist > MinDist)
673 {
674 ALfloat meters = maxf(ClampedDist-MinDist, 0.0f) * MetersPerUnit;
675 DryGainHF *= powf(AIRABSORBGAINHF, AirAbsorptionFactor*meters);
676 for(i = 0;i < NumSends;i++)
677 WetGainHF[i] *= powf(RoomAirAbsorption[i], AirAbsorptionFactor*meters);
678 }
679
680 if(WetGainAuto)
681 {
682 ALfloat ApparentDist = 1.0f/maxf(Attenuation, 0.00001f) - 1.0f;
683
684 /* Apply a decay-time transformation to the wet path, based on the
685 * attenuation of the dry path.
686 *
687 * Using the apparent distance, based on the distance attenuation, the
688 * initial decay of the reverb effect is calculated and applied to the
689 * wet path.
690 */
691 for(i = 0;i < NumSends;i++)
692 {
693 if(DecayDistance[i] > 0.0f)
694 WetGain[i] *= powf(0.001f/*-60dB*/, ApparentDist/DecayDistance[i]);
695 }
696 }
697
698 /* Calculate directional soundcones */
699 Angle = acosf(aluDotproduct(Direction,SourceToListener)) * ConeScale * (360.0f/F_PI);
700 if(Angle > InnerAngle && Angle <= OuterAngle)
701 {
702 ALfloat scale = (Angle-InnerAngle) / (OuterAngle-InnerAngle);
703 ConeVolume = lerp(1.0f, ALSource->OuterGain, scale);
704 ConeHF = lerp(1.0f, ALSource->OuterGainHF, scale);
705 }
706 else if(Angle > OuterAngle)
707 {
708 ConeVolume = ALSource->OuterGain;
709 ConeHF = ALSource->OuterGainHF;
710 }
711 else
712 {
713 ConeVolume = 1.0f;
714 ConeHF = 1.0f;
715 }
716
717 DryGain *= ConeVolume;
718 if(WetGainAuto)
719 {
720 for(i = 0;i < NumSends;i++)
721 WetGain[i] *= ConeVolume;
722 }
723 if(DryGainHFAuto)
724 DryGainHF *= ConeHF;
725 if(WetGainHFAuto)
726 {
727 for(i = 0;i < NumSends;i++)
728 WetGainHF[i] *= ConeHF;
729 }
730
731 /* Clamp to Min/Max Gain */
732 DryGain = clampf(DryGain, MinVolume, MaxVolume);
733 for(i = 0;i < NumSends;i++)
734 WetGain[i] = clampf(WetGain[i], MinVolume, MaxVolume);
735
736 /* Apply gain and frequency filters */
737 DryGain *= ALSource->DirectGain * ListenerGain;
738 DryGainHF *= ALSource->DirectGainHF;
739 for(i = 0;i < NumSends;i++)
740 {
741 WetGain[i] *= ALSource->Send[i].Gain * ListenerGain;
742 WetGainHF[i] *= ALSource->Send[i].GainHF;
743 }
744
745 /* Calculate velocity-based doppler effect */
746 if(DopplerFactor > 0.0f)
747 {
748 const ALfloat *ListenerVel = ALContext->Listener->Params.Velocity;
749 ALfloat VSS, VLS;
750
751 if(SpeedOfSound < 1.0f)
752 {
753 DopplerFactor *= 1.0f/SpeedOfSound;
754 SpeedOfSound = 1.0f;
755 }
756
757 VSS = aluDotproduct(Velocity, SourceToListener) * DopplerFactor;
758 VLS = aluDotproduct(ListenerVel, SourceToListener) * DopplerFactor;
759
760 Pitch *= clampf(SpeedOfSound-VLS, 1.0f, SpeedOfSound*2.0f - 1.0f) /
761 clampf(SpeedOfSound-VSS, 1.0f, SpeedOfSound*2.0f - 1.0f);
762 }
763
764 BufferListItem = ALSource->queue;
765 while(BufferListItem != NULL)
766 {
767 ALbuffer *ALBuffer;
768 if((ALBuffer=BufferListItem->buffer) != NULL)
769 {
770 /* Calculate fixed-point stepping value, based on the pitch, buffer
771 * frequency, and output frequency. */
772 ALsizei maxstep = BUFFERSIZE;
773 maxstep -= ResamplerPadding[Resampler] +
774 ResamplerPrePadding[Resampler] + 1;
775 maxstep = mini(maxstep, INT_MAX>>FRACTIONBITS);
776
777 Pitch = Pitch * ALBuffer->Frequency / Frequency;
778 if(Pitch > (ALfloat)maxstep)
779 ALSource->Params.Step = maxstep<<FRACTIONBITS;
780 else
781 {
782 ALSource->Params.Step = fastf2i(Pitch*FRACTIONONE);
783 if(ALSource->Params.Step == 0)
784 ALSource->Params.Step = 1;
785 }
786 ALSource->Params.Resample = SelectResampler(Resampler, ALSource->Params.Step);
787
788 break;
789 }
790 BufferListItem = BufferListItem->next;
791 }
792 if(Device->Hrtf)
793 ALSource->Params.DryMix = SelectHrtfMixer();
794 else
795 ALSource->Params.DryMix = SelectDirectMixer();
796 ALSource->Params.WetMix = SelectSendMixer();
797
798 if(Device->Hrtf)
799 {
800 /* Use a binaural HRTF algorithm for stereo headphone playback */
801 ALfloat delta, ev = 0.0f, az = 0.0f;
802
803 if(Distance > FLT_EPSILON)
804 {
805 ALfloat invlen = 1.0f/Distance;
806 Position[0] *= invlen;
807 Position[1] *= invlen;
808 Position[2] *= invlen;
809
810 /* Calculate elevation and azimuth only when the source is not at
811 * the listener. This prevents +0 and -0 Z from producing
812 * inconsistent panning. Also, clamp Y in case FP precision errors
813 * cause it to land outside of -1..+1. */
814 ev = asinf(clampf(Position[1], -1.0f, 1.0f));
815 az = atan2f(Position[0], -Position[2]*ZScale);
816 }
817
818 /* Check to see if the HRIR is already moving. */
819 if(ALSource->Hrtf.Moving)
820 {
821 /* Calculate the normalized HRTF transition factor (delta). */
822 delta = CalcHrtfDelta(ALSource->Params.Direct.Hrtf.Params.Gain, DryGain,
823 ALSource->Params.Direct.Hrtf.Params.Dir, Position);
824 /* If the delta is large enough, get the moving HRIR target
825 * coefficients, target delays, steppping values, and counter. */
826 if(delta > 0.001f)
827 {
828 ALSource->Hrtf.Counter = GetMovingHrtfCoeffs(Device->Hrtf,
829 ev, az, DryGain, delta,
830 ALSource->Hrtf.Counter,
831 ALSource->Params.Direct.Hrtf.Params.Coeffs[0],
832 ALSource->Params.Direct.Hrtf.Params.Delay[0],
833 ALSource->Params.Direct.Hrtf.Params.CoeffStep,
834 ALSource->Params.Direct.Hrtf.Params.DelayStep);
835 ALSource->Params.Direct.Hrtf.Params.Gain = DryGain;
836 ALSource->Params.Direct.Hrtf.Params.Dir[0] = Position[0];
837 ALSource->Params.Direct.Hrtf.Params.Dir[1] = Position[1];
838 ALSource->Params.Direct.Hrtf.Params.Dir[2] = Position[2];
839 }
840 }
841 else
842 {
843 /* Get the initial (static) HRIR coefficients and delays. */
844 GetLerpedHrtfCoeffs(Device->Hrtf, ev, az, DryGain,
845 ALSource->Params.Direct.Hrtf.Params.Coeffs[0],
846 ALSource->Params.Direct.Hrtf.Params.Delay[0]);
847 ALSource->Hrtf.Counter = 0;
848 ALSource->Hrtf.Moving = AL_TRUE;
849 ALSource->Params.Direct.Hrtf.Params.Gain = DryGain;
850 ALSource->Params.Direct.Hrtf.Params.Dir[0] = Position[0];
851 ALSource->Params.Direct.Hrtf.Params.Dir[1] = Position[1];
852 ALSource->Params.Direct.Hrtf.Params.Dir[2] = Position[2];
853 }
854 ALSource->Params.Direct.Hrtf.Params.IrSize = GetHrtfIrSize(Device->Hrtf);
855
856 ALSource->Params.Direct.Hrtf.State = &ALSource->Hrtf;
857 }
858 else
859 {
860 ALfloat (*Matrix)[MaxChannels] = ALSource->Params.Direct.Gains;
861 ALfloat DirGain = 0.0f;
862 ALfloat AmbientGain;
863
864 for(i = 0;i < MaxChannels;i++)
865 {
866 for(j = 0;j < MaxChannels;j++)
867 Matrix[i][j] = 0.0f;
868 }
869
870 /* Normalize the length, and compute panned gains. */
871 if(Distance > FLT_EPSILON)
872 {
873 ALfloat invlen = 1.0f/Distance;
874 Position[0] *= invlen;
875 Position[1] *= invlen;
876 Position[2] *= invlen;
877
878 DirGain = sqrtf(Position[0]*Position[0] + Position[2]*Position[2]);
879 ComputeAngleGains(Device, atan2f(Position[0], -Position[2]*ZScale), 0.0f,
880 DryGain*DirGain, Matrix[0]);
881 }
882
883 /* Adjustment for vertical offsets. Not the greatest, but simple
884 * enough. */
885 AmbientGain = DryGain * sqrtf(1.0f/Device->NumChan) * (1.0f-DirGain);
886 for(i = 0;i < (ALint)Device->NumChan;i++)
887 {
888 enum Channel chan = Device->Speaker2Chan[i];
889 Matrix[0][chan] = maxf(Matrix[0][chan], AmbientGain);
890 }
891 }
892 for(i = 0;i < NumSends;i++)
893 ALSource->Params.Send[i].Gain = WetGain[i];
894
895 /* Update filter coefficients. */
896 cw = cosf(F_PI*2.0f * LOWPASSFREQREF / Frequency);
897
898 ALSource->Params.Direct.iirFilter.coeff = lpCoeffCalc(DryGainHF, cw);
899 for(i = 0;i < NumSends;i++)
900 {
901 ALfloat a = lpCoeffCalc(WetGainHF[i], cw);
902 ALSource->Params.Send[i].iirFilter.coeff = a;
903 }
904 }
905
906
907 static __inline ALfloat aluF2F(ALfloat val)
908 { return val; }
909 static __inline ALint aluF2I(ALfloat val)
910 {
911 /* Clamp the value between -1 and +1. This handles that without branching. */
912 val = val+1.0f - fabsf(val-1.0f);
913 val = (val-2.0f + fabsf(val+2.0f)) * 0.25f;
914 /* Convert to a signed integer, between -2147483647 and +2147483647. */
915 return fastf2i((ALfloat)(val*2147483647.0));
916 }
917 static __inline ALuint aluF2UI(ALfloat val)
918 { return aluF2I(val)+2147483648u; }
919 static __inline ALshort aluF2S(ALfloat val)
920 { return aluF2I(val)>>16; }
921 static __inline ALushort aluF2US(ALfloat val)
922 { return aluF2S(val)+32768; }
923 static __inline ALbyte aluF2B(ALfloat val)
924 { return aluF2I(val)>>24; }
925 static __inline ALubyte aluF2UB(ALfloat val)
926 { return aluF2B(val)+128; }
927
928 #define DECL_TEMPLATE(T, func) \
929 static int Write_##T(ALCdevice *device, T *RESTRICT buffer, \
930 ALuint SamplesToDo) \
931 { \
932 ALfloat (*RESTRICT DryBuffer)[BUFFERSIZE] = device->DryBuffer; \
933 ALuint numchans = ChannelsFromDevFmt(device->FmtChans); \
934 const ALuint *offsets = device->ChannelOffsets; \
935 ALuint i, j; \
936 \
937 for(j = 0;j < MaxChannels;j++) \
938 { \
939 T *RESTRICT out; \
940 \
941 if(offsets[j] == INVALID_OFFSET) \
942 continue; \
943 \
944 out = buffer + offsets[j]; \
945 for(i = 0;i < SamplesToDo;i++) \
946 out[i*numchans] = func(DryBuffer[j][i]); \
947 } \
948 return SamplesToDo*numchans*sizeof(T); \
949 }
950
951 DECL_TEMPLATE(ALfloat, aluF2F)
952 DECL_TEMPLATE(ALuint, aluF2UI)
953 DECL_TEMPLATE(ALint, aluF2I)
954 DECL_TEMPLATE(ALushort, aluF2US)
955 DECL_TEMPLATE(ALshort, aluF2S)
956 DECL_TEMPLATE(ALubyte, aluF2UB)
957 DECL_TEMPLATE(ALbyte, aluF2B)
958
959 #undef DECL_TEMPLATE
960
961
962 ALvoid aluMixData(ALCdevice *device, ALvoid *buffer, ALsizei size)
963 {
964 ALuint SamplesToDo;
965 ALeffectslot **slot, **slot_end;
966 ALsource **src, **src_end;
967 ALCcontext *ctx;
968 FPUCtl oldMode;
969 ALuint i, c;
970
971 SetMixerFPUMode(&oldMode);
972
973 while(size > 0)
974 {
975 SamplesToDo = minu(size, BUFFERSIZE);
976 for(c = 0;c < MaxChannels;c++)
977 memset(device->DryBuffer[c], 0, SamplesToDo*sizeof(ALfloat));
978
979 ALCdevice_Lock(device);
980 ctx = device->ContextList;
981 while(ctx)
982 {
983 ALenum DeferUpdates = ctx->DeferUpdates;
984 ALenum UpdateSources = AL_FALSE;
985
986 if(!DeferUpdates)
987 UpdateSources = ExchangeInt(&ctx->UpdateSources, AL_FALSE);
988
989 if(UpdateSources)
990 CalcListenerParams(ctx->Listener);
991
992 /* source processing */
993 src = ctx->ActiveSources;
994 src_end = src + ctx->ActiveSourceCount;
995 while(src != src_end)
996 {
997 if((*src)->state != AL_PLAYING)
998 {
999 --(ctx->ActiveSourceCount);
1000 *src = *(--src_end);
1001 continue;
1002 }
1003
1004 if(!DeferUpdates && (ExchangeInt(&(*src)->NeedsUpdate, AL_FALSE) ||
1005 UpdateSources))
1006 ALsource_Update(*src, ctx);
1007
1008 MixSource(*src, device, SamplesToDo);
1009 src++;
1010 }
1011
1012 /* effect slot processing */
1013 slot = ctx->ActiveEffectSlots;
1014 slot_end = slot + ctx->ActiveEffectSlotCount;
1015 while(slot != slot_end)
1016 {
1017 ALfloat offset = (*slot)->ClickRemoval[0];
1018 if(offset < (1.0f/32768.0f))
1019 offset = 0.0f;
1020 else for(i = 0;i < SamplesToDo;i++)
1021 {
1022 (*slot)->WetBuffer[0][i] += offset;
1023 offset -= offset * (1.0f/256.0f);
1024 }
1025 (*slot)->ClickRemoval[0] = offset + (*slot)->PendingClicks[0];
1026 (*slot)->PendingClicks[0] = 0.0f;
1027
1028 if(!DeferUpdates && ExchangeInt(&(*slot)->NeedsUpdate, AL_FALSE))
1029 ALeffectState_Update((*slot)->EffectState, device, *slot);
1030
1031 ALeffectState_Process((*slot)->EffectState, SamplesToDo,
1032 (*slot)->WetBuffer[0], device->DryBuffer);
1033
1034 for(i = 0;i < SamplesToDo;i++)
1035 (*slot)->WetBuffer[0][i] = 0.0f;
1036
1037 slot++;
1038 }
1039
1040 ctx = ctx->next;
1041 }
1042
1043 slot = &device->DefaultSlot;
1044 if(*slot != NULL)
1045 {
1046 ALfloat offset = (*slot)->ClickRemoval[0];
1047 if(offset < (1.0f/32768.0f))
1048 offset = 0.0f;
1049 else for(i = 0;i < SamplesToDo;i++)
1050 {
1051 (*slot)->WetBuffer[0][i] += offset;
1052 offset -= offset * (1.0f/256.0f);
1053 }
1054 (*slot)->ClickRemoval[0] = offset + (*slot)->PendingClicks[0];
1055 (*slot)->PendingClicks[0] = 0.0f;
1056
1057 if(ExchangeInt(&(*slot)->NeedsUpdate, AL_FALSE))
1058 ALeffectState_Update((*slot)->EffectState, device, *slot);
1059
1060 ALeffectState_Process((*slot)->EffectState, SamplesToDo,
1061 (*slot)->WetBuffer[0], device->DryBuffer);
1062
1063 for(i = 0;i < SamplesToDo;i++)
1064 (*slot)->WetBuffer[0][i] = 0.0f;
1065 }
1066 ALCdevice_Unlock(device);
1067
1068 /* Click-removal. Could do better; this only really handles immediate
1069 * changes between updates where a predictive sample could be
1070 * generated. Delays caused by effects and HRTF aren't caught. */
1071 if(device->FmtChans == DevFmtMono)
1072 {
1073 ALfloat offset = device->ClickRemoval[FrontCenter];
1074 if(offset < (1.0f/32768.0f))
1075 offset = 0.0f;
1076 else for(i = 0;i < SamplesToDo;i++)
1077 {
1078 device->DryBuffer[FrontCenter][i] += offset;
1079 offset -= offset * (1.0f/256.0f);
1080 }
1081 device->ClickRemoval[FrontCenter] = offset + device->PendingClicks[FrontCenter];
1082 device->PendingClicks[FrontCenter] = 0.0f;
1083 }
1084 else if(device->FmtChans == DevFmtStereo)
1085 {
1086 /* Assumes the first two channels are FrontLeft and FrontRight */
1087 for(c = 0;c < 2;c++)
1088 {
1089 ALfloat offset = device->ClickRemoval[c];
1090 if(offset < (1.0f/32768.0f))
1091 offset = 0.0f;
1092 else for(i = 0;i < SamplesToDo;i++)
1093 {
1094 device->DryBuffer[c][i] += offset;
1095 offset -= offset * (1.0f/256.0f);
1096 }
1097 device->ClickRemoval[c] = offset + device->PendingClicks[c];
1098 device->PendingClicks[c] = 0.0f;
1099 }
1100 if(device->Bs2b)
1101 {
1102 float samples[2];
1103 for(i = 0;i < SamplesToDo;i++)
1104 {
1105 samples[0] = device->DryBuffer[FrontLeft][i];
1106 samples[1] = device->DryBuffer[FrontRight][i];
1107 bs2b_cross_feed(device->Bs2b, samples);
1108 device->DryBuffer[FrontLeft][i] = samples[0];
1109 device->DryBuffer[FrontRight][i] = samples[1];
1110 }
1111 }
1112 }
1113 else
1114 {
1115 for(c = 0;c < MaxChannels;c++)
1116 {
1117 ALfloat offset = device->ClickRemoval[c];
1118 if(offset < (1.0f/32768.0f))
1119 offset = 0.0f;
1120 else for(i = 0;i < SamplesToDo;i++)
1121 {
1122 device->DryBuffer[c][i] += offset;
1123 offset -= offset * (1.0f/256.0f);
1124 }
1125 device->ClickRemoval[c] = offset + device->PendingClicks[c];
1126 device->PendingClicks[c] = 0.0f;
1127 }
1128 }
1129
1130 if(buffer)
1131 {
1132 int bytes = 0;
1133 switch(device->FmtType)
1134 {
1135 case DevFmtByte:
1136 bytes = Write_ALbyte(device, buffer, SamplesToDo);
1137 break;
1138 case DevFmtUByte:
1139 bytes = Write_ALubyte(device, buffer, SamplesToDo);
1140 break;
1141 case DevFmtShort:
1142 bytes = Write_ALshort(device, buffer, SamplesToDo);
1143 break;
1144 case DevFmtUShort:
1145 bytes = Write_ALushort(device, buffer, SamplesToDo);
1146 break;
1147 case DevFmtInt:
1148 bytes = Write_ALint(device, buffer, SamplesToDo);
1149 break;
1150 case DevFmtUInt:
1151 bytes = Write_ALuint(device, buffer, SamplesToDo);
1152 break;
1153 case DevFmtFloat:
1154 bytes = Write_ALfloat(device, buffer, SamplesToDo);
1155 break;
1156 }
1157
1158 buffer = (ALubyte*)buffer + bytes;
1159 }
1160
1161 size -= SamplesToDo;
1162 }
1163
1164 RestoreFPUMode(&oldMode);
1165 }
1166
1167
1168 ALvoid aluHandleDisconnect(ALCdevice *device)
1169 {
1170 ALCcontext *Context;
1171
1172 ALCdevice_Lock(device);
1173 device->Connected = ALC_FALSE;
1174
1175 Context = device->ContextList;
1176 while(Context)
1177 {
1178 ALsource **src, **src_end;
1179
1180 src = Context->ActiveSources;
1181 src_end = src + Context->ActiveSourceCount;
1182 while(src != src_end)
1183 {
1184 if((*src)->state == AL_PLAYING)
1185 {
1186 (*src)->state = AL_STOPPED;
1187 (*src)->BuffersPlayed = (*src)->BuffersInQueue;
1188 (*src)->position = 0;
1189 (*src)->position_fraction = 0;
1190 }
1191 src++;
1192 }
1193 Context->ActiveSourceCount = 0;
1194
1195 Context = Context->next;
1196 }
1197 ALCdevice_Unlock(device);
1198 }
Software OpenAL implementation