1 files changed, 97 insertions, 0 deletions
diff --git a/tderesources/egroupware/tdeabc_resourcexmlrpcconfig.cpp b/tderesources/egroupware/tdeabc_resourcexmlrpcconfig.cpp
new file mode 100644
index 000000000..03665e75d
--- /dev/null
+++ b/tderesources/egroupware/tdeabc_resourcexmlrpcconfig.cpp
@@ -0,0 +1,97 @@
+/*
+    This file is part of tdepim.
+    Copyright (c) 2002 - 2004 Tobias Koenig <[email protected]>
+
+    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 <tqlabel.h>
+#include <tqlayout.h>
+
+#include <kdebug.h>
+#include <kdialog.h>
+#include <tdelocale.h>
+#include <klineedit.h>
+#include <kurlrequester.h>
+
+#include "kabc_egroupwareprefs.h"
+#include "kabc_resourcexmlrpc.h"
+#include "kabc_resourcexmlrpcconfig.h"
+
+using namespace KABC;
+
+ResourceXMLRPCConfig::ResourceXMLRPCConfig( TQWidget* parent,  const char* name )
+  : KRES::ConfigWidget( parent, name )
+{
+  TQGridLayout *mainLayout = new TQGridLayout( this, 4, 2, 0, KDialog::spacingHint() );
+
+  TQLabel *label = new TQLabel( i18n( "URL:" ), this );
+  mURL = new KURLRequester( this );
+
+  mainLayout->addWidget( label, 0, 0 );
+  mainLayout->addWidget( mURL, 0, 1 );
+
+  label = new TQLabel( i18n( "Domain:" ), this );
+  mDomain = new KLineEdit( this );
+
+  mainLayout->addWidget( label, 1, 0 );
+  mainLayout->addWidget( mDomain, 1, 1 );
+
+  label = new TQLabel( i18n( "User:" ), this );
+  mUser = new KLineEdit( this );
+
+  mainLayout->addWidget( label, 2, 0 );
+  mainLayout->addWidget( mUser, 2, 1 );
+
+  label = new TQLabel( i18n( "Password:" ), this );
+  mPassword = new KLineEdit( this );
+  mPassword->setEchoMode( TQLineEdit::Password );
+
+  mainLayout->addWidget( label, 3, 0 );
+  mainLayout->addWidget( mPassword, 3, 1 );
+}
+
+void ResourceXMLRPCConfig::loadSettings( KRES::Resource *res )
+{
+  ResourceXMLRPC *resource = dynamic_cast<ResourceXMLRPC*>( res );
+  
+  if ( !resource ) {
+    kdDebug(5700) << "ResourceXMLRPCConfig::loadSettings(): cast failed" << endl;
+    return;
+  }
+
+  mURL->setURL( resource->prefs()->url() );
+  mDomain->setText( resource->prefs()->domain() );
+  mUser->setText( resource->prefs()->user() );
+  mPassword->setText( resource->prefs()->password() );
+}
+
+void ResourceXMLRPCConfig::saveSettings( KRES::Resource *res )
+{
+  ResourceXMLRPC *resource = dynamic_cast<ResourceXMLRPC*>( res );
+  
+  if ( !resource ) {
+    kdDebug(5700) << "ResourceXMLRPCConfig::saveSettings(): cast failed" << endl;
+    return;
+  }
+
+  resource->prefs()->setUrl( mURL->url() );
+  resource->prefs()->setDomain( mDomain->text() );
+  resource->prefs()->setUser( mUser->text() );
+  resource->prefs()->setPassword( mPassword->text() );
+}
+
+#include "kabc_resourcexmlrpcconfig.moc"