]> git.sesse.net Git - kdenlive/blobdiff - src/renderer.cpp
made effectLists static
[kdenlive] / src / renderer.cpp
index 597235d2cc3991054736cfd654e9722d0701ee0e..64282417fdcda0472ba4ff23459ebf52e305478a 100644 (file)
@@ -25,7 +25,7 @@
 // ffmpeg Header files
 
 extern "C" {
-#include <ffmpeg/avformat.h>
+#include <libavformat/avformat.h>
 }
 #include <QTimer>
 #include <QDir>
@@ -36,9 +36,13 @@ extern "C" {
 #include <KStandardDirs>
 #include <KMessageBox>
 #include <KLocale>
+#include <KTemporaryFile>
 
 #include "renderer.h"
 #include "kdenlivesettings.h"
+#include "kthumb.h"
+//#include <ffmpeg/avformat.h>
+#include <mlt++/Mlt.h>
 
 static void consumer_frame_show(mlt_consumer, Render * self, mlt_frame frame_ptr) {
     // detect if the producer has finished playing. Is there a better way to do it ?
@@ -50,9 +54,9 @@ static void consumer_frame_show(mlt_consumer, Render * self, mlt_frame frame_ptr
     }
 }
 
-Render::Render(const QString & rendererName, int winid, int extid, QWidget *parent): QObject(parent), m_name(rendererName), m_mltConsumer(NULL), m_mltProducer(NULL), m_mltTextProducer(NULL), m_sceneList(QDomDocument()), m_winid(-1), m_framePosition(0), m_generateScenelist(false), m_isBlocked(true) {
-    kDebug() << "//////////  USING PROFILE: " << qstrdup(KdenliveSettings::current_profile().toUtf8());
-    m_mltProfile = new Mlt::Profile((char*) qstrdup(KdenliveSettings::current_profile().toUtf8()));
+Render::Render(const QString & rendererName, int winid, int extid, QWidget *parent): QObject(parent), m_name(rendererName), m_mltConsumer(NULL), m_mltProducer(NULL), m_mltTextProducer(NULL), m_winid(-1), m_framePosition(0), m_generateScenelist(false), m_isBlocked(true) {
+    kDebug() << "//////////  USING PROFILE: " << (char *)KdenliveSettings::current_profile().toUtf8().data();
+    m_mltProfile = new Mlt::Profile((char*) KdenliveSettings::current_profile().data());
     refreshTimer = new QTimer(this);
     connect(refreshTimer, SIGNAL(timeout()), this, SLOT(refresh()));
 
@@ -72,13 +76,18 @@ Render::Render(const QString & rendererName, int winid, int extid, QWidget *pare
         m_mltConsumer->set("resize", 1);
         m_mltConsumer->set("window_id", winid);
         m_mltConsumer->set("terminate_on_pause", 1);
+        m_mltConsumer->set("rescale", "nearest");
+        m_mltConsumer->set("progressive", 1);
+        m_mltConsumer->set("audio_buffer", 1024);
+        m_mltConsumer->set("frequency", 48000);
         m_externalwinid = extid;
         m_winid = winid;
         m_mltConsumer->listen("consumer-frame-show", this, (mlt_listener) consumer_frame_show);
-        Mlt::Producer *producer = new Mlt::Producer(*m_mltProfile , "westley-xml", "<westley><playlist><producer mlt_service=\"colour\" colour=\"blue\" /></playlist></westley>");
+        Mlt::Producer *producer = new Mlt::Producer(*m_mltProfile , "westley-xml", "<westley><playlist><producer mlt_service=\"colour\" colour=\"blue\" in=\"0\" out=\"25\" /></playlist></westley>");
         m_mltProducer = producer;
         m_mltConsumer->connect(*m_mltProducer);
         m_mltProducer->set_speed(0.0);
+
         //m_mltConsumer->start();
         //refresh();
         //initSceneList();
@@ -118,13 +127,42 @@ int Render::resetProfile(QString profile) {
     if (!m_mltConsumer) return 0;
     if (!m_mltConsumer->is_stopped()) m_mltConsumer->stop();
     m_mltConsumer->set("refresh", 0);
-    //TODO: we should also rebuild filters and delete existing m_mltProfile
-    m_mltProfile = new Mlt::Profile((char*) qstrdup(profile.toUtf8()));
-    kDebug() << " + + RESET CONSUMER WITH PROFILE: " << profile;
-    mlt_properties properties = MLT_CONSUMER_PROPERTIES(m_mltConsumer->get_consumer());
-    mlt_properties_set_data(properties, "profile", m_mltProfile->get_profile(), 0, 0, NULL);
+    m_mltConsumer->purge();
+    delete m_mltConsumer;
+    m_mltConsumer = NULL;
+    QString scene = sceneList();
+    if (m_mltProducer) delete m_mltProducer;
+    m_mltProducer = NULL;
+    if (m_mltProfile) delete m_mltProfile;
+    m_mltProfile = NULL;
+
+    m_mltProfile = new Mlt::Profile((char*) profile.toUtf8().data());
+    m_mltConsumer = new Mlt::Consumer(*m_mltProfile , "sdl_preview"); //consumer;
+    m_mltConsumer->set("resize", 1);
+    m_mltConsumer->set("window_id", m_winid);
+    m_mltConsumer->set("terminate_on_pause", 1);
+    m_mltConsumer->listen("consumer-frame-show", this, (mlt_listener) consumer_frame_show);
+    m_mltConsumer->set("rescale", "nearest");
+    m_mltConsumer->set("progressive", 1);
+    m_mltConsumer->set("audio_buffer", 1024);
+    m_mltConsumer->set("frequency", 48000);
+
+    Mlt::Producer *producer = new Mlt::Producer(*m_mltProfile , "westley-xml", (char *) scene.toUtf8().data());
+    m_mltProducer = producer;
+    m_mltConsumer->connect(*m_mltProducer);
+    m_mltProducer->set_speed(0.0);
+
+    //delete m_mltProfile;
+    // mlt_properties properties = MLT_CONSUMER_PROPERTIES(m_mltConsumer->get_consumer());
+    //mlt_profile prof = m_mltProfile->get_profile();
+    //mlt_properties_set_data(properties, "_profile", prof, 0, (mlt_destructor)mlt_profile_close, NULL);
+    //mlt_properties_set(properties, "profile", "hdv_1080_50i");
+    //m_mltConsumer->set("profile", (char *) profile.toUtf8().data());
+    //m_mltProfile = new Mlt::Profile((char*) profile.toUtf8().data());
+    kDebug() << " ++++++++++ RESET CONSUMER WITH PROFILE: " << profile << ", WIDTH: " << m_mltProfile->width();
+
     //apply_profile_properties( m_mltProfile, m_mltConsumer->get_consumer(), properties );
-    refresh();
+    //refresh();
     return 1;
 }
 
@@ -140,11 +178,11 @@ char *Render::decodedString(QString str) {
     char *t = new char[fn.length() + 1];
     strcpy(t, (const char *)fn);*/
 
-    return qstrdup(str.toUtf8().data());   //toLatin1
+    return (char *) qstrdup(str.toUtf8().data());   //toLatin1
 }
 
 //static
-QPixmap Render::frameThumbnail(Mlt::Frame *frame, int width, int height, bool border) {
+/*QPixmap Render::frameThumbnail(Mlt::Frame *frame, int width, int height, bool border) {
     QPixmap pix(width, height);
 
     mlt_image_format format = mlt_image_rgb24a;
@@ -160,16 +198,21 @@ QPixmap Render::frameThumbnail(Mlt::Frame *frame, int width, int height, bool bo
     } else pix.fill(Qt::black);
     return pix;
 }
-
+*/
 
 QPixmap Render::extractFrame(int frame_position, int width, int height) {
+    if (width == -1) {
+        width = m_mltProfile->width();
+        height = m_mltProfile->height();
+    }
     QPixmap pix(width, height);
     if (!m_mltProducer) {
         pix.fill(Qt::black);
         return pix;
     }
-    Mlt::Producer *mlt_producer = m_mltProducer->cut(frame_position, frame_position + 1);
-    Mlt::Filter m_convert(*m_mltProfile, "avcolour_space");
+    //Mlt::Producer *mlt_producer = m_mltProducer->cut(frame_position, frame_position + 1);
+    return KThumb::getFrame(m_mltProducer, frame_position, width, height);
+    /*Mlt::Filter m_convert(*m_mltProfile, "avcolour_space");
     m_convert.set("forced", mlt_image_rgb24a);
     mlt_producer->attach(m_convert);
     Mlt::Frame *frame = mlt_producer->get_frame();
@@ -179,7 +222,7 @@ QPixmap Render::extractFrame(int frame_position, int width, int height) {
         delete frame;
     } else pix.fill(Qt::black);
     delete mlt_producer;
-    return pix;
+    return pix;*/
 }
 
 QPixmap Render::getImageThumbnail(KUrl url, int width, int height) {
@@ -203,7 +246,7 @@ QPixmap Render::getImageThumbnail(KUrl url, int width, int height) {
     //pixmap = im.scaled(width, height);
     return pixmap;
 }
-
+/*
 //static
 QPixmap Render::getVideoThumbnail(char *profile, QString file, int frame_position, int width, int height) {
     QPixmap pix(width, height);
@@ -228,7 +271,7 @@ QPixmap Render::getVideoThumbnail(char *profile, QString file, int frame_positio
     if (prof) delete prof;
     return pix;
 }
-
+*/
 /*
 void Render::getImage(KUrl url, int frame_position, QPoint size)
 {
@@ -323,7 +366,7 @@ bool Render::isValid(KUrl url) {
 
 void Render::getFileProperties(const QDomElement &xml, int clipId) {
     int height = 40;
-    int width = height * 16 / 9.0; //KdenliveSettings::displayratio();
+    int width = (int)(height * 16 / 9.0);   //KdenliveSettings::displayratio();
     QDomDocument doc;
     QDomElement westley = doc.createElement("westley");
     doc.appendChild(westley);
@@ -353,18 +396,14 @@ void Render::getFileProperties(const QDomElement &xml, int clipId) {
     producer.attach(m_convert);
     Mlt::Frame * frame = producer.get_frame();
 
-    filePropertyMap["fps"] =
-        QString::number(mlt_producer_get_fps(producer.get_producer()));
+    //filePropertyMap["fps"] = QString::number(mlt_producer_get_fps(producer.get_producer()));
+    filePropertyMap["fps"] = producer.get("source_fps");
 
     if (frame && frame->is_valid()) {
-        filePropertyMap["width"] =
-            QString::number(frame->get_int("width"));
-        filePropertyMap["height"] =
-            QString::number(frame->get_int("height"));
-        filePropertyMap["frequency"] =
-            QString::number(frame->get_int("frequency"));
-        filePropertyMap["channels"] =
-            QString::number(frame->get_int("channels"));
+        filePropertyMap["frame_size"] = QString::number(frame->get_int("width")) + "x" + QString::number(frame->get_int("height"));
+        filePropertyMap["frequency"] = QString::number(frame->get_int("frequency"));
+        filePropertyMap["channels"] = QString::number(frame->get_int("channels"));
+        filePropertyMap["aspect_ratio"] = frame->get("aspect_ratio");
 
         if (frame->get_int("test_image") == 0) {
             if (url.path().endsWith(".westley") || url.path().endsWith(".kdenlive")) {
@@ -376,7 +415,7 @@ void Render::getFileProperties(const QDomElement &xml, int clipId) {
                 filePropertyMap["type"] = "video";
 
             // Generate thumbnail for this frame
-            QPixmap pixmap = frameThumbnail(frame, width, height, true);
+            QPixmap pixmap = KThumb::getFrame(&producer, 0, width, height);
 
             emit replyGetImage(clipId, 0, pixmap, width, height);
 
@@ -390,7 +429,7 @@ void Render::getFileProperties(const QDomElement &xml, int clipId) {
     // Retrieve audio / video codec name
 
     // Fetch the video_context
-#if 0 //until the reason for the chrashs is found
+#if 1
     AVFormatContext *context = (AVFormatContext *) mlt_properties_get_data(properties, "video_context", NULL);
     if (context != NULL) {
         // Get the video_index
@@ -406,8 +445,6 @@ void Render::getFileProperties(const QDomElement &xml, int clipId) {
             filePropertyMap["audiocodec"] = context->streams[ index ]->codec->codec->name;
     }
 #endif
-
-
     // metadata
 
     mlt_properties metadata = mlt_properties_new();
@@ -425,11 +462,8 @@ void Render::getFileProperties(const QDomElement &xml, int clipId) {
     if (frame) delete frame;
 }
 
-QDomDocument Render::sceneList() const {
-    return m_sceneList;
-}
-
 /** Create the producer from the Westley QDomDocument */
+#if 0
 void Render::initSceneList() {
     kDebug() << "--------  INIT SCENE LIST ------_";
     QDomDocument doc;
@@ -463,14 +497,18 @@ void Render::initSceneList() {
        QString tmp = QString("<westley><producer resource=\"colour\" colour=\"red\" id=\"red\" /><tractor><multitrack><playlist></playlist><playlist></playlist><playlist /><playlist /><playlist></playlist></multitrack></tractor></westley>");*/
     setSceneList(doc, 0);
 }
-
-
+#endif
 /** Create the producer from the Westley QDomDocument */
 void Render::setSceneList(QDomDocument list, int position) {
+    setSceneList(list.toString(), position);
+}
+
+/** Create the producer from the Westley QDomDocument */
+void Render::setSceneList(QString playlist, int position) {
     if (m_winid == -1) return;
     m_generateScenelist = true;
 
-    kWarning() << "//////  RENDER, SET SCENE LIST";
+    kWarning() << "//////  RENDER, SET SCENE LIST: " << playlist;
 
 
     /*
@@ -481,16 +519,11 @@ void Render::setSceneList(QDomDocument list, int position) {
         }*/
 
     if (m_mltConsumer) {
+        m_mltConsumer->stop();
         m_mltConsumer->set("refresh", 0);
-        if (!m_mltConsumer->is_stopped()) {
-            //emitConsumerStopped();
-            m_mltConsumer->stop();
-        }
-    }
-
+    } else return;
     if (m_mltProducer) {
         m_mltProducer->set_speed(0.0);
-
         //if (KdenliveSettings::osdtimecode() && m_osdInfo) m_mltProducer->detach(*m_osdInfo);
 
         delete m_mltProducer;
@@ -498,11 +531,10 @@ void Render::setSceneList(QDomDocument list, int position) {
         emit stopped();
     }
 
-    char *tmp = decodedString(list.toString());
-    //Mlt::Producer clip(profile, "westley-xml", tmp);
-
+    char *tmp = decodedString(playlist);
     m_mltProducer = new Mlt::Producer(*m_mltProfile, "westley-xml", tmp);
     delete[] tmp;
+    if (!m_mltProducer || !m_mltProducer->is_valid()) kDebug() << " WARNING - - - - -INVALID PLAYLIST: " << tmp;
     //m_mltProducer->optimise();
     if (position != 0) m_mltProducer->seek(position);
 
@@ -530,25 +562,72 @@ void Render::setSceneList(QDomDocument list, int position) {
     }*/
 
     m_fps = m_mltProducer->get_fps();
-
     emit durationChanged(m_mltProducer->get_playtime());
-    //m_connectTimer->start( 500 );
+    //m_connectTimer->start( 1000 );
     connectPlaylist();
     m_generateScenelist = false;
 
 }
 
+/** Create the producer from the Westley QDomDocument */
+QString Render::sceneList() {
+    KTemporaryFile temp;
+    QString result;
+
+    if (temp.open()) {
+        saveSceneList(temp.fileName());
+        QFile file(temp.fileName());
+        if (!file.open(QIODevice::ReadOnly | QIODevice::Text)) {
+            kWarning() << "++++++++++++++++   CANNOT READ TMP SCENELIST FILE";
+            return QString();
+        }
+        QTextStream in(&file);
+        while (!in.atEnd()) {
+            result.append(in.readLine());
+        }
+    }
+    return result;
+}
+
+void Render::saveSceneList(QString path, QDomElement addedXml) {
+
+    char *tmppath = decodedString("westley:" + path);
+    Mlt::Consumer westleyConsumer(*m_mltProfile , tmppath);
+    delete[] tmppath;
+    westleyConsumer.set("terminate_on_pause", 1);
+    Mlt::Producer prod(m_mltProducer->get_producer());
+    westleyConsumer.connect(prod);
+    westleyConsumer.start();
+    if (!addedXml.isNull()) {
+        // add Kdenlive specific tags
+        QFile file(path);
+        QDomDocument doc;
+        //doc.setContent(&file, false);
+        doc.appendChild(doc.importNode(addedXml, true));
+        file.close();
+        if (!file.open(QIODevice::WriteOnly | QIODevice::Text)) {
+            kWarning() << "//////  ERROR writing to file: " << path;
+            return;
+        }
+        QTextStream out(&file);
+        out << doc.toString();
+        file.close();
+    }
+}
+
+
 const double Render::fps() const {
     return m_fps;
 }
 
 void Render::connectPlaylist() {
-
+    if (!m_mltConsumer) return;
     m_connectTimer->stop();
+    m_mltConsumer->set("refresh", "0");
     m_mltConsumer->connect(*m_mltProducer);
     m_mltProducer->set_speed(0.0);
     m_mltConsumer->start();
-    //refresh();
+    refresh();
     /*
      if (m_mltConsumer->start() == -1) {
           KMessageBox::error(qApp->activeWindow(), i18n("Could not create the video preview window.\nThere is something wrong with your Kdenlive install or your driver settings, please fix it."));
@@ -653,6 +732,7 @@ void Render::stop() {
     if (m_mltProducer) {
         m_mltProducer->set_speed(0.0);
         m_mltProducer->set("out", m_mltProducer->get_length() - 1);
+        kDebug() << m_mltProducer->get_length();
     }
     kDebug() << "/////////////   RENDER STOP3-------";
 }
@@ -709,7 +789,7 @@ void Render::play(double speed, const GenTime & startTime) {
 
 void Render::play(double speed, const GenTime & startTime,
                   const GenTime & stopTime) {
-    kDebug() << "/////////////   RENDER PLAY3-------" << speed;
+    kDebug() << "/////////////   RENDER PLAY3-------" << speed << stopTime.frames(m_fps);
     if (!m_mltProducer)
         return;
     m_mltProducer->set("out", stopTime.frames(m_fps));
@@ -719,12 +799,6 @@ void Render::play(double speed, const GenTime & startTime,
     refresh();
 }
 
-void Render::render(const KUrl & url) {
-    QDomDocument doc;
-    QDomElement elem = doc.createElement("render");
-    elem.setAttribute("filename", url.path());
-    doc.appendChild(elem);
-}
 
 void Render::sendSeekCommand(GenTime time) {
     if (!m_mltProducer)
@@ -777,7 +851,7 @@ double Render::playSpeed() {
     return 0.0;
 }
 
-const GenTime & Render::seekPosition() const {
+GenTime Render::seekPosition() const {
     if (m_mltProducer) return GenTime((int) m_mltProducer->position(), m_fps);
     else return GenTime();
 }
@@ -821,17 +895,18 @@ void Render::exportCurrentFrame(KUrl url, bool notify) {
 
     int height = 1080;//KdenliveSettings::defaultheight();
     int width = 1940; //KdenliveSettings::displaywidth();
-
-    QPixmap pix(width, height);
-    Mlt::Filter m_convert(*m_mltProfile, "avcolour_space");
-    m_convert.set("forced", mlt_image_rgb24a);
-    m_mltProducer->attach(m_convert);
-    Mlt::Frame * frame = m_mltProducer->get_frame();
-    m_mltProducer->detach(m_convert);
-    if (frame) {
-        pix = frameThumbnail(frame, width, height);
-        delete frame;
-    }
+    QPixmap pix = KThumb::getFrame(m_mltProducer, -1, width, height);
+    /*
+       QPixmap pix(width, height);
+       Mlt::Filter m_convert(*m_mltProfile, "avcolour_space");
+       m_convert.set("forced", mlt_image_rgb24a);
+       m_mltProducer->attach(m_convert);
+       Mlt::Frame * frame = m_mltProducer->get_frame();
+       m_mltProducer->detach(m_convert);
+       if (frame) {
+           pix = frameThumbnail(frame, width, height);
+           delete frame;
+       }*/
     pix.save(url.path(), "PNG");
     //if (notify) QApplication::postEvent(qApp->activeWindow(), new UrlEvent(url, 10003));
 }
@@ -839,24 +914,36 @@ void Render::exportCurrentFrame(KUrl url, bool notify) {
 /** MLT PLAYLIST DIRECT MANIPULATON  **/
 
 
-void Render::mltCheckLength() {
+void Render::mltCheckLength(bool reload) {
     //kDebug()<<"checking track length: "<<track<<"..........";
-    Mlt::Service service(m_mltProducer->get_service());
-    Mlt::Tractor tractor(service);
 
-    int trackNb = tractor.count();
+    if (reload) {
+        //reinsert main tractorin playlist so that the producer can take the new length ( not automatic done)
+        Mlt::Service service(m_mltProducer->get_service());
+        Mlt::Playlist prod(service);
+        Mlt::Service service_playlist(prod.get_clip(0)->get_service());
+        Mlt::Producer producer_playlist(service_playlist);
+
+        Mlt::Tractor tr(producer_playlist.parent());
+        prod.remove(0);
+        prod.insert(tr, 0);
+    }
+    Mlt::Tractor *tractor = getTractor();
+
+    int trackNb = tractor->count();
     double duration = 0;
-    double trackDuration;
+    double trackDuration = 0;
     if (trackNb == 1) {
-        Mlt::Producer trackProducer(tractor.track(0));
+        Mlt::Producer trackProducer(tractor->track(0));
         Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
         duration = Mlt::Producer(trackPlaylist.get_producer()).get_playtime() - 1;
+        kDebug() << trackNb << " " << duration;
         m_mltProducer->set("out", duration);
-        emit durationChanged(duration);
+        emit durationChanged((int)duration);
         return;
     }
     while (trackNb > 1) {
-        Mlt::Producer trackProducer(tractor.track(trackNb - 1));
+        Mlt::Producer trackProducer(tractor->track(trackNb - 1));
         Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
         trackDuration = Mlt::Producer(trackPlaylist.get_producer()).get_playtime() - 1;
 
@@ -865,14 +952,14 @@ void Render::mltCheckLength() {
         trackNb--;
     }
 
-    Mlt::Producer blackTrackProducer(tractor.track(0));
+    Mlt::Producer blackTrackProducer(tractor->track(0));
     Mlt::Playlist blackTrackPlaylist((mlt_playlist) blackTrackProducer.get_service());
     double blackDuration = Mlt::Producer(blackTrackPlaylist.get_producer()).get_playtime() - 1;
     kDebug() << " / / /DURATON FOR TRACK 0 = " << blackDuration;
     if (blackDuration != duration) {
-        blackTrackPlaylist.remove_region(0, blackDuration);
+        blackTrackPlaylist.remove_region(0, (int)blackDuration);
         int i = 0;
-        int dur = duration;
+        int dur = (int)duration;
         QDomDocument doc;
         QDomElement black = doc.createElement("producer");
         black.setAttribute("mlt_service", "colour");
@@ -888,11 +975,34 @@ void Render::mltCheckLength() {
         mltInsertClip(0, GenTime(), black);
 
         m_mltProducer->set("out", duration);
-        emit durationChanged(duration);
+        emit durationChanged((int)duration);
     }
+    if (tractor)
+        delete tractor;
+}
+
+Mlt::Tractor* Render::getTractor() {
+    Mlt::Service s1(m_mltProducer->get_service());
+    Mlt::Playlist pl(s1);
+    Mlt::Producer srv(pl.get_clip(0)->parent());
+    Mlt::Tractor *tractor = new Mlt::Tractor(srv);
+    return tractor;
 }
 
+Mlt::Playlist* Render::getPlaylist(int track) {
+    Mlt::Tractor *tractor = getTractor();
 
+    if (tractor) {
+
+        Mlt::Producer trackProducer(tractor->track(track));
+        Mlt::Service playlistservice(trackProducer.get_service());
+        delete tractor;
+        return new Mlt::Playlist(playlistservice);
+
+    }
+    return NULL;
+
+}
 void Render::mltInsertClip(int track, GenTime position, QDomElement element) {
     if (!m_mltProducer) {
         kDebug() << "PLAYLIST NOT INITIALISED //////";
@@ -904,143 +1014,152 @@ void Render::mltInsertClip(int track, GenTime position, QDomElement element) {
         return;
     }
     m_isBlocked = true;
-    Mlt::Service service(parentProd.get_service());
-    Mlt::Tractor tractor(service);
+    // Mlt::Service service(parentProd.get_service());
+    //Mlt::Tractor tractor(service);
 
     QDomDocument doc;
     doc.appendChild(doc.importNode(element, true));
     QString resource = doc.toString();
+
     kDebug() << "///////  ADDING CLIP TMLNE: " << resource << " ON TRACK: " << track;
-    Mlt::Producer trackProducer(tractor.track(track));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
-    char *tmp = decodedString(resource);
-    Mlt::Producer clip(*m_mltProfile, "westley-xml", tmp);
-    //clip.set_in_and_out(in.frames(m_fps), out.frames(m_fps));
-    delete[] tmp;
+    //Mlt::Tractor *tractor = getTractor();
+    //if (tractor) {
+    Mlt::Playlist *trackPlaylist = getPlaylist(track);
+    if (trackPlaylist) {
+        char *tmp = decodedString(resource);
+        Mlt::Producer clip(*m_mltProfile, "westley-xml", tmp);
+        //clip.set_in_and_out(in.frames(m_fps), out.frames(m_fps));
+        delete[] tmp;
 
-    trackPlaylist.insert_at(position.frames(m_fps), clip, 1);
-    tractor.multitrack()->refresh();
-    tractor.refresh();
-    if (track != 0) mltCheckLength();
+        trackPlaylist->insert_at((int)position.frames(m_fps), clip, 1);
+        //tractor->multitrack()->refresh();
+        //tractor->refresh();
+        if (track != 0) mltCheckLength();
+
+
+
+        delete trackPlaylist;
+        mltSavePlaylist();
+    }
+    //delete tractor;
+    //}
     m_isBlocked = false;
 }
 
 void Render::mltCutClip(int track, GenTime position) {
     m_isBlocked = true;
-    Mlt::Service service(m_mltProducer->parent().get_service());
-    Mlt::Tractor tractor(service);
-    Mlt::Producer trackProducer(tractor.track(track));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
-    trackPlaylist.split_at(position.frames(m_fps));
-    trackPlaylist.consolidate_blanks(0);
-    kDebug() << "/ / / /CUTTING CLIP AT: " << position.frames(m_fps);
+    Mlt::Playlist *trackPlaylist = getPlaylist(track);
+    if (trackPlaylist) {
+        trackPlaylist->split_at((int)position.frames(m_fps));
+        trackPlaylist->consolidate_blanks(0);
+        kDebug() << "/ / / /CUTTING CLIP AT: " << position.frames(m_fps);
+        delete trackPlaylist;
+    }
     m_isBlocked = false;
 }
 
 
 void Render::mltRemoveClip(int track, GenTime position) {
     m_isBlocked = true;
-    Mlt::Service service(m_mltProducer->parent().get_service());
-    Mlt::Tractor tractor(service);
-    Mlt::Producer trackProducer(tractor.track(track));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
-    int clipIndex = trackPlaylist.get_clip_index_at(position.frames(m_fps));
-    //trackPlaylist.remove(clipIndex);
-    trackPlaylist.replace_with_blank(clipIndex);
-    trackPlaylist.consolidate_blanks(0);
-    if (track != 0) mltCheckLength();
+    Mlt::Playlist *trackPlaylist = getPlaylist(track);
+    if (trackPlaylist) {
+        int clipIndex = trackPlaylist->get_clip_index_at((int)position.frames(m_fps));
+        //trackPlaylist.remove(clipIndex);
+        trackPlaylist->replace_with_blank(clipIndex);
+        trackPlaylist->consolidate_blanks(0);
+        if (track != 0) mltCheckLength();
+        delete trackPlaylist;
+    }
     //emit durationChanged();
     m_isBlocked = false;
 }
 
 void Render::mltRemoveEffect(int track, GenTime position, QString index, bool doRefresh) {
-
-    Mlt::Service service(m_mltProducer->parent().get_service());
-
-    Mlt::Tractor tractor(service);
-    Mlt::Producer trackProducer(tractor.track(track));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
-    //int clipIndex = trackPlaylist.get_clip_index_at(position.frames(m_fps));
-    Mlt::Producer *clip = trackPlaylist.get_clip_at(position.frames(m_fps));
-    if (!clip) {
-        kDebug() << " / / / CANNOT FIND CLIP TO REMOVE EFFECT";
-        return;
-    }
-    m_isBlocked = true;
-    Mlt::Service clipService(clip->get_service());
+    Mlt::Playlist *trackPlaylist = getPlaylist(track);
+    if (trackPlaylist) {
+        //int clipIndex = trackPlaylist.get_clip_index_at(position.frames(m_fps));
+        Mlt::Producer *clip = trackPlaylist->get_clip_at((int)position.frames(m_fps));
+        if (!clip) {
+            kDebug() << " / / / CANNOT FIND CLIP TO REMOVE EFFECT";
+            return;
+        }
+        m_isBlocked = true;
+        Mlt::Service clipService(clip->get_service());
 
 //    if (tag.startsWith("ladspa")) tag = "ladspa";
 
-    int ct = 0;
-    Mlt::Filter *filter = clipService.filter(ct);
-    while (filter) {
-        if (index == "-1" || filter->get("kdenlive_ix") == index) {// && filter->get("kdenlive_id") == id) {
-            clipService.detach(*filter);
-            kDebug() << " / / / DLEETED EFFECT: " << ct;
-        } else ct++;
-        filter = clipService.filter(ct);
+        int ct = 0;
+        Mlt::Filter *filter = clipService.filter(ct);
+        while (filter) {
+            if (index == "-1" || filter->get("kdenlive_ix") == index) {// && filter->get("kdenlive_id") == id) {
+                clipService.detach(*filter);
+                kDebug() << " / / / DLEETED EFFECT: " << ct;
+            } else ct++;
+            filter = clipService.filter(ct);
+        }
+        m_isBlocked = false;
+        if (doRefresh) refresh();
+        delete trackPlaylist;
     }
-    m_isBlocked = false;
-    if (doRefresh) refresh();
 }
 
 
 void Render::mltAddEffect(int track, GenTime position, QMap <QString, QString> args, bool doRefresh) {
-    Mlt::Service service(m_mltProducer->parent().get_service());
-    Mlt::Tractor tractor(service);
-    Mlt::Producer trackProducer(tractor.track(track));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
 
-    Mlt::Producer *clip = trackPlaylist.get_clip_at(position.frames(m_fps));
+    Mlt::Playlist *trackPlaylist = getPlaylist(track);
+    if (trackPlaylist) {
+        Mlt::Producer *clip = trackPlaylist->get_clip_at((int)position.frames(m_fps));
 
-    if (!clip) {
-        kDebug() << "**********  CANNOT FIND CLIP TO APPLY EFFECT-----------";
-        return;
-    }
-    Mlt::Service clipService(clip->get_service());
-    m_isBlocked = true;
-    // create filter
-    QString tag = args.value("tag");
-    //kDebug()<<" / / INSERTING EFFECT: "<<id;
-    if (tag.startsWith("ladspa")) tag = "ladspa";
-    char *filterId = decodedString(tag);
-    Mlt::Filter *filter = new Mlt::Filter(*m_mltProfile, filterId);
-    if (filter && filter->is_valid())
-        filter->set("kdenlive_id", filterId);
-    else {
-        kDebug() << "filter is NULL";
-        return;
-    }
-
-    QMap<QString, QString>::Iterator it;
-    QString keyFrameNumber = "#0";
+        if (!clip) {
+            kDebug() << "**********  CANNOT FIND CLIP TO APPLY EFFECT-----------";
+            return;
+        }
+        Mlt::Service clipService(clip->get_service());
+        m_isBlocked = true;
+        // create filter
+        QString tag = args.value("tag");
+        //kDebug()<<" / / INSERTING EFFECT: "<<id;
+        if (tag.startsWith("ladspa")) tag = "ladspa";
+        char *filterId = decodedString(tag);
+        Mlt::Filter *filter = new Mlt::Filter(*m_mltProfile, filterId);
+        if (filter && filter->is_valid())
+            filter->set("kdenlive_id", filterId);
+        else {
+            kDebug() << "filter is NULL";
+            return;
+        }
 
-    for (it = args.begin(); it != args.end(); ++it) {
-        //kDebug()<<" / / INSERTING EFFECT ARGS: "<<it.key()<<": "<<it.data();
-        QString key;
-        QString currentKeyFrameNumber;
-        if (it.key().startsWith("#")) {
-            currentKeyFrameNumber = it.key().section(":", 0, 0);
-            if (currentKeyFrameNumber != keyFrameNumber) {
-                // attach filter to the clip
-                clipService.attach(*filter);
-                filter = new Mlt::Filter(*m_mltProfile, filterId);
-                filter->set("kdenlive_id", filterId);
-                keyFrameNumber = currentKeyFrameNumber;
-            }
-            key = it.key().section(":", 1);
-        } else key = it.key();
-        char *name = decodedString(key);
-        char *value = decodedString(it.value());
-        filter->set(name, value);
-        delete[] name;
-        delete[] value;
+        QMap<QString, QString>::Iterator it;
+        QString keyFrameNumber = "#0";
+
+        for (it = args.begin(); it != args.end(); ++it) {
+            //kDebug()<<" / / INSERTING EFFECT ARGS: "<<it.key()<<": "<<it.data();
+            QString key;
+            QString currentKeyFrameNumber;
+            if (it.key().startsWith("#")) {
+                currentKeyFrameNumber = it.key().section(":", 0, 0);
+                if (currentKeyFrameNumber != keyFrameNumber) {
+                    // attach filter to the clip
+                    clipService.attach(*filter);
+                    filter = new Mlt::Filter(*m_mltProfile, filterId);
+                    filter->set("kdenlive_id", filterId);
+                    keyFrameNumber = currentKeyFrameNumber;
+                }
+                key = it.key().section(":", 1);
+            } else key = it.key();
+            char *name = decodedString(key);
+            char *value = decodedString(it.value());
+            filter->set(name, value);
+            delete[] name;
+            delete[] value;
+        }
+        // attach filter to the clip
+        clipService.attach(*filter);
+        delete[] filterId;
+        m_isBlocked = false;
+        if (doRefresh) refresh();
+        delete trackPlaylist;
     }
-    // attach filter to the clip
-    clipService.attach(*filter);
-    delete[] filterId;
-    m_isBlocked = false;
-    if (doRefresh) refresh();
 
 }
 
@@ -1056,137 +1175,145 @@ void Render::mltEditEffect(int track, GenTime position, QMap <QString, QString>
     }
     m_isBlocked = true;
     // create filter
-    Mlt::Service service(m_mltProducer->parent().get_service());
 
-    Mlt::Tractor tractor(service);
-    Mlt::Producer trackProducer(tractor.track(track));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
+    Mlt::Playlist *trackPlaylist = getPlaylist(track);
     //int clipIndex = trackPlaylist.get_clip_index_at(position.frames(m_fps));
-    Mlt::Producer *clip = trackPlaylist.get_clip_at(position.frames(m_fps));
-    if (!clip) {
-        kDebug() << "WARINIG, CANNOT FIND CLIP ON track: " << track << ", AT POS: " << position.frames(m_fps);
-        m_isBlocked = false;
-        return;
-    }
+    if (trackPlaylist) {
+        Mlt::Producer *clip = trackPlaylist->get_clip_at((int)position.frames(m_fps));
+        if (!clip) {
+            kDebug() << "WARINIG, CANNOT FIND CLIP ON track: " << track << ", AT POS: " << position.frames(m_fps);
+            m_isBlocked = false;
+            return;
+        }
 
-    Mlt::Service clipService(clip->get_service());
+        Mlt::Service clipService(clip->get_service());
 
 //    if (tag.startsWith("ladspa")) tag = "ladspa";
 
-    int ct = 0;
-    Mlt::Filter *filter = clipService.filter(ct);
-    while (filter) {
-        if (filter->get("kdenlive_ix") == index) {
-            break;
+        int ct = 0;
+        Mlt::Filter *filter = clipService.filter(ct);
+        while (filter) {
+            if (filter->get("kdenlive_ix") == index) {
+                break;
+            }
+            ct++;
+            filter = clipService.filter(ct);
         }
-        ct++;
-        filter = clipService.filter(ct);
-    }
 
 
-    if (!filter) {
-        kDebug() << "WARINIG, FILTER FOR EDITING NOT FOUND, ADDING IT!!!!!";
-        mltAddEffect(track, position, args);
-        m_isBlocked = false;
-        return;
-    }
+        if (!filter) {
+            kDebug() << "WARINIG, FILTER FOR EDITING NOT FOUND, ADDING IT!!!!!";
+            mltAddEffect(track, position, args);
+            m_isBlocked = false;
+            return;
+        }
 
-    for (it = args.begin(); it != args.end(); ++it) {
-        kDebug() << " / / EDITING EFFECT ARGS: " << it.key() << ": " << it.value();
-        char *name = decodedString(it.key());
-        char *value = decodedString(it.value());
-        filter->set(name, value);
-        delete[] name;
-        delete[] value;
+        for (it = args.begin(); it != args.end(); ++it) {
+            kDebug() << " / / EDITING EFFECT ARGS: " << it.key() << ": " << it.value();
+            char *name = decodedString(it.key());
+            char *value = decodedString(it.value());
+            filter->set(name, value);
+            delete[] name;
+            delete[] value;
+        }
+        m_isBlocked = false;
+        refresh();
+        delete trackPlaylist;
     }
-    m_isBlocked = false;
-    refresh();
 }
 
 void Render::mltResizeClipEnd(int track, GenTime pos, GenTime in, GenTime out) {
     m_isBlocked = true;
-    Mlt::Service service(m_mltProducer->parent().get_service());
-
-    Mlt::Tractor tractor(service);
-    Mlt::Producer trackProducer(tractor.track(track));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
-    if (trackPlaylist.is_blank_at(pos.frames(m_fps) + 1))
-        kDebug() << "////////  ERROR RSIZING BLANK CLIP!!!!!!!!!!!";
-    int clipIndex = trackPlaylist.get_clip_index_at(pos.frames(m_fps) + 1);
-
-    int previousDuration = trackPlaylist.clip_length(clipIndex) - 1;
-    int newDuration = out.frames(m_fps) - 1;
-
-    kDebug() << " ** RESIZING CLIP END:" << clipIndex << " on track:" << track << ", mid pos: " << pos.frames(25) << ", in: " << in.frames(25) << ", out: " << out.frames(25) << ", PREVIOUS duration: " << previousDuration;
-    trackPlaylist.resize_clip(clipIndex, in.frames(m_fps), newDuration);
-    trackPlaylist.consolidate_blanks(0);
-    if (previousDuration < newDuration) {
-        // clip was made longer, trim next blank if there is one.
-        if (trackPlaylist.is_blank(clipIndex + 1)) {
-            trackPlaylist.split(clipIndex + 1, newDuration - previousDuration);
-            trackPlaylist.remove(clipIndex + 1);
-        }
-    } else trackPlaylist.insert_blank(clipIndex + 1, previousDuration - newDuration - 1);
 
-    trackPlaylist.consolidate_blanks(0);
-    tractor.multitrack()->refresh();
-    tractor.refresh();
-    if (track != 0) mltCheckLength();
-    m_isBlocked = false;
+    Mlt::Playlist *trackPlaylist = getPlaylist(track);
+    if (trackPlaylist) {
+        //Mlt::Tractor *tractor = getTractor();
+        if (trackPlaylist->is_blank_at((int)pos.frames(m_fps) + 1))
+            kDebug() << "////////  ERROR RSIZING BLANK CLIP!!!!!!!!!!!";
+        int clipIndex = trackPlaylist->get_clip_index_at((int)pos.frames(m_fps) + 1);
+
+        int previousDuration = trackPlaylist->clip_length(clipIndex) - 1;
+        int newDuration = (int)(out.frames(m_fps) - 1);
+
+        kDebug() << " ** RESIZING CLIP END:" << clipIndex << " on track:" << track << ", mid pos: " << pos.frames(25) << ", in: " << in.frames(25) << ", out: " << out.frames(25) << ", PREVIOUS duration: " << previousDuration;
+        trackPlaylist->resize_clip(clipIndex, (int)in.frames(m_fps), newDuration);
+        trackPlaylist->consolidate_blanks(0);
+        if (previousDuration < newDuration) {
+            // clip was made longer, trim next blank if there is one.
+            if (trackPlaylist->is_blank(clipIndex + 1)) {
+                trackPlaylist->split(clipIndex + 1, newDuration - previousDuration);
+                trackPlaylist->remove(clipIndex + 1);
+            }
+        } else trackPlaylist->insert_blank(clipIndex + 1, previousDuration - newDuration - 1);
+
+        trackPlaylist->consolidate_blanks(0);
+        //tractor->multitrack()->refresh();
+        //tractor->refresh();
+        if (track != 0) mltCheckLength();
+        //if (tractor)
+        //    delete tractor;
+        m_isBlocked = false;
+        delete trackPlaylist;
+    }
 }
 
 void Render::mltChangeTrackState(int track, bool mute, bool blind) {
-    Mlt::Service service(m_mltProducer->parent().get_service());
-
-    Mlt::Tractor tractor(service);
-    Mlt::Producer trackProducer(tractor.track(track));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
-    if (mute) {
-        if (blind) trackProducer.set("hide", 3);
-        else trackProducer.set("hide", 2);
-    } else if (blind) {
-        trackProducer.set("hide", 1);
-    } else {
-        trackProducer.set("hide", 0);
+
+    Mlt::Tractor *tractor = getTractor();
+    if (tractor) {
+        Mlt::Producer trackProducer(tractor->track(track));
+        if (mute) {
+            if (blind) trackProducer.set("hide", 3);
+            else trackProducer.set("hide", 2);
+        } else if (blind) {
+            trackProducer.set("hide", 1);
+        } else {
+            trackProducer.set("hide", 0);
+        }
+        //tractor->multitrack()->refresh();
+        //tractor->refresh();
+        //delete tractor;
+        refresh();
+        delete tractor;
+
     }
-    tractor.multitrack()->refresh();
-    tractor.refresh();
-    refresh();
 }
 
 void Render::mltResizeClipStart(int track, GenTime pos, GenTime moveEnd, GenTime moveStart, GenTime in, GenTime out) {
     m_isBlocked = true;
-    Mlt::Service service(m_mltProducer->parent().get_service());
-    int moveFrame = (moveEnd - moveStart).frames(m_fps);
-
-    Mlt::Tractor tractor(service);
-    Mlt::Producer trackProducer(tractor.track(track));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
-    if (trackPlaylist.is_blank_at(pos.frames(m_fps) - 1))
-        kDebug() << "////////  ERROR RSIZING BLANK CLIP!!!!!!!!!!!";
-    int clipIndex = trackPlaylist.get_clip_index_at(pos.frames(m_fps) - 1);
-    kDebug() << " ** RESIZING CLIP START:" << clipIndex << " on track:" << track << ", mid pos: " << pos.frames(25) << ", moving: " << moveFrame << ", in: " << in.frames(25) << ", out: " << out.frames(25);
-
-    trackPlaylist.resize_clip(clipIndex, in.frames(m_fps), out.frames(m_fps));
-    if (moveFrame > 0) trackPlaylist.insert_blank(clipIndex, moveFrame - 1);
-    else {
-        int midpos = moveStart.frames(m_fps) - 1; //+ (moveFrame / 2)
-        int blankIndex = trackPlaylist.get_clip_index_at(midpos);
-        int blankLength = trackPlaylist.clip_length(blankIndex);
 
-        kDebug() << " + resizing blank: " << blankIndex << ", Mid: " << midpos << ", Length: " << blankLength << ", SIZE DIFF: " << moveFrame;
+    int moveFrame = (int)((moveEnd - moveStart).frames(m_fps));
 
+    Mlt::Playlist *trackPlaylist = getPlaylist(track);
+    if (trackPlaylist) {
+        if (trackPlaylist->is_blank_at((int)pos.frames(m_fps) - 1))
+            kDebug() << "////////  ERROR RSIZING BLANK CLIP!!!!!!!!!!!";
+        int clipIndex = trackPlaylist->get_clip_index_at((int)pos.frames(m_fps) - 1);
+        kDebug() << " ** RESIZING CLIP START:" << clipIndex << " on track:" << track << ", mid pos: " << pos.frames(25) << ", moving: " << moveFrame << ", in: " << in.frames(25) << ", out: " << out.frames(25);
+
+        trackPlaylist->resize_clip(clipIndex, (int) in.frames(m_fps), (int)out.frames(m_fps));
+        if (moveFrame > 0) trackPlaylist->insert_blank(clipIndex, moveFrame - 1);
+        else {
+            int midpos = (int)moveStart.frames(m_fps) - 1; //+ (moveFrame / 2)
+            int blankIndex = trackPlaylist->get_clip_index_at(midpos);
+            int blankLength = trackPlaylist->clip_length(blankIndex);
+
+            kDebug() << " + resizing blank: " << blankIndex << ", Mid: " << midpos << ", Length: " << blankLength << ", SIZE DIFF: " << moveFrame;
+
+
+            if (blankLength + moveFrame == 0) trackPlaylist->remove(blankIndex);
+            else trackPlaylist->resize_clip(blankIndex, 0, blankLength + moveFrame - 1);
+        }
+        trackPlaylist->consolidate_blanks(0);
+        m_isBlocked = false;
+        kDebug() << "-----------------\n" << "CLIP 0: " << trackPlaylist->clip_start(0) << ", LENGT: " << trackPlaylist->clip_length(0);
+        kDebug() << "CLIP 1: " << trackPlaylist->clip_start(1) << ", LENGT: " << trackPlaylist->clip_length(1);
+        kDebug() << "CLIP 2: " << trackPlaylist->clip_start(2) << ", LENGT: " << trackPlaylist->clip_length(2);
+        kDebug() << "CLIP 3: " << trackPlaylist->clip_start(3) << ", LENGT: " << trackPlaylist->clip_length(3);
+        kDebug() << "CLIP 4: " << trackPlaylist->clip_start(4) << ", LENGT: " << trackPlaylist->clip_length(4);
 
-        if (blankLength + moveFrame == 0) trackPlaylist.remove(blankIndex);
-        else trackPlaylist.resize_clip(blankIndex, 0, blankLength + moveFrame - 1);
+        delete trackPlaylist;
     }
-    trackPlaylist.consolidate_blanks(0);
-    m_isBlocked = false;
-    kDebug() << "-----------------\n" << "CLIP 0: " << trackPlaylist.clip_start(0) << ", LENGT: " << trackPlaylist.clip_length(0);
-    kDebug() << "CLIP 1: " << trackPlaylist.clip_start(1) << ", LENGT: " << trackPlaylist.clip_length(1);
-    kDebug() << "CLIP 2: " << trackPlaylist.clip_start(2) << ", LENGT: " << trackPlaylist.clip_length(2);
-    kDebug() << "CLIP 3: " << trackPlaylist.clip_start(3) << ", LENGT: " << trackPlaylist.clip_length(3);
-    kDebug() << "CLIP 4: " << trackPlaylist.clip_start(4) << ", LENGT: " << trackPlaylist.clip_length(4);
 }
 
 void Render::mltMoveClip(int startTrack, int endTrack, GenTime moveStart, GenTime moveEnd) {
@@ -1197,125 +1324,297 @@ void Render::mltMoveClip(int startTrack, int endTrack, GenTime moveStart, GenTim
 void Render::mltMoveClip(int startTrack, int endTrack, int moveStart, int moveEnd) {
     m_isBlocked = true;
     //m_mltConsumer->set("refresh", 0);
-    Mlt::Service service(m_mltProducer->parent().get_service());
-
-    Mlt::Tractor tractor(service);
-    Mlt::Producer trackProducer(tractor.track(startTrack));
-    Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
-    int clipIndex = trackPlaylist.get_clip_index_at(moveStart + 1);
-    mlt_field field = mlt_tractor_field(tractor.get_tractor());
-    mlt_multitrack multitrack = mlt_field_multitrack(field); //mlt_tractor_multitrack(tractor.get_tractor());
-    kDebug() << " --  CURRENT MULTIOTRACK HAS: " << mlt_multitrack_count(multitrack) << " tracks";;
-    mlt_service multiprod = mlt_multitrack_service(multitrack);
-
-    Mlt::Producer clipProducer(trackPlaylist.replace_with_blank(clipIndex));
-    trackPlaylist.consolidate_blanks(0);
-    mlt_events_block(MLT_PRODUCER_PROPERTIES(trackProducer.get_producer()), NULL);
-
-    if (endTrack == startTrack) {
-        if (!trackPlaylist.is_blank_at(moveEnd)) {
-            kWarning() << "// ERROR, CLIP COLLISION----------";
-            int ix = trackPlaylist.get_clip_index_at(moveEnd);
-            kDebug() << "BAD CLIP STARTS AT: " << trackPlaylist.clip_start(ix) << ", LENGT: " << trackPlaylist.clip_length(ix);
-        }
-        trackPlaylist.insert_at(moveEnd, clipProducer, 1);
-        trackPlaylist.consolidate_blanks(0);
-    } else {
+    Mlt::Tractor *tractor = getTractor();
+    if (tractor) {
+        Mlt::Producer trackProducer(tractor->track(startTrack));
+        Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
+        int clipIndex = trackPlaylist.get_clip_index_at(moveStart + 1);
+        mlt_field field = mlt_tractor_field(tractor->get_tractor());
+        mlt_multitrack multitrack = mlt_field_multitrack(field); //mlt_tractor_multitrack(tractor.get_tractor());
+        kDebug() << " --  CURRENT MULTIOTRACK HAS: " << mlt_multitrack_count(multitrack) << " tracks";;
+        mlt_service multiprod = mlt_multitrack_service(multitrack);
+
+        Mlt::Producer clipProducer(trackPlaylist.replace_with_blank(clipIndex));
         trackPlaylist.consolidate_blanks(0);
-        Mlt::Producer destTrackProducer(tractor.track(endTrack));
-        Mlt::Playlist destTrackPlaylist((mlt_playlist) destTrackProducer.get_service());
-        destTrackPlaylist.consolidate_blanks(1);
-        destTrackPlaylist.insert_at(moveEnd, clipProducer, 1);
-        destTrackPlaylist.consolidate_blanks(0);
-    }
+        mlt_events_block(MLT_PRODUCER_PROPERTIES(trackProducer.get_producer()), NULL);
 
-    mltCheckLength();
-    mlt_events_unblock(MLT_PRODUCER_PROPERTIES(trackProducer.get_producer()), NULL);
-    m_isBlocked = false;
-    m_mltConsumer->set("refresh", 1);
+        if (endTrack == startTrack) {
+            if (!trackPlaylist.is_blank_at(moveEnd)) {
+                kWarning() << "// ERROR, CLIP COLLISION----------";
+                int ix = trackPlaylist.get_clip_index_at(moveEnd);
+                kDebug() << "BAD CLIP STARTS AT: " << trackPlaylist.clip_start(ix) << ", LENGT: " << trackPlaylist.clip_length(ix);
+            }
+            trackPlaylist.insert_at(moveEnd, clipProducer, 1);
+            trackPlaylist.consolidate_blanks(0);
+        } else {
+            trackPlaylist.consolidate_blanks(0);
+            Mlt::Producer destTrackProducer(tractor->track(endTrack));
+            Mlt::Playlist destTrackPlaylist((mlt_playlist) destTrackProducer.get_service());
+            destTrackPlaylist.consolidate_blanks(1);
+            destTrackPlaylist.insert_at(moveEnd, clipProducer, 1);
+            destTrackPlaylist.consolidate_blanks(0);
+        }
+
+        mltCheckLength(false);
+        mlt_events_unblock(MLT_PRODUCER_PROPERTIES(trackProducer.get_producer()), NULL);
+        m_isBlocked = false;
+        m_mltConsumer->set("refresh", 1);
+        delete tractor;
+    }
 }
 
 void Render::mltMoveTransition(QString type, int startTrack, int trackOffset, GenTime oldIn, GenTime oldOut, GenTime newIn, GenTime newOut) {
     m_isBlocked = true;
     m_mltConsumer->set("refresh", 0);
-    mlt_service serv = m_mltProducer->parent().get_service();
-
-    mlt_service nextservice = mlt_service_get_producer(serv);
-    mlt_properties properties = MLT_SERVICE_PROPERTIES(nextservice);
-    QString mlt_type = mlt_properties_get(properties, "mlt_type");
-    QString resource = mlt_properties_get(properties, "mlt_service");
-    int old_pos = (oldIn.frames(m_fps) + oldOut.frames(m_fps)) / 2;
-
-    int new_in = newIn.frames(m_fps);
-    int new_out = newOut.frames(m_fps) - 1;
-    while (mlt_type == "transition") {
-        mlt_transition tr = (mlt_transition) nextservice;
-        int currentTrack = mlt_transition_get_b_track(tr);
-        int currentIn = (int) mlt_transition_get_in(tr);
-        int currentOut = (int) mlt_transition_get_out(tr);
-        kDebug() << "// FOUND EXISTING TRANS, IN: " << currentIn << ", OUT: " << currentOut << ", TRACK: " << currentTrack;
-        //kDebug()<<"// LOOKING FOR IN: "<<old_in<<", OUT: "<<old_out;
-        kDebug() << "// OLD IN: " << oldIn.frames(m_fps) << " // OLD OUT: " << oldOut.frames(m_fps) << ", TRACK: " << startTrack << ", MID POS: " << old_pos;
-        if (resource == type && startTrack == currentTrack && currentIn <= old_pos && currentOut >= old_pos) {
-            mlt_transition_set_in_and_out(tr, new_in, new_out);
-            if (trackOffset != 0) {
-                mlt_properties properties = MLT_TRANSITION_PROPERTIES(tr);
-                mlt_properties_set_int(properties, "a_track", mlt_transition_get_a_track(tr) + trackOffset);
-                mlt_properties_set_int(properties, "b_track", mlt_transition_get_b_track(tr) + trackOffset);
+
+    Mlt::Tractor *tractor = getTractor();
+    if (tractor) {
+        Mlt::Tractor newTractor;
+        mlt_service service = tractor->get_service();
+        mlt_service nextservice = mlt_service_get_producer(service);
+        mlt_properties properties = MLT_SERVICE_PROPERTIES(nextservice);
+        QString mlt_type = mlt_properties_get(properties, "mlt_type");
+        QString resource = mlt_properties_get(properties, "mlt_service");
+        int old_pos = (int)(oldIn.frames(m_fps) + oldOut.frames(m_fps)) / 2;
+
+        int new_in = (int)newIn.frames(m_fps);
+        int new_out = (int)newOut.frames(m_fps) - 1;
+        while (mlt_type == "transition") {
+            mlt_transition tr = (mlt_transition) nextservice;
+            int currentTrack = mlt_transition_get_b_track(tr);
+            int currentIn = (int) mlt_transition_get_in(tr);
+            int currentOut = (int) mlt_transition_get_out(tr);
+
+            //kDebug() << "// OLD IN: " << oldIn.frames(m_fps) << " // OLD OUT: " << oldOut.frames(m_fps) << ", TRACK: " << startTrack << ", CURR TRANS: " <<currentIn<<", MID:"<< old_pos<<currentOut;
+            if (resource == type && startTrack == currentTrack && currentIn <= old_pos && currentOut >= old_pos) {
+                //kDebug() << "// FOUND EXISTING TRANS, IN: " << type << resource << currentIn << ", OUT: " << currentOut << ", TRACK: " << currentTrack;
+                mlt_transition_set_in_and_out(tr, new_in, new_out);
+                if (trackOffset != 0) {
+                    mlt_properties properties = MLT_TRANSITION_PROPERTIES(tr);
+                    mlt_properties_set_int(properties, "a_track", mlt_transition_get_a_track(tr) + trackOffset);
+                    mlt_properties_set_int(properties, "b_track", mlt_transition_get_b_track(tr) + trackOffset);
+                    //kDebug() << "set new start & end :" << new_in << new_out<< "TR OFFSET: "<<trackOffset<<", TRACKS: "<<mlt_transition_get_a_track(tr)<<"x"<<mlt_transition_get_b_track(tr);
+                }
+                break;
             }
-            break;
+            nextservice = mlt_service_producer(nextservice);
+            properties = MLT_SERVICE_PROPERTIES(nextservice);
+            mlt_type = mlt_properties_get(properties, "mlt_type");
+            resource = mlt_properties_get(properties, "mlt_service");
         }
-        nextservice = mlt_service_producer(nextservice);
-        properties = MLT_SERVICE_PROPERTIES(nextservice);
-        mlt_type = mlt_properties_get(properties, "mlt_type");
-        resource = mlt_properties_get(properties, "mlt_service");
+        m_isBlocked = false;
+        delete tractor;
     }
-    m_isBlocked = false;
+    mltSavePlaylist();
+    m_mltConsumer->set("refresh", 1);
+}
+
+void Render::mltUpdateTransition(QString oldTag, QString tag, int a_track, int b_track, GenTime in, GenTime out, QDomElement xml) {
+    //kDebug() << "update transition"  << tag;
+    if (oldTag == tag) mltUpdateTransitionParams(tag, a_track, b_track, in, out, xml);
+    else {
+        mltDeleteTransition(oldTag, a_track, b_track, in, out, xml, false);
+        mltAddTransition(tag, a_track, b_track, in, out, xml);
+    }
+    mltSavePlaylist();
 }
 
-void Render::mltAddTransition(QString tag, int a_track, int b_track, GenTime in, GenTime out, QMap <QString, QString> args) {
+void Render::mltUpdateTransitionParams(QString type, int a_track, int b_track, GenTime in, GenTime out, QDomElement xml) {
     m_isBlocked = true;
-    Mlt::Service service(m_mltProducer->parent().get_service());
-
-    Mlt::Tractor tractor(service);
-    Mlt::Field *field = tractor.field();
-    char *transId = decodedString(tag);
-    Mlt::Transition *transition = new Mlt::Transition(*m_mltProfile, transId);
-    transition->set_in_and_out((int) in.frames(m_fps), (int) out.frames(m_fps));
-    QMap<QString, QString>::Iterator it;
-    QString key;
-
-    kDebug() << " ------  ADDING TRANSITION PARAMs: " << args.count();
-
-    for (it = args.begin(); it != args.end(); ++it) {
-        key = it.key();
-        char *name = decodedString(key);
-        char *value = decodedString(it.value());
-        transition->set(name, value);
-        kDebug() << " ------  ADDING TRANS PARAM: " << name << ": " << value;
-        //filter->set("kdenlive_id", id);
-        delete[] name;
-        delete[] value;
+    m_mltConsumer->set("refresh", 0);
+
+    Mlt::Tractor *tractor = getTractor();
+    if (tractor) {
+        Mlt::Tractor newTractor;
+        mlt_service service = tractor->get_service();
+        mlt_service nextservice = mlt_service_get_producer(service);
+        mlt_properties properties = MLT_SERVICE_PROPERTIES(nextservice);
+        QString mlt_type = mlt_properties_get(properties, "mlt_type");
+        QString resource = mlt_properties_get(properties, "mlt_service");
+        int in_pos = (int) in.frames(m_fps);
+        int out_pos = (int) out.frames(m_fps);
+
+        while (mlt_type == "transition") {
+            mlt_transition tr = (mlt_transition) nextservice;
+            int currentTrack = mlt_transition_get_b_track(tr);
+            int currentIn = (int) mlt_transition_get_in(tr);
+            int currentOut = (int) mlt_transition_get_out(tr);
+            kDebug() << "TRACK: " << b_track << " / " << currentTrack << ", CURR TRANS: " << currentIn << "x" << currentOut << ", LOOKING OFR: " << in_pos << "x" << out_pos;
+            if (resource == type && b_track == currentTrack && currentIn == in_pos && currentOut == out_pos) {
+                QMap<QString, QString> map = mltGetTransitionParamsFromXml(xml);
+                QMap<QString, QString>::Iterator it;
+                QString key;
+                mlt_properties transproperties = MLT_TRANSITION_PROPERTIES(tr);
+
+                for (it = map.begin(); it != map.end(); ++it) {
+                    key = it.key();
+                    char *name = decodedString(key);
+                    char *value = decodedString(it.value());
+                    mlt_properties_set(transproperties, name, value);
+                    kDebug() << " ------  UPDATING TRANS PARAM: " << name << ": " << value;
+                    //filter->set("kdenlive_id", id);
+                    delete[] name;
+                    delete[] value;
+                }
+                break;
+            }
+            nextservice = mlt_service_producer(nextservice);
+            properties = MLT_SERVICE_PROPERTIES(nextservice);
+            mlt_type = mlt_properties_get(properties, "mlt_type");
+            resource = mlt_properties_get(properties, "mlt_service");
+        }
+        m_isBlocked = false;
+        delete tractor;
     }
-    // attach filter to the clip
-    field->plant_transition(*transition, a_track, b_track);
-    delete[] transId;
-    m_isBlocked = false;
-    refresh();
+    m_mltConsumer->set("refresh", 1);
+}
 
+void Render::replaceTimelineTractor(Mlt::Tractor t) {
+    Mlt::Service service(m_mltProducer->get_service());
+    Mlt::Playlist prod(service);
+    Mlt::Service service_playlist(prod.get_clip(0)->get_service());
+    prod.remove(0);
+    prod.insert(t, 0);
+    kDebug() << "newTractor inserted";
+}
+
+void Render::mltDeleteTransition(QString tag, int a_track, int b_track, GenTime in, GenTime out, QDomElement xml, bool do_refresh) {
+
+    Mlt::Tractor *tractor = getTractor();
+    if (tractor) {
+        Mlt::Tractor newTractor;
+        mlt_service service = tractor->get_service();
+        mlt_service nextservice = mlt_service_get_producer(service);
+        int old_position = m_mltProducer->position();
+        for (int track = 0;track < 10;track++) {
+            Mlt::Producer *trackprod = tractor->track(track);
+            if (!trackprod)
+                continue;
+            newTractor.multitrack()->connect(*trackprod, track);
+        }
+        for (int i = 2;i <= 5;i++) {
+            Mlt::Transition tr(*m_mltProfile, "mix");
+            tr.set("combine", 1);
+            tr.set("internal_added", 237);
+            tr.set_in_and_out(0, 15000);
+            newTractor.plant_transition(tr, 1, i);
+        }
+        while (nextservice != NULL) {
+            mlt_properties prop = MLT_SERVICE_PROPERTIES(nextservice);
+            //kDebug() << mlt_properties_get(prop, "mlt_type") << mlt_properties_get(prop, "id");
+            if (QString(mlt_properties_get(prop, "mlt_type")) == "transition" && QString(mlt_properties_get(prop, "internal_added")) != "237") {
+
+                mlt_transition tr = (mlt_transition) nextservice;
+                Mlt::Transition transition(tr);
+                int current_a_track = mlt_transition_get_a_track(tr);
+                int current_b_track = mlt_transition_get_b_track(tr);
+                int currentIn = (int) mlt_transition_get_in(tr);
+                int currentOut = (int) mlt_transition_get_out(tr);
+                int old_pos = (int)((in.frames(m_fps) + out.frames(m_fps)) / 2);
+                kDebug() << current_a_track << current_b_track << a_track << b_track << currentIn << currentOut << old_pos << mlt_properties_get(prop, "mlt_service");
+                if (current_a_track == a_track &&  b_track == current_b_track && currentIn <= old_pos && currentOut >= old_pos) {
+                    kDebug() << "removing " << mlt_properties_get(prop, "mlt_service");
+                } else
+                    newTractor.plant_transition(transition, current_a_track, current_b_track);
+            }
+            nextservice = mlt_service_producer(nextservice);
+        }
+
+        replaceTimelineTractor(newTractor);
+        m_mltProducer->seek(old_position);
+        delete tractor;
+        if (do_refresh) refresh();
+    }
+
+}
+
+QMap<QString, QString> Render::mltGetTransitionParamsFromXml(QDomElement xml) {
+    QDomNodeList attribs = xml.elementsByTagName("parameter");
+    QMap<QString, QString> map;
+    for (int i = 0;i < attribs.count();i++) {
+        QDomElement e = attribs.item(i).toElement();
+        QString name = e.attribute("name");
+        //kDebug()<<"-- TRANSITION PARAM: "<<name<<" = "<< e.attribute("name")<<" / " << e.attribute("value");
+        map[name] = e.attribute("default");
+        if (!e.attribute("value").isEmpty()) {
+            map[name] = e.attribute("value");
+        }
+        if (!e.attribute("factor").isEmpty() && e.attribute("factor").toDouble() > 0) {
+            map[name] = QString::number(map[name].toDouble() / e.attribute("factor").toDouble());
+            //map[name]=map[name].replace(".",","); //FIXME how to solve locale conversion of . ,
+        }
+
+        if (e.attribute("namedesc").contains(";")) {
+            QString format = e.attribute("format");
+            QStringList separators = format.split("%d", QString::SkipEmptyParts);
+            QStringList values = e.attribute("value").split(QRegExp("[,:;x]"));
+            QString neu;
+            QTextStream txtNeu(&neu);
+            if (values.size() > 0)
+                txtNeu << (int)values[0].toDouble();
+            int i = 0;
+            for (i = 0;i < separators.size() && i + 1 < values.size();i++) {
+                txtNeu << separators[i];
+                txtNeu << (int)(values[i+1].toDouble());
+            }
+            if (i < separators.size())
+                txtNeu << separators[i];
+            map[e.attribute("name")] = neu;
+        }
+
+    }
+    return map;
+}
+
+void Render::mltAddTransition(QString tag, int a_track, int b_track, GenTime in, GenTime out, QDomElement xml, bool do_refresh) {
+    //kDebug() << "-- ADDING TRANSITION: " << tag << ", ON TRACKS: " << a_track << ", " << b_track;
+    QMap<QString, QString> map = mltGetTransitionParamsFromXml(xml);
+
+    Mlt::Tractor *tractor = getTractor();
+    if (tractor) {
+        Mlt::Field *field = tractor->field();
+        char *transId = decodedString(tag);
+        Mlt::Transition transition(*m_mltProfile, transId);
+        if (!transition.get_transition()) {
+            kDebug() << "NO transition is " << transition.get_transition() << "requested was " << tag << a_track << b_track << in.frames(m_fps) << out.frames(m_fps);
+            return;
+        }
+        transition.set_in_and_out((int) in.frames(m_fps), (int) out.frames(m_fps));
+        QMap<QString, QString>::Iterator it;
+        QString key;
+
+        kDebug() << " ------  ADDING TRANSITION PARAMs: " << map.count();
+
+        for (it = map.begin(); it != map.end(); ++it) {
+            key = it.key();
+            char *name = decodedString(key);
+            char *value = decodedString(it.value());
+            transition.set(name, value);
+            kDebug() << " ------  ADDING TRANS PARAM: " << name << ": " << value;
+            //filter->set("kdenlive_id", id);
+            delete[] name;
+            delete[] value;
+        }
+        // attach filter to the clip
+        field->plant_transition(transition, a_track, b_track);
+        delete[] transId;
+        mltSavePlaylist();
+        if (do_refresh) refresh();
+        delete tractor;
+    }
 }
 
 void Render::mltSavePlaylist() {
     kWarning() << "// UPDATING PLAYLIST TO DISK++++++++++++++++";
-    Mlt::Consumer *fileConsumer = new Mlt::Consumer(*m_mltProfile, "westley");
-    fileConsumer->set("resource", "/home/one/playlist.xml");
+    Mlt::Consumer fileConsumer(*m_mltProfile, "westley");
+    fileConsumer.set("resource", "/tmp/playlist.westley");
 
     Mlt::Service service(m_mltProducer->get_service());
-    Mlt::Tractor tractor(service);
 
-    fileConsumer->connect(service);
-    fileConsumer->start();
+    fileConsumer.connect(service);
+    fileConsumer.start();
 
 }
 
 #include "renderer.moc"
+