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.
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.
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
35 #include "alListener.h"
36 #include "alAuxEffectSlot.h"
40 #if defined(HAVE_STDINT_H)
42 typedef int64_t ALint64
;
43 #elif defined(HAVE___INT64)
44 typedef __int64 ALint64
;
45 #elif (SIZEOF_LONG == 8)
47 #elif (SIZEOF_LONG_LONG == 8)
48 typedef long long ALint64
;
51 #define FRACTIONBITS 14
52 #define FRACTIONMASK ((1L<<FRACTIONBITS)-1)
53 #define MAX_PITCH 65536
55 /* Minimum ramp length in milliseconds. The value below was chosen to
56 * adequately reduce clicks and pops from harsh gain changes. */
57 #define MIN_RAMP_LENGTH 16
59 ALboolean DuplicateStereo
= AL_FALSE
;
62 static __inline ALfloat
aluF2F(ALfloat Value
)
64 if(Value
< 0.f
) Value
/= 32768.f
;
65 else Value
/= 32767.f
;
69 static __inline ALshort
aluF2S(ALfloat Value
)
79 static __inline ALubyte
aluF2UB(ALfloat Value
)
81 ALshort i
= aluF2S(Value
);
86 static __inline ALvoid
aluCrossproduct(const ALfloat
*inVector1
, const ALfloat
*inVector2
, ALfloat
*outVector
)
88 outVector
[0] = inVector1
[1]*inVector2
[2] - inVector1
[2]*inVector2
[1];
89 outVector
[1] = inVector1
[2]*inVector2
[0] - inVector1
[0]*inVector2
[2];
90 outVector
[2] = inVector1
[0]*inVector2
[1] - inVector1
[1]*inVector2
[0];
93 static __inline ALfloat
aluDotproduct(const ALfloat
*inVector1
, const ALfloat
*inVector2
)
95 return inVector1
[0]*inVector2
[0] + inVector1
[1]*inVector2
[1] +
96 inVector1
[2]*inVector2
[2];
99 static __inline ALvoid
aluNormalize(ALfloat
*inVector
)
101 ALfloat length
, inverse_length
;
103 length
= aluSqrt(aluDotproduct(inVector
, inVector
));
106 inverse_length
= 1.0f
/length
;
107 inVector
[0] *= inverse_length
;
108 inVector
[1] *= inverse_length
;
109 inVector
[2] *= inverse_length
;
113 static __inline ALvoid
aluMatrixVector(ALfloat
*vector
,ALfloat matrix
[3][3])
117 result
[0] = vector
[0]*matrix
[0][0] + vector
[1]*matrix
[1][0] + vector
[2]*matrix
[2][0];
118 result
[1] = vector
[0]*matrix
[0][1] + vector
[1]*matrix
[1][1] + vector
[2]*matrix
[2][1];
119 result
[2] = vector
[0]*matrix
[0][2] + vector
[1]*matrix
[1][2] + vector
[2]*matrix
[2][2];
120 memcpy(vector
, result
, sizeof(result
));
123 static ALvoid
SetSpeakerArrangement(const char *name
, ALfloat SpeakerAngle
[OUTPUTCHANNELS
],
124 ALint Speaker2Chan
[OUTPUTCHANNELS
], ALint chans
)
132 confkey
= GetConfigValue(NULL
, name
, "");
137 next
= strchr(confkey
, ',');
142 } while(isspace(*next
));
145 sep
= strchr(confkey
, '=');
146 if(!sep
|| confkey
== sep
)
150 while(isspace(*end
) && end
!= confkey
)
154 if(strncmp(confkey
, "fl", end
-confkey
) == 0)
156 else if(strncmp(confkey
, "fr", end
-confkey
) == 0)
158 else if(strncmp(confkey
, "fc", end
-confkey
) == 0)
160 else if(strncmp(confkey
, "bl", end
-confkey
) == 0)
162 else if(strncmp(confkey
, "br", end
-confkey
) == 0)
164 else if(strncmp(confkey
, "bc", end
-confkey
) == 0)
166 else if(strncmp(confkey
, "sl", end
-confkey
) == 0)
168 else if(strncmp(confkey
, "sr", end
-confkey
) == 0)
172 AL_PRINT("Unknown speaker for %s: \"%c%c\"\n", name
, confkey
[0], confkey
[1]);
180 for(i
= 0;i
< chans
;i
++)
182 if(Speaker2Chan
[i
] == val
)
184 val
= strtol(sep
, NULL
, 10);
185 if(val
>= -180 && val
<= 180)
186 SpeakerAngle
[i
] = val
* M_PI
/180.0f
;
188 AL_PRINT("Invalid angle for speaker \"%c%c\": %d\n", confkey
[0], confkey
[1], val
);
194 for(i
= 1;i
< chans
;i
++)
196 if(SpeakerAngle
[i
] <= SpeakerAngle
[i
-1])
198 AL_PRINT("Speaker %d of %d does not follow previous: %f > %f\n", i
, chans
,
199 SpeakerAngle
[i
-1] * 180.0f
/M_PI
, SpeakerAngle
[i
] * 180.0f
/M_PI
);
200 SpeakerAngle
[i
] = SpeakerAngle
[i
-1] + 1 * 180.0f
/M_PI
;
205 static __inline ALfloat
aluLUTpos2Angle(ALint pos
)
207 if(pos
< QUADRANT_NUM
)
208 return aluAtan((ALfloat
)pos
/ (ALfloat
)(QUADRANT_NUM
- pos
));
209 if(pos
< 2 * QUADRANT_NUM
)
210 return M_PI_2
+ aluAtan((ALfloat
)(pos
- QUADRANT_NUM
) / (ALfloat
)(2 * QUADRANT_NUM
- pos
));
211 if(pos
< 3 * QUADRANT_NUM
)
212 return aluAtan((ALfloat
)(pos
- 2 * QUADRANT_NUM
) / (ALfloat
)(3 * QUADRANT_NUM
- pos
)) - M_PI
;
213 return aluAtan((ALfloat
)(pos
- 3 * QUADRANT_NUM
) / (ALfloat
)(4 * QUADRANT_NUM
- pos
)) - M_PI_2
;
216 ALvoid
aluInitPanning(ALCcontext
*Context
)
218 ALint pos
, offset
, s
;
219 ALfloat Alpha
, Theta
;
220 ALfloat SpeakerAngle
[OUTPUTCHANNELS
];
221 ALint Speaker2Chan
[OUTPUTCHANNELS
];
223 for(s
= 0;s
< OUTPUTCHANNELS
;s
++)
226 for(s2
= 0;s2
< OUTPUTCHANNELS
;s2
++)
227 Context
->ChannelMatrix
[s
][s2
] = ((s
==s2
) ? 1.0f
: 0.0f
);
230 switch(Context
->Device
->Format
)
232 /* Mono is rendered as stereo, then downmixed during post-process */
233 case AL_FORMAT_MONO8
:
234 case AL_FORMAT_MONO16
:
235 case AL_FORMAT_MONO_FLOAT32
:
236 Context
->ChannelMatrix
[FRONT_CENTER
][FRONT_LEFT
] = aluSqrt(0.5);
237 Context
->ChannelMatrix
[FRONT_CENTER
][FRONT_RIGHT
] = aluSqrt(0.5);
238 Context
->ChannelMatrix
[SIDE_LEFT
][FRONT_LEFT
] = 1.0f
;
239 Context
->ChannelMatrix
[SIDE_RIGHT
][FRONT_RIGHT
] = 1.0f
;
240 Context
->ChannelMatrix
[BACK_LEFT
][FRONT_LEFT
] = 1.0f
;
241 Context
->ChannelMatrix
[BACK_RIGHT
][FRONT_RIGHT
] = 1.0f
;
242 Context
->ChannelMatrix
[BACK_CENTER
][FRONT_LEFT
] = aluSqrt(0.5);
243 Context
->ChannelMatrix
[BACK_CENTER
][FRONT_RIGHT
] = aluSqrt(0.5);
244 Context
->NumChan
= 2;
245 Speaker2Chan
[0] = FRONT_LEFT
;
246 Speaker2Chan
[1] = FRONT_RIGHT
;
247 SpeakerAngle
[0] = -90.0f
* M_PI
/180.0f
;
248 SpeakerAngle
[1] = 90.0f
* M_PI
/180.0f
;
251 case AL_FORMAT_STEREO8
:
252 case AL_FORMAT_STEREO16
:
253 case AL_FORMAT_STEREO_FLOAT32
:
254 Context
->ChannelMatrix
[FRONT_CENTER
][FRONT_LEFT
] = aluSqrt(0.5);
255 Context
->ChannelMatrix
[FRONT_CENTER
][FRONT_RIGHT
] = aluSqrt(0.5);
256 Context
->ChannelMatrix
[SIDE_LEFT
][FRONT_LEFT
] = 1.0f
;
257 Context
->ChannelMatrix
[SIDE_RIGHT
][FRONT_RIGHT
] = 1.0f
;
258 Context
->ChannelMatrix
[BACK_LEFT
][FRONT_LEFT
] = 1.0f
;
259 Context
->ChannelMatrix
[BACK_RIGHT
][FRONT_RIGHT
] = 1.0f
;
260 Context
->ChannelMatrix
[BACK_CENTER
][FRONT_LEFT
] = aluSqrt(0.5);
261 Context
->ChannelMatrix
[BACK_CENTER
][FRONT_RIGHT
] = aluSqrt(0.5);
262 Context
->NumChan
= 2;
263 Speaker2Chan
[0] = FRONT_LEFT
;
264 Speaker2Chan
[1] = FRONT_RIGHT
;
265 SpeakerAngle
[0] = -90.0f
* M_PI
/180.0f
;
266 SpeakerAngle
[1] = 90.0f
* M_PI
/180.0f
;
267 SetSpeakerArrangement("layout_STEREO", SpeakerAngle
, Speaker2Chan
, Context
->NumChan
);
270 case AL_FORMAT_QUAD8
:
271 case AL_FORMAT_QUAD16
:
272 case AL_FORMAT_QUAD32
:
273 Context
->ChannelMatrix
[FRONT_CENTER
][FRONT_LEFT
] = aluSqrt(0.5);
274 Context
->ChannelMatrix
[FRONT_CENTER
][FRONT_RIGHT
] = aluSqrt(0.5);
275 Context
->ChannelMatrix
[SIDE_LEFT
][FRONT_LEFT
] = aluSqrt(0.5);
276 Context
->ChannelMatrix
[SIDE_LEFT
][BACK_LEFT
] = aluSqrt(0.5);
277 Context
->ChannelMatrix
[SIDE_RIGHT
][FRONT_RIGHT
] = aluSqrt(0.5);
278 Context
->ChannelMatrix
[SIDE_RIGHT
][BACK_RIGHT
] = aluSqrt(0.5);
279 Context
->ChannelMatrix
[BACK_CENTER
][BACK_LEFT
] = aluSqrt(0.5);
280 Context
->ChannelMatrix
[BACK_CENTER
][BACK_RIGHT
] = aluSqrt(0.5);
281 Context
->NumChan
= 4;
282 Speaker2Chan
[0] = BACK_LEFT
;
283 Speaker2Chan
[1] = FRONT_LEFT
;
284 Speaker2Chan
[2] = FRONT_RIGHT
;
285 Speaker2Chan
[3] = BACK_RIGHT
;
286 SpeakerAngle
[0] = -135.0f
* M_PI
/180.0f
;
287 SpeakerAngle
[1] = -45.0f
* M_PI
/180.0f
;
288 SpeakerAngle
[2] = 45.0f
* M_PI
/180.0f
;
289 SpeakerAngle
[3] = 135.0f
* M_PI
/180.0f
;
290 SetSpeakerArrangement("layout_QUAD", SpeakerAngle
, Speaker2Chan
, Context
->NumChan
);
293 case AL_FORMAT_51CHN8
:
294 case AL_FORMAT_51CHN16
:
295 case AL_FORMAT_51CHN32
:
296 Context
->ChannelMatrix
[SIDE_LEFT
][FRONT_LEFT
] = aluSqrt(0.5);
297 Context
->ChannelMatrix
[SIDE_LEFT
][BACK_LEFT
] = aluSqrt(0.5);
298 Context
->ChannelMatrix
[SIDE_RIGHT
][FRONT_RIGHT
] = aluSqrt(0.5);
299 Context
->ChannelMatrix
[SIDE_RIGHT
][BACK_RIGHT
] = aluSqrt(0.5);
300 Context
->ChannelMatrix
[BACK_CENTER
][BACK_LEFT
] = aluSqrt(0.5);
301 Context
->ChannelMatrix
[BACK_CENTER
][BACK_RIGHT
] = aluSqrt(0.5);
302 Context
->NumChan
= 5;
303 Speaker2Chan
[0] = BACK_LEFT
;
304 Speaker2Chan
[1] = FRONT_LEFT
;
305 Speaker2Chan
[2] = FRONT_CENTER
;
306 Speaker2Chan
[3] = FRONT_RIGHT
;
307 Speaker2Chan
[4] = BACK_RIGHT
;
308 SpeakerAngle
[0] = -110.0f
* M_PI
/180.0f
;
309 SpeakerAngle
[1] = -30.0f
* M_PI
/180.0f
;
310 SpeakerAngle
[2] = 0.0f
* M_PI
/180.0f
;
311 SpeakerAngle
[3] = 30.0f
* M_PI
/180.0f
;
312 SpeakerAngle
[4] = 110.0f
* M_PI
/180.0f
;
313 SetSpeakerArrangement("layout_51CHN", SpeakerAngle
, Speaker2Chan
, Context
->NumChan
);
316 case AL_FORMAT_61CHN8
:
317 case AL_FORMAT_61CHN16
:
318 case AL_FORMAT_61CHN32
:
319 Context
->ChannelMatrix
[BACK_LEFT
][BACK_CENTER
] = aluSqrt(0.5);
320 Context
->ChannelMatrix
[BACK_LEFT
][SIDE_LEFT
] = aluSqrt(0.5);
321 Context
->ChannelMatrix
[BACK_RIGHT
][BACK_CENTER
] = aluSqrt(0.5);
322 Context
->ChannelMatrix
[BACK_RIGHT
][SIDE_RIGHT
] = aluSqrt(0.5);
323 Context
->NumChan
= 6;
324 Speaker2Chan
[0] = SIDE_LEFT
;
325 Speaker2Chan
[1] = FRONT_LEFT
;
326 Speaker2Chan
[2] = FRONT_CENTER
;
327 Speaker2Chan
[3] = FRONT_RIGHT
;
328 Speaker2Chan
[4] = SIDE_RIGHT
;
329 Speaker2Chan
[5] = BACK_CENTER
;
330 SpeakerAngle
[0] = -90.0f
* M_PI
/180.0f
;
331 SpeakerAngle
[1] = -30.0f
* M_PI
/180.0f
;
332 SpeakerAngle
[2] = 0.0f
* M_PI
/180.0f
;
333 SpeakerAngle
[3] = 30.0f
* M_PI
/180.0f
;
334 SpeakerAngle
[4] = 90.0f
* M_PI
/180.0f
;
335 SpeakerAngle
[5] = 180.0f
* M_PI
/180.0f
;
336 SetSpeakerArrangement("layout_61CHN", SpeakerAngle
, Speaker2Chan
, Context
->NumChan
);
339 case AL_FORMAT_71CHN8
:
340 case AL_FORMAT_71CHN16
:
341 case AL_FORMAT_71CHN32
:
342 Context
->ChannelMatrix
[BACK_CENTER
][BACK_LEFT
] = aluSqrt(0.5);
343 Context
->ChannelMatrix
[BACK_CENTER
][BACK_RIGHT
] = aluSqrt(0.5);
344 Context
->NumChan
= 7;
345 Speaker2Chan
[0] = BACK_LEFT
;
346 Speaker2Chan
[1] = SIDE_LEFT
;
347 Speaker2Chan
[2] = FRONT_LEFT
;
348 Speaker2Chan
[3] = FRONT_CENTER
;
349 Speaker2Chan
[4] = FRONT_RIGHT
;
350 Speaker2Chan
[5] = SIDE_RIGHT
;
351 Speaker2Chan
[6] = BACK_RIGHT
;
352 SpeakerAngle
[0] = -150.0f
* M_PI
/180.0f
;
353 SpeakerAngle
[1] = -90.0f
* M_PI
/180.0f
;
354 SpeakerAngle
[2] = -30.0f
* M_PI
/180.0f
;
355 SpeakerAngle
[3] = 0.0f
* M_PI
/180.0f
;
356 SpeakerAngle
[4] = 30.0f
* M_PI
/180.0f
;
357 SpeakerAngle
[5] = 90.0f
* M_PI
/180.0f
;
358 SpeakerAngle
[6] = 150.0f
* M_PI
/180.0f
;
359 SetSpeakerArrangement("layout_71CHN", SpeakerAngle
, Speaker2Chan
, Context
->NumChan
);
366 for(pos
= 0; pos
< LUT_NUM
; pos
++)
369 Theta
= aluLUTpos2Angle(pos
);
371 /* clear all values */
372 offset
= OUTPUTCHANNELS
* pos
;
373 for(s
= 0; s
< OUTPUTCHANNELS
; s
++)
374 Context
->PanningLUT
[offset
+s
] = 0.0f
;
376 /* set panning values */
377 for(s
= 0; s
< Context
->NumChan
- 1; s
++)
379 if(Theta
>= SpeakerAngle
[s
] && Theta
< SpeakerAngle
[s
+1])
381 /* source between speaker s and speaker s+1 */
382 Alpha
= M_PI_2
* (Theta
-SpeakerAngle
[s
]) /
383 (SpeakerAngle
[s
+1]-SpeakerAngle
[s
]);
384 Context
->PanningLUT
[offset
+ Speaker2Chan
[s
]] = cos(Alpha
);
385 Context
->PanningLUT
[offset
+ Speaker2Chan
[s
+1]] = sin(Alpha
);
389 if(s
== Context
->NumChan
- 1)
391 /* source between last and first speaker */
392 if(Theta
< SpeakerAngle
[0])
393 Theta
+= 2.0f
* M_PI
;
394 Alpha
= M_PI_2
* (Theta
-SpeakerAngle
[s
]) /
395 (2.0f
* M_PI
+ SpeakerAngle
[0]-SpeakerAngle
[s
]);
396 Context
->PanningLUT
[offset
+ Speaker2Chan
[s
]] = cos(Alpha
);
397 Context
->PanningLUT
[offset
+ Speaker2Chan
[0]] = sin(Alpha
);
402 static __inline ALint
aluCart2LUTpos(ALfloat re
, ALfloat im
)
405 ALfloat denom
= aluFabs(re
) + aluFabs(im
);
407 pos
= (ALint
)(QUADRANT_NUM
*aluFabs(im
) / denom
+ 0.5);
410 pos
= 2 * QUADRANT_NUM
- pos
;
416 static ALvoid
CalcSourceParams(const ALCcontext
*ALContext
,
417 const ALsource
*ALSource
, ALenum isMono
,
418 ALfloat
*drysend
, ALfloat
*wetsend
,
419 ALfloat
*pitch
, ALfloat
*drygainhf
,
422 ALfloat InnerAngle
,OuterAngle
,Angle
,Distance
,DryMix
;
423 ALfloat Direction
[3],Position
[3],SourceToListener
[3];
424 ALfloat MinVolume
,MaxVolume
,MinDist
,MaxDist
,Rolloff
,OuterGainHF
;
425 ALfloat ConeVolume
,ConeHF
,SourceVolume
,ListenerGain
;
426 ALfloat U
[3],V
[3],N
[3];
427 ALfloat DopplerFactor
, DopplerVelocity
, flSpeedOfSound
, flMaxVelocity
;
428 ALfloat Matrix
[3][3];
429 ALfloat flAttenuation
;
430 ALfloat RoomAttenuation
[MAX_SENDS
];
431 ALfloat MetersPerUnit
;
432 ALfloat RoomRolloff
[MAX_SENDS
];
433 ALfloat DryGainHF
= 1.0f
;
434 ALfloat DirGain
, AmbientGain
;
436 const ALfloat
*SpeakerGain
;
440 //Get context properties
441 DopplerFactor
= ALContext
->DopplerFactor
* ALSource
->DopplerFactor
;
442 DopplerVelocity
= ALContext
->DopplerVelocity
;
443 flSpeedOfSound
= ALContext
->flSpeedOfSound
;
444 NumSends
= ALContext
->Device
->NumAuxSends
;
446 //Get listener properties
447 ListenerGain
= ALContext
->Listener
.Gain
;
448 MetersPerUnit
= ALContext
->Listener
.MetersPerUnit
;
450 //Get source properties
451 SourceVolume
= ALSource
->flGain
;
452 memcpy(Position
, ALSource
->vPosition
, sizeof(ALSource
->vPosition
));
453 memcpy(Direction
, ALSource
->vOrientation
, sizeof(ALSource
->vOrientation
));
454 MinVolume
= ALSource
->flMinGain
;
455 MaxVolume
= ALSource
->flMaxGain
;
456 MinDist
= ALSource
->flRefDistance
;
457 MaxDist
= ALSource
->flMaxDistance
;
458 Rolloff
= ALSource
->flRollOffFactor
;
459 InnerAngle
= ALSource
->flInnerAngle
;
460 OuterAngle
= ALSource
->flOuterAngle
;
461 OuterGainHF
= ALSource
->OuterGainHF
;
463 //Only apply 3D calculations for mono buffers
464 if(isMono
!= AL_FALSE
)
466 //1. Translate Listener to origin (convert to head relative)
467 // Note that Direction and SourceToListener are *not* transformed.
468 // SourceToListener is used with the source and listener velocities,
469 // which are untransformed, and Direction is used with SourceToListener
470 // for the sound cone
471 if(ALSource
->bHeadRelative
==AL_FALSE
)
473 // Build transform matrix
474 aluCrossproduct(ALContext
->Listener
.Forward
, ALContext
->Listener
.Up
, U
); // Right-vector
475 aluNormalize(U
); // Normalized Right-vector
476 memcpy(V
, ALContext
->Listener
.Up
, sizeof(V
)); // Up-vector
477 aluNormalize(V
); // Normalized Up-vector
478 memcpy(N
, ALContext
->Listener
.Forward
, sizeof(N
)); // At-vector
479 aluNormalize(N
); // Normalized At-vector
480 Matrix
[0][0] = U
[0]; Matrix
[0][1] = V
[0]; Matrix
[0][2] = -N
[0];
481 Matrix
[1][0] = U
[1]; Matrix
[1][1] = V
[1]; Matrix
[1][2] = -N
[1];
482 Matrix
[2][0] = U
[2]; Matrix
[2][1] = V
[2]; Matrix
[2][2] = -N
[2];
484 // Translate source position into listener space
485 Position
[0] -= ALContext
->Listener
.Position
[0];
486 Position
[1] -= ALContext
->Listener
.Position
[1];
487 Position
[2] -= ALContext
->Listener
.Position
[2];
489 SourceToListener
[0] = -Position
[0];
490 SourceToListener
[1] = -Position
[1];
491 SourceToListener
[2] = -Position
[2];
493 // Transform source position into listener space
494 aluMatrixVector(Position
, Matrix
);
498 SourceToListener
[0] = -Position
[0];
499 SourceToListener
[1] = -Position
[1];
500 SourceToListener
[2] = -Position
[2];
502 aluNormalize(SourceToListener
);
503 aluNormalize(Direction
);
505 //2. Calculate distance attenuation
506 Distance
= aluSqrt(aluDotproduct(Position
, Position
));
508 flAttenuation
= 1.0f
;
509 for(i
= 0;i
< MAX_SENDS
;i
++)
511 RoomAttenuation
[i
] = 1.0f
;
513 RoomRolloff
[i
] = ALSource
->RoomRolloffFactor
;
514 if(ALSource
->Send
[i
].Slot
&&
515 ALSource
->Send
[i
].Slot
->effect
.type
== AL_EFFECT_REVERB
)
516 RoomRolloff
[i
] += ALSource
->Send
[i
].Slot
->effect
.Reverb
.RoomRolloffFactor
;
519 switch (ALSource
->DistanceModel
)
521 case AL_INVERSE_DISTANCE_CLAMPED
:
522 Distance
=__max(Distance
,MinDist
);
523 Distance
=__min(Distance
,MaxDist
);
524 if (MaxDist
< MinDist
)
527 case AL_INVERSE_DISTANCE
:
530 if ((MinDist
+ (Rolloff
* (Distance
- MinDist
))) > 0.0f
)
531 flAttenuation
= MinDist
/ (MinDist
+ (Rolloff
* (Distance
- MinDist
)));
532 for(i
= 0;i
< NumSends
;i
++)
534 if ((MinDist
+ (RoomRolloff
[i
] * (Distance
- MinDist
))) > 0.0f
)
535 RoomAttenuation
[i
] = MinDist
/ (MinDist
+ (RoomRolloff
[i
] * (Distance
- MinDist
)));
540 case AL_LINEAR_DISTANCE_CLAMPED
:
541 Distance
=__max(Distance
,MinDist
);
542 Distance
=__min(Distance
,MaxDist
);
543 if (MaxDist
< MinDist
)
546 case AL_LINEAR_DISTANCE
:
547 Distance
=__min(Distance
,MaxDist
);
548 if (MaxDist
!= MinDist
)
550 flAttenuation
= 1.0f
- (Rolloff
*(Distance
-MinDist
)/(MaxDist
- MinDist
));
551 for(i
= 0;i
< NumSends
;i
++)
552 RoomAttenuation
[i
] = 1.0f
- (RoomRolloff
[i
]*(Distance
-MinDist
)/(MaxDist
- MinDist
));
556 case AL_EXPONENT_DISTANCE_CLAMPED
:
557 Distance
=__max(Distance
,MinDist
);
558 Distance
=__min(Distance
,MaxDist
);
559 if (MaxDist
< MinDist
)
562 case AL_EXPONENT_DISTANCE
:
563 if ((Distance
> 0.0f
) && (MinDist
> 0.0f
))
565 flAttenuation
= (ALfloat
)pow(Distance
/MinDist
, -Rolloff
);
566 for(i
= 0;i
< NumSends
;i
++)
567 RoomAttenuation
[i
] = (ALfloat
)pow(Distance
/MinDist
, -RoomRolloff
[i
]);
575 // Source Gain + Attenuation and clamp to Min/Max Gain
576 DryMix
= SourceVolume
* flAttenuation
;
577 DryMix
= __min(DryMix
,MaxVolume
);
578 DryMix
= __max(DryMix
,MinVolume
);
580 for(i
= 0;i
< NumSends
;i
++)
582 ALfloat WetMix
= SourceVolume
* RoomAttenuation
[i
];
583 WetMix
= __min(WetMix
,MaxVolume
);
584 wetsend
[i
] = __max(WetMix
,MinVolume
);
588 // Distance-based air absorption
589 if(ALSource
->AirAbsorptionFactor
> 0.0f
&& ALSource
->DistanceModel
!= AL_NONE
)
591 ALfloat dist
= Distance
-MinDist
;
594 if(dist
< 0.0f
) dist
= 0.0f
;
595 // Absorption calculation is done in dB
596 absorb
= (ALSource
->AirAbsorptionFactor
*AIRABSORBGAINDBHF
) *
597 (dist
*MetersPerUnit
);
598 // Convert dB to linear gain before applying
599 absorb
= pow(10.0, absorb
/20.0);
601 for(i
= 0;i
< MAX_SENDS
;i
++)
602 wetgainhf
[i
] *= absorb
;
605 //3. Apply directional soundcones
606 Angle
= aluAcos(aluDotproduct(Direction
,SourceToListener
)) * 180.0f
/M_PI
;
607 if(Angle
>= InnerAngle
&& Angle
<= OuterAngle
)
609 ALfloat scale
= (Angle
-InnerAngle
) / (OuterAngle
-InnerAngle
);
610 ConeVolume
= (1.0f
+(ALSource
->flOuterGain
-1.0f
)*scale
);
611 ConeHF
= (1.0f
+(OuterGainHF
-1.0f
)*scale
);
612 DryMix
*= ConeVolume
;
613 if(ALSource
->DryGainHFAuto
)
616 else if(Angle
> OuterAngle
)
618 ConeVolume
= (1.0f
+(ALSource
->flOuterGain
-1.0f
));
619 ConeHF
= (1.0f
+(OuterGainHF
-1.0f
));
620 DryMix
*= ConeVolume
;
621 if(ALSource
->DryGainHFAuto
)
630 //4. Calculate Velocity
631 if(DopplerFactor
!= 0.0f
)
633 ALfloat flVSS
, flVLS
= 0.0f
;
635 if(ALSource
->bHeadRelative
==AL_FALSE
)
636 flVLS
= aluDotproduct(ALContext
->Listener
.Velocity
, SourceToListener
);
637 flVSS
= aluDotproduct(ALSource
->vVelocity
, SourceToListener
);
639 flMaxVelocity
= (DopplerVelocity
* flSpeedOfSound
) / DopplerFactor
;
641 if (flVSS
>= flMaxVelocity
)
642 flVSS
= (flMaxVelocity
- 1.0f
);
643 else if (flVSS
<= -flMaxVelocity
)
644 flVSS
= -flMaxVelocity
+ 1.0f
;
646 if (flVLS
>= flMaxVelocity
)
647 flVLS
= (flMaxVelocity
- 1.0f
);
648 else if (flVLS
<= -flMaxVelocity
)
649 flVLS
= -flMaxVelocity
+ 1.0f
;
651 pitch
[0] = ALSource
->flPitch
*
652 ((flSpeedOfSound
* DopplerVelocity
) - (DopplerFactor
* flVLS
)) /
653 ((flSpeedOfSound
* DopplerVelocity
) - (DopplerFactor
* flVSS
));
656 pitch
[0] = ALSource
->flPitch
;
658 for(i
= 0;i
< NumSends
;i
++)
660 if(ALSource
->Send
[i
].Slot
&&
661 ALSource
->Send
[i
].Slot
->effect
.type
!= AL_EFFECT_NULL
)
663 if(ALSource
->WetGainAuto
)
664 wetsend
[i
] *= ConeVolume
;
665 if(ALSource
->WetGainHFAuto
)
666 wetgainhf
[i
] *= ConeHF
;
668 if(ALSource
->Send
[i
].Slot
->AuxSendAuto
)
670 // Apply minimal attenuation in place of missing
671 // statistical reverb model.
672 wetsend
[i
] *= pow(DryMix
, 1.0f
/ 2.0f
);
676 // If the slot's auxilliary send auto is off, the data sent to the
677 // effect slot is the same as the dry path, sans filter effects
679 wetgainhf
[i
] = DryGainHF
;
682 switch(ALSource
->Send
[i
].WetFilter
.type
)
684 case AL_FILTER_LOWPASS
:
685 wetsend
[i
] *= ALSource
->Send
[i
].WetFilter
.Gain
;
686 wetgainhf
[i
] *= ALSource
->Send
[i
].WetFilter
.GainHF
;
689 wetsend
[i
] *= ListenerGain
;
697 for(i
= NumSends
;i
< MAX_SENDS
;i
++)
703 //5. Apply filter gains and filters
704 switch(ALSource
->DirectFilter
.type
)
706 case AL_FILTER_LOWPASS
:
707 DryMix
*= ALSource
->DirectFilter
.Gain
;
708 DryGainHF
*= ALSource
->DirectFilter
.GainHF
;
711 DryMix
*= ListenerGain
;
713 // Use energy-preserving panning algorithm for multi-speaker playback
714 length
= aluSqrt(Position
[0]*Position
[0] + Position
[1]*Position
[1] +
715 Position
[2]*Position
[2]);
716 length
= __max(length
, MinDist
);
719 ALfloat invlen
= 1.0f
/length
;
720 Position
[0] *= invlen
;
721 Position
[1] *= invlen
;
722 Position
[2] *= invlen
;
725 pos
= aluCart2LUTpos(-Position
[2], Position
[0]);
726 SpeakerGain
= &ALContext
->PanningLUT
[OUTPUTCHANNELS
* pos
];
728 DirGain
= aluSqrt(Position
[0]*Position
[0] + Position
[2]*Position
[2]);
729 // elevation adjustment for directional gain. this sucks, but
730 // has low complexity
731 AmbientGain
= 1.0/aluSqrt(ALContext
->NumChan
) * (1.0-DirGain
);
732 for(s
= 0; s
< OUTPUTCHANNELS
; s
++)
734 ALfloat gain
= SpeakerGain
[s
]*DirGain
+ AmbientGain
;
735 drysend
[s
] = DryMix
* gain
;
737 *drygainhf
= DryGainHF
;
741 //1. Multi-channel buffers always play "normal"
742 pitch
[0] = ALSource
->flPitch
;
744 DryMix
= SourceVolume
;
745 DryMix
= __min(DryMix
,MaxVolume
);
746 DryMix
= __max(DryMix
,MinVolume
);
748 switch(ALSource
->DirectFilter
.type
)
750 case AL_FILTER_LOWPASS
:
751 DryMix
*= ALSource
->DirectFilter
.Gain
;
752 DryGainHF
*= ALSource
->DirectFilter
.GainHF
;
756 drysend
[FRONT_LEFT
] = DryMix
* ListenerGain
;
757 drysend
[FRONT_RIGHT
] = DryMix
* ListenerGain
;
758 drysend
[SIDE_LEFT
] = DryMix
* ListenerGain
;
759 drysend
[SIDE_RIGHT
] = DryMix
* ListenerGain
;
760 drysend
[BACK_LEFT
] = DryMix
* ListenerGain
;
761 drysend
[BACK_RIGHT
] = DryMix
* ListenerGain
;
762 drysend
[FRONT_CENTER
] = DryMix
* ListenerGain
;
763 drysend
[BACK_CENTER
] = DryMix
* ListenerGain
;
764 drysend
[LFE
] = DryMix
* ListenerGain
;
765 *drygainhf
= DryGainHF
;
767 for(i
= 0;i
< MAX_SENDS
;i
++)
775 static __inline ALshort
lerp(ALshort val1
, ALshort val2
, ALint frac
)
777 return val1
+ (((val2
-val1
)*frac
)>>FRACTIONBITS
);
780 static void MixSomeSources(ALCcontext
*ALContext
, float (*DryBuffer
)[OUTPUTCHANNELS
], ALuint SamplesToDo
)
782 static float DummyBuffer
[BUFFERSIZE
];
783 ALfloat
*WetBuffer
[MAX_SENDS
];
784 ALfloat (*Matrix
)[OUTPUTCHANNELS
] = ALContext
->ChannelMatrix
;
785 ALfloat DrySend
[OUTPUTCHANNELS
] = { 0.0f
, 0.0f
, 0.0f
, 0.0f
, 0.0f
, 0.0f
, 0.0f
, 0.0f
};
786 ALfloat dryGainStep
[OUTPUTCHANNELS
];
787 ALfloat wetGainStep
[MAX_SENDS
];
788 ALfloat values
[OUTPUTCHANNELS
];
793 ALbufferlistitem
*BufferListItem
;
794 ALint64 DataSize64
,DataPos64
;
795 FILTER
*DryFilter
, *WetFilter
[MAX_SENDS
];
796 ALfloat WetSend
[MAX_SENDS
];
797 ALfloat DryGainHF
= 0.0f
;
798 ALfloat WetGainHF
[MAX_SENDS
];
803 if(!(ALSource
=ALContext
->Source
))
806 rampLength
= ALContext
->Frequency
* MIN_RAMP_LENGTH
/ 1000;
807 rampLength
= max(rampLength
, SamplesToDo
);
811 State
= ALSource
->state
;
812 while(State
== AL_PLAYING
&& j
< SamplesToDo
)
815 ALuint DataPosInt
= 0;
816 ALuint DataPosFrac
= 0;
819 ALuint Channels
, Frequency
;
823 /* Get buffer info */
824 if(!(Buffer
= ALSource
->ulBufferID
))
826 ALBuffer
= (ALbuffer
*)ALTHUNK_LOOKUPENTRY(Buffer
);
828 Data
= ALBuffer
->data
;
829 Channels
= aluChannelsFromFormat(ALBuffer
->format
);
830 DataSize
= ALBuffer
->size
;
831 DataSize
/= Channels
* aluBytesFromFormat(ALBuffer
->format
);
832 Frequency
= ALBuffer
->frequency
;
834 DataPosInt
= ALSource
->position
;
835 DataPosFrac
= ALSource
->position_fraction
;
837 if(DataPosInt
>= DataSize
)
840 /* Get source info */
841 DryFilter
= &ALSource
->iirFilter
;
842 for(i
= 0;i
< MAX_SENDS
;i
++)
844 WetFilter
[i
] = &ALSource
->Send
[i
].iirFilter
;
845 WetBuffer
[i
] = (ALSource
->Send
[i
].Slot
?
846 ALSource
->Send
[i
].Slot
->WetBuffer
:
850 CalcSourceParams(ALContext
, ALSource
, (Channels
==1)?AL_TRUE
:AL_FALSE
,
851 DrySend
, WetSend
, &Pitch
, &DryGainHF
, WetGainHF
);
852 Pitch
= (Pitch
*Frequency
) / ALContext
->Frequency
;
858 /* Update filter coefficients. Calculations based on the I3DL2
860 cw
= cos(2.0*M_PI
* LOWPASSFREQCUTOFF
/ ALContext
->Frequency
);
861 /* We use four chained one-pole filters, so we need to take the
862 * fourth root of the squared gain, which is the same as the square
863 * root of the base gain. */
864 /* Be careful with gains < 0.0001, as that causes the coefficient
865 * head towards 1, which will flatten the signal */
866 g
= aluSqrt(__max(DryGainHF
, 0.0001f
));
868 if(g
< 0.9999f
) /* 1-epsilon */
869 a
= (1 - g
*cw
- aluSqrt(2*g
*(1-cw
) - g
*g
*(1 - cw
*cw
))) /
871 DryFilter
->coeff
= a
;
873 for(i
= 0;i
< MAX_SENDS
;i
++)
875 /* The wet path uses two chained one-pole filters, so take the
876 * base gain (square root of the squared gain) */
877 g
= __max(WetGainHF
[i
], 0.01f
);
879 if(g
< 0.9999f
) /* 1-epsilon */
880 a
= (1 - g
*cw
- aluSqrt(2*g
*(1-cw
) - g
*g
*(1 - cw
*cw
))) /
882 WetFilter
[i
]->coeff
= a
;
889 /* Multi-channel sources use two chained one-pole filters */
890 cw
= cos(2.0*M_PI
* LOWPASSFREQCUTOFF
/ ALContext
->Frequency
);
891 g
= __max(DryGainHF
, 0.01f
);
893 if(g
< 0.9999f
) /* 1-epsilon */
894 a
= (1 - g
*cw
- aluSqrt(2*g
*(1-cw
) - g
*g
*(1 - cw
*cw
))) /
896 DryFilter
->coeff
= a
;
897 for(i
= 0;i
< MAX_SENDS
;i
++)
898 WetFilter
[i
]->coeff
= 0.0f
;
900 if(DuplicateStereo
&& Channels
== 2)
902 Matrix
[FRONT_LEFT
][SIDE_LEFT
] = 1.0f
;
903 Matrix
[FRONT_RIGHT
][SIDE_RIGHT
] = 1.0f
;
904 Matrix
[FRONT_LEFT
][BACK_LEFT
] = 1.0f
;
905 Matrix
[FRONT_RIGHT
][BACK_RIGHT
] = 1.0f
;
907 else if(DuplicateStereo
)
909 Matrix
[FRONT_LEFT
][SIDE_LEFT
] = 0.0f
;
910 Matrix
[FRONT_RIGHT
][SIDE_RIGHT
] = 0.0f
;
911 Matrix
[FRONT_LEFT
][BACK_LEFT
] = 0.0f
;
912 Matrix
[FRONT_RIGHT
][BACK_RIGHT
] = 0.0f
;
916 /* Compute the gain steps for each output channel */
917 if(ALSource
->FirstStart
&& DataPosInt
== 0 && DataPosFrac
== 0)
919 for(i
= 0;i
< OUTPUTCHANNELS
;i
++)
920 dryGainStep
[i
] = 0.0f
;
921 for(i
= 0;i
< MAX_SENDS
;i
++)
922 wetGainStep
[i
] = 0.0f
;
926 for(i
= 0;i
< OUTPUTCHANNELS
;i
++)
928 dryGainStep
[i
] = (DrySend
[i
]-ALSource
->DryGains
[i
]) / rampLength
;
929 DrySend
[i
] = ALSource
->DryGains
[i
];
931 for(i
= 0;i
< MAX_SENDS
;i
++)
933 wetGainStep
[i
] = (WetSend
[i
]-ALSource
->WetGains
[i
]) / rampLength
;
934 WetSend
[i
] = ALSource
->WetGains
[i
];
937 ALSource
->FirstStart
= AL_FALSE
;
939 /* Compute 18.14 fixed point step */
940 if(Pitch
> (float)MAX_PITCH
)
941 Pitch
= (float)MAX_PITCH
;
942 increment
= (ALint
)(Pitch
*(ALfloat
)(1L<<FRACTIONBITS
));
944 increment
= (1<<FRACTIONBITS
);
946 /* Figure out how many samples we can mix. */
947 DataSize64
= DataSize
;
948 DataSize64
<<= FRACTIONBITS
;
949 DataPos64
= DataPosInt
;
950 DataPos64
<<= FRACTIONBITS
;
951 DataPos64
+= DataPosFrac
;
952 BufferSize
= (ALuint
)((DataSize64
-DataPos64
+(increment
-1)) / increment
);
954 BufferListItem
= ALSource
->queue
;
955 for(i
= 0;i
< ALSource
->BuffersPlayed
&& BufferListItem
;i
++)
956 BufferListItem
= BufferListItem
->next
;
960 ALuint ulExtraSamples
;
962 if(BufferListItem
->next
)
964 NextBuf
= (ALbuffer
*)ALTHUNK_LOOKUPENTRY(BufferListItem
->next
->buffer
);
965 if(NextBuf
&& NextBuf
->data
)
967 ulExtraSamples
= min(NextBuf
->size
, (ALint
)(ALBuffer
->padding
*Channels
*2));
968 memcpy(&Data
[DataSize
*Channels
], NextBuf
->data
, ulExtraSamples
);
971 else if(ALSource
->bLooping
)
973 NextBuf
= (ALbuffer
*)ALTHUNK_LOOKUPENTRY(ALSource
->queue
->buffer
);
974 if(NextBuf
&& NextBuf
->data
)
976 ulExtraSamples
= min(NextBuf
->size
, (ALint
)(ALBuffer
->padding
*Channels
*2));
977 memcpy(&Data
[DataSize
*Channels
], NextBuf
->data
, ulExtraSamples
);
981 memset(&Data
[DataSize
*Channels
], 0, (ALBuffer
->padding
*Channels
*2));
983 BufferSize
= min(BufferSize
, (SamplesToDo
-j
));
985 /* Actual sample mixing loop */
987 Data
+= DataPosInt
*Channels
;
989 if(Channels
== 1) /* Mono */
995 for(i
= 0;i
< OUTPUTCHANNELS
;i
++)
996 DrySend
[i
] += dryGainStep
[i
];
997 for(i
= 0;i
< MAX_SENDS
;i
++)
998 WetSend
[i
] += wetGainStep
[i
];
1000 /* First order interpolator */
1001 value
= lerp(Data
[k
], Data
[k
+1], DataPosFrac
);
1003 /* Direct path final mix buffer and panning */
1004 outsamp
= lpFilter4P(DryFilter
, 0, value
);
1005 DryBuffer
[j
][FRONT_LEFT
] += outsamp
*DrySend
[FRONT_LEFT
];
1006 DryBuffer
[j
][FRONT_RIGHT
] += outsamp
*DrySend
[FRONT_RIGHT
];
1007 DryBuffer
[j
][SIDE_LEFT
] += outsamp
*DrySend
[SIDE_LEFT
];
1008 DryBuffer
[j
][SIDE_RIGHT
] += outsamp
*DrySend
[SIDE_RIGHT
];
1009 DryBuffer
[j
][BACK_LEFT
] += outsamp
*DrySend
[BACK_LEFT
];
1010 DryBuffer
[j
][BACK_RIGHT
] += outsamp
*DrySend
[BACK_RIGHT
];
1011 DryBuffer
[j
][FRONT_CENTER
] += outsamp
*DrySend
[FRONT_CENTER
];
1012 DryBuffer
[j
][BACK_CENTER
] += outsamp
*DrySend
[BACK_CENTER
];
1014 /* Room path final mix buffer and panning */
1015 for(i
= 0;i
< MAX_SENDS
;i
++)
1017 outsamp
= lpFilter2P(WetFilter
[i
], 0, value
);
1018 WetBuffer
[i
][j
] += outsamp
*WetSend
[i
];
1021 DataPosFrac
+= increment
;
1022 k
+= DataPosFrac
>>FRACTIONBITS
;
1023 DataPosFrac
&= FRACTIONMASK
;
1027 else if(Channels
== 2) /* Stereo */
1029 const int chans
[] = {
1030 FRONT_LEFT
, FRONT_RIGHT
1033 #define DO_MIX() do { \
1034 for(i = 0;i < MAX_SENDS;i++) \
1035 WetSend[i] += wetGainStep[i]*BufferSize; \
1036 while(BufferSize--) \
1038 for(i = 0;i < OUTPUTCHANNELS;i++) \
1039 DrySend[i] += dryGainStep[i]; \
1041 for(i = 0;i < Channels;i++) \
1043 value = lerp(Data[k*Channels + i], Data[(k+1)*Channels + i], DataPosFrac); \
1044 values[i] = lpFilter2P(DryFilter, chans[i]*2, value)*DrySend[chans[i]]; \
1046 for(out = 0;out < OUTPUTCHANNELS;out++) \
1048 ALfloat sum = 0.0f; \
1049 for(i = 0;i < Channels;i++) \
1050 sum += values[i]*Matrix[chans[i]][out]; \
1051 DryBuffer[j][out] += sum; \
1054 DataPosFrac += increment; \
1055 k += DataPosFrac>>FRACTIONBITS; \
1056 DataPosFrac &= FRACTIONMASK; \
1063 else if(Channels
== 4) /* Quad */
1065 const int chans
[] = {
1066 FRONT_LEFT
, FRONT_RIGHT
,
1067 BACK_LEFT
, BACK_RIGHT
1072 else if(Channels
== 6) /* 5.1 */
1074 const int chans
[] = {
1075 FRONT_LEFT
, FRONT_RIGHT
,
1077 BACK_LEFT
, BACK_RIGHT
1082 else if(Channels
== 7) /* 6.1 */
1084 const int chans
[] = {
1085 FRONT_LEFT
, FRONT_RIGHT
,
1088 SIDE_LEFT
, SIDE_RIGHT
1093 else if(Channels
== 8) /* 7.1 */
1095 const int chans
[] = {
1096 FRONT_LEFT
, FRONT_RIGHT
,
1098 BACK_LEFT
, BACK_RIGHT
,
1099 SIDE_LEFT
, SIDE_RIGHT
1107 for(i
= 0;i
< OUTPUTCHANNELS
;i
++)
1108 DrySend
[i
] += dryGainStep
[i
]*BufferSize
;
1109 for(i
= 0;i
< MAX_SENDS
;i
++)
1110 WetSend
[i
] += wetGainStep
[i
]*BufferSize
;
1113 DataPosFrac
+= increment
;
1114 k
+= DataPosFrac
>>FRACTIONBITS
;
1115 DataPosFrac
&= FRACTIONMASK
;
1121 /* Update source info */
1122 ALSource
->position
= DataPosInt
;
1123 ALSource
->position_fraction
= DataPosFrac
;
1124 for(i
= 0;i
< OUTPUTCHANNELS
;i
++)
1125 ALSource
->DryGains
[i
] = DrySend
[i
];
1126 for(i
= 0;i
< MAX_SENDS
;i
++)
1127 ALSource
->WetGains
[i
] = WetSend
[i
];
1130 /* Handle looping sources */
1131 if(!Buffer
|| DataPosInt
>= DataSize
)
1136 Looping
= ALSource
->bLooping
;
1137 if(ALSource
->BuffersPlayed
< (ALSource
->BuffersInQueue
-1))
1139 BufferListItem
= ALSource
->queue
;
1140 for(i
= 0;i
<= ALSource
->BuffersPlayed
&& BufferListItem
;i
++)
1143 BufferListItem
->bufferstate
= PROCESSED
;
1144 BufferListItem
= BufferListItem
->next
;
1147 ALSource
->ulBufferID
= BufferListItem
->buffer
;
1148 ALSource
->position
= DataPosInt
-DataSize
;
1149 ALSource
->position_fraction
= DataPosFrac
;
1150 ALSource
->BuffersPlayed
++;
1157 ALSource
->state
= AL_STOPPED
;
1158 ALSource
->inuse
= AL_FALSE
;
1159 ALSource
->BuffersPlayed
= ALSource
->BuffersInQueue
;
1160 BufferListItem
= ALSource
->queue
;
1161 while(BufferListItem
!= NULL
)
1163 BufferListItem
->bufferstate
= PROCESSED
;
1164 BufferListItem
= BufferListItem
->next
;
1166 ALSource
->position
= 0;
1167 ALSource
->position_fraction
= 0;
1171 /* alSourceRewind */
1173 ALSource
->state
= AL_PLAYING
;
1174 ALSource
->inuse
= AL_TRUE
;
1175 ALSource
->play
= AL_TRUE
;
1176 ALSource
->BuffersPlayed
= 0;
1177 BufferListItem
= ALSource
->queue
;
1178 while(BufferListItem
!= NULL
)
1180 BufferListItem
->bufferstate
= PENDING
;
1181 BufferListItem
= BufferListItem
->next
;
1183 ALSource
->ulBufferID
= ALSource
->queue
->buffer
;
1185 if(ALSource
->BuffersInQueue
== 1)
1186 ALSource
->position
= DataPosInt
%DataSize
;
1188 ALSource
->position
= DataPosInt
-DataSize
;
1189 ALSource
->position_fraction
= DataPosFrac
;
1195 /* Get source state */
1196 State
= ALSource
->state
;
1199 if((ALSource
=ALSource
->next
) != NULL
)
1200 goto another_source
;
1203 ALvoid
aluMixData(ALCdevice
*device
, ALvoid
*buffer
, ALsizei size
)
1205 static float DryBuffer
[BUFFERSIZE
][OUTPUTCHANNELS
];
1207 ALeffectslot
*ALEffectSlot
;
1208 ALCcontext
*ALContext
;
1212 SuspendContext(NULL
);
1214 #if defined(HAVE_FESETROUND)
1215 fpuState
= fegetround();
1216 fesetround(FE_TOWARDZERO
);
1217 #elif defined(HAVE__CONTROLFP)
1218 fpuState
= _controlfp(0, 0);
1219 _controlfp(_RC_CHOP
, _MCW_RC
);
1226 /* Setup variables */
1227 SamplesToDo
= min(size
, BUFFERSIZE
);
1229 /* Clear mixing buffer */
1230 memset(DryBuffer
, 0, SamplesToDo
*OUTPUTCHANNELS
*sizeof(ALfloat
));
1232 ALContext
= device
->Context
;
1235 MixSomeSources(ALContext
, DryBuffer
, SamplesToDo
);
1237 /* effect slot processing */
1238 ALEffectSlot
= ALContext
->AuxiliaryEffectSlot
;
1241 if(ALEffectSlot
->EffectState
)
1242 ALEffect_Process(ALEffectSlot
->EffectState
, ALEffectSlot
, SamplesToDo
, ALEffectSlot
->WetBuffer
, DryBuffer
);
1244 for(i
= 0;i
< SamplesToDo
;i
++)
1245 ALEffectSlot
->WetBuffer
[i
] = 0.0f
;
1246 ALEffectSlot
= ALEffectSlot
->next
;
1250 //Post processing loop
1251 switch(device
->Format
)
1253 #define CHECK_WRITE_FORMAT(bits, type, func, isWin) \
1254 case AL_FORMAT_MONO##bits: \
1255 for(i = 0;i < SamplesToDo;i++) \
1257 ((type*)buffer)[0] = (func)(DryBuffer[i][FRONT_LEFT] + \
1258 DryBuffer[i][FRONT_RIGHT]); \
1259 buffer = ((type*)buffer) + 1; \
1262 case AL_FORMAT_STEREO##bits: \
1265 for(i = 0;i < SamplesToDo;i++) \
1268 samples[0] = DryBuffer[i][FRONT_LEFT]; \
1269 samples[1] = DryBuffer[i][FRONT_RIGHT]; \
1270 bs2b_cross_feed(device->Bs2b, samples); \
1271 ((type*)buffer)[0] = (func)(samples[0]); \
1272 ((type*)buffer)[1] = (func)(samples[1]); \
1273 buffer = ((type*)buffer) + 2; \
1278 for(i = 0;i < SamplesToDo;i++) \
1280 ((type*)buffer)[0] = (func)(DryBuffer[i][FRONT_LEFT]); \
1281 ((type*)buffer)[1] = (func)(DryBuffer[i][FRONT_RIGHT]); \
1282 buffer = ((type*)buffer) + 2; \
1286 case AL_FORMAT_QUAD##bits: \
1287 for(i = 0;i < SamplesToDo;i++) \
1289 ((type*)buffer)[0] = (func)(DryBuffer[i][FRONT_LEFT]); \
1290 ((type*)buffer)[1] = (func)(DryBuffer[i][FRONT_RIGHT]); \
1291 ((type*)buffer)[2] = (func)(DryBuffer[i][BACK_LEFT]); \
1292 ((type*)buffer)[3] = (func)(DryBuffer[i][BACK_RIGHT]); \
1293 buffer = ((type*)buffer) + 4; \
1296 case AL_FORMAT_51CHN##bits: \
1297 for(i = 0;i < SamplesToDo;i++) \
1299 ((type*)buffer)[0] = (func)(DryBuffer[i][FRONT_LEFT]); \
1300 ((type*)buffer)[1] = (func)(DryBuffer[i][FRONT_RIGHT]); \
1302 /* Of course, Windows can't use the same ordering... */ \
1303 ((type*)buffer)[2] = (func)(DryBuffer[i][FRONT_CENTER]); \
1304 ((type*)buffer)[3] = (func)(DryBuffer[i][LFE]); \
1305 ((type*)buffer)[4] = (func)(DryBuffer[i][BACK_LEFT]); \
1306 ((type*)buffer)[5] = (func)(DryBuffer[i][BACK_RIGHT]); \
1308 ((type*)buffer)[2] = (func)(DryBuffer[i][BACK_LEFT]); \
1309 ((type*)buffer)[3] = (func)(DryBuffer[i][BACK_RIGHT]); \
1310 ((type*)buffer)[4] = (func)(DryBuffer[i][FRONT_CENTER]); \
1311 ((type*)buffer)[5] = (func)(DryBuffer[i][LFE]); \
1313 buffer = ((type*)buffer) + 6; \
1316 case AL_FORMAT_61CHN##bits: \
1317 for(i = 0;i < SamplesToDo;i++) \
1319 ((type*)buffer)[0] = (func)(DryBuffer[i][FRONT_LEFT]); \
1320 ((type*)buffer)[1] = (func)(DryBuffer[i][FRONT_RIGHT]); \
1321 ((type*)buffer)[2] = (func)(DryBuffer[i][FRONT_CENTER]); \
1322 ((type*)buffer)[3] = (func)(DryBuffer[i][LFE]); \
1323 ((type*)buffer)[4] = (func)(DryBuffer[i][BACK_CENTER]); \
1324 ((type*)buffer)[5] = (func)(DryBuffer[i][SIDE_LEFT]); \
1325 ((type*)buffer)[6] = (func)(DryBuffer[i][SIDE_RIGHT]); \
1326 buffer = ((type*)buffer) + 7; \
1329 case AL_FORMAT_71CHN##bits: \
1330 for(i = 0;i < SamplesToDo;i++) \
1332 ((type*)buffer)[0] = (func)(DryBuffer[i][FRONT_LEFT]); \
1333 ((type*)buffer)[1] = (func)(DryBuffer[i][FRONT_RIGHT]); \
1335 ((type*)buffer)[2] = (func)(DryBuffer[i][FRONT_CENTER]); \
1336 ((type*)buffer)[3] = (func)(DryBuffer[i][LFE]); \
1337 ((type*)buffer)[4] = (func)(DryBuffer[i][BACK_LEFT]); \
1338 ((type*)buffer)[5] = (func)(DryBuffer[i][BACK_RIGHT]); \
1340 ((type*)buffer)[2] = (func)(DryBuffer[i][BACK_LEFT]); \
1341 ((type*)buffer)[3] = (func)(DryBuffer[i][BACK_RIGHT]); \
1342 ((type*)buffer)[4] = (func)(DryBuffer[i][FRONT_CENTER]); \
1343 ((type*)buffer)[5] = (func)(DryBuffer[i][LFE]); \
1345 ((ALubyte*)buffer)[6] = (func)(DryBuffer[i][SIDE_LEFT]); \
1346 ((ALubyte*)buffer)[7] = (func)(DryBuffer[i][SIDE_RIGHT]); \
1347 buffer = ((type*)buffer) + 8; \
1351 #define AL_FORMAT_MONO32 AL_FORMAT_MONO_FLOAT32
1352 #define AL_FORMAT_STEREO32 AL_FORMAT_STEREO_FLOAT32
1354 CHECK_WRITE_FORMAT(8, ALubyte
, aluF2UB
, 1)
1355 CHECK_WRITE_FORMAT(16, ALshort
, aluF2S
, 1)
1356 CHECK_WRITE_FORMAT(32, ALfloat
, aluF2F
, 1)
1358 CHECK_WRITE_FORMAT(8, ALubyte
, aluF2UB
, 0)
1359 CHECK_WRITE_FORMAT(16, ALshort
, aluF2S
, 0)
1360 CHECK_WRITE_FORMAT(32, ALfloat
, aluF2F
, 0)
1362 #undef AL_FORMAT_STEREO32
1363 #undef AL_FORMAT_MONO32
1364 #undef CHECK_WRITE_FORMAT
1370 size
-= SamplesToDo
;
1373 #if defined(HAVE_FESETROUND)
1374 fesetround(fpuState
);
1375 #elif defined(HAVE__CONTROLFP)
1376 _controlfp(fpuState
, 0xfffff);
1379 ProcessContext(NULL
);
1382 ALvoid
aluHandleDisconnect(ALCdevice
*device
)
1388 SuspendContext(device
->Context
);
1390 source
= device
->Context
->Source
;
1393 if(source
->state
== AL_PLAYING
)
1395 ALbufferlistitem
*BufferListItem
;
1397 source
->state
= AL_STOPPED
;
1398 source
->inuse
= AL_FALSE
;
1399 source
->BuffersPlayed
= source
->BuffersInQueue
;
1400 BufferListItem
= source
->queue
;
1401 while(BufferListItem
!= NULL
)
1403 BufferListItem
->bufferstate
= PROCESSED
;
1404 BufferListItem
= BufferListItem
->next
;
1406 source
->position
= 0;
1407 source
->position_fraction
= 0;
1409 source
= source
->next
;
1411 ProcessContext(device
->Context
);
1414 device
->Connected
= ALC_FALSE
;