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     uint ref;
 549     ref = IncrementRef(&state->Ref);
 550     TRACEREF("%p increasing refcount to %u\n", state, ref);
 551 }
 552
 553 void ALeffectState_DecRef(ALeffectState *state)
 554 {
 555     uint ref;
 556     ref = DecrementRef(&state->Ref);
 557     TRACEREF("%p decreasing refcount to %u\n", state, ref);
 558     if(ref == 0) DELETE_OBJ(state);
 559 }
 560
 561
 562 void ALeffectState_Construct(ALeffectState *state)
 563 {
 564     InitRef(&state->Ref, 1);
 565
 566     state->OutBuffer = nullptr;
 567     state->OutChannels = 0;
 568 }
 569
 570 void ALeffectState_Destruct(ALeffectState *UNUSED(state))
 571 {
 572 }
 573
 574
 575 static void AddActiveEffectSlots(const ALuint *slotids, ALsizei count, ALCcontext *context)
 576 {
 577     struct ALeffectslotArray *curarray = ATOMIC_LOAD(&context->ActiveAuxSlots,
 578                                                      almemory_order_acquire);
 579     struct ALeffectslotArray *newarray = nullptr;
 580     ALsizei newcount = curarray->count + count;
 581     ALCdevice *device = context->Device;
 582     ALsizei i, j;
 583
 584     /* Insert the new effect slots into the head of the array, followed by the
 585      * existing ones.
 586      */
 587     newarray = static_cast<struct ALeffectslotArray*>(al_calloc(DEF_ALIGN,
 588         FAM_SIZE(struct ALeffectslotArray, slot, newcount)));
 589     newarray->count = newcount;
 590     for(i = 0;i < count;i++)
 591         newarray->slot[i] = LookupEffectSlot(context, slotids[i]);
 592     for(j = 0;i < newcount;)
 593         newarray->slot[i++] = curarray->slot[j++];
 594     /* Remove any duplicates (first instance of each will be kept). */
 595     for(i = 1;i < newcount;i++)
 596     {
 597         for(j = i;j != 0;)
 598         {
 599             if(UNLIKELY(newarray->slot[i] == newarray->slot[--j]))
 600             {
 601                 newcount--;
 602                 for(j = i;j < newcount;j++)
 603                     newarray->slot[j] = newarray->slot[j+1];
 604                 i--;
 605                 break;
 606             }
 607         }
 608     }
 609
 610     /* Reallocate newarray if the new size ended up smaller from duplicate
 611      * removal.
 612      */
 613     if(UNLIKELY(newcount < newarray->count))
 614     {
 615         struct ALeffectslotArray *tmp = static_cast<struct ALeffectslotArray*>(al_calloc(DEF_ALIGN,
 616             FAM_SIZE(struct ALeffectslotArray, slot, newcount)));
 617         memcpy(tmp, newarray, FAM_SIZE(struct ALeffectslotArray, slot, newcount));
 618         al_free(newarray);
 619         newarray = tmp;
 620         newarray->count = newcount;
 621     }
 622
 623     curarray = ATOMIC_EXCHANGE(&context->ActiveAuxSlots, newarray, almemory_order_acq_rel);
 624     while((ATOMIC_LOAD(&device->MixCount, almemory_order_acquire)&1))
 625         althrd_yield();
 626     al_free(curarray);
 627 }
 628
 629 static void RemoveActiveEffectSlots(const ALuint *slotids, ALsizei count, ALCcontext *context)
 630 {
 631     struct ALeffectslotArray *curarray = ATOMIC_LOAD(&context->ActiveAuxSlots,
 632                                                      almemory_order_acquire);
 633     struct ALeffectslotArray *newarray = nullptr;
 634     ALCdevice *device = context->Device;
 635     ALsizei i, j;
 636
 637     /* Don't shrink the allocated array size since we don't know how many (if
 638      * any) of the effect slots to remove are in the array.
 639      */
 640     newarray = static_cast<struct ALeffectslotArray*>(al_calloc(DEF_ALIGN,
 641         FAM_SIZE(struct ALeffectslotArray, slot, curarray->count)));
 642     newarray->count = 0;
 643     for(i = 0;i < curarray->count;i++)
 644     {
 645         /* Insert this slot into the new array only if it's not one to remove. */
 646         ALeffectslot *slot = curarray->slot[i];
 647         for(j = count;j != 0;)
 648         {
 649             if(slot->id == slotids[--j])
 650                 goto skip_ins;
 651         }
 652         newarray->slot[newarray->count++] = slot;
 653     skip_ins: ;
 654     }
 655
 656     /* TODO: Could reallocate newarray now that we know it's needed size. */
 657
 658     curarray = ATOMIC_EXCHANGE(&context->ActiveAuxSlots, newarray, almemory_order_acq_rel);
 659     while((ATOMIC_LOAD(&device->MixCount, almemory_order_acquire)&1))
 660         althrd_yield();
 661     al_free(curarray);
 662 }
 663
 664
 665 ALenum InitEffectSlot(ALeffectslot *slot)
 666 {
 667     EffectStateFactory *factory{getFactoryByType(slot->Effect.Type)};
 668     slot->Effect.State = EffectStateFactory_create(factory);
 669     if(!slot->Effect.State) return AL_OUT_OF_MEMORY;
 670
 671     ALeffectState_IncRef(slot->Effect.State);
 672     slot->Params.EffectState = slot->Effect.State;
 673     return AL_NO_ERROR;
 674 }
 675
 676 ALeffectslot::~ALeffectslot()
 677 {
 678     struct ALeffectslotProps *props{Update.load()};
 679     if(props)
 680     {
 681         if(props->State) ALeffectState_DecRef(props->State);
 682         TRACE("Freed unapplied AuxiliaryEffectSlot update %p\n", props);
 683         al_free(props);
 684     }
 685
 686     if(Effect.State)
 687         ALeffectState_DecRef(Effect.State);
 688     if(Params.EffectState)
 689         ALeffectState_DecRef(Params.EffectState);
 690 }
 691
 692 void UpdateEffectSlotProps(ALeffectslot *slot, ALCcontext *context)
 693 {
 694     struct ALeffectslotProps *props;
 695     ALeffectState *oldstate;
 696
 697     /* Get an unused property container, or allocate a new one as needed. */
 698     props = ATOMIC_LOAD(&context->FreeEffectslotProps, almemory_order_relaxed);
 699     if(!props)
 700         props = static_cast<ALeffectslotProps*>(al_calloc(16, sizeof(*props)));
 701     else
 702     {
 703         struct ALeffectslotProps *next;
 704         do {
 705             next = ATOMIC_LOAD(&props->next, almemory_order_relaxed);
 706         } while(ATOMIC_COMPARE_EXCHANGE_WEAK(&context->FreeEffectslotProps, &props, next,
 707                 almemory_order_seq_cst, almemory_order_acquire) == 0);
 708     }
 709
 710     /* Copy in current property values. */
 711     props->Gain = slot->Gain;
 712     props->AuxSendAuto = slot->AuxSendAuto;
 713
 714     props->Type = slot->Effect.Type;
 715     props->Props = slot->Effect.Props;
 716     /* Swap out any stale effect state object there may be in the container, to
 717      * delete it.
 718      */
 719     ALeffectState_IncRef(slot->Effect.State);
 720     oldstate = props->State;
 721     props->State = slot->Effect.State;
 722
 723     /* Set the new container for updating internal parameters. */
 724     props = ATOMIC_EXCHANGE(&slot->Update, props, almemory_order_acq_rel);
 725     if(props)
 726     {
 727         /* If there was an unused update container, put it back in the
 728          * freelist.
 729          */
 730         if(props->State)
 731             ALeffectState_DecRef(props->State);
 732         props->State = nullptr;
 733         ATOMIC_REPLACE_HEAD(struct ALeffectslotProps*, &context->FreeEffectslotProps, props);
 734     }
 735
 736     if(oldstate)
 737         ALeffectState_DecRef(oldstate);
 738 }
 739
 740 void UpdateAllEffectSlotProps(ALCcontext *context)
 741 {
 742     struct ALeffectslotArray *auxslots;
 743     ALsizei i;
 744
 745     LockEffectSlotList(context);
 746     auxslots = ATOMIC_LOAD(&context->ActiveAuxSlots, almemory_order_acquire);
 747     for(i = 0;i < auxslots->count;i++)
 748     {
 749         ALeffectslot *slot = auxslots->slot[i];
 750         if(!ATOMIC_EXCHANGE(&slot->PropsClean, AL_TRUE, almemory_order_acq_rel))
 751             UpdateEffectSlotProps(slot, context);
 752     }
 753     UnlockEffectSlotList(context);
 754 }
 755
 756 ALvoid ReleaseALAuxiliaryEffectSlots(ALCcontext *context)
 757 {
 758     size_t leftover = 0;
 759     for(auto &entry : context->EffectSlotList)
 760     {
 761         if(!entry) continue;
 762         delete entry;
 763         entry = nullptr;
 764
 765         ++leftover;
 766     }
 767     if(leftover > 0)
 768         WARN("(%p) Deleted " SZFMT " AuxiliaryEffectSlot%s\n", context, leftover, (leftover==1)?"":"s");
 769 }