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.
248 lines
7.1 KiB
248 lines
7.1 KiB
/*
|
|
* Copyright (C) 2005, Mart Kelder (mart.kde@hccnet.nl)
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program 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 General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*/
|
|
|
|
|
|
#include "password.h"
|
|
|
|
#include <kconfig.h>
|
|
#include <kdebug.h>
|
|
#include <kwallet.h>
|
|
|
|
#include <tqstring.h>
|
|
#include <tqstringlist.h>
|
|
|
|
KWallet::Wallet* KOrnPassword::m_wallet = 0;
|
|
bool KOrnPassword::m_openFailed = false;
|
|
bool KOrnPassword::m_useWallet = false; //Not default true until moving works
|
|
|
|
TQString KOrnPassword::readKOrnPassword( int box, int account, const KConfigBase &fallbackConfig )
|
|
{
|
|
TQString result;
|
|
|
|
if( readKOrnPassword( box, account, result ) )
|
|
return result;
|
|
else
|
|
return fallbackConfig.readEntry( "password" );
|
|
}
|
|
|
|
TQString KOrnPassword::readKMailPassword( int accountnr, const KConfigBase& fallbackConfig )
|
|
{
|
|
TQString password;
|
|
open();
|
|
|
|
if( !m_wallet || !m_wallet->isOpen() || m_openFailed )
|
|
return KMailDecrypt( fallbackConfig.readEntry( "pass" ) );
|
|
|
|
if( !m_wallet->hasFolder( "kmail" ) )
|
|
return KMailDecrypt( fallbackConfig.readEntry( "pass" ));
|
|
m_wallet->setFolder( "kmail" );
|
|
|
|
if( m_wallet->readPassword( TQString( "account-%1" ).tqarg( accountnr ), password ) != 0 )
|
|
return fallbackConfig.readEntry( "password" );
|
|
|
|
return password;
|
|
}
|
|
|
|
void KOrnPassword::writeKOrnPassword( int box, int account, KConfigBase& fallbackConfig, const TQString& password )
|
|
{
|
|
if( writeKOrnPassword( box, account, password ) )
|
|
{
|
|
if( fallbackConfig.hasKey( "password" ) )
|
|
fallbackConfig.deleteEntry( "password" );
|
|
}
|
|
else
|
|
fallbackConfig.writeEntry( "password", password );
|
|
}
|
|
|
|
void KOrnPassword::deleteKOrnPassword( int box, int account, KConfigBase& fallbackConfig )
|
|
{
|
|
deleteKOrnPassword( box, account );
|
|
if( fallbackConfig.hasKey( "password" ) )
|
|
fallbackConfig.deleteEntry( "password" );
|
|
}
|
|
|
|
bool KOrnPassword::deleteKOrnPassword( int box, int account )
|
|
{
|
|
if( !m_useWallet )
|
|
//Wallet should not be used => saving in config file
|
|
return false;
|
|
|
|
//Open wallet
|
|
open();
|
|
|
|
if( !m_wallet || !m_wallet->isOpen() || m_openFailed )
|
|
//Opening failed => delete in config file
|
|
return false;
|
|
|
|
//Make folder for KOrn if needed
|
|
if( !m_wallet->hasFolder( "korn" ) )
|
|
return false; //It does not exist
|
|
m_wallet->setFolder( "korn" );
|
|
|
|
//Write to wallet
|
|
if( m_wallet->removeEntry( TQString( "account-%1-%2" ).tqarg( box ).tqarg( account ) ) != 0 )
|
|
//Writing failed
|
|
return false;
|
|
|
|
//Password succesfully stored in the configuration.
|
|
return true;
|
|
}
|
|
|
|
void KOrnPassword::moveKOrnPassword( int boxSrc, int accountSrc, KConfigBase& configSrc,
|
|
int boxDest, int accountDest, KConfigBase &configDest )
|
|
{
|
|
TQString password;
|
|
|
|
password = readKOrnPassword( boxSrc, accountSrc, configSrc );
|
|
deleteKOrnPassword( boxSrc, accountSrc, configSrc );
|
|
writeKOrnPassword( boxDest, accountDest, configDest, password );
|
|
}
|
|
|
|
void KOrnPassword::swapKOrnPassword( int box1, int account1, KConfigBase &config1, int box2, int account2, KConfigBase &config2 )
|
|
{
|
|
TQString password1, password2;
|
|
password1 = readKOrnPassword( box1, account1, config1 );
|
|
password2 = readKOrnPassword( box2, account2, config2 );
|
|
deleteKOrnPassword( box1, account1, config1 );
|
|
deleteKOrnPassword( box2, account2, config2 );
|
|
writeKOrnPassword( box1, account1, config1, password2 );
|
|
writeKOrnPassword( box2, account2, config2, password1 );
|
|
}
|
|
|
|
void KOrnPassword::swapKOrnWalletPassword( int box1, int account1, int box2, int account2 )
|
|
{
|
|
TQString password1, password2;
|
|
bool passExist1, passExist2;
|
|
passExist1 = readKOrnPassword( box1, account1, password1 );
|
|
passExist2 = readKOrnPassword( box2, account2, password2 );
|
|
|
|
if( passExist1 )
|
|
deleteKOrnPassword( box1, account1 );
|
|
if( passExist2 )
|
|
deleteKOrnPassword( box2, account2 );
|
|
|
|
if( passExist1 )
|
|
writeKOrnPassword( box2, account2, password1 );
|
|
if( passExist2 )
|
|
writeKOrnPassword( box1, account1, password2 );
|
|
}
|
|
|
|
void KOrnPassword::swapKOrnWalletPasswords( int box1, int accountnumber1 ,int box2, int accountnumber2 )
|
|
{
|
|
int max = accountnumber1 > accountnumber2 ? accountnumber1 : accountnumber2;
|
|
for( int xx = 0; xx < max; ++xx )
|
|
swapKOrnWalletPassword( box1, xx, box2, xx );
|
|
}
|
|
|
|
void KOrnPassword::rewritePassword( int box, int account, KConfigBase &config, bool newUseWalletValue )
|
|
{
|
|
bool useWallet = m_useWallet;
|
|
TQString password;
|
|
|
|
setUseWallet( !newUseWalletValue );
|
|
password = readKOrnPassword( box, account, config );
|
|
deleteKOrnPassword( box, account, config );
|
|
|
|
setUseWallet( newUseWalletValue );
|
|
writeKOrnPassword( box, account, config, password );
|
|
|
|
setUseWallet( useWallet );
|
|
}
|
|
|
|
void KOrnPassword::setUseWallet( const bool value )
|
|
{
|
|
m_useWallet = value;
|
|
}
|
|
|
|
void KOrnPassword::open()
|
|
{
|
|
if( m_wallet && m_wallet->isOpen() )
|
|
return; //Already open
|
|
|
|
if( m_openFailed )
|
|
return; //Not open, and can't be opened
|
|
|
|
delete m_wallet; m_wallet = 0;
|
|
m_wallet = KWallet::Wallet::openWallet( KWallet::Wallet::NetworkWallet(), 0 );
|
|
|
|
if( !m_wallet )
|
|
m_openFailed = true;
|
|
}
|
|
|
|
bool KOrnPassword::readKOrnPassword( int box, int account, TQString& password )
|
|
{
|
|
if( !m_useWallet )
|
|
return false;
|
|
|
|
//Otherwise: try to open the wallet
|
|
open();
|
|
|
|
if( !m_wallet || !m_wallet->isOpen() || m_openFailed )
|
|
//Opening failed: getting value out of config if it exists there
|
|
return false;
|
|
|
|
if( !m_wallet->hasFolder( "korn" ) )
|
|
//No folder korn exist, so no password stored in the wallet.
|
|
return false;
|
|
m_wallet->setFolder( "korn" );
|
|
|
|
if( m_wallet->readPassword( TQString( "account-%1-%2" ).tqarg( box ).tqarg( account ), password ) != 0 )
|
|
//Error during reading the password: use the one in the config file
|
|
return false;
|
|
|
|
//Reading completed: returning
|
|
return true;
|
|
}
|
|
|
|
bool KOrnPassword::writeKOrnPassword( int box, int account, const TQString& password )
|
|
{
|
|
if( !m_useWallet )
|
|
//Wallet should not be used => saving in the config file
|
|
return false;
|
|
|
|
//Open wallet
|
|
open();
|
|
|
|
if( !m_wallet || !m_wallet->isOpen() || m_openFailed )
|
|
//Opening failed => write to configfile
|
|
return false;
|
|
|
|
//Make folder for KOrn if needed
|
|
if( !m_wallet->hasFolder( "korn" ) )
|
|
m_wallet->createFolder( "korn" );
|
|
m_wallet->setFolder( "korn" );
|
|
|
|
//Write to wallet
|
|
if( m_wallet->writePassword( TQString( "account-%1-%2" ).tqarg( box ).tqarg( account ), password ) != 0 )
|
|
//Writing failed
|
|
return false;
|
|
|
|
//Password succesfully stored in the configuration.
|
|
return true;
|
|
}
|
|
|
|
//This function is copyed from kmail/kmaccount.cpp
|
|
TQString KOrnPassword::KMailDecrypt( const TQString& enc )
|
|
{
|
|
TQString result;
|
|
for (uint i = 0; i < enc.length(); i++)
|
|
result += (enc[i].tqunicode() <= 0x21) ? enc[i] : TQChar(0x1001F - enc[i].tqunicode());
|
|
|
|
return result;
|
|
}
|