summaryrefslogtreecommitdiffstats
path: root/wizards/scalixwizard.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'wizards/scalixwizard.cpp')
-rw-r--r--wizards/scalixwizard.cpp546
1 files changed, 546 insertions, 0 deletions
diff --git a/wizards/scalixwizard.cpp b/wizards/scalixwizard.cpp
new file mode 100644
index 000000000..058ff84dd
--- /dev/null
+++ b/wizards/scalixwizard.cpp
@@ -0,0 +1,546 @@
+/*
+ This file is part of kdepim.
+
+ Copyright (c) 2004 Cornelius Schumacher <schumacher@kde.org>
+ Copyright (c) 2004 Daniel Molkentin <molkentin@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 "scalixwizard.h"
+#include "scalixconfig.h"
+
+#include "scalixkmailchanges.h"
+
+#include "kresources/scalix/kcal/resourcescalix.h"
+#include "kresources/scalix/kabc/resourcescalix.h"
+
+#include <libkcal/resourcecalendar.h>
+#include <kabc/resource.h>
+
+#include <dcopref.h>
+#include <kcombobox.h>
+#include <kdcopservicestarter.h>
+#include <klineedit.h>
+#include <klocale.h>
+#include <kmessagebox.h>
+#include <kstringhandler.h>
+
+#include <qapplication.h>
+#include <qcheckbox.h>
+#include <qhbuttongroup.h>
+#include <qlabel.h>
+#include <qlayout.h>
+#include <qwhatsthis.h>
+
+#include <unistd.h>
+
+class SetupLDAPSearchAccount : public KConfigPropagator::Change
+{
+ public:
+ SetupLDAPSearchAccount()
+ : KConfigPropagator::Change( i18n("Setup LDAP Search Account") )
+ {
+ }
+
+ void apply()
+ {
+ const QString host = ScalixConfig::self()->server();
+
+ QString basedn( "o=Scalix" );
+
+ { // while we're here, write default domain
+ KConfig c( "kmailrc" );
+ c.setGroup( "General" );
+ c.writeEntry( "Default domain", basedn );
+ }
+
+ // Set the changes
+ KConfig c( "kabldaprc" );
+ c.setGroup( "LDAP" );
+ bool hasMyServer = false;
+ uint selHosts = c.readNumEntry("NumSelectedHosts", 0);
+ for ( uint i = 0 ; i < selHosts && !hasMyServer; ++i )
+ if ( c.readEntry( QString("SelectedHost%1").arg(i) ) == host )
+ hasMyServer = true;
+ if ( !hasMyServer ) {
+ c.writeEntry( "NumSelectedHosts", selHosts + 1 );
+ c.writeEntry( QString("SelectedHost%1").arg(selHosts), host);
+ c.writeEntry( QString("SelectedBase%1").arg(selHosts), basedn);
+ c.writeEntry( QString("SelectedPort%1").arg(selHosts), "389");
+ }
+ }
+
+};
+
+class SetupScalixAdmin : public KConfigPropagator::Change
+{
+ public:
+ SetupScalixAdmin()
+ : KConfigPropagator::Change( i18n( "Setup ScalixAdmin Account" ) )
+ {
+ }
+
+ void apply()
+ {
+ KConfig c( "scalixadminrc" );
+ c.setGroup( "Account" );
+
+ c.writeEntry( "user", ScalixConfig::self()->user() );
+ c.writeEntry( "pass", KStringHandler::obscure( ScalixConfig::self()->password() ) );
+ c.writeEntry( "host", ScalixConfig::self()->server() );
+ if ( ScalixConfig::self()->security() == ScalixConfig::None )
+ c.writeEntry( "port", 143 );
+ else
+ c.writeEntry( "port", 993 );
+
+ switch ( ScalixConfig::self()->security() ) {
+ case ScalixConfig::None:
+ c.writeEntry( "use-ssl", "false" );
+ c.writeEntry( "use-tls", "false" );
+ break;
+ case ScalixConfig::TLS:
+ c.writeEntry( "use-ssl", "false" );
+ c.writeEntry( "use-tls", "true" );
+ break;
+ case ScalixConfig::SSL:
+ c.writeEntry( "use-ssl", "true" );
+ c.writeEntry( "use-tls", "false" );
+ break;
+ }
+ switch ( ScalixConfig::self()->authentication() ) {
+ case ScalixConfig::Password:
+ c.writeEntry( "auth", "*" );
+ break;
+ case ScalixConfig::NTLM_SPA:
+ c.writeEntry( "auth", "NTLM" );
+ break;
+ case ScalixConfig::GSSAPI:
+ c.writeEntry( "auth", "GSSAPI" );
+ break;
+ case ScalixConfig::DIGEST_MD5:
+ c.writeEntry( "auth", "DIGEST-MD5" );
+ break;
+ case ScalixConfig::CRAM_MD5:
+ c.writeEntry( "auth", "CRAM-MD5" );
+ break;
+ }
+
+ c.setGroup( "LDAP" );
+
+ c.writeEntry( "host", ScalixConfig::self()->server() );
+ c.writeEntry( "port", "389" );
+ c.writeEntry( "base", "o=Scalix" );
+ c.writeEntry( "bindDn", "" );
+ c.writeEntry( "password", "" );
+ }
+};
+
+class CreateCalendarImapResource : public KConfigPropagator::Change
+{
+ public:
+ CreateCalendarImapResource()
+ : KConfigPropagator::Change( i18n("Create Calendar IMAP Resource") )
+ {
+ }
+
+ void apply()
+ {
+ KCal::CalendarResourceManager m( "calendar" );
+ m.readConfig();
+ KCal::ResourceScalix *r = new KCal::ResourceScalix( 0 );
+ r->setResourceName( i18n("Scalix Server") );
+ m.add( r );
+ m.setStandardResource( r );
+ m.writeConfig();
+ }
+};
+
+class CreateContactImapResource : public KConfigPropagator::Change
+{
+ public:
+ CreateContactImapResource()
+ : KConfigPropagator::Change( i18n("Create Contact IMAP Resource") )
+ {
+ }
+
+ void apply()
+ {
+ KRES::Manager<KABC::Resource> m( "contact" );
+ m.readConfig();
+ KABC::ResourceScalix *r = new KABC::ResourceScalix( 0 );
+ r->setResourceName( i18n("Scalix Server") );
+ m.add( r );
+ m.setStandardResource( r );
+ m.writeConfig();
+ }
+
+};
+
+class SynchronizeScalixAccount : public KConfigPropagator::Change
+{
+ public:
+ SynchronizeScalixAccount()
+ : KConfigPropagator::Change( i18n("Synchronize Scalix Account") )
+ {
+ }
+
+ void apply()
+ {
+ QMessageBox *msg = new QMessageBox( qApp->mainWidget() );
+ msg->setText( "Preparing initial synchronization with Scalix server..." );
+ msg->show();
+ qApp->processEvents();
+ sleep( 1 );
+ qApp->processEvents();
+
+ QString error;
+ QCString dcopService;
+ int result = KDCOPServiceStarter::self()->
+ findServiceFor( "DCOP/ResourceBackend/IMAP", QString::null,
+ QString::null, &error, &dcopService );
+ if ( result != 0 ) {
+ KMessageBox::error( 0, i18n( "Unable to start KMail to trigger initial synchronization with Scalix server" ) );
+ delete msg;
+ return;
+ }
+
+ DCOPRef ref( dcopService, "KMailIface" );
+
+ // loop until dcop iface is set up correctly
+ QStringList list;
+ while ( list.isEmpty() ) {
+ ref.call( "accounts()" ).get( list );
+ }
+
+ ref.call( "checkAccount(QString)", i18n( "Scalix Server" ) );
+
+ // ugly hack, but kmail needs a second before accepting the second dcop call
+ sleep( 5 );
+ ref.call( "checkAccount(QString)", i18n( "Scalix Server" ) );
+
+ delete msg;
+ }
+
+};
+
+
+class ScalixPropagator : public KConfigPropagator
+{
+ public:
+ ScalixPropagator()
+ : KConfigPropagator( ScalixConfig::self(), "scalix.kcfg" )
+ {
+ }
+
+ protected:
+ void addKorganizerChanges( Change::List &changes )
+ {
+ KURL freeBusyBaseUrl = "scalix://" + ScalixConfig::self()->server() + "/freebusy/";
+ freeBusyBaseUrl.setUser( ScalixConfig::self()->user() );
+
+ ChangeConfig *c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "FreeBusy";
+ c->name = "FreeBusyRetrieveUrl";
+ c->value = freeBusyBaseUrl.url() + ScalixConfig::self()->eMail();
+ changes.append( c );
+
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "FreeBusy";
+ c->name = "FreeBusyRetrieveUser";
+ c->value = ScalixConfig::self()->user();
+ changes.append( c );
+
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "FreeBusy";
+ c->name = "FreeBusyRetrievePassword";
+ c->value = ScalixConfig::self()->password();
+ changes.append( c );
+
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "FreeBusy";
+ c->name = "FreeBusyPublishUrl";
+ c->value = freeBusyBaseUrl.url() + "Calendar/" + ScalixConfig::self()->eMail();
+ changes.append( c );
+
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "FreeBusy";
+ c->name = "FreeBusyPublishUser";
+ c->value = ScalixConfig::self()->user();
+ changes.append( c );
+
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "FreeBusy";
+ c->name = "FreeBusyPublishPassword";
+ c->value = ScalixConfig::self()->password();
+ changes.append( c );
+
+ // Use full email address for retrieval of free/busy lists
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "FreeBusy";
+ c->name = "FreeBusyFullDomainRetrieval";
+ c->value = "true";
+ changes.append( c );
+
+ // Disable hostname checking
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "FreeBusy";
+ c->name = "FreeBusyCheckHostname";
+ c->value = "false";
+ changes.append( c );
+
+ // Enable automatic retrieval
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "FreeBusy";
+ c->name = "FreeBusyRetrieveAuto";
+ c->value = "true";
+ changes.append( c );
+
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "Group Scheduling";
+ c->name = "Use Groupware Communication";
+ c->value = "true";
+ changes.append( c );
+
+ // Use identity "from control center", i.e. from emaildefaults
+ c = new ChangeConfig;
+ c->file = "korganizerrc";
+ c->group = "Personal Settings";
+ c->name = "Use Control Center Email";
+ c->value = "true";
+ changes.append( c );
+ }
+
+ virtual void addCustomChanges( Change::List &changes )
+ {
+ addKorganizerChanges( changes );
+
+ // KMail cruft has been outsourced to kolabkmailchanges.cpp
+ createKMailChanges( changes );
+
+ changes.append( new SetupLDAPSearchAccount );
+
+ KCal::CalendarResourceManager m( "calendar" );
+ m.readConfig();
+ KCal::CalendarResourceManager::Iterator it;
+ for ( it = m.begin(); it != m.end(); ++it ) {
+ if ( (*it)->type() == "scalix" ) break;
+ }
+ if ( it == m.end() ) {
+ changes.append( new CreateCalendarImapResource );
+ changes.append( new CreateContactImapResource );
+ }
+
+ changes.append( new SetupScalixAdmin );
+
+ changes.append( new SynchronizeScalixAccount );
+ }
+};
+
+ScalixWizard::ScalixWizard() : KConfigWizard( new ScalixPropagator )
+{
+ QFrame *page = createWizardPage( i18n("Scalix Server") );
+
+ QGridLayout *topLayout = new QGridLayout( page );
+ topLayout->setSpacing( spacingHint() );
+
+ QLabel *label = new QLabel( i18n( "Full name:" ), page );
+ topLayout->addWidget( label, 0, 0 );
+ mRealNameEdit = new KLineEdit( page );
+ topLayout->addWidget( mRealNameEdit, 0, 1 );
+ label->setBuddy( mRealNameEdit );
+ QWhatsThis::add( mRealNameEdit, i18n( "Your full name. "
+ "Example: <i>Joe User</i>" ) );
+
+ label = new QLabel( i18n( "Email address:" ), page );
+ topLayout->addWidget( label, 1, 0 );
+ mEMailEdit = new KLineEdit( page );
+ topLayout->addWidget( mEMailEdit, 1, 1 );
+ label->setBuddy( mEMailEdit );
+ QWhatsThis::add( mEMailEdit, i18n( "Your email address on the Scalix Server. "
+ "Example: <i>name@crossplatform.com</i>" ) );
+
+ label = new QLabel( i18n( "Server:" ), page );
+ topLayout->addWidget( label, 2, 0 );
+ mServerEdit = new KLineEdit( page );
+ topLayout->addWidget( mServerEdit, 2, 1 );
+ label->setBuddy( mServerEdit );
+ QWhatsThis::add( mServerEdit, i18n( "The name or IP of the Scalix Server. "
+ "Example: <i>scalix.domain.com</i>" ) );
+
+ label = new QLabel( i18n("Username:"), page );
+ topLayout->addWidget( label, 3, 0 );
+ mUserEdit = new KLineEdit( page );
+ topLayout->addWidget( mUserEdit, 3, 1 );
+ label->setBuddy( mUserEdit );
+ QWhatsThis::add( mUserEdit, i18n( "The user respectively login name. "
+ "Example: <i>joe</i>" ) );
+
+ label = new QLabel( i18n("Password:"), page );
+ topLayout->addWidget( label, 4, 0 );
+ mPasswordEdit = new KLineEdit( page );
+ mPasswordEdit->setEchoMode( KLineEdit::Password );
+ topLayout->addWidget( mPasswordEdit, 4, 1 );
+ label->setBuddy( mPasswordEdit );
+ QWhatsThis::add( mPasswordEdit, i18n( "The password to your login." ) );
+
+ mSavePasswordCheck = new QCheckBox( i18n("Save password"), page );
+ topLayout->addMultiCellWidget( mSavePasswordCheck, 5, 5, 0, 1 );
+ QWhatsThis::add( mSavePasswordCheck, i18n( "Shall the password be saved in KWallet?." ) );
+
+ label = new QLabel( i18n( "Use Secure Connection:" ), page );
+ topLayout->addWidget( label, 6, 0 );
+ mSecurity = new KComboBox( page );
+ mSecurity->insertItem( i18n( "No encryption" ) );
+ mSecurity->insertItem( i18n( "TLS encryption" ) );
+ mSecurity->insertItem( i18n( "SSL encryption" ) );
+ topLayout->addWidget( mSecurity, 6, 1 );
+ label->setBuddy( mSecurity );
+ QWhatsThis::add( mSecurity, i18n( "Choose the encryption type that is supported by your server." ) );
+
+ label = new QLabel( i18n( "Authentication Type:" ), page );
+ topLayout->addWidget( label, 7, 0 );
+ mAuthentication = new KComboBox( page );
+ mAuthentication->insertItem( i18n( "Password" ) );
+ mAuthentication->insertItem( i18n( "NTLM / SPA" ) );
+ mAuthentication->insertItem( i18n( "GSSAPI" ) );
+ mAuthentication->insertItem( i18n( "DIGEST-MD5" ) );
+ mAuthentication->insertItem( i18n( "CRAM-MD5" ) );
+ topLayout->addWidget( mAuthentication, 7, 1 );
+ label->setBuddy( mAuthentication );
+ QWhatsThis::add( mAuthentication, i18n( "Choose the authentication type that is supported by your server." ) );
+
+ topLayout->setRowStretch( 8, 1 );
+
+ //DF: I don't see the point in showing the user those pages.
+ //They are very 'internal' and of no use to anyone other than developers.
+ //(This is even more true for the rules page. The changes page is sort of OK)
+
+ setupRulesPage();
+ setupChangesPage();
+
+ setInitialSize( QSize( 600, 300 ) );
+}
+
+ScalixWizard::~ScalixWizard()
+{
+}
+
+QString ScalixWizard::validate()
+{
+ if ( mRealNameEdit->text().isEmpty() ||
+ mEMailEdit->text().isEmpty() ||
+ mServerEdit->text().isEmpty() ||
+ mUserEdit->text().isEmpty() ||
+ mPasswordEdit->text().isEmpty() )
+ return i18n( "Please fill in all fields." );
+
+ return QString::null;
+}
+
+void ScalixWizard::usrReadConfig()
+{
+ mRealNameEdit->setText( ScalixConfig::self()->realName() );
+ mEMailEdit->setText( ScalixConfig::self()->eMail() );
+ mServerEdit->setText( ScalixConfig::self()->server() );
+ mUserEdit->setText( ScalixConfig::self()->user() );
+ mPasswordEdit->setText( ScalixConfig::self()->password() );
+ mSavePasswordCheck->setChecked( ScalixConfig::self()->savePassword() );
+
+ switch ( ScalixConfig::self()->security() ) {
+ default:
+ case ScalixConfig::None:
+ mSecurity->setCurrentItem( 0 );
+ break;
+ case ScalixConfig::TLS:
+ mSecurity->setCurrentItem( 1 );
+ break;
+ case ScalixConfig::SSL:
+ mSecurity->setCurrentItem( 2 );
+ break;
+ }
+
+ switch ( ScalixConfig::self()->authentication() ) {
+ default:
+ case ScalixConfig::Password:
+ mAuthentication->setCurrentItem( 0 );
+ break;
+ case ScalixConfig::NTLM_SPA:
+ mAuthentication->setCurrentItem( 1 );
+ break;
+ case ScalixConfig::GSSAPI:
+ mAuthentication->setCurrentItem( 2 );
+ break;
+ case ScalixConfig::DIGEST_MD5:
+ mAuthentication->setCurrentItem( 3 );
+ break;
+ case ScalixConfig::CRAM_MD5:
+ mAuthentication->setCurrentItem( 4 );
+ break;
+ }
+}
+
+void ScalixWizard::usrWriteConfig()
+{
+ ScalixConfig::self()->setRealName( mRealNameEdit->text() );
+ ScalixConfig::self()->setEMail( mEMailEdit->text() );
+ ScalixConfig::self()->setServer( mServerEdit->text() );
+ ScalixConfig::self()->setUser( mUserEdit->text() );
+ ScalixConfig::self()->setPassword( mPasswordEdit->text() );
+ ScalixConfig::self()->setSavePassword( mSavePasswordCheck->isChecked() );
+
+ switch ( mSecurity->currentItem() ) {
+ default:
+ case 0:
+ ScalixConfig::self()->setSecurity( ScalixConfig::None );
+ break;
+ case 1:
+ ScalixConfig::self()->setSecurity( ScalixConfig::TLS );
+ break;
+ case 2:
+ ScalixConfig::self()->setSecurity( ScalixConfig::SSL );
+ break;
+ }
+
+ switch ( mAuthentication->currentItem() ) {
+ default:
+ case 0:
+ ScalixConfig::self()->setAuthentication( ScalixConfig::Password );
+ break;
+ case 1:
+ ScalixConfig::self()->setAuthentication( ScalixConfig::NTLM_SPA );
+ break;
+ case 2:
+ ScalixConfig::self()->setAuthentication( ScalixConfig::GSSAPI );
+ break;
+ case 3:
+ ScalixConfig::self()->setAuthentication( ScalixConfig::DIGEST_MD5 );
+ break;
+ case 4:
+ ScalixConfig::self()->setAuthentication( ScalixConfig::CRAM_MD5 );
+ break;
+ }
+}