OpenAL32/alAuxEffectSlot.cpp

   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.,
  17  *  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18  * Or go to http://www.gnu.org/copyleft/lgpl.html
  19  */
  20
  21 #include "config.h"
  22
  23 #include <stdlib.h>
  24 #include <math.h>
  25
  26 #include <algorithm>
  27
  28 #include "AL/al.h"
  29 #include "AL/alc.h"
  30
  31 #include "alMain.h"
  32 #include "alcontext.h"
  33 #include "alAuxEffectSlot.h"
  34 #include "alError.h"
  35 #include "alListener.h"
  36 #include "alSource.h"
  37
  38 #include "fpu_modes.h"
  39 #include "almalloc.h"
  40
  41
  42 static void AddActiveEffectSlots(const ALuint *slotids, ALsizei count, ALCcontext *context);
  43 static void RemoveActiveEffectSlots(const ALuint *slotids, ALsizei count, ALCcontext *context);
  44
  45 static const struct {
  46     ALenum Type;
  47     EffectStateFactory* (*GetFactory)(void);
  48 } FactoryList[] = {
  49     { AL_EFFECT_NULL, NullStateFactory_getFactory },
  50     { AL_EFFECT_EAXREVERB, ReverbStateFactory_getFactory },
  51     { AL_EFFECT_REVERB, ReverbStateFactory_getFactory },
  52     { AL_EFFECT_AUTOWAH, AutowahStateFactory_getFactory },
  53     { AL_EFFECT_CHORUS, ChorusStateFactory_getFactory },
  54     { AL_EFFECT_COMPRESSOR, CompressorStateFactory_getFactory },
  55     { AL_EFFECT_DISTORTION, DistortionStateFactory_getFactory },
  56     { AL_EFFECT_ECHO, EchoStateFactory_getFactory },
  57     { AL_EFFECT_EQUALIZER, EqualizerStateFactory_getFactory },
  58     { AL_EFFECT_FLANGER, FlangerStateFactory_getFactory },
  59     { AL_EFFECT_FREQUENCY_SHIFTER, FshifterStateFactory_getFactory },
  60     { AL_EFFECT_RING_MODULATOR, ModulatorStateFactory_getFactory },
  61     { AL_EFFECT_PITCH_SHIFTER, PshifterStateFactory_getFactory},
  62     { AL_EFFECT_DEDICATED_DIALOGUE, DedicatedStateFactory_getFactory },
  63     { AL_EFFECT_DEDICATED_LOW_FREQUENCY_EFFECT, DedicatedStateFactory_getFactory }
  64 };
  65
  66 static inline EffectStateFactory *getFactoryByType(ALenum type)
  67 {
  68     size_t i;
  69     for(i = 0;i < COUNTOF(FactoryList);i++)
  70     {
  71         if(FactoryList[i].Type == type)
  72             return FactoryList[i].GetFactory();
  73     }
  74     return nullptr;
  75 }
  76
  77 static void ALeffectState_IncRef(ALeffectState *state);
  78
  79
  80 static inline ALeffectslot *LookupEffectSlot(ALCcontext *context, ALuint id)
  81 {
  82     --id;
  83     if(UNLIKELY(id >= context->EffectSlotList.size()))
  84         return nullptr;
  85     return context->EffectSlotList[id];
  86 }
  87
  88 static inline ALeffect *LookupEffect(ALCdevice *device, ALuint id)
  89 {
  90     ALuint lidx = (id-1) >> 6;
  91     ALsizei slidx = (id-1) & 0x3f;
  92
  93     if(UNLIKELY(lidx >= device->EffectList.size()))
  94         return nullptr;
  95     EffectSubList &sublist = device->EffectList[lidx];
  96     if(UNLIKELY(sublist.FreeMask & (U64(1)<<slidx)))
  97         return nullptr;
  98     return sublist.Effects + slidx;
  99 }
 100
 101
 102 #define DO_UPDATEPROPS() do {                                                 \
 103     if(!ATOMIC_LOAD(&context->DeferUpdates, almemory_order_acquire))          \
 104         UpdateEffectSlotProps(slot, context);                                 \
 105     else                                                                      \
 106         ATOMIC_STORE(&slot->PropsClean, AL_FALSE, almemory_order_release);    \
 107 } while(0)
 108
 109
 110 AL_API ALvoid AL_APIENTRY alGenAuxiliaryEffectSlots(ALsizei n, ALuint *effectslots)
 111 {
 112     ALCdevice *device;
 113     ALCcontext *context;
 114     ALsizei cur;
 115
 116     context = GetContextRef();
 117     if(!context) return;
 118
 119     if(n < 0)
 120         SETERR_GOTO(context, AL_INVALID_VALUE, done, "Generating %d effect slots", n);
 121     if(n == 0) goto done;
 122
 123     LockEffectSlotList(context);
 124     device = context->Device;
 125     for(cur = 0;cur < n;cur++)
 126     {
 127         auto iter = std::find_if(context->EffectSlotList.begin(), context->EffectSlotList.end(),
 128             [](const ALeffectslotPtr &entry) noexcept -> bool
 129             { return !entry; }
 130         );
 131         if(iter == context->EffectSlotList.end())
 132         {
 133             if(device->AuxiliaryEffectSlotMax == context->EffectSlotList.size())
 134             {
 135                 UnlockEffectSlotList(context);
 136                 alDeleteAuxiliaryEffectSlots(cur, effectslots);
 137                 SETERR_GOTO(context, AL_OUT_OF_MEMORY, done,
 138                     "Exceeding %u auxiliary effect slot limit", device->AuxiliaryEffectSlotMax);
 139             }
 140             context->EffectSlotList.emplace_back(nullptr);
 141             iter = context->EffectSlotList.end() - 1;
 142         }
 143
 144         auto slot = new ALeffectslot{};
 145         ALenum err{InitEffectSlot(slot)};
 146         if(err != AL_NO_ERROR)
 147         {
 148             delete slot;
 149             UnlockEffectSlotList(context);
 150
 151             alDeleteAuxiliaryEffectSlots(cur, effectslots);
 152             SETERR_GOTO(context, err, done, "Effect slot object allocation failed");
 153         }
 154         aluInitEffectPanning(slot);
 155
 156         slot->id = std::distance(context->EffectSlotList.begin(), iter) + 1;
 157         *iter = slot;
 158
 159         effectslots[cur] = slot->id;
 160     }
 161     AddActiveEffectSlots(effectslots, n, context);
 162     UnlockEffectSlotList(context);
 163
 164 done:
 165     ALCcontext_DecRef(context);
 166 }
 167
 168 AL_API ALvoid AL_APIENTRY alDeleteAuxiliaryEffectSlots(ALsizei n, const ALuint *effectslots)
 169 {
 170     ALCcontext *context;
 171     ALeffectslot *slot;
 172     ALsizei i;
 173
 174     context = GetContextRef();
 175     if(!context) return;
 176
 177     LockEffectSlotList(context);
 178     if(n < 0)
 179         SETERR_GOTO(context, AL_INVALID_VALUE, done, "Deleting %d effect slots", n);
 180     if(n == 0) goto done;
 181
 182     for(i = 0;i < n;i++)
 183     {
 184         if((slot=LookupEffectSlot(context, effectslots[i])) == nullptr)
 185             SETERR_GOTO(context, AL_INVALID_NAME, done, "Invalid effect slot ID %u",
 186                         effectslots[i]);
 187         if(ReadRef(&slot->ref) != 0)
 188             SETERR_GOTO(context, AL_INVALID_NAME, done, "Deleting in-use effect slot %u",
 189                         effectslots[i]);
 190     }
 191
 192     // All effectslots are valid
 193     RemoveActiveEffectSlots(effectslots, n, context);
 194     for(i = 0;i < n;i++)
 195     {
 196         if((slot=LookupEffectSlot(context, effectslots[i])) == nullptr)
 197             continue;
 198         context->EffectSlotList[effectslots[i]-1] = nullptr;
 199
 200         delete slot;
 201     }
 202
 203 done:
 204     UnlockEffectSlotList(context);
 205     ALCcontext_DecRef(context);
 206 }
 207
 208 AL_API ALboolean AL_APIENTRY alIsAuxiliaryEffectSlot(ALuint effectslot)
 209 {
 210     ALCcontext *context;
 211     ALboolean  ret;
 212
 213     context = GetContextRef();
 214     if(!context) return AL_FALSE;
 215
 216     LockEffectSlotList(context);
 217     ret = (LookupEffectSlot(context, effectslot) ? AL_TRUE : AL_FALSE);
 218     UnlockEffectSlotList(context);
 219
 220     ALCcontext_DecRef(context);
 221
 222     return ret;
 223 }
 224
 225 AL_API ALvoid AL_APIENTRY alAuxiliaryEffectSloti(ALuint effectslot, ALenum param, ALint value)
 226 {
 227     ALCdevice *device;
 228     ALCcontext *context;
 229     ALeffectslot *slot;
 230     ALeffect *effect = nullptr;
 231     ALenum err;
 232
 233     context = GetContextRef();
 234     if(!context) return;
 235
 236     almtx_lock(&context->PropLock);
 237     LockEffectSlotList(context);
 238     if((slot=LookupEffectSlot(context, effectslot)) == nullptr)
 239         SETERR_GOTO(context, AL_INVALID_NAME, done, "Invalid effect slot ID %u", effectslot);
 240     switch(param)
 241     {
 242     case AL_EFFECTSLOT_EFFECT:
 243         device = context->Device;
 244
 245         LockEffectList(device);
 246         effect = (value ? LookupEffect(device, value) : nullptr);
 247         if(!(value == 0 || effect != nullptr))
 248         {
 249             UnlockEffectList(device);
 250             SETERR_GOTO(context, AL_INVALID_VALUE, done, "Invalid effect ID %u", value);
 251         }
 252         err = InitializeEffect(context, slot, effect);
 253         UnlockEffectList(device);
 254
 255         if(err != AL_NO_ERROR)
 256             SETERR_GOTO(context, err, done, "Effect initialization failed");
 257         break;
 258
 259     case AL_EFFECTSLOT_AUXILIARY_SEND_AUTO:
 260         if(!(value == AL_TRUE || value == AL_FALSE))
 261             SETERR_GOTO(context, AL_INVALID_VALUE, done,
 262                         "Effect slot auxiliary send auto out of range");
 263         slot->AuxSendAuto = value;
 264         break;
 265
 266     default:
 267         SETERR_GOTO(context, AL_INVALID_ENUM, done, "Invalid effect slot integer property 0x%04x",
 268                     param);
 269     }
 270     DO_UPDATEPROPS();
 271
 272 done:
 273     UnlockEffectSlotList(context);
 274     almtx_unlock(&context->PropLock);
 275     ALCcontext_DecRef(context);
 276 }
 277
 278 AL_API ALvoid AL_APIENTRY alAuxiliaryEffectSlotiv(ALuint effectslot, ALenum param, const ALint *values)
 279 {
 280     ALCcontext *context;
 281
 282     switch(param)
 283     {
 284     case AL_EFFECTSLOT_EFFECT:
 285     case AL_EFFECTSLOT_AUXILIARY_SEND_AUTO:
 286         alAuxiliaryEffectSloti(effectslot, param, values[0]);
 287         return;
 288     }
 289
 290     context = GetContextRef();
 291     if(!context) return;
 292
 293     LockEffectSlotList(context);
 294     if(LookupEffectSlot(context, effectslot) == nullptr)
 295         SETERR_GOTO(context, AL_INVALID_NAME, done, "Invalid effect slot ID %u", effectslot);
 296     switch(param)
 297     {
 298     default:
 299         alSetError(context, AL_INVALID_ENUM, "Invalid effect slot integer-vector property 0x%04x",
 300                    param);
 301     }
 302
 303 done:
 304     UnlockEffectSlotList(context);
 305     ALCcontext_DecRef(context);
 306 }
 307
 308 AL_API ALvoid AL_APIENTRY alAuxiliaryEffectSlotf(ALuint effectslot, ALenum param, ALfloat value)
 309 {
 310     ALCcontext *context;
 311     ALeffectslot *slot;
 312
 313     context = GetContextRef();
 314     if(!context) return;
 315
 316     almtx_lock(&context->PropLock);
 317     LockEffectSlotList(context);
 318     if((slot=LookupEffectSlot(context, effectslot)) == nullptr)
 319         SETERR_GOTO(context, AL_INVALID_NAME, done, "Invalid effect slot ID %u", effectslot);
 320     switch(param)
 321     {
 322     case AL_EFFECTSLOT_GAIN:
 323         if(!(value >= 0.0f && value <= 1.0f))
 324             SETERR_GOTO(context, AL_INVALID_VALUE, done, "Effect slot gain out of range");
 325         slot->Gain = value;
 326         break;
 327
 328     default:
 329         SETERR_GOTO(context, AL_INVALID_ENUM, done, "Invalid effect slot float property 0x%04x",
 330                     param);
 331     }
 332     DO_UPDATEPROPS();
 333
 334 done:
 335     UnlockEffectSlotList(context);
 336     almtx_unlock(&context->PropLock);
 337     ALCcontext_DecRef(context);
 338 }
 339
 340 AL_API ALvoid AL_APIENTRY alAuxiliaryEffectSlotfv(ALuint effectslot, ALenum param, const ALfloat *values)
 341 {
 342     ALCcontext *context;
 343
 344     switch(param)
 345     {
 346     case AL_EFFECTSLOT_GAIN:
 347         alAuxiliaryEffectSlotf(effectslot, param, values[0]);
 348         return;
 349     }
 350
 351     context = GetContextRef();
 352     if(!context) return;
 353
 354     LockEffectSlotList(context);
 355     if(LookupEffectSlot(context, effectslot) == nullptr)
 356         SETERR_GOTO(context, AL_INVALID_NAME, done, "Invalid effect slot ID %u", effectslot);
 357     switch(param)
 358     {
 359     default:
 360         alSetError(context, AL_INVALID_ENUM, "Invalid effect slot float-vector property 0x%04x",
 361                    param);
 362     }
 363
 364 done:
 365     UnlockEffectSlotList(context);
 366     ALCcontext_DecRef(context);
 367 }
 368
 369 AL_API ALvoid AL_APIENTRY alGetAuxiliaryEffectSloti(ALuint effectslot, ALenum param, ALint *value)
 370 {
 371     ALCcontext *context;
 372     ALeffectslot *slot;
 373
 374     context = GetContextRef();
 375     if(!context) return;
 376
 377     LockEffectSlotList(context);
 378     if((slot=LookupEffectSlot(context, effectslot)) == nullptr)
 379         SETERR_GOTO(context, AL_INVALID_NAME, done, "Invalid effect slot ID %u", effectslot);
 380     switch(param)
 381     {
 382     case AL_EFFECTSLOT_AUXILIARY_SEND_AUTO:
 383         *value = slot->AuxSendAuto;
 384         break;
 385
 386     default:
 387         alSetError(context, AL_INVALID_ENUM, "Invalid effect slot integer property 0x%04x", param);
 388     }
 389
 390 done:
 391     UnlockEffectSlotList(context);
 392     ALCcontext_DecRef(context);
 393 }
 394
 395 AL_API ALvoid AL_APIENTRY alGetAuxiliaryEffectSlotiv(ALuint effectslot, ALenum param, ALint *values)
 396 {
 397     ALCcontext *context;
 398
 399     switch(param)
 400     {
 401     case AL_EFFECTSLOT_EFFECT:
 402     case AL_EFFECTSLOT_AUXILIARY_SEND_AUTO:
 403         alGetAuxiliaryEffectSloti(effectslot, param, values);
 404         return;
 405     }
 406
 407     context = GetContextRef();
 408     if(!context) return;
 409
 410     LockEffectSlotList(context);
 411     if(LookupEffectSlot(context, effectslot) == nullptr)
 412         SETERR_GOTO(context, AL_INVALID_NAME, done, "Invalid effect slot ID %u", effectslot);
 413     switch(param)
 414     {
 415     default:
 416         alSetError(context, AL_INVALID_ENUM, "Invalid effect slot integer-vector property 0x%04x",
 417                    param);
 418     }
 419
 420 done:
 421     UnlockEffectSlotList(context);
 422     ALCcontext_DecRef(context);
 423 }
 424
 425 AL_API ALvoid AL_APIENTRY alGetAuxiliaryEffectSlotf(ALuint effectslot, ALenum param, ALfloat *value)
 426 {
 427     ALCcontext *context;
 428     ALeffectslot *slot;
 429
 430     context = GetContextRef();
 431     if(!context) return;
 432
 433     LockEffectSlotList(context);
 434     if((slot=LookupEffectSlot(context, effectslot)) == nullptr)
 435         SETERR_GOTO(context, AL_INVALID_NAME, done, "Invalid effect slot ID %u", effectslot);
 436     switch(param)
 437     {
 438     case AL_EFFECTSLOT_GAIN:
 439         *value = slot->Gain;
 440         break;
 441
 442     default:
 443         alSetError(context, AL_INVALID_ENUM, "Invalid effect slot float property 0x%04x", param);
 444     }
 445
 446 done:
 447     UnlockEffectSlotList(context);
 448     ALCcontext_DecRef(context);
 449 }
 450
 451 AL_API ALvoid AL_APIENTRY alGetAuxiliaryEffectSlotfv(ALuint effectslot, ALenum param, ALfloat *values)
 452 {
 453     ALCcontext *context;
 454
 455     switch(param)
 456     {
 457     case AL_EFFECTSLOT_GAIN:
 458         alGetAuxiliaryEffectSlotf(effectslot, param, values);
 459         return;
 460     }
 461
 462     context = GetContextRef();
 463     if(!context) return;
 464
 465     LockEffectSlotList(context);
 466     if(LookupEffectSlot(context, effectslot) == nullptr)
 467         SETERR_GOTO(context, AL_INVALID_NAME, done, "Invalid effect slot ID %u", effectslot);
 468     switch(param)
 469     {
 470     default:
 471         alSetError(context, AL_INVALID_ENUM, "Invalid effect slot float-vector property 0x%04x",
 472                    param);
 473     }
 474
 475 done:
 476     UnlockEffectSlotList(context);
 477     ALCcontext_DecRef(context);
 478 }
 479
 480
 481 ALenum InitializeEffect(ALCcontext *Context, ALeffectslot *EffectSlot, ALeffect *effect)
 482 {
 483     ALCdevice *Device = Context->Device;
 484     ALenum newtype = (effect ? effect->type : AL_EFFECT_NULL);
 485     struct ALeffectslotProps *props;
 486     ALeffectState *State;
 487
 488     if(newtype != EffectSlot->Effect.Type)
 489     {
 490         EffectStateFactory *factory;
 491
 492         factory = getFactoryByType(newtype);
 493         if(!factory)
 494         {
 495             ERR("Failed to find factory for effect type 0x%04x\n", newtype);
 496             return AL_INVALID_ENUM;
 497         }
 498         State = EffectStateFactory_create(factory);
 499         if(!State) return AL_OUT_OF_MEMORY;
 500
 501         START_MIXER_MODE();
 502         almtx_lock(&Device->BackendLock);
 503         State->OutBuffer = Device->Dry.Buffer;
 504         State->OutChannels = Device->Dry.NumChannels;
 505         if(V(State,deviceUpdate)(Device) == AL_FALSE)
 506         {
 507             almtx_unlock(&Device->BackendLock);
 508             LEAVE_MIXER_MODE();
 509             ALeffectState_DecRef(State);
 510             return AL_OUT_OF_MEMORY;
 511         }
 512         almtx_unlock(&Device->BackendLock);
 513         END_MIXER_MODE();
 514
 515         if(!effect)
 516         {
 517             EffectSlot->Effect.Type = AL_EFFECT_NULL;
 518             memset(&EffectSlot->Effect.Props, 0, sizeof(EffectSlot->Effect.Props));
 519         }
 520         else
 521         {
 522             EffectSlot->Effect.Type = effect->type;
 523             EffectSlot->Effect.Props = effect->Props;
 524         }
 525
 526         ALeffectState_DecRef(EffectSlot->Effect.State);
 527         EffectSlot->Effect.State = State;
 528     }
 529     else if(effect)
 530         EffectSlot->Effect.Props = effect->Props;
 531
 532     /* Remove state references from old effect slot property updates. */
 533     props = ATOMIC_LOAD_SEQ(&Context->FreeEffectslotProps);
 534     while(props)
 535     {
 536         if(props->State)
 537             ALeffectState_DecRef(props->State);
 538         props->State = nullptr;
 539         props = ATOMIC_LOAD(&props->next, almemory_order_relaxed);
 540     }
 541
 542     return AL_NO_ERROR;
 543 }
 544
 545
 546 static void ALeffectState_IncRef(ALeffectState *state)
 547 {
 548     auto ref = IncrementRef(&state->Ref);
 549     TRACEREF("%p increasing refcount to %u\n", state, ref);
 550 }
 551
 552 void ALeffectState_DecRef(ALeffectState *state)
 553 {
 554     auto ref = DecrementRef(&state->Ref);
 555     TRACEREF("%p decreasing refcount to %u\n", state, ref);
 556     if(ref == 0) DELETE_OBJ(state);
 557 }
 558
 559
 560 void ALeffectState_Construct(ALeffectState *state)
 561 {
 562     InitRef(&state->Ref, 1);
 563
 564     state->OutBuffer = nullptr;
 565     state->OutChannels = 0;
 566 }
 567
 568 void ALeffectState_Destruct(ALeffectState *UNUSED(state))
 569 {
 570 }
 571
 572
 573 static void AddActiveEffectSlots(const ALuint *slotids, ALsizei count, ALCcontext *context)
 574 {
 575     struct ALeffectslotArray *curarray = ATOMIC_LOAD(&context->ActiveAuxSlots,
 576                                                      almemory_order_acquire);
 577     struct ALeffectslotArray *newarray = nullptr;
 578     ALsizei newcount = curarray->count + count;
 579     ALCdevice *device = context->Device;
 580     ALsizei i, j;
 581
 582     /* Insert the new effect slots into the head of the array, followed by the
 583      * existing ones.
 584      */
 585     newarray = static_cast<struct ALeffectslotArray*>(al_calloc(DEF_ALIGN,
 586         FAM_SIZE(struct ALeffectslotArray, slot, newcount)));
 587     newarray->count = newcount;
 588     for(i = 0;i < count;i++)
 589         newarray->slot[i] = LookupEffectSlot(context, slotids[i]);
 590     for(j = 0;i < newcount;)
 591         newarray->slot[i++] = curarray->slot[j++];
 592     /* Remove any duplicates (first instance of each will be kept). */
 593     for(i = 1;i < newcount;i++)
 594     {
 595         for(j = i;j != 0;)
 596         {
 597             if(UNLIKELY(newarray->slot[i] == newarray->slot[--j]))
 598             {
 599                 newcount--;
 600                 for(j = i;j < newcount;j++)
 601                     newarray->slot[j] = newarray->slot[j+1];
 602                 i--;
 603                 break;
 604             }
 605         }
 606     }
 607
 608     /* Reallocate newarray if the new size ended up smaller from duplicate
 609      * removal.
 610      */
 611     if(UNLIKELY(newcount < newarray->count))
 612     {
 613         struct ALeffectslotArray *tmp = static_cast<struct ALeffectslotArray*>(al_calloc(DEF_ALIGN,
 614             FAM_SIZE(struct ALeffectslotArray, slot, newcount)));
 615         memcpy(tmp, newarray, FAM_SIZE(struct ALeffectslotArray, slot, newcount));
 616         al_free(newarray);
 617         newarray = tmp;
 618         newarray->count = newcount;
 619     }
 620
 621     curarray = context->ActiveAuxSlots.exchange(newarray, std::memory_order_acq_rel);
 622     while((ATOMIC_LOAD(&device->MixCount, almemory_order_acquire)&1))
 623         althrd_yield();
 624     al_free(curarray);
 625 }
 626
 627 static void RemoveActiveEffectSlots(const ALuint *slotids, ALsizei count, ALCcontext *context)
 628 {
 629     struct ALeffectslotArray *curarray = ATOMIC_LOAD(&context->ActiveAuxSlots,
 630                                                      almemory_order_acquire);
 631     struct ALeffectslotArray *newarray = nullptr;
 632     ALCdevice *device = context->Device;
 633     ALsizei i, j;
 634
 635     /* Don't shrink the allocated array size since we don't know how many (if
 636      * any) of the effect slots to remove are in the array.
 637      */
 638     newarray = static_cast<struct ALeffectslotArray*>(al_calloc(DEF_ALIGN,
 639         FAM_SIZE(struct ALeffectslotArray, slot, curarray->count)));
 640     newarray->count = 0;
 641     for(i = 0;i < curarray->count;i++)
 642     {
 643         /* Insert this slot into the new array only if it's not one to remove. */
 644         ALeffectslot *slot = curarray->slot[i];
 645         for(j = count;j != 0;)
 646         {
 647             if(slot->id == slotids[--j])
 648                 goto skip_ins;
 649         }
 650         newarray->slot[newarray->count++] = slot;
 651     skip_ins: ;
 652     }
 653
 654     /* TODO: Could reallocate newarray now that we know it's needed size. */
 655
 656     curarray = context->ActiveAuxSlots.exchange(newarray, std::memory_order_acq_rel);
 657     while((ATOMIC_LOAD(&device->MixCount, almemory_order_acquire)&1))
 658         althrd_yield();
 659     al_free(curarray);
 660 }
 661
 662
 663 ALenum InitEffectSlot(ALeffectslot *slot)
 664 {
 665     EffectStateFactory *factory{getFactoryByType(slot->Effect.Type)};
 666     slot->Effect.State = EffectStateFactory_create(factory);
 667     if(!slot->Effect.State) return AL_OUT_OF_MEMORY;
 668
 669     ALeffectState_IncRef(slot->Effect.State);
 670     slot->Params.EffectState = slot->Effect.State;
 671     return AL_NO_ERROR;
 672 }
 673
 674 ALeffectslot::~ALeffectslot()
 675 {
 676     struct ALeffectslotProps *props{Update.load()};
 677     if(props)
 678     {
 679         if(props->State) ALeffectState_DecRef(props->State);
 680         TRACE("Freed unapplied AuxiliaryEffectSlot update %p\n", props);
 681         al_free(props);
 682     }
 683
 684     if(Effect.State)
 685         ALeffectState_DecRef(Effect.State);
 686     if(Params.EffectState)
 687         ALeffectState_DecRef(Params.EffectState);
 688 }
 689
 690 void UpdateEffectSlotProps(ALeffectslot *slot, ALCcontext *context)
 691 {
 692     struct ALeffectslotProps *props;
 693     ALeffectState *oldstate;
 694
 695     /* Get an unused property container, or allocate a new one as needed. */
 696     props = context->FreeEffectslotProps.load(std::memory_order_relaxed);
 697     if(!props)
 698         props = static_cast<ALeffectslotProps*>(al_calloc(16, sizeof(*props)));
 699     else
 700     {
 701         struct ALeffectslotProps *next;
 702         do {
 703             next = props->next.load(std::memory_order_relaxed);
 704         } while(context->FreeEffectslotProps.compare_exchange_weak(props, next,
 705                 std::memory_order_seq_cst, std::memory_order_acquire) == 0);
 706     }
 707
 708     /* Copy in current property values. */
 709     props->Gain = slot->Gain;
 710     props->AuxSendAuto = slot->AuxSendAuto;
 711
 712     props->Type = slot->Effect.Type;
 713     props->Props = slot->Effect.Props;
 714     /* Swap out any stale effect state object there may be in the container, to
 715      * delete it.
 716      */
 717     ALeffectState_IncRef(slot->Effect.State);
 718     oldstate = props->State;
 719     props->State = slot->Effect.State;
 720
 721     /* Set the new container for updating internal parameters. */
 722     props = slot->Update.exchange(props, std::memory_order_acq_rel);
 723     if(props)
 724     {
 725         /* If there was an unused update container, put it back in the
 726          * freelist.
 727          */
 728         if(props->State)
 729             ALeffectState_DecRef(props->State);
 730         props->State = nullptr;
 731         AtomicReplaceHead(context->FreeEffectslotProps, props);
 732     }
 733
 734     if(oldstate)
 735         ALeffectState_DecRef(oldstate);
 736 }
 737
 738 void UpdateAllEffectSlotProps(ALCcontext *context)
 739 {
 740     struct ALeffectslotArray *auxslots;
 741     ALsizei i;
 742
 743     LockEffectSlotList(context);
 744     auxslots = context->ActiveAuxSlots.load(std::memory_order_acquire);
 745     for(i = 0;i < auxslots->count;i++)
 746     {
 747         ALeffectslot *slot = auxslots->slot[i];
 748         if(!slot->PropsClean.exchange(AL_TRUE, std::memory_order_acq_rel))
 749             UpdateEffectSlotProps(slot, context);
 750     }
 751     UnlockEffectSlotList(context);
 752 }
 753
 754 ALvoid ReleaseALAuxiliaryEffectSlots(ALCcontext *context)
 755 {
 756     size_t leftover = 0;
 757     for(auto &entry : context->EffectSlotList)
 758     {
 759         if(!entry) continue;
 760         delete entry;
 761         entry = nullptr;
 762
 763         ++leftover;
 764     }
 765     if(leftover > 0)
 766         WARN("(%p) Deleted " SZFMT " AuxiliaryEffectSlot%s\n", context, leftover, (leftover==1)?"":"s");
 767 }