int alogg_play_ogg_ts(ALOGG_OGG *ogg, int buffer_len, int vol, int pan, int speed) {
int ret;
/* start playing Ogg at normal speed */
ret = alogg_play_ex_ogg(ogg, buffer_len, vol, pan, 1000, 0);
if (ret != ALOGG_OK)
return ret;
/* don't set up time stretching if we are playing at normal speed */
if (speed == 1000)
return ALOGG_OK;
ogg->time_stretch = 1;
ogg->time_stretch_buffer_samples = (buffer_len / (ogg->stereo ? 2 : 1)) / 2;
ogg->time_stretch_state = rubberband_new(ogg->freq, ogg->stereo ? 2 : 1, RubberBandOptionProcessRealTime | RubberBandOptionThreadingNever, 1000.0 / (float)speed, 1.0);
rubberband_set_max_process_size(ogg->time_stretch_state, ogg->time_stretch_buffer_samples);
ogg->time_stretch_buffer[0] = malloc(sizeof(float) * ogg->time_stretch_buffer_samples);
if (ogg->stereo)
ogg->time_stretch_buffer[1] = malloc(sizeof(float) * ogg->time_stretch_buffer_samples);
else
ogg->time_stretch_buffer[1] = NULL;
return ALOGG_OK;
}
static int
stream_callback (const void *input_buffer, void *output_buffer, unsigned long frames_per_buffer, const PaStreamCallbackTimeInfo * time_info, PaStreamCallbackFlags status_flags, void *user_data)
{
float **buffers = (float **) output_buffer;
#ifdef _HAVE_RUBBERBAND_
static gboolean initialized = FALSE;
if (!initialized) {
rubberband_set_max_process_size(rubberband, frames_per_buffer);
initialized = TRUE;
}
#endif
size_t i;
for (i = 0; i < 2; ++i)
{
memset (buffers[i], 0, frames_per_buffer * sizeof (float));
}
if (!ready)
return paContinue;
#ifdef _HAVE_FLUIDSYNTH_
if (reset_audio)
{
fluidsynth_all_notes_off ();
reset_synth_channels ();
reset_audio = FALSE;
return paContinue;
}
unsigned char event_data[MAX_MESSAGE_LENGTH]; //needs to be long enough for variable length messages...
size_t event_length = MAX_MESSAGE_LENGTH;
double event_time;
double until_time = nframes_to_seconds (playback_frame + frames_per_buffer);
#ifdef _HAVE_RUBBERBAND_
gint available = rubberband_available(rubberband);
if((!rubberband_active) || (available < (gint)frames_per_buffer)) {
#endif
while (read_event_from_queue (AUDIO_BACKEND, event_data, &event_length, &event_time, until_time/slowdown))
{//g_print("%x %x %x\n", event_data[0], event_data[1], event_data[2] );
fluidsynth_feed_midi (event_data, event_length); //in fluid.c note fluidsynth api ues fluid_synth_xxx these naming conventions are a bit too similar
}
fluidsynth_render_audio (frames_per_buffer, buffers[0], buffers[1]); //in fluid.c calls fluid_synth_write_float()
// Now get any audio to mix - dump it in the left hand channel for now
event_length = frames_per_buffer;
read_event_from_mixer_queue (AUDIO_BACKEND, (void *) buffers[1], &event_length);
#ifdef _HAVE_RUBBERBAND_
}
//if there is stuff available use it and give buffers[] to rubber band to process
if(rubberband_active)
{
if(available < (gint)frames_per_buffer)
rubberband_process(rubberband, (const float * const*)buffers, frames_per_buffer, 0);
available = rubberband_available(rubberband);
if(available >= (gint)frames_per_buffer)
{
rubberband_retrieve(rubberband, buffers, frames_per_buffer);//re-use buffers[] as they are available...
write_samples_to_rubberband_queue (AUDIO_BACKEND, buffers[0], frames_per_buffer);
write_samples_to_rubberband_queue (AUDIO_BACKEND, buffers[1], frames_per_buffer);
available -= frames_per_buffer;
}
event_length = frames_per_buffer;
read_event_from_rubberband_queue (AUDIO_BACKEND, (unsigned char *) buffers[0], &event_length);
event_length = frames_per_buffer;
read_event_from_rubberband_queue (AUDIO_BACKEND, (unsigned char *) buffers[1], &event_length);
}
#endif //_HAVE_RUBBERBAND_
if (until_time < get_playuntil ())
{
#endif //_HAVE_FLUIDSYNTH_
playback_frame += frames_per_buffer;
update_playback_time (TIMEBASE_PRIO_AUDIO, nframes_to_seconds (playback_frame));
#ifdef _HAVE_FLUIDSYNTH_
}
#endif //_HAVE_FLUIDSYNTH_
// This is probably a bad idea to do heavy work in an audio callback
record_audio(buffers, frames_per_buffer);
return paContinue;
}
