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