new branch muse2, first checkin

1 files changed, 297 insertions, 0 deletions

diff --git a/muse2/muse/ctrl.cpp b/muse2/muse/ctrl.cpp
new file mode 100644
index 00000000..fa7e5bd7
--- /dev/null
+++ b/muse2/muse/ctrl.cpp
@@ -0,0 +1,297 @@
+//=========================================================
+//  MusE
+//  Linux Music Editor
+//  $Id: ctrl.cpp,v 1.1.2.4 2009/06/10 00:34:59 terminator356 Exp $
+//
+//    controller handling for mixer automation
+//
+//  (C) Copyright 2003 Werner Schweer (ws@seh.de)
+//=========================================================
+
+
+#include <qlocale.h>
+//#include <stdlib.h>
+#include "globals.h"
+#include "ctrl.h"
+#include "xml.h"
+// #include "audio.h"
+
+//---------------------------------------------------------
+//   CtrlList
+//---------------------------------------------------------
+
+CtrlList::CtrlList(int id)
+      {
+      _id      = id;
+      _default = 0.0;
+      _curVal  = 0.0;
+      _mode    = INTERPOLATE;
+      }
+//---------------------------------------------------------
+//   CtrlList
+//---------------------------------------------------------
+CtrlList::CtrlList(int id, QString name, double min, double max)
+{
+      _id      = id;
+      _default = 0.0;
+      _curVal  = 0.0;
+      _mode    = INTERPOLATE;
+      _name    = name;
+      _min     = min;
+      _max     = max;
+}
+//---------------------------------------------------------
+//   CtrlList
+//---------------------------------------------------------
+
+CtrlList::CtrlList()
+      {
+      _id      = 0;
+      _default = 0.0;
+      _curVal  = 0.0;
+      _mode    = INTERPOLATE;
+      }
+
+//---------------------------------------------------------
+//   value
+//---------------------------------------------------------
+
+double CtrlList::value(int frame)
+      {
+      if (!automation || empty()) {
+            return _curVal;
+            }
+      ciCtrl i = upper_bound(frame);
+      if (i == end()) {
+            ciCtrl i = end();
+            --i;
+            const CtrlVal& val = i->second;
+            _curVal = val.val;
+            }
+      else
+      if(_mode == DISCRETE)
+      {
+        if(i == begin())
+          _curVal = _default;
+        else
+        {  
+          --i;
+          const CtrlVal& val = i->second;
+          _curVal = val.val;
+        }  
+      }
+      else {
+            int frame2 = i->second.frame;
+            double val2 = i->second.val;
+            int frame1;
+            double val1;
+            if (i == begin()) {
+                  frame1 = 0;
+                  val1   = _default;
+                  }
+            else {
+                  --i;
+                  frame1 = i->second.frame;
+                  val1   = i->second.val;
+                  }
+            frame -= frame1;
+            val2  -= val1;
+            frame2 -= frame1;
+            val1 += (frame * val2)/frame2;
+            _curVal = val1;
+            }
+// printf("autoVal %d %f\n", frame, _curVal);
+      return _curVal;
+      }
+
+
+//---------------------------------------------------------
+//   setCurVal
+//---------------------------------------------------------
+void CtrlList::setCurVal(double val)
+{
+  _curVal = val;
+  if (size() < 2) {
+    add(0,val);
+  }
+}
+
+//---------------------------------------------------------
+//   add
+//---------------------------------------------------------
+
+void CtrlList::add(int frame, double val)
+      {
+// printf("add %d %f\n", frame, val);
+      iCtrl e = find(frame);
+      if (e != end())
+            e->second.val = val;
+      else
+            insert(std::pair<const int, CtrlVal> (frame, CtrlVal(frame, val)));
+      }
+
+//---------------------------------------------------------
+//   del
+//---------------------------------------------------------
+
+void CtrlList::del(int /* frame*/)
+      {
+      /*
+      iCtrl e = find(frame);
+      if (e == end()) {
+            printf("CtrlList::del(%d): not found\n", frame);
+            return;
+            }
+      erase(e);
+      */
+      }
+
+//---------------------------------------------------------
+//   read
+//---------------------------------------------------------
+
+void CtrlList::read(Xml& xml)
+      {
+      QLocale loc = QLocale::c();
+      bool ok;
+      for (;;) {
+            Xml::Token token = xml.parse();
+            const QString& tag = xml.s1();
+            switch (token) {
+                  case Xml::Error:
+                  case Xml::End:
+                        return;
+                  case Xml::Attribut:
+                        if (tag == "id")
+                        {
+                              //_id = xml.s2().toInt();
+                              _id = loc.toInt(xml.s2(), &ok);
+                              if(!ok)
+                                printf("CtrlList::read failed reading _id string: %s\n", xml.s2().latin1());
+                        }
+                        else if (tag == "cur")
+                        {
+                              //_curVal = xml.s2().toDouble();
+                              _curVal = loc.toDouble(xml.s2(), &ok);
+                              if(!ok)
+                                printf("CtrlList::read failed reading _curVal string: %s\n", xml.s2().latin1());
+                        }        
+                        else
+                              printf("unknown tag %s\n", tag.latin1());
+                        break;
+                  case Xml::Text:
+                        {
+                        // Changed by Tim. Users in some locales reported corrupt reading,
+                        //  because of the way floating point is represented (2,3456 not 2.3456).
+                        /*
+                        const char* s = tag.latin1();
+                        int frame;
+                        double val;
+
+                        for (;;) {
+                              char* endp;
+                              while (*s == ' ' || *s == '\n')
+                                    ++s;
+                              if (*s == 0)
+                                    break;
+                              frame = strtol(s, &endp, 10);
+                              s     = endp;
+                              while (*s == ' ' || *s == '\n')
+                                    ++s;
+                              val = strtod(s, &endp);
+                              add(frame, val);
+                              s = endp;
+                              ++s;
+                              }
+                           */   
+                          
+                          // Added by Tim. p3.3.6
+                          //printf("CtrlList::read tag:%s\n", tag.latin1());
+                          
+                          int len = tag.length();
+                          int frame;
+                          double val;
+  
+                          int i = 0;
+                          for(;;) 
+                          {
+                                while(i < len && (tag[i] == ',' || tag[i] == ' ' || tag[i] == '\n'))
+                                  ++i;
+                                if(i == len)
+                                      break;
+                                
+                                QString fs;
+                                while(i < len && tag[i] != ' ')
+                                {
+                                  fs.append(tag[i]); 
+                                  ++i;
+                                }
+                                if(i == len)
+                                      break;
+                                
+                                // Works OK, but only because if current locale fails it falls back on 'C' locale.
+                                // So, let's skip the fallback and force use of 'C' locale.
+                                //frame = fs.toInt(&ok);
+                                frame = loc.toInt(fs, &ok);
+                                if(!ok)
+                                {
+                                  printf("CtrlList::read failed reading frame string: %s\n", fs.latin1());
+                                  break;
+                                }
+                                  
+                                while(i < len && (tag[i] == ' ' || tag[i] == '\n'))
+                                  ++i;
+                                if(i == len)
+                                      break;
+                                
+                                QString vs;
+                                while(i < len && tag[i] != ' ' && tag[i] != ',')
+                                {
+                                  vs.append(tag[i]); 
+                                  ++i;
+                                }
+                                
+                                // Works OK, but only because if current locale fails it falls back on 'C' locale.
+                                // So, let's skip the fallback and force use of 'C' locale.
+                                //val = vs.toDouble(&ok); 
+                                val = loc.toDouble(vs, &ok);
+                                if(!ok)
+                                {
+                                  printf("CtrlList::read failed reading value string: %s\n", vs.latin1());
+                                  break;
+                                }
+                                  
+                                // Added by Tim. p3.3.6
+                                //printf("CtrlList::read i:%d len:%d fs:%s frame %d: vs:%s val %f \n", i, len, fs.latin1(), frame, vs.latin1(), val);
+                                
+                                add(frame, val);
+                                
+                                if(i == len)
+                                      break;
+                          }
+                        }
+                        break;
+                  case Xml::TagEnd:
+                        if (xml.s1() == "controller")
+                        {
+                              // Added by Tim. p3.3.6
+                              //printf("CtrlList::read _id:%d _curVal:%f\n", _id, _curVal);
+                              
+                              return;
+                        }      
+                  default:
+                        break;
+                  }
+            }
+      }
+
+//---------------------------------------------------------
+//   add
+//---------------------------------------------------------
+
+void CtrlListList::add(CtrlList* vl)
+      {
+//      printf("CtrlListList(%p)::add(id=%d) size %d\n", this, vl->id(), size());
+      insert(std::pair<const int, CtrlList*>(vl->id(), vl));
+      }
+