*/
#include <pbd/error.h>
-#include "ardour/automation_event.h"
+#include "ardour/automation_list.h"
#include "ardour/automation_control.h"
#include "ardour_ui.h"
#include "utils.h"
#include <pbd/memento_command.h>
#include <pbd/stacktrace.h>
-#include <ardour/automation_event.h>
-#include <ardour/curve.h>
+#include <ardour/automation_list.h>
#include <ardour/dB.h>
+#include <evoral/Curve.hpp>
#include "simplerect.h"
#include "automation_line.h"
#include <pbd/undo.h>
#include <pbd/statefuldestructible.h>
-#include <ardour/automation_event.h>
+#include <ardour/automation_list.h>
using std::vector;
#include <sys/types.h>
-#include <ardour/automation_event.h>
+#include <ardour/automation_list.h>
#include "canvas.h"
#include "simplerect.h"
#include <libgnomecanvasmm/line.h>
-#include <ardour/automation_event.h>
-#include <ardour/curve.h>
+#include <ardour/automation_list.h>
+#include <evoral/Curve.hpp>
#include <ardour/crossfade.h>
#include <ardour/session.h>
#include <ardour/auditioner.h>
#include <gtkmm/button.h>
#include <gtkmm/radiobutton.h>
-#include <ardour/curve.h>
+#include <evoral/Curve.hpp>
#include "ardour_dialog.h"
#include "canvas.h"
#include <cfloat>
#include <unistd.h>
-#include <ardour/curve.h>
+#include <ardour/automation_list.h>
+#include <evoral/Curve.hpp>
using namespace std;
using namespace ARDOUR;
*/
-#include <ardour/curve.h>
+#include <evoral/Curve.hpp>
#include <ardour/audioregion.h>
#include <pbd/memento_command.h>
automatable.cc
automation.cc
automation_control.cc
-automation_event.cc
+automation_list.cc
base_audio_port.cc
base_midi_port.cc
broadcast_info.cc
control_protocol_manager.cc
control_protocol_search_path.cc
crossfade.cc
-curve.cc
cycle_timer.cc
default_click.cc
directory_names.cc
#include <map>
#include <boost/shared_ptr.hpp>
#include <ardour/session_object.h>
-#include <ardour/automation_event.h>
+#include <ardour/automation_list.h>
#include <ardour/automation_control.h>
#include <ardour/parameter.h>
#include <evoral/ControlSet.hpp>
#include <pbd/controllable.h>
#include <ardour/parameter.h>
#include <evoral/Control.hpp>
-#include <ardour/automation_event.h>
+#include <ardour/automation_list.h>
namespace ARDOUR {
+++ /dev/null
-/*
- Copyright (C) 2002 Paul Davis
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
-
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
-
-*/
-
-#ifndef __ardour_automation_event_h__
-#define __ardour_automation_event_h__
-
-#include <stdint.h>
-#include <list>
-#include <cmath>
-
-#include <sigc++/signal.h>
-#include <glibmm/thread.h>
-
-#include <boost/pool/pool.hpp>
-#include <boost/pool/pool_alloc.hpp>
-
-#include <pbd/undo.h>
-#include <pbd/xml++.h>
-#include <pbd/statefuldestructible.h>
-
-#include <ardour/ardour.h>
-#include <ardour/parameter.h>
-
-#include <evoral/ControlList.hpp>
-
-using Evoral::ControlEvent;
-
-namespace ARDOUR {
-
-class AutomationList : public PBD::StatefulDestructible, public Evoral::ControlList
-{
- public:
- AutomationList (Parameter id);
- AutomationList (const XMLNode&, Parameter id);
- ~AutomationList();
-
- virtual boost::shared_ptr<Evoral::ControlList> create(Evoral::Parameter id);
-
- AutomationList (const AutomationList&);
- AutomationList (const AutomationList&, double start, double end);
- AutomationList& operator= (const AutomationList&);
- bool operator== (const AutomationList&);
-
- void freeze();
- void thaw ();
- void mark_dirty () const;
-
- void set_automation_state (AutoState);
- AutoState automation_state() const { return _state; }
- sigc::signal<void> automation_state_changed;
-
- void set_automation_style (AutoStyle m);
- AutoStyle automation_style() const { return _style; }
- sigc::signal<void> automation_style_changed;
-
- bool automation_playback() const {
- return (_state & Play) || ((_state & Touch) && !_touching);
- }
- bool automation_write () const {
- return (_state & Write) || ((_state & Touch) && _touching);
- }
-
- sigc::signal<void> StateChanged;
-
- static sigc::signal<void, AutomationList*> AutomationListCreated;
- mutable sigc::signal<void> Dirty;
-
- void start_touch ();
- void stop_touch ();
- bool touching() const { return _touching; }
-
- XMLNode& get_state(void);
- int set_state (const XMLNode &s);
- XMLNode& state (bool full);
- XMLNode& serialize_events ();
-
- private:
- int deserialize_events (const XMLNode&);
-
- void maybe_signal_changed ();
-
- AutoState _state;
- AutoStyle _style;
- bool _touching;
-};
-
-} // namespace
-
-#endif /* __ardour_automation_event_h__ */
--- /dev/null
+/*
+ Copyright (C) 2002 Paul Davis
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with this program; if not, write to the Free Software
+ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+*/
+
+#ifndef __ardour_automation_event_h__
+#define __ardour_automation_event_h__
+
+#include <stdint.h>
+#include <list>
+#include <cmath>
+
+#include <sigc++/signal.h>
+#include <glibmm/thread.h>
+
+#include <boost/pool/pool.hpp>
+#include <boost/pool/pool_alloc.hpp>
+
+#include <pbd/undo.h>
+#include <pbd/xml++.h>
+#include <pbd/statefuldestructible.h>
+
+#include <ardour/ardour.h>
+#include <ardour/parameter.h>
+
+#include <evoral/ControlList.hpp>
+
+using Evoral::ControlEvent;
+
+namespace ARDOUR {
+
+class AutomationList : public PBD::StatefulDestructible, public Evoral::ControlList
+{
+ public:
+ AutomationList (Parameter id);
+ AutomationList (const XMLNode&, Parameter id);
+ ~AutomationList();
+
+ virtual boost::shared_ptr<Evoral::ControlList> create(Evoral::Parameter id);
+
+ AutomationList (const AutomationList&);
+ AutomationList (const AutomationList&, double start, double end);
+ AutomationList& operator= (const AutomationList&);
+ bool operator== (const AutomationList&);
+
+ void freeze();
+ void thaw ();
+ void mark_dirty () const;
+
+ void set_automation_state (AutoState);
+ AutoState automation_state() const { return _state; }
+ sigc::signal<void> automation_state_changed;
+
+ void set_automation_style (AutoStyle m);
+ AutoStyle automation_style() const { return _style; }
+ sigc::signal<void> automation_style_changed;
+
+ bool automation_playback() const {
+ return (_state & Play) || ((_state & Touch) && !_touching);
+ }
+ bool automation_write () const {
+ return (_state & Write) || ((_state & Touch) && _touching);
+ }
+
+ sigc::signal<void> StateChanged;
+
+ static sigc::signal<void, AutomationList*> AutomationListCreated;
+ mutable sigc::signal<void> Dirty;
+
+ void start_touch ();
+ void stop_touch ();
+ bool touching() const { return _touching; }
+
+ XMLNode& get_state(void);
+ int set_state (const XMLNode &s);
+ XMLNode& state (bool full);
+ XMLNode& serialize_events ();
+
+ private:
+ int deserialize_events (const XMLNode&);
+
+ void maybe_signal_changed ();
+
+ AutoState _state;
+ AutoStyle _style;
+ bool _touching;
+};
+
+} // namespace
+
+#endif /* __ardour_automation_event_h__ */
#include <pbd/statefuldestructible.h>
#include <ardour/ardour.h>
-#include <ardour/curve.h>
#include <ardour/audioregion.h>
#include <ardour/crossfade_compare.h>
+#include <evoral/Curve.hpp>
namespace ARDOUR {
+++ /dev/null
-/*
- Copyright (C) 2001-2007 Paul Davis
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
-
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
-
-*/
-
-#ifndef __ardour_curve_h__
-#define __ardour_curve_h__
-
-#include <sys/types.h>
-#include <boost/utility.hpp>
-#include <sigc++/signal.h>
-#include <glibmm/thread.h>
-#include <pbd/undo.h>
-#include <list>
-#include <algorithm>
-#include <ardour/automation_event.h>
-
-namespace ARDOUR {
-
-class Curve : public boost::noncopyable
-{
- public:
- Curve (const AutomationList& al);
-
- bool rt_safe_get_vector (double x0, double x1, float *arg, int32_t veclen);
- void get_vector (double x0, double x1, float *arg, int32_t veclen);
-
- void solve ();
-
- private:
- double unlocked_eval (double where);
- double multipoint_eval (double x);
-
- void _get_vector (double x0, double x1, float *arg, int32_t veclen);
-
- void on_list_dirty() { _dirty = true; }
-
- bool _dirty;
- const AutomationList& _list;
-};
-
-} // namespace ARDOUR
-
-extern "C" {
- void curve_get_vector_from_c (void *arg, double, double, float*, int32_t);
-}
-
-#endif /* __ardour_curve_h__ */
#define __ardour_gain_h__
#include "ardour.h"
-#include "curve.h"
+#include "automation_list.h"
+#include <evoral/Curve.hpp>
namespace ARDOUR {
#include <ardour/ardour.h>
#include <ardour/automatable.h>
#include <ardour/utils.h>
-#include <ardour/curve.h>
#include <ardour/types.h>
#include <ardour/data_type.h>
#include <ardour/port_set.h>
#include <ardour/ardour.h>
#include <ardour/processor.h>
#include <ardour/io.h>
-#include <ardour/automation_event.h>
+#include <ardour/automation_list.h>
using std::map;
using std::set;
#include <pbd/controllable.h>
#include <ardour/types.h>
-#include <ardour/curve.h>
#include <ardour/automation_control.h>
using std::istream;
#include <ardour/ardour.h>
#include <ardour/types.h>
#include <ardour/processor.h>
-#include <ardour/automation_event.h>
+#include <ardour/automation_list.h>
class XMLNode;
sigc::signal<void> NamedSelectionRemoved;
/* Curves and AutomationLists (TODO when they go away) */
- void add_curve(Curve*);
+ void add_curve(Evoral::Curve*);
void add_automation_list(AutomationList*);
/* fade curves */
NamedSelection *XMLNamedSelectionFactory (const XMLNode&);
/* CURVES and AUTOMATION LISTS */
- std::map<PBD::ID, Curve*> curves;
+ std::map<PBD::ID, Evoral::Curve*> curves;
std::map<PBD::ID, AutomationList*> automation_lists;
/* DEFAULT FADE CURVES */
+++ /dev/null
-/*
- Copyright (C) 2002 Paul Davis
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
-
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
-
-*/
-
-#include <set>
-#include <climits>
-#include <float.h>
-#include <cmath>
-#include <sstream>
-#include <algorithm>
-#include <sigc++/bind.h>
-#include <ardour/parameter.h>
-#include <ardour/automation_event.h>
-#include <ardour/curve.h>
-#include <pbd/stacktrace.h>
-#include <pbd/enumwriter.h>
-
-#include "i18n.h"
-
-using namespace std;
-using namespace ARDOUR;
-using namespace sigc;
-using namespace PBD;
-
-sigc::signal<void,AutomationList *> AutomationList::AutomationListCreated;
-
-#if 0
-static void dumpit (const AutomationList& al, string prefix = "")
-{
- cerr << prefix << &al << endl;
- for (AutomationList::const_iterator i = al.const_begin(); i != al.const_end(); ++i) {
- cerr << prefix << '\t' << (*i)->when << ',' << (*i)->value << endl;
- }
- cerr << "\n";
-}
-#endif
-
-/* XXX: min_val max_val redundant? (param.min() param.max()) */
-AutomationList::AutomationList (Parameter id)
- : ControlList(id)
-{
- _state = Off;
- _style = Absolute;
- _touching = false;
-
- assert(_parameter.type() != NullAutomation);
- AutomationListCreated(this);
-}
-
-AutomationList::AutomationList (const AutomationList& other)
- : ControlList(other)
-{
- _state = other._state;
- _touching = other._touching;
-
- assert(_parameter.type() != NullAutomation);
- AutomationListCreated(this);
-}
-
-AutomationList::AutomationList (const AutomationList& other, double start, double end)
- : ControlList(other)
-{
- _style = other._style;
- _state = other._state;
- _touching = other._touching;
-
- assert(_parameter.type() != NullAutomation);
- AutomationListCreated(this);
-}
-
-/** \a id is used for legacy sessions where the type is not present
- * in or below the <AutomationList> node. It is used if \a id is non-null.
- */
-AutomationList::AutomationList (const XMLNode& node, Parameter id)
- : ControlList(id)
-{
- _touching = false;
- _state = Off;
- _style = Absolute;
-
- set_state (node);
-
- if (id)
- _parameter = id;
-
- assert(_parameter.type() != NullAutomation);
- AutomationListCreated(this);
-}
-
-AutomationList::~AutomationList()
-{
- GoingAway ();
-}
-
-boost::shared_ptr<Evoral::ControlList>
-AutomationList::create(Evoral::Parameter id)
-{
- return boost::shared_ptr<Evoral::ControlList>(new AutomationList(id));
-}
-
-bool
-AutomationList::operator== (const AutomationList& other)
-{
- return _events == other._events;
-}
-
-AutomationList&
-AutomationList::operator= (const AutomationList& other)
-{
- if (this != &other) {
-
- _events.clear ();
-
- for (const_iterator i = other._events.begin(); i != other._events.end(); ++i) {
- _events.push_back (new ControlEvent (**i));
- }
-
- _min_yval = other._min_yval;
- _max_yval = other._max_yval;
- _max_xval = other._max_xval;
- _default_value = other._default_value;
-
- mark_dirty ();
- maybe_signal_changed ();
- }
-
- return *this;
-}
-
-void
-AutomationList::maybe_signal_changed ()
-{
- ControlList::maybe_signal_changed ();
-
- if (!_frozen) {
- StateChanged (); /* EMIT SIGNAL */
- }
-}
-
-void
-AutomationList::set_automation_state (AutoState s)
-{
- if (s != _state) {
- _state = s;
- automation_state_changed (); /* EMIT SIGNAL */
- }
-}
-
-void
-AutomationList::set_automation_style (AutoStyle s)
-{
- if (s != _style) {
- _style = s;
- automation_style_changed (); /* EMIT SIGNAL */
- }
-}
-
-void
-AutomationList::start_touch ()
-{
- _touching = true;
- _new_value = true;
-}
-
-void
-AutomationList::stop_touch ()
-{
- _touching = false;
- _new_value = false;
-}
-
-void
-AutomationList::freeze ()
-{
- _frozen++;
-}
-
-void
-AutomationList::thaw ()
-{
- ControlList::thaw();
-
- if (_changed_when_thawed) {
- StateChanged(); /* EMIT SIGNAL */
- }
-}
-
-void
-AutomationList::mark_dirty () const
-{
- ControlList::mark_dirty ();
- Dirty (); /* EMIT SIGNAL */
-}
-
-XMLNode&
-AutomationList::get_state ()
-{
- return state (true);
-}
-
-XMLNode&
-AutomationList::state (bool full)
-{
- XMLNode* root = new XMLNode (X_("AutomationList"));
- char buf[64];
- LocaleGuard lg (X_("POSIX"));
-
- root->add_property ("automation-id", _parameter.symbol());
-
- root->add_property ("id", _id.to_s());
-
- snprintf (buf, sizeof (buf), "%.12g", _default_value);
- root->add_property ("default", buf);
- snprintf (buf, sizeof (buf), "%.12g", _min_yval);
- root->add_property ("min_yval", buf);
- snprintf (buf, sizeof (buf), "%.12g", _max_yval);
- root->add_property ("max_yval", buf);
- snprintf (buf, sizeof (buf), "%.12g", _max_xval);
- root->add_property ("max_xval", buf);
-
- root->add_property ("interpolation-style", enum_2_string (_interpolation));
-
- if (full) {
- root->add_property ("state", auto_state_to_string (_state));
- } else {
- /* never save anything but Off for automation state to a template */
- root->add_property ("state", auto_state_to_string (Off));
- }
-
- root->add_property ("style", auto_style_to_string (_style));
-
- if (!_events.empty()) {
- root->add_child_nocopy (serialize_events());
- }
-
- return *root;
-}
-
-XMLNode&
-AutomationList::serialize_events ()
-{
- XMLNode* node = new XMLNode (X_("events"));
- stringstream str;
-
- for (iterator xx = _events.begin(); xx != _events.end(); ++xx) {
- str << (double) (*xx)->when;
- str << ' ';
- str <<(double) (*xx)->value;
- str << '\n';
- }
-
- /* XML is a bit wierd */
-
- XMLNode* content_node = new XMLNode (X_("foo")); /* it gets renamed by libxml when we set content */
- content_node->set_content (str.str());
-
- node->add_child_nocopy (*content_node);
-
- return *node;
-}
-
-int
-AutomationList::deserialize_events (const XMLNode& node)
-{
- if (node.children().empty()) {
- return -1;
- }
-
- XMLNode* content_node = node.children().front();
-
- if (content_node->content().empty()) {
- return -1;
- }
-
- freeze ();
- clear ();
-
- stringstream str (content_node->content());
-
- double x;
- double y;
- bool ok = true;
-
- while (str) {
- str >> x;
- if (!str) {
- break;
- }
- str >> y;
- if (!str) {
- ok = false;
- break;
- }
- fast_simple_add (x, y);
- }
-
- if (!ok) {
- clear ();
- error << _("automation list: cannot load coordinates from XML, all points ignored") << endmsg;
- } else {
- mark_dirty ();
- reposition_for_rt_add (0);
- maybe_signal_changed ();
- }
-
- thaw ();
-
- return 0;
-}
-
-int
-AutomationList::set_state (const XMLNode& node)
-{
- XMLNodeList nlist = node.children();
- XMLNode* nsos;
- XMLNodeIterator niter;
- const XMLProperty* prop;
-
- if (node.name() == X_("events")) {
- /* partial state setting*/
- return deserialize_events (node);
- }
-
- if (node.name() == X_("Envelope") || node.name() == X_("FadeOut") || node.name() == X_("FadeIn")) {
-
- if ((nsos = node.child (X_("AutomationList")))) {
- /* new school in old school clothing */
- return set_state (*nsos);
- }
-
- /* old school */
-
- const XMLNodeList& elist = node.children();
- XMLNodeConstIterator i;
- XMLProperty* prop;
- nframes_t x;
- double y;
-
- freeze ();
- clear ();
-
- for (i = elist.begin(); i != elist.end(); ++i) {
-
- if ((prop = (*i)->property ("x")) == 0) {
- error << _("automation list: no x-coordinate stored for control point (point ignored)") << endmsg;
- continue;
- }
- x = atoi (prop->value().c_str());
-
- if ((prop = (*i)->property ("y")) == 0) {
- error << _("automation list: no y-coordinate stored for control point (point ignored)") << endmsg;
- continue;
- }
- y = atof (prop->value().c_str());
-
- fast_simple_add (x, y);
- }
-
- thaw ();
-
- return 0;
- }
-
- if (node.name() != X_("AutomationList") ) {
- error << string_compose (_("AutomationList: passed XML node called %1, not \"AutomationList\" - ignored"), node.name()) << endmsg;
- return -1;
- }
-
- if ((prop = node.property ("id")) != 0) {
- _id = prop->value ();
- /* update session AL list */
- AutomationListCreated(this);
- }
-
- if ((prop = node.property (X_("automation-id"))) != 0){
- _parameter = Parameter(prop->value());
- } else {
- warning << "Legacy session: automation list has no automation-id property.";
- }
-
- if ((prop = node.property (X_("interpolation-style"))) != 0) {
- _interpolation = (InterpolationStyle)string_2_enum(prop->value(), _interpolation);
- } else {
- _interpolation = Linear;
- }
-
- if ((prop = node.property (X_("default"))) != 0){
- _default_value = atof (prop->value().c_str());
- } else {
- _default_value = 0.0;
- }
-
- if ((prop = node.property (X_("style"))) != 0) {
- _style = string_to_auto_style (prop->value());
- } else {
- _style = Absolute;
- }
-
- if ((prop = node.property (X_("state"))) != 0) {
- _state = string_to_auto_state (prop->value());
- } else {
- _state = Off;
- }
-
- if ((prop = node.property (X_("min_yval"))) != 0) {
- _min_yval = atof (prop->value ().c_str());
- } else {
- _min_yval = FLT_MIN;
- }
-
- if ((prop = node.property (X_("max_yval"))) != 0) {
- _max_yval = atof (prop->value ().c_str());
- } else {
- _max_yval = FLT_MAX;
- }
-
- if ((prop = node.property (X_("max_xval"))) != 0) {
- _max_xval = atof (prop->value ().c_str());
- } else {
- _max_xval = 0; // means "no limit ;
- }
-
- for (niter = nlist.begin(); niter != nlist.end(); ++niter) {
- if ((*niter)->name() == X_("events")) {
- deserialize_events (*(*niter));
- }
- }
-
- return 0;
-}
-
--- /dev/null
+/*
+ Copyright (C) 2002 Paul Davis
+
+ This program is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published by
+ the Free Software Foundation; either version 2 of the License, or
+ (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ GNU General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with this program; if not, write to the Free Software
+ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+*/
+
+#include <set>
+#include <climits>
+#include <float.h>
+#include <cmath>
+#include <sstream>
+#include <algorithm>
+#include <sigc++/bind.h>
+#include <ardour/parameter.h>
+#include <ardour/automation_list.h>
+#include <evoral/Curve.hpp>
+#include <pbd/stacktrace.h>
+#include <pbd/enumwriter.h>
+
+#include "i18n.h"
+
+using namespace std;
+using namespace ARDOUR;
+using namespace sigc;
+using namespace PBD;
+
+sigc::signal<void,AutomationList *> AutomationList::AutomationListCreated;
+
+#if 0
+static void dumpit (const AutomationList& al, string prefix = "")
+{
+ cerr << prefix << &al << endl;
+ for (AutomationList::const_iterator i = al.const_begin(); i != al.const_end(); ++i) {
+ cerr << prefix << '\t' << (*i)->when << ',' << (*i)->value << endl;
+ }
+ cerr << "\n";
+}
+#endif
+
+/* XXX: min_val max_val redundant? (param.min() param.max()) */
+AutomationList::AutomationList (Parameter id)
+ : ControlList(id)
+{
+ _state = Off;
+ _style = Absolute;
+ _touching = false;
+
+ assert(_parameter.type() != NullAutomation);
+ AutomationListCreated(this);
+}
+
+AutomationList::AutomationList (const AutomationList& other)
+ : ControlList(other)
+{
+ _state = other._state;
+ _touching = other._touching;
+
+ assert(_parameter.type() != NullAutomation);
+ AutomationListCreated(this);
+}
+
+AutomationList::AutomationList (const AutomationList& other, double start, double end)
+ : ControlList(other)
+{
+ _style = other._style;
+ _state = other._state;
+ _touching = other._touching;
+
+ assert(_parameter.type() != NullAutomation);
+ AutomationListCreated(this);
+}
+
+/** \a id is used for legacy sessions where the type is not present
+ * in or below the <AutomationList> node. It is used if \a id is non-null.
+ */
+AutomationList::AutomationList (const XMLNode& node, Parameter id)
+ : ControlList(id)
+{
+ _touching = false;
+ _state = Off;
+ _style = Absolute;
+
+ set_state (node);
+
+ if (id)
+ _parameter = id;
+
+ assert(_parameter.type() != NullAutomation);
+ AutomationListCreated(this);
+}
+
+AutomationList::~AutomationList()
+{
+ GoingAway ();
+}
+
+boost::shared_ptr<Evoral::ControlList>
+AutomationList::create(Evoral::Parameter id)
+{
+ return boost::shared_ptr<Evoral::ControlList>(new AutomationList(id));
+}
+
+bool
+AutomationList::operator== (const AutomationList& other)
+{
+ return _events == other._events;
+}
+
+AutomationList&
+AutomationList::operator= (const AutomationList& other)
+{
+ if (this != &other) {
+
+ _events.clear ();
+
+ for (const_iterator i = other._events.begin(); i != other._events.end(); ++i) {
+ _events.push_back (new ControlEvent (**i));
+ }
+
+ _min_yval = other._min_yval;
+ _max_yval = other._max_yval;
+ _max_xval = other._max_xval;
+ _default_value = other._default_value;
+
+ mark_dirty ();
+ maybe_signal_changed ();
+ }
+
+ return *this;
+}
+
+void
+AutomationList::maybe_signal_changed ()
+{
+ ControlList::maybe_signal_changed ();
+
+ if (!_frozen) {
+ StateChanged (); /* EMIT SIGNAL */
+ }
+}
+
+void
+AutomationList::set_automation_state (AutoState s)
+{
+ if (s != _state) {
+ _state = s;
+ automation_state_changed (); /* EMIT SIGNAL */
+ }
+}
+
+void
+AutomationList::set_automation_style (AutoStyle s)
+{
+ if (s != _style) {
+ _style = s;
+ automation_style_changed (); /* EMIT SIGNAL */
+ }
+}
+
+void
+AutomationList::start_touch ()
+{
+ _touching = true;
+ _new_value = true;
+}
+
+void
+AutomationList::stop_touch ()
+{
+ _touching = false;
+ _new_value = false;
+}
+
+void
+AutomationList::freeze ()
+{
+ _frozen++;
+}
+
+void
+AutomationList::thaw ()
+{
+ ControlList::thaw();
+
+ if (_changed_when_thawed) {
+ StateChanged(); /* EMIT SIGNAL */
+ }
+}
+
+void
+AutomationList::mark_dirty () const
+{
+ ControlList::mark_dirty ();
+ Dirty (); /* EMIT SIGNAL */
+}
+
+XMLNode&
+AutomationList::get_state ()
+{
+ return state (true);
+}
+
+XMLNode&
+AutomationList::state (bool full)
+{
+ XMLNode* root = new XMLNode (X_("AutomationList"));
+ char buf[64];
+ LocaleGuard lg (X_("POSIX"));
+
+ root->add_property ("automation-id", _parameter.symbol());
+
+ root->add_property ("id", _id.to_s());
+
+ snprintf (buf, sizeof (buf), "%.12g", _default_value);
+ root->add_property ("default", buf);
+ snprintf (buf, sizeof (buf), "%.12g", _min_yval);
+ root->add_property ("min_yval", buf);
+ snprintf (buf, sizeof (buf), "%.12g", _max_yval);
+ root->add_property ("max_yval", buf);
+ snprintf (buf, sizeof (buf), "%.12g", _max_xval);
+ root->add_property ("max_xval", buf);
+
+ root->add_property ("interpolation-style", enum_2_string (_interpolation));
+
+ if (full) {
+ root->add_property ("state", auto_state_to_string (_state));
+ } else {
+ /* never save anything but Off for automation state to a template */
+ root->add_property ("state", auto_state_to_string (Off));
+ }
+
+ root->add_property ("style", auto_style_to_string (_style));
+
+ if (!_events.empty()) {
+ root->add_child_nocopy (serialize_events());
+ }
+
+ return *root;
+}
+
+XMLNode&
+AutomationList::serialize_events ()
+{
+ XMLNode* node = new XMLNode (X_("events"));
+ stringstream str;
+
+ for (iterator xx = _events.begin(); xx != _events.end(); ++xx) {
+ str << (double) (*xx)->when;
+ str << ' ';
+ str <<(double) (*xx)->value;
+ str << '\n';
+ }
+
+ /* XML is a bit wierd */
+
+ XMLNode* content_node = new XMLNode (X_("foo")); /* it gets renamed by libxml when we set content */
+ content_node->set_content (str.str());
+
+ node->add_child_nocopy (*content_node);
+
+ return *node;
+}
+
+int
+AutomationList::deserialize_events (const XMLNode& node)
+{
+ if (node.children().empty()) {
+ return -1;
+ }
+
+ XMLNode* content_node = node.children().front();
+
+ if (content_node->content().empty()) {
+ return -1;
+ }
+
+ freeze ();
+ clear ();
+
+ stringstream str (content_node->content());
+
+ double x;
+ double y;
+ bool ok = true;
+
+ while (str) {
+ str >> x;
+ if (!str) {
+ break;
+ }
+ str >> y;
+ if (!str) {
+ ok = false;
+ break;
+ }
+ fast_simple_add (x, y);
+ }
+
+ if (!ok) {
+ clear ();
+ error << _("automation list: cannot load coordinates from XML, all points ignored") << endmsg;
+ } else {
+ mark_dirty ();
+ reposition_for_rt_add (0);
+ maybe_signal_changed ();
+ }
+
+ thaw ();
+
+ return 0;
+}
+
+int
+AutomationList::set_state (const XMLNode& node)
+{
+ XMLNodeList nlist = node.children();
+ XMLNode* nsos;
+ XMLNodeIterator niter;
+ const XMLProperty* prop;
+
+ if (node.name() == X_("events")) {
+ /* partial state setting*/
+ return deserialize_events (node);
+ }
+
+ if (node.name() == X_("Envelope") || node.name() == X_("FadeOut") || node.name() == X_("FadeIn")) {
+
+ if ((nsos = node.child (X_("AutomationList")))) {
+ /* new school in old school clothing */
+ return set_state (*nsos);
+ }
+
+ /* old school */
+
+ const XMLNodeList& elist = node.children();
+ XMLNodeConstIterator i;
+ XMLProperty* prop;
+ nframes_t x;
+ double y;
+
+ freeze ();
+ clear ();
+
+ for (i = elist.begin(); i != elist.end(); ++i) {
+
+ if ((prop = (*i)->property ("x")) == 0) {
+ error << _("automation list: no x-coordinate stored for control point (point ignored)") << endmsg;
+ continue;
+ }
+ x = atoi (prop->value().c_str());
+
+ if ((prop = (*i)->property ("y")) == 0) {
+ error << _("automation list: no y-coordinate stored for control point (point ignored)") << endmsg;
+ continue;
+ }
+ y = atof (prop->value().c_str());
+
+ fast_simple_add (x, y);
+ }
+
+ thaw ();
+
+ return 0;
+ }
+
+ if (node.name() != X_("AutomationList") ) {
+ error << string_compose (_("AutomationList: passed XML node called %1, not \"AutomationList\" - ignored"), node.name()) << endmsg;
+ return -1;
+ }
+
+ if ((prop = node.property ("id")) != 0) {
+ _id = prop->value ();
+ /* update session AL list */
+ AutomationListCreated(this);
+ }
+
+ if ((prop = node.property (X_("automation-id"))) != 0){
+ _parameter = Parameter(prop->value());
+ } else {
+ warning << "Legacy session: automation list has no automation-id property.";
+ }
+
+ if ((prop = node.property (X_("interpolation-style"))) != 0) {
+ _interpolation = (InterpolationStyle)string_2_enum(prop->value(), _interpolation);
+ } else {
+ _interpolation = Linear;
+ }
+
+ if ((prop = node.property (X_("default"))) != 0){
+ _default_value = atof (prop->value().c_str());
+ } else {
+ _default_value = 0.0;
+ }
+
+ if ((prop = node.property (X_("style"))) != 0) {
+ _style = string_to_auto_style (prop->value());
+ } else {
+ _style = Absolute;
+ }
+
+ if ((prop = node.property (X_("state"))) != 0) {
+ _state = string_to_auto_state (prop->value());
+ } else {
+ _state = Off;
+ }
+
+ if ((prop = node.property (X_("min_yval"))) != 0) {
+ _min_yval = atof (prop->value ().c_str());
+ } else {
+ _min_yval = FLT_MIN;
+ }
+
+ if ((prop = node.property (X_("max_yval"))) != 0) {
+ _max_yval = atof (prop->value ().c_str());
+ } else {
+ _max_yval = FLT_MAX;
+ }
+
+ if ((prop = node.property (X_("max_xval"))) != 0) {
+ _max_xval = atof (prop->value ().c_str());
+ } else {
+ _max_xval = 0; // means "no limit ;
+ }
+
+ for (niter = nlist.begin(); niter != nlist.end(); ++niter) {
+ if ((*niter)->name() == X_("events")) {
+ deserialize_events (*(*niter));
+ }
+ }
+
+ return 0;
+}
+
+++ /dev/null
-/*
- Copyright (C) 2001-2007 Paul Davis
-
- Contains ideas derived from "Constrained Cubic Spline Interpolation"
- by CJC Kruger (www.korf.co.uk/spline.pdf).
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
-
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
-
-*/
-
-#include <iostream>
-#include <float.h>
-#include <cmath>
-#include <climits>
-#include <cfloat>
-#include <cmath>
-
-#include <glibmm/thread.h>
-#include <sigc++/bind.h>
-
-#include "ardour/curve.h"
-#include "ardour/automation_event.h"
-
-#include "i18n.h"
-
-using namespace std;
-using namespace ARDOUR;
-using namespace sigc;
-using namespace PBD;
-
-Curve::Curve (const AutomationList& al)
- : _dirty (true)
- , _list (al)
-{
- _list.Dirty.connect(mem_fun(*this, &Curve::on_list_dirty));
-}
-
-void
-Curve::solve ()
-{
- uint32_t npoints;
-
- if (!_dirty) {
- return;
- }
-
- if ((npoints = _list.events().size()) > 2) {
-
- /* Compute coefficients needed to efficiently compute a constrained spline
- curve. See "Constrained Cubic Spline Interpolation" by CJC Kruger
- (www.korf.co.uk/spline.pdf) for more details.
- */
-
- double x[npoints];
- double y[npoints];
- uint32_t i;
- AutomationList::EventList::const_iterator xx;
-
- for (i = 0, xx = _list.events().begin(); xx != _list.events().end(); ++xx, ++i) {
- x[i] = (double) (*xx)->when;
- y[i] = (double) (*xx)->value;
- }
-
- double lp0, lp1, fpone;
-
- lp0 = (x[1] - x[0])/(y[1] - y[0]);
- lp1 = (x[2] - x[1])/(y[2] - y[1]);
-
- if (lp0*lp1 < 0) {
- fpone = 0;
- } else {
- fpone = 2 / (lp1 + lp0);
- }
-
- double fplast = 0;
-
- for (i = 0, xx = _list.events().begin(); xx != _list.events().end(); ++xx, ++i) {
-
- double xdelta; /* gcc is wrong about possible uninitialized use */
- double xdelta2; /* ditto */
- double ydelta; /* ditto */
- double fppL, fppR;
- double fpi;
-
- if (i > 0) {
- xdelta = x[i] - x[i-1];
- xdelta2 = xdelta * xdelta;
- ydelta = y[i] - y[i-1];
- }
-
- /* compute (constrained) first derivatives */
-
- if (i == 0) {
-
- /* first segment */
-
- fplast = ((3 * (y[1] - y[0]) / (2 * (x[1] - x[0]))) - (fpone * 0.5));
-
- /* we don't store coefficients for i = 0 */
-
- continue;
-
- } else if (i == npoints - 1) {
-
- /* last segment */
-
- fpi = ((3 * ydelta) / (2 * xdelta)) - (fplast * 0.5);
-
- } else {
-
- /* all other segments */
-
- double slope_before = ((x[i+1] - x[i]) / (y[i+1] - y[i]));
- double slope_after = (xdelta / ydelta);
-
- if (slope_after * slope_before < 0.0) {
- /* slope changed sign */
- fpi = 0.0;
- } else {
- fpi = 2 / (slope_before + slope_after);
- }
-
- }
-
- /* compute second derivative for either side of control point `i' */
-
- fppL = (((-2 * (fpi + (2 * fplast))) / (xdelta))) +
- ((6 * ydelta) / xdelta2);
-
- fppR = (2 * ((2 * fpi) + fplast) / xdelta) -
- ((6 * ydelta) / xdelta2);
-
- /* compute polynomial coefficients */
-
- double b, c, d;
-
- d = (fppR - fppL) / (6 * xdelta);
- c = ((x[i] * fppL) - (x[i-1] * fppR))/(2 * xdelta);
-
- double xim12, xim13;
- double xi2, xi3;
-
- xim12 = x[i-1] * x[i-1]; /* "x[i-1] squared" */
- xim13 = xim12 * x[i-1]; /* "x[i-1] cubed" */
- xi2 = x[i] * x[i]; /* "x[i] squared" */
- xi3 = xi2 * x[i]; /* "x[i] cubed" */
-
- b = (ydelta - (c * (xi2 - xim12)) - (d * (xi3 - xim13))) / xdelta;
-
- /* store */
-
- (*xx)->create_coeffs();
- (*xx)->coeff[0] = y[i-1] - (b * x[i-1]) - (c * xim12) - (d * xim13);
- (*xx)->coeff[1] = b;
- (*xx)->coeff[2] = c;
- (*xx)->coeff[3] = d;
-
- fplast = fpi;
- }
-
- }
-
- _dirty = false;
-}
-
-bool
-Curve::rt_safe_get_vector (double x0, double x1, float *vec, int32_t veclen)
-{
- Glib::Mutex::Lock lm(_list.lock(), Glib::TRY_LOCK);
-
- if (!lm.locked()) {
- return false;
- } else {
- _get_vector (x0, x1, vec, veclen);
- return true;
- }
-}
-
-void
-Curve::get_vector (double x0, double x1, float *vec, int32_t veclen)
-{
- Glib::Mutex::Lock lm(_list.lock());
- _get_vector (x0, x1, vec, veclen);
-}
-
-void
-Curve::_get_vector (double x0, double x1, float *vec, int32_t veclen)
-{
- double rx, dx, lx, hx, max_x, min_x;
- int32_t i;
- int32_t original_veclen;
- int32_t npoints;
-
- if ((npoints = _list.events().size()) == 0) {
- for (i = 0; i < veclen; ++i) {
- vec[i] = _list.default_value();
- }
- return;
- }
-
- /* events is now known not to be empty */
-
- max_x = _list.events().back()->when;
- min_x = _list.events().front()->when;
-
- lx = max (min_x, x0);
-
- if (x1 < 0) {
- x1 = _list.events().back()->when;
- }
-
- hx = min (max_x, x1);
-
- original_veclen = veclen;
-
- if (x0 < min_x) {
-
- /* fill some beginning section of the array with the
- initial (used to be default) value
- */
-
- double frac = (min_x - x0) / (x1 - x0);
- int32_t subveclen = (int32_t) floor (veclen * frac);
-
- subveclen = min (subveclen, veclen);
-
- for (i = 0; i < subveclen; ++i) {
- vec[i] = _list.events().front()->value;
- }
-
- veclen -= subveclen;
- vec += subveclen;
- }
-
- if (veclen && x1 > max_x) {
-
- /* fill some end section of the array with the default or final value */
-
- double frac = (x1 - max_x) / (x1 - x0);
-
- int32_t subveclen = (int32_t) floor (original_veclen * frac);
-
- float val;
-
- subveclen = min (subveclen, veclen);
-
- val = _list.events().back()->value;
-
- i = veclen - subveclen;
-
- for (i = veclen - subveclen; i < veclen; ++i) {
- vec[i] = val;
- }
-
- veclen -= subveclen;
- }
-
- if (veclen == 0) {
- return;
- }
-
- if (npoints == 1 ) {
-
- for (i = 0; i < veclen; ++i) {
- vec[i] = _list.events().front()->value;
- }
- return;
- }
-
-
- if (npoints == 2) {
-
- /* linear interpolation between 2 points */
-
- /* XXX I'm not sure that this is the right thing to
- do here. but its not a common case for the envisaged
- uses.
- */
-
- if (veclen > 1) {
- dx = (hx - lx) / (veclen - 1) ;
- } else {
- dx = 0; // not used
- }
-
- double slope = (_list.events().back()->value - _list.events().front()->value)/
- (_list.events().back()->when - _list.events().front()->when);
- double yfrac = dx*slope;
-
- vec[0] = _list.events().front()->value + slope * (lx - _list.events().front()->when);
-
- for (i = 1; i < veclen; ++i) {
- vec[i] = vec[i-1] + yfrac;
- }
-
- return;
- }
-
- if (_dirty) {
- solve ();
- }
-
- rx = lx;
-
- if (veclen > 1) {
-
- dx = (hx - lx) / veclen;
-
- for (i = 0; i < veclen; ++i, rx += dx) {
- vec[i] = multipoint_eval (rx);
- }
- }
-}
-
-double
-Curve::unlocked_eval (double x)
-{
- // I don't see the point of this...
-
- if (_dirty) {
- solve ();
- }
-
- return _list.unlocked_eval (x);
-}
-
-double
-Curve::multipoint_eval (double x)
-{
- pair<AutomationList::EventList::const_iterator,AutomationList::EventList::const_iterator> range;
-
- AutomationList::LookupCache& lookup_cache = _list.lookup_cache();
-
- if ((lookup_cache.left < 0) ||
- ((lookup_cache.left > x) ||
- (lookup_cache.range.first == _list.events().end()) ||
- ((*lookup_cache.range.second)->when < x))) {
-
- ControlEvent cp (x, 0.0);
-
- lookup_cache.range = equal_range (_list.events().begin(), _list.events().end(), &cp, AutomationList::time_comparator);
- }
-
- range = lookup_cache.range;
-
- /* EITHER
-
- a) x is an existing control point, so first == existing point, second == next point
-
- OR
-
- b) x is between control points, so range is empty (first == second, points to where
- to insert x)
-
- */
-
- if (range.first == range.second) {
-
- /* x does not exist within the list as a control point */
-
- lookup_cache.left = x;
-
- if (range.first == _list.events().begin()) {
- /* we're before the first point */
- // return default_value;
- _list.events().front()->value;
- }
-
- if (range.second == _list.events().end()) {
- /* we're after the last point */
- return _list.events().back()->value;
- }
-
- double x2 = x * x;
- ControlEvent* ev = *range.second;
-
- return ev->coeff[0] + (ev->coeff[1] * x) + (ev->coeff[2] * x2) + (ev->coeff[3] * x2 * x);
- }
-
- /* x is a control point in the data */
- /* invalidate the cached range because its not usable */
- lookup_cache.left = -1;
- return (*range.first)->value;
-}
-
-extern "C" {
-
-void
-curve_get_vector_from_c (void *arg, double x0, double x1, float* vec, int32_t vecsize)
-{
- static_cast<Curve*>(arg)->get_vector (x0, x1, vec, vecsize);
-}
-
-}
#include <ardour/route.h>
#include <ardour/ladspa_plugin.h>
#include <ardour/buffer_set.h>
-#include <ardour/automation_event.h>
+#include <ardour/automation_list.h>
#ifdef HAVE_SLV2
#include <ardour/lv2_plugin.h>
}
} else if (obj_T == typeid (Route).name() || obj_T == typeid (AudioTrack).name() || obj_T == typeid(MidiTrack).name()) {
return new MementoCommand<Route>(*route_by_id(id), before, after);
- } else if (obj_T == typeid (Curve).name() || obj_T == typeid (AutomationList).name()) {
+ } else if (obj_T == typeid (Evoral::Curve).name() || obj_T == typeid (AutomationList).name()) {
if (automation_lists.count(id))
return new MementoCommand<AutomationList>(*automation_lists[id], before, after);
} else if (registry.count(id)) { // For Editor and AutomationLine which are off-limits here