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