OpenAL32/alPreset.c

   1
   2 #include "config.h"
   3
   4 #include <stdlib.h>
   5 #include <string.h>
   6
   7 #include "alMain.h"
   8 #include "alMidi.h"
   9 #include "alError.h"
  10 #include "alThunk.h"
  11
  12 #include "midi/base.h"
  13
  14
  15 extern inline struct ALsfpreset *LookupPreset(ALCdevice *device, ALuint id);
  16 extern inline struct ALsfpreset *RemovePreset(ALCdevice *device, ALuint id);
  17
  18 static void ALsfpreset_Construct(ALsfpreset *self);
  19 static void ALsfpreset_Destruct(ALsfpreset *self);
  20
  21
  22 AL_API void AL_APIENTRY alGenPresetsSOFT(ALsizei n, ALuint *ids)
  23 {
  24     ALCcontext *context;
  25     ALsizei cur = 0;
  26
  27     context = GetContextRef();
  28     if(!context) return;
  29
  30     if(!(n >= 0))
  31         SET_ERROR_AND_GOTO(context, AL_INVALID_VALUE, done);
  32
  33     for(cur = 0;cur < n;cur++)
  34     {
  35         ALsfpreset *preset = NewPreset(context);
  36         if(!preset)
  37         {
  38             alDeletePresetsSOFT(cur, ids);
  39             break;
  40         }
  41
  42         ids[cur] = preset->id;
  43     }
  44
  45 done:
  46     ALCcontext_DecRef(context);
  47 }
  48
  49 AL_API ALvoid AL_APIENTRY alDeletePresetsSOFT(ALsizei n, const ALuint *ids)
  50 {
  51     ALCdevice *device;
  52     ALCcontext *context;
  53     ALsfpreset *preset;
  54     ALsizei i;
  55
  56     context = GetContextRef();
  57     if(!context) return;
  58
  59     if(!(n >= 0))
  60         SET_ERROR_AND_GOTO(context, AL_INVALID_VALUE, done);
  61
  62     device = context->Device;
  63     for(i = 0;i < n;i++)
  64     {
  65         /* Check for valid ID */
  66         if((preset=LookupPreset(device, ids[i])) == NULL)
  67             SET_ERROR_AND_GOTO(context, AL_INVALID_NAME, done);
  68         if(ReadRef(&preset->ref) != 0)
  69             SET_ERROR_AND_GOTO(context, AL_INVALID_OPERATION, done);
  70     }
  71
  72     for(i = 0;i < n;i++)
  73     {
  74         if((preset=LookupPreset(device, ids[i])) != NULL)
  75             DeletePreset(device, preset);
  76     }
  77
  78 done:
  79     ALCcontext_DecRef(context);
  80 }
  81
  82 AL_API ALboolean AL_APIENTRY alIsPresetSOFT(ALuint id)
  83 {
  84     ALCcontext *context;
  85     ALboolean ret;
  86
  87     context = GetContextRef();
  88     if(!context) return AL_FALSE;
  89
  90     ret = LookupPreset(context->Device, id) ? AL_TRUE : AL_FALSE;
  91
  92     ALCcontext_DecRef(context);
  93
  94     return ret;
  95 }
  96
  97 AL_API void AL_APIENTRY alPresetiSOFT(ALuint id, ALenum param, ALint value)
  98 {
  99     ALCdevice *device;
 100     ALCcontext *context;
 101     ALsfpreset *preset;
 102
 103     context = GetContextRef();
 104     if(!context) return;
 105
 106     device = context->Device;
 107     if((preset=LookupPreset(device, id)) == NULL)
 108         SET_ERROR_AND_GOTO(context, AL_INVALID_NAME, done);
 109     if(ReadRef(&preset->ref) != 0)
 110         SET_ERROR_AND_GOTO(context, AL_INVALID_OPERATION, done);
 111     switch(param)
 112     {
 113         case AL_MIDI_PRESET_SOFT:
 114             if(!(value >= 0 && value <= 127))
 115                 SET_ERROR_AND_GOTO(context, AL_INVALID_VALUE, done);
 116             preset->Preset = value;
 117             break;
 118
 119         case AL_MIDI_BANK_SOFT:
 120             if(!(value >= 0 && value <= 128))
 121                 SET_ERROR_AND_GOTO(context, AL_INVALID_VALUE, done);
 122             preset->Bank = value;
 123             break;
 124
 125         default:
 126             SET_ERROR_AND_GOTO(context, AL_INVALID_ENUM, done);
 127     }
 128
 129 done:
 130     ALCcontext_DecRef(context);
 131 }
 132
 133 AL_API void AL_APIENTRY alPresetivSOFT(ALuint id, ALenum param, const ALint *values)
 134 {
 135     ALCdevice *device;
 136     ALCcontext *context;
 137     ALsfpreset *preset;
 138
 139     switch(param)
 140     {
 141         case AL_MIDI_PRESET_SOFT:
 142         case AL_MIDI_BANK_SOFT:
 143             alPresetiSOFT(id, param, values[0]);
 144             return;
 145     }
 146
 147     context = GetContextRef();
 148     if(!context) return;
 149
 150     device = context->Device;
 151     if((preset=LookupPreset(device, id)) == NULL)
 152         SET_ERROR_AND_GOTO(context, AL_INVALID_NAME, done);
 153     if(ReadRef(&preset->ref) != 0)
 154         SET_ERROR_AND_GOTO(context, AL_INVALID_OPERATION, done);
 155     switch(param)
 156     {
 157         default:
 158             SET_ERROR_AND_GOTO(context, AL_INVALID_ENUM, done);
 159     }
 160
 161 done:
 162     ALCcontext_DecRef(context);
 163 }
 164
 165 AL_API void AL_APIENTRY alGetPresetivSOFT(ALuint id, ALenum param, ALint *values)
 166 {
 167     ALCdevice *device;
 168     ALCcontext *context;
 169     ALsfpreset *preset;
 170     ALsizei i;
 171
 172     context = GetContextRef();
 173     if(!context) return;
 174
 175     device = context->Device;
 176     if((preset=LookupPreset(device, id)) == NULL)
 177         SET_ERROR_AND_GOTO(context, AL_INVALID_NAME, done);
 178     switch(param)
 179     {
 180         case AL_MIDI_PRESET_SOFT:
 181             values[0] = preset->Preset;
 182             break;
 183
 184         case AL_MIDI_BANK_SOFT:
 185             values[0] = preset->Bank;
 186             break;
 187
 188         case AL_FONTSOUNDS_SIZE_SOFT:
 189             values[0] = preset->NumSounds;
 190             break;
 191
 192         case AL_FONTSOUNDS_SOFT:
 193             for(i = 0;i < preset->NumSounds;i++)
 194                 values[i] = preset->Sounds[i]->id;
 195             break;
 196
 197         default:
 198             SET_ERROR_AND_GOTO(context, AL_INVALID_ENUM, done);
 199     }
 200
 201 done:
 202     ALCcontext_DecRef(context);
 203 }
 204
 205 AL_API void AL_APIENTRY alPresetFontsoundsSOFT(ALuint id, ALsizei count, const ALuint *fsids)
 206 {
 207     ALCdevice *device;
 208     ALCcontext *context;
 209     ALsfpreset *preset;
 210     ALfontsound **sounds;
 211     ALsizei i;
 212
 213     context = GetContextRef();
 214     if(!context) return;
 215
 216     device = context->Device;
 217     if(!(preset=LookupPreset(device, id)))
 218         SET_ERROR_AND_GOTO(context, AL_INVALID_NAME, done);
 219     if(count < 0)
 220         SET_ERROR_AND_GOTO(context, AL_INVALID_VALUE, done);
 221
 222     if(ReadRef(&preset->ref) != 0)
 223         SET_ERROR_AND_GOTO(context, AL_INVALID_OPERATION, done);
 224
 225     if(count == 0)
 226         sounds = NULL;
 227     else
 228     {
 229         sounds = calloc(count, sizeof(sounds[0]));
 230         if(!sounds)
 231             SET_ERROR_AND_GOTO(context, AL_OUT_OF_MEMORY, done);
 232
 233         for(i = 0;i < count;i++)
 234         {
 235             if(!(sounds[i]=LookupFontsound(device, fsids[i])))
 236             {
 237                 free(sounds);
 238                 SET_ERROR_AND_GOTO(context, AL_INVALID_VALUE, done);
 239             }
 240         }
 241     }
 242
 243     for(i = 0;i < count;i++)
 244         IncrementRef(&sounds[i]->ref);
 245
 246     sounds = ExchangePtr((XchgPtr*)&preset->Sounds, sounds);
 247     count = ExchangeInt(&preset->NumSounds, count);
 248
 249     for(i = 0;i < count;i++)
 250         DecrementRef(&sounds[i]->ref);
 251     free(sounds);
 252
 253 done:
 254     ALCcontext_DecRef(context);
 255 }
 256
 257
 258 ALsfpreset *NewPreset(ALCcontext *context)
 259 {
 260     ALCdevice *device = context->Device;
 261     ALsfpreset *preset;
 262     ALenum err;
 263
 264     preset = calloc(1, sizeof(*preset));
 265     if(!preset)
 266         SET_ERROR_AND_RETURN_VALUE(context, AL_OUT_OF_MEMORY, NULL);
 267     ALsfpreset_Construct(preset);
 268
 269     err = NewThunkEntry(&preset->id);
 270     if(err == AL_NO_ERROR)
 271         err = InsertUIntMapEntry(&device->PresetMap, preset->id, preset);
 272     if(err != AL_NO_ERROR)
 273     {
 274         ALsfpreset_Destruct(preset);
 275         memset(preset, 0, sizeof(*preset));
 276         free(preset);
 277
 278         SET_ERROR_AND_RETURN_VALUE(context, err, NULL);
 279     }
 280
 281     return preset;
 282 }
 283
 284 void DeletePreset(ALCdevice *device, ALsfpreset *preset)
 285 {
 286     RemovePreset(device, preset->id);
 287
 288     ALsfpreset_Destruct(preset);
 289     memset(preset, 0, sizeof(*preset));
 290     free(preset);
 291 }
 292
 293
 294 static void ALsfpreset_Construct(ALsfpreset *self)
 295 {
 296     InitRef(&self->ref, 0);
 297
 298     self->Preset = 0;
 299     self->Bank = 0;
 300
 301     self->Sounds = NULL;
 302     self->NumSounds = 0;
 303
 304     self->id = 0;
 305 }
 306
 307 static void ALsfpreset_Destruct(ALsfpreset *self)
 308 {
 309     ALsizei i;
 310
 311     FreeThunkEntry(self->id);
 312     self->id = 0;
 313
 314     for(i = 0;i < self->NumSounds;i++)
 315         DecrementRef(&self->Sounds[i]->ref);
 316     free(self->Sounds);
 317     self->Sounds = NULL;
 318     self->NumSounds = 0;
 319 }
 320
 321
 322 /* ReleaseALPresets
 323  *
 324  * Called to destroy any presets that still exist on the device
 325  */
 326 void ReleaseALPresets(ALCdevice *device)
 327 {
 328     ALsizei i;
 329     for(i = 0;i < device->PresetMap.size;i++)
 330     {
 331         ALsfpreset *temp = device->PresetMap.array[i].value;
 332         device->PresetMap.array[i].value = NULL;
 333
 334         ALsfpreset_Destruct(temp);
 335
 336         memset(temp, 0, sizeof(*temp));
 337         free(temp);
 338     }
 339 }