/* Function: al_detach_sample_instance
*/
bool al_detach_sample_instance(ALLEGRO_SAMPLE_INSTANCE *spl)
{
ASSERT(spl);
_al_kcm_detach_from_parent(spl);
return true;
}
/* Function: al_detach_audio_stream
*/
bool al_detach_audio_stream(ALLEGRO_AUDIO_STREAM *stream)
{
ASSERT(stream);
_al_kcm_detach_from_parent(&stream->spl);
ASSERT(stream->spl.spl_read == NULL);
return !al_get_audio_stream_attached(stream);
}
/* Internal function: _al_kcm_destroy_sample
*/
void _al_kcm_destroy_sample(ALLEGRO_SAMPLE_INSTANCE *spl, bool unregister)
{
if (spl) {
if (unregister) {
_al_kcm_unregister_destructor(spl);
}
_al_kcm_detach_from_parent(spl);
stream_free(spl);
}
}
/* Function: al_destroy_audio_stream
*/
void al_destroy_audio_stream(ALLEGRO_AUDIO_STREAM *stream)
{
if (stream) {
if (stream->feed_thread) {
stream->unload_feeder(stream);
}
/* See commented out call to _al_kcm_register_destructor. */
/* _al_kcm_unregister_destructor(stream); */
_al_kcm_detach_from_parent(&stream->spl);
al_destroy_user_event_source(&stream->spl.es);
al_free(stream->main_buffer);
al_free(stream->used_bufs);
al_free(stream);
}
}
/* Function: al_set_sample
*/
bool al_set_sample(ALLEGRO_SAMPLE_INSTANCE *spl, ALLEGRO_SAMPLE *data)
{
sample_parent_t old_parent;
bool need_reattach;
ASSERT(spl);
/* Stop the sample if it is playing. */
if (spl->is_playing) {
if (!al_set_sample_instance_playing(spl, false)) {
/* Shouldn't happen. */
ASSERT(false);
return false;
}
}
if (!data) {
if (spl->parent.u.ptr) {
_al_kcm_detach_from_parent(spl);
}
spl->spl_data.buffer.ptr = NULL;
return true;
}
/* Have data. */
need_reattach = false;
if (spl->parent.u.ptr != NULL) {
if (spl->spl_data.frequency != data->frequency ||
spl->spl_data.depth != data->depth ||
spl->spl_data.chan_conf != data->chan_conf) {
old_parent = spl->parent;
need_reattach = true;
_al_kcm_detach_from_parent(spl);
}
}
spl->spl_data = *data;
spl->spl_data.free_buf = false;
spl->pos = 0;
spl->loop_start = 0;
spl->loop_end = data->len;
/* Should we reset the loop mode? */
if (need_reattach) {
if (old_parent.is_voice) {
if (!al_attach_sample_instance_to_voice(spl, old_parent.u.voice)) {
spl->spl_data.buffer.ptr = NULL;
return false;
}
}
else {
if (!al_attach_sample_instance_to_mixer(spl, old_parent.u.mixer)) {
spl->spl_data.buffer.ptr = NULL;
return false;
}
}
}
return true;
}
