Added old abandoned KDE3 version of the RoseGarden MIDI tool

git-svn-id: svn://anonsvn.kde.org/home/kde/branches/trinity/applications/rosegarden@1097595 283d02a7-25f6-0310-bc7c-ecb5cbfe19da

1 files changed, 188 insertions, 0 deletions

diff --git a/src/document/XmlStorableEvent.cpp b/src/document/XmlStorableEvent.cpp
new file mode 100644
index 0000000..7688b2a
--- /dev/null
+++ b/src/document/XmlStorableEvent.cpp
@@ -0,0 +1,188 @@
+/* -*- c-basic-offset: 4 indent-tabs-mode: nil -*- vi:set ts=8 sts=4 sw=4: */
+
+/*
+    Rosegarden
+    A MIDI and audio sequencer and musical notation editor.
+ 
+    This program is Copyright 2000-2008
+        Guillaume Laurent   <glaurent@telegraph-road.org>,
+        Chris Cannam        <cannam@all-day-breakfast.com>,
+        Richard Bown        <richard.bown@ferventsoftware.com>
+ 
+    The moral rights of Guillaume Laurent, Chris Cannam, and Richard
+    Bown to claim authorship of this work have been asserted.
+ 
+    Other copyrights also apply to some parts of this work.  Please
+    see the AUTHORS file and individual file headers for details.
+ 
+    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.  See the file
+    COPYING included with this distribution for more information.
+*/
+
+
+#include "XmlStorableEvent.h"
+
+#include "misc/Debug.h"
+#include "misc/Strings.h"
+#include "base/Event.h"
+#include "base/NotationTypes.h"
+#include "gui/editors/notation/NotationStrings.h"
+#include <qstring.h>
+
+
+namespace Rosegarden
+{
+
+XmlStorableEvent::XmlStorableEvent(const QXmlAttributes &attributes,
+                                   timeT &absoluteTime)
+{
+    setDuration(0);
+
+    for (int i = 0; i < attributes.length(); ++i) {
+
+        QString attrName(attributes.qName(i)),
+        attrVal(attributes.value(i));
+
+        if (attrName == "package") {
+
+            RG_DEBUG << "XmlStorableEvent::XmlStorableEvent: Warning: XML still uses deprecated \"package\" attribute" << endl;
+
+        } else if (attrName == "type") {
+
+            setType(qstrtostr(attrVal));
+
+        } else if (attrName == "subordering") {
+
+            bool isNumeric = true;
+            int o = attrVal.toInt(&isNumeric);
+
+            if (!isNumeric) {
+                RG_DEBUG << "XmlStorableEvent::XmlStorableEvent: Bad subordering: " << attrVal << endl;
+            } else {
+                if (o != 0)
+                    setSubOrdering(o);
+            }
+
+        } else if (attrName == "duration") {
+
+            bool isNumeric = true;
+            timeT d = attrVal.toInt(&isNumeric);
+
+            if (!isNumeric) {
+                try {
+                    Note n(NotationStrings::getNoteForName(attrVal));
+                    setDuration(n.getDuration());
+                } catch (NotationStrings::MalformedNoteName m) {
+                    RG_DEBUG << "XmlStorableEvent::XmlStorableEvent: Bad duration: " << attrVal << " (" << m.getMessage() << ")" << endl;
+                }
+            } else {
+                setDuration(d);
+            }
+
+        } else if (attrName == "absoluteTime") {
+
+            bool isNumeric = true;
+            timeT t = attrVal.toInt(&isNumeric);
+
+            if (!isNumeric) {
+                RG_DEBUG << "XmlStorableEvent::XmlStorableEvent: Bad absolute time: " << attrVal << endl;
+            } else {
+                absoluteTime = t;
+            }
+
+        } else if (attrName == "timeOffset") {
+
+            bool isNumeric = true;
+            timeT t = attrVal.toInt(&isNumeric);
+
+            if (!isNumeric) {
+                RG_DEBUG << "XmlStorableEvent::XmlStorableEvent: Bad time offset: " << attrVal << endl;
+            } else {
+                absoluteTime += t;
+            }
+
+        } else {
+
+            // set generic property
+            //
+            QString val(attrVal);
+
+            // Check if boolean val
+            QString valLowerCase(val.lower());
+            bool isNumeric;
+            int numVal;
+
+            if (valLowerCase == "true" || valLowerCase == "false") {
+
+                set
+                    <Bool>(qstrtostr(attrName), valLowerCase == "true");
+
+            } else {
+
+                // Not a bool, check if integer val
+                numVal = val.toInt(&isNumeric);
+                if (isNumeric) {
+                    set
+                        <Int>(qstrtostr(attrName), numVal);
+                } else {
+                    // not an int either, default to string
+                    set
+                        <String>(qstrtostr(attrName), qstrtostr(attrVal));
+                }
+            }
+        }
+    }
+
+    setAbsoluteTime(absoluteTime);
+}
+
+XmlStorableEvent::XmlStorableEvent(Event &e) :
+        Event(e)
+{}
+
+void
+XmlStorableEvent::setPropertyFromAttributes(const QXmlAttributes &attributes,
+        bool persistent)
+{
+    bool have = false;
+    QString name = attributes.value("name");
+    if (name == "") {
+        RG_DEBUG << "XmlStorableEvent::setProperty: no property name found, ignoring" << endl;
+        return ;
+    }
+
+    for (int i = 0; i < attributes.length(); ++i) {
+        QString attrName(attributes.qName(i)),
+        attrVal(attributes.value(i));
+
+        if (attrName == "name") {
+            continue;
+        } else if (have) {
+            RG_DEBUG << "XmlStorableEvent::setProperty: multiple values found, ignoring all but the first" << endl;
+            continue;
+        } else if (attrName == "bool") {
+            set
+                <Bool>(qstrtostr(name), attrVal.lower() == "true",
+                       persistent);
+            have = true;
+        } else if (attrName == "int") {
+            set
+                <Int>(qstrtostr(name), attrVal.toInt(), persistent);
+            have = true;
+        } else if (attrName == "string") {
+            set
+                <String>(qstrtostr(name), qstrtostr(attrVal), persistent);
+            have = true;
+        } else {
+            RG_DEBUG << "XmlStorableEvent::setProperty: unknown attribute name \"" << name << "\", ignoring" << endl;
+        }
+    }
+
+    if (!have)
+        RG_DEBUG << "XmlStorableEvent::setProperty: Warning: no property value found for property " << name << endl;
+}
+
+}