git.sesse.net Git - kdenlive/blob - src/renderer.cpp

   1 /***************************************************************************
   2                         krender.cpp  -  description
   3                            -------------------
   4   begin                : Fri Nov 22 2002
   5   copyright            : (C) 2002 by Jason Wood
   6   email                : jasonwood@blueyonder.co.uk
   7   copyright            : (C) 2005 Lucio Flavio Correa
   8   email                : lucio.correa@gmail.com
   9   copyright            : (C) Marco Gittler
  10   email                : g.marco@freenet.de
  11   copyright            : (C) 2006 Jean-Baptiste Mardelle
  12   email                : jb@ader.ch
  13
  14 ***************************************************************************/
  15
  16 /***************************************************************************
  17  *                                                                         *
  18  *   This program is free software; you can redistribute it and/or modify  *
  19  *   it under the terms of the GNU General Public License as published by  *
  20  *   the Free Software Foundation; either version 2 of the License, or     *
  21  *   (at your option) any later version.                                   *
  22  *                                                                         *
  23  ***************************************************************************/
  24
  25 // ffmpeg Header files
  26
  27 extern "C" {
  28 //#include <libavformat/avformat.h>
  29 }
  30 #include <QTimer>
  31 #include <QDir>
  32 #include <QApplication>
  33 #include <QPainter>
  34
  35 #include <KDebug>
  36 #include <KStandardDirs>
  37 #include <KMessageBox>
  38 #include <KLocale>
  39 #include <KTemporaryFile>
  40
  41 #include "renderer.h"
  42 #include "kdenlivesettings.h"
  43 #include "kthumb.h"
  44
  45 static void consumer_frame_show(mlt_consumer, Render * self, mlt_frame frame_ptr) {
  46     // detect if the producer has finished playing. Is there a better way to do it ?
  47     //if (self->isBlocked) return;
  48     if (mlt_properties_get_double(MLT_FRAME_PROPERTIES(frame_ptr), "_speed") == 0.0) {
  49         self->emitConsumerStopped();
  50     } else {
  51         self->emitFrameNumber(mlt_frame_get_position(frame_ptr));
  52     }
  53 }
  54
  55 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) {
  56     kDebug() << "//////////  USING PROFILE: " << (char *)KdenliveSettings::current_profile().toUtf8().data();
  57     m_mltProfile = new Mlt::Profile((char*) KdenliveSettings::current_profile().data());
  58     refreshTimer = new QTimer(this);
  59     connect(refreshTimer, SIGNAL(timeout()), this, SLOT(refresh()));
  60
  61     m_connectTimer = new QTimer(this);
  62     connect(m_connectTimer, SIGNAL(timeout()), this, SLOT(connectPlaylist()));
  63
  64     if (rendererName == "project") m_monitorId = 10000;
  65     else m_monitorId = 10001;
  66     osdTimer = new QTimer(this);
  67     connect(osdTimer, SIGNAL(timeout()), this, SLOT(slotOsdTimeout()));
  68
  69     m_osdProfile =   KStandardDirs::locate("data", "kdenlive/profiles/metadata.properties");
  70     //if (rendererName == "clip")
  71     {
  72         //Mlt::Consumer *consumer = new Mlt::Consumer( profile , "sdl_preview");
  73         m_mltConsumer = new Mlt::Consumer(*m_mltProfile , "sdl_preview"); //consumer;
  74         m_mltConsumer->set("resize", 1);
  75         m_mltConsumer->set("window_id", winid);
  76         m_mltConsumer->set("terminate_on_pause", 1);
  77         m_externalwinid = extid;
  78         m_winid = winid;
  79         m_mltConsumer->listen("consumer-frame-show", this, (mlt_listener) consumer_frame_show);
  80         Mlt::Producer *producer = new Mlt::Producer(*m_mltProfile , "westley-xml", "<westley><playlist><producer mlt_service=\"colour\" colour=\"blue\" in=\"0\" out=\"25\" /></playlist></westley>");
  81         m_mltProducer = producer;
  82         m_mltConsumer->connect(*m_mltProducer);
  83         m_mltProducer->set_speed(0.0);
  84         //m_mltConsumer->start();
  85         //refresh();
  86         //initSceneList();
  87     }
  88     /*m_osdInfo = new Mlt::Filter("data_show");
  89     char *tmp = decodedString(m_osdProfile);
  90     m_osdInfo->set("resource", tmp);
  91     delete[] tmp;*/
  92     //      Does it do anything usefull? I mean, RenderThread doesn't do anything useful at the moment
  93     //      (except being cpu hungry :)
  94
  95     /*      if(!s_renderThread) {
  96     s_renderThread = new RenderThread;
  97     s_renderThread->start();
  98     } */
  99 }
 100
 101 Render::~Render() {
 102     closeMlt();
 103 }
 104
 105
 106 void Render::closeMlt() {
 107     delete m_connectTimer;
 108     delete osdTimer;
 109     delete refreshTimer;
 110     if (m_mltConsumer)
 111         delete m_mltConsumer;
 112     if (m_mltProducer)
 113         delete m_mltProducer;
 114     //delete m_osdInfo;
 115 }
 116
 117
 118
 119 int Render::resetProfile(QString profile) {
 120     if (!m_mltConsumer) return 0;
 121     if (!m_mltConsumer->is_stopped()) m_mltConsumer->stop();
 122     m_mltConsumer->set("refresh", 0);
 123     m_mltConsumer->purge();
 124     delete m_mltConsumer;
 125     m_mltConsumer = NULL;
 126     QString scene = sceneList();
 127     if (m_mltProducer) delete m_mltProducer;
 128     m_mltProducer = NULL;
 129     if (m_mltProfile) delete m_mltProfile;
 130     m_mltProfile = NULL;
 131
 132     m_mltProfile = new Mlt::Profile((char*) profile.toUtf8().data());
 133     m_mltConsumer = new Mlt::Consumer(*m_mltProfile , "sdl_preview"); //consumer;
 134     m_mltConsumer->set("resize", 1);
 135     m_mltConsumer->set("window_id", m_winid);
 136     m_mltConsumer->set("terminate_on_pause", 1);
 137     m_mltConsumer->listen("consumer-frame-show", this, (mlt_listener) consumer_frame_show);
 138
 139     Mlt::Producer *producer = new Mlt::Producer(*m_mltProfile , "westley-xml", (char *) scene.toUtf8().data());
 140     m_mltProducer = producer;
 141     m_mltConsumer->connect(*m_mltProducer);
 142     m_mltProducer->set_speed(0.0);
 143
 144     //delete m_mltProfile;
 145     // mlt_properties properties = MLT_CONSUMER_PROPERTIES(m_mltConsumer->get_consumer());
 146     //mlt_profile prof = m_mltProfile->get_profile();
 147     //mlt_properties_set_data(properties, "_profile", prof, 0, (mlt_destructor)mlt_profile_close, NULL);
 148     //mlt_properties_set(properties, "profile", "hdv_1080_50i");
 149     //m_mltConsumer->set("profile", (char *) profile.toUtf8().data());
 150     //m_mltProfile = new Mlt::Profile((char*) profile.toUtf8().data());
 151     kDebug() << " ++++++++++ RESET CONSUMER WITH PROFILE: " << profile << ", WIDTH: " << m_mltProfile->width();
 152
 153     //apply_profile_properties( m_mltProfile, m_mltConsumer->get_consumer(), properties );
 154     //refresh();
 155     return 1;
 156 }
 157
 158 /** Wraps the VEML command of the same name; Seeks the renderer clip to the given time. */
 159 void Render::seek(GenTime time) {
 160     sendSeekCommand(time);
 161     //emit positionChanged(time);
 162 }
 163
 164 //static
 165 char *Render::decodedString(QString str) {
 166     /*QCString fn = QFile::encodeName(str);
 167     char *t = new char[fn.length() + 1];
 168     strcpy(t, (const char *)fn);*/
 169
 170     return (char *) qstrdup(str.toUtf8().data());   //toLatin1
 171 }
 172
 173 //static
 174 /*QPixmap Render::frameThumbnail(Mlt::Frame *frame, int width, int height, bool border) {
 175     QPixmap pix(width, height);
 176
 177     mlt_image_format format = mlt_image_rgb24a;
 178     uint8_t *thumb = frame->get_image(format, width, height);
 179     QImage image(thumb, width, height, QImage::Format_ARGB32);
 180
 181     if (!image.isNull()) {
 182         pix = pix.fromImage(image);
 183         if (border) {
 184             QPainter painter(&pix);
 185             painter.drawRect(0, 0, width - 1, height - 1);
 186         }
 187     } else pix.fill(Qt::black);
 188     return pix;
 189 }
 190 */
 191
 192 QPixmap Render::extractFrame(int frame_position, int width, int height) {
 193     QPixmap pix(width, height);
 194     if (!m_mltProducer) {
 195         pix.fill(Qt::black);
 196         return pix;
 197     }
 198     Mlt::Producer *mlt_producer = m_mltProducer->cut(frame_position, frame_position + 1);
 199     return KThumb::getFrame(m_mltProducer, -1, width, height);
 200     /*Mlt::Filter m_convert(*m_mltProfile, "avcolour_space");
 201     m_convert.set("forced", mlt_image_rgb24a);
 202     mlt_producer->attach(m_convert);
 203     Mlt::Frame *frame = mlt_producer->get_frame();
 204
 205     if (frame) {
 206         pix = frameThumbnail(frame, width, height);
 207         delete frame;
 208     } else pix.fill(Qt::black);
 209     delete mlt_producer;
 210     return pix;*/
 211 }
 212
 213 QPixmap Render::getImageThumbnail(KUrl url, int width, int height) {
 214     QImage im;
 215     QPixmap pixmap;
 216     if (url.fileName().startsWith(".all.")) {  //  check for slideshow
 217         QString fileType = url.fileName().right(3);
 218         QStringList more;
 219         QStringList::Iterator it;
 220
 221         QDir dir(url.directory());
 222         more = dir.entryList(QDir::Files);
 223
 224         for (it = more.begin() ; it != more.end() ; ++it) {
 225             if ((*it).endsWith("." + fileType, Qt::CaseInsensitive)) {
 226                 im.load(url.directory() + "/" + *it);
 227                 break;
 228             }
 229         }
 230     } else im.load(url.path());
 231     //pixmap = im.scaled(width, height);
 232     return pixmap;
 233 }
 234 /*
 235 //static
 236 QPixmap Render::getVideoThumbnail(char *profile, QString file, int frame_position, int width, int height) {
 237     QPixmap pix(width, height);
 238     char *tmp = decodedString(file);
 239     Mlt::Profile *prof = new Mlt::Profile(profile);
 240     Mlt::Producer m_producer(*prof, tmp);
 241     delete[] tmp;
 242     if (m_producer.is_blank()) {
 243         pix.fill(Qt::black);
 244         return pix;
 245     }
 246
 247     Mlt::Filter m_convert(*prof, "avcolour_space");
 248     m_convert.set("forced", mlt_image_rgb24a);
 249     m_producer.attach(m_convert);
 250     m_producer.seek(frame_position);
 251     Mlt::Frame * frame = m_producer.get_frame();
 252     if (frame) {
 253         pix = frameThumbnail(frame, width, height, true);
 254         delete frame;
 255     }
 256     if (prof) delete prof;
 257     return pix;
 258 }
 259 */
 260 /*
 261 void Render::getImage(KUrl url, int frame_position, QPoint size)
 262 {
 263     char *tmp = decodedString(url.path());
 264     Mlt::Producer m_producer(tmp);
 265     delete[] tmp;
 266     if (m_producer.is_blank()) {
 267  return;
 268     }
 269     Mlt::Filter m_convert("avcolour_space");
 270     m_convert.set("forced", mlt_image_rgb24a);
 271     m_producer.attach(m_convert);
 272     m_producer.seek(frame_position);
 273
 274     Mlt::Frame * frame = m_producer.get_frame();
 275
 276     if (frame) {
 277  QPixmap pix = frameThumbnail(frame, size.x(), size.y(), true);
 278  delete frame;
 279  emit replyGetImage(url, frame_position, pix, size.x(), size.y());
 280     }
 281 }*/
 282
 283 /* Create thumbnail for color */
 284 /*void Render::getImage(int id, QString color, QPoint size)
 285 {
 286     QPixmap pixmap(size.x() - 2, size.y() - 2);
 287     color = color.replace(0, 2, "#");
 288     color = color.left(7);
 289     pixmap.fill(QColor(color));
 290     QPixmap result(size.x(), size.y());
 291     result.fill(Qt::black);
 292     //copyBlt(&result, 1, 1, &pixmap, 0, 0, size.x() - 2, size.y() - 2);
 293     emit replyGetImage(id, result, size.x(), size.y());
 294
 295 }*/
 296
 297 /* Create thumbnail for image */
 298 /*void Render::getImage(KUrl url, QPoint size)
 299 {
 300     QImage im;
 301     QPixmap pixmap;
 302     if (url.fileName().startsWith(".all.")) {  //  check for slideshow
 303      QString fileType = url.fileName().right(3);
 304          QStringList more;
 305          QStringList::Iterator it;
 306
 307             QDir dir( url.directory() );
 308             more = dir.entryList( QDir::Files );
 309             for ( it = more.begin() ; it != more.end() ; ++it ) {
 310                 if ((*it).endsWith("."+fileType, Qt::CaseInsensitive)) {
 311    if (!im.load(url.directory() + "/" + *it))
 312        kDebug()<<"++ ERROR LOADIN IMAGE: "<<url.directory() + "/" + *it;
 313    break;
 314   }
 315      }
 316     }
 317     else im.load(url.path());
 318
 319     //pixmap = im.smoothScale(size.x() - 2, size.y() - 2);
 320     QPixmap result(size.x(), size.y());
 321     result.fill(Qt::black);
 322     //copyBlt(&result, 1, 1, &pixmap, 0, 0, size.x() - 2, size.y() - 2);
 323     emit replyGetImage(url, 1, result, size.x(), size.y());
 324 }*/
 325
 326
 327 double Render::consumerRatio() const {
 328     if (!m_mltConsumer) return 1.0;
 329     return (m_mltConsumer->get_double("aspect_ratio_num") / m_mltConsumer->get_double("aspect_ratio_den"));
 330 }
 331
 332
 333 int Render::getLength() {
 334
 335     if (m_mltProducer) {
 336         // kDebug()<<"//////  LENGTH: "<<mlt_producer_get_playtime(m_mltProducer->get_producer());
 337         return mlt_producer_get_playtime(m_mltProducer->get_producer());
 338     }
 339     return 0;
 340 }
 341
 342 bool Render::isValid(KUrl url) {
 343     char *tmp = decodedString(url.path());
 344     Mlt::Producer producer(*m_mltProfile, tmp);
 345     delete[] tmp;
 346     if (producer.is_blank())
 347         return false;
 348
 349     return true;
 350 }
 351
 352 void Render::getFileProperties(const QDomElement &xml, int clipId) {
 353     int height = 40;
 354     int width = height * 16 / 9.0; //KdenliveSettings::displayratio();
 355     QDomDocument doc;
 356     QDomElement westley = doc.createElement("westley");
 357     doc.appendChild(westley);
 358     westley.appendChild(doc.importNode(xml, true));
 359     kDebug() << "////////////\n" << doc.toString() << "////////////////\n";
 360     char *tmp = decodedString(doc.toString());
 361
 362     Mlt::Producer producer(*m_mltProfile, "westley-xml", tmp);
 363     delete[] tmp;
 364
 365     if (producer.is_blank()) {
 366         return;
 367     }
 368     int frameNumber = xml.attribute("frame_thumbnail", 0).toInt();
 369     if (frameNumber != 0) producer.seek(frameNumber);
 370     mlt_properties properties = MLT_PRODUCER_PROPERTIES(producer.get_producer());
 371
 372     QMap < QString, QString > filePropertyMap;
 373     QMap < QString, QString > metadataPropertyMap;
 374
 375     KUrl url = xml.attribute("resource", QString::null);
 376     filePropertyMap["filename"] = url.path();
 377     filePropertyMap["duration"] = QString::number(producer.get_playtime());
 378     kDebug() << "///////  PRODUCER: " << url.path() << " IS: " << producer.get_playtime();
 379     Mlt::Filter m_convert(*m_mltProfile, "avcolour_space");
 380     m_convert.set("forced", mlt_image_rgb24a);
 381     producer.attach(m_convert);
 382     Mlt::Frame * frame = producer.get_frame();
 383
 384     filePropertyMap["fps"] =
 385         QString::number(mlt_producer_get_fps(producer.get_producer()));
 386
 387     if (frame && frame->is_valid()) {
 388         filePropertyMap["width"] =
 389             QString::number(frame->get_int("width"));
 390         filePropertyMap["height"] =
 391             QString::number(frame->get_int("height"));
 392         filePropertyMap["frequency"] =
 393             QString::number(frame->get_int("frequency"));
 394         filePropertyMap["channels"] =
 395             QString::number(frame->get_int("channels"));
 396
 397         if (frame->get_int("test_image") == 0) {
 398             if (url.path().endsWith(".westley") || url.path().endsWith(".kdenlive")) {
 399                 filePropertyMap["type"] = "playlist";
 400                 metadataPropertyMap["comment"] = QString::fromUtf8(mlt_properties_get(MLT_SERVICE_PROPERTIES(producer.get_service()), "title"));
 401             } else if (frame->get_int("test_audio") == 0)
 402                 filePropertyMap["type"] = "av";
 403             else
 404                 filePropertyMap["type"] = "video";
 405
 406             // Generate thumbnail for this frame
 407             QPixmap pixmap = KThumb::getImage(url, 0, width, height);
 408
 409             emit replyGetImage(clipId, 0, pixmap, width, height);
 410
 411         } else if (frame->get_int("test_audio") == 0) {
 412             QPixmap pixmap(KStandardDirs::locate("appdata", "graphics/music.png"));
 413             emit replyGetImage(clipId, 0, pixmap, width, height);
 414             filePropertyMap["type"] = "audio";
 415         }
 416     }
 417
 418     // Retrieve audio / video codec name
 419
 420     // Fetch the video_context
 421 #if 0 //until the reason for the chrashs is found
 422     AVFormatContext *context = (AVFormatContext *) mlt_properties_get_data(properties, "video_context", NULL);
 423     if (context != NULL) {
 424         // Get the video_index
 425         int index = mlt_properties_get_int(properties, "video_index");
 426         if (context->streams && context->streams [index] && context->streams[ index ]->codec && context->streams[ index ]->codec->codec->name)
 427             filePropertyMap["videocodec"] = context->streams[ index ]->codec->codec->name;
 428     }
 429     context = (AVFormatContext *) mlt_properties_get_data(properties, "audio_context", NULL);
 430     if (context != NULL) {
 431         // Get the video_index
 432         int index = mlt_properties_get_int(properties, "audio_index");
 433         if (context->streams && context->streams [index] && context->streams[ index ]->codec && context->streams[ index ]->codec->codec->name)
 434             filePropertyMap["audiocodec"] = context->streams[ index ]->codec->codec->name;
 435     }
 436 #endif
 437
 438
 439     // metadata
 440
 441     mlt_properties metadata = mlt_properties_new();
 442     mlt_properties_pass(metadata, properties, "meta.attr.");
 443     int count = mlt_properties_count(metadata);
 444     for (int i = 0; i < count; i ++) {
 445         QString name = mlt_properties_get_name(metadata, i);
 446         QString value = QString::fromUtf8(mlt_properties_get_value(metadata, i));
 447         if (name.endsWith("markup") && !value.isEmpty())
 448             metadataPropertyMap[ name.section(".", 0, -2)] = value;
 449     }
 450
 451     emit replyGetFileProperties(clipId, filePropertyMap, metadataPropertyMap);
 452     kDebug() << "REquested fuile info for: " << url.path();
 453     if (frame) delete frame;
 454 }
 455
 456 /** Create the producer from the Westley QDomDocument */
 457 void Render::initSceneList() {
 458     kDebug() << "--------  INIT SCENE LIST ------_";
 459     QDomDocument doc;
 460     QDomElement westley = doc.createElement("westley");
 461     doc.appendChild(westley);
 462     QDomElement prod = doc.createElement("producer");
 463     prod.setAttribute("resource", "colour");
 464     prod.setAttribute("colour", "red");
 465     prod.setAttribute("id", "black");
 466     prod.setAttribute("in", "0");
 467     prod.setAttribute("out", "0");
 468
 469     QDomElement tractor = doc.createElement("tractor");
 470     QDomElement multitrack = doc.createElement("multitrack");
 471
 472     QDomElement playlist1 = doc.createElement("playlist");
 473     playlist1.appendChild(prod);
 474     multitrack.appendChild(playlist1);
 475     QDomElement playlist2 = doc.createElement("playlist");
 476     multitrack.appendChild(playlist2);
 477     QDomElement playlist3 = doc.createElement("playlist");
 478     multitrack.appendChild(playlist3);
 479     QDomElement playlist4 = doc.createElement("playlist");
 480     multitrack.appendChild(playlist4);
 481     QDomElement playlist5 = doc.createElement("playlist");
 482     multitrack.appendChild(playlist5);
 483     tractor.appendChild(multitrack);
 484     westley.appendChild(tractor);
 485     // kDebug()<<doc.toString();
 486     /*
 487        QString tmp = QString("<westley><producer resource=\"colour\" colour=\"red\" id=\"red\" /><tractor><multitrack><playlist></playlist><playlist></playlist><playlist /><playlist /><playlist></playlist></multitrack></tractor></westley>");*/
 488     setSceneList(doc, 0);
 489 }
 490
 491 /** Create the producer from the Westley QDomDocument */
 492 void Render::setSceneList(QDomDocument list, int position) {
 493     setSceneList(list.toString(), position);
 494 }
 495
 496 /** Create the producer from the Westley QDomDocument */
 497 void Render::setSceneList(QString playlist, int position) {
 498     if (m_winid == -1) return;
 499     m_generateScenelist = true;
 500
 501     kWarning() << "//////  RENDER, SET SCENE LIST: " << playlist;
 502
 503
 504     /*
 505         if (!clip.is_valid()) {
 506      kWarning()<<" ++++ WARNING, UNABLE TO CREATE MLT PRODUCER";
 507      m_generateScenelist = false;
 508      return;
 509         }*/
 510
 511     if (m_mltConsumer) {
 512         m_mltConsumer->set("refresh", 0);
 513     } else return;
 514     if (m_mltProducer) {
 515         m_mltProducer->set_speed(0.0);
 516         //if (KdenliveSettings::osdtimecode() && m_osdInfo) m_mltProducer->detach(*m_osdInfo);
 517
 518         delete m_mltProducer;
 519         m_mltProducer = NULL;
 520         emit stopped();
 521     }
 522
 523     char *tmp = decodedString(playlist);
 524     m_mltProducer = new Mlt::Producer(*m_mltProfile, "westley-xml", tmp);
 525     delete[] tmp;
 526     if (!m_mltProducer || !m_mltProducer->is_valid()) kDebug() << " WARNING - - - - -INVALID PLAYLIST: " << tmp;
 527     //m_mltProducer->optimise();
 528     if (position != 0) m_mltProducer->seek(position);
 529
 530     /*if (KdenliveSettings::osdtimecode()) {
 531     // Attach filter for on screen display of timecode
 532     delete m_osdInfo;
 533     QString attr = "attr_check";
 534     mlt_filter filter = mlt_factory_filter( "data_feed", (char*) attr.ascii() );
 535     mlt_properties_set_int( MLT_FILTER_PROPERTIES( filter ), "_fezzik", 1 );
 536     mlt_producer_attach( m_mltProducer->get_producer(), filter );
 537     mlt_filter_close( filter );
 538
 539       m_osdInfo = new Mlt::Filter("data_show");
 540     tmp = decodedString(m_osdProfile);
 541       m_osdInfo->set("resource", tmp);
 542     delete[] tmp;
 543     mlt_properties properties = MLT_PRODUCER_PROPERTIES(m_mltProducer->get_producer());
 544     mlt_properties_set_int( properties, "meta.attr.timecode", 1);
 545     mlt_properties_set( properties, "meta.attr.timecode.markup", "#timecode#");
 546     m_osdInfo->set("dynamic", "1");
 547
 548       if (m_mltProducer->attach(*m_osdInfo) == 1) kDebug()<<"////// error attaching filter";
 549     } else {
 550     m_osdInfo->set("dynamic", "0");
 551     }*/
 552
 553     m_fps = m_mltProducer->get_fps();
 554     emit durationChanged(m_mltProducer->get_playtime());
 555     //m_connectTimer->start( 1000 );
 556     connectPlaylist();
 557     m_generateScenelist = false;
 558
 559 }
 560
 561 /** Create the producer from the Westley QDomDocument */
 562 QString Render::sceneList() {
 563     KTemporaryFile temp;
 564     QString result;
 565
 566     if (temp.open()) {
 567         saveSceneList(temp.fileName());
 568         QFile file(temp.fileName());
 569         if (!file.open(QIODevice::ReadOnly | QIODevice::Text)) {
 570             kWarning() << "++++++++++++++++   CANNOT READ TMP SCENELIST FILE";
 571             return QString();
 572         }
 573         QTextStream in(&file);
 574         while (!in.atEnd()) {
 575             result.append(in.readLine());
 576         }
 577     }
 578     return result;
 579 }
 580
 581 void Render::saveSceneList(QString path, QDomElement addedXml) {
 582     char *tmppath = decodedString("westley:" + path);
 583     Mlt::Consumer westleyConsumer(*m_mltProfile , tmppath);
 584     delete[] tmppath;
 585     westleyConsumer.set("terminate_on_pause", 1);
 586     Mlt::Producer prod(m_mltProducer->get_producer());
 587     westleyConsumer.connect(prod);
 588     westleyConsumer.start();
 589     if (!addedXml.isNull()) {
 590         // add Kdenlive specific tags
 591         QFile file(path);
 592         QDomDocument doc;
 593         doc.setContent(&file, false);
 594         doc.documentElement().appendChild(doc.importNode(addedXml, true));
 595         file.close();
 596         if (!file.open(QIODevice::WriteOnly | QIODevice::Text)) {
 597             kWarning() << "//////  ERROR writing to file: " << path;
 598             return;
 599         }
 600         QTextStream out(&file);
 601         out << doc.toString();
 602         file.close();
 603     }
 604 }
 605
 606
 607 const double Render::fps() const {
 608     return m_fps;
 609 }
 610
 611 void Render::connectPlaylist() {
 612     if (!m_mltConsumer) return;
 613     m_connectTimer->stop();
 614     m_mltConsumer->set("refresh", "0");
 615     m_mltConsumer->connect(*m_mltProducer);
 616     m_mltProducer->set_speed(0.0);
 617     m_mltConsumer->start();
 618     refresh();
 619     /*
 620      if (m_mltConsumer->start() == -1) {
 621           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."));
 622           m_mltConsumer = NULL;
 623      }
 624      else {
 625              refresh();
 626      }*/
 627 }
 628
 629 void Render::refreshDisplay() {
 630
 631     if (!m_mltProducer) return;
 632     m_mltConsumer->set("refresh", 0);
 633
 634     mlt_properties properties = MLT_PRODUCER_PROPERTIES(m_mltProducer->get_producer());
 635     /*if (KdenliveSettings::osdtimecode()) {
 636         mlt_properties_set_int( properties, "meta.attr.timecode", 1);
 637         mlt_properties_set( properties, "meta.attr.timecode.markup", "#timecode#");
 638         m_osdInfo->set("dynamic", "1");
 639         m_mltProducer->attach(*m_osdInfo);
 640     }
 641     else {
 642         m_mltProducer->detach(*m_osdInfo);
 643         m_osdInfo->set("dynamic", "0");
 644     }*/
 645     refresh();
 646 }
 647
 648 void Render::setVolume(double volume) {
 649     if (!m_mltConsumer || !m_mltProducer) return;
 650     /*osdTimer->stop();
 651     m_mltConsumer->set("refresh", 0);
 652     // Attach filter for on screen display of timecode
 653     mlt_properties properties = MLT_PRODUCER_PROPERTIES(m_mltProducer->get_producer());
 654     mlt_properties_set_double( properties, "meta.volume", volume );
 655     mlt_properties_set_int( properties, "meta.attr.osdvolume", 1);
 656     mlt_properties_set( properties, "meta.attr.osdvolume.markup", i18n("Volume: ") + QString::number(volume * 100));
 657
 658     if (!KdenliveSettings::osdtimecode()) {
 659     m_mltProducer->detach(*m_osdInfo);
 660     mlt_properties_set_int( properties, "meta.attr.timecode", 0);
 661      if (m_mltProducer->attach(*m_osdInfo) == 1) kDebug()<<"////// error attaching filter";
 662     }*/
 663     refresh();
 664     osdTimer->setSingleShot(2500);
 665 }
 666
 667 void Render::slotOsdTimeout() {
 668     mlt_properties properties = MLT_PRODUCER_PROPERTIES(m_mltProducer->get_producer());
 669     mlt_properties_set_int(properties, "meta.attr.osdvolume", 0);
 670     mlt_properties_set(properties, "meta.attr.osdvolume.markup", NULL);
 671     //if (!KdenliveSettings::osdtimecode()) m_mltProducer->detach(*m_osdInfo);
 672     refresh();
 673 }
 674
 675 void Render::start() {
 676     kDebug() << "-----  STARTING MONITOR: " << m_name;
 677     if (m_winid == -1) {
 678         kDebug() << "-----  BROKEN MONITOR: " << m_name << ", RESTART";
 679         return;
 680     }
 681
 682     if (m_mltConsumer->is_stopped()) {
 683         kDebug() << "-----  MONITOR: " << m_name << " WAS STOPPED";
 684         if (m_mltConsumer->start() == -1) {
 685             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."));
 686             m_mltConsumer = NULL;
 687             return;
 688         } else {
 689             kDebug() << "-----  MONITOR: " << m_name << " REFRESH";
 690             refresh();
 691         }
 692     }
 693     m_isBlocked = false;
 694 }
 695
 696 void Render::clear() {
 697     if (m_mltConsumer) {
 698         m_mltConsumer->set("refresh", 0);
 699         if (!m_mltConsumer->is_stopped()) m_mltConsumer->stop();
 700     }
 701
 702     if (m_mltProducer) {
 703         //if (KdenliveSettings::osdtimecode() && m_osdInfo) m_mltProducer->detach(*m_osdInfo);
 704         m_mltProducer->set_speed(0.0);
 705         delete m_mltProducer;
 706         m_mltProducer = NULL;
 707         emit stopped();
 708     }
 709 }
 710
 711 void Render::stop() {
 712     if (m_mltConsumer && !m_mltConsumer->is_stopped()) {
 713         kDebug() << "/////////////   RENDER STOPPED: " << m_name;
 714         m_mltConsumer->set("refresh", 0);
 715         m_mltConsumer->stop();
 716     }
 717     kDebug() << "/////////////   RENDER STOP2-------";
 718     m_isBlocked = true;
 719
 720     if (m_mltProducer) {
 721         m_mltProducer->set_speed(0.0);
 722         m_mltProducer->set("out", m_mltProducer->get_length() - 1);
 723     }
 724     kDebug() << "/////////////   RENDER STOP3-------";
 725 }
 726
 727 void Render::stop(const GenTime & startTime) {
 728     kDebug() << "/////////////   RENDER STOP-------2";
 729     if (m_mltProducer) {
 730         m_mltProducer->set_speed(0.0);
 731         m_mltProducer->seek((int) startTime.frames(m_fps));
 732     }
 733     m_mltConsumer->purge();
 734 }
 735
 736 void Render::switchPlay() {
 737     if (!m_mltProducer)
 738         return;
 739     if (m_mltProducer->get_speed() == 0.0) m_mltProducer->set_speed(1.0);
 740     else {
 741         m_mltProducer->set_speed(0.0);
 742         kDebug() << "// POSITON: " << m_framePosition;
 743         m_mltProducer->seek((int) m_framePosition);
 744     }
 745
 746     /*if (speed == 0.0) {
 747     m_mltProducer->seek((int) m_framePosition + 1);
 748         m_mltConsumer->purge();
 749     }*/
 750     refresh();
 751 }
 752
 753 void Render::play(double speed) {
 754     if (!m_mltProducer)
 755         return;
 756     if (speed == 0.0) m_mltProducer->set("out", m_mltProducer->get_length() - 1);
 757     m_mltProducer->set_speed(speed);
 758     /*if (speed == 0.0) {
 759     m_mltProducer->seek((int) m_framePosition + 1);
 760         m_mltConsumer->purge();
 761     }*/
 762     refresh();
 763 }
 764
 765 void Render::play(double speed, const GenTime & startTime) {
 766     kDebug() << "/////////////   RENDER PLAY2-------" << speed;
 767     if (!m_mltProducer)
 768         return;
 769     //m_mltProducer->set("out", m_mltProducer->get_length() - 1);
 770     //if (speed == 0.0) m_mltConsumer->set("refresh", 0);
 771     m_mltProducer->set_speed(speed);
 772     m_mltProducer->seek((int)(startTime.frames(m_fps)));
 773     //m_mltConsumer->purge();
 774     //refresh();
 775 }
 776
 777 void Render::play(double speed, const GenTime & startTime,
 778                   const GenTime & stopTime) {
 779     kDebug() << "/////////////   RENDER PLAY3-------" << speed;
 780     if (!m_mltProducer)
 781         return;
 782     m_mltProducer->set("out", stopTime.frames(m_fps));
 783     m_mltProducer->seek((int)(startTime.frames(m_fps)));
 784     m_mltConsumer->purge();
 785     m_mltProducer->set_speed(speed);
 786     refresh();
 787 }
 788
 789
 790 void Render::sendSeekCommand(GenTime time) {
 791     if (!m_mltProducer)
 792         return;
 793     //kDebug()<<"//////////  KDENLIVE SEEK: "<<(int) (time.frames(m_fps));
 794     m_mltProducer->seek((int)(time.frames(m_fps)));
 795     refresh();
 796 }
 797
 798 void Render::seekToFrame(int pos) {
 799     if (!m_mltProducer)
 800         return;
 801     //kDebug()<<"//////////  KDENLIVE SEEK: "<<(int) (time.frames(m_fps));
 802     m_mltProducer->seek(pos);
 803     refresh();
 804 }
 805
 806 void Render::askForRefresh() {
 807     // Use a Timer so that we don't refresh too much
 808     refreshTimer->start(200);
 809 }
 810
 811 void Render::doRefresh() {
 812     // Use a Timer so that we don't refresh too much
 813     refresh();
 814 }
 815
 816 void Render::refresh() {
 817     if (!m_mltProducer || m_isBlocked)
 818         return;
 819     refreshTimer->stop();
 820     if (m_mltConsumer) {
 821         m_mltConsumer->set("refresh", 1);
 822     }
 823 }
 824
 825 /** Sets the description of this renderer to desc. */
 826 void Render::setDescription(const QString & description) {
 827     m_description = description;
 828 }
 829
 830 /** Returns the description of this renderer */
 831 QString Render::description() {
 832     return m_description;
 833 }
 834
 835
 836 double Render::playSpeed() {
 837     if (m_mltProducer) return m_mltProducer->get_speed();
 838     return 0.0;
 839 }
 840
 841 const GenTime & Render::seekPosition() const {
 842     if (m_mltProducer) return GenTime((int) m_mltProducer->position(), m_fps);
 843     else return GenTime();
 844 }
 845
 846
 847 const QString & Render::rendererName() const {
 848     return m_name;
 849 }
 850
 851
 852 void Render::emitFrameNumber(double position) {
 853     //kDebug()<<"// POSITON: "<<m_framePosition;
 854     if (m_generateScenelist) return;
 855     m_framePosition = position;
 856     emit rendererPosition((int) position);
 857     //if (qApp->activeWindow()) QApplication::postEvent(qApp->activeWindow(), new PositionChangeEvent( GenTime((int) position, m_fps), m_monitorId));
 858 }
 859
 860 void Render::emitConsumerStopped() {
 861     // This is used to know when the playing stopped
 862     if (m_mltProducer && !m_generateScenelist) {
 863         double pos = m_mltProducer->position();
 864         emit rendererStopped((int) pos);
 865         //if (qApp->activeWindow()) QApplication::postEvent(qApp->activeWindow(), new PositionChangeEvent(GenTime((int) pos, m_fps), m_monitorId + 100));
 866         //new QCustomEvent(10002));
 867     }
 868 }
 869
 870
 871
 872 void Render::exportFileToFirewire(QString srcFileName, int port, GenTime startTime, GenTime endTime) {
 873     KMessageBox::sorry(0, i18n("Firewire is not enabled on your system.\n Please install Libiec61883 and recompile Kdenlive"));
 874 }
 875
 876
 877 void Render::exportCurrentFrame(KUrl url, bool notify) {
 878     if (!m_mltProducer) {
 879         KMessageBox::sorry(qApp->activeWindow(), i18n("There is no clip, cannot extract frame."));
 880         return;
 881     }
 882
 883     int height = 1080;//KdenliveSettings::defaultheight();
 884     int width = 1940; //KdenliveSettings::displaywidth();
 885     QPixmap pix = KThumb::getFrame(m_mltProducer, -1, width, height);
 886     /*
 887        QPixmap pix(width, height);
 888        Mlt::Filter m_convert(*m_mltProfile, "avcolour_space");
 889        m_convert.set("forced", mlt_image_rgb24a);
 890        m_mltProducer->attach(m_convert);
 891        Mlt::Frame * frame = m_mltProducer->get_frame();
 892        m_mltProducer->detach(m_convert);
 893        if (frame) {
 894            pix = frameThumbnail(frame, width, height);
 895            delete frame;
 896        }*/
 897     pix.save(url.path(), "PNG");
 898     //if (notify) QApplication::postEvent(qApp->activeWindow(), new UrlEvent(url, 10003));
 899 }
 900
 901 /** MLT PLAYLIST DIRECT MANIPULATON  **/
 902
 903
 904 void Render::mltCheckLength() {
 905     //kDebug()<<"checking track length: "<<track<<"..........";
 906     Mlt::Service service(m_mltProducer->get_service());
 907     Mlt::Tractor tractor(service);
 908
 909     int trackNb = tractor.count();
 910     double duration = 0;
 911     double trackDuration;
 912     if (trackNb == 1) {
 913         Mlt::Producer trackProducer(tractor.track(0));
 914         Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
 915         duration = Mlt::Producer(trackPlaylist.get_producer()).get_playtime() - 1;
 916         m_mltProducer->set("out", duration);
 917         emit durationChanged(duration);
 918         return;
 919     }
 920     while (trackNb > 1) {
 921         Mlt::Producer trackProducer(tractor.track(trackNb - 1));
 922         Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
 923         trackDuration = Mlt::Producer(trackPlaylist.get_producer()).get_playtime() - 1;
 924
 925         kDebug() << " / / /DURATON FOR TRACK " << trackNb - 1 << " = " << trackDuration;
 926         if (trackDuration > duration) duration = trackDuration;
 927         trackNb--;
 928     }
 929
 930     Mlt::Producer blackTrackProducer(tractor.track(0));
 931     Mlt::Playlist blackTrackPlaylist((mlt_playlist) blackTrackProducer.get_service());
 932     double blackDuration = Mlt::Producer(blackTrackPlaylist.get_producer()).get_playtime() - 1;
 933     kDebug() << " / / /DURATON FOR TRACK 0 = " << blackDuration;
 934     if (blackDuration != duration) {
 935         blackTrackPlaylist.remove_region(0, blackDuration);
 936         int i = 0;
 937         int dur = duration;
 938         QDomDocument doc;
 939         QDomElement black = doc.createElement("producer");
 940         black.setAttribute("mlt_service", "colour");
 941         black.setAttribute("colour", "black");
 942         black.setAttribute("in", "0");
 943         black.setAttribute("out", "13999");
 944         while (dur > 14000) { // <producer mlt_service=\"colour\" colour=\"black\" in=\"0\" out=\"13999\" />
 945             mltInsertClip(0, GenTime(i * 14000, m_fps), black);
 946             dur = dur - 14000;
 947             i++;
 948         }
 949         black.setAttribute("out", QString::number(dur));
 950         mltInsertClip(0, GenTime(), black);
 951
 952         m_mltProducer->set("out", duration);
 953         emit durationChanged(duration);
 954     }
 955 }
 956
 957
 958 void Render::mltInsertClip(int track, GenTime position, QDomElement element) {
 959     if (!m_mltProducer) {
 960         kDebug() << "PLAYLIST NOT INITIALISED //////";
 961         return;
 962     }
 963     Mlt::Producer parentProd(m_mltProducer->parent());
 964     if (parentProd.get_producer() == NULL) {
 965         kDebug() << "PLAYLIST BROKEN, CANNOT INSERT CLIP //////";
 966         return;
 967     }
 968     m_isBlocked = true;
 969     Mlt::Service service(parentProd.get_service());
 970     Mlt::Tractor tractor(service);
 971
 972     QDomDocument doc;
 973     doc.appendChild(doc.importNode(element, true));
 974     QString resource = doc.toString();
 975     kDebug() << "///////  ADDING CLIP TMLNE: " << resource << " ON TRACK: " << track;
 976     Mlt::Producer trackProducer(tractor.track(track));
 977     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
 978     char *tmp = decodedString(resource);
 979     Mlt::Producer clip(*m_mltProfile, "westley-xml", tmp);
 980     //clip.set_in_and_out(in.frames(m_fps), out.frames(m_fps));
 981     delete[] tmp;
 982
 983     trackPlaylist.insert_at(position.frames(m_fps), clip, 1);
 984     tractor.multitrack()->refresh();
 985     tractor.refresh();
 986     if (track != 0) mltCheckLength();
 987     m_isBlocked = false;
 988 }
 989
 990 void Render::mltCutClip(int track, GenTime position) {
 991     m_isBlocked = true;
 992     Mlt::Service service(m_mltProducer->parent().get_service());
 993     Mlt::Tractor tractor(service);
 994     Mlt::Producer trackProducer(tractor.track(track));
 995     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
 996     trackPlaylist.split_at(position.frames(m_fps));
 997     trackPlaylist.consolidate_blanks(0);
 998     kDebug() << "/ / / /CUTTING CLIP AT: " << position.frames(m_fps);
 999     m_isBlocked = false;
1000 }
1001
1002
1003 void Render::mltRemoveClip(int track, GenTime position) {
1004     m_isBlocked = true;
1005     Mlt::Service service(m_mltProducer->parent().get_service());
1006     Mlt::Tractor tractor(service);
1007     Mlt::Producer trackProducer(tractor.track(track));
1008     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1009     int clipIndex = trackPlaylist.get_clip_index_at(position.frames(m_fps));
1010     //trackPlaylist.remove(clipIndex);
1011     trackPlaylist.replace_with_blank(clipIndex);
1012     trackPlaylist.consolidate_blanks(0);
1013     if (track != 0) mltCheckLength();
1014     //emit durationChanged();
1015     m_isBlocked = false;
1016 }
1017
1018 void Render::mltRemoveEffect(int track, GenTime position, QString index, bool doRefresh) {
1019
1020     Mlt::Service service(m_mltProducer->parent().get_service());
1021
1022     Mlt::Tractor tractor(service);
1023     Mlt::Producer trackProducer(tractor.track(track));
1024     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1025     //int clipIndex = trackPlaylist.get_clip_index_at(position.frames(m_fps));
1026     Mlt::Producer *clip = trackPlaylist.get_clip_at(position.frames(m_fps));
1027     if (!clip) {
1028         kDebug() << " / / / CANNOT FIND CLIP TO REMOVE EFFECT";
1029         return;
1030     }
1031     m_isBlocked = true;
1032     Mlt::Service clipService(clip->get_service());
1033
1034 //    if (tag.startsWith("ladspa")) tag = "ladspa";
1035
1036     int ct = 0;
1037     Mlt::Filter *filter = clipService.filter(ct);
1038     while (filter) {
1039         if (index == "-1" || filter->get("kdenlive_ix") == index) {// && filter->get("kdenlive_id") == id) {
1040             clipService.detach(*filter);
1041             kDebug() << " / / / DLEETED EFFECT: " << ct;
1042         } else ct++;
1043         filter = clipService.filter(ct);
1044     }
1045     m_isBlocked = false;
1046     if (doRefresh) refresh();
1047 }
1048
1049
1050 void Render::mltAddEffect(int track, GenTime position, QMap <QString, QString> args, bool doRefresh) {
1051     Mlt::Service service(m_mltProducer->parent().get_service());
1052     Mlt::Tractor tractor(service);
1053     Mlt::Producer trackProducer(tractor.track(track));
1054     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1055
1056     Mlt::Producer *clip = trackPlaylist.get_clip_at(position.frames(m_fps));
1057
1058     if (!clip) {
1059         kDebug() << "**********  CANNOT FIND CLIP TO APPLY EFFECT-----------";
1060         return;
1061     }
1062     Mlt::Service clipService(clip->get_service());
1063     m_isBlocked = true;
1064     // create filter
1065     QString tag = args.value("tag");
1066     //kDebug()<<" / / INSERTING EFFECT: "<<id;
1067     if (tag.startsWith("ladspa")) tag = "ladspa";
1068     char *filterId = decodedString(tag);
1069     Mlt::Filter *filter = new Mlt::Filter(*m_mltProfile, filterId);
1070     if (filter && filter->is_valid())
1071         filter->set("kdenlive_id", filterId);
1072     else {
1073         kDebug() << "filter is NULL";
1074         return;
1075     }
1076
1077     QMap<QString, QString>::Iterator it;
1078     QString keyFrameNumber = "#0";
1079
1080     for (it = args.begin(); it != args.end(); ++it) {
1081         //kDebug()<<" / / INSERTING EFFECT ARGS: "<<it.key()<<": "<<it.data();
1082         QString key;
1083         QString currentKeyFrameNumber;
1084         if (it.key().startsWith("#")) {
1085             currentKeyFrameNumber = it.key().section(":", 0, 0);
1086             if (currentKeyFrameNumber != keyFrameNumber) {
1087                 // attach filter to the clip
1088                 clipService.attach(*filter);
1089                 filter = new Mlt::Filter(*m_mltProfile, filterId);
1090                 filter->set("kdenlive_id", filterId);
1091                 keyFrameNumber = currentKeyFrameNumber;
1092             }
1093             key = it.key().section(":", 1);
1094         } else key = it.key();
1095         char *name = decodedString(key);
1096         char *value = decodedString(it.value());
1097         filter->set(name, value);
1098         delete[] name;
1099         delete[] value;
1100     }
1101     // attach filter to the clip
1102     clipService.attach(*filter);
1103     delete[] filterId;
1104     m_isBlocked = false;
1105     if (doRefresh) refresh();
1106
1107 }
1108
1109 void Render::mltEditEffect(int track, GenTime position, QMap <QString, QString> args) {
1110     QString index = args.value("kdenlive_ix");
1111     QString tag =  args.value("tag");
1112     QMap<QString, QString>::Iterator it = args.begin();
1113     if (it.key().startsWith("#") || tag.startsWith("ladspa") || tag == "sox" || tag == "autotrack_rectangle") {
1114         // This is a keyframe effect, to edit it, we remove it and re-add it.
1115         mltRemoveEffect(track, position, index);
1116         mltAddEffect(track, position, args);
1117         return;
1118     }
1119     m_isBlocked = true;
1120     // create filter
1121     Mlt::Service service(m_mltProducer->parent().get_service());
1122
1123     Mlt::Tractor tractor(service);
1124     Mlt::Producer trackProducer(tractor.track(track));
1125     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1126     //int clipIndex = trackPlaylist.get_clip_index_at(position.frames(m_fps));
1127     Mlt::Producer *clip = trackPlaylist.get_clip_at(position.frames(m_fps));
1128     if (!clip) {
1129         kDebug() << "WARINIG, CANNOT FIND CLIP ON track: " << track << ", AT POS: " << position.frames(m_fps);
1130         m_isBlocked = false;
1131         return;
1132     }
1133
1134     Mlt::Service clipService(clip->get_service());
1135
1136 //    if (tag.startsWith("ladspa")) tag = "ladspa";
1137
1138     int ct = 0;
1139     Mlt::Filter *filter = clipService.filter(ct);
1140     while (filter) {
1141         if (filter->get("kdenlive_ix") == index) {
1142             break;
1143         }
1144         ct++;
1145         filter = clipService.filter(ct);
1146     }
1147
1148
1149     if (!filter) {
1150         kDebug() << "WARINIG, FILTER FOR EDITING NOT FOUND, ADDING IT!!!!!";
1151         mltAddEffect(track, position, args);
1152         m_isBlocked = false;
1153         return;
1154     }
1155
1156     for (it = args.begin(); it != args.end(); ++it) {
1157         kDebug() << " / / EDITING EFFECT ARGS: " << it.key() << ": " << it.value();
1158         char *name = decodedString(it.key());
1159         char *value = decodedString(it.value());
1160         filter->set(name, value);
1161         delete[] name;
1162         delete[] value;
1163     }
1164     m_isBlocked = false;
1165     refresh();
1166 }
1167
1168 void Render::mltResizeClipEnd(int track, GenTime pos, GenTime in, GenTime out) {
1169     m_isBlocked = true;
1170     Mlt::Service service(m_mltProducer->parent().get_service());
1171
1172     Mlt::Tractor tractor(service);
1173     Mlt::Producer trackProducer(tractor.track(track));
1174     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1175     if (trackPlaylist.is_blank_at(pos.frames(m_fps) + 1))
1176         kDebug() << "////////  ERROR RSIZING BLANK CLIP!!!!!!!!!!!";
1177     int clipIndex = trackPlaylist.get_clip_index_at(pos.frames(m_fps) + 1);
1178
1179     int previousDuration = trackPlaylist.clip_length(clipIndex) - 1;
1180     int newDuration = out.frames(m_fps) - 1;
1181
1182     kDebug() << " ** RESIZING CLIP END:" << clipIndex << " on track:" << track << ", mid pos: " << pos.frames(25) << ", in: " << in.frames(25) << ", out: " << out.frames(25) << ", PREVIOUS duration: " << previousDuration;
1183     trackPlaylist.resize_clip(clipIndex, in.frames(m_fps), newDuration);
1184     trackPlaylist.consolidate_blanks(0);
1185     if (previousDuration < newDuration) {
1186         // clip was made longer, trim next blank if there is one.
1187         if (trackPlaylist.is_blank(clipIndex + 1)) {
1188             trackPlaylist.split(clipIndex + 1, newDuration - previousDuration);
1189             trackPlaylist.remove(clipIndex + 1);
1190         }
1191     } else trackPlaylist.insert_blank(clipIndex + 1, previousDuration - newDuration - 1);
1192
1193     trackPlaylist.consolidate_blanks(0);
1194     tractor.multitrack()->refresh();
1195     tractor.refresh();
1196     if (track != 0) mltCheckLength();
1197     m_isBlocked = false;
1198 }
1199
1200 void Render::mltChangeTrackState(int track, bool mute, bool blind) {
1201     Mlt::Service service(m_mltProducer->parent().get_service());
1202
1203     Mlt::Tractor tractor(service);
1204     Mlt::Producer trackProducer(tractor.track(track));
1205     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1206     if (mute) {
1207         if (blind) trackProducer.set("hide", 3);
1208         else trackProducer.set("hide", 2);
1209     } else if (blind) {
1210         trackProducer.set("hide", 1);
1211     } else {
1212         trackProducer.set("hide", 0);
1213     }
1214     tractor.multitrack()->refresh();
1215     tractor.refresh();
1216     refresh();
1217 }
1218
1219 void Render::mltResizeClipStart(int track, GenTime pos, GenTime moveEnd, GenTime moveStart, GenTime in, GenTime out) {
1220     m_isBlocked = true;
1221     Mlt::Service service(m_mltProducer->parent().get_service());
1222     int moveFrame = (moveEnd - moveStart).frames(m_fps);
1223
1224     Mlt::Tractor tractor(service);
1225     Mlt::Producer trackProducer(tractor.track(track));
1226     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1227     if (trackPlaylist.is_blank_at(pos.frames(m_fps) - 1))
1228         kDebug() << "////////  ERROR RSIZING BLANK CLIP!!!!!!!!!!!";
1229     int clipIndex = trackPlaylist.get_clip_index_at(pos.frames(m_fps) - 1);
1230     kDebug() << " ** RESIZING CLIP START:" << clipIndex << " on track:" << track << ", mid pos: " << pos.frames(25) << ", moving: " << moveFrame << ", in: " << in.frames(25) << ", out: " << out.frames(25);
1231
1232     trackPlaylist.resize_clip(clipIndex, in.frames(m_fps), out.frames(m_fps));
1233     if (moveFrame > 0) trackPlaylist.insert_blank(clipIndex, moveFrame - 1);
1234     else {
1235         int midpos = moveStart.frames(m_fps) - 1; //+ (moveFrame / 2)
1236         int blankIndex = trackPlaylist.get_clip_index_at(midpos);
1237         int blankLength = trackPlaylist.clip_length(blankIndex);
1238
1239         kDebug() << " + resizing blank: " << blankIndex << ", Mid: " << midpos << ", Length: " << blankLength << ", SIZE DIFF: " << moveFrame;
1240
1241
1242         if (blankLength + moveFrame == 0) trackPlaylist.remove(blankIndex);
1243         else trackPlaylist.resize_clip(blankIndex, 0, blankLength + moveFrame - 1);
1244     }
1245     trackPlaylist.consolidate_blanks(0);
1246     m_isBlocked = false;
1247     kDebug() << "-----------------\n" << "CLIP 0: " << trackPlaylist.clip_start(0) << ", LENGT: " << trackPlaylist.clip_length(0);
1248     kDebug() << "CLIP 1: " << trackPlaylist.clip_start(1) << ", LENGT: " << trackPlaylist.clip_length(1);
1249     kDebug() << "CLIP 2: " << trackPlaylist.clip_start(2) << ", LENGT: " << trackPlaylist.clip_length(2);
1250     kDebug() << "CLIP 3: " << trackPlaylist.clip_start(3) << ", LENGT: " << trackPlaylist.clip_length(3);
1251     kDebug() << "CLIP 4: " << trackPlaylist.clip_start(4) << ", LENGT: " << trackPlaylist.clip_length(4);
1252 }
1253
1254 void Render::mltMoveClip(int startTrack, int endTrack, GenTime moveStart, GenTime moveEnd) {
1255     mltMoveClip(startTrack, endTrack, (int) moveStart.frames(m_fps), (int) moveEnd.frames(m_fps));
1256 }
1257
1258
1259 void Render::mltMoveClip(int startTrack, int endTrack, int moveStart, int moveEnd) {
1260     m_isBlocked = true;
1261     //m_mltConsumer->set("refresh", 0);
1262     Mlt::Service service(m_mltProducer->parent().get_service());
1263
1264     Mlt::Tractor tractor(service);
1265     Mlt::Producer trackProducer(tractor.track(startTrack));
1266     Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1267     int clipIndex = trackPlaylist.get_clip_index_at(moveStart + 1);
1268     mlt_field field = mlt_tractor_field(tractor.get_tractor());
1269     mlt_multitrack multitrack = mlt_field_multitrack(field); //mlt_tractor_multitrack(tractor.get_tractor());
1270     kDebug() << " --  CURRENT MULTIOTRACK HAS: " << mlt_multitrack_count(multitrack) << " tracks";;
1271     mlt_service multiprod = mlt_multitrack_service(multitrack);
1272
1273     Mlt::Producer clipProducer(trackPlaylist.replace_with_blank(clipIndex));
1274     trackPlaylist.consolidate_blanks(0);
1275     mlt_events_block(MLT_PRODUCER_PROPERTIES(trackProducer.get_producer()), NULL);
1276
1277     if (endTrack == startTrack) {
1278         if (!trackPlaylist.is_blank_at(moveEnd)) {
1279             kWarning() << "// ERROR, CLIP COLLISION----------";
1280             int ix = trackPlaylist.get_clip_index_at(moveEnd);
1281             kDebug() << "BAD CLIP STARTS AT: " << trackPlaylist.clip_start(ix) << ", LENGT: " << trackPlaylist.clip_length(ix);
1282         }
1283         trackPlaylist.insert_at(moveEnd, clipProducer, 1);
1284         trackPlaylist.consolidate_blanks(0);
1285     } else {
1286         trackPlaylist.consolidate_blanks(0);
1287         Mlt::Producer destTrackProducer(tractor.track(endTrack));
1288         Mlt::Playlist destTrackPlaylist((mlt_playlist) destTrackProducer.get_service());
1289         destTrackPlaylist.consolidate_blanks(1);
1290         destTrackPlaylist.insert_at(moveEnd, clipProducer, 1);
1291         destTrackPlaylist.consolidate_blanks(0);
1292     }
1293
1294     mltCheckLength();
1295     mlt_events_unblock(MLT_PRODUCER_PROPERTIES(trackProducer.get_producer()), NULL);
1296     m_isBlocked = false;
1297     m_mltConsumer->set("refresh", 1);
1298 }
1299
1300 void Render::mltMoveTransition(QString type, int startTrack, int trackOffset, GenTime oldIn, GenTime oldOut, GenTime newIn, GenTime newOut) {
1301     m_isBlocked = true;
1302     m_mltConsumer->set("refresh", 0);
1303     mlt_service serv = m_mltProducer->parent().get_service();
1304
1305     mlt_service nextservice = mlt_service_get_producer(serv);
1306     mlt_properties properties = MLT_SERVICE_PROPERTIES(nextservice);
1307     QString mlt_type = mlt_properties_get(properties, "mlt_type");
1308     QString resource = mlt_properties_get(properties, "mlt_service");
1309     int old_pos = (oldIn.frames(m_fps) + oldOut.frames(m_fps)) / 2;
1310
1311     int new_in = newIn.frames(m_fps);
1312     int new_out = newOut.frames(m_fps) - 1;
1313     while (mlt_type == "transition") {
1314         mlt_transition tr = (mlt_transition) nextservice;
1315         int currentTrack = mlt_transition_get_b_track(tr);
1316         int currentIn = (int) mlt_transition_get_in(tr);
1317         int currentOut = (int) mlt_transition_get_out(tr);
1318         kDebug() << "// FOUND EXISTING TRANS, IN: " << currentIn << ", OUT: " << currentOut << ", TRACK: " << currentTrack;
1319         //kDebug()<<"// LOOKING FOR IN: "<<old_in<<", OUT: "<<old_out;
1320         kDebug() << "// OLD IN: " << oldIn.frames(m_fps) << " // OLD OUT: " << oldOut.frames(m_fps) << ", TRACK: " << startTrack << ", MID POS: " << old_pos;
1321         if (resource == type && startTrack == currentTrack && currentIn <= old_pos && currentOut >= old_pos) {
1322             mlt_transition_set_in_and_out(tr, new_in, new_out);
1323             if (trackOffset != 0) {
1324                 mlt_properties properties = MLT_TRANSITION_PROPERTIES(tr);
1325                 mlt_properties_set_int(properties, "a_track", mlt_transition_get_a_track(tr) + trackOffset);
1326                 mlt_properties_set_int(properties, "b_track", mlt_transition_get_b_track(tr) + trackOffset);
1327             }
1328             break;
1329         }
1330         nextservice = mlt_service_producer(nextservice);
1331         properties = MLT_SERVICE_PROPERTIES(nextservice);
1332         mlt_type = mlt_properties_get(properties, "mlt_type");
1333         resource = mlt_properties_get(properties, "mlt_service");
1334     }
1335     m_isBlocked = false;
1336 }
1337
1338 void Render::mltUpdateTransition(QString oldTag, QString tag, int a_track, int b_track, GenTime in, GenTime out, QMap <QString, QString> args) {
1339     kDebug() << "update transition"  << tag;
1340
1341     mltDeleteTransition(oldTag, a_track, b_track, in, out, args);
1342     mltAddTransition(tag, a_track, b_track, in, out, args);
1343     m_isBlocked = false;
1344 }
1345 typedef struct {
1346     int size;
1347     int count;
1348     mlt_service *in;
1349     mlt_service out;
1350     int filter_count;
1351     int filter_size;
1352     mlt_filter *filters;
1353     pthread_mutex_t mutex;
1354 }
1355 mlt_service_base;
1356
1357 void Render::mltDeleteTransition(QString tag, int a_track, int b_track, GenTime in, GenTime out, QMap <QString, QString> args) {
1358     Mlt::Service service(m_mltProducer->parent().get_service());
1359
1360     Mlt::Tractor tractor(service);
1361     for (int track = 0;track < 10;track++) {
1362         Mlt::Producer *trackprod = tractor.track(track);
1363         if (!trackprod)
1364             continue;
1365         Mlt::Producer trackProducer(trackprod);
1366         Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1367         Mlt::Producer *prod = NULL;
1368         int g = 0;
1369         do {
1370             prod = trackPlaylist.get_clip(g++);
1371             if (prod) {
1372
1373                 for (int j = 0;j < prod->count();j++) {
1374
1375                     kDebug() << prod->get_name(j) << " " << prod->get(j);
1376                 }
1377                 Mlt::Producer parprod = prod->parent();
1378                 for (int j = 0;j < parprod.count();j++) {
1379
1380                     kDebug() << "  " << parprod.get_name(j) << " " << parprod.get(j);
1381                 }
1382                 Mlt::Tractor tractor(parprod);
1383                 if (tractor.is_valid()) {
1384                     kDebug() << "---------ja";
1385                 }
1386             }
1387             kDebug() << "track=" << track << " " << g << " " << prod;
1388
1389             /*Mlt::Tractor parent(prod->parent());
1390              if (!parent.get_tractor())
1391               continue;
1392              Mlt::Producer *prod1=parent.track(1);
1393              if (!prod1)
1394               continue;*/
1395         } while (g < 10);
1396     }
1397
1398 #if 0
1399     return;
1400     m_isBlocked = true;
1401     m_mltConsumer->set("refresh", 0);
1402     mlt_service serv = m_mltProducer->parent().get_service();
1403     Mlt::Service service(m_mltProducer->parent().get_service());
1404
1405     Mlt::Tractor tractor(service);
1406     mlt_service nextservice = mlt_service_get_producer(serv);
1407     mlt_properties properties = MLT_SERVICE_PROPERTIES(nextservice);
1408
1409     QString mlt_type = mlt_properties_get(properties, "mlt_type");
1410     QString resource = mlt_properties_get(properties, "mlt_service");
1411     int old_pos = (in.frames(m_fps) + out.frames(m_fps)) / 2;
1412     int trackOffset = 0;
1413     int new_in = in.frames(m_fps);
1414     int new_out = out.frames(m_fps) - 1;
1415     while (mlt_type == "transition") {
1416         mlt_transition tr = (mlt_transition) nextservice;
1417         int currentTrack = mlt_transition_get_b_track(tr);
1418         int currentIn = (int) mlt_transition_get_in(tr);
1419         int currentOut = (int) mlt_transition_get_out(tr);
1420         kDebug() << "// FOUND EXISTING TRANS, IN: " << currentIn << ", OUT: " << currentOut << ", TRACK: " << currentTrack;
1421         //kDebug()<<"// LOOKING FOR IN: "<<old_in<<", OUT: "<<old_out;
1422         kDebug() << "// OLD IN: " << in.frames(m_fps) << " // OLD OUT: " << out.frames(m_fps) << ", TRACK: " << a_track << ", MID POS: " << old_pos;
1423         if (/*resource == type &&*/ b_track == currentTrack && currentIn <= old_pos && currentOut >= old_pos) {
1424             kDebug() << "found transition that matches" << resource;
1425             //mlt_transition_set_in_and_out(tr, new_in, new_out);
1426             Mlt::Field *field = tractor.field();
1427             Mlt::Transition tt(*m_mltProfile, "mix");
1428             field->plant_transition(tt, a_track, b_track);
1429 #if 0
1430             mlt_service service = MLT_TRANSITION_SERVICE(tr);
1431             mlt_service_base *base = (mlt_service_base*)service->local;
1432             for (int i = 0;i < base->count;i++) {
1433                 kDebug() << base->in[i] << " " << tr << " " << service << nextservice;
1434             }
1435             mlt_service service1 = MLT_TRACTOR_SERVICE(tractor.get_tractor());
1436             mlt_service_base *base1 = (mlt_service_base*)service1->local;
1437             for (int i = 0;i < base1->count;i++) {
1438                 kDebug() << base1->in[i] << " " << tr << " " << service << nextservice;
1439                 if (base1->in[i] == (mlt_service_s*)tr) {
1440                     mlt_service_lock(MLT_SERVICE_PROPERTIES(tr));
1441                     //mlt_properties_dec_ref( MLT_SERVICE_PROPERTIES( tr ) );
1442                     /*mlt_service_unlock(MLT_SERVICE_PROPERTIES(tr));
1443
1444
1445                     mlt_events_disconnect(properties, nextservice);
1446                     mlt_transition_close(tr);
1447                     //base1->in[i]=NULL;
1448                     base1->out = NULL;*/
1449                     base1->in[i] = NULL;
1450
1451                     base1->count--;
1452                     mlt_service_base *basetr = (mlt_service_base*)service1->local;
1453                     basetr->out = NULL;
1454                     return;
1455                 }
1456             }
1457
1458             //service->child=NULL;
1459             ///mlt_properties properties = MLT_TRANSITION_PROPERTIES(tr);
1460             ///mlt_properties_set ( properties , "active" , 0 );
1461             ///7mlt_events_disconnect(properties, nextservice);
1462             //mlt_events_fire(MLT_SERVICE_PROPERTIES(nextservice), "service-changed", NULL);
1463             //mlt_properties_set_int(properties, "a_track", mlt_transition_get_a_track(tr) + trackOffset);
1464             //mlt_properties_set_int(properties, "b_track", mlt_transition_get_b_track(tr) + trackOffset);
1465             //}
1466 #endif
1467             break;
1468         }
1469         nextservice = mlt_service_producer(nextservice);
1470         properties = MLT_SERVICE_PROPERTIES(nextservice);
1471         mlt_type = mlt_properties_get(properties, "mlt_type");
1472         resource = mlt_properties_get(properties, "mlt_service");
1473     }
1474     m_isBlocked = false;
1475 #endif
1476 }
1477
1478 void Render::mltAddTransition(QString tag, int a_track, int b_track, GenTime in, GenTime out, QMap <QString, QString> args) {
1479 #if 1
1480     Mlt::Service service(m_mltProducer->parent().get_service());
1481
1482     Mlt::Tractor tractor(service);
1483     for (int track = 0;track < 10;track++) {
1484         Mlt::Producer *trackprod = tractor.track(track);
1485         if (!trackprod)
1486             continue;
1487         Mlt::Producer trackProducer(trackprod);
1488         Mlt::Playlist trackPlaylist((mlt_playlist) trackProducer.get_service());
1489
1490         int clipindex = trackPlaylist.get_clip_index_at(in.frames(m_fps));
1491         if (clipindex != 0 && track == 5) {
1492             Mlt::Transition *transition = new Mlt::Transition(*m_mltProfile, decodedString(tag));
1493             if (!transition || !transition->get_transition())
1494                 return;
1495             transition->set_in_and_out((int) in.frames(m_fps), (int) out.frames(m_fps));
1496             QMap<QString, QString>::Iterator it;
1497             QString key;
1498
1499             kDebug() << " ------  ADDING TRANSITION PARAMs: " << args.count() << "on track " << track;
1500
1501             for (it = args.begin(); it != args.end(); ++it) {
1502                 key = it.key();
1503                 char *name = decodedString(key);
1504                 char *value = decodedString(it.value());
1505                 transition->set(name, value);
1506                 kDebug() << " ------  ADDING TRANS PARAM: " << name << ": " << value;
1507                 //filter->set("kdenlive_id", id);
1508                 delete[] name;
1509                 delete[] value;
1510             }
1511             Mlt::Producer *left = trackPlaylist.get_clip(clipindex - 1);
1512             Mlt::Producer *right = trackPlaylist.get_clip(clipindex);
1513             kDebug() << "left=" << left << " right=" << right;
1514             Mlt::Tractor mixer;
1515             Mlt::Playlist track0;
1516             mixer.set_track(track0, 0);
1517             /** read from track down */
1518             Mlt::Producer *trackprod2 = tractor.track(4);
1519             Mlt::Producer trackProducer2(trackprod2);
1520             Mlt::Playlist trackPlaylist2((mlt_playlist) trackProducer2.get_service());
1521
1522             int clipindex2 = trackPlaylist2.get_clip_index_at(in.frames(m_fps));
1523             kDebug() << clipindex2;
1524             left = trackPlaylist2.get_clip(clipindex2);
1525             //left->cut(40,left->get_playtime() );
1526             Mlt::Producer *lastleft = left->cut(left->get_in() + left->get_playtime() - 20, left->get_in() + left->get_playtime());
1527             mixer.set_track(*lastleft, 0);
1528             //track0.repeat(0, 20);
1529             mixer.set_track(*right, 1);
1530             transition->set_in_and_out(0, 20 - 1);
1531             mixer.plant_transition(transition);
1532             trackPlaylist.insert(mixer, clipindex, 0, mixer.get_playtime());
1533             trackPlaylist.remove(clipindex + 1);
1534         }
1535     }
1536     mltSavePlaylist();
1537 #else
1538     m_isBlocked = true;
1539     Mlt::Service service(m_mltProducer->parent().get_service());
1540
1541     Mlt::Tractor tractor(service);
1542     Mlt::Field *field = tractor.field();
1543     char *transId = decodedString(tag);
1544     Mlt::Transition *transition = new Mlt::Transition(*m_mltProfile, transId);
1545     if (!transition || !transition->get_transition())
1546         return;
1547     transition->set_in_and_out((int) in.frames(m_fps), (int) out.frames(m_fps));
1548     QMap<QString, QString>::Iterator it;
1549     QString key;
1550
1551     kDebug() << " ------  ADDING TRANSITION PARAMs: " << args.count();
1552
1553     for (it = args.begin(); it != args.end(); ++it) {
1554         key = it.key();
1555         char *name = decodedString(key);
1556         char *value = decodedString(it.value());
1557         transition->set(name, value);
1558         kDebug() << " ------  ADDING TRANS PARAM: " << name << ": " << value;
1559         //filter->set("kdenlive_id", id);
1560         delete[] name;
1561         delete[] value;
1562     }
1563     // attach filter to the clip
1564     field->plant_transition(*transition, a_track, b_track);
1565     delete[] transId;
1566     m_isBlocked = false;
1567     refresh();
1568 #endif
1569 }
1570
1571 void Render::mltSavePlaylist() {
1572     kWarning() << "// UPDATING PLAYLIST TO DISK++++++++++++++++";
1573     Mlt::Consumer *fileConsumer = new Mlt::Consumer(*m_mltProfile, "westley");
1574     fileConsumer->set("resource", "/tmp/playlist.westley");
1575
1576     Mlt::Service service(m_mltProducer->get_service());
1577     Mlt::Tractor tractor(service);
1578
1579     fileConsumer->connect(service);
1580     fileConsumer->start();
1581
1582 }
1583
1584 #include "renderer.moc"