enough with umpteen "i18n.h" files. Consolidate on pbd/i18n.h
[ardour.git] / libs / ardour / session_vst.cc
index 96dc4115c75818aba9eb766545b3161b542db480..7b52b3cdf49b868073574ac5c70df6228e6fc7e0 100644 (file)
@@ -26,6 +26,7 @@
 #include "ardour/debug.h"
 #include "ardour/session.h"
 #include "ardour/tempo.h"
+#include "ardour/plugin_insert.h"
 #include "ardour/windows_vst_plugin.h"
 #include "ardour/vestige/aeffectx.h"
 #include "ardour/vst_types.h"
 #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", index, value))
+#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;
+       ppqTick *= ppq_scaling;
+
+       return ppqBar + ppqBeat + ppqTick;
+}
 
 int Session::vst_current_loading_id = 0;
 const char* Session::vst_can_do_strings[] = {
@@ -62,20 +92,24 @@ intptr_t Session::vst_callback (
        float opt
        )
 {
-       static VstTimeInfo _timeInfo;
        VSTPlugin* plug;
        Session* session;
+       static VstTimeInfo _timeinfo; // only uses as fallback
+       VstTimeInfo* timeinfo;
+       int32_t newflags = 0;
 
        if (effect && effect->user) {
                plug = (VSTPlugin *) (effect->user);
                session = &plug->session();
-               DEBUG_TRACE (PBD::DEBUG::VSTCallbacks, string_compose ("am callback 0x%1%2, opcode = %3%4, plugin = \"%5\" ",
+               timeinfo = plug->timeinfo ();
+               DEBUG_TRACE (PBD::DEBUG::VSTCallbacks, string_compose ("am callback 0x%1%2, opcode = %3%4, plugin = \"%5\"\n",
                                        std::hex, (void*) DEBUG_THREAD_SELF,
                                        std::dec, opcode, plug->name()));
        } else {
                plug = 0;
                session = 0;
-               DEBUG_TRACE (PBD::DEBUG::VSTCallbacks, string_compose ("am callback 0x%1%2, opcode = %3%4",
+               timeinfo = &_timeinfo;
+               DEBUG_TRACE (PBD::DEBUG::VSTCallbacks, string_compose ("am callback 0x%1%2, opcode = %3%4\n",
                                        std::hex, (void*) DEBUG_THREAD_SELF,
                                        std::dec, opcode));
        }
@@ -124,11 +158,25 @@ intptr_t Session::vst_callback (
                }
                switch (value) {
                        case 0:
+                               if (plug->plugin_insert ()) {
+                                       bool valid;
+                                       const ChanMapping& map (plug->plugin_insert ()->input_map (plug->plugin_number ()));
+                                       map.get (DataType::AUDIO, index, &valid);
+                                       return valid ? 0 : 1;
+                               }
                                if (index < plug->plugin()->numInputs) {
                                        return 0;
                                }
                                break;
                        case 1:
+#if 0 // investigate, the outputs *are* connected to scratch buffers
+                               if (plug->plugin_insert ()) {
+                                       bool valid;
+                                       const ChanMapping& map (plug->plugin_insert ()->output_map (plug->plugin_number ()));
+                                       map.get (DataType::AUDIO, index, &valid);
+                                       return valid ? 0 : 1;
+                               }
+#endif
                                if (index < plug->plugin()->numOutputs) {
                                        return 0;
                                }
@@ -148,67 +196,46 @@ intptr_t Session::vst_callback (
 
        case audioMasterGetTime:
                SHOW_CALLBACK ("audioMasterGetTime");
-               // returns const VstTimeInfo* (or 0 if not supported)
-               // <value> should contain a mask indicating which fields are required
-               // (see valid masks above), as some items may require extensive
-               // conversions
-               _timeInfo.flags = 0;
+               newflags = kVstNanosValid | kVstAutomationWriting | kVstAutomationReading;
 
-               if (session) {
-                       framepos_t now = session->transport_frame();
+               timeinfo->nanoSeconds = g_get_monotonic_time () * 1000;
+
+               if (plug && session) {
+                       framepos_t now = plug->transport_frame();
 
-                       _timeInfo.samplePos = now;
-                       _timeInfo.sampleRate = session->frame_rate();
+                       timeinfo->samplePos = now;
+                       timeinfo->sampleRate = session->frame_rate();
 
                        const TempoMetric& tm (session->tempo_map().metric_at (now));
 
                        if (value & (kVstTempoValid)) {
                                const Tempo& t (tm.tempo());
-                               _timeInfo.tempo = t.beats_per_minute ();
-                               _timeInfo.flags |= (kVstTempoValid);
+                               timeinfo->tempo = t.beats_per_minute ();
+                               newflags |= (kVstTempoValid);
                        }
                        if (value & (kVstTimeSigValid)) {
                                const Meter& m (tm.meter());
-                               _timeInfo.timeSigNumerator = m.divisions_per_bar ();
-                               _timeInfo.timeSigDenominator = m.note_divisor ();
-                               _timeInfo.flags |= (kVstTimeSigValid);
+                               timeinfo->timeSigNumerator = m.divisions_per_bar ();
+                               timeinfo->timeSigDenominator = m.note_divisor ();
+                               newflags |= (kVstTimeSigValid);
                        }
                        if ((value & (kVstPpqPosValid)) || (value & (kVstBarsValid))) {
                                Timecode::BBT_Time bbt;
 
                                try {
-                                       session->tempo_map().bbt_time_rt (now, bbt);
-
-                                       /* 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)
-                                        */
-                                       double ppq_scaling =  tm.meter().note_divisor() / 4.0;
-
-                                       /* Note that this assumes constant meter/tempo throughout the session. Stupid VST */
-                                       double 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;
-                                       ppqTick *= ppq_scaling;
+                                       bbt = session->tempo_map().bbt_at_frame_rt (now);
+
+                                       double ppqBar;
+                                       double ppqPos = vst_ppq (tm, bbt, ppqBar);
 
                                        if (value & (kVstPpqPosValid)) {
-                                               _timeInfo.ppqPos = ppqBar + ppqBeat + ppqTick;
-                                               _timeInfo.flags |= (kVstPpqPosValid);
+                                               timeinfo->ppqPos = ppqPos;
+                                               newflags |= kVstPpqPosValid;
                                        }
 
                                        if (value & (kVstBarsValid)) {
-                                               _timeInfo.barStartPos = ppqBar;
-                                               _timeInfo.flags |= (kVstBarsValid);
+                                               timeinfo->barStartPos = ppqBar;
+                                               newflags |= kVstBarsValid;
                                        }
 
                                } catch (...) {
@@ -221,47 +248,73 @@ intptr_t Session::vst_callback (
 
                                session->timecode_time (now, t);
 
-                               _timeInfo.smpteOffset = (t.hours * t.rate * 60.0 * 60.0) +
+                               timeinfo->smpteOffset = (t.hours * t.rate * 60.0 * 60.0) +
                                        (t.minutes * t.rate * 60.0) +
                                        (t.seconds * t.rate) +
                                        (t.frames) +
                                        (t.subframes);
 
-                               _timeInfo.smpteOffset *= 80.0; /* VST spec is 1/80th frames */
+                               timeinfo->smpteOffset *= 80.0; /* VST spec is 1/80th frames */
 
                                if (session->timecode_drop_frames()) {
                                        if (session->timecode_frames_per_second() == 30.0) {
-                                               _timeInfo.smpteFrameRate = 5;
+                                               timeinfo->smpteFrameRate = 5;
                                        } else {
-                                               _timeInfo.smpteFrameRate = 4; /* 29.97 assumed, thanks VST */
+                                               timeinfo->smpteFrameRate = 4; /* 29.97 assumed, thanks VST */
                                        }
                                } else {
                                        if (session->timecode_frames_per_second() == 24.0) {
-                                               _timeInfo.smpteFrameRate = 0;
+                                               timeinfo->smpteFrameRate = 0;
                                        } else if (session->timecode_frames_per_second() == 24.975) {
-                                               _timeInfo.smpteFrameRate = 2;
+                                               timeinfo->smpteFrameRate = 2;
                                        } else if (session->timecode_frames_per_second() == 25.0) {
-                                               _timeInfo.smpteFrameRate = 1;
+                                               timeinfo->smpteFrameRate = 1;
                                        } else {
-                                               _timeInfo.smpteFrameRate = 3; /* 30 fps */
+                                               timeinfo->smpteFrameRate = 3; /* 30 fps */
                                        }
                                }
-                               _timeInfo.flags |= (kVstSmpteValid);
+                               newflags |= (kVstSmpteValid);
                        }
 
-                       if (session->transport_speed() != 0.0f) {
-                               _timeInfo.flags |= (kVstTransportPlaying);
+                       if (session->actively_recording ()) {
+                               newflags |= kVstTransportRecording;
                        }
 
-                       if (session->get_play_loop()) {
+                       if (plug->transport_speed () != 0.0f) {
+                               newflags |= kVstTransportPlaying;
+                       }
+
+                       if (session->get_play_loop ()) {
+                               newflags |= kVstTransportCycleActive;
+                               Location * looploc = session->locations ()->auto_loop_location ();
+                               if (looploc) try {
+                                       double ppqBar;
+                                       Timecode::BBT_Time bbt;
+
+                                       bbt = session->tempo_map ().bbt_at_frame_rt (looploc->start ());
+                                       timeinfo->cycleStartPos = vst_ppq (tm, bbt, ppqBar);
+
+                                       bbt = session->tempo_map ().bbt_at_frame_rt (looploc->end ());
+                                       timeinfo->cycleEndPos = vst_ppq (tm, bbt, ppqBar);
+
+                                       newflags |= kVstCyclePosValid;
+                               } catch (...) { }
                        }
 
                } else {
-                       _timeInfo.samplePos = 0;
-                       _timeInfo.sampleRate = AudioEngine::instance()->sample_rate();
+                       timeinfo->samplePos = 0;
+                       timeinfo->sampleRate = AudioEngine::instance()->sample_rate();
+               }
+
+               if ((timeinfo->flags & (kVstTransportPlaying | kVstTransportRecording | kVstTransportCycleActive))
+                   !=
+                   (newflags        & (kVstTransportPlaying | kVstTransportRecording | kVstTransportCycleActive)))
+               {
+                       newflags |= kVstTransportChanged;
                }
 
-               return (intptr_t) &_timeInfo;
+               timeinfo->flags = newflags;
+               return (intptr_t) timeinfo;
 
        case audioMasterProcessEvents:
                SHOW_CALLBACK ("audioMasterProcessEvents");
@@ -285,7 +338,7 @@ intptr_t Session::vst_callback (
                SHOW_CALLBACK ("audioMasterTempoAt");
                // returns tempo (in bpm * 10000) at sample frame location passed in <value>
                if (session) {
-                       const Tempo& t (session->tempo_map().tempo_at (value));
+                       const Tempo& t (session->tempo_map().tempo_at_frame (value));
                        return t.beats_per_minute() * 1000;
                } else {
                        return 0;
@@ -496,4 +549,3 @@ intptr_t Session::vst_callback (
 
        return 0;
 }
-