1 files changed, 286 insertions, 0 deletions
diff --git a/tderesources/newexchange/exchangeglobals.cpp b/tderesources/newexchange/exchangeglobals.cpp
new file mode 100644
index 000000000..f2d90cd6d
--- /dev/null
+++ b/tderesources/newexchange/exchangeglobals.cpp
@@ -0,0 +1,286 @@
+/*
+    This file is part of tdepim.
+
+    Copyright (c) 2005 Reinhold Kainhofer <reinhold@kainhofer.com>
+
+    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 "exchangeglobals.h"
+#include <webdavhandler.h>
+#include <groupwaredataadaptor.h>
+#include "exchangeconvertercalendar.h"
+#include "exchangeconvertercontact.h"
+#include <calendaradaptor.h>
+#include <addressbookadaptor.h>
+
+#include <libkcal/resourcecached.h>
+#include <libemailfunctions/idmapper.h>
+#include <kio/job.h>
+#include <kio/davjob.h>
+#include <kdebug.h>
+
+KPIM::FolderLister::ContentType ExchangeGlobals::getContentType( const TQDomElement &prop )
+{
+  const TQString &contentclass = prop.namedItem("contentclass").toElement().text();
+kdDebug()<<"contentclass: "<<contentclass<<endl;
+  return getContentType( contentclass );
+}
+
+KPIM::FolderLister::ContentType ExchangeGlobals::getContentType( const TQString &contentclass )
+{
+  if ( contentclass == "urn:content-classes:appointment" )
+    return KPIM::FolderLister::Event;
+  if ( contentclass == "urn:content-classes:task" )
+    return KPIM::FolderLister::Todo;
+  if ( contentclass == "urn:content-classes:message" )
+    return KPIM::FolderLister::Message;
+  if ( contentclass == "urn:content-classes:person" )
+    return KPIM::FolderLister::Contact;
+  return KPIM::FolderLister::Unknown;
+}
+
+
+KPIM::FolderLister::ContentType ExchangeGlobals::getContentType( const TQDomNode &folderNode )
+{
+kdDebug()<<"ExchangeGlobals::getContentType(...)"<<endl;
+  TQDomNode n4;
+  for( n4 = folderNode.firstChild(); !n4.isNull(); n4 = n4.nextSibling() ) {
+    TQDomElement e = n4.toElement();
+
+    if ( e.tagName() == "contentclass" ) {
+      TQString contentclass( e.text() );
+      if ( contentclass == "urn:content-classes:contactfolder" )
+        return KPIM::FolderLister::Contact;
+      if ( contentclass == "urn:content-classes:calendarfolder" )
+        return KPIM::FolderLister::Event;
+      if ( contentclass == "urn:content-classes:taskfolder" )
+        return KPIM::FolderLister::Todo;
+      if ( contentclass == "urn:content-classes:journalfolder" )
+        return KPIM::FolderLister::Journal;
+      if ( contentclass == "urn:content-classes:folder" )
+        return KPIM::FolderLister::Folder;
+    }
+  }
+  return KPIM::FolderLister::Unknown;
+}
+
+bool ExchangeGlobals::getFolderHasSubs( const TQDomNode &folderNode )
+{
+  TQString hassubs = folderNode.namedItem( "hassubs" ).toElement().text();
+  return hassubs == "1";
+}
+
+
+
+
+TDEIO::Job *ExchangeGlobals::createListFoldersJob( const KURL &url )
+{
+  TQDomDocument doc;
+  TQDomElement root = WebdavHandler::addDavElement(  doc, doc, "d:propfind" );
+  TQDomElement prop = WebdavHandler::addElement(  doc, root, "d:prop" );
+  WebdavHandler::addElement( doc, prop, "d:displayname" );
+  WebdavHandler::addElement( doc, prop, "d:contentclass" );
+  WebdavHandler::addElement( doc, prop, "d:hassubs" );
+
+  kdDebug(7000) << "props: " << doc.toString() << endl;
+  return TDEIO::davPropFind( url, doc, "1", false );
+}
+
+
+TDEIO::TransferJob *ExchangeGlobals::createListItemsJob( const KURL &url )
+{
+  TQDomDocument doc;
+  TQDomElement root = WebdavHandler::addDavElement(  doc, doc, "d:propfind" );
+  TQDomElement prop = WebdavHandler::addElement(  doc, root, "d:prop" );
+  WebdavHandler::addElement( doc, prop, "d:getetag" );
+  WebdavHandler::addElement( doc, prop, "d:contentclass" );
+  kdDebug(5800) << "props = "<< doc.toString() << endl;
+  return TDEIO::davPropFind( url, doc, "1", false );
+}
+
+
+TDEIO::TransferJob *ExchangeGlobals::createDownloadJob( KPIM::GroupwareDataAdaptor *adaptor,
+                        const KURL &url, KPIM::FolderLister::ContentType ctype )
+{
+kdDebug() << "ExchangeGlobals::createDownloadJob()" << endl;
+kdDebug() << "ctype=" << ctype << endl;
+kdDebug() << "Person=" << KPIM::FolderLister::Contact << ", "
+          << "Appointment=" << KPIM::FolderLister::Event << ", "
+          << "Task=" << KPIM::FolderLister::Todo << ", "
+          << "Journal=" << KPIM::FolderLister::Journal << ", "
+          << "Message=" << KPIM::FolderLister::Message << endl;
+  // Don't use an <allprop/> request!
+
+  TQDomDocument doc;
+  TQDomElement root = WebdavHandler::addDavElement( doc, doc, "d:propfind" );
+  TQDomElement prop = WebdavHandler::addElement( doc, root, "d:prop" );
+  TQDomAttr att_h = doc.createAttribute( "xmlns:h" );
+  att_h.setValue( "urn:schemas:mailheader:" );
+  root.setAttributeNode( att_h );
+
+  TQDomAttr att_m = doc.createAttribute( "xmlns:m" );
+  att_m.setValue( "urn:schemas:httpmail:" );
+  root.setAttributeNode( att_m );
+
+  switch ( ctype ) {
+    case KPIM::FolderLister::Event:
+        KCal::ExchangeConverterCalendar::createRequestAppointment( doc, prop );
+        break;
+    case KPIM::FolderLister::Todo:
+        KCal::ExchangeConverterCalendar::createRequestTask( doc, prop );
+        break;
+    case KPIM::FolderLister::Journal:
+    case KPIM::FolderLister::Message:
+        KCal::ExchangeConverterCalendar::createRequestJournal( doc, prop );
+        break;
+    case KPIM::FolderLister::Contact:
+        KABC::ExchangeConverterContact::createRequest( doc, prop );
+        break;
+    default:
+        break;
+  }
+
+  kdDebug(7000) << "doc: " << doc.toString() << endl;
+  KURL authURL = url;
+  TDEIO::DavJob *job = TDEIO::davPropFind( authURL, doc, "0", false );
+/*  KURL httpurl( url );
+  TQString proto("http");
+  httpurl.setProtocol( proto );
+  TDEIO::TransferJob *job = TDEIO::get(httpurl, false, false);
+  job->addMetaData("customHTTPHeader", "Translate: f");
+  job->addMetaData("cache", "reload");*/
+  return job;
+}
+
+
+TDEIO::Job *ExchangeGlobals::createRemoveJob( const KURL &uploadurl,
+       const KPIM::GroupwareUploadItem::List &deletedItems )
+{
+  TQStringList urls;
+  KPIM::GroupwareUploadItem::List::const_iterator it;
+  kdDebug() << " ExchangeGlobals::createRemoveJob: , URL="<<uploadurl.url()<<endl;
+  for ( it = deletedItems.begin(); it != deletedItems.end(); ++it ) {
+    //kdDebug(7000) << "Delete: " << endl << format.toICalString(*it) << endl;
+    kdDebug() << "Delete: " <<   (*it)->url().url() << endl;
+    KURL url( uploadurl );
+    url.setPath( (*it)->url().path() );
+    if ( !url.isEmpty() )
+      urls << url.url();
+    kdDebug() << "Delete (Mod) : " <<   url.url() << endl;
+  }
+  return TDEIO::del( urls, false, false );
+}
+
+
+
+
+// FIXME: This is exactly the same code as in the OGo resource, except that
+// it calls getContentType of the ExchangeGlobals class, instead of the one
+// from OGoGlobals!!!!
+bool ExchangeGlobals::interpretListItemsJob( KPIM::GroupwareDataAdaptor *adaptor,
+    TDEIO::Job *job, const TQString &/*jobData*/ )
+{
+kdDebug()<<"ExchangeGlobals::interpretListItemsJob"<<endl;
+  TDEIO::DavJob *davjob = dynamic_cast<TDEIO::DavJob *>(job);
+
+  if ( !davjob ) {
+    return false;
+  }
+  TQDomDocument doc = davjob->response();
+
+  kdDebug(7000) << " Doc: " << doc.toString() << endl;
+  kdDebug(7000) << " IdMapper: " << adaptor->idMapper()->asString() << endl;
+
+  TQDomElement docElem = doc.documentElement();
+  TQDomNode n = docElem.firstChild();
+  while( !n.isNull() ) {
+    TQDomElement e = n.toElement(); // try to convert the node to an element.
+    n = n.nextSibling();
+    if ( e.isNull() )
+      continue;
+
+    const KURL &entry( e.namedItem("href").toElement().text() );
+    TQDomElement propstat = e.namedItem("propstat").toElement();
+    if ( propstat.isNull() )
+      continue;
+    TQDomElement prop = propstat.namedItem( "prop" ).toElement();
+    if ( prop.isNull() )
+      continue;
+    TQDomElement elem = prop.namedItem("getetag").toElement();
+    const TQString &newFingerprint = elem.text();
+    if ( elem.isNull() || newFingerprint.isEmpty() )
+      continue;
+
+    KPIM::FolderLister::ContentType type = getContentType( prop );
+
+    if (type != KPIM::FolderLister::Unknown) { // Don't queue bad entries
+      adaptor->processDownloadListItem( entry, newFingerprint, type );
+    }
+  }
+
+  return true;
+}
+
+
+bool ExchangeGlobals::interpretCalendarDownloadItemsJob( KCal::CalendarAdaptor *adaptor,
+                                         TDEIO::Job *job, const TQString &/*jobData*/ )
+{
+  TDEIO::DavJob *davjob = dynamic_cast<TDEIO::DavJob*>(job);
+  if ( !davjob || !adaptor ) return false;
+
+kdDebug() << "ExchangeGlobals::interpretCalendarDownloadItemsJob(): TQDomDocument="
+          << endl << davjob->response().toString() << endl;
+  KCal::ExchangeConverterCalendar conv;
+  conv.setTimeZone( adaptor->resource()->timeZoneId() );
+  KCal::Incidence::List incidences = conv.parseWebDAV( davjob->response() );
+
+  bool res = false;
+  KCal::Incidence::List::Iterator it = incidences.begin();
+  for ( ; it != incidences.end(); ++it ) {
+    TQString fpr = (*it)->customProperty( "TDEPIM-Exchange-Resource", "fingerprint" );
+    KURL href( (*it)->customProperty( "TDEPIM-Exchange-Resource", "href" ) );
+    adaptor->calendarItemDownloaded( (*it), (*it)->uid(), href, fpr, href.prettyURL() );
+    res = true;
+  }
+  return res;
+}
+
+
+bool ExchangeGlobals::interpretAddressBookDownloadItemsJob(
+      KABC::AddressBookAdaptor *adaptor, TDEIO::Job *job, const TQString &/*jobData*/ )
+{
+  TDEIO::DavJob *davjob = dynamic_cast<TDEIO::DavJob*>(job);
+  if ( !davjob || !adaptor ) return false;
+
+kdDebug() << "ExchangeGlobals::interpretAddressBookDownloadItemsJob(): TQDomDocument="
+          << endl << davjob->response().toString() << endl;
+  KABC::ExchangeConverterContact conv;
+  KABC::Addressee::List addressees = conv.parseWebDAV( davjob->response() );
+
+  bool res = false;
+  KABC::Addressee::List::Iterator it = addressees.begin();
+  for ( ; it != addressees.end(); ++it ) {
+    TQString fpr = (*it).custom( "TDEPIM-Exchange-Resource", "fingerprint" );
+    KURL href( (*it).custom( "TDEPIM-Exchange-Resource", "href" ) );
+    adaptor->addressbookItemDownloaded( (*it), (*it).uid(), href, fpr, href.prettyURL() );
+    res = true;
+  }
+  return res;
+}
+
+
+