*/
-#include <ardour/ardour.h>
+#include "ardour/ardour.h"
#include <fstream>
#include <inttypes.h>
#include <cstdio>
#include <errno.h>
-#include <pbd/error.h>
-#include <pbd/enumwriter.h>
-#include <ardour/session.h>
-#include <ardour/automatable.h>
+#include "pbd/error.h"
+#include "pbd/enumwriter.h"
+
+#include "midi++/names.h"
+
+#include "ardour/automatable.h"
+#include "ardour/amp.h"
+#include "ardour/event_type_map.h"
+#include "ardour/midi_track.h"
+#include "ardour/panner.h"
+#include "ardour/plugin_insert.h"
+#include "ardour/session.h"
#include "i18n.h"
using namespace ARDOUR;
using namespace PBD;
+nframes_t Automatable::_automation_interval = 0;
-Automatable::Automatable(Session& _session, const string& name)
- : SessionObject(_session, name)
+Automatable::Automatable(Session& session)
+ : _a_session(session)
, _last_automation_snapshot(0)
-{}
+{
+}
int
Automatable::old_set_automation_state (const XMLNode& node)
if ((prop = node.property ("path")) != 0) {
load_automation (prop->value());
} else {
- warning << string_compose(_("%1: Automation node has no path property"), _name) << endmsg;
+ warning << _("Automation node has no path property") << endmsg;
}
if ((prop = node.property ("visible")) != 0) {
uint32_t what;
stringstream sstr;
- _visible_parameter_automation.clear ();
+ _visible_controls.clear ();
sstr << prop->value();
while (1) {
if (sstr.fail()) {
break;
}
- mark_automation_visible (what, true);
+ mark_automation_visible (Evoral::Parameter(PluginAutomation, 0, what), true);
}
}
+
+ _last_automation_snapshot = 0;
return 0;
}
if (path[0] == '/') { // legacy
fullpath = path;
} else {
- fullpath = _session.automation_dir();
+ fullpath = _a_session.automation_dir();
fullpath += path;
}
ifstream in (fullpath.c_str());
if (!in) {
- warning << string_compose(_("%1: cannot open %2 to load automation data (%3)"), _name, fullpath, strerror (errno)) << endmsg;
+ warning << string_compose(_("cannot open %2 to load automation data (%3)")
+ , fullpath, strerror (errno)) << endmsg;
return 1;
}
- Glib::Mutex::Lock lm (_automation_lock);
- set<uint32_t> tosave;
- _parameter_automation.clear ();
+ Glib::Mutex::Lock lm (control_lock());
+ set<Evoral::Parameter> tosave;
+ controls().clear ();
+
+ _last_automation_snapshot = 0;
while (in) {
double when;
in >> when; if (!in) goto bad;
in >> value; if (!in) goto bad;
- AutomationList& al = automation_list (port);
- al.add (when, value);
- tosave.insert (port);
+ Evoral::Parameter param(PluginAutomation, 0, port);
+ /* FIXME: this is legacy and only used for plugin inserts? I think? */
+ boost::shared_ptr<Evoral::Control> c = control (param, true);
+ c->list()->add (when, value);
+ tosave.insert (param);
}
return 0;
bad:
- error << string_compose(_("%1: cannot load automation data from %2"), _name, fullpath) << endmsg;
- _parameter_automation.clear ();
+ error << string_compose(_("cannot load automation data from %2"), fullpath) << endmsg;
+ controls().clear ();
return -1;
}
-
void
-Automatable::what_has_automation (set<uint32_t>& s) const
+Automatable::add_control(boost::shared_ptr<Evoral::Control> ac)
{
- Glib::Mutex::Lock lm (_automation_lock);
- map<uint32_t,AutomationList*>::const_iterator li;
+ Evoral::Parameter param = ac->parameter();
- for (li = _parameter_automation.begin(); li != _parameter_automation.end(); ++li) {
- s.insert ((*li).first);
- }
+ ControlSet::add_control(ac);
+ _can_automate_list.insert(param);
+ auto_state_changed(param); // sync everything up
}
void
-Automatable::what_has_visible_automation (set<uint32_t>& s) const
+Automatable::what_has_visible_data(set<Evoral::Parameter>& s) const
{
- Glib::Mutex::Lock lm (_automation_lock);
- set<uint32_t>::const_iterator li;
+ Glib::Mutex::Lock lm (control_lock());
+ set<Evoral::Parameter>::const_iterator li;
- for (li = _visible_parameter_automation.begin(); li != _visible_parameter_automation.end(); ++li) {
+ for (li = _visible_controls.begin(); li != _visible_controls.end(); ++li) {
s.insert (*li);
}
}
-AutomationList&
-Automatable::automation_list (uint32_t parameter)
-{
- AutomationList* al = _parameter_automation[parameter];
-
- if (al == 0) {
- al = _parameter_automation[parameter] = new AutomationList (default_parameter_value (parameter));
- /* let derived classes do whatever they need with this */
- automation_list_creation_callback (parameter, *al);
- }
-
- return *al;
-}
string
-Automatable::describe_parameter (uint32_t which)
+Automatable::describe_parameter (Evoral::Parameter param)
{
- /* derived classes will override this */
- return "";
+ /* derived classes like PluginInsert should override this */
+
+ if (param == Evoral::Parameter(GainAutomation)) {
+ return _("Fader");
+ } else if (param.type() == PanAutomation) {
+ /* ID's are zero-based, present them as 1-based */
+ return (string_compose(_("Pan %1"), param.id() + 1));
+ } else if (param.type() == MidiCCAutomation) {
+ return string_compose("%2 [%3]",
+ param.id() + 1, midi_name(param.id()), int(param.channel()) + 1);
+ } else if (param.type() == MidiPgmChangeAutomation) {
+ return string_compose("Program [%1]", int(param.channel()) + 1);
+ } else if (param.type() == MidiPitchBenderAutomation) {
+ return string_compose("Bender [%1]", int(param.channel()) + 1);
+ } else if (param.type() == MidiChannelPressureAutomation) {
+ return string_compose("Pressure [%1]", int(param.channel()) + 1);
+ } else {
+ return EventTypeMap::instance().to_symbol(param);
+ }
}
void
-Automatable::can_automate (uint32_t what)
+Automatable::can_automate (Evoral::Parameter what)
{
_can_automate_list.insert (what);
}
void
-Automatable::mark_automation_visible (uint32_t what, bool yn)
+Automatable::mark_automation_visible (Evoral::Parameter what, bool yn)
{
if (yn) {
- _visible_parameter_automation.insert (what);
+ _visible_controls.insert (what);
} else {
- set<uint32_t>::iterator i;
+ set<Evoral::Parameter>::iterator i;
- if ((i = _visible_parameter_automation.find (what)) != _visible_parameter_automation.end()) {
- _visible_parameter_automation.erase (i);
+ if ((i = _visible_controls.find (what)) != _visible_controls.end()) {
+ _visible_controls.erase (i);
}
}
}
-bool
-Automatable::find_next_event (nframes_t now, nframes_t end, ControlEvent& next_event) const
-{
- map<uint32_t,AutomationList*>::const_iterator li;
- AutomationList::TimeComparator cmp;
-
- next_event.when = max_frames;
-
- for (li = _parameter_automation.begin(); li != _parameter_automation.end(); ++li) {
-
- AutomationList::const_iterator i;
- const AutomationList& alist (*((*li).second));
- ControlEvent cp (now, 0.0f);
-
- for (i = lower_bound (alist.const_begin(), alist.const_end(), &cp, cmp); i != alist.const_end() && (*i)->when < end; ++i) {
- if ((*i)->when > now) {
- break;
- }
- }
-
- if (i != alist.const_end() && (*i)->when < end) {
-
- if ((*i)->when < next_event.when) {
- next_event.when = (*i)->when;
- }
- }
- }
-
- return next_event.when != max_frames;
-}
-
+/** \a legacy_param is used for loading legacy sessions where an object (IO, Panner)
+ * had a single automation parameter, with it's type implicit. Derived objects should
+ * pass that type and it will be used for the untyped AutomationList found.
+ */
int
-Automatable::set_automation_state (const XMLNode& node)
+Automatable::set_automation_state (const XMLNode& node, Evoral::Parameter legacy_param)
{
- Glib::Mutex::Lock lm (_automation_lock);
+ Glib::Mutex::Lock lm (control_lock());
- _parameter_automation.clear ();
+ /* Don't clear controls, since some may be special derived Controllable classes */
+
+ _visible_controls.clear ();
XMLNodeList nlist = node.children();
XMLNodeIterator niter;
-
+
for (niter = nlist.begin(); niter != nlist.end(); ++niter) {
- uint32_t param;
- if (sscanf ((*niter)->name().c_str(), "parameter-%" PRIu32, ¶m) != 1) {
- error << string_compose (_("%2: badly formatted node name in XML automation state, ignored"), _name) << endmsg;
- continue;
- }
+ /*if (sscanf ((*niter)->name().c_str(), "parameter-%" PRIu32, ¶m) != 1) {
+ error << string_compose (_("%2: badly formatted node name in XML automation state, ignored"), _name) << endmsg;
+ continue;
+ }*/
+
+ if ((*niter)->name() == "AutomationList") {
- AutomationList& al = automation_list (param);
- if (al.set_state (*(*niter)->children().front())) {
- goto bad;
+ const XMLProperty* id_prop = (*niter)->property("automation-id");
+
+ Evoral::Parameter param = (id_prop
+ ? EventTypeMap::instance().new_parameter(id_prop->value())
+ : legacy_param);
+
+ if (param.type() == NullAutomation) {
+ warning << "Automation has null type" << endl;
+ continue;
+ }
+
+ boost::shared_ptr<AutomationList> al (new AutomationList(**niter, param));
+
+ if (!id_prop) {
+ warning << "AutomationList node without automation-id property, "
+ << "using default: " << EventTypeMap::instance().to_symbol(legacy_param) << endmsg;
+ }
+
+ boost::shared_ptr<Evoral::Control> existing = control(param);
+ if (existing) {
+ existing->set_list(al);
+ } else {
+ boost::shared_ptr<Evoral::Control> newcontrol = control_factory(param);
+ add_control(newcontrol);
+ newcontrol->set_list(al);
+ }
+
+ } else {
+ error << "Expected AutomationList node, got '" << (*niter)->name() << endmsg;
}
}
- return 0;
+ _last_automation_snapshot = 0;
- bad:
- error << string_compose(_("%1: cannot load automation data from XML"), _name) << endmsg;
- _parameter_automation.clear ();
- return -1;
+ return 0;
}
XMLNode&
Automatable::get_automation_state ()
{
- Glib::Mutex::Lock lm (_automation_lock);
+ Glib::Mutex::Lock lm (control_lock());
XMLNode* node = new XMLNode (X_("Automation"));
- string fullpath;
-
- if (_parameter_automation.empty()) {
+
+ if (controls().empty()) {
return *node;
}
- map<uint32_t,AutomationList*>::iterator li;
+ for (Controls::iterator li = controls().begin(); li != controls().end(); ++li) {
+ boost::shared_ptr<AutomationList> l
+ = boost::dynamic_pointer_cast<AutomationList>(li->second->list());
+ if (!l->empty()) {
+ node->add_child_nocopy (l->get_state ());
+ }
+ }
+
+ return *node;
+}
+
+void
+Automatable::set_parameter_automation_state (Evoral::Parameter param, AutoState s)
+{
+ Glib::Mutex::Lock lm (control_lock());
- for (li = _parameter_automation.begin(); li != _parameter_automation.end(); ++li) {
+ boost::shared_ptr<Evoral::Control> c = control (param, true);
+ boost::shared_ptr<AutomationList> l = boost::dynamic_pointer_cast<AutomationList>(c->list());
+
+ if (s != l->automation_state()) {
+ l->set_automation_state (s);
+ _a_session.set_dirty ();
+ }
+}
+
+AutoState
+Automatable::get_parameter_automation_state (Evoral::Parameter param, bool lock)
+{
+ AutoState result = Off;
+
+ if (lock)
+ control_lock().lock();
+
+ boost::shared_ptr<Evoral::Control> c = control(param);
+ boost::shared_ptr<AutomationList> l = boost::dynamic_pointer_cast<AutomationList>(c->list());
+
+ if (c)
+ result = l->automation_state();
- XMLNode* child;
+ if (lock)
+ control_lock().unlock();
+
+ return result;
+}
+
+void
+Automatable::set_parameter_automation_style (Evoral::Parameter param, AutoStyle s)
+{
+ Glib::Mutex::Lock lm (control_lock());
+
+ boost::shared_ptr<Evoral::Control> c = control(param, true);
+ boost::shared_ptr<AutomationList> l = boost::dynamic_pointer_cast<AutomationList>(c->list());
+
+ if (s != l->automation_style()) {
+ l->set_automation_style (s);
+ _a_session.set_dirty ();
+ }
+}
+
+AutoStyle
+Automatable::get_parameter_automation_style (Evoral::Parameter param)
+{
+ Glib::Mutex::Lock lm (control_lock());
+
+ boost::shared_ptr<Evoral::Control> c = control(param);
+ boost::shared_ptr<AutomationList> l = boost::dynamic_pointer_cast<AutomationList>(c->list());
+
+ if (c) {
+ return l->automation_style();
+ } else {
+ return Absolute; // whatever
+ }
+}
+
+void
+Automatable::protect_automation ()
+{
+ typedef set<Evoral::Parameter> ParameterSet;
+ ParameterSet automated_params;
+
+ what_has_data(automated_params);
+
+ for (ParameterSet::iterator i = automated_params.begin(); i != automated_params.end(); ++i) {
+
+ boost::shared_ptr<Evoral::Control> c = control(*i);
+ boost::shared_ptr<AutomationList> l = boost::dynamic_pointer_cast<AutomationList>(c->list());
+
+ switch (l->automation_state()) {
+ case Write:
+ l->set_automation_state (Off);
+ break;
+ case Touch:
+ l->set_automation_state (Play);
+ break;
+ default:
+ break;
+ }
+ }
+}
+
+void
+Automatable::automation_snapshot (nframes_t now, bool force)
+{
+ if (force || _last_automation_snapshot > now || (now - _last_automation_snapshot) > _automation_interval) {
+
+ for (Controls::iterator i = controls().begin(); i != controls().end(); ++i) {
+ boost::shared_ptr<AutomationControl> c
+ = boost::dynamic_pointer_cast<AutomationControl>(i->second);
+ if (c->automation_write()) {
+ c->list()->rt_add (now, i->second->user_float());
+ }
+ }
- char buf[64];
- stringstream str;
- snprintf (buf, sizeof (buf), "parameter-%" PRIu32, li->first);
- child = new XMLNode (buf);
- child->add_child_nocopy (li->second->get_state ());
+ _last_automation_snapshot = now;
}
+}
- return *node;
+void
+Automatable::transport_stopped (sframes_t now)
+{
+ for (Controls::iterator li = controls().begin(); li != controls().end(); ++li) {
+
+ boost::shared_ptr<AutomationControl> c
+ = boost::dynamic_pointer_cast<AutomationControl>(li->second);
+ boost::shared_ptr<AutomationList> l
+ = boost::dynamic_pointer_cast<AutomationList>(c->list());
+
+ c->list()->reposition_for_rt_add (now);
+
+ if (c->automation_state() != Off) {
+ c->set_value(c->list()->eval(now));
+ }
+ }
+}
+
+boost::shared_ptr<Evoral::Control>
+Automatable::control_factory(const Evoral::Parameter& param)
+{
+ boost::shared_ptr<AutomationList> list(new AutomationList(param));
+ Evoral::Control* control = NULL;
+ if (param.type() >= MidiCCAutomation && param.type() <= MidiChannelPressureAutomation) {
+ control = new MidiTrack::MidiControl((MidiTrack*)this, param);
+ } else if (param.type() == PluginAutomation) {
+ control = new PluginInsert::PluginControl((PluginInsert*)this, param);
+ } else if (param.type() == GainAutomation) {
+ control = new Amp::GainControl( X_("gaincontrol"), _a_session, (Amp*)this, param);
+ } else if (param.type() == PanAutomation) {
+ Panner* me = dynamic_cast<Panner*>(this);
+ if (me) {
+ control = new Panner::PanControllable(me->session(), X_("panner"), *me, param);
+ } else {
+ cerr << "ERROR: PanAutomation for non-Panner" << endl;
+ }
+ } else {
+ control = new AutomationControl(_a_session, param);
+ }
+ control->set_list(list);
+ return boost::shared_ptr<Evoral::Control>(control);
}
+
+boost::shared_ptr<AutomationControl>
+Automatable::automation_control (const Evoral::Parameter& id, bool create)
+{
+ return boost::dynamic_pointer_cast<AutomationControl>(Evoral::ControlSet::control(id, create));
+}
+
+boost::shared_ptr<const AutomationControl>
+Automatable::automation_control (const Evoral::Parameter& id) const
+{
+ return boost::dynamic_pointer_cast<const AutomationControl>(Evoral::ControlSet::control(id));
+}
+