Katana_mirror/kde-playground
1
0
Fork 0
mirror of https://bitbucket.org/smil3y/kde-playground.git synced 2025-02-23 18:32:51 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions
kde-playground/kdepimlibs/kpimutils/tests/testemail.cpp
Ivailo Monev df5deda5e5 import working copies of kdepim and kdepimlibs
2015-04-14 21:49:29 +00:00

584 lines
25 KiB
C++
Raw Permalink Blame History

/*
This file is part of the KDE project
Copyright (C) 2004 David Faure <faure@kde.org>
Copyright (C) 2009 Thomas McGuire <mcguire@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.
*/
//krazy:excludeall=contractions
#include "testemail.h"
#include "kpimutils/email.h"
#include <kdebug.h>
#include <qtest_kde.h>
QTEST_KDEMAIN( EMailTest, NoGUI )
using namespace KPIMUtils;
Q_DECLARE_METATYPE( EmailParseResult )
void EMailTest::testGetNameAndEmail()
{
QFETCH( QString, input );
QFETCH( QString, expName );
QFETCH( QString, expEmail );
QFETCH( bool, expRetVal );
QString name, email;
bool retVal = extractEmailAddressAndName( input, email, name );
QCOMPARE( retVal, expRetVal );
QCOMPARE( name, expName );
QCOMPARE( email, expEmail );
}
void EMailTest::testGetNameAndEmail_data()
{
QTest::addColumn<QString>( "input" );
QTest::addColumn<QString>( "expName" );
QTest::addColumn<QString>( "expEmail" );
QTest::addColumn<bool>( "expRetVal" );
QTest::newRow( "Empty input" ) << QString() << QString() << QString() << false;
QTest::newRow( "Email only" ) << "faure@kde.org" << QString() << "faure@kde.org" << false;
QTest::newRow( "Normal case" ) << "David Faure <faure@kde.org>" << "David Faure"
<< "faure@kde.org" << true;
QTest::newRow( "Double-quotes 1" ) << "\"Faure, David\" <faure@kde.org>" << "Faure, David"
<< "faure@kde.org" << true;
QTest::newRow( "Double-quotes 2" ) << "<faure@kde.org> \"David Faure\"" << "David Faure"
<< "faure@kde.org" << true;
QTest::newRow( "Parenthesis 1" ) << "faure@kde.org (David Faure)"
<< "David Faure" << "faure@kde.org" << true;
QTest::newRow( "Parenthesis 2" ) << "(David Faure) faure@kde.org"
<< "David Faure" << "faure@kde.org" << true;
QTest::newRow( "Parenthesis 3" ) << "My Name (me) <me@home.net>" << "My Name (me)"
<< "me@home.net" << true; // #93513
// As per https://intevation.de/roundup/kolab/issue858
QTest::newRow( "Nested parenthesis" ) << "faure@kde.org (David (The Man) Faure)"
<< "David (The Man) Faure" << "faure@kde.org" << true;
QTest::newRow( "Double-quotes inside parenthesis 1" ) << "faure@kde.org (David \"Crazy\" Faure)"
<< "David \"Crazy\" Faure"
<< "faure@kde.org" << true;
QTest::newRow( "Double-quotes inside parenthesis 2" ) << "(David \"Crazy\" Faure) faure@kde.org"
<< "David \"Crazy\" Faure"
<< "faure@kde.org" << true;
QTest::newRow( "Parenthesis inside double-quotes 1" ) << "\"Faure (David)\" <faure@kde.org>"
<< "Faure (David)" << "faure@kde.org"
<< true;
QTest::newRow( "Parenthesis inside double-quotes 2" ) << "<faure@kde.org> \"Faure (David)\""
<< "Faure (David)" << "faure@kde.org"
<< true;
QTest::newRow( "Space in email" ) << "David Faure < faure@kde.org >" << "David Faure"
<< "faure@kde.org" << true;
QTest::newRow( "'@' in name 1" ) << "faure@kde.org (a@b)" << "a@b" << "faure@kde.org" << true;
QTest::newRow( "'@' in name 2" ) << "\"a@b\" <faure@kde.org>" << "a@b" << "faure@kde.org" << true;
// While typing, when there's no '@' yet
QTest::newRow( "while typing 1" ) << "foo" << "foo" << QString() << false;
QTest::newRow( "while typing 2" ) << "foo <" << "foo" << QString() << false;
QTest::newRow( "while typing 3" ) << "foo <b" << "foo" << "b" << true;
// If multiple emails are there, only return the first one
QTest::newRow( "multiple emails" ) << "\"Faure, David\" <faure@kde.org>, KHZ <khz@khz.khz>"
<< "Faure, David" << "faure@kde.org" << true;
QTest::newRow( "domain literals" ) << "Matt Douhan <matt@[123.123.123.123]>"
<< "Matt Douhan" << "matt@[123.123.123.123]" << true;
QTest::newRow( "@ inside the comment" ) << "\"Matt@Douhan\" <matt@fruitsalad.org>"
<< "Matt@Douhan" << "matt@fruitsalad.org" << true;
QTest::newRow( "No '@'" ) << "foo <distlist>" << "foo" << "distlist" << true;
QTest::newRow( "Backslash in display name" ) << "\"Lastname\\, Firstname\""
" <firstname@lastname.com>"
<< "Lastname, Firstname" << "firstname@lastname.com"
<< true;
QTest::newRow( "# in domain" ) << "Matt Douhan <dm3tt@db0zdf.#rpl.deu.eu>" << "Matt Douhan" << "dm3tt@db0zdf.#rpl.deu.eu" << true;
}
void EMailTest::testIsValidEmailAddress()
{
QFETCH( QString, input );
QFETCH( EmailParseResult, expErrorCode );
QCOMPARE( isValidAddress( input ), expErrorCode );
}
void EMailTest::testIsValidEmailAddress_data()
{
QTest::addColumn<QString>( "input" );
QTest::addColumn<EmailParseResult>( "expErrorCode" );
// Too many @'s
QTest::newRow( "1" ) << "matt@@fruitsalad.org" << TooManyAts;
// Too few @'s
QTest::newRow( "2" ) << "mattfruitsalad.org" << TooFewAts;
// An empty string
QTest::newRow( "3" ) << QString() << AddressEmpty;
// email address starting with a @
QTest::newRow( "4" ) << "@mattfruitsalad.org" << MissingLocalPart;
// make sure that starting @ and an additional @ in the same email address don't conflict
// trap the starting @ first and break
QTest::newRow( "5" ) << "@matt@fruitsalad.org" << MissingLocalPart;
// email address ending with a @
QTest::newRow( "6" ) << "mattfruitsalad.org@" << MissingDomainPart;
// make sure that ending with@ and an additional @ in the email address don't conflict
QTest::newRow( "7" ) << "matt@fruitsalad.org@" << MissingDomainPart;
// unbalanced Parens
QTest::newRow( "8" ) << "mattjongel)@fruitsalad.org" << UnbalancedParens;
// unbalanced Parens the other way around
QTest::newRow( "9" ) << "mattjongel(@fruitsalad.org" << UnbalancedParens;
// Correct parens just to make sure it works
QTest::newRow( "10" ) << "matt(jongel)@fruitsalad.org" << AddressOk;
// Check that anglebrackets are closed
QTest::newRow( "11" ) << "matt douhan<matt@fruitsalad.org" << UnclosedAngleAddr;
// Check that angle brackets are closed the other way around
QTest::newRow( "12" ) << "matt douhan>matt@fruitsalad.org" << UnopenedAngleAddr;
// Check that angle brackets are closed the other way around, and anglebrackets in domainpart
// instead of local part
QTest::newRow( "13" ) << "matt douhan matt@<fruitsalad.org" << UnclosedAngleAddr;
// check that a properly formated anglebrackets situation is OK
QTest::newRow( "14" ) << "matt douhan<matt@fruitsalad.org>" << AddressOk;
// a full email address with comments angle brackets and the works should be valid too
QTest::newRow( "15" ) << "Matt (jongel) Douhan <matt@fruitsalad.org>" << AddressOk;
// Double quotes
QTest::newRow( "16" ) << "\"Matt Douhan\" <matt@fruitsalad.org>" << AddressOk;
// Double quotes inside parens
QTest::newRow( "17" ) << "Matt (\"jongel\") Douhan <matt@fruitsalad.org>" << AddressOk;
// DOuble quotes not closed
QTest::newRow( "18" ) << "Matt \"jongel Douhan <matt@fruitsalad.org>" << UnbalancedQuote;
// Parens inside double quotes
QTest::newRow( "19" ) << "Matt \"(jongel)\" Douhan <matt@fruitsalad.org>" << AddressOk;
// Space in email
QTest::newRow( "20" ) << "Matt Douhan < matt@fruitsalad.org >" << AddressOk;
// @ is allowed inisde doublequotes
QTest::newRow( "21" ) << "\"matt@jongel\" <matt@fruitsalad.org>" << AddressOk;
// anglebrackets inside dbl quotes
QTest::newRow( "22" ) << "\"matt<blah blah>\" <matt@fruitsalad.org>" << AddressOk;
// a , inside a double quoted string is OK, how do I know this? well Ingo says so
// and it makes sense since it is also a separator of email addresses
QTest::newRow( "23" ) << "\"Douhan, Matt\" <matt@fruitsalad.org>" << AddressOk;
// Domains literals also need to work
QTest::newRow( "24" ) << "Matt Douhan <matt@[123.123.123.123]>" << AddressOk;
// Typo in domain literal address
QTest::newRow( "25" ) << "Matt Douhan <matt@[123.123.123,123]>" << UnexpectedComma;
// Some more insane tests but still valid so they must work
QTest::newRow( "26" ) << "Matt Douhan <\"m@att\"@jongel.com>" << AddressOk;
// BUG 99657
QTest::newRow( "27" ) << "matt@jongel.fibbel.com" << AddressOk;
// BUG 98720
QTest::newRow( "28" ) << "mailto:@mydomain" << DisallowedChar;
// correct error msg when a comma is inside <>
QTest::newRow( "29" ) << "Matt Douhan <matt@fruitsalad,org>" << UnexpectedComma;
//several commentlevels
QTest::newRow( "30" ) << "Matt Douhan (hey(jongel)fibbel) <matt@fruitsalad.org>" << AddressOk;
// several comment levels and one (the outer) being unbalanced
QTest::newRow( "31" ) << "Matt Douhan (hey(jongel)fibbel <matt@fruitsalad.org>"
<< UnbalancedParens;
// several comment levels and one (the inner) being unbalanced
QTest::newRow( "32" ) << "Matt Douhan (hey(jongelfibbel) <matt@fruitsalad.org>"
<< UnbalancedParens;
// an error inside a double quote is no error
QTest::newRow( "33" ) << "Matt Douhan \"(jongel\" <matt@fruitsalad.org>"
<< AddressOk;
// inside a quoted string double quotes are only allowed in pairs as per rfc2822
QTest::newRow( "34" ) << "Matt Douhan \"jongel\"fibbel\" <matt@fruitsalad.org>"
<< UnbalancedQuote;
// a questionmark is valid in an atom
QTest::newRow( "35" ) << "Matt? <matt@fruitsalad.org>" << AddressOk;
// weird but OK
QTest::newRow( "36" ) << "\"testing, \\\"testing\" <matt@fruitsalad.org>"
<< AddressOk;
// escape a quote to many to see if it makes it invalid
QTest::newRow( "37" ) << "\"testing, \\\"testing\\\" <matt@fruitsalad.org>"
<< UnbalancedQuote;
// escape a parens and thus make a comma appear
QTest::newRow( "38" ) << "Matt (jongel, fibbel\\) <matt@fruitsalad.org>"
<< UnbalancedParens;
// several errors inside doublequotes
QTest::newRow( "39" ) << "Matt \"(jongel,\\\" < fibbel\\)\" <matt@fruitsalad.org>"
<< AddressOk;
// BUG 105705
QTest::newRow( "40" ) << "matt-@fruitsalad.org" << AddressOk;
// underscore at the end of local part
QTest::newRow( "41" ) << "matt_@fruitsalad.org" << AddressOk;
// how about ( comment ) in the domain part
QTest::newRow( "42" ) << "matt_@(this is a cool host)fruitsalad.org" << AddressOk;
// To quote rfc2822 the test below is aesthetically displeasing, but perfectly legal.
QTest::newRow( "43" ) << "Pete(A wonderful \\) chap) <pete(his account)@silly.test(his host)>"
<< AddressOk;
// quoted pair or not quoted pair
QTest::newRow( "44" ) << "\"jongel '\\\" fibbel\" <matt@fruitsalad.org>" << AddressOk;
QTest::newRow( "45" ) << "\"jongel '\" fibbel\" <matt@fruitsalad.org>" << UnbalancedQuote;
// full atext support according to rfc2822
QTest::newRow( "46" ) << "!matt@fruitsalad.org" << AddressOk;
QTest::newRow( "47" ) << "#matt@fruitsalad.org" << AddressOk;
QTest::newRow( "48" ) << "$matt@fruitsalad.org" << AddressOk;
QTest::newRow( "49" ) << "%matt@fruitsalad.org" << AddressOk;
QTest::newRow( "50" ) << "&matt@fruitsalad.org" << AddressOk;
QTest::newRow( "51" ) << "'matt@fruitsalad.org" << AddressOk;
QTest::newRow( "52" ) << "*matt@fruitsalad.org" << AddressOk;
QTest::newRow( "53" ) << "+matt@fruitsalad.org" << AddressOk;
QTest::newRow( "54" ) << "/matt@fruitsalad.org" << AddressOk;
QTest::newRow( "55" ) << "=matt@fruitsalad.org" << AddressOk;
QTest::newRow( "56" ) << "?matt@fruitsalad.org" << AddressOk;
QTest::newRow( "57" ) << "^matt@fruitsalad.org" << AddressOk;
QTest::newRow( "58" ) << "_matt@fruitsalad.org" << AddressOk;
QTest::newRow( "59" ) << "-matt@fruitsalad.org" << AddressOk;
QTest::newRow( "60" ) << "`matt@fruitsalad.org" << AddressOk;
QTest::newRow( "61" ) << "{matt@fruitsalad.org" << AddressOk;
QTest::newRow( "62" ) << "|matt@fruitsalad.org" << AddressOk;
QTest::newRow( "63" ) << "}matt@fruitsalad.org" << AddressOk;
QTest::newRow( "64" ) << "~matt@fruitsalad.org" << AddressOk;
QTest::newRow( "65" ) << "matt%matt@fruitsalad.org" << AddressOk;
//bug 105405
QTest::newRow( "66" ) << "[foobar] <matt@fruitsalad.org>" << InvalidDisplayName;
QTest::newRow( "67" ) << "matt \"[foobar]\" Douhan <matt@fruitsalad.org>" << AddressOk;
QTest::newRow( "68" ) << "Matt Douhan <matt\"@@\"fruitsalad.org>" << TooFewAts;
QTest::newRow( "# in domain" ) << "dm3tt@db0zdf.#rpl.deu.eu" << AddressOk;
QTest::newRow( "dot at the end" ) << "msadmin@guug.de." << AddressOk;
QTest::newRow( "dot at the end with brackets" ) << "Martin Schulte <martin.schulte@guug.de.>" << AddressOk;
//TODO this should be a valid email address, but the checking for missing dots broke it.
// QTest::newRow( "valid email address without dots" ) << "user@localhost" << AddressOk;
}
void EMailTest::testIsValidAddressList()
{
QFETCH( QString, list );
QFETCH( EmailParseResult, expErrorCode );
QString badAddress;
QCOMPARE( isValidAddressList( list, badAddress ), expErrorCode );
}
void EMailTest::testIsValidAddressList_data()
{
QTest::addColumn<QString>( "list" );
QTest::addColumn<EmailParseResult>( "expErrorCode" );
//bug 139477
QTest::newRow( "1" ) << "martin.schulte@guug.de, msadmin@guug.de,"
" msnewsletter@guug.de" << AddressOk;
QTest::newRow( "2" ) << "martin.schulte@guug.de; msadmin@guug.de;"
" msnewsletter@guug.de" << AddressOk;
QTest::newRow( "3" ) << "martin.schulte@guug.de, msadmin@guug.de.,"
" msnewsletter@guug.de" << AddressOk;
QTest::newRow( "4" ) << "Martin Schulte <martin.schulte@guug.de>,"
" MS Admin <msadmin@guug.de>, MS News <msnewsletter@guug.de>"
<< AddressOk;
QTest::newRow( "5" ) << "Martin Schulte <martin.schulte@guug.de>;"
" MS Admin <msadmin@guug.de>; MS News <msnewsletter@guug.de>"
<< AddressOk;
QTest::newRow( "6" ) << "Martin Schulte <martin.schulte@guug.de.>,"
" MS Admin <msadmin@guug.de>, MS News <msnewsletter@guug.de>"
<< AddressOk;
}
void EMailTest::testIsValidSimpleEmailAddress()
{
QFETCH( QString, input );
QFETCH( bool, expResult );
QCOMPARE( isValidSimpleAddress( input ), expResult );
}
void EMailTest::testIsValidSimpleEmailAddress_data()
{
QTest::addColumn<QString>( "input" );
QTest::addColumn<bool>( "expResult" );
// checks for "pure" email addresses in the form of xxx@yyy.tld
QTest::newRow( "" ) << "matt@fruitsalad.org" << true;
QTest::newRow( "" ) << QString::fromUtf8( "test@täst.invalid" ) << true;
// non-ASCII char as first char of IDN
QTest::newRow( "" ) << QString::fromUtf8( "i_want@øl.invalid" ) << true;
QTest::newRow( "" ) << "matt@[123.123.123.123]" << true;
QTest::newRow( "" ) << "matt@[3.3.3.3]" << true;
QTest::newRow( "" ) << "matt@[4.4.4.4]" << true;
QTest::newRow( "" ) << "matt@[192.168.254.254]" << true;
QTest::newRow( "" ) << "\"matt\"@fruitsalad.org" << true;
QTest::newRow( "" ) << "-matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "\"-matt\"@fruitsalad.org" << true;
QTest::newRow( "" ) << "matt@jongel.fibbel.com" << true;
QTest::newRow( "" ) << "Matt Douhan <matt@fruitsalad.org>" << false;
// BUG 105705
QTest::newRow( "" ) << "matt-@fibbel.com" << true;
QTest::newRow( "" ) << "matt@fibbel-is-a-geek.com" << true;
QTest::newRow( "" ) << "matt_@fibbel.com" << true;
// Check the defined chars for atext according to rfc2822
QTest::newRow( "" ) << "!matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "#matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "$matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "%matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "&matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "'matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "*matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "+matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "/matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "=matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "?matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "^matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "_matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "-matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "`matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "{matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "|matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "}matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "~matt@fruitsalad.org" << true;
// BUG 108476
QTest::newRow( "" ) << "foo+matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "bar=matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "jongel-matt@fruitsalad.org" << true;
QTest::newRow( "" ) << "matt-@fruitsalad.org" << true;
// check if the pure email address is wrong
QTest::newRow( "" ) << "mattfruitsalad.org" << false;
QTest::newRow( "" ) << "matt@[123.123.123.123" << false;
QTest::newRow( "" ) << "matt@123.123.123.123]" << false;
QTest::newRow( "" ) << "\"matt@fruitsalad.org" << false;
QTest::newRow( "" ) << "matt\"@fruitsalad.org" << false;
QTest::newRow( "" ) << QString() << false;
// BUG 203881
QTest::newRow( "" ) << "2advance@my-site.com" << true;
// and here some insane but still valid cases
QTest::newRow( "" ) << "\"m@tt\"@fruitsalad.org" << true;
QTest::newRow( "" ) << "matt\"@@\"fruitsalad.org" << false;
QTest::newRow( "# in domain" ) << "dm3tt@db0zdf.#rpl.deu.eu" << true;
// add tests for missing local/domain parts
QTest::newRow( "" ) << "@mattfruitsalad.org" << false;
QTest::newRow( "" ) << "matt@" << false;
QTest::newRow( "" ) << "@" << false;
}
void EMailTest::testGetEmailAddress()
{
QFETCH( QString, input );
QFETCH( QString, expResult );
QCOMPARE( extractEmailAddress( input ), expResult );
}
void EMailTest::testGetEmailAddress_data()
{
QTest::addColumn<QString>( "input" );
QTest::addColumn<QString>( "expResult" );
QTest::newRow( "1" ) << "matt@fruitsalad.org" << "matt@fruitsalad.org";
QTest::newRow( "2" ) << "Matt Douhan <matt@fruitsalad.org>" << "matt@fruitsalad.org";
QTest::newRow( "3" ) << "\"Matt Douhan <blah blah>\" <matt@fruitsalad.org>"
<< "matt@fruitsalad.org";
QTest::newRow( "4" ) << "\"Matt <blah blah>\" <matt@fruitsalad.org>"
<< "matt@fruitsalad.org";
QTest::newRow( "5" ) << "Matt Douhan (jongel) <matt@fruitsalad.org"
<< QString();
QTest::newRow( "6" ) << "Matt Douhan (m@tt) <matt@fruitsalad.org>"
<< "matt@fruitsalad.org";
QTest::newRow( "7" ) << "\"Douhan, Matt\" <matt@fruitsalad.org>"
<< "matt@fruitsalad.org";
QTest::newRow( "8" ) << "\"Matt Douhan (m@tt)\" <matt@fruitsalad.org>"
<< "matt@fruitsalad.org";
QTest::newRow( "9" ) << "\"Matt Douhan\" (matt <matt@fruitsalad.org>"
<< QString();
QTest::newRow( "10" ) << "Matt Douhan <matt@[123.123.123.123]>"
<< "matt@[123.123.123.123]";
QTest::newRow( "11" ) << "dm3tt@db0zdf.#rpl.deu.eu" << "dm3tt@db0zdf.#rpl.deu.eu";
}
void EMailTest::testCheckSplitEmailAddrList()
{
QFETCH( QString, input );
QFETCH( QStringList, expResult );
QCOMPARE( splitAddressList( input ), expResult );
}
void EMailTest::testCheckSplitEmailAddrList_data()
{
QTest::addColumn<QString>( "input" );
QTest::addColumn<QStringList>( "expResult" );
QTest::newRow( "" ) << "kloecker@kde.org (Kloecker, Ingo)"
<< ( QStringList() << QLatin1String("kloecker@kde.org (Kloecker, Ingo)") );
QTest::newRow( "" ) << "Matt Douhan <matt@fruitsalad.org>, Foo Bar <foo@bar.com>"
<< ( QStringList()
<< QLatin1String("Matt Douhan <matt@fruitsalad.org>")
<< QLatin1String("Foo Bar <foo@bar.com>") );
QTest::newRow( "" ) << "\"Matt, Douhan\" <matt@fruitsalad.org>, Foo Bar <foo@bar.com>"
<< ( QStringList()
<< QLatin1String("\"Matt, Douhan\" <matt@fruitsalad.org>")
<< QLatin1String("Foo Bar <foo@bar.com>") );
QTest::newRow( "" ) << "\"Lastname\\, Firstname\" <firstname.lastname@example.com>"
<< ( QStringList()
<< QLatin1String("\"Lastname\\, Firstname\" <firstname.lastname@example.com>") );
}
void EMailTest::testNormalizeAddressesAndEncodeIDNs()
{
QFETCH( QString, input );
QFETCH( QString, expResult );
QCOMPARE( normalizeAddressesAndEncodeIdn( input ), expResult );
}
void EMailTest::testNormalizeAddressesAndEncodeIDNs_data()
{
QTest::addColumn<QString>( "input" );
QTest::addColumn<QString>( "expResult" );
QTest::newRow( "" ) << "matt@fruitsalad.org" << "matt@fruitsalad.org";
QTest::newRow( "" ) << "Matt Douhan <matt@fruitsalad.org>"
<< "Matt Douhan <matt@fruitsalad.org>";
QTest::newRow( "" ) << "Matt Douhan (jongel) <matt@fruitsalad.org>"
<< "Matt Douhan (jongel) <matt@fruitsalad.org>";
QTest::newRow( "" ) << "Matt Douhan (jongel,fibbel) <matt@fruitsalad.org>"
<< "Matt Douhan (jongel,fibbel) <matt@fruitsalad.org>";
QTest::newRow( "" ) << "matt@fruitsalad.org (jongel,fibbel)"
<< "\"jongel,fibbel\" <matt@fruitsalad.org>";
QTest::newRow( "" ) << "matt@fruitsalad.org (\"jongel,fibbel\")"
<< "\"jongel,fibbel\" <matt@fruitsalad.org>";
}
void EMailTest::testNormalizeAddressesAndDecodeIDNs()
{
QFETCH( QString, input );
QFETCH( QString, expResult );
QCOMPARE( normalizeAddressesAndDecodeIdn( input ), expResult );
}
void EMailTest::testNormalizeAddressesAndDecodeIDNs_data()
{
QTest::addColumn<QString>( "input" );
QTest::addColumn<QString>( "expResult" );
QTest::newRow( "" )
<< "=?us-ascii?Q?Surname=2C=20Name?= <nobody@example.org>"
<< "\"Surname, Name\" <nobody@example.org>";
QTest::newRow( "" )
<< "=?iso-8859-1?B?5Hf8b2xmLPZBbmRyZWFz?= <nobody@example.org>"
<< QString::fromUtf8( "\"äwüolf,öAndreas\" <nobody@example.org>" );
QTest::newRow( "" )
<< QString::fromUtf8( "\"Andreas Straß\" <nobody@example.org>" )
<< QString::fromUtf8( "\"Andreas Straß\" <nobody@example.org>" );
QTest::newRow( "" )
<< QString::fromUtf8( "\"András\" \"Manţia\" <amantia@kde.org>" )
<< QString::fromUtf8( "\"András\" \"Manţia\" <amantia@kde.org>" );
}
void EMailTest::testQuoteIfNecessary()
{
QFETCH( QString, input );
QFETCH( QString, expResult );
QCOMPARE( quoteNameIfNecessary( input ), expResult );
}
void EMailTest::testQuoteIfNecessary_data()
{
QTest::addColumn<QString>( "input" );
QTest::addColumn<QString>( "expResult" );
QTest::newRow( "" ) << "Matt Douhan" << "Matt Douhan";
QTest::newRow( "" ) << "Douhan, Matt" << "\"Douhan, Matt\"";
QTest::newRow( "" ) << "Matt \"jongel\" Douhan"
<< "\"Matt \\\"jongel\\\" Douhan\"";
QTest::newRow( "" ) << "Matt \\\"jongel\\\" Douhan"
<< "\"Matt \\\"jongel\\\" Douhan\"";
QTest::newRow( "" ) << "trailing '\\\\' should never occur \\"
<< "\"trailing '\\\\' should never occur \\\"";
QTest::newRow( "" ) << "\"don't quote again\"" << "\"don't quote again\"";
QTest::newRow( "" ) << "\"leading double quote" << "\"\\\"leading double quote\"";
QTest::newRow( "" ) << "trailing double quote\"" << "\"trailing double quote\\\"\"";
}
void EMailTest::testMailtoUrls()
{
QFETCH( QString, input );
const KUrl url = encodeMailtoUrl( input );
qDebug() << url;
QCOMPARE( url.protocol().toLatin1().data(), "mailto" );
QCOMPARE( decodeMailtoUrl( url ), input );
qDebug() << decodeMailtoUrl( url );
}
void EMailTest::testMailtoUrls_data()
{
QTest::addColumn<QString>( "input" );
QTest::newRow( "" ) << "tokoe@domain.com";
QTest::newRow( "" ) << QString::fromUtf8( "\"Tobias König\" <tokoe@domain.com>" );
QTest::newRow( "" ) << QString::fromUtf8( "\"Alberto Simões\" <alberto@example.com" );
QTest::newRow( "" ) << QString::fromUtf8( "Alberto Simões <alberto@example.com" );
}
Reference in a new issue View git blame Copy permalink