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.
821 lines
30 KiB
821 lines
30 KiB
/*
|
|
This file is part of the exchange resource.
|
|
Copyright (c) 2004 Reinhold Kainhofer <reinhold@kainhofer.com>
|
|
Parts are derived from the old libkpimexchange library:
|
|
Copyright (c) 2002 Jan-Pascal van Best <janpascal@vanbest.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 "exchangeconvertercalendar.h"
|
|
#include <webdavhandler.h>
|
|
#include <libkcal/incidence.h>
|
|
#include <libkcal/event.h>
|
|
#include <libkcal/journal.h>
|
|
#include <libkcal/todo.h>
|
|
#include <libkcal/icalformat.h>
|
|
#include <libemailfunctions/email.h>
|
|
|
|
#include <kdebug.h>
|
|
|
|
using namespace KCal;
|
|
|
|
#define TaskNamespace1 "http://schemas.microsoft.com/mapi/id/{00062003-0000-0000-C000-000000000046}/"
|
|
#define TaskProp_Status "0x00008101"
|
|
#define TaskProp_PercentCompleted "0x00008102"
|
|
#define TaskProp_DtStart "0x00008104"
|
|
#define TaskProp_DtDue "0x00008105"
|
|
#define TaskProp_Duration "0x00008106"
|
|
#define TaskProp_CompletionDate "0x0000810f"
|
|
#define TaskProp_IsCompleted "0x0000811C"
|
|
#define TaskProp_Owner "0x0000811F"
|
|
#define TaskProp_DoesRecur "0x00008126"
|
|
|
|
#define TaskNamespace2 "http://schemas.microsoft.com/mapi/id/{00062008-0000-0000-C000-000000000046}/"
|
|
#define TaskProp_ReminderTime "0x00008502"
|
|
#define TaskProp_ReminderSet "0x00008503"
|
|
#define TaskProp_ReminderPlaySound "0x0000851E"
|
|
#define TaskProp_ReminderSoundFile "0x0000851F"
|
|
#define TaskProp_ContactNames "0x0000853A"
|
|
|
|
|
|
ExchangeConverterCalendar::ExchangeConverterCalendar()
|
|
{
|
|
}
|
|
|
|
void ExchangeConverterCalendar::setTimeZone( const TQString &id )
|
|
{
|
|
// kdDebug() << "Setting timezone to: " << id << endl;
|
|
mFormat.setTimeZone( id, true );
|
|
}
|
|
|
|
#define propertyDAV( prop ) \
|
|
WebdavHandler::addElement( doc, root, "d:"prop )
|
|
#define propertyNS( ns, prop ) \
|
|
WebdavHandler::addElementNS( doc, root, ns, prop )
|
|
#define propertyCalendar( prop ) \
|
|
WebdavHandler::addElement( doc, root, "c:"prop )
|
|
#define propertyHTTPMail( prop ) \
|
|
WebdavHandler::addElement( doc, root, "m:"prop )
|
|
#define propertyMailHeader( prop ) \
|
|
WebdavHandler::addElement( doc, root, "h:"prop )
|
|
#define property( prop ) \
|
|
WebdavHandler::addElement( doc, root, prop )
|
|
|
|
void ExchangeConverterCalendar::createRequestIncidence( TQDomDocument &doc, TQDomElement &root )
|
|
{
|
|
propertyDAV( "contentclass" );
|
|
propertyDAV( "getcontenttype" );
|
|
propertyNS( "http://schemas.microsoft.com/exchange/", "outlookmessageclass" );
|
|
propertyDAV( "getetag" );
|
|
propertyDAV( "href" );
|
|
propertyDAV( "isreadonly" );
|
|
propertyNS( "http://schemas.microsoft.com/repl/", "repl-uid" );
|
|
propertyHTTPMail( "subject" );
|
|
propertyHTTPMail( "textdescription" );
|
|
propertyHTTPMail( "date" );
|
|
propertyDAV( "comment" );
|
|
propertyNS( "urn:schemas-microsoft-com:office:office", "Keywords" );
|
|
propertyNS( "http://schemas.microsoft.com/exchange/", "sensitivity" );
|
|
propertyHTTPMail( "priority" );
|
|
propertyHTTPMail( "from" );
|
|
propertyHTTPMail( "to" );
|
|
propertyHTTPMail( "cc" );
|
|
propertyHTTPMail( "bcc" );
|
|
propertyHTTPMail( "hasattachment" );
|
|
}
|
|
|
|
void ExchangeConverterCalendar::createRequestAppointment( TQDomDocument &doc, TQDomElement &root )
|
|
{
|
|
createRequestIncidence( doc, root );
|
|
TQDomAttr att_c = doc.createAttribute( "xmlns:c" );
|
|
att_c.setValue( "urn:schemas:calendar:" );
|
|
doc.documentElement().setAttributeNode( att_c );
|
|
propertyCalendar( "uid" );
|
|
propertyCalendar( "created" );
|
|
propertyCalendar( "lastmodified" );
|
|
propertyCalendar( "dtstamp" );
|
|
propertyCalendar( "sequence" );
|
|
propertyCalendar( "location" );
|
|
propertyCalendar( "busystatus" );
|
|
propertyCalendar( "transparent" );
|
|
propertyCalendar( "timezone" );
|
|
propertyCalendar( "alldayevent" );
|
|
propertyCalendar( "dtstart" );
|
|
propertyCalendar( "dtend" );
|
|
propertyCalendar( "duration" );
|
|
propertyCalendar( "rrule" );
|
|
propertyCalendar( "rdate" );
|
|
propertyCalendar( "exrule" );
|
|
propertyCalendar( "exdate" );
|
|
propertyCalendar( "recurrenceid" );
|
|
propertyCalendar( "instancetype" );
|
|
propertyCalendar( "reminderoffset" );
|
|
propertyCalendar( "resources" );
|
|
}
|
|
|
|
#define propertyTask1( prop ) \
|
|
WebdavHandler::addElement( doc, props, "t1:"prop )
|
|
#define propertyTask2( prop ) \
|
|
WebdavHandler::addElement( doc, props, "t2:"prop )
|
|
|
|
void ExchangeConverterCalendar::createRequestTask( TQDomDocument &doc, TQDomElement &props )
|
|
{
|
|
createRequestIncidence( doc, props );
|
|
|
|
TQDomElement root = doc.documentElement();
|
|
|
|
TQDomAttr att_t1 = doc.createAttribute( "xmlns:t1" );
|
|
att_t1.setValue( TaskNamespace1 );
|
|
root.setAttributeNode( att_t1 );
|
|
|
|
TQDomAttr att_t2 = doc.createAttribute( "xmlns:t2" );
|
|
att_t2.setValue( TaskNamespace2 );
|
|
root.setAttributeNode( att_t2 );
|
|
|
|
// TODO: Insert the correct namespaces here:
|
|
// propertyTask1( TaskProp_UID );
|
|
propertyDAV( "creationdate" );
|
|
propertyDAV( "getlastmodified" );
|
|
propertyTask1( TaskProp_Owner );
|
|
propertyTask2( TaskProp_ContactNames );
|
|
propertyTask1( TaskProp_DtStart );
|
|
propertyTask1( TaskProp_DtDue );
|
|
propertyTask1( TaskProp_Duration );
|
|
propertyTask1( TaskProp_IsCompleted );
|
|
propertyTask1( TaskProp_PercentCompleted );
|
|
propertyTask1( TaskProp_CompletionDate );
|
|
propertyTask1( TaskProp_DoesRecur );
|
|
// What to do about recurrence rules?
|
|
propertyTask2( TaskProp_ReminderSet );
|
|
propertyTask2( TaskProp_ReminderTime );
|
|
propertyTask2( TaskProp_ReminderPlaySound );
|
|
propertyTask2( TaskProp_ReminderSoundFile );
|
|
propertyTask1( TaskProp_Status );
|
|
}
|
|
#undef propertyTask1
|
|
#undef propertyTask2
|
|
|
|
void ExchangeConverterCalendar::createRequestJournal( TQDomDocument &doc, TQDomElement &root )
|
|
{
|
|
createRequestIncidence( doc, root );
|
|
propertyDAV( "uid" );
|
|
propertyDAV( "creationdate" );
|
|
propertyDAV( "getlastmodified" );
|
|
}
|
|
#undef propertyDAV
|
|
#undef propertyNS
|
|
#undef propertyCalendar
|
|
#undef propertyHTTPMail
|
|
#undef propertyMailHeader
|
|
#undef property
|
|
|
|
bool ExchangeConverterCalendar::readTZ( const TQDomElement &node, Incidence */*incidence*/ )
|
|
{
|
|
TQString timezoneid;
|
|
if ( WebdavHandler::extractString( node, "timezoneid", timezoneid ) ) {
|
|
// kdDebug() << "DEBUG: timezoneid = " << timezoneid << endl;
|
|
}
|
|
|
|
TQString timezone;
|
|
if ( WebdavHandler::extractString( node, "timezone", timezone ) ) {
|
|
// kdDebug() << "DEBUG: timezone = " << timezone << endl;
|
|
}
|
|
|
|
// TODO:
|
|
/* // mFormat is used for parsing recurrence rules.
|
|
TQString localTimeZoneId;
|
|
if ( mCalendar ) {
|
|
mFormat.setTimeZone( mCalendar->timeZoneId(), !mCalendar->isLocalTime() );
|
|
localTimeZoneId = mCalendar->timeZoneId();
|
|
} else {
|
|
localTimeZoneId = "UTC";
|
|
// If no mCalendar, stay in UTC
|
|
}
|
|
*/
|
|
return true;
|
|
}
|
|
|
|
bool ExchangeConverterCalendar::readIncidence( const TQDomElement &node, Incidence *incidence )
|
|
{
|
|
kdDebug()<<"ExchangeConverterCalendar::readIncidencd"<<endl;
|
|
TQDateTime tmpdt;
|
|
bool tmpbool;
|
|
TQString tmpstr;
|
|
long tmplng;
|
|
TQStringList tmplst;
|
|
|
|
readTZ( node, incidence );
|
|
|
|
if ( WebdavHandler::extractString( node, "getetag", tmpstr ) )
|
|
incidence->setCustomProperty( "TDEPIM-Exchange-Resource", "fingerprint", tmpstr );
|
|
if ( WebdavHandler::extractString( node, "href", tmpstr ) )
|
|
incidence->setCustomProperty( "TDEPIM-Exchange-Resource", "href", tmpstr );
|
|
|
|
// FIXME: use repl-uid as scheduling id?
|
|
if ( WebdavHandler::extractString( node, "textdescription", tmpstr ) )
|
|
incidence->setDescription( tmpstr );
|
|
if ( WebdavHandler::extractString( node, "subject", tmpstr ) )
|
|
incidence->setSummary( tmpstr );
|
|
if ( WebdavHandler::extractStringList( node, "Keywords", tmplst ) )
|
|
incidence->setCategories( tmplst );
|
|
|
|
// Use "created" or "creationdate"?
|
|
if ( WebdavHandler::extractBool( node, "isreadonly" , tmpbool ) )
|
|
incidence->setReadOnly( tmpbool );
|
|
|
|
// FIXME: Ignore the comment for now
|
|
|
|
// Exchange sentitivity values:
|
|
// 0 None, 1 Personal, 2 Private, 3 Company Confidential
|
|
if ( WebdavHandler::extractLong( node, "sensitivity", tmplng ) ) {
|
|
switch( tmplng ) {
|
|
case 0: incidence->setSecrecy( KCal::Incidence::SecrecyPublic ); break;
|
|
case 1:
|
|
case 2: incidence->setSecrecy( KCal::Incidence::SecrecyPrivate ); break;
|
|
case 3: incidence->setSecrecy( KCal::Incidence::SecrecyConfidential ); break;
|
|
default: kdWarning() << "Unknown sensitivity: " << tmplng << endl;
|
|
}
|
|
}
|
|
|
|
if ( WebdavHandler::extractBool( node, "hasattachment", tmpbool ) && tmpbool ) {
|
|
// FIXME: Extract attachments...
|
|
}
|
|
|
|
if ( WebdavHandler::extractLong( node, "priority", tmplng ) )
|
|
incidence->setPriority( tmplng );
|
|
|
|
// FIXME: Use the urn:schemes:httpmail:date property for what?
|
|
|
|
// Organizer, required and optional Attendees:
|
|
if ( WebdavHandler::extractString( node, "from", tmpstr ) )
|
|
incidence->setOrganizer( tmpstr );
|
|
if ( WebdavHandler::extractString( node, "to", tmpstr ) ) {
|
|
TQStringList atts( KPIM::splitEmailAddrList( tmpstr ) );
|
|
for ( TQStringList::Iterator it = atts.begin(); it != atts.end(); ++it ) {
|
|
TQString name, email;
|
|
KPIM::getNameAndMail( *it, name, email );
|
|
Attendee *att = new Attendee( name, email );
|
|
att->setRole( KCal::Attendee::ReqParticipant );
|
|
// FIXME: Retrieve the other attendee properties somehow...
|
|
// urn:schemas:calendar:method
|
|
// urn:schemas:calendar:responserequested
|
|
// urn:schemas:calendar:meetingstatus
|
|
// urn:schemas:calendar:replytime
|
|
incidence->addAttendee( att );
|
|
}
|
|
}
|
|
if ( WebdavHandler::extractString( node, "cc", tmpstr ) ) {
|
|
TQStringList atts( KPIM::splitEmailAddrList( tmpstr ) );
|
|
for ( TQStringList::Iterator it = atts.begin(); it != atts.end(); ++it ) {
|
|
TQString name, email;
|
|
KPIM::getNameAndMail( *it, name, email );
|
|
Attendee *att = new Attendee( name, email );
|
|
att->setRole( KCal::Attendee::OptParticipant );
|
|
// FIXME: Retrieve the other attendee properties somehow...
|
|
// urn:schemas:calendar:method
|
|
// urn:schemas:calendar:responserequested
|
|
// urn:schemas:calendar:meetingstatus
|
|
// urn:schemas:calendar:replytime
|
|
incidence->addAttendee( att );
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/* FIXME: Handle recurrences
|
|
void ExchangeDownload::handleRecurrence( TQString uid )
|
|
{
|
|
// kdDebug() << "Handling recurrence info for uid=" << uid << endl;
|
|
TQString query =
|
|
"SELECT \"DAV:href\", \"urn:schemas:calendar:instancetype\"\r\n"
|
|
"FROM Scope('shallow traversal of \"\"')\r\n"
|
|
"WHERE \"urn:schemas:calendar:uid\" = '" + uid + "'\r\n"
|
|
" AND (\"urn:schemas:calendar:instancetype\" = 1)\r\n";
|
|
// " OR \"urn:schemas:calendar:instancetype\" = 3)\r\n" // FIXME: exception are not handled
|
|
|
|
// kdDebug() << "Exchange master query: " << endl << query << endl;
|
|
|
|
KIO::DavJob* job = KIO::davSearch( mAccount->calendarURL(), "DAV:", "sql",
|
|
query, false );
|
|
KIO::Scheduler::scheduleJob( job );
|
|
job->setWindow( mWindow );
|
|
connect( job, TQT_SIGNAL( result( KIO::Job * ) ),
|
|
TQT_SLOT( slotMasterResult( KIO::Job * ) ) );
|
|
}
|
|
*/
|
|
|
|
bool ExchangeConverterCalendar::readEvent( const TQDomElement &node, Event *event )
|
|
{
|
|
if ( !readIncidence( node, event ) ) return false;
|
|
kdDebug()<<"ExchangeConverterCalendar::readEvent"<<endl;
|
|
|
|
TQDateTime tmpdt;
|
|
TQString tmpstr;
|
|
long tmplng;
|
|
bool tmpbool;
|
|
|
|
// The UID is absolutely required!
|
|
if ( WebdavHandler::extractString( node, "uid", tmpstr ) ) {
|
|
event->setUid( tmpstr );
|
|
} else {
|
|
kdDebug()<<"ExchangeConverterCalendar::readIncidence: ERROR: No UID given"<<endl;
|
|
return false;
|
|
}
|
|
if ( WebdavHandler::extractDateTime( node, "created", tmpdt ) )
|
|
event->setCreated( WebdavHandler::utcAsZone( tmpdt, mFormat.timeZoneId() ) );
|
|
if ( WebdavHandler::extractDateTime( node, "lastmodified", tmpdt ) )
|
|
event->setLastModified( WebdavHandler::utcAsZone( tmpdt, mFormat.timeZoneId() ) );
|
|
// FIXME: Retrieve time zone: "timezone"
|
|
// FIXME: Use the "recurrenceid" prop for the recurrenceId of the event (which is protected!)
|
|
|
|
// FIXME: Retrieve MICROSOFT-CDO-* tags first
|
|
|
|
if ( WebdavHandler::extractLong( node, "sequence", tmplng ) )
|
|
event->setRevision( tmplng );
|
|
|
|
if ( WebdavHandler::extractString( node, "location", tmpstr ) )
|
|
event->setLocation( tmpstr );
|
|
|
|
// FIXME: Use "organizer" here instead of the From: person?
|
|
/* if ( WebdavHandler::extractString( node, "organizer", tmpstr ) )
|
|
incidence->setOrganizer( tmpstr );*/
|
|
|
|
if ( WebdavHandler::extractDateTime( node, "dtstart", tmpdt ) ) {
|
|
event->setDtStart( WebdavHandler::utcAsZone( tmpdt, mFormat.timeZoneId() ) );
|
|
}
|
|
|
|
bool allDay = false;
|
|
if ( WebdavHandler::extractBool( node, "alldayevent", allDay ) )
|
|
event->setFloats( allDay );
|
|
|
|
if ( WebdavHandler::extractLong( node, "duration", tmplng ) ) {
|
|
if (allDay)
|
|
tmplng--; // Otherwise event extends into next day
|
|
event->setDuration( tmplng );
|
|
// kdDebug() << "DURATION " << tmplng << "\n";
|
|
} else if ( WebdavHandler::extractDateTime( node, "dtend", tmpdt ) ) {
|
|
event->setDtEnd( WebdavHandler::utcAsZone( tmpdt, mFormat.timeZoneId() ) );
|
|
}
|
|
|
|
// FIXME: Here we have two different props for the same thing?!?!?
|
|
if ( WebdavHandler::extractLong( node, "transparent", tmplng ) )
|
|
event->setTransparency( tmplng>0 ? Event::Transparent : Event::Opaque );
|
|
if ( WebdavHandler::extractString( node, "busystatus", tmpstr ) ) {
|
|
if ( tmpstr == "FREE" )
|
|
event->setTransparency( KCal::Event::Transparent );
|
|
if ( tmpstr == "BUSY" )
|
|
event->setTransparency( KCal::Event::Opaque );
|
|
}
|
|
|
|
if ( WebdavHandler::extractLong( node, "reminderoffset", tmplng ) ) {
|
|
// Duration before event in seconds
|
|
KCal::Duration offset( -tmplng );
|
|
KCal::Alarm *alarm = event->newAlarm();
|
|
alarm->setStartOffset( offset );
|
|
alarm->setEnabled( true );
|
|
alarm->setType( KCal::Alarm::Display);
|
|
// TODO: multiple alarms;
|
|
}
|
|
|
|
|
|
if ( WebdavHandler::extractString( node, "rrule", tmpstr ) && !tmpstr.isEmpty() ) {
|
|
kdDebug() << "Got rrule: " << tmpstr << endl;
|
|
// Timezone should be handled automatically
|
|
// because we used mFormat.setTimeZone() earlier
|
|
// FIXME: Implement this using the format!
|
|
RecurrenceRule *rrule = event->recurrence()->defaultRRule( true );
|
|
if ( ! mFormat.fromString( rrule, tmpstr ) ) {
|
|
kdError() << "ERROR parsing rrule " << tmpstr << endl;
|
|
event->recurrence()->addRRule( rrule );
|
|
}
|
|
}
|
|
|
|
TQStringList tmplst;
|
|
if ( WebdavHandler::extractStringList( node, "exdate", tmplst ) ) {
|
|
TQStringList::Iterator it = tmplst.begin();
|
|
KCal::DateList exdates;
|
|
for ( ; it != tmplst.end(); ++it ) {
|
|
exdates.append( /*utcAsZone(*/ TQDateTime::fromString( *it, Qt::ISODate )/*,
|
|
localTimeZoneId )*/.date() );
|
|
}
|
|
event->recurrence()->setExDates( exdates );
|
|
}
|
|
// FIXME: use rdate and exrule!
|
|
/* FIXME: Recurring events, they are split up
|
|
TQDomElement instancetypeElement = prop.namedItem( "instancetype" ).toElement();
|
|
if ( instancetypeElement.isNull() ) {
|
|
kdError() << "Error: no instance type in Exchange server reply" << endl;
|
|
continue;
|
|
}
|
|
int instanceType = instancetypeElement.text().toInt();
|
|
//kdDebug() << "Instance type: " << instanceType << endl;
|
|
|
|
if ( recurrence && instanceType > 0 ) {
|
|
TQDomElement uidElement = prop.namedItem( "uid" ).toElement();
|
|
if ( uidElement.isNull() ) {
|
|
kdError() << "Error: no uid in Exchange server reply" << endl;
|
|
continue;
|
|
}
|
|
TQString uid = uidElement.text();
|
|
if ( ! m_uids.contains( uid ) ) {
|
|
m_uids[uid] = 1;
|
|
handleRecurrence(uid);
|
|
successCount++;
|
|
}
|
|
continue;
|
|
}
|
|
*/
|
|
|
|
|
|
// FIXME: read the resources from the "resources" tag
|
|
|
|
// FIXME: Custom fields not yet implemented
|
|
return true;
|
|
}
|
|
|
|
bool ExchangeConverterCalendar::readTodo( const TQDomElement &node, Todo *todo )
|
|
{
|
|
if ( !readIncidence( node, todo ) ) return false;
|
|
kdDebug()<<"ExchangeConverterCalendar::readTodo"<<endl;
|
|
|
|
// FIXME: Retrieve time zone: "timezone"
|
|
// FIXME: What to with TaskProp_Owner and TaskProp_ContactNames?
|
|
|
|
TQDateTime tmpdt;
|
|
float tmpfloat;
|
|
long tmplong;
|
|
bool tmpbool;
|
|
TQString tmpstr;
|
|
|
|
// The UID is absolutely required!
|
|
// FIXME: Which field shall be used as uid???
|
|
/* if ( WebdavHandler::extractString( node, "uid", tmpstr ) ) {
|
|
todo->setUid( tmpstr );
|
|
} else {
|
|
kdDebug()<<"ExchangeConverterCalendar::readIncidence: ERROR: No UID given"<<endl;
|
|
return false;
|
|
}*/
|
|
// if ( WebdavHandler::extractDateTime( node, "created", tmpdt ) )
|
|
/* FIXME: creation and last modification dates:
|
|
if ( WebdavHandler::extractDateTime( node, "creationdate", tmpdt ) )
|
|
incidence->setCreated( tmpdt );
|
|
if ( WebdavHandler::extractDateTime( node, "getlastmodified", tmpdt ) )
|
|
incidence->setLastModified( tmpdt );*/
|
|
|
|
if ( WebdavHandler::extractDateTime( node, TaskProp_DtStart, tmpdt ) )
|
|
todo->setDtStart( WebdavHandler::utcAsZone( tmpdt, mFormat.timeZoneId() ) );
|
|
if ( WebdavHandler::extractDateTime( node, TaskProp_DtDue, tmpdt ) )
|
|
todo->setDtDue( WebdavHandler::utcAsZone( tmpdt, mFormat.timeZoneId() ) );
|
|
if ( WebdavHandler::extractLong( node, TaskProp_Duration, tmplong ) )
|
|
todo->setDuration( tmplong );
|
|
|
|
if ( WebdavHandler::extractBool( node, TaskProp_IsCompleted, tmpbool ) && tmpbool ) {
|
|
todo->setCompleted( tmpbool );
|
|
if ( tmpbool && WebdavHandler::extractDateTime( node, TaskProp_CompletionDate, tmpdt ) ) {
|
|
todo->setCompleted( WebdavHandler::utcAsZone( tmpdt, mFormat.timeZoneId() ) );
|
|
}
|
|
}
|
|
if ( WebdavHandler::extractFloat( node, TaskProp_PercentCompleted, tmpfloat ) )
|
|
todo->setPercentComplete( (int)(tmpfloat*100) );
|
|
|
|
// FIXME: Recurrence, using TaskProp_DoesRecur
|
|
// What to do about recurrence rules?
|
|
|
|
// FIXME: Reminders, use TaskProp_ReminderSet, TaskProp_ReminderTime,
|
|
// TaskProp_ReminderPlaySound, TaskProp_ReminderSoundFile, TaskProp_Status
|
|
// But how do I get the offset?
|
|
|
|
return true;
|
|
}
|
|
|
|
bool ExchangeConverterCalendar::readJournal( const TQDomElement &node, Journal *journal )
|
|
{
|
|
if ( !readIncidence( node, journal ) ) return false;
|
|
kdDebug()<<"ExchangeConverterCalendar::readJournal"<<endl;
|
|
TQDateTime tmpdt;
|
|
TQString tmpstr;
|
|
// The UID is absolutely required!
|
|
// FIXME: Which field shall be used as UID?
|
|
if ( WebdavHandler::extractString( node, "uid", tmpstr ) ) {
|
|
journal->setUid( tmpstr );
|
|
} else {
|
|
kdDebug()<<"ExchangeConverterCalendar::readJournal: ERROR: No UID given"<<endl;
|
|
return false;
|
|
}
|
|
/* FIXME: creation and last modification times:
|
|
if ( WebdavHandler::extractDateTime( node, "created", tmpdt ) )
|
|
incidence->setCreated( tmpdt );
|
|
if ( WebdavHandler::extractDateTime( node, "lastmodified", tmpdt ) )
|
|
incidence->setLastModified( tmpdt );*/
|
|
|
|
if ( WebdavHandler::extractDateTime( node, "date", tmpdt ) )
|
|
journal->setDtStart( tmpdt );
|
|
return true;
|
|
}
|
|
|
|
Incidence::List ExchangeConverterCalendar::parseWebDAV( const TQDomDocument& davdata )
|
|
{
|
|
TQDomElement prop = davdata.documentElement().namedItem( "response" )
|
|
.namedItem( "propstat" ).namedItem( "prop" ).toElement();
|
|
if ( prop.isNull() ) return Incidence::List();
|
|
|
|
TQString contentclass;
|
|
bool success = WebdavHandler::extractString( prop, "contentclass", contentclass );
|
|
if ( !success ) return Incidence::List();
|
|
|
|
Incidence *incidence = 0;
|
|
success = false;
|
|
if ( contentclass == "urn:content-classes:appointment" ) {
|
|
Event *event = new Event();
|
|
success = readEvent( prop, event );
|
|
incidence = event;
|
|
} else if ( contentclass == "urn:content-classes:task" ) {
|
|
Todo *todo = new Todo();
|
|
success = readTodo( prop, todo );
|
|
incidence = todo;
|
|
} else if ( contentclass == "urn:content-classes:journal" ||
|
|
contentclass == "urn:content-classes:message" ) {
|
|
Journal *journal = new Journal();
|
|
success = readJournal( prop, journal );
|
|
incidence = journal;
|
|
}
|
|
|
|
Incidence::List list;
|
|
if ( success ) {
|
|
list.append( incidence );
|
|
}
|
|
return list;
|
|
}
|
|
|
|
|
|
#define domDavProperty( name, value ) \
|
|
WebdavHandler::addElement( mDoc, mElement, "d:"name, value )
|
|
#define domProperty( NS, name, value ) \
|
|
WebdavHandler::addElementNS( mDoc, mElement, NS, name, value )
|
|
#define domCalendarProperty( name, value ) \
|
|
WebdavHandler::addElement( mDoc, mElement, "c:"name, value )
|
|
#define domHTTPMailProperty( name, value ) \
|
|
WebdavHandler::addElement( mDoc, mElement, "m:"name, value )
|
|
#define domMailHeaderProperty( name, value ) \
|
|
WebdavHandler::addElement( mDoc, mElement, "h:"name, value )
|
|
|
|
|
|
|
|
|
|
class ExchangeConverterCalendar::createWebDAVVisitor : public IncidenceBase::Visitor
|
|
{
|
|
public:
|
|
createWebDAVVisitor() : Visitor() {}
|
|
bool act( TQDomDocument doc, TQDomElement el, IncidenceBase *incidence, const TQString &timeZoneId )
|
|
{
|
|
mDoc = doc;
|
|
mElement = el;
|
|
mTimeZoneId = timeZoneId;
|
|
return incidence->accept( *this );
|
|
}
|
|
protected:
|
|
void addBoolProp( TQDomElement &el ) { el.setAttribute( "b:dt", "boolean" ); }
|
|
void addDateProp( TQDomElement &el ) { el.setAttribute( "b:dt", "dateTime.tz" ); }
|
|
void addFloatProp( TQDomElement &el ) { el.setAttribute( "b:dt", "float" ); }
|
|
void addIntProp( TQDomElement &el ) { el.setAttribute( "b:dt", "int" ); }
|
|
TQString timePropString( const TQDateTime &dt ) { return dt.toString( Qt::ISODate )+"Z"; }
|
|
|
|
bool visitIncidence( Incidence *incidence )
|
|
{
|
|
TQString tmpstr;
|
|
domDavProperty( "isreadonly", (incidence->isReadOnly())?"1":"0" );
|
|
// FIXME: scheduling ID
|
|
// domProperty( "http://schemas.microsoft.com/repl/", "repl-uid", ??? );
|
|
domHTTPMailProperty( "subject", incidence->summary() );
|
|
domHTTPMailProperty( "textdescription", incidence->description() );
|
|
// FIXME: timestampt, comments and categories
|
|
// domHTTPMailProperty( "date", ??? ); // timestamp not available in libkcal
|
|
// domDavProperty( "comment", incidence->comments() ); // libkcal has a TQStringlist, not one string
|
|
// domProperty( "urn:schemas-microsoft-com:office:office", "Keywords", ??? ); // It's a <v>entyr1</v><v>entry2</v> String list!
|
|
tmpstr = TQString();
|
|
switch ( incidence->secrecy() ) {
|
|
case KCal::Incidence::SecrecyPublic: tmpstr = "0"; break;
|
|
case KCal::Incidence::SecrecyPrivate: tmpstr = "2"; break;
|
|
case KCal::Incidence::SecrecyConfidential: tmpstr = "3"; break;
|
|
default: break;
|
|
}
|
|
if ( !tmpstr.isEmpty() )
|
|
domProperty( "http://schemas.microsoft.com/exchange/", "sensitivity", tmpstr );
|
|
|
|
domHTTPMailProperty( "priority", TQString::number(incidence->priority()) );
|
|
|
|
domMailHeaderProperty( "from", incidence->organizer().fullName() );
|
|
|
|
// Attendees:
|
|
tmpstr = TQString();
|
|
TQStringList reqattnames;
|
|
TQStringList optattnames;
|
|
Attendee::List atts = incidence->attendees();
|
|
for ( Attendee::List::Iterator it = atts.begin(); it != atts.end(); ++it ) {
|
|
switch ( (*it)->role() ) {
|
|
case KCal::Attendee::Chair:
|
|
case KCal::Attendee::ReqParticipant:
|
|
reqattnames << (*it)->fullName();
|
|
break;
|
|
case KCal::Attendee::OptParticipant:
|
|
case KCal::Attendee::NonParticipant:
|
|
optattnames << (*it)->fullName();
|
|
break;
|
|
default: break;
|
|
}
|
|
}
|
|
|
|
domMailHeaderProperty( "to", reqattnames.join(", ") );
|
|
|
|
domMailHeaderProperty( "cc", optattnames.join(", ") );
|
|
|
|
// FIXME: Attachments: propertyHTTPMail( "hasattachment" );
|
|
|
|
return true;
|
|
}
|
|
bool visit( Event *event )
|
|
{
|
|
if ( !visitIncidence(event) ) return false;
|
|
|
|
TQDomAttr att_c = mDoc.createAttribute( "xmlns:c" );
|
|
att_c.setValue( "urn:schemas:calendar:" );
|
|
mDoc.documentElement().setAttributeNode( att_c );
|
|
|
|
domDavProperty( "contentclass", "urn:content-classes:appointment" );
|
|
domProperty( "http://schemas.microsoft.com/exchange/",
|
|
"outlookmessageclass", "IPM.Appointment" );
|
|
domCalendarProperty( "uid", event->uid() );
|
|
TQDomElement el = domCalendarProperty( "created", timePropString( WebdavHandler::zoneAsUtc( event->created(), mTimeZoneId ) ) );
|
|
addDateProp( el );
|
|
el = domCalendarProperty( "lastmodified", timePropString( WebdavHandler::zoneAsUtc( event->lastModified(), mTimeZoneId ) ) );
|
|
addDateProp( el );
|
|
// FIXME: domCalendarProperty( "dtstamp", ??);
|
|
// FIXME: domCalendarProperty( "sequence", event->sequence() );
|
|
domCalendarProperty( "location", event->location() );
|
|
|
|
TQString tmpstr;
|
|
switch ( event->transparency() ) {
|
|
case KCal::Event::Transparent: tmpstr = "FREE"; break;
|
|
case KCal::Event::Opaque: tmpstr = "BUSY"; break;
|
|
}
|
|
if ( !tmpstr.isEmpty() )
|
|
domCalendarProperty( "busystatus", tmpstr );
|
|
// FIXME: What do do with the "transparent" property?
|
|
// FIXME: Use the "timezone" property...
|
|
domCalendarProperty( "alldayevent", event->doesFloat()?"1":"0" );
|
|
el = domCalendarProperty( "dtstart", timePropString( WebdavHandler::zoneAsUtc( event->dtStart(), mTimeZoneId ) ) );
|
|
addDateProp( el );
|
|
if ( event->hasEndDate() ) {
|
|
el = domCalendarProperty( "dtend", timePropString( WebdavHandler::zoneAsUtc( event->dtEnd(), mTimeZoneId ) ) );
|
|
addDateProp( el );
|
|
} else {
|
|
domCalendarProperty( "duration", TQString::number( event->duration() ) );
|
|
}
|
|
// FIXME: Convert the recurrence rule to a string:
|
|
if ( event->doesRecur() ) {
|
|
// tmpstr = event->recurrence().....
|
|
// domCalendarProperty( "rrule", tmpstr );
|
|
// FIXME: Use "rdate" and "exrule"
|
|
// FIXME: Use "exdate", what's the syntax?
|
|
// FIXME: use the "instancetype" property
|
|
}
|
|
// FIXME: RecurrenceID is protected!
|
|
// domCalendarProperty( "recurrenceid", event->recurrenceId() );
|
|
// FIXME: "reminderoffset"
|
|
// FIXME: "resources" Alarm::List alarms = event->alarms();
|
|
|
|
Alarm::List::ConstIterator it;
|
|
Alarm::List alarms = event->alarms();
|
|
for( it = alarms.begin(); it != alarms.end(); ++it ) {
|
|
if ((*it)->hasStartOffset()) {
|
|
domCalendarProperty( "reminderoffset", TQString::number( (*it)->startOffset().asSeconds() * -1 ) );
|
|
} else {
|
|
kdDebug() << "ExchangeConverterCalendar::createWebDAVVisitor: Alarm type not supported\n";
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
bool visit( Todo *todo )
|
|
{
|
|
if ( !visitIncidence(todo) ) return false;
|
|
|
|
TQDomAttr att_t1 = mDoc.createAttribute( "xmlns:t1" );
|
|
att_t1.setValue( TaskNamespace1 );
|
|
mDoc.documentElement().setAttributeNode( att_t1 );
|
|
|
|
TQDomAttr att_t2 = mDoc.createAttribute( "xmlns:t2" );
|
|
att_t2.setValue( TaskNamespace2 );
|
|
mDoc.documentElement().setAttributeNode( att_t2 );
|
|
|
|
|
|
domDavProperty( "contentclass", "urn:content-classes:task" );
|
|
domProperty( "http://schemas.microsoft.com/exchange/",
|
|
"outlookmessageclass", "IPM.Task" );
|
|
|
|
/* FIXME:
|
|
domCalendarProperty( "uid", todo->uid() );
|
|
domCalendarProperty( "created", todo->created().toString( Qt::ISODate ) );
|
|
domCalendarProperty( "lastmodified", todo->lastModified().toString( Qt::ISODate ) );*/
|
|
// TODO
|
|
/*propertyTask1( TaskProp_Owner );
|
|
propertyTask2( TaskProp_ContactNames );
|
|
propertyTask1( TaskProp_DtStart );
|
|
propertyTask1( TaskProp_DtDue );
|
|
propertyTask1( TaskProp_Duration );
|
|
propertyTask1( TaskProp_IsCompleted );
|
|
propertyTask1( TaskProp_PercentCompleted );
|
|
propertyTask1( TaskProp_CompetionDate );
|
|
propertyTask1( TaskProp_DoesRecur );
|
|
// What to do about recurrence rules?
|
|
propertyTask2( TaskProp_ReminderSet );
|
|
propertyTask2( TaskProp_ReminderTime );
|
|
propertyTask2( TaskProp_ReminderPlaySound );
|
|
propertyTask2( TaskProp_ReminderSoundFile );
|
|
propertyTask1( TaskProp_Status );*/
|
|
return true;
|
|
}
|
|
bool visit( Journal *journal )
|
|
{
|
|
if ( !visitIncidence(journal) ) return false;
|
|
domDavProperty( "contentclass", "urn:content-classes:journal" );
|
|
domProperty( "http://schemas.microsoft.com/exchange/",
|
|
"outlookmessageclass", "IPM.Journal" );
|
|
/* FIXME:
|
|
domCalendarProperty( "uid", todo->uid() );
|
|
domCalendarProperty( "created", todo->created().toString( Qt::ISODate ) );
|
|
domCalendarProperty( "lastmodified", todo->lastModified().toString( Qt::ISODate ) );*/
|
|
// TODO
|
|
return true;
|
|
}
|
|
|
|
protected:
|
|
TQDomDocument mDoc;
|
|
TQDomElement mElement;
|
|
TQString mTimeZoneId;
|
|
};
|
|
|
|
// Prefixes for the namespaces:
|
|
// d... DAV:
|
|
// b... urn:schemas-microsoft-com:datatypes
|
|
// c... calendar
|
|
// m... httpmail
|
|
// h... httpheader
|
|
// p... mapi
|
|
// o... office
|
|
//
|
|
|
|
TQDomDocument ExchangeConverterCalendar::createWebDAV( Incidence *incidence )
|
|
{
|
|
// TODO
|
|
TQDomDocument doc;
|
|
TQDomElement root = WebdavHandler::addDavElement( doc, doc, "d:propertyupdate" );
|
|
TQDomElement set = WebdavHandler::addElement( doc, root, "d:set" );
|
|
TQDomElement prop = WebdavHandler::addElement( doc, set, "d:prop" );
|
|
|
|
TQDomAttr att_b = doc.createAttribute( "xmlns:b" );
|
|
att_b.setValue( "urn:schemas-microsoft-com:datatypes" );
|
|
root.setAttributeNode( att_b );
|
|
|
|
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 );
|
|
|
|
// TQDomAttr att1 = doc.createAttributeNS( "do:whatever:you:like", "x:attname");
|
|
// att1.setValue( "value" );
|
|
// prop.setAttributeNodeNS( att1 );
|
|
// root.setAttributeNodeNS( att1 );
|
|
// set.setAttributeNode( att1 );
|
|
// // prop.setAttributeNS ( "xmlns:b", "xmlns:b", "urn:schemas-microsoft-com:datatypes" );
|
|
|
|
ExchangeConverterCalendar::createWebDAVVisitor v;
|
|
v.act( doc, prop, incidence, mFormat.timeZoneId() );
|
|
kdDebug() << "ExchangeConverterCalendar::createWebDAVVisitor=" << doc.toString() << "\n";
|
|
|
|
return doc;
|
|
}
|
|
#undef domDavProperty
|
|
#undef domProperty
|
|
#undef domCalendarProperty
|
|
#undef domHTTPMailProperty
|
|
#undef domMailHeaderProperty
|