]> git.sesse.net Git - kdenlive/blob - src/initeffects.cpp
Keyframable rotation for affine transition
[kdenlive] / src / initeffects.cpp
1 /***************************************************************************
2                           initeffects.cpp  -  description
3                              -------------------
4     begin                :  Jul 2006
5     copyright            : (C) 2006 by Jean-Baptiste Mardelle
6     email                : jb@ader.ch
7     copyright            : (C) 2008 Marco Gittler
8     email                : g.marco@freenet.de
9  ***************************************************************************/
10
11 /***************************************************************************
12  *                                                                         *
13  *   This program is free software; you can redistribute it and/or modify  *
14  *   it under the terms of the GNU General Public License as published by  *
15  *   the Free Software Foundation; either version 2 of the License, or     *
16  *   (at your option) any later version.                                   *
17  *                                                                         *
18  ***************************************************************************/
19
20 #include "initeffects.h"
21 #include "kdenlivesettings.h"
22 #include "effectslist.h"
23 #include "effectstackedit.h"
24 #include "mainwindow.h"
25
26 #include <KDebug>
27 #include <kglobal.h>
28 #include <KStandardDirs>
29
30 #include <QFile>
31 #include <qregexp.h>
32 #include <QDir>
33 #include <QIcon>
34
35 initEffectsThumbnailer::initEffectsThumbnailer() :
36     QThread()
37 {
38 }
39
40 void initEffectsThumbnailer::prepareThumbnailsCall(const QStringList& list)
41 {
42     m_list = list;
43     start();
44     kDebug() << "done";
45 }
46
47 void initEffectsThumbnailer::run()
48 {
49     foreach(const QString & entry, m_list) {
50         kDebug() << entry;
51         if (!entry.isEmpty() && (entry.endsWith(".png") || entry.endsWith(".pgm"))) {
52             if (!EffectStackEdit::iconCache.contains(entry)) {
53                 QImage pix(entry);
54                 //if (!pix.isNull())
55                 EffectStackEdit::iconCache[entry] = pix.scaled(30, 30);
56                 kDebug() << "stored";
57             }
58         }
59     }
60 }
61
62 initEffectsThumbnailer initEffects::thumbnailer;
63
64 // static
65 void initEffects::refreshLumas()
66 {
67     // Check for Kdenlive installed luma files, add empty string at start for no luma
68     QStringList imagenamelist = QStringList() << i18n("None");
69     QStringList imagefiles = QStringList() << QString();
70     QStringList filters;
71     filters << "*.pgm" << "*.png";
72
73     QStringList customLumas = KGlobal::dirs()->findDirs("appdata", "lumas");
74     foreach(const QString & folder, customLumas) {
75         QStringList filesnames = QDir(folder).entryList(filters, QDir::Files);
76         foreach(const QString & fname, filesnames) {
77             imagenamelist.append(fname);
78             imagefiles.append(KUrl(folder).path(KUrl::AddTrailingSlash) + fname);
79         }
80     }
81
82     // Check for MLT lumas
83     KUrl folder(mlt_environment("MLT_DATA"));
84     folder.addPath("lumas");
85     folder.addPath(mlt_environment("MLT_NORMALISATION"));
86     QDir lumafolder(folder.path());
87     QStringList filesnames = lumafolder.entryList(filters, QDir::Files);
88     foreach(const QString & fname, filesnames) {
89         imagenamelist.append(fname);
90         KUrl path(folder);
91         path.addPath(fname);
92         imagefiles.append(path.toLocalFile());
93     }
94     QDomElement lumaTransition = MainWindow::transitions.getEffectByTag("luma", "luma");
95     QDomNodeList params = lumaTransition.elementsByTagName("parameter");
96     for (int i = 0; i < params.count(); i++) {
97         QDomElement e = params.item(i).toElement();
98         if (e.attribute("tag") == "resource") {
99             e.setAttribute("paramlistdisplay", imagenamelist.join(","));
100             e.setAttribute("paramlist", imagefiles.join(","));
101             break;
102         }
103     }
104
105     QDomElement compositeTransition = MainWindow::transitions.getEffectByTag("composite", "composite");
106     params = compositeTransition.elementsByTagName("parameter");
107     for (int i = 0; i < params.count(); i++) {
108         QDomElement e = params.item(i).toElement();
109         if (e.attribute("tag") == "luma") {
110             e.setAttribute("paramlistdisplay", imagenamelist.join(","));
111             e.setAttribute("paramlist", imagefiles.join(","));
112             break;
113         }
114     }
115 }
116
117 // static
118 QDomDocument initEffects::getUsedCustomEffects(QMap <QString, QString> effectids)
119 {
120     QMapIterator<QString, QString> i(effectids);
121     int ix;
122     QDomDocument doc;
123     QDomElement list = doc.createElement("customeffects");
124     doc.appendChild(list);
125     while (i.hasNext()) {
126         i.next();
127         ix = MainWindow::customEffects.hasEffect(i.value(), i.key());
128         if (ix > -1) {
129             QDomElement e = MainWindow::customEffects.at(ix);
130             list.appendChild(doc.importNode(e, true));
131         }
132     }
133     return doc;
134 }
135
136 //static
137 Mlt::Repository *initEffects::parseEffectFiles()
138 {
139     QStringList::Iterator more;
140     QStringList::Iterator it;
141     QStringList fileList;
142     QString itemName;
143
144     Mlt::Repository *repository = Mlt::Factory::init();
145     if (!repository) {
146         kDebug() << "Repository didn't finish initialisation" ;
147         return NULL;
148     }
149
150     // Retrieve the list of MLT's available effects.
151     Mlt::Properties *filters = repository->filters();
152     QStringList filtersList;
153     for (int i = 0; i < filters->count(); ++i)
154         filtersList << filters->get_name(i);
155     delete filters;
156
157     // Retrieve the list of available producers.
158     Mlt::Properties *producers = repository->producers();
159     QStringList producersList;
160     for (int i = 0; i < producers->count(); ++i)
161         producersList << producers->get_name(i);
162     KdenliveSettings::setProducerslist(producersList);
163     delete producers;
164
165     // Retrieve the list of available transitions.
166     Mlt::Properties *transitions = repository->transitions();
167     QStringList transitionsItemList;
168     for (int i = 0; i < transitions->count(); ++i)
169         transitionsItemList << transitions->get_name(i);
170     delete transitions;
171
172     // Remove blacklisted transitions from the list.
173     QFile file(KStandardDirs::locate("appdata", "blacklisted_transitions.txt"));
174     if (file.open(QIODevice::ReadOnly)) {
175         QTextStream in(&file);
176         while (!in.atEnd()) {
177             QString black = in.readLine().simplified();
178             if (!black.isEmpty() && !black.startsWith('#') &&
179                     transitionsItemList.contains(black))
180                 transitionsItemList.removeAll(black);
181         }
182         file.close();
183     }
184
185     // Fill transitions list.
186     fillTransitionsList(repository, &MainWindow::transitions, transitionsItemList);
187
188     // Set the directories to look into for ladspa plugins.
189     KGlobal::dirs()->addResourceType("ladspa_plugin", 0, "lib/ladspa");
190     KGlobal::dirs()->addResourceDir("ladspa_plugin", "/usr/lib/ladspa");
191     KGlobal::dirs()->addResourceDir("ladspa_plugin", "/usr/local/lib/ladspa");
192     KGlobal::dirs()->addResourceDir("ladspa_plugin", "/opt/lib/ladspa");
193     KGlobal::dirs()->addResourceDir("ladspa_plugin", "/opt/local/lib/ladspa");
194     KGlobal::dirs()->addResourceDir("ladspa_plugin", "/usr/lib64/ladspa");
195     KGlobal::dirs()->addResourceDir("ladspa_plugin", "/usr/local/lib64/ladspa");
196
197     // Set the directories to look into for effects.
198     QStringList direc = KGlobal::dirs()->findDirs("appdata", "effects");
199
200     // Iterate through effects directories to parse all XML files.
201     for (more = direc.begin(); more != direc.end(); ++more) {
202         QDir directory(*more);
203         QStringList filter;
204         filter << "*.xml";
205         fileList = directory.entryList(filter, QDir::Files);
206         for (it = fileList.begin(); it != fileList.end(); ++it) {
207             itemName = KUrl(*more + *it).path();
208             parseEffectFile(&MainWindow::customEffects,
209                             &MainWindow::audioEffects,
210                             &MainWindow::videoEffects,
211                             itemName, filtersList, producersList, repository);
212         }
213     }
214
215     // Remove blacklisted effects from the filters list.
216     QFile file2(KStandardDirs::locate("appdata", "blacklisted_effects.txt"));
217     if (file2.open(QIODevice::ReadOnly)) {
218         QTextStream in(&file2);
219         while (!in.atEnd()) {
220             QString black = in.readLine().simplified();
221             if (!black.isEmpty() && !black.startsWith('#') &&
222                     filtersList.contains(black))
223                 filtersList.removeAll(black);
224         }
225         file2.close();
226     }
227
228     /*
229      * Cleanup the global lists. We use QMap because of its automatic sorting
230      * (by key) and key uniqueness (using insert() instead of insertMulti()).
231      * This introduces some more cycles (while removing them from other parts of
232      * the code and centralising them), but due to the way this methods, QMap
233      * and EffectsList are implemented, there's no easy way to make it
234      * differently without reinplementing something (which should really be
235      * done).
236      */
237     QDomElement effectInfo;
238     QMap<QString, QDomElement> effectsMap;
239     for (int i = 0; i < MainWindow::transitions.count(); ++i) {
240         effectInfo = MainWindow::transitions.at(i);
241         effectsMap.insert(effectInfo.elementsByTagName("name").item(0).toElement().text().toLower().toUtf8().data(), effectInfo);
242     }
243     MainWindow::transitions.clearList();
244     foreach(const QDomElement & effect, effectsMap)
245     MainWindow::transitions.append(effect);
246     effectsMap.clear();
247     for (int i = 0; i < MainWindow::customEffects.count(); ++i) {
248         effectInfo = MainWindow::customEffects.at(i);
249         effectsMap.insert(effectInfo.elementsByTagName("name").item(0).toElement().text().toLower().toUtf8().data(), effectInfo);
250     }
251     MainWindow::customEffects.clearList();
252     foreach(const QDomElement & effect, effectsMap)
253     MainWindow::customEffects.append(effect);
254     effectsMap.clear();
255     for (int i = 0; i < MainWindow::audioEffects.count(); ++i) {
256         effectInfo = MainWindow::audioEffects.at(i);
257         effectsMap.insert(effectInfo.elementsByTagName("name").item(0).toElement().text().toLower().toUtf8().data(), effectInfo);
258     }
259     MainWindow::audioEffects.clearList();
260     foreach(const QDomElement & effect, effectsMap)
261     MainWindow::audioEffects.append(effect);
262     effectsMap.clear();
263     for (int i = 0; i < MainWindow::videoEffects.count(); ++i) {
264         effectInfo = MainWindow::videoEffects.at(i);
265         effectsMap.insert(effectInfo.elementsByTagName("name").item(0).toElement().text().toLower().toUtf8().data(), effectInfo);
266     }
267     // Add remaining filters to the list of video effects.
268     foreach(const QString & filtername, filtersList) {
269         QDomDocument doc = createDescriptionFromMlt(repository, "filters", filtername);
270         if (!doc.isNull())
271             effectsMap.insert(doc.documentElement().elementsByTagName("name").item(0).toElement().text().toLower().toUtf8().data(), doc.documentElement());
272     }
273     MainWindow::videoEffects.clearList();
274     foreach(const QDomElement & effect, effectsMap)
275     MainWindow::videoEffects.append(effect);
276
277     return repository;
278 }
279
280 // static
281 void initEffects::parseCustomEffectsFile()
282 {
283     MainWindow::customEffects.clearList();
284     /*
285      * Why a QMap? See parseEffectFiles(). It's probably useless here, but we
286      * cannot be sure about it.
287      */
288     QMap<QString, QDomElement> effectsMap;
289     QString path = KStandardDirs::locateLocal("appdata", "effects/", true);
290     QDir directory = QDir(path);
291     QStringList filter;
292     filter << "*.xml";
293     const QStringList fileList = directory.entryList(filter, QDir::Files);
294     /*
295      * We need to declare these variables outside the foreach, or the QMap will
296      * refer to non existing variables (QMap::insert() takes references as
297      * parameters).
298      */
299     QDomDocument doc;
300     QDomNodeList effects;
301     QDomElement e;
302     foreach(const QString & filename, fileList) {
303         QString itemName = KUrl(path + filename).path();
304         QFile file(itemName);
305         doc.setContent(&file, false);
306         file.close();
307         effects = doc.elementsByTagName("effect");
308         if (effects.count() != 1) {
309             kDebug() << "More than one effect in file " << itemName << ", not supported yet";
310         } else {
311             e = effects.item(0).toElement();
312             effectsMap.insert(e.elementsByTagName("name").item(0).toElement().text().toLower().toUtf8().data(), e);
313         }
314     }
315     foreach(const QDomElement & effect, effectsMap)
316     MainWindow::customEffects.append(effect);
317 }
318
319 // static
320 void initEffects::parseEffectFile(EffectsList *customEffectList, EffectsList *audioEffectList, EffectsList *videoEffectList, QString name, QStringList filtersList, QStringList producersList, Mlt::Repository *repository)
321 {
322     QDomDocument doc;
323     QFile file(name);
324     doc.setContent(&file, false);
325     file.close();
326     QDomElement documentElement = doc.documentElement();
327     QDomNodeList effects = doc.elementsByTagName("effect");
328
329     if (effects.count() == 0) {
330         kDebug() << "Effect broken: " << name;
331         return;
332     }
333
334     for (int i = 0; !effects.item(i).isNull(); ++i) {
335         documentElement = effects.item(i).toElement();
336         QString tag = documentElement.attribute("tag", QString());
337
338         if (documentElement.hasAttribute("version")) {
339             // a specific version of the filter is required
340             Mlt::Properties *metadata = repository->metadata(filter_type, tag.toUtf8().data());
341             if (metadata && metadata->is_valid()) {
342                 double version = metadata->get_double("version");
343                 if (documentElement.attribute("version").toDouble() > version) {
344                     delete metadata;
345                     return;
346                 }
347             }
348             delete metadata;
349         }
350
351         bool ladspaOk = true;
352         if (tag == "ladspa") {
353             QString library = documentElement.attribute("library", QString());
354             if (KStandardDirs::locate("ladspa_plugin", library).isEmpty()) ladspaOk = false;
355         }
356
357         // Parse effect information.
358         if ((filtersList.contains(tag) || producersList.contains(tag)) && ladspaOk) {
359             QString type = documentElement.attribute("type", QString());
360             if (type == "audio")
361                 audioEffectList->append(documentElement);
362             else if (type == "custom")
363                 customEffectList->append(documentElement);
364             else
365                 videoEffectList->append(documentElement);
366         }
367
368         /*
369              QDomNode n = documentElement.firstChild();
370          QString id, effectName, effectTag, paramType;
371          int paramCount = 0;
372          EFFECTTYPE type;
373
374                 // Create Effect
375                 EffectParamDescFactory effectDescParamFactory;
376                 EffectDesc *effect = NULL;
377
378          // parse effect file
379          QDomNode namenode = documentElement.elementsByTagName("name").item(0);
380          if (!namenode.isNull()) effectName = i18n(namenode.toElement().text());
381          if (!groupName.isEmpty()) effectName.prepend("_" + groupName + "_");
382
383          QDomNode propsnode = documentElement.elementsByTagName("properties").item(0);
384          if (!propsnode.isNull()) {
385              QDomElement propselement = propsnode.toElement();
386              id = propselement.attribute("id", QString());
387              effectTag = propselement.attribute("tag", QString());
388              if (propselement.attribute("type", QString()) == "audio") type = AUDIOEFFECT;
389              else if (propselement.attribute("type", QString()) == "custom") type = CUSTOMEFFECT;
390              else type = VIDEOEFFECT;
391          }
392
393          QString effectDescription;
394          QDomNode descnode = documentElement.elementsByTagName("description").item(0);
395          if (!descnode.isNull()) effectDescription = descnode.toElement().text() + "<br />";
396
397          QString effectAuthor;
398          QDomNode authnode = documentElement.elementsByTagName("author").item(0);
399          if (!authnode.isNull()) effectAuthor = authnode.toElement().text() + "<br />";
400
401          if (effectName.isEmpty() || id.isEmpty() || effectTag.isEmpty()) return;
402
403          effect = new EffectDesc(effectName, id, effectTag, effectDescription, effectAuthor, type);
404
405          QDomNodeList paramList = documentElement.elementsByTagName("parameter");
406          if (paramList.count() == 0) {
407              QDomElement fixed = doc.createElement("parameter");
408              fixed.setAttribute("type", "fixed");
409              effect->addParameter(effectDescParamFactory.createParameter(fixed));
410          }
411          else for (int i = 0; i < paramList.count(); i++) {
412              QDomElement e = paramList.item(i).toElement();
413              if (!e.isNull()) {
414           paramCount++;
415            QDomNamedNodeMap attrs = e.attributes();
416           int i = 0;
417           QString value;
418           while (!attrs.item(i).isNull()) {
419               QDomNode n = attrs.item(i);
420               value = n.nodeValue();
421               if (value.find("MAX_WIDTH") != -1)
422            value.replace("MAX_WIDTH", QString::number(KdenliveSettings::defaultwidth()));
423               if (value.find("MID_WIDTH") != -1)
424            value.replace("MID_WIDTH", QString::number(KdenliveSettings::defaultwidth() / 2));
425               if (value.find("MAX_HEIGHT") != -1)
426            value.replace("MAX_HEIGHT", QString::number(KdenliveSettings::defaultheight()));
427               if (value.find("MID_HEIGHT") != -1)
428            value.replace("MID_HEIGHT", QString::number(KdenliveSettings::defaultheight() / 2));
429               n.setNodeValue(value);
430               i++;
431           }
432           effect->addParameter(effectDescParamFactory.createParameter(e));
433              }
434          }
435                 effectList->append(effect);
436          }*/
437     }
438 }
439
440 //static
441 const char* initEffects::ladspaEffectString(int ladspaId, QStringList params)
442 {
443     if (ladspaId == 1433)  //Pitch
444         return ladspaPitchEffectString(params);
445     else if (ladspaId == 1216)  //Room Reverb
446         return ladspaRoomReverbEffectString(params);
447     else if (ladspaId == 1423)  //Reverb
448         return ladspaReverbEffectString(params);
449     else if (ladspaId == 1901)  //Reverb
450         return ladspaEqualizerEffectString(params);
451     else {
452         kDebug() << "++++++++++  ASKING FOR UNKNOWN LADSPA EFFECT: " << ladspaId << endl;
453         return "<jackrack></jackrack>";
454     }
455 }
456
457 //static
458 void initEffects::ladspaEffectFile(const QString & fname, int ladspaId, QStringList params)
459 {
460     const char *filterString;
461     switch (ladspaId) {
462     case 1433: //Pitch
463         filterString = ladspaPitchEffectString(params);
464         break;
465     case 1905: //Vinyl
466         filterString = ladspaVinylEffectString(params);
467         break;
468     case 1216 : //Room Reverb
469         filterString = ladspaRoomReverbEffectString(params);
470         break;
471     case 1423: //Reverb
472         filterString = ladspaReverbEffectString(params);
473         break;
474     case 1195: //Declipper
475         filterString = ladspaDeclipEffectString(params);
476         break;
477     case 1901:  //Reverb
478         filterString = ladspaEqualizerEffectString(params);
479         break;
480     case 1913: // Limiter
481         filterString = ladspaLimiterEffectString(params);
482         break;
483     case 1193: // Pitch Shifter
484         filterString = ladspaPitchShifterEffectString(params);
485         break;
486     case 1417: // Rate Scaler
487         filterString = ladspaRateScalerEffectString(params);
488         break;
489     case 1217: // Phaser
490         filterString = ladspaPhaserEffectString(params);
491         break;
492     case 1197: // 15 Band Equalizer
493         filterString = ladspaEqualizer15EffectString(params);
494         break;
495     default:
496         kDebug() << "++++++++++  ASKING FOR UNKNOWN LADSPA EFFECT: " << ladspaId << endl;
497         return;
498         break;
499     }
500
501     QFile f(fname);
502     if (f.open(QIODevice::WriteOnly)) {
503         QTextStream stream(&f);
504         stream << filterString;
505         f.close();
506     } else kDebug() << "++++++++++  ERROR CANNOT WRITE TO: " << KdenliveSettings::currenttmpfolder() +  fname << endl;
507     delete [] filterString;
508 }
509
510 const QString jackString = "<?xml version=\"1.0\"?><!DOCTYPE jackrack SYSTEM \"http://purge.bash.sh/~rah/jack_rack_1.2.dtd\"><jackrack><channels>2</channels><samplerate>48000</samplerate><plugin><id>";
511
512
513 const char* initEffects::ladspaDeclipEffectString(QStringList)
514 {
515     return qstrdup(QString(jackString + "1195</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><lockall>true</lockall></plugin></jackrack>").toUtf8());
516 }
517
518 /*
519 const char* initEffects::ladspaVocoderEffectString(QStringList params)
520 {
521  return qstrdup( QString(jackString + "1441</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><lockall>true</lockall><controlrow><lock>true</lock><value>0.000000</value><value>0.000000</value></controlrow><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow><controlrow><lock>true</lock><value>%2</value><value>%2</value></controlrow><controlrow><lock>true</lock><value>%2</value><value>%2</value></controlrow><controlrow><lock>true</lock><value>%2</value><value>%2</value></controlrow><controlrow><lock>true</lock><value>%2</value><value>%2</value></controlrow><controlrow><lock>true</lock><value>%3</value><value>%3</value></controlrow><controlrow><lock>true</lock><value>%3</value><value>%3</value></controlrow><controlrow><lock>true</lock><value>%3</value><value>%3</value></controlrow><controlrow><lock>true</lock><value>%3</value><value>%3</value></controlrow><controlrow><lock>true</lock><value>%4</value><value>%4</value></controlrow><controlrow><lock>true</lock><value>%4</value><value>%4</value></controlrow><controlrow><lock>true</lock><value>%4</value><value>%4</value></controlrow><controlrow><lock>true</lock><value>%4</value><value>%4</value></controlrow></plugin></jackrack>").arg(params[0]).arg(params[1]).arg(params[2]).arg(params[3]));
522 }*/
523
524 const char* initEffects::ladspaVinylEffectString(QStringList params)
525 {
526     return qstrdup(QString(jackString + "1905</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><controlrow><value>%1</value></controlrow><controlrow><value>%2</value></controlrow><controlrow><value>%3</value></controlrow><controlrow><value>%4</value></controlrow><controlrow><value>%5</value></controlrow></plugin></jackrack>").arg(params[0]).arg(params[1]).arg(params[2]).arg(params[3]).arg(params[4]).toUtf8());
527 }
528
529 const char* initEffects::ladspaPitchEffectString(QStringList params)
530 {
531     return qstrdup(QString(jackString + "1433</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.0</value><value>1.0</value></wet_dry_values><lockall>true</lockall><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow><controlrow><lock>true</lock><value>4.000000</value><value>4.000000</value></controlrow></plugin></jackrack>").arg(params[0]).toUtf8());
532 }
533
534 const char* initEffects::ladspaRoomReverbEffectString(QStringList params)
535 {
536     return qstrdup(QString(jackString + "1216</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><lockall>true</lockall><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow><controlrow><lock>true</lock><value>%2</value><value>%2</value></controlrow><controlrow><lock>true</lock><value>%3</value><value>%3</value></controlrow><controlrow><lock>true</lock><value>0.750000</value><value>0.750000</value></controlrow><controlrow><lock>true</lock><value>-70.000000</value><value>-70.000000</value></controlrow><controlrow><lock>true</lock><value>0.000000</value><value>0.000000</value></controlrow><controlrow><lock>true</lock><value>-17.500000</value><value>-17.500000</value></controlrow></plugin></jackrack>").arg(params[0]).arg(params[1]).arg(params[2]).toUtf8());
537 }
538
539 const char* initEffects::ladspaReverbEffectString(QStringList params)
540 {
541     return qstrdup(QString(jackString + "1423</id><enabled>true</enabled>  <wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked>    <wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values>    <lockall>true</lockall><controlrow><lock>true</lock><value>%1</value>      <value>%1</value></controlrow><controlrow><lock>true</lock><value>%2</value><value>%2</value></controlrow><controlrow><lock>true</lock><value>0.250000</value><value>0.250000</value></controlrow></plugin></jackrack>").arg(params[0]).arg(params[1]).toUtf8());
542 }
543
544 const char* initEffects::ladspaEqualizerEffectString(QStringList params)
545 {
546     return qstrdup(QString(jackString + "1901</id><enabled>true</enabled>    <wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked>    <wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><controlrow><value>%1</value></controlrow><controlrow><value>%2</value></controlrow>    <controlrow><value>%3</value></controlrow></plugin></jackrack>").arg(params[0]).arg(params[1]).arg(params[2]).toUtf8());
547 }
548
549 const char* initEffects::ladspaLimiterEffectString(QStringList params)
550 {
551     return qstrdup(QString(jackString + "1913</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><controlrow><value>%1</value></controlrow><controlrow><value>%2</value></controlrow><controlrow><value>%3</value></controlrow></plugin></jackrack>").arg(params[0]).arg(params[1]).arg(params[2]).toUtf8());
552 }
553
554 const char* initEffects::ladspaPitchShifterEffectString(QStringList params)
555 {
556     return qstrdup(QString(jackString + "1193</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><lockall>true</lockall><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow></plugin></jackrack>").arg(params[0]).toUtf8());
557 }
558
559 const char* initEffects::ladspaRateScalerEffectString(QStringList params)
560 {
561     return qstrdup(QString(jackString + "1417</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><lockall>true</lockall><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow></plugin></jackrack>").arg(params[0]).toUtf8());
562 }
563
564 const char* initEffects::ladspaPhaserEffectString(QStringList params)
565 {
566     return qstrdup(QString(jackString + "1217</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><lockall>true</lockall><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow><controlrow><lock>true</lock><value>%2</value><value>%2</value></controlrow><controlrow><lock>true</lock><value>%3</value><value>%3</value></controlrow><controlrow><lock>true</lock><value>%4</value><value>%4</value></controlrow></plugin></jackrack>").arg(params[0]).arg(params[1]).arg(params[2]).arg(params[3]).toUtf8());
567 }
568 const char* initEffects::ladspaEqualizer15EffectString(QStringList params)
569 {
570     return qstrdup(QString(jackString + "1197</id><enabled>true</enabled><wet_dry_enabled>false</wet_dry_enabled><wet_dry_locked>true</wet_dry_locked><wet_dry_values><value>1.000000</value><value>1.000000</value></wet_dry_values><lockall>true</lockall><controlrow><lock>true</lock><value>%1</value><value>%1</value></controlrow><controlrow><lock>true</lock><value>%2</value><value>%2</value></controlrow><controlrow><lock>true</lock><value>%3</value><value>%3</value></controlrow><controlrow><lock>true</lock><value>%4</value><value>%4</value></controlrow><controlrow><lock>true</lock><value>%5</value><value>%5</value></controlrow><controlrow><lock>true</lock><value>%6</value><value>%6</value></controlrow><controlrow><lock>true</lock><value>%7</value><value>%7</value></controlrow><controlrow><lock>true</lock><value>%8</value><value>%8</value></controlrow><controlrow><lock>true</lock><value>%9</value><value>%9</value></controlrow><controlrow><lock>true</lock><value>%10</value><value>%10</value></controlrow><controlrow><lock>true</lock><value>%11</value><value>%11</value></controlrow><controlrow><lock>true</lock><value>%12</value><value>%12</value></controlrow><controlrow><lock>true</lock><value>%13</value><value>%13</value></controlrow><controlrow><lock>true</lock><value>%14</value><value>%14</value></controlrow><controlrow><lock>true</lock><value>%15</value><value>%15</value></controlrow></plugin></jackrack>").arg(params[0]).arg(params[1]).arg(params[2]).arg(params[3]).arg(params[4]).arg(params[5]).arg(params[6]).arg(params[7]).arg(params[8]).arg(params[9]).arg(params[10]).arg(params[11]).arg(params[12]).arg(params[13]).arg(params[14]).toUtf8());
571 }
572
573
574 QDomDocument initEffects::createDescriptionFromMlt(Mlt::Repository* repository, const QString& /*type*/, const QString& filtername)
575 {
576
577     QDomDocument ret;
578     Mlt::Properties *metadata = repository->metadata(filter_type, filtername.toAscii().data());
579     //kDebug() << filtername;
580     if (metadata && metadata->is_valid()) {
581         if (metadata->get("title") && metadata->get("identifier")) {
582             QDomElement eff = ret.createElement("effect");
583             eff.setAttribute("tag", metadata->get("identifier"));
584             eff.setAttribute("id", metadata->get("identifier"));
585
586             QDomElement name = ret.createElement("name");
587             name.appendChild(ret.createTextNode(metadata->get("title")));
588
589             QDomElement desc = ret.createElement("description");
590             desc.appendChild(ret.createTextNode(metadata->get("description")));
591
592             QDomElement author = ret.createElement("author");
593             author.appendChild(ret.createTextNode(metadata->get("creator")));
594
595             eff.appendChild(name);
596             eff.appendChild(author);
597             eff.appendChild(desc);
598
599             Mlt::Properties param_props((mlt_properties) metadata->get_data("parameters"));
600             for (int j = 0; param_props.is_valid() && j < param_props.count(); j++) {
601                 QDomElement params = ret.createElement("parameter");
602
603                 Mlt::Properties paramdesc((mlt_properties) param_props.get_data(param_props.get_name(j)));
604
605                 params.setAttribute("name", paramdesc.get("identifier"));
606
607                 if (paramdesc.get("maximum")) params.setAttribute("max", paramdesc.get("maximum"));
608                 if (paramdesc.get("minimum")) params.setAttribute("min", paramdesc.get("minimum"));
609                 if (QString(paramdesc.get("type")) == "integer")
610                     params.setAttribute("type", "constant");
611                 if (QString(paramdesc.get("type")) == "float") {
612                     params.setAttribute("type", "constant");
613                     params.setAttribute("factor", "1000");
614                     if (paramdesc.get("maximum")) params.setAttribute("max", QString(paramdesc.get("maximum")).toFloat() * 1000.0);
615                     if (paramdesc.get("minimum")) params.setAttribute("min", QString(paramdesc.get("minimum")).toFloat() * 1000.0);
616                 }
617                 if (QString(paramdesc.get("type")) == "boolean")
618                     params.setAttribute("type", "bool");
619                 if (!QString(paramdesc.get("format")).isEmpty() && QString(paramdesc.get("type")) != "geometry") {
620                     params.setAttribute("type", "geometry");
621                     params.setAttribute("format", paramdesc.get("format"));
622                 }
623                 if (!QString(paramdesc.get("format")).isEmpty() && QString(paramdesc.get("type")) == "geometry") {
624                     params.setAttribute("type", "geometry");
625                     //params.setAttribute("format", paramdesc.get("format"));
626                 }
627                 if (paramdesc.get("default")) params.setAttribute("default", paramdesc.get("default"));
628                 if (paramdesc.get("value")) {
629                     params.setAttribute("value", paramdesc.get("value"));
630                 } else {
631                     params.setAttribute("value", paramdesc.get("default"));
632                 }
633
634
635                 QDomElement pname = ret.createElement("name");
636                 pname.appendChild(ret.createTextNode(paramdesc.get("title")));
637                 params.appendChild(pname);
638
639                 eff.appendChild(params);
640             }
641             ret.appendChild(eff);
642         }
643     }
644     delete metadata;
645     metadata = 0;
646     /* QString outstr;
647      QTextStream str(&outstr);
648      ret.save(str, 2);
649      kDebug() << outstr;*/
650     return ret;
651 }
652
653 void initEffects::fillTransitionsList(Mlt::Repository *repository, EffectsList *transitions, QStringList names)
654 {
655     // Remove transitions that are not implemented.
656     int pos = names.indexOf("mix");
657     if (pos != -1)
658         names.takeAt(pos);
659
660     QStringList imagenamelist = QStringList() << i18n("None");
661     QStringList imagefiles = QStringList() << QString();
662     QStringList filters;
663     filters << "*.pgm" << "*.png";
664     QStringList customLumas = KGlobal::dirs()->findDirs("appdata", "lumas");
665     foreach(QString folder, customLumas) {
666         if (!folder.endsWith('/'))
667             folder.append('/');
668         QStringList filesnames = QDir(folder).entryList(filters, QDir::Files);
669         foreach(const QString & fname, filesnames) {
670             imagenamelist.append(fname);
671             imagefiles.append(folder + fname);
672         }
673     }
674
675     // Check for MLT luma files.
676     KUrl folder(mlt_environment("MLT_DATA"));
677     folder.addPath("lumas");
678     folder.addPath(mlt_environment("MLT_NORMALISATION"));
679     QDir lumafolder(folder.path());
680     QStringList filesnames = lumafolder.entryList(filters, QDir::Files);
681     foreach(const QString & fname, filesnames) {
682         imagenamelist.append(fname);
683         KUrl path(folder);
684         path.addPath(fname);
685         imagefiles.append(path.toLocalFile());
686     }
687
688     foreach(const QString & name, names) {
689         QDomDocument ret;
690         QDomElement ktrans = ret.createElement("ktransition");
691         ret.appendChild(ktrans);
692         ktrans.setAttribute("tag", name);
693
694         QDomElement tname = ret.createElement("name");
695         QDomElement desc = ret.createElement("description");
696         ktrans.appendChild(tname);
697         ktrans.appendChild(desc);
698         Mlt::Properties *metadata = repository->metadata(transition_type, name.toUtf8().data());
699         if (metadata && metadata->is_valid()) {
700             // If possible, set name and description.
701             if (metadata->get("title") && metadata->get("identifier"))
702                 tname.appendChild(ret.createTextNode(metadata->get("title")));
703             desc.appendChild(ret.createTextNode(metadata->get("description")));
704
705             Mlt::Properties param_props((mlt_properties) metadata->get_data("parameters"));
706             for (int i = 0; param_props.is_valid() && i < param_props.count(); ++i) {
707                 QDomElement params = ret.createElement("parameter");
708
709                 Mlt::Properties paramdesc((mlt_properties) param_props.get_data(param_props.get_name(i)));
710
711                 params.setAttribute("name", paramdesc.get("identifier"));
712
713                 if (paramdesc.get("maximum"))
714                     params.setAttribute("max", paramdesc.get("maximum"));
715                 if (paramdesc.get("minimum"))
716                     params.setAttribute("min", paramdesc.get("minimum"));
717                 if (QString(paramdesc.get("type")) == "integer") {
718                     params.setAttribute("type", "constant");
719                     params.setAttribute("factor", "100");
720                 }
721                 if (QString(paramdesc.get("type")) == "boolean")
722                     params.setAttribute("type", "bool");
723                 if (!QString(paramdesc.get("format")).isEmpty()) {
724                     params.setAttribute("type", "complex");
725                     params.setAttribute("format", paramdesc.get("format"));
726                 }
727                 if (paramdesc.get("default"))
728                     params.setAttribute("default", paramdesc.get("default"));
729                 if (paramdesc.get("value"))
730                     params.setAttribute("value", paramdesc.get("value"));
731                 else
732                     params.setAttribute("value", paramdesc.get("default"));
733
734                 QDomElement pname = ret.createElement("name");
735                 pname.appendChild(ret.createTextNode(paramdesc.get("title")));
736                 params.appendChild(pname);
737                 ktrans.appendChild(params);
738             }
739             delete metadata;
740             metadata = 0;
741         } else {
742             /*
743              * Check for Kdenlive installed luma files, add empty string at
744              * start for no luma file.
745              */
746
747             // Implement default transitions.
748             QList<QDomElement> paramList;
749             if (name == "luma") {
750                 ktrans.setAttribute("id", name);
751                 tname.appendChild(ret.createTextNode(i18n("Wipe")));
752                 desc.appendChild(ret.createTextNode(i18n("Applies a stationary transition between the current and next frames.")));
753
754                 paramList.append(quickParameterFill(ret, i18n("Softness"), "softness", "double", "0", "0", "100", "", "", "100"));
755                 paramList.append(quickParameterFill(ret, i18nc("@property: means that the image is inverted", "Invert"), "invert", "bool", "0", "0", "1"));
756                 paramList.append(quickParameterFill(ret, i18n("Image File"), "resource", "list", "", "", "", imagefiles.join(","), imagenamelist.join(",")));
757                 paramList.append(quickParameterFill(ret, i18n("Reverse Transition"), "reverse", "bool", "0", "0", "1"));
758                 //thumbnailer.prepareThumbnailsCall(imagelist);
759             } else if (name == "composite") {
760                 ktrans.setAttribute("id", name);
761                 tname.appendChild(ret.createTextNode(i18n("Composite")));
762                 desc.appendChild(ret.createTextNode(i18n("A key-framable alpha-channel compositor for two frames.")));
763                 paramList.append(quickParameterFill(ret, i18n("Geometry"), "geometry", "geometry", "0%,0%:100%x100%:100", "-500;-500;-500;-500;0", "500;500;500;500;100"));
764                 paramList.append(quickParameterFill(ret, i18n("Alpha Channel Operation"), "operator", "list", "over", "", "", "over,and,or,xor", i18n("Over,And,Or,Xor")));
765                 paramList.append(quickParameterFill(ret, i18n("Align"), "aligned", "bool", "1", "0", "1"));
766                 paramList.append(quickParameterFill(ret, i18n("Fill"), "fill", "bool", "1", "0", "1"));
767                 paramList.append(quickParameterFill(ret, i18n("Distort"), "distort", "bool", "0", "0", "1"));
768                 paramList.append(quickParameterFill(ret, i18n("Wipe File"), "luma", "list", "", "", "", imagefiles.join(","), imagenamelist.join(",")));
769                 paramList.append(quickParameterFill(ret, i18n("Wipe Softness"), "softness", "double", "0", "0", "100", "", "", "100"));
770                 paramList.append(quickParameterFill(ret, i18n("Wipe Invert"), "luma_invert", "bool", "0", "0", "1"));
771                 paramList.append(quickParameterFill(ret, i18n("Force Progressive Rendering"), "progressive", "bool", "1", "0", "1"));
772                 paramList.append(quickParameterFill(ret, i18n("Force Deinterlace Overlay"), "deinterlace", "bool", "0", "0", "1"));
773             } else if (name == "affine") {
774                 tname.appendChild(ret.createTextNode(i18n("Affine")));
775                 ret.documentElement().setAttribute("showrotation", "1");
776                 /*paramList.append(quickParameterFill(ret, i18n("Rotate Y"), "rotate_y", "double", "0", "0", "360"));
777                 paramList.append(quickParameterFill(ret, i18n("Rotate X"), "rotate_x", "double", "0", "0", "360"));
778                 paramList.append(quickParameterFill(ret, i18n("Rotate Z"), "rotate_z", "double", "0", "0", "360"));
779                 paramList.append(quickParameterFill(ret, i18n("Fix Rotate Y"), "fix_rotate_y", "double", "0", "0", "360"));
780                 paramList.append(quickParameterFill(ret, i18n("Fix Rotate X"), "fix_rotate_x", "double", "0", "0", "360"));
781                 paramList.append(quickParameterFill(ret, i18n("Fix Rotate Z"), "fix_rotate_z", "double", "0", "0", "360"));
782                 paramList.append(quickParameterFill(ret, i18n("Shear Y"), "shear_y", "double", "0", "0", "360"));
783                 paramList.append(quickParameterFill(ret, i18n("Shear X"), "shear_x", "double", "0", "0", "360"));
784                 paramList.append(quickParameterFill(ret, i18n("Shear Z"), "shear_z", "double", "0", "0", "360"));*/
785                 /*paramList.append(quickParameterFill(ret, i18n("Fix Shear Y"), "fix_shear_y", "double", "0", "0", "360"));
786                 paramList.append(quickParameterFill(ret, i18n("Fix Shear X"), "fix_shear_x", "double", "0", "0", "360"));
787                 paramList.append(quickParameterFill(ret, i18n("Fix Shear Z"), "fix_shear_z", "double", "0", "0", "360"));*/
788
789                 paramList.append(quickParameterFill(ret, "keyed", "keyed", "fixed", "1", "1", "1"));
790                 paramList.append(quickParameterFill(ret, i18n("Geometry"), "geometry", "geometry",  "0,0,100%,100%,100%", "0,0,100%,100%,100%", "0,0,100%,100%,100%", "", "", "", "", "", "true"));
791
792                 paramList.append(quickParameterFill(ret, i18n("Rotate X"), "rotate_x", "addedgeometry", "0", "-1800", "1800", QString(), QString(), "10"));
793                 paramList.append(quickParameterFill(ret, i18n("Rotate Y"), "rotate_y", "addedgeometry", "0", "-1800", "1800", QString(), QString(), "10"));
794                 paramList.append(quickParameterFill(ret, i18n("Rotate Z"), "rotate_z", "addedgeometry", "0", "-1800", "1800", QString(), QString(), "10"));
795                 /*paramList.append(quickParameterFill(ret, i18n("Rotate Y"), "rotate_y", "simplekeyframe", "0", "-1800", "1800", QString(), QString(), "10"));
796                 paramList.append(quickParameterFill(ret, i18n("Rotate Z"), "rotate_z", "simplekeyframe", "0", "-1800", "1800", QString(), QString(), "10"));*/
797                 
798                 paramList.append(quickParameterFill(ret, i18n("Fix Shear Y"), "fix_shear_y", "double", "0", "0", "360"));
799                 paramList.append(quickParameterFill(ret, i18n("Fix Shear X"), "fix_shear_x", "double", "0", "0", "360"));
800                 paramList.append(quickParameterFill(ret, i18n("Fix Shear Z"), "fix_shear_z", "double", "0", "0", "360"));
801             } else if (name == "mix") {
802                 tname.appendChild(ret.createTextNode(i18n("Mix")));
803             } else if (name == "region") {
804                 ktrans.setAttribute("id", name);
805                 tname.appendChild(ret.createTextNode(i18n("Region")));
806                 desc.appendChild(ret.createTextNode(i18n("Use alpha channel of another clip to create a transition.")));
807                 paramList.append(quickParameterFill(ret, i18n("Transparency clip"), "resource", "url", "", "", "", "", "", ""));
808                 paramList.append(quickParameterFill(ret, i18n("Geometry"), "composite.geometry", "geometry", "0%,0%:100%x100%:100", "-500;-500;-500;-500;0", "500;500;500;500;100"));
809                 paramList.append(quickParameterFill(ret, i18n("Alpha Channel Operation"), "composite.operator", "list", "over", "", "", "over,and,or,xor", i18n("Over,And,Or,Xor")));
810                 paramList.append(quickParameterFill(ret, i18n("Align"), "composite.aligned", "bool", "1", "0", "1"));
811                 paramList.append(quickParameterFill(ret, i18n("Fill"), "composite.fill", "bool", "1", "0", "1"));
812                 paramList.append(quickParameterFill(ret, i18n("Distort"), "composite.distort", "bool", "0", "0", "1"));
813                 paramList.append(quickParameterFill(ret, i18n("Wipe File"), "composite.luma", "list", "", "", "", imagefiles.join(","), imagenamelist.join(",")));
814                 paramList.append(quickParameterFill(ret, i18n("Wipe Softness"), "composite.softness", "double", "0", "0", "100", "", "", "100"));
815                 paramList.append(quickParameterFill(ret, i18n("Wipe Invert"), "composite.luma_invert", "bool", "0", "0", "1"));
816                 paramList.append(quickParameterFill(ret, i18n("Force Progressive Rendering"), "composite.progressive", "bool", "1", "0", "1"));
817                 paramList.append(quickParameterFill(ret, i18n("Force Deinterlace Overlay"), "composite.deinterlace", "bool", "0", "0", "1"));
818             }
819             foreach(const QDomElement & e, paramList)
820             ktrans.appendChild(e);
821         }
822
823         // Add the transition to the global list.
824         transitions->append(ret.documentElement());
825         //kDebug() << ret.toString();
826     }
827
828     // Add some virtual transitions.
829     QString slidetrans = "<ktransition tag=\"composite\" id=\"slide\"><name>" + i18n("Slide") + "</name><description>" + i18n("Slide image from one side to another.") + "</description><parameter tag=\"geometry\" type=\"wipe\" default=\"-100%,0%:100%x100%;-1=0%,0%:100%x100%\" name=\"geometry\"><name>" + i18n("Direction") + "</name>                                               </parameter><parameter tag=\"aligned\" default=\"0\" type=\"bool\" name=\"aligned\" ><name>" + i18n("Align") + "</name></parameter><parameter tag=\"progressive\" default=\"1\" type=\"bool\" name=\"progressive\" ><name>" + i18n("Force Progressive Rendering") + "</name></parameter><parameter tag=\"deinterlace\" default=\"0\" type=\"bool\" name=\"deinterlace\" ><name>" + i18n("Force Deinterlace Overlay") + "</name></parameter><parameter tag=\"invert\" default=\"0\" type=\"bool\" name=\"invert\" ><name>" + i18nc("@property: means that the image is inverted", "Invert") + "</name></parameter></ktransition>";
830     QDomDocument ret;
831     ret.setContent(slidetrans);
832     transitions->append(ret.documentElement());
833
834     QString dissolve = "<ktransition tag=\"luma\" id=\"dissolve\"><name>" + i18n("Dissolve") + "</name><description>" + i18n("Fade out one video while fading in the other video.") + "</description><parameter tag=\"reverse\" default=\"0\" type=\"bool\" name=\"reverse\" ><name>" + i18n("Reverse") + "</name></parameter></ktransition>";
835     ret.setContent(dissolve);
836     transitions->append(ret.documentElement());
837
838     /*QString alphatrans = "<ktransition tag=\"composite\" id=\"alphatransparency\" ><name>" + i18n("Alpha Transparency") + "</name><description>" + i18n("Make alpha channel transparent.") + "</description><parameter tag=\"geometry\" type=\"fixed\" default=\"0%,0%:100%x100%\" name=\"geometry\"><name>" + i18n("Direction") + "</name></parameter><parameter tag=\"fill\" default=\"0\" type=\"bool\" name=\"fill\" ><name>" + i18n("Rescale") + "</name></parameter><parameter tag=\"aligned\" default=\"0\" type=\"bool\" name=\"aligned\" ><name>" + i18n("Align") + "</name></parameter></ktransition>";
839     ret.setContent(alphatrans);
840     transitions->append(ret.documentElement());*/
841 }
842
843 QDomElement initEffects::quickParameterFill(QDomDocument & doc, QString name, QString tag, QString type, QString def, QString min, QString max, QString list, QString listdisplaynames, QString factor, QString namedesc, QString format, QString opacity)
844 {
845     QDomElement parameter = doc.createElement("parameter");
846     parameter.setAttribute("tag", tag);
847     parameter.setAttribute("default", def);
848     parameter.setAttribute("type", type);
849     parameter.setAttribute("name", tag);
850     parameter.setAttribute("max", max);
851     parameter.setAttribute("min", min);
852     if (!list.isEmpty())
853         parameter.setAttribute("paramlist", list);
854     if (!listdisplaynames.isEmpty())
855         parameter.setAttribute("paramlistdisplay", listdisplaynames);
856     if (!factor.isEmpty())
857         parameter.setAttribute("factor", factor);
858     if (!namedesc.isEmpty())
859         parameter.setAttribute("namedesc", namedesc);
860     if (!format.isEmpty())
861         parameter.setAttribute("format", format);
862     if (!opacity.isEmpty())
863         parameter.setAttribute("opacity", opacity);
864     QDomElement pname = doc.createElement("name");
865     pname.appendChild(doc.createTextNode(name));
866     parameter.appendChild(pname);
867
868     return parameter;
869 }