diff options
author | Timothy Pearson <kb9vqf@pearsoncomputing.net> | 2011-11-06 15:57:02 -0600 |
---|---|---|
committer | Timothy Pearson <kb9vqf@pearsoncomputing.net> | 2011-11-06 15:57:02 -0600 |
commit | 2c2fbd828ca474671bb9e03681b30b115d8d6035 (patch) | |
tree | 526a9da418f8d3d7ccf515c37048d3dfc80f2843 /libkdepim/tests/testlinklocator.cpp | |
parent | f0610eece3676b6fe99f42cf4ef2b19a39a5c4e8 (diff) | |
download | tdepim-2c2fbd828ca474671bb9e03681b30b115d8d6035.tar.gz tdepim-2c2fbd828ca474671bb9e03681b30b115d8d6035.zip |
Actually move the kde files that were renamed in the last commit
Diffstat (limited to 'libkdepim/tests/testlinklocator.cpp')
-rw-r--r-- | libkdepim/tests/testlinklocator.cpp | 114 |
1 files changed, 0 insertions, 114 deletions
diff --git a/libkdepim/tests/testlinklocator.cpp b/libkdepim/tests/testlinklocator.cpp deleted file mode 100644 index 548f61a9b..000000000 --- a/libkdepim/tests/testlinklocator.cpp +++ /dev/null @@ -1,114 +0,0 @@ -/* This file is part of the KDE project - Copyright (C) 2005 Ingo Kloecker <kloecker@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. -*/ - -// Test program for libtdepim/linklocator.* -#include <linklocator.h> - -#include <kcmdlineargs.h> -#include <kapplication.h> -#include <kdebug.h> - -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <assert.h> - -static bool check(const TQString& txt, const TQString& a, const TQString& b) -{ - if (a == b) { - kdDebug() << txt << " : checking '" << a << "' against expected value '" << b << "'... " << "ok" << endl; - } - else { - kdDebug() << txt << " : checking '" << a << "' against expected value '" << b << "'... " << "KO !" << endl; - exit(1); - } - return true; -} - -static bool checkGetEmailAddress( const TQString & input, - int atPos, - const TQString & expRetVal, - bool allowBadAtPos = false ) -{ - if ( !allowBadAtPos && ( input[atPos] != '@' ) ) { - kdDebug() << "atPos (" << atPos << ") doesn't point to '@' in \"" - << input << "\". Fix the check!" << endl; - exit(1); - } - LinkLocator ll( input, atPos ); - const TQString retVal = ll.getEmailAddress(); - check( "getEmailAddress() \"" + input + "\", " + TQString::number( atPos ), - retVal, expRetVal ); - return true; -} - -int main(int argc, char *argv[]) -{ - KApplication::disableAutoDcopRegistration(); - KCmdLineArgs::init( argc, argv, "testlinklocator", 0, 0, 0, 0 ); - KApplication app( false, false ); - - // empty input - checkGetEmailAddress( TQString(), 0, TQString(), true ); - - // no '@' at scan position - checkGetEmailAddress( "foo@bar.baz", 0, TQString(), true ); - - // '@' in local part - checkGetEmailAddress( "foo@bar@bar.baz", 7, TQString() ); - - // empty local part - checkGetEmailAddress( "@bar.baz", 0, TQString() ); - checkGetEmailAddress( ".@bar.baz", 1, TQString() ); - checkGetEmailAddress( " @bar.baz", 1, TQString() ); - checkGetEmailAddress( ".!#$%&'*+-/=?^_`{|}~@bar.baz", strlen(".!#$%&'*+-/=?^_`{|}~"), TQString() ); - - // allowed special chars in local part of address - checkGetEmailAddress( "a.!#$%&'*+-/=?^_`{|}~@bar.baz", strlen("a.!#$%&'*+-/=?^_`{|}~"), "a.!#$%&'*+-/=?^_`{|}~@bar.baz" ); - - // '@' in domain part - checkGetEmailAddress( "foo@bar@bar.baz", 3, TQString() ); - - // domain part without dot - checkGetEmailAddress( "foo@bar", 3, TQString() ); - checkGetEmailAddress( "foo@bar.", 3, TQString() ); - checkGetEmailAddress( ".foo@bar", 4, TQString() ); - checkGetEmailAddress( "foo@bar ", 3, TQString() ); - checkGetEmailAddress( " foo@bar", 4, TQString() ); - checkGetEmailAddress( "foo@bar-bar", 3, TQString() ); - - // empty domain part - checkGetEmailAddress( "foo@", 3, TQString() ); - checkGetEmailAddress( "foo@.", 3, TQString() ); - checkGetEmailAddress( "foo@-", 3, TQString() ); - - // simple address - checkGetEmailAddress( "foo@bar.baz", 3, "foo@bar.baz" ); - checkGetEmailAddress( "foo@bar.baz.", 3, "foo@bar.baz" ); - checkGetEmailAddress( ".foo@bar.baz", 4, "foo@bar.baz" ); - checkGetEmailAddress( "foo@bar.baz-", 3, "foo@bar.baz" ); - checkGetEmailAddress( "-foo@bar.baz", 4, "foo@bar.baz" ); - checkGetEmailAddress( "foo@bar.baz ", 3, "foo@bar.baz" ); - checkGetEmailAddress( " foo@bar.baz", 4, "foo@bar.baz" ); - checkGetEmailAddress( "foo@bar-bar.baz", 3, "foo@bar-bar.baz" ); - - printf("\nTest OK !\n"); - - return 0; -} - |