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.
tdepim/korn/kornaccountcfgimpl.cpp

233 lines
7.3 KiB

/*
* Copyright (C) 2004, 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 "kornaccountcfgimpl.h"
#include "account_input.h"
#include "kio_proto.h"
#include "password.h"
#include "protocol.h"
#include "protocols.h"
#include <kconfigbase.h>
#include <kdebug.h>
#include <klineedit.h>
#include <kurlrequester.h>
#include <tqcheckbox.h>
#include <tqcombobox.h>
#include <tqptrvector.h>
#include <tqlayout.h>
#include <tqmap.h>
#include <tqlabel.h>
#include <tqwidget.h>
KornAccountCfgImpl::KornAccountCfgImpl( TQWidget * tqparent, const char * name )
: KornAccountCfg( tqparent, name ),
_config( 0 ),
_fields( 0 ),
_urlfields( 0 ),
_boxnr( 0 ),
_accountnr( 0 ),
_vtqlayout( 0 ),
_protocolLayout( 0 ),
_groupBoxes( 0 ),
_accountinput( new TQPtrList< AccountInput >() )
{
connect( tqparent, TQT_SIGNAL( okClicked() ), this, TQT_SLOT( slotOK() ) );
connect( tqparent, TQT_SIGNAL( cancelClicked() ), this, TQT_SLOT( slotCancel() ) );
this->cbProtocol->insertStringList( Protocols::getProtocols() );
_accountinput->setAutoDelete( true );
}
KornAccountCfgImpl::~KornAccountCfgImpl()
{
delete _accountinput;
}
void KornAccountCfgImpl::readConfig( KConfigGroup *config, TQMap< TQString, TQString > *entries, int boxnr, int accountnr )
{
AccountInput *input;
_config = config;
_accountinput->clear();
this->cbProtocol->setCurrentText( _config->readEntry( "protocol", "mbox" ) );
slotProtocolChanged( this->cbProtocol->currentText() );
const Protocol *protocol = Protocols::getProto( _config->readEntry( "protocol", "mbox" ) );
protocol->readEntries( entries );
(*entries)[ "password" ] = KOrnPassword::readKOrnPassword( boxnr, accountnr, *config );
for( input = _accountinput->first(); input; input = _accountinput->next() )
if( entries->tqcontains( input->configName() ) )
input->setValue( *(entries->tqfind( input->configName() ) ) );
this->edInterval->setText( _config->readEntry( "interval", "300" ) );
this->chUseBox->setChecked( _config->readBoolEntry( "boxsettings", true ) );
this->edRunCommand->setURL( _config->readEntry( "newcommand", "" ) );
this->edPlaySound->setURL( _config->readEntry( "sound", "" ) );
this->chPassivePopup->setChecked( _config->readBoolEntry( "passivepopup", false ) );
this->chPassiveDate->setChecked( _config->readBoolEntry( "passivedate", false ) );
_boxnr = boxnr;
_accountnr = accountnr;
}
void KornAccountCfgImpl::writeConfig()
{
AccountInput *input;
const Protocol *protocol = Protocols::getProto( this->cbProtocol->currentText() );
if( !protocol )
{
kdWarning() << "An error occured during writing the account information: protocol does not exist" << endl;
return;
}
_config->writeEntry( "protocol", this->cbProtocol->currentText() );
TQMap< TQString, TQString > *map = new TQMap< TQString, TQString >;
TQMap< TQString, TQString >::ConstIterator it;
for( input = _accountinput->first(); input; input = _accountinput->next() )
map->insert( input->configName(), input->value() );
protocol->writeEntries( map );
if( map->tqcontains( "password" ) )
{
KOrnPassword::writeKOrnPassword( _boxnr, _accountnr, *_config, *map->tqfind( "password" ) );
map->erase( "password" );
}
for( it = map->begin(); it != map->end(); ++it )
_config->writeEntry( it.key(), it.data() );
delete map;
_config->writeEntry( "interval", this->edInterval->text().toInt() );
_config->writeEntry( "boxsettings", this->chUseBox->isChecked() );
_config->writeEntry( "newcommand", this->edRunCommand->url() );
_config->writeEntry( "sound", this->edPlaySound->url() );
_config->writeEntry( "passivepopup", this->chPassivePopup->isChecked() );
_config->writeEntry( "passivedate", this->chPassiveDate->isChecked() );
}
void KornAccountCfgImpl::slotSSLChanged()
{
AccountInput *input;
const Protocol* protocol = Protocols::getProto( this->cbProtocol->currentText() );
bool ssl = false;
if( !protocol )
return;
for( input = _accountinput->first(); input; input = _accountinput->next() )
if( ( input->configName() == "ssl" && input->value() == "true" ) || input->value() == "ssl" )
ssl = true;
for( input = _accountinput->first(); input; input = _accountinput->next() )
if( input->configName() == "port" && ( input->value() == TQString::number( protocol->defaultPort( !ssl ) ) ) )
input->setValue( TQString::number( protocol->defaultPort( ssl ) ) );
}
void KornAccountCfgImpl::slotOK()
{
writeConfig();
}
void KornAccountCfgImpl::slotCancel()
{
}
void KornAccountCfgImpl::slotProtocolChanged( const TQString& proto )
{
const Protocol *protocol = Protocols::getProto( proto );
TQStringList *groupBoxes = new TQStringList;
int counter = 1;
protocol->configFillGroupBoxes( groupBoxes );
_accountinput->clear();
delete _groupBoxes;
delete _protocolLayout;
delete _vtqlayout;
_vtqlayout = new TQVBoxLayout( this->server_tab, groupBoxes->count() + 1 );
_vtqlayout->setSpacing( 10 );
_vtqlayout->setMargin( 10 );
_protocolLayout = new TQHBoxLayout( _vtqlayout );
_protocolLayout->addWidget( this->lbProtocol );
_protocolLayout->addWidget( this->cbProtocol );
TQStringList::iterator it;
counter = 0;
_groupBoxes = new TQPtrVector< TQWidget >( groupBoxes->count() );
_groupBoxes->setAutoDelete( true );
for( it = groupBoxes->begin(); it != groupBoxes->end(); ++it )
{
_groupBoxes->insert( counter, new TQGroupBox( (*it), this->server_tab, "groupbox" ) );
_vtqlayout->addWidget( _groupBoxes->at( counter ) );
++counter;
}
delete groupBoxes;
AccountInput *input;
protocol->configFields( _groupBoxes, this, _accountinput );
for( unsigned int groupCounter = 0; groupCounter < _groupBoxes->count(); ++groupCounter )
{
int counter = 0;
TQGridLayout *grid = new TQGridLayout( _groupBoxes->at( groupCounter ), 0, 2 );
grid->setSpacing( 10 );
grid->setMargin( 15 );
for( input = _accountinput->first(); input; input = _accountinput->next() )
{
if( input->leftWidget() && _groupBoxes->at( groupCounter ) == input->leftWidget()->tqparent() )
{
grid->addWidget( input->leftWidget(), counter, 0 );
if( input->rightWidget() && _groupBoxes->at( groupCounter ) == input->rightWidget()->tqparent() )
grid->addWidget( input->rightWidget(), counter, 1 );
++counter;
} else {
if( input->rightWidget() && _groupBoxes->at( groupCounter ) == input->rightWidget()->tqparent() )
{
grid->addWidget( input->rightWidget(), counter, 1 );
++counter;
}
}
}
_groupBoxes->at( groupCounter )->show();
}
this->lbInterval->setEnabled( proto != "process" && proto != "dcop" );
this->edInterval->setEnabled( proto != "process" && proto != "dcop" );
this->server_tab->updateGeometry();
}
#include "kornaccountcfgimpl.moc"