Towards fixing AU preset invalidation
[ardour.git] / libs / ardour / session_vst.cc
index 23cf0f8b001fa96edf9117907cf726ea2e720d91..b4a584b1831dfa0277b54c03f2abb67c81fae933 100644 (file)
 #include "ardour/tempo.h"
 #include "ardour/plugin_insert.h"
 #include "ardour/windows_vst_plugin.h"
-#include "ardour/vestige/aeffectx.h"
+#include "ardour/vestige/vestige.h"
 #include "ardour/vst_types.h"
 #ifdef WINDOWS_VST_SUPPORT
 #include <fst.h>
 #endif
 
-#include "i18n.h"
+#include "pbd/i18n.h"
 
 using namespace ARDOUR;
 
 #define SHOW_CALLBACK(MSG) DEBUG_TRACE (PBD::DEBUG::VSTCallbacks, string_compose (MSG " val = %1 idx = %2\n", index, value))
 
-static double
-vst_ppq (const TempoMetric& tm, const Timecode::BBT_Time& bbt, double& ppqBar)
-{
-
-       /* PPQ = pulse per quarter
-        * VST's "pulse" is our "division".
-        *
-        * 8 divisions per bar, 1 division = quarter, so 8 quarters per bar, ppq = 1
-        * 8 divisions per bar, 1 division = eighth, so  4 quarters per bar, ppq = 2
-        * 4 divisions per bar, 1 division = quarter, so  4 quarters per bar, ppq = 1
-        * 4 divisions per bar, 1 division = half, so 8 quarters per bar, ppq = 0.5
-        * 4 divisions per bar, 1 division = fifth, so (4 * 5/4) quarters per bar, ppq = 5/4
-        *
-        * general: divs_per_bar / (note_type / 4.0)
-        */
-       const double ppq_scaling =  tm.meter().note_divisor() / 4.0;
-
-       /* Note that this assumes constant meter/tempo throughout the session. Stupid VST */
-       ppqBar = double(bbt.bars - 1) * tm.meter().divisions_per_bar();
-       double ppqBeat = double(bbt.beats - 1);
-       double ppqTick = double(bbt.ticks) / Timecode::BBT_Time::ticks_per_beat;
-
-       ppqBar *= ppq_scaling;
-       ppqBeat *= ppq_scaling;
-
-       return ppqBar + ppqBeat + ppqTick;
-}
-
 int Session::vst_current_loading_id = 0;
 const char* Session::vst_can_do_strings[] = {
        X_("supplyIdle"),
@@ -78,7 +50,8 @@ const char* Session::vst_can_do_strings[] = {
        X_("receiveVstMidiEvent"),
        X_("supportShell"),
        X_("shellCategory"),
-       X_("shellCategorycurID")
+       X_("shellCategorycurID"),
+       X_("sizeWindow")
 };
 const int Session::vst_can_do_string_count = sizeof (vst_can_do_strings) / sizeof (char*);
 
@@ -97,8 +70,8 @@ intptr_t Session::vst_callback (
        VstTimeInfo* timeinfo;
        int32_t newflags = 0;
 
-       if (effect && effect->user) {
-               plug = (VSTPlugin *) (effect->user);
+       if (effect && effect->ptr1) {
+               plug = (VSTPlugin *) (effect->ptr1);
                session = &plug->session();
                timeinfo = plug->timeinfo ();
                DEBUG_TRACE (PBD::DEBUG::VSTCallbacks, string_compose ("am callback 0x%1%2, opcode = %3%4, plugin = \"%5\"\n",
@@ -199,33 +172,34 @@ intptr_t Session::vst_callback (
 
                timeinfo->nanoSeconds = g_get_monotonic_time () * 1000;
 
-               if (session) {
-                       framepos_t now = session->transport_frame();
+               if (plug && session) {
+                       samplepos_t now = plug->transport_sample();
 
                        timeinfo->samplePos = now;
-                       timeinfo->sampleRate = session->frame_rate();
-
-                       const TempoMetric& tm (session->tempo_map().metric_at (now));
+                       timeinfo->sampleRate = session->sample_rate();
 
                        if (value & (kVstTempoValid)) {
-                               const Tempo& t (tm.tempo());
-                               timeinfo->tempo = t.beats_per_minute ();
+                               const Tempo& t (session->tempo_map().tempo_at_sample (now));
+                               timeinfo->tempo = t.quarter_notes_per_minute ();
                                newflags |= (kVstTempoValid);
                        }
                        if (value & (kVstTimeSigValid)) {
-                               const Meter& m (tm.meter());
-                               timeinfo->timeSigNumerator = m.divisions_per_bar ();
-                               timeinfo->timeSigDenominator = m.note_divisor ();
+                               const MeterSection& ms (session->tempo_map().meter_section_at_sample (now));
+                               timeinfo->timeSigNumerator = ms.divisions_per_bar ();
+                               timeinfo->timeSigDenominator = ms.note_divisor ();
                                newflags |= (kVstTimeSigValid);
                        }
                        if ((value & (kVstPpqPosValid)) || (value & (kVstBarsValid))) {
                                Timecode::BBT_Time bbt;
 
                                try {
-                                       session->tempo_map().bbt_time_rt (now, bbt);
-                                       double ppqBar;
-                                       double ppqPos = vst_ppq (tm, bbt, ppqBar);
-
+                                       bbt = session->tempo_map().bbt_at_sample_rt (now);
+                                       bbt.beats = 1;
+                                       bbt.ticks = 0;
+                                       /* exact quarter note */
+                                       double ppqBar = session->tempo_map().quarter_note_at_bbt_rt (bbt);
+                                       /* quarter note at sample position (not rounded to note subdivision) */
+                                       double ppqPos = session->tempo_map().quarter_note_at_sample_rt (now);
                                        if (value & (kVstPpqPosValid)) {
                                                timeinfo->ppqPos = ppqPos;
                                                newflags |= kVstPpqPosValid;
@@ -252,7 +226,7 @@ intptr_t Session::vst_callback (
                                        (t.frames) +
                                        (t.subframes);
 
-                               timeinfo->smpteOffset *= 80.0; /* VST spec is 1/80th frames */
+                               timeinfo->smpteOffset *= 80.0; /* VST spec is 1/80th samples */
 
                                if (session->timecode_drop_frames()) {
                                        if (session->timecode_frames_per_second() == 30.0) {
@@ -278,7 +252,7 @@ intptr_t Session::vst_callback (
                                newflags |= kVstTransportRecording;
                        }
 
-                       if (session->transport_speed () != 0.0f) {
+                       if (plug->transport_speed () != 0.0f) {
                                newflags |= kVstTransportPlaying;
                        }
 
@@ -286,14 +260,8 @@ intptr_t Session::vst_callback (
                                newflags |= kVstTransportCycleActive;
                                Location * looploc = session->locations ()->auto_loop_location ();
                                if (looploc) try {
-                                       double ppqBar;
-                                       Timecode::BBT_Time bbt;
-
-                                       session->tempo_map().bbt_time_rt (looploc->start (), bbt);
-                                       timeinfo->cycleStartPos = vst_ppq (tm, bbt, ppqBar);
-
-                                       session->tempo_map().bbt_time_rt (looploc->end (), bbt);
-                                       timeinfo->cycleEndPos = vst_ppq (tm, bbt, ppqBar);
+                                       timeinfo->cycleStartPos = session->tempo_map ().quarter_note_at_sample_rt (looploc->start ());
+                                       timeinfo->cycleEndPos = session->tempo_map ().quarter_note_at_sample_rt (looploc->end ());
 
                                        newflags |= kVstCyclePosValid;
                                } catch (...) { }
@@ -322,7 +290,7 @@ intptr_t Session::vst_callback (
                        for (int n = 0 ; n < v->numEvents; ++n) {
                                VstMidiEvent *vme = (VstMidiEvent*) (v->events[n]->dump);
                                if (vme->type == kVstMidiType) {
-                                       plug->midi_buffer()->push_back(vme->deltaFrames, 3, (uint8_t*)vme->midiData);
+                                       plug->midi_buffer()->push_back(vme->deltaSamples, 3, (uint8_t*)vme->midiData);
                                }
                        }
                }
@@ -331,13 +299,14 @@ intptr_t Session::vst_callback (
        case audioMasterSetTime:
                SHOW_CALLBACK ("audioMasterSetTime");
                // VstTimenfo* in <ptr>, filter in <value>, not supported
+               return 0;
 
        case audioMasterTempoAt:
                SHOW_CALLBACK ("audioMasterTempoAt");
-               // returns tempo (in bpm * 10000) at sample frame location passed in <value>
+               // returns tempo (in bpm * 10000) at sample sample location passed in <value>
                if (session) {
-                       const Tempo& t (session->tempo_map().tempo_at (value));
-                       return t.beats_per_minute() * 1000;
+                       const Tempo& t (session->tempo_map().tempo_at_sample (value));
+                       return t.quarter_notes_per_minute() * 1000;
                } else {
                        return 0;
                }
@@ -370,16 +339,21 @@ intptr_t Session::vst_callback (
        case audioMasterSizeWindow:
                SHOW_CALLBACK ("audioMasterSizeWindow");
                if (plug && plug->state()) {
-                       plug->state()->width = index;
-                       plug->state()->height = value;
-                       plug->state()->want_resize = 1;
+                       if (plug->state()->width != index || plug->state()->height != value) {
+                               plug->state()->width = index;
+                               plug->state()->height = value;
+#ifndef NDEBUG
+                               printf ("audioMasterSizeWindow %d %d\n", plug->state()->width, plug->state()->height);
+#endif
+                               plug->VSTSizeWindow (); /* EMIT SIGNAL */
+                       }
                }
-               return 0;
+               return 1;
 
        case audioMasterGetSampleRate:
                SHOW_CALLBACK ("audioMasterGetSampleRate");
                if (session) {
-                       return session->frame_rate();
+                       return session->sample_rate();
                }
                return 0;
 
@@ -406,6 +380,7 @@ intptr_t Session::vst_callback (
        case audioMasterGetNextPlug:
                SHOW_CALLBACK ("audioMasterGetNextPlug");
                // output pin in <value> (-1: first to come), returns cEffect*
+               return 0;
 
        case audioMasterWillReplaceOrAccumulate:
                SHOW_CALLBACK ("audioMasterWillReplaceOrAccumulate");
@@ -464,13 +439,13 @@ intptr_t Session::vst_callback (
                SHOW_CALLBACK ("audioMasterGetVendorString");
                // fills <ptr> with a string identifying the vendor (max 64 char)
                strcpy ((char*) ptr, "Linux Audio Systems");
-               return 0;
+               return 1;
 
        case audioMasterGetProductString:
                SHOW_CALLBACK ("audioMasterGetProductString");
                // fills <ptr> with a string with product name (max 64 char)
                strcpy ((char*) ptr, PROGRAM_NAME);
-               return 0;
+               return 1;
 
        case audioMasterGetVendorVersion:
                SHOW_CALLBACK ("audioMasterGetVendorVersion");
@@ -520,19 +495,32 @@ intptr_t Session::vst_callback (
        case audioMasterUpdateDisplay:
                SHOW_CALLBACK ("audioMasterUpdateDisplay");
                // something has changed, update 'multi-fx' display
-               if (effect) {
-                       effect->dispatcher(effect, effEditIdle, 0, 0, NULL, 0.0f);
+               /* TODO: consider emitting  ParameterChangedExternally() for each ctrl input */
+               if (session) {
+                       session->set_dirty ();
                }
                return 0;
 
        case audioMasterBeginEdit:
                SHOW_CALLBACK ("audioMasterBeginEdit");
                // begin of automation session (when mouse down), parameter index in <index>
+               if (plug && plug->plugin_insert ()) {
+                       boost::shared_ptr<AutomationControl> ac = plug->plugin_insert ()->automation_control (Evoral::Parameter (PluginAutomation, 0, index));
+                       if (ac) {
+                               ac->start_touch (ac->session().transport_sample());
+                       }
+               }
                return 0;
 
        case audioMasterEndEdit:
                SHOW_CALLBACK ("audioMasterEndEdit");
                // end of automation session (when mouse up),     parameter index in <index>
+               if (plug && plug->plugin_insert ()) {
+                       boost::shared_ptr<AutomationControl> ac = plug->plugin_insert ()->automation_control (Evoral::Parameter (PluginAutomation, 0, index));
+                       if (ac) {
+                               ac->stop_touch (ac->session().transport_sample());
+                       }
+               }
                return 0;
 
        case audioMasterOpenFileSelector:
@@ -547,4 +535,3 @@ intptr_t Session::vst_callback (
 
        return 0;
 }
-