summaryrefslogtreecommitdiffstats
path: root/kdecore/tests/kmacroexpandertest.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'kdecore/tests/kmacroexpandertest.cpp')
-rw-r--r--kdecore/tests/kmacroexpandertest.cpp137
1 files changed, 0 insertions, 137 deletions
diff --git a/kdecore/tests/kmacroexpandertest.cpp b/kdecore/tests/kmacroexpandertest.cpp
deleted file mode 100644
index 0c41a309b..000000000
--- a/kdecore/tests/kmacroexpandertest.cpp
+++ /dev/null
@@ -1,137 +0,0 @@
-#include <kmacroexpander.h>
-
-#include <kapplication.h>
-#include <kcmdlineargs.h>
-#include <kdebug.h>
-
-#include <stdlib.h>
-
-bool check(TQString txt, TQString s, TQString a, TQString b)
-{
- if (a.isEmpty())
- a = TQString::null;
- if (b.isEmpty())
- b = TQString::null;
- if (a == b)
- kdDebug() << txt << " (" << s << ") : '" << a << "' - ok" << endl;
- else {
- kdDebug() << txt << " (" << s << ") : got '" << a << "' but expected '" << b << "' - KO!" << endl;
- exit(1);
- }
- return true;
-}
-
-class MyCExpander : public KCharMacroExpander {
-public:
- MyCExpander() : KCharMacroExpander() {}
-protected:
- bool expandMacro(TQChar chr, TQStringList &ret)
- {
- if (chr == 'm') {
- ret = TQString("expanded");
- return true;
- }
- return false;
- }
-};
-
-class MyWExpander : public KWordMacroExpander {
-public:
- MyWExpander() : KWordMacroExpander() {}
-protected:
- bool expandMacro(const TQString &str, TQStringList &ret)
- {
- if (str == "macro") {
- ret = TQString("expanded");
- return true;
- }
- return false;
- }
-};
-
-int main(int argc, char *argv[])
-{
- KCmdLineArgs::init(argc, argv, ":", "", "", "");
- KApplication app(false,false);
- TQString s, s2;
-
- TQMap<TQChar,TQStringList> map1;
- map1.insert('n', "Restaurant \"Chew It\"");
- TQStringList li;
- li << "element1" << "'element2'";
- map1.insert('l', li);
-
- s = "text %l %n text";
- check( "KMacroExpander::expandMacros", s, KMacroExpander::expandMacros(s, map1), "text element1 'element2' Restaurant \"Chew It\" text");
- check( "KMacroExpander::expandMacrosShellQuote", s, KMacroExpander::expandMacrosShellQuote(s, map1), "text 'element1' ''\\''element2'\\''' 'Restaurant \"Chew It\"' text");
- s = "text \"%l %n\" text";
- check( "KMacroExpander::expandMacrosShellQuote", s, KMacroExpander::expandMacrosShellQuote(s, map1), "text \"element1 'element2' Restaurant \\\"Chew It\\\"\" text");
-
- TQMap<TQChar,TQString> map;
- map.insert('a', "%n");
- map.insert('f', "filename.txt");
- map.insert('u', "http://www.kde.org/index.html");
- map.insert('n', "Restaurant \"Chew It\"");
-
- s = "Title: %a - %f - %u - %n - %%";
- check( "KMacroExpander::expandMacros", s, KMacroExpander::expandMacros(s, map), "Title: %n - filename.txt - http://www.kde.org/index.html - Restaurant \"Chew It\" - %");
-
- s = "kedit --caption %n %f";
- check( "KMacroExpander::expandMacrosShellQuote", s, KMacroExpander::expandMacrosShellQuote(s, map), "kedit --caption 'Restaurant \"Chew It\"' 'filename.txt'");
-
- map.replace('n', "Restaurant 'Chew It'");
- s = "kedit --caption %n %f";
- check( "KMacroExpander::expandMacrosShellQuote", s, KMacroExpander::expandMacrosShellQuote(s, map), "kedit --caption 'Restaurant '\\''Chew It'\\''' 'filename.txt'");
-
- s = "kedit --caption \"%n\" %f";
- check( "KMacroExpander::expandMacrosShellQuote", s, KMacroExpander::expandMacrosShellQuote(s, map), "kedit --caption \"Restaurant 'Chew It'\" 'filename.txt'");
-
- map.replace('n', "Restaurant \"Chew It\"");
- s = "kedit --caption \"%n\" %f";
- check( "KMacroExpander::expandMacrosShellQuote", s, KMacroExpander::expandMacrosShellQuote(s, map), "kedit --caption \"Restaurant \\\"Chew It\\\"\" 'filename.txt'");
-
- map.replace('n', "Restaurant $HOME");
- s = "kedit --caption \"%n\" %f";
- check( "KMacroExpander::expandMacrosShellQuote", s, KMacroExpander::expandMacrosShellQuote(s, map), "kedit --caption \"Restaurant \\$HOME\" 'filename.txt'");
-
- map.replace('n', "Restaurant `echo hello`");
- s = "kedit --caption \"%n\" %f";
- check( "KMacroExpander::expandMacrosShellQuote", s, KMacroExpander::expandMacrosShellQuote(s, map), "kedit --caption \"Restaurant \\`echo hello\\`\" 'filename.txt'");
-
- map.replace('n', "Restaurant `echo hello`");
- s = "kedit --caption \"`echo %n`\" %f";
- check( "KMacroExpander::expandMacrosShellQuote", s, KMacroExpander::expandMacrosShellQuote(s, map), "kedit --caption \"$( echo 'Restaurant `echo hello`')\" 'filename.txt'");
-
- TQMap<TQString,TQString> smap;
- smap.insert("foo", "%n");
- smap.insert("file", "filename.txt");
- smap.insert("url", "http://www.kde.org/index.html");
- smap.insert("name", "Restaurant \"Chew It\"");
-
- s = "Title: %foo - %file - %url - %name - %";
- check( "KMacroExpander::expandMacros", s, KMacroExpander::expandMacros(s, smap), "Title: %n - filename.txt - http://www.kde.org/index.html - Restaurant \"Chew It\" - %");
-
- s = "Title: %{foo} - %{file} - %{url} - %{name} - %";
- check( "KMacroExpander::expandMacros", s, KMacroExpander::expandMacros(s, smap), "Title: %n - filename.txt - http://www.kde.org/index.html - Restaurant \"Chew It\" - %");
-
- s = "Title: %foo-%file-%url-%name-%";
- check( "KMacroExpander::expandMacros", s, KMacroExpander::expandMacros(s, smap), "Title: %n-filename.txt-http://www.kde.org/index.html-Restaurant \"Chew It\"-%");
-
- s = "Title: %{file} %{url";
- check( "KMacroExpander::expandMacros", s, KMacroExpander::expandMacros(s, smap), "Title: filename.txt %{url");
-
- MyCExpander mx1;
- s = "subst %m but not %n equ %%";
- s2 = s;
- mx1.expandMacros(s2);
- check( "MyCExpander::expandMacros", s, s2, "subst expanded but not %n equ %");
-
- MyWExpander mx2;
- s = "subst %macro but not %not equ %%";
- s2 = s;
- mx2.expandMacros(s2);
- check( "MyWExpander::expandMacros", s, s2, "subst expanded but not %not equ %");
-
- kdDebug() << endl << "Test OK!" << endl;
-}
-