void convert_and_back()
{
dt = QDateTime( QDate(2007, 1, 1), QTime(13, 0, 0) );
date = qdatetime_to_date( dt );
QDateTime back = date_to_qdatetime( date );
QVERIFY( dt == back );
}
void check_sentinel()
{
date = 949998;
dt = date_to_qdatetime( date );
QVERIFY( dt == QDateTime() );
double back = qdatetime_to_date( dt );
QVERIFY( date == back );
}
void getProperties( IDispatchPtr dispatch, QString &entryid, QDateTime &lastModified )
{
TRACE(OutlookSyncPlugin) << "OutlookTodoSync::getProperties";
Outlook::_TaskItemPtr item( dispatch );
try {
entryid = bstr_to_qstring(item->GetEntryID());
} catch (...) {
entryid = QString();
return;
}
lastModified = date_to_qdatetime(item->GetLastModificationTime());
}
void dump_item( const Outlook::_AppointmentItemPtr &item, QXmlStreamWriter &stream, bool dump_exception )
{
TRACE(OutlookSyncPlugin) << "OutlookDatebookSync::dump_item";
Outlook::OlRecurrenceState recstate = item->GetRecurrenceState();
if ( recstate == Outlook::olApptOccurrence ) {
WARNING() << "Cannot sync occurrences!";
return;
}
if ( (dump_exception && recstate != Outlook::olApptException) ||
(!dump_exception && recstate == Outlook::olApptException) ) {
WARNING() << "Found" << (recstate == Outlook::olApptException?"Exception":"non-Exception")
<< "when syncing" << (dump_exception?"Exceptions":"non-Exceptions");
return;
}
Outlook::UserPropertiesPtr props = item->GetUserProperties();
Q_ASSERT(props);
PREPARE_MAPI_DATEBOOK(Appointment, dump_exception);
stream.writeStartElement("Appointment");
DUMP_STRING(Identifier,EntryID);
DUMP_STRING(Description,Subject);
DUMP_STRING(Location,Location);
QString timezone;
{
Outlook::UserPropertyPtr up = props->Find("Qtopia Timezone");
if ( up ) {
timezone = variant_to_qstring(up->GetValue());
}
}
DUMP_EXPR(TimeZone,timezone);
stream.writeStartElement("When");
if ( item->GetAllDayEvent() ) {
DUMP_DATE(StartDate,Start);
// We can't just dump the end date because Outlook does it differently to Qtopia.
// Qtopia expects something like "starts 7/10/08, ends 7/10/08" but Outlook
// has given us "starts 7/10/08 00:00:00, ends 8/10/08 00:00:00".
// Simply remove one day from the end date to get something Qtopia won't barf over.
QDate dt = date_to_qdatetime(item->GetEnd()).date();
dt = dt.addDays(-1);
DUMP_EXPR(EndDate,escape(dateToString(dt)));
} else {
QDateTime dt = date_to_qdatetime(item->GetStart());
bool utc = !timezone.isEmpty();
if ( utc )
dt = dt.toUTC();
DUMP_EXPR(Start,escape(dateTimeToString(dt, utc)));
dt = date_to_qdatetime(item->GetEnd());
if ( utc )
dt = dt.toUTC();
DUMP_EXPR(End,escape(dateTimeToString(dt, utc)));
}
stream.writeEndElement();
stream.writeStartElement("Alarm");
if ( item->GetReminderSet() ) {
DUMP_EXPR(Type,item->GetReminderPlaySound()?"Audible":"Visible");
DUMP_INT(Delay,ReminderMinutesBeforeStart);
}
stream.writeEndElement();
if ( !dump_exception ) {
stream.writeStartElement("Repeat");
if ( recstate != Outlook::olApptNotRecurring && item->GetIsRecurring() ) {
Q_ASSERT(recstate == Outlook::olApptMaster);
Outlook::RecurrencePatternPtr recpat = item->GetRecurrencePattern();
Q_ASSERT(recpat);
Outlook::OlRecurrenceType rectype = recpat->GetRecurrenceType();
LOG() << "recpat->RecurrenceType" << rectype;
QString type;
if ( rectype == Outlook::olRecursDaily && !recpat->GetDayOfWeekMask() )
type = "Daily";
else if ( ( rectype == Outlook::olRecursDaily && recpat->GetDayOfWeekMask() ) || rectype == Outlook::olRecursWeekly )
type = "Weekly";
else if ( rectype == Outlook::olRecursMonthly )
type = "MonthlyDate";
else if ( ( rectype == Outlook::olRecursMonthNth || rectype == Outlook::olRecursYearNth ) && recpat->GetInstance() != 5 )
type = "MonthlyDay";
else if ( ( rectype == Outlook::olRecursMonthNth || rectype == Outlook::olRecursYearNth ) && recpat->GetInstance() == 5 )
type = "MonthlyEndDay";
else if ( rectype == Outlook::olRecursYearly )
type = "Yearly";
Q_ASSERT(!type.isEmpty());
LOG() << "Type" << type << "Instance" << recpat->GetInstance();
stream.writeStartElement("Type");
stream.writeCharacters(type);
stream.writeEndElement();
int frequency = recpat->GetInterval();
LOG() << "recpat->GetInterval" << frequency;
if ( rectype == Outlook::olRecursDaily && recpat->GetDayOfWeekMask() )
frequency = 1;
stream.writeStartElement("Frequency");
stream.writeCharacters(QString::number(frequency));
stream.writeEndElement();
stream.writeStartElement("Until");
if ( !recpat->GetNoEndDate() ) {
LOG() << "recpat->GetPatternEndDate" << date_to_qdatetime(recpat->GetPatternEndDate()).date();
stream.writeCharacters(dateToString(date_to_qdatetime(recpat->GetPatternEndDate()).date()));
}
stream.writeEndElement();
if ( type == "Weekly" || type == "MonthlyDay" || type == "MonthlyEndDay" ) {
stream.writeStartElement("WeekMask");
if ( recpat->GetDayOfWeekMask() ) {
int mask = recpat->GetDayOfWeekMask();
LOG() << "recpat->GetDayOfWeekMask" << mask;
QStringList list;
if ( mask & Outlook::olMonday )
list << "Monday";
if ( mask & Outlook::olTuesday )
list << "Tuesday";
if ( mask & Outlook::olWednesday )
list << "Wednesday";
if ( mask & Outlook::olThursday )
list << "Thursday";
if ( mask & Outlook::olFriday )
list << "Friday";
if ( mask & Outlook::olSaturday )
list << "Saturday";
if ( mask & Outlook::olSunday )
list << "Sunday";
stream.writeCharacters(list.join(" "));
} else {
LOG() << "recpat->GetDayOfWeekMask" << 0;
}
stream.writeEndElement();
}
Outlook::ExceptionsPtr exceptions = recpat->GetExceptions();
if ( exceptions ) {
int expcount = exceptions->GetCount();
for ( int i = 0; i < expcount; i++ ) {
stream.writeStartElement("Exception");
long item_to_get = i+1;
Outlook::ExceptionPtr exception = exceptions->Item(item_to_get);
Q_ASSERT(exception);
DUMP_DATE_ITEM(OriginalDate,OriginalDate,exception);
if ( !exception->GetDeleted() ) {
Outlook::_AppointmentItemPtr exceptionItem = exception->GetAppointmentItem();
dump_item( exceptionItem, stream, true );
}
stream.writeEndElement();
}
}
}
stream.writeEndElement();
}
DUMP_MAPI(Notes,Body);
stream.writeStartElement("Categories");
foreach ( const QString &category, bstr_to_qstring(item->GetCategories()).split(", ", QString::SkipEmptyParts) )
DUMP_EXPR(Category,category);
stream.writeEndElement();
stream.writeEndElement();
}
QString read_item( const Outlook::_AppointmentItemPtr &item, QXmlStreamReader &reader, bool dump_exception )
{
TRACE(OutlookSyncPlugin) << "OutlookDatebookSync::read_item";
Outlook::UserPropertiesPtr props = item->GetUserProperties();
Q_ASSERT(props);
// We need to clear the recurrence pattern now or we will fail to update recurring events
if ( !dump_exception )
item->ClearRecurrencePattern();
enum State {
Idle, When, Alarm, Repeat, Exception, Categories
};
State state = Idle;
Outlook::RecurrencePatternPtr recpat = 0;
QString key;
QXmlStreamAttributes attributes;
QString value;
QStringList categories;
bool utc = false;
bool allday = false;
while (!reader.atEnd()) {
bool loop = true;
switch(reader.readNext()) {
case QXmlStreamReader::StartElement:
key = reader.qualifiedName().toString();
value = QString();
attributes = reader.attributes();
if ( key == "When" )
state = When;
if ( state == When && key == "StartDate" ) {
allday = true;
}
if ( state == When && key == "Start" ) {
allday = false;
}
if ( key == "Alarm" ) {
state = Alarm;
LOG() << "item->PutReminderSet" << false;
item->PutReminderSet( false );
}
if ( state == Alarm && key == "Type" || key == "Delay" ) {
// Outlook only wants to see alarms set on events in the future
// If we sync an event in the past with an alarm it will go off
// immediately, something that can be annoying when you do an
// initial sync with lots of events with alarms.
if ( date_to_qdatetime(item->GetStart()) > QDateTime::currentDateTime() ) {
LOG() << "item->PutReminderSet" << true;
item->PutReminderSet( true );
}
}
if ( !dump_exception ) {
if ( key == "Repeat" ) {
state = Repeat;
}
if ( state == Repeat && key == "Type" ) {
recpat = item->GetRecurrencePattern();
recpat->PutPatternStartDate( item->GetStart() );
}
if ( state == Repeat && key == "Exception" ) {
state = Exception;
}
}
if ( key == "Categories" )
state = Categories;
break;
case QXmlStreamReader::Characters:
value += reader.text().toString();
break;
case QXmlStreamReader::EndElement:
key = reader.qualifiedName().toString();
//LOG() << "key" << key << "value" << value;
READ_STRING(Description,Subject);
READ_STRING(Location,Location);
if ( key == "TimeZone" ) {
utc = ( !value.isEmpty() );
}
if ( state == When ) {
if ( allday ) {
item->PutAllDayEvent( true );
READ_DATE(StartDate,Start);
// We can't just read the end date because Outlook does it differently to Qtopia.
// Qtopia gives us something like "starts 7/10/08, ends 7/10/08" but Outlook
// expects "starts 7/10/08 00:00:00, ends 8/10/08 00:00:00".
// Simply add one day to the end date to get something Outlook won't barf over.
if ( key == "EndDate" ) {
QDate dt = stringToDate(value);
QDateTime actual( dt.addDays(1), QTime(0,0,0) );
LOG() << "item->PutEnd" << actual;
item->PutEnd( qdatetime_to_date(actual) );
}
} else {
item->PutAllDayEvent( false );
if ( key == "Start" ) {
QDateTime dt = stringToDateTime(value, utc);
if ( utc ) {
dt.setTimeSpec( Qt::UTC );
dt = dt.toLocalTime();
}
LOG() << "item->PutStart" << dt;
item->PutStart( qdatetime_to_date(dt) );
}
if ( key == "End" ) {
QDateTime dt = stringToDateTime(value, utc);
if ( utc ) {
dt.setTimeSpec( Qt::UTC );
dt = dt.toLocalTime();
}
LOG() << "item->PutEnd" << dt;
item->PutEnd( qdatetime_to_date(dt) );
}
}
if ( key == "When" )
state = Idle;
}
if ( state == Alarm ) {
READ_ENUM(Type,ReminderPlaySound,true,Audible);
READ_ENUM(Type,ReminderPlaySound,false,Visible);
READ_INT(Delay,ReminderMinutesBeforeStart);
if ( key == "Alarm" )
state = Idle;
}
if ( dump_exception == false && state == Repeat ) {
READ_ENUM_ITEM(Type,RecurrenceType,Outlook::olRecursDaily,Daily,recpat);
READ_ENUM_ITEM(Type,RecurrenceType,Outlook::olRecursWeekly,Weekly,recpat);
READ_ENUM_ITEM(Type,RecurrenceType,Outlook::olRecursMonthly,MonthlyDate,recpat);
READ_ENUM_ITEM(Type,RecurrenceType,Outlook::olRecursMonthNth,MonthlyDay,recpat);
READ_ENUM_ITEM(Type,RecurrenceType,Outlook::olRecursMonthNth,MonthlyEndDay,recpat);
READ_ENUM_ITEM(Type,RecurrenceType,Outlook::olRecursYearly,Yearly,recpat);
if ( key == "Type" ) {
if ( value == "MonthlyEndDay" ) {
LOG() << "recpat->PutInstance" << 5;
recpat->PutInstance( 5 );
}
}
if ( key == "Frequency" ) {
int interval = QVariant(value).toInt();
if ( interval >= 12 && interval % 12 == 0 ) {
// since interval is bigger than 12 yet divisible by 12 this is more
// likely to be a YearNth which Qtopia Sync Agent sends down as a
// MonthNth with interval *= 12
recpat->PutRecurrenceType( Outlook::olRecursYearNth );
}
LOG() << "recpat->PutInterval" << interval;
recpat->PutInterval( interval );
}
if ( key == "Until" ) {
if ( value.isEmpty() ) {
LOG() << "recpat->PutNoEndDate" << true;
recpat->PutNoEndDate( true );
} else {
LOG() << "recpat->PutPatternEndDate" << QDateTime( stringToDate(value), QTime(0,0,0) );
recpat->PutPatternEndDate( qdatetime_to_date(QDateTime( stringToDate(value), QTime(0,0,0) )) );
}
}
// Outlook doesn't seem to support Nearest == false (so ignore it)
if ( key == "WeekMask" ) {
int mask = 0;
foreach( const QString &v, value.split(" ") ) {
if ( v == "Monday" ) mask |= Outlook::olMonday;
else if ( v == "Tuesday" ) mask |= Outlook::olTuesday;
else if ( v == "Wednesday" ) mask |= Outlook::olWednesday;
else if ( v == "Thursday" ) mask |= Outlook::olThursday;
else if ( v == "Friday" ) mask |= Outlook::olFriday;
else if ( v == "Saturday" ) mask |= Outlook::olSaturday;
else if ( v == "Sunday" ) mask |= Outlook::olSunday;
}
LOG() << "recpat->PutDayOfWeekMask" << mask;
recpat->PutDayOfWeekMask( (Outlook::OlDaysOfWeek)mask );
}
if ( key == "Repeat" )
state = Idle;
}
if ( dump_exception == false && state == Exception ) {
if ( key == "OriginalDate" ) {
QDate exceptionDate = stringToDate(value);
Outlook::_AppointmentItemPtr eitem = recpat->GetOccurrence( qdatetime_to_date(QDateTime( exceptionDate, QTime(0,0,0) )) );
QString entryid = read_item( eitem, reader, true );
if ( entryid.isEmpty() )
state = Repeat; // the delete case eats the closing Exception tag
}
if ( key == "Exception" ) {
state = Repeat;
}
}
READ_STRING(Notes,Body);
if ( state == Categories ) {
if ( key == "Category" )
categories << value;
if ( key == "Categories" ) {
LOG() << "item->PutCategories" << categories;
item->PutCategories( qstring_to_bstr(categories.join(", ")) );
state = Idle;
}
}
READ_CUSTOM(TimeZone,Qtopia Timezone);
if ( dump_exception && key == "Appointment" )
loop = false;
if ( dump_exception && key == "Exception" ) {
// Oops... no Appointment tag in an Exception tag
// That means we need to delete the existing exception
item->Delete();
return QString();
}
}
