diff options
Diffstat (limited to 'tdeio/tests/kurifiltertest.cpp')
| -rw-r--r-- | tdeio/tests/kurifiltertest.cpp | 361 |
1 files changed, 361 insertions, 0 deletions
diff --git a/tdeio/tests/kurifiltertest.cpp b/tdeio/tests/kurifiltertest.cpp new file mode 100644 index 000000000..473ba6840 --- /dev/null +++ b/tdeio/tests/kurifiltertest.cpp @@ -0,0 +1,361 @@ +/* + * Copyright (C) 2002, 2003 David Faure <faure@kde.org> + * + * This library is free software; you can redistribute it and/or + * modify it under the terms of the GNU Library General Public + * License version 2 as published by the Free Software Foundation; + * + * This library is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * Library General Public License for more details. + * + * You should have received a copy of the GNU Library General Public License + * along with this library; see the file COPYING.LIB. If not, write to + * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, + * Boston, MA 02110-1301, USA. + */ + +#include "kurifilter.h" + +#include <config.h> +#include <iostream> +#include <stdlib.h> + +#include <kaboutdata.h> +#include <kapplication.h> +#include <kdebug.h> +#include <kcmdlineargs.h> +#include <kstandarddirs.h> +#include <ksimpleconfig.h> + +#include <tqdir.h> +#include <tqregexp.h> +#include <tdeio/netaccess.h> + +static const char * const s_uritypes[] = { "NET_PROTOCOL", "LOCAL_FILE", "LOCAL_DIR", "EXECUTABLE", "HELP", "SHELL", "BLOCKED", "ERROR", "UNKNOWN" }; +#define NO_FILTERING -2 + +void filter( const char* u, const char * expectedResult = 0, int expectedUriType = -1, TQStringList list = TQStringList(), const char * abs_path = 0, bool checkForExecutables = true ) +{ + TQString a = TQString::fromUtf8( u ); + KURIFilterData * m_filterData = new KURIFilterData; + m_filterData->setData( a ); + m_filterData->setCheckForExecutables( checkForExecutables ); + + if( abs_path ) + { + m_filterData->setAbsolutePath( TQString::fromLatin1( abs_path ) ); + kdDebug() << "Filtering: " << a << " with abs_path=" << abs_path << endl; + } + else + kdDebug() << "Filtering: " << a << endl; + + if (KURIFilter::self()->filterURI(*m_filterData, list)) + { + // Copied from minicli... + TQString cmd; + KURL uri = m_filterData->uri(); + + if ( uri.isLocalFile() && !uri.hasRef() && uri.query().isEmpty() ) + cmd = uri.path(); + else + cmd = uri.url(); + + switch( m_filterData->uriType() ) + { + case KURIFilterData::LOCAL_FILE: + case KURIFilterData::LOCAL_DIR: + case KURIFilterData::HELP: + kdDebug() << "*** Result: Local Resource => '" + << m_filterData->uri().url() << "'" << endl; + break; + case KURIFilterData::NET_PROTOCOL: + kdDebug() << "*** Result: Network Resource => '" + << m_filterData->uri().url() << "'" << endl; + break; + case KURIFilterData::SHELL: + case KURIFilterData::EXECUTABLE: + if( m_filterData->hasArgsAndOptions() ) + cmd += m_filterData->argsAndOptions(); + kdDebug() << "*** Result: Executable/Shell => '" << cmd << "'"<< endl; + break; + case KURIFilterData::ERROR: + kdDebug() << "*** Result: Encountered error. See reason below." << endl; + break; + default: + kdDebug() << "*** Result: Unknown or invalid resource." << endl; + } + + if ( expectedUriType != -1 && expectedUriType != m_filterData->uriType() ) + { + kdError() << " Got URI type " << s_uritypes[m_filterData->uriType()] + << " expected " << s_uritypes[expectedUriType] << endl; + ::exit(1); + } + + if ( expectedResult ) + { + // Hack for other locales than english, normalize google hosts to google.com + cmd = cmd.replace( TQRegExp( "www\\.google\\.[^/]*/" ), "www.google.com/" ); + if ( cmd != TQString::fromLatin1( expectedResult ) ) + { + kdError() << " Got " << cmd << " expected " << expectedResult << endl; + ::exit(1); + } + } + } + else + { + if ( expectedUriType == NO_FILTERING ) + kdDebug() << "*** No filtering required." << endl; + else + { + kdDebug() << "*** Could not be filtered." << endl; + if( expectedUriType != m_filterData->uriType() ) + { + kdError() << " Got URI type " << s_uritypes[m_filterData->uriType()] + << " expected " << s_uritypes[expectedUriType] << endl; + ::exit(1); + } + } + } + + delete m_filterData; + kdDebug() << "-----" << endl; +} + +void testLocalFile( const TQString& filename ) +{ + TQFile tmpFile( filename ); // Yeah, I know, security risk blah blah. This is a test prog! + + if ( tmpFile.open( IO_ReadWrite ) ) + { + TQCString fname = TQFile::encodeName( tmpFile.name() ); + filter(fname, fname, KURIFilterData::LOCAL_FILE); + tmpFile.close(); + tmpFile.remove(); + } + else + kdDebug() << "Couldn't create " << tmpFile.name() << ", skipping test" << endl; +} + +static const char appName[] = "kurifiltertest"; +static const char programName[] = I18N_NOOP("kurifiltertest"); +static const char description[] = I18N_NOOP("Unit test for the URI filter plugin framework."); +static const char version[] = "1.5"; + +static const KCmdLineOptions options[] = +{ + { "s", I18N_NOOP("Use space as keyword delimeter for web shortcuts"), 0}, + KCmdLineLastOption +}; + +int main(int argc, char **argv) +{ + // Ensure that user configuration doesn't change the results of those tests + // TDEHOME needs to be writable though, for a tdesycoca database + setenv( "TDEHOME", TQFile::encodeName( TQDir::homeDirPath() + "/.tde-kurifiltertest" ), true ); + setenv( "TDE_FORK_SLAVES", "yes", true ); // simpler, for the final cleanup + + TDEAboutData aboutData(appName, programName, version, description); + TDECmdLineArgs::init(argc, argv, &aboutData); + TDECmdLineArgs::addCmdLineOptions( options ); + + TDEApplication app; + app.disableAutoDcopRegistration(); + + // Allow testing of the search engine using both delimiters... + char delimiter = TDECmdLineArgs::parsedArgs()->isSet("s") ? ' ' : ':'; + + // Many tests check the "default search engine" feature. + // There is no default search engine by default (since it was annoying when making typos), + // so the user has to set it up, which we do here. + { + KSimpleConfig cfg( "kuriikwsfilterrc" ); + cfg.setGroup( "General" ); + cfg.writeEntry( "DefaultSearchEngine", "google" ); + cfg.writeEntry( "Verbose", true ); + cfg.writeEntry( "KeywordDelimiter", delimiter ); + cfg.sync(); + } + + // Enable verbosity for debugging + { + KSimpleConfig cfg( "kshorturifilterrc" ); + cfg.writeEntry( "Verbose", true ); + cfg.sync(); + } + + TQStringList minicliFilters; + minicliFilters << "kshorturifilter" << "kurisearchfilter" << "localdomainurifilter"; + + // URI that should require no filtering + filter( "http://www.kde.org", "http://www.kde.org", KURIFilterData::NET_PROTOCOL ); + filter( "http://www.kde.org/developer//index.html", "http://www.kde.org/developer//index.html", KURIFilterData::NET_PROTOCOL ); + // URL with reference + filter( "http://www.kde.org/index.html#q8", "http://www.kde.org/index.html#q8", KURIFilterData::NET_PROTOCOL ); + // local file with reference + filter( "file:/etc/passwd#q8", "file:///etc/passwd#q8", KURIFilterData::LOCAL_FILE ); + filter( "file:///etc/passwd#q8", "file:///etc/passwd#q8", KURIFilterData::LOCAL_FILE ); + filter( "/etc/passwd#q8", "file:///etc/passwd#q8", KURIFilterData::LOCAL_FILE ); + // local file with query (can be used by javascript) + filter( "file:/etc/passwd?foo=bar", "file:///etc/passwd?foo=bar", KURIFilterData::LOCAL_FILE ); + testLocalFile( "/tmp/kurifiltertest?foo" ); // local file with ? in the name (#58990) + testLocalFile( "/tmp/kurlfiltertest#foo" ); // local file with '#' in the name + testLocalFile( "/tmp/kurlfiltertest#foo?bar" ); // local file with both + testLocalFile( "/tmp/kurlfiltertest?foo#bar" ); // local file with both, the other way round + + // hostnames are lowercased by KURL + filter( "http://www.myDomain.commyPort/ViewObjectRes//Default:name=hello", + "http://www.mydomain.commyport/ViewObjectRes//Default:name=hello", KURIFilterData::NET_PROTOCOL); + filter( "ftp://ftp.kde.org", "ftp://ftp.kde.org", KURIFilterData::NET_PROTOCOL ); + filter( "ftp://username@ftp.kde.org:500", "ftp://username@ftp.kde.org:500", KURIFilterData::NET_PROTOCOL ); + + // ShortURI/LocalDomain filter tests. NOTE: any of these tests can fail + // if you have specified your own patterns in kshorturifilterrc. For + // examples, see $TDEDIR/share/config/kshorturifilterrc . + filter( "linuxtoday.com", "http://linuxtoday.com", KURIFilterData::NET_PROTOCOL ); + filter( "LINUXTODAY.COM", "http://linuxtoday.com", KURIFilterData::NET_PROTOCOL ); + filter( "kde.org", "http://kde.org", KURIFilterData::NET_PROTOCOL ); + filter( "ftp.kde.org", "ftp://ftp.kde.org", KURIFilterData::NET_PROTOCOL ); + filter( "ftp.kde.org:21", "ftp://ftp.kde.org:21", KURIFilterData::NET_PROTOCOL ); + filter( "cr.yp.to", "http://cr.yp.to", KURIFilterData::NET_PROTOCOL ); + filter( "user@192.168.1.0:3128", "http://user@192.168.1.0:3128", KURIFilterData::NET_PROTOCOL ); + filter( "127.0.0.1", "http://127.0.0.1", KURIFilterData::NET_PROTOCOL ); + filter( "127.0.0.1:3128", "http://127.0.0.1:3128", KURIFilterData::NET_PROTOCOL ); + filter( "foo@bar.com", "mailto:foo@bar.com", KURIFilterData::NET_PROTOCOL ); + filter( "firstname.lastname@x.foo.bar", "mailto:firstname.lastname@x.foo.bar", KURIFilterData::NET_PROTOCOL ); + filter( "www.123.foo", "http://www.123.foo", KURIFilterData::NET_PROTOCOL ); + filter( "user@www.123.foo:3128", "http://user@www.123.foo:3128", KURIFilterData::NET_PROTOCOL ); + + // Exotic IPv4 address formats... + filter( "127.1", "http://127.1", KURIFilterData::NET_PROTOCOL ); + filter( "127.0.1", "http://127.0.1", KURIFilterData::NET_PROTOCOL ); + + // Local domain filter - If you uncomment these test, make sure you + // you adjust it based on the localhost entry in your /etc/hosts file. + // filter( "localhost:3128", "http://localhost.localdomain:3128", KURIFilterData::NET_PROTOCOL ); + // filter( "localhost", "http://localhost.localdomain", KURIFilterData::NET_PROTOCOL ); + // filter( "localhost/~blah", "http://localhost.localdomain/~blah", KURIFilterData::NET_PROTOCOL ); + + filter( "/", "/", KURIFilterData::LOCAL_DIR ); + filter( "/", "/", KURIFilterData::LOCAL_DIR, "kshorturifilter" ); + filter( "~/.bashrc", TQDir::homeDirPath().local8Bit()+"/.bashrc", KURIFilterData::LOCAL_FILE, "kshorturifilter" ); + filter( "~", TQDir::homeDirPath().local8Bit(), KURIFilterData::LOCAL_DIR, "kshorturifilter", "/tmp" ); + filter( "~foobar", 0, KURIFilterData::ERROR, "kshorturifilter" ); + filter( "user@host.domain", "mailto:user@host.domain", KURIFilterData::NET_PROTOCOL ); // new in KDE-3.2 + + // Windows style SMB (UNC) URL. Should be converted into the valid smb format... + filter( "\\\\mainserver\\share\\file", "smb://mainserver/share/file" , KURIFilterData::NET_PROTOCOL ); + + // Should not be filtered at all. All valid protocols of this form will be ignored. + filter( "ftp:" , "ftp:", KURIFilterData::UNKNOWN ); + filter( "http:" , "http:", KURIFilterData::UNKNOWN ); + + /* + Automatic searching tests. NOTE: If the Default search engine is set to 'None', + this stuff will fail as the status returned will then be KURIFilterData::UNKNOWN. + */ + filter( "gg:", 0 , KURIFilterData::NET_PROTOCOL ); + filter( "KDE", 0 , KURIFilterData::NET_PROTOCOL ); + filter( "FTP", 0 , KURIFilterData::NET_PROTOCOL ); + + // If your default search engine is set to 'Google', you can uncomment the test below. + filter( "gg:", "http://www.google.com/search?q=gg%3A&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); + filter( "KDE", "http://www.google.com/search?q=KDE&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); + filter( "FTP", "http://www.google.com/search?q=FTP&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); + + // Typing 'cp' or any other valid unix command in konq's location bar should result in + // a search using the default search engine + // 'ls' is a bit of a special case though, due to the toplevel domain called 'ls' + filter( "cp", "http://www.google.com/search?q=cp&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL, + TQStringList(), 0, false /* don't check for executables, see konq_misc.cc */ ); + + // Executable tests - No IKWS in minicli + filter( "cp", "cp", KURIFilterData::EXECUTABLE, minicliFilters ); + filter( "kfmclient", "kfmclient", KURIFilterData::EXECUTABLE, minicliFilters ); + filter( "xwininfo", "xwininfo", KURIFilterData::EXECUTABLE, minicliFilters ); + filter( "KDE", "KDE", NO_FILTERING, minicliFilters ); + filter( "I/dont/exist", "I/dont/exist", NO_FILTERING, minicliFilters ); + filter( "/I/dont/exist", 0, KURIFilterData::ERROR, minicliFilters ); + filter( "/I/dont/exist#a", 0, KURIFilterData::ERROR, minicliFilters ); + filter( "kfmclient --help", "kfmclient --help", KURIFilterData::EXECUTABLE, minicliFilters ); // the args are in argsAndOptions() + filter( "/usr/bin/gs", "/usr/bin/gs", KURIFilterData::EXECUTABLE, minicliFilters ); + filter( "/usr/bin/gs -q -option arg1", "/usr/bin/gs -q -option arg1", KURIFilterData::EXECUTABLE, minicliFilters ); // the args are in argsAndOptions() + + // ENVIRONMENT variable + setenv( "SOMEVAR", "/somevar", 0 ); + setenv( "ETC", "/etc", 0 ); + + TQCString qtdir=getenv("QTDIR"); + TQCString home = getenv("HOME"); + TQCString tdehome = getenv("TDEHOME"); + + filter( "$SOMEVAR/tdelibs/tdeio", 0, KURIFilterData::ERROR ); // note: this dir doesn't exist... + filter( "$ETC/passwd", "/etc/passwd", KURIFilterData::LOCAL_FILE ); + filter( "$QTDIR/doc/html/functions.html#s", TQCString("file://")+qtdir+"/doc/html/functions.html#s", KURIFilterData::LOCAL_FILE ); + filter( "http://www.kde.org/$USER", "http://www.kde.org/$USER", KURIFilterData::NET_PROTOCOL ); // no expansion + + // Assume the default (~/.trinity) if + if (tdehome.isEmpty()) + { + tdehome += "$HOME/.trinity"; + setenv("TDEHOME", tdehome.data(), 0); + } + + filter( "$TDEHOME/share", tdehome+"/share", KURIFilterData::LOCAL_DIR ); + KStandardDirs::makeDir( tdehome+"/a+plus" ); + filter( "$TDEHOME/a+plus", tdehome+"/a+plus", KURIFilterData::LOCAL_DIR ); + + // BR 27788 + KStandardDirs::makeDir( tdehome+"/share/Dir With Space" ); + filter( "$TDEHOME/share/Dir With Space", tdehome+"/share/Dir With Space", KURIFilterData::LOCAL_DIR ); + + // support for name filters (BR 93825) + filter( "$TDEHOME/*.txt", tdehome+"/*.txt", KURIFilterData::LOCAL_DIR ); + filter( "$TDEHOME/[a-b]*.txt", tdehome+"/[a-b]*.txt", KURIFilterData::LOCAL_DIR ); + filter( "$TDEHOME/a?c.txt", tdehome+"/a?c.txt", KURIFilterData::LOCAL_DIR ); + filter( "$TDEHOME/?c.txt", tdehome+"/?c.txt", KURIFilterData::LOCAL_DIR ); + // but let's check that a directory with * in the name still works + KStandardDirs::makeDir( tdehome+"/share/Dir*With*Stars" ); + filter( "$TDEHOME/share/Dir*With*Stars", tdehome+"/share/Dir*With*Stars", KURIFilterData::LOCAL_DIR ); + KStandardDirs::makeDir( tdehome+"/share/Dir?QuestionMark" ); + filter( "$TDEHOME/share/Dir?QuestionMark", tdehome+"/share/Dir?QuestionMark", KURIFilterData::LOCAL_DIR ); + KStandardDirs::makeDir( tdehome+"/share/Dir[Bracket" ); + filter( "$TDEHOME/share/Dir[Bracket", tdehome+"/share/Dir[Bracket", KURIFilterData::LOCAL_DIR ); + + filter( "$HOME/$TDEDIR/tdebase/kcontrol/ebrowsing", 0, KURIFilterData::ERROR ); + filter( "$1/$2/$3", "http://www.google.com/search?q=$1/$2/$3&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); // can be used as bogus or valid test. Currently triggers default search, i.e. google + filter( "$$$$", "http://www.google.com/search?q=$$$$&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); // worst case scenarios. + + // Replaced the match testing with a 0 since + // the shortURI filter will return the string + // itself if the requested environment variable + // is not already set. + filter( "$QTDIR", 0, KURIFilterData::LOCAL_DIR, "kshorturifilter" ); //use specific filter. + filter( "$HOME", home, KURIFilterData::LOCAL_DIR, "kshorturifilter" ); //use specific filter. + + + TQCString sc; + filter( sc.sprintf("gg%cfoo bar",delimiter), "http://www.google.com/search?q=foo+bar&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); + filter( sc.sprintf("bug%c55798", delimiter), "http://bugs.kde.org/show_bug.cgi?id=55798", KURIFilterData::NET_PROTOCOL ); + + filter( sc.sprintf("gg%cC++", delimiter), "http://www.google.com/search?q=C%2B%2B&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); + filter( sc.sprintf("ya%cfoo bar was here", delimiter), 0, -1 ); // this triggers default search, i.e. google + filter( sc.sprintf("gg%cwww.kde.org", delimiter), "http://www.google.com/search?q=www.kde.org&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); + filter( sc.sprintf("av%c+rock +sample", delimiter), "http://www.altavista.com/cgi-bin/query?pg=q&kl=XX&stype=stext&q=%2Brock+%2Bsample", KURIFilterData::NET_PROTOCOL ); + filter( sc.sprintf("gg%cé", delimiter) /*eaccent in utf8*/, "http://www.google.com/search?q=%C3%A9&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); + filter( sc.sprintf("gg%cпрйвет", delimiter) /* greetings in russian utf-8*/, "http://www.google.com/search?q=%D0%BF%D1%80%D0%B9%D0%B2%D0%B5%D1%82&ie=UTF-8&oe=UTF-8", KURIFilterData::NET_PROTOCOL ); + + // Absolute Path tests for kshorturifilter + filter( "./", tdehome+"/share", KURIFilterData::LOCAL_DIR, "kshorturifilter", tdehome+"/share/" ); // cleanDirPath removes the trailing slash + filter( "../", tdehome, KURIFilterData::LOCAL_DIR, "kshorturifilter", tdehome+"/share" ); + filter( "config", tdehome+"/share/config", KURIFilterData::LOCAL_DIR, "kshorturifilter", tdehome+"/share" ); + + // Clean up + TDEIO::NetAccess::del( tdehome, 0 ); + + kdDebug() << "All tests done. Go home..." << endl; + return 0; +} |