You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
389 lines
11 KiB
389 lines
11 KiB
/*
|
|
This file is part of tdepim.
|
|
|
|
Copyright (c) 2004 Bo Thorsen <bo@sonofthor.dk>
|
|
Copyright (c) 2004 Cornelius Schumacher <schumacher@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 as published by the Free Software Foundation; either
|
|
version 2 of the License, or (at your option) any later version.
|
|
|
|
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 "kmailchanges.h"
|
|
|
|
#include <tdeapplication.h>
|
|
#include <tdelocale.h>
|
|
#include <kstandarddirs.h>
|
|
#include <tdeemailsettings.h>
|
|
#include <identitymanager.h>
|
|
#include <identity.h>
|
|
#include <kdebug.h>
|
|
#include <kstringhandler.h>
|
|
#include <tdewallet.h>
|
|
using namespace TDEWallet;
|
|
|
|
static const char* s_folderContentsType[] = {
|
|
I18N_NOOP( "Calendar" ),
|
|
I18N_NOOP( "Contacts" ),
|
|
I18N_NOOP( "Notes" ),
|
|
I18N_NOOP( "Tasks" ),
|
|
I18N_NOOP( "Journal" ) };
|
|
|
|
Wallet* CreateImapAccount::mWallet = 0;
|
|
|
|
CreateImapAccount::CreateImapAccount( const TQString &accountName, const TQString &title )
|
|
: TDEConfigPropagator::Change( title ),
|
|
mAccountName( accountName ), mPort( 993 ), mEnableSieve( false ), mEnableSavePassword( true ),
|
|
mEncryption( None ), mAuthentication( NONE ), mAuthenticationSend( PLAIN ), mSmtpPort( 25 ),
|
|
mExistingAccountId( -1 ), mExistingTransportId( -1 ),
|
|
mCustomWriter( 0 )
|
|
{
|
|
}
|
|
|
|
CreateImapAccount::~CreateImapAccount()
|
|
{
|
|
delete mCustomWriter;
|
|
}
|
|
|
|
void CreateImapAccount::setServer( const TQString &s )
|
|
{
|
|
mServer = s;
|
|
}
|
|
|
|
void CreateImapAccount::setUser( const TQString &s )
|
|
{
|
|
mUser = s;
|
|
}
|
|
|
|
void CreateImapAccount::setPassword( const TQString &s )
|
|
{
|
|
mPassword = s;
|
|
}
|
|
|
|
void CreateImapAccount::setRealName( const TQString &s )
|
|
{
|
|
mRealName = s;
|
|
}
|
|
|
|
void CreateImapAccount::setPort( int port )
|
|
{
|
|
mPort = port;
|
|
}
|
|
|
|
void CreateImapAccount::setEmail( const TQString &s )
|
|
{
|
|
mEmail = s;
|
|
}
|
|
|
|
void CreateImapAccount::enableSieve( bool b )
|
|
{
|
|
mEnableSieve = b;
|
|
}
|
|
|
|
void CreateImapAccount::setSieveVacationFileName( const TQString& f )
|
|
{
|
|
mSieveVacationFileName = f;
|
|
}
|
|
|
|
void CreateImapAccount::enableSavePassword( bool b )
|
|
{
|
|
mEnableSavePassword = b;
|
|
}
|
|
|
|
void CreateImapAccount::setEncryption(
|
|
CreateImapAccount::Encryption e )
|
|
{
|
|
mEncryption = e;
|
|
}
|
|
|
|
void CreateImapAccount::setAuthentication(
|
|
CreateImapAccount::Authentication a )
|
|
{
|
|
mAuthentication = a;
|
|
}
|
|
|
|
void CreateImapAccount::setDefaultDomain(const TQString &d)
|
|
{
|
|
mDefaultDomain = d;
|
|
}
|
|
|
|
void CreateImapAccount::setAuthenticationSend(
|
|
CreateImapAccount::Authentication a )
|
|
{
|
|
mAuthenticationSend = a;
|
|
}
|
|
|
|
void CreateImapAccount::setSmtpPort( int port )
|
|
{
|
|
mSmtpPort = port;
|
|
}
|
|
|
|
void CreateImapAccount::setExistingAccountId( int id )
|
|
{
|
|
mExistingAccountId = id;
|
|
}
|
|
|
|
void CreateImapAccount::setExistingTransportId( int id )
|
|
{
|
|
mExistingTransportId = id;
|
|
}
|
|
|
|
void CreateImapAccount::setCustomWriter(
|
|
CreateImapAccount::CustomWriter *writer )
|
|
{
|
|
mCustomWriter = writer;
|
|
}
|
|
|
|
|
|
CreateDisconnectedImapAccount::CreateDisconnectedImapAccount(const TQString & accountName) :
|
|
CreateImapAccount( accountName, i18n("Create Disconnected IMAP Account for KMail") ),
|
|
mLocalSubscription( false ), mGroupwareType( GroupwareKolab )
|
|
{
|
|
}
|
|
|
|
void CreateDisconnectedImapAccount::apply()
|
|
{
|
|
if ( mEmail.isEmpty() ) mEmail = mUser + "@" + mServer;
|
|
|
|
TDEConfig c( "kmailrc" );
|
|
c.setGroup( "General" );
|
|
c.writeEntry( "Default domain", mDefaultDomain );
|
|
int accountId;
|
|
if ( mExistingAccountId < 0 ) {
|
|
uint accCnt = c.readNumEntry( "accounts", 0 );
|
|
accountId = accCnt + 1;
|
|
c.writeEntry( "accounts", accountId );
|
|
} else {
|
|
accountId = mExistingAccountId;
|
|
}
|
|
int transportId;
|
|
if ( mExistingTransportId < 0 ) {
|
|
uint transCnt = c.readNumEntry( "transports", 0 );
|
|
transportId = transCnt + 1;
|
|
c.writeEntry( "transports", transportId );
|
|
} else {
|
|
transportId = mExistingTransportId;
|
|
}
|
|
|
|
c.setGroup( TQString("Account %1").arg( accountId ) );
|
|
int uid;
|
|
if ( mExistingAccountId < 0 ) {
|
|
uid = kapp->random();
|
|
c.writeEntry( "Folder", uid );
|
|
} else {
|
|
uid = c.readNumEntry( "Folder" );
|
|
}
|
|
c.writeEntry( "Id", uid );
|
|
c.writeEntry( "Type", "cachedimap");
|
|
|
|
switch ( mAuthentication ) {
|
|
case NONE:
|
|
c.writeEntry( "auth", "*" );
|
|
break;
|
|
case PLAIN:
|
|
c.writeEntry( "auth", "PLAIN" );
|
|
break;
|
|
case LOGIN:
|
|
c.writeEntry( "auth", "LOGIN" );
|
|
break;
|
|
case NTLM_SPA:
|
|
c.writeEntry( "auth", "NTLM" );
|
|
break;
|
|
case GSSAPI:
|
|
c.writeEntry( "auth", "GSSAPI" );
|
|
break;
|
|
case DIGEST_MD5:
|
|
c.writeEntry( "auth", "DIGEST-MD5" );
|
|
break;
|
|
case CRAM_MD5:
|
|
c.writeEntry( "auth", "CRAM-MD5" );
|
|
break;
|
|
}
|
|
|
|
c.writeEntry( "Name", mAccountName );
|
|
c.writeEntry( "host", mServer );
|
|
c.writeEntry( "port", mPort );
|
|
|
|
c.writeEntry( "groupwareType", mGroupwareType );
|
|
|
|
// in case the user wants to get rid of some groupware folders
|
|
c.writeEntry( "locally-subscribed-folders", mLocalSubscription );
|
|
|
|
c.writeEntry( "login", mUser );
|
|
|
|
c.writeEntry( "sieve-support", mEnableSieve ? "true" : "false" );
|
|
if ( !mSieveVacationFileName.isEmpty() )
|
|
c.writeEntry( "sieve-vacation-filename", mSieveVacationFileName );
|
|
|
|
if ( mEncryption == SSL ) {
|
|
c.writeEntry( "use-ssl", true );
|
|
} else if ( mEncryption == TLS ) {
|
|
c.writeEntry( "use-tls", true );
|
|
}
|
|
|
|
if ( mEnableSavePassword ) {
|
|
if ( !writeToWallet( "account", accountId ) ) {
|
|
c.writeEntry( "pass", KStringHandler::obscure( mPassword ) );
|
|
c.writeEntry( "store-passwd", true );
|
|
}
|
|
}
|
|
|
|
|
|
c.setGroup( TQString("Folder-%1").arg( uid ) );
|
|
c.writeEntry( "isOpen", true );
|
|
|
|
c.setGroup( "AccountWizard" );
|
|
c.writeEntry( "ShowOnStartup" , false );
|
|
|
|
c.setGroup( "Composer" );
|
|
c.writeEntry( "default-transport", mAccountName );
|
|
|
|
c.setGroup( TQString("Transport %1").arg( transportId ) );
|
|
c.writeEntry( "name", mAccountName );
|
|
c.writeEntry( "host", mServer );
|
|
c.writeEntry( "type", "smtp" );
|
|
c.writeEntry( "port", mSmtpPort );
|
|
if ( mEncryption == SSL ) {
|
|
c.writeEntry( "encryption", "SSL" );
|
|
} else if ( mEncryption == TLS ) {
|
|
c.writeEntry( "encryption", "TLS" );
|
|
}
|
|
c.writeEntry( "auth", true );
|
|
if ( mAuthenticationSend == PLAIN ) {
|
|
c.writeEntry( "authtype", "PLAIN" );
|
|
} else if ( mAuthenticationSend == LOGIN ) {
|
|
c.writeEntry( "authtype", "LOGIN" );
|
|
}
|
|
c.writeEntry( "user", mUser );
|
|
if ( mEnableSavePassword ) {
|
|
if ( !writeToWallet( "transport", transportId ) ) {
|
|
c.writeEntry( "pass", KStringHandler::obscure( mPassword ) );
|
|
c.writeEntry( "storepass", true );
|
|
}
|
|
}
|
|
|
|
// Write email in "default kcontrol settings", used by IdentityManager
|
|
// if it has to create a default identity.
|
|
KEMailSettings es;
|
|
es.setSetting( KEMailSettings::RealName, mRealName );
|
|
es.setSetting( KEMailSettings::EmailAddress, mEmail );
|
|
|
|
KPIM::IdentityManager identityManager;
|
|
if ( !identityManager.allEmails().contains( mEmail ) ) {
|
|
// Not sure how to name the identity. First one is "Default", next one mAccountName, but then...
|
|
// let's use the server name after that.
|
|
TQString accountName = mAccountName;
|
|
const TQStringList identities = identityManager.identities();
|
|
if ( identities.find( accountName ) != identities.end() ) {
|
|
accountName = mServer;
|
|
int i = 2;
|
|
// And if there's already one, number them
|
|
while ( identities.find( accountName ) != identities.end() ) {
|
|
accountName = mServer + " " + TQString::number( i++ );
|
|
}
|
|
}
|
|
|
|
KPIM::Identity& identity = identityManager.newFromScratch( accountName );
|
|
identity.setFullName( mRealName );
|
|
identity.setPrimaryEmailAddress( mEmail );
|
|
identityManager.commit();
|
|
}
|
|
|
|
if ( mCustomWriter ) {
|
|
mCustomWriter->writeFolder( c, uid );
|
|
mCustomWriter->writeIds( accountId, transportId );
|
|
}
|
|
}
|
|
|
|
CreateOnlineImapAccount::CreateOnlineImapAccount(const TQString & accountName) :
|
|
CreateImapAccount( accountName, i18n("Create Online IMAP Account for KMail") )
|
|
{
|
|
}
|
|
|
|
void CreateOnlineImapAccount::apply()
|
|
{
|
|
TDEConfig c( "kmailrc" );
|
|
c.setGroup( "General" );
|
|
uint accCnt = c.readNumEntry( "accounts", 0 );
|
|
c.writeEntry( "accounts", accCnt+1 );
|
|
|
|
c.setGroup( TQString("Account %1").arg(accCnt+1) );
|
|
int uid = kapp->random();
|
|
c.writeEntry( "Folder", uid );
|
|
c.writeEntry( "Id", uid );
|
|
c.writeEntry( "Type", "imap" );
|
|
c.writeEntry( "auth", "*" );
|
|
c.writeEntry( "Name", mAccountName );
|
|
c.writeEntry( "host", mServer );
|
|
|
|
c.writeEntry( "login", mUser );
|
|
|
|
if ( mEnableSavePassword ) {
|
|
if ( !writeToWallet( "account", accCnt+1 ) ) {
|
|
c.writeEntry( "pass", KStringHandler::obscure( mPassword ) );
|
|
c.writeEntry( "store-passwd", true );
|
|
}
|
|
}
|
|
c.writeEntry( "port", "993" );
|
|
|
|
if ( mEncryption == SSL ) {
|
|
c.writeEntry( "use-ssl", true );
|
|
} else if ( mEncryption == TLS ) {
|
|
c.writeEntry( "use-tls", true );
|
|
}
|
|
|
|
if ( mAuthenticationSend == PLAIN ) {
|
|
c.writeEntry( "authtype", "PLAIN" );
|
|
} else if ( mAuthenticationSend == LOGIN ) {
|
|
c.writeEntry( "authtype", "LOGIN" );
|
|
}
|
|
|
|
c.writeEntry( "sieve-support", mEnableSieve );
|
|
|
|
// locally unsubscribe the default folders
|
|
c.writeEntry( "locally-subscribed-folders", true );
|
|
TQString groupwareFolders = TQString("/INBOX/%1/,/INBOX/%2/,/INBOX/%3/,/INBOX/%4/,/INBOX/%5/")
|
|
.arg( i18n(s_folderContentsType[0]) ).arg( i18n(s_folderContentsType[1]) )
|
|
.arg( i18n(s_folderContentsType[2]) ).arg( i18n(s_folderContentsType[3]) )
|
|
.arg( i18n(s_folderContentsType[4]) );
|
|
c.writeEntry( "locallyUnsubscribedFolders", groupwareFolders );
|
|
|
|
c.setGroup( TQString("Folder-%1").arg( uid ) );
|
|
c.writeEntry( "isOpen", true );
|
|
|
|
|
|
c.setGroup( "AccountWizard" );
|
|
c.writeEntry( "ShowOnStartup" , false );
|
|
|
|
}
|
|
|
|
bool CreateImapAccount::writeToWallet(const TQString & type, int id)
|
|
{
|
|
if ( !Wallet::isEnabled() )
|
|
return false;
|
|
if ( !mWallet || !mWallet->isOpen() ) {
|
|
delete mWallet;
|
|
WId window = 0;
|
|
if ( tqApp->activeWindow() )
|
|
window = tqApp->activeWindow()->winId();
|
|
mWallet = Wallet::openWallet( Wallet::NetworkWallet(), window );
|
|
if ( !mWallet )
|
|
return false;
|
|
if ( !mWallet->hasFolder( "kmail" ) )
|
|
mWallet->createFolder( "kmail" );
|
|
mWallet->setFolder( "kmail" );
|
|
}
|
|
return mWallet->writePassword( type + "-" + TQString::number( id ), mPassword );
|
|
}
|