crt0mega
/
ic35link
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
ic35link/src/datavca.c

1356 lines
43 KiB
C
Raw Blame History

/************************************************************************
* Copyright (C) 2000 Thomas Schulz *
* */
static char rcsid[] =
"$Id: datavca.c,v 1.46 2001/03/02 02:09:59 tsch Rel $"; /*
* *
* IC35 synchronize data import/export: vCard,vCalendar format *
* *
*************************************************************************
* *
* ??? is "fixme" mark: sections of code needing fixes *
* *
* rev_dtime yyyy-mm-ddThh:mm:ss for VCARRD *
* mod_dtime yyyymmddThhmmss for VEVENT,VTODO,memo *
* IC35 records to/from vCard,vCalendar *
* ic35addr_to_vcard
* vcard_to_ic35addr
* ic35sched_to_vevent
* vevent_to_ic35sched
* ic35todo_to_vtodo
* vtodo_to_ic35todo
* ic35memo_to_vmemo
* vmemo_to_ic35memo
* vCard,vCal access functions *
* _vca_prodid local: vCal program korganizer,gnomecal
* _vca_rewind local: rewind record list using iterator
* _vca_getnext local: get next record using iterator
* vca_open
* vca_close
* vca_rewind
* vca_getrec
* vca_getrec_byID
* vca_updic35rec
* vca_cmpic35rec
* vca_putic35rec
* vca_delrec
* vca_recid
* vca_set_recid
* vca_recstat
* vca_set_recstat
* *
************************************************************************/
#include <stdio.h> /* sprintf(), .. */
#include <string.h> /* strcpy(), .. */
#include <ctype.h> /* isdigit(), .. */
#include <unistd.h> /* access() */
#include <sys/types.h> /* size_t, .. */
#include <time.h> /* struct tm, time() .. */
#include "util.h" /* ERR, uchar, .. */
#include "vcc.h" /* VObject, .. */
#include "vcutil.h" /* vCard,vCal utilities */
#include "ic35frec.h" /* IC35 record fields.. */
#include "dataio.h"
NOTUSED(rcsid);
/* record status values for X-PILOTSTAT */
#define VCA_CLEAN PIM_CLEAN
#define VCA_DIRTY PIM_DIRTY
/* vCalendar program ids */
#define VCAL_GNOME 1
#define VCAL_KDE 2
static int _vca_prodid( void );
static void vca_set_recid( VObject * vobj, ulong recid );
static void vca_set_recstat( VObject * vobj, int stat );
/* ============================================ */
/* IC35 Address record to/from vCard */
/* ============================================ */
/*
* field mapping:
* VCNameProp preferred
* VCGivenNameProp A_FirstName
* VCFamilyNameProp A_LastName
* VCFullNameProp only if VCNameProp absent
* first field A_FirstName
* last field A_LastName
* VCBirthDateProp A_BirthDate
* VCAdrProp
* VCStreetAddressProp A_Street
* VCCityProp A_City
* VCRegionProp A_Region
* VCPostalCodeProp A_ZIP
* VCCountryNameProp A_Country
* VCTelephoneProp
* VCHomeProp A_TelHome
* VCTelephoneProp
* VCWorkProp A_TelWork
* VCTelephoneProp
* VCCellularProp A_TelMobile
* VCTelephoneProp
* VCFaxProp A_TelFax
* VCEmailAddressProp
* VCInternetProp A_Email1
* VCEmailAddressProp
* VCInternetProp A_Email2
* VCOrgProp
* VCOrgNameProp A_Company
* VCURLProp A_URL
* VCNoteProp A_Notes
* "(def1):<cont>\n" A_Def1
* "(def2):<cont>\n" A_Def2
* -/- A_CategoryID default: 0x00
* VCCategoriesProp A_Category default: "Unfiled"
* use first known standard from multiple (Business,Personal,Unfiled)
* if single use it, even if non-standard
*/
/* convert IC35 Address record to vCard
* ------------------------------------
*/
static void
ic35addr_to_vcard( IC35REC * rec, VObject * vcard )
{
VObject * vprop;
char * fullname, *oldstr, *ic35first, *ic35last;
ic35first = ic35recfld( rec, A_FirstName );
ic35last = ic35recfld( rec, A_LastName );
vprop = SetProp( vcard, VCNameProp);
if ( (fullname = dupStringValue( vcard, VCFullNameProp )) && *fullname ) {
/*
* if old vCard (is present and) has fullname VCFullNameProp "FN:"
* substitute old VCFamilyNameProp in its value with A_FirstName
* and old VCGivenNameProp in it with A_LastName. no changes to
* VCFullNameProp will be made if VCGivenNameProp,VCFamilyNameProp
* are not substrings of it.
*/
fullname = dupSubst( oldstr = fullname,
StringValue( vprop, VCFamilyNameProp ), ic35last );
deleteStr( oldstr );
fullname = dupSubst( oldstr = fullname,
StringValue( vprop, VCGivenNameProp ), ic35first );
deleteStr( oldstr );
} else {
/*
* otherwise (no old vCard or no VCFullNameProp in it) construct
* VCFullNameProp from A_FirstName,A_LastName separated by space.
* if either A_FirstName or A_LastName is missing construct from
* the other one if present.
*/
if ( ic35first && *ic35first && ic35last && *ic35last ) {
fullname = dupStr( ic35first, strlen(ic35first)+1+strlen(ic35last) );
strcat( strcat( fullname, " " ), ic35last );
} else
fullname = dupStr( ic35first && *ic35first ? ic35first :
ic35last && *ic35last ? ic35last : "", 0 );
}
SetString( vcard, VCFullNameProp, fullname );
deleteStr( fullname );
SetString( vprop, VCGivenNameProp, ic35first );
SetString( vprop, VCFamilyNameProp, ic35last );
SetString( vcard, VCBirthDateProp, ic35recfld( rec, A_BirthDate ) );
if ( strlen( ic35recfld( rec, A_Street ) ) != 0
|| strlen( ic35recfld( rec, A_City ) ) != 0
|| strlen( ic35recfld( rec, A_Region ) ) != 0
|| strlen( ic35recfld( rec, A_ZIP ) ) != 0
|| strlen( ic35recfld( rec, A_Country ) ) != 0 ) {
vprop = SetProp( vcard, VCAdrProp );
SetString( vprop, VCPostalBoxProp, "" );
SetString( vprop, VCExtAddressProp, "" );
SetString( vprop, VCStreetAddressProp,ic35recfld( rec, A_Street ) );
SetString( vprop, VCCityProp, ic35recfld( rec, A_City ) );
SetString( vprop, VCRegionProp, ic35recfld( rec, A_Region ) );
SetString( vprop, VCPostalCodeProp, ic35recfld( rec, A_ZIP ) );
SetString( vprop, VCCountryNameProp, ic35recfld( rec, A_Country ) );
} else
DelProp( vcard, VCAdrProp );
SetTel( vcard, VCHomeProp, ic35recfld( rec, A_TelHome ) );
SetTel( vcard, VCWorkProp, ic35recfld( rec, A_TelWork ) );
SetTel( vcard, VCCellularProp, ic35recfld( rec, A_TelMobile ) );
SetTel( vcard, VCFaxProp, ic35recfld( rec, A_TelFax ) );
SetEmail( vcard, 1, ic35recfld( rec, A_Email1 ) );
SetEmail( vcard, 2, ic35recfld( rec, A_Email2 ) );
if ( strlen( ic35recfld( rec, A_Company ) ) != 0 ) {
vprop = SetProp( vcard, VCOrgProp );
SetString( vprop, VCOrgNameProp, ic35recfld( rec, A_Company ) );
} else
DelProp( vcard, VCOrgProp );
SetString( vcard, VCURLProp, ic35recfld( rec, A_URL ) );
SetNoteProp( vcard, DEF1PROP, ic35recfld( rec, A_Def1 ) );
SetNoteProp( vcard, DEF2PROP, ic35recfld( rec, A_Def2 ) );
SetNotes( vcard, ic35recfld( rec, A_Notes ) );
SetCategory( vcard, ic35recfld( rec, A_Category ) );
}
/* convert vCard to IC35 address record
* ------------------------------------
*/
static void
vcard_to_ic35addr( VObject * vcard, IC35REC * rec )
{
VObject * vprop;
VObjectIterator iter;
char * strval;
char * pstr;
const char * name;
int emailnum;
if ( (vprop = isAPropertyOf( vcard, VCNameProp )) != NULL ) {
set_ic35recfld( rec, A_LastName,
StringValue( vprop, VCFamilyNameProp ) );
set_ic35recfld( rec, A_FirstName,
StringValue( vprop, VCGivenNameProp ) );
} else if ( (strval = StringValue( vcard, VCNameProp )) && *strval ) {
/* no Name property, parse first,last field from FormattedName */
if ( (pstr = strrchr( strval, ' ' )) != NULL ) {
set_ic35recfld( rec, A_LastName, pstr+1 );
pstr = strchr( strval, ' ' );
*pstr = '\0';
set_ic35recfld( rec, A_FirstName, strval );
} else
set_ic35recfld( rec, A_LastName, strval );
} else {
set_ic35recfld( rec, A_LastName, "NoName" ); /* IC35 needs name */
}
vprop = isAPropertyOf( vcard, VCAdrProp );
set_ic35recfld( rec, A_City,
StringValue( vprop, VCCityProp ) );
set_ic35recfld( rec, A_Street,
StringValue( vprop, VCStreetAddressProp ) );
set_ic35recfld( rec, A_Region,
StringValue( vprop, VCRegionProp ) );
set_ic35recfld( rec, A_ZIP,
StringValue( vprop, VCPostalCodeProp ) );
set_ic35recfld( rec, A_Country,
StringValue( vprop, VCCountryNameProp ) );
vprop = isAPropertyOf( vcard, VCOrgProp );
set_ic35recfld( rec, A_Company,
StringValue( vprop, VCOrgNameProp ) );
emailnum = 0;
set_ic35recfld( rec, A_TelHome, "" );
set_ic35recfld( rec, A_TelWork, "" );
set_ic35recfld( rec, A_TelMobile, "" );
set_ic35recfld( rec, A_TelFax, "" );
set_ic35recfld( rec, A_Email1, "" );
set_ic35recfld( rec, A_Email2, "" );
initPropIterator( &iter, vcard );
while ( moreIteration( &iter ) ) {
vprop = nextVObject( &iter );
name = vObjectName( vprop );
if ( strcasecmp( name, VCTelephoneProp ) == 0 ) {
if ( isAPropertyOf( vprop, VCHomeProp ) )
set_ic35recfld( rec, A_TelHome, StringValue( vprop, NULL ) );
else if ( isAPropertyOf( vprop, VCWorkProp ) )
set_ic35recfld( rec, A_TelWork, StringValue( vprop, NULL ) );
else if ( isAPropertyOf( vprop, VCCellularProp ) )
set_ic35recfld( rec, A_TelMobile, StringValue( vprop, NULL ) );
else if ( isAPropertyOf( vprop, VCFaxProp ) )
set_ic35recfld( rec, A_TelFax, StringValue( vprop, NULL ) );
else if ( strcasecmp( "Business", CategoryValue( vcard ) ) == 0 )
set_ic35recfld( rec, A_TelWork, StringValue( vprop, NULL ) );
else
set_ic35recfld( rec, A_TelHome, StringValue( vprop, NULL ) );
}
if ( strcasecmp( name, VCEmailAddressProp ) == 0 )
switch ( ++emailnum ) {
case 1:
set_ic35recfld( rec, A_Email1,
StringValue( vprop, NULL ) );
break;
case 2:
set_ic35recfld( rec, A_Email2,
StringValue( vprop, NULL ) );
break;
}
}
set_ic35recfld( rec, A_URL, StringValue( vcard, VCURLProp ) );
set_ic35recfld( rec, A_BirthDate,
isodtime_to_ymd( vcard, VCBirthDateProp ) );
set_ic35recfld( rec, A_Def1, NotePropValue( vcard, DEF1PROP ) );
set_ic35recfld( rec, A_Def2, NotePropValue( vcard, DEF2PROP ) );
set_ic35recfld( rec, A_Notes, NotesValue( vcard ) );
set_ic35recfld( rec, A_CategoryID, "\x00" );
set_ic35recfld( rec, A_Category, CategoryValue( vcard ) );
}
/* ==================================================== */
/* IC35 Schedule record to/from vCal:vEvent */
/* ==================================================== */
/*
* field mapping:
* VCSummaryProp S_Subject
* VCDTstartProp
* date S_StartDate
* time S_StartTime
* VCDTendProp
* date S_EndDate
* time S_EndTime
* VCRRuleProp
* type D,W,MP,MD,YD S_Alarm_Repeat & RepeatMASK
* D daily RepeatDay
* W weekly RepeatWeek
* MP monthly RepeatMonWday
* MD monthly RepeatMonMday
* YD yearly RepeatYear
* count n S_RepCount
* end-isodtime S_RepEndDate only yyyymmdd, max 20311231
* VCAAlarmProp S_Alarm_Repeat & AlarmNoBeep
* VCRunTimeProp S_AlarmBefore default: AlarmBefNone
* VCDAlarmProp S_Alarm_Repeat & AlarmNoLED
* VCRunTimeProp S_AlarmBefore default: AlarmBefNone
* VCRunTimeProp - VCDTstartProp
* < 60 AlarmBefNow
* >= 60 * 1 AlarmBef1min
* >= 60 * 5 AlarmBef5min
* >= 60 * 10 AlarmBef10min
* >= 60 * 30 AlarmBef30min
* >= 60 * 60 * 1 AlarmBef1hour
* >= 60 * 60 * 2 AlarmBef2hour
* >= 60 * 60 * 10 AlarmBef10hour
* >= 60 * 60 * 24 * 1 AlarmBef1day
* >= 60 * 60 * 24 * 2 AlarmBef2day
* VCDescriptionProp S_Notes
* -/- S_CategoryID default: 0x00
* VCCategoriesProp S_Category default: "Unfiled"
* use first known standard from multiple (Business,Personal,Unfiled)
* if single use it, even if non-standard
* special for korganizer:
* korganizer supports only DALARM
* special for gnomecal:
* VCSummaryProp
* first line S_Subject
* subsequent lines S_Notes
* gnomecal does not support VEVENT.DESCRIPTION, but multiple lines
* in VEVENT.SUMMARY, which in turn the IC35 does not support.
* as workaround the first line of VEVENT.SUMMARY is mapped to S_Subject,
* all subsequent lines are mapped to S_Notes in IC35.
* VCClassProp PUBLIC
* gnomecal crashes on edit if VCClassProp is not in VEVENT record
* gnomecal,korganizer automagically add:
* CLASS:PUBLIC gnomecal need korganizer
* PRIORITY:0 gnomecal korganizer
* RELATED-TO:0 - korganizer
* SEQUENCE:0 gnomecal korganizer
* STATUS:NEEDS ACTION gnomecal korganizer
* TRANSP:0 gnomecal korganizer
* X-ORGANIZER:MAILTO:tsch@shs5.ind-hh korganizer
*/
/* convert IC35 Schedule record to vCal:vEvent
* -------------------------------------------
*/
static void
ic35sched_to_vevent( IC35REC * rec, VObject * vevent )
{
VObject * vprop;
uchar alarm_repeat;
char isodtime[20];
char * notes;
sprintf( isodtime, "%sT%s", /* yyyymmddThhmmss */
ic35recfld( rec, S_StartDate ), ic35recfld( rec, S_StartTime ) );
if ( isodtime[13] == ':' ) isodtime[13] = isodtime[14] = '0';
SetString( vevent, VCDTstartProp, isodtime );
sprintf( isodtime, "%sT%s", /* yyyymmddThhmmss */
ic35recfld( rec, S_EndDate ), ic35recfld( rec, S_EndTime ) );
if ( isodtime[13] == '<' ) isodtime[13] = isodtime[14] = '0';
SetString( vevent, VCDTendProp, isodtime );
if ( _vca_prodid() == VCAL_GNOME ) {
if ( (notes = ic35recfld( rec, S_Notes )) && *notes ) {
char * subj = ic35recfld( rec, S_Subject );
char * buff = dupStr( "", strlen(subj)+2+strlen(notes) );
sprintf( buff, "%s\r\n%s", subj, notes );
subj = dupSubstCRLF( buff );
SetString( vevent, VCSummaryProp, subj );
deleteStr( subj );
deleteStr( buff );
} else
SetString( vevent, VCSummaryProp, ic35recfld( rec, S_Subject ) );
if ( ! isAPropertyOf( vevent, VCClassProp ) )
SetString( vevent, VCClassProp, "PUBLIC" );
} else {
SetString( vevent, VCSummaryProp, ic35recfld( rec, S_Subject ) );
SetNotes( vevent, ic35recfld( rec, S_Notes ) );
}
alarm_repeat = *ic35recfld( rec, S_Alarm_Repeat );
if ( alarm_repeat & RepeatMASK ) {
uchar repcount = *ic35recfld( rec, S_RepCount );
char * repend = ic35recfld( rec, S_RepEndDate );
char reprule[24];
struct tm stm;
static const char * wdays[] = {
"SU", "MO", "TU", "WE", "TH", "FR", "SA",
};
memset( &stm, 0, sizeof(stm) );
sscanf( ic35recfld( rec, S_StartDate ), "%4d%2d%2d",
&stm.tm_year, &stm.tm_mon, &stm.tm_mday );
sscanf( ic35recfld( rec, S_StartTime ), "%2d%2d",
&stm.tm_hour, &stm.tm_min );
stm.tm_year -= 1900;
stm.tm_mon -= 1;
stm.tm_sec = 0;
stm.tm_isdst = -1;
(void)mktime( &stm );
repcount = *ic35recfld( rec, S_RepCount );
repend = ic35recfld( rec, S_RepEndDate );
*reprule = '\0';
switch ( alarm_repeat & RepeatMASK ) {
case RepeatDay:
sprintf( reprule, "D%u %sT000000", repcount, repend );
break;
case RepeatWeek:
sprintf( reprule, "W%u %s %sT000000",
repcount, wdays[stm.tm_wday], repend );
break;
case RepeatMonWday:
sprintf( reprule, "MP%u %sT000000", repcount, repend );
break;
case RepeatMonMday:
sprintf( reprule, "MD%u %sT000000", repcount, repend );
break;
case RepeatYear:
sprintf( reprule, "YD%u %sT000000", repcount, repend );
break;
}
SetString( vevent, VCRRuleProp, reprule );
} else
DelProp( vevent, VCRRuleProp );
if ( *ic35recfld( rec, S_AlarmBefore )
&& (alarm_repeat & (AlarmNoBeep|AlarmNoLED))
!= (AlarmNoBeep|AlarmNoLED) ) {
time_t atime;
struct tm * ptm;
struct tm atm;
char atimestr[16];
memset( &atm, 0, sizeof(atm) );
sscanf( ic35recfld( rec, S_StartDate ), "%4d%2d%2d",
&atm.tm_year, &atm.tm_mon, &atm.tm_mday );
sscanf( ic35recfld( rec, S_StartTime ), "%2d%2d",
&atm.tm_hour, &atm.tm_min );
atm.tm_year -= 1900;
atm.tm_mon -= 1;
atm.tm_isdst = -1;
atime = mktime( &atm );
switch ( *ic35recfld( rec, S_AlarmBefore ) ) {
case AlarmBefNone:
case AlarmBefNow: break;
case AlarmBef1min: atime -= 60; break;
case AlarmBef5min: atime -= 5 * 60; break;
case AlarmBef10min: atime -= 10 * 60; break;
case AlarmBef30min: atime -= 30 * 60; break;
case AlarmBef1hour: atime -= 60 * 60; break;
case AlarmBef2hour: atime -= 2 * 60 * 60; break;
case AlarmBef10hour: atime -= 10 * 60 * 60; break;
case AlarmBef1day: atime -= 24 * 60 * 60; break;
case AlarmBef2day: atime -= 2 * 24 * 60 * 60; break;
}
ptm = localtime( &atime );
strftime( atimestr, sizeof(atimestr), "%Y%m%dT%H%M%S", ptm );
if ( ! (alarm_repeat & AlarmNoBeep) && _vca_prodid() != VCAL_KDE ) {
vprop = SetProp( vevent, VCAAlarmProp );
SetString( vprop, VCRunTimeProp, atimestr );
SetString( vprop, VCSnoozeTimeProp, "" );
SetString( vprop, VCRepeatCountProp, "1" );
} else
DelProp( vevent, VCAAlarmProp );
if ( ! (alarm_repeat & AlarmNoLED)
|| (!(alarm_repeat & AlarmNoBeep) && _vca_prodid() == VCAL_KDE) ) {
vprop = SetProp( vevent, VCDAlarmProp );
SetString( vprop, VCRunTimeProp, atimestr );
SetString( vprop, VCSnoozeTimeProp, "" );
SetString( vprop, VCRepeatCountProp, "1" );
} else
DelProp( vevent, VCDAlarmProp );
} else {
DelProp( vevent, VCAAlarmProp );
DelProp( vevent, VCDAlarmProp );
}
}
/* convert IC35 schedule record to vCal
* ------------------------------------
*/
static void
vevent_to_ic35sched( VObject * vevent, IC35REC * rec )
{
VObject * vprop;
char * strval;
char * pstr;
char alarm_repeat[2];
char repeat_count[2];
char alarm_before[2];
time_t abefsec;
strval = StringValue( vevent, VCSummaryProp );
if ( !( strval && *strval ) ) strval = "NoSubject"; /*IC35 needs subject*/
if ( _vca_prodid() == VCAL_GNOME
&& (pstr = strchr( strval, '\n' )) != NULL ) {
strval = dupStr( strval, pstr - strval ); /* first line */
set_ic35recfld( rec, S_Subject, strval ); /* to Subject field */
deleteStr( strval );
pstr = dupSubstNL( pstr+1 ); /* subsequent lines */
set_ic35recfld( rec, S_Notes, pstr ); /* to Notes field */
deleteStr( pstr );
} else {
set_ic35recfld( rec, S_Subject, strval );
set_ic35recfld( rec, S_Notes, NotesValue( vevent ) );
}
set_ic35recfld( rec, S_StartDate,
isodtime_to_ymd_or_today( vevent, VCDTstartProp ) );
set_ic35recfld( rec, S_StartTime,
isodtime_to_hms_or_now( vevent, VCDTstartProp ) );
set_ic35recfld( rec, S_EndDate,
isodtime_to_ymd_or_today( vevent, VCDTendProp ) );
set_ic35recfld( rec, S_EndTime,
isodtime_to_hms_or_now( vevent, VCDTendProp ) );
alarm_repeat[0] = 0;
alarm_repeat[1] = '\0';
repeat_count[0] = 0;
repeat_count[1] = '\0';
if ( (strval = StringValue( vevent, VCRRuleProp )) && *strval ) {
if ( strncasecmp( strval, "YD", 2 ) == 0 ) {
alarm_repeat[0] = (alarm_repeat[0] & RepeatMASK) | RepeatYear;
repeat_count[0] = (uchar)atoi( strval+2 );
} else if ( strncasecmp( strval, "MD", 2 ) == 0 ) {
alarm_repeat[0] = (alarm_repeat[0] & RepeatMASK) | RepeatMonMday;
repeat_count[0] = (uchar)atoi( strval+2 );
} else if ( strncasecmp( strval, "MP", 2 ) == 0 ) {
alarm_repeat[0] = (alarm_repeat[0] & RepeatMASK) | RepeatMonWday;
repeat_count[0] = (uchar)atoi( strval+2 );
} else if ( strncasecmp( strval, "W", 1 ) == 0 ) {
alarm_repeat[0] = (alarm_repeat[0] & RepeatMASK) | RepeatWeek;
repeat_count[0] = (uchar)atoi( strval+1 );
} else if ( strncasecmp( strval, "D", 1 ) == 0 ) {
alarm_repeat[0] = (alarm_repeat[0] & RepeatMASK) | RepeatDay;
repeat_count[0] = (uchar)atoi( strval+1 );
}
if ( (pstr = strrchr( strval, ' ' )) != NULL
&& strlen( pstr+1 ) >= 8 /* yyyymmdd */
&& isdigit( pstr[1] ) )
set_ic35recfld( rec, S_RepEndDate,
isodtstr_to_ymd_or_today( pstr+1 ) );
}
alarm_repeat[0] |= (AlarmNoBeep|AlarmNoLED);
alarm_before[0] = AlarmBefNone;
alarm_before[1] = '\0';
abefsec = 0;
if ( (vprop = isAPropertyOf( vevent, VCAAlarmProp )) != NULL ) {
alarm_repeat[0] &= ~AlarmNoBeep;
abefsec = isodtime_to_unixtime( vevent, VCDTstartProp )
- isodtime_to_unixtime( vprop, VCRunTimeProp );
}
if ( (vprop = isAPropertyOf( vevent, VCDAlarmProp )) != NULL ) {
alarm_repeat[0] &= ~AlarmNoLED;
if ( _vca_prodid() == VCAL_KDE ) /* korganizer has only DALARM */
alarm_repeat[0] &= ~AlarmNoBeep;
abefsec = isodtime_to_unixtime( vevent, VCDTstartProp )
- isodtime_to_unixtime( vprop, VCRunTimeProp );
}
if ( (alarm_repeat[0] & (AlarmNoBeep|AlarmNoLED))
!= (AlarmNoBeep|AlarmNoLED) ) {
if ( abefsec < 60 ) alarm_before[0] = AlarmBefNow;
if ( abefsec >= 60 * 1 ) alarm_before[0] = AlarmBef1min;
if ( abefsec >= 60 * 5 ) alarm_before[0] = AlarmBef5min;
if ( abefsec >= 60 * 10 ) alarm_before[0] = AlarmBef10min;
if ( abefsec >= 60 * 30 ) alarm_before[0] = AlarmBef30min;
if ( abefsec >= 60 * 60 * 1 ) alarm_before[0] = AlarmBef1hour;
if ( abefsec >= 60 * 60 * 2 ) alarm_before[0] = AlarmBef2hour;
if ( abefsec >= 60 * 60 * 10 ) alarm_before[0] = AlarmBef10hour;
if ( abefsec >= 60 * 60 * 24 * 1 ) alarm_before[0] = AlarmBef1day;
if ( abefsec >= 60 * 60 * 24 * 2 ) alarm_before[0] = AlarmBef2day;
}
set_ic35recfld( rec, S_Alarm_Repeat, alarm_repeat );
set_ic35recfld( rec, S_RepCount, repeat_count );
set_ic35recfld( rec, S_AlarmBefore, alarm_before );
/* IC35 Schedule does not have Category */
}
/* ==================================================== */
/* IC35 ToDoList record to/from vCal:vTodo */
/* ==================================================== */
/*
* field mapping:
* VCSummaryProp T_Subject default: "ToDo"
* VCDTstartProp T_StartDate yyyymmdd default: today
* VCDueProp T_EndDate yyyymmdd default: today
* VCStatusProp T_Completed 1 byte default: 0x00
* NEEDS ACTION 0x00
* COMPLETED 0x01
* other 0x00 "STATUS:<stat>\r\n" to T_Notes
* VCPriorityProp T_Priority 1 byte default: 0x01
* 1,2 0x02 highest
* 3,4,0 0x01 normal
* 5.. 0x00 lowest
* VCDescriptionProp T_Notes default: <empty>
* -/- T_CategoryID default: 0x00
* VCCategoriesProp T_Category default: "Unfiled"
* use first known standard from multiple (Business,Personal,Unfiled)
* if single use it, even if non-standard
* special for KOrganizer:
* VCDescriptionProp T_Notes
* "DTSTART:<cont>\r\n" T_StartDate
* "DUE:<cont>\r\n" T_EndDate
* "CATEGORIES:<cont>\r\n" T_Category
* KOrganizer does not support VTODO.DTSTART,DUE,CATEGORIES,
* as workaround these fields are put into VTODO.DESCRIPTION.
* special for gnomecal:
* VCDescriptionProp T_Notes
* "DTSTART:<cont>\r\n" T_StartDate
* gnomecal does not support VTODO.DTSTART, put into VTODO.DESCRIPTION.
* VCClassProp PUBLIC
* gnomecal crashes on edit if VCClassProp is not in VTODO record
* gnomecal,korganizer automagically add:
* CLASS:PUBLIC gnomecal need -
* SEQUENCE:0 gnomecal korganizer
* TRANSP:0 gnomecal -
* X-ORGANIZER:MAILTO:tsch@shs5.ind-hh korganizer
*/
/* convert IC35 ToDoList record to vCal:vTodo
* ------------------------------------------
*/
static void
ic35todo_to_vtodo( IC35REC * rec, VObject * vtodo )
{
char * prio;
char isodtime[20];
SetString( vtodo, VCSummaryProp, ic35recfld( rec, T_Subject ) );
SetNotes( vtodo, ic35recfld( rec, T_Notes ) );
switch ( _vca_prodid() ) {
case VCAL_KDE: /* does not support DTSTART,DUE,CATEGORY */
SetNoteProp( vtodo, VCDueProp, ic35recfld( rec, T_EndDate ) );
SetNoteProp( vtodo, VCDTstartProp, ic35recfld( rec, T_StartDate ) );
SetNoteProp( vtodo, VCCategoriesProp, ic35recfld( rec, T_Category ) );
break;
case VCAL_GNOME: /* does not support DTSTART, needs CLASS */
if ( ! isAPropertyOf( vtodo, VCClassProp ) )
SetString( vtodo, VCClassProp, "PUBLIC" );
SetNoteProp( vtodo, VCDTstartProp, ic35recfld( rec, T_StartDate ) );
goto due_category;
default:
sprintf( isodtime, "%sT000000", ic35recfld( rec, T_StartDate ) );
SetString( vtodo, VCDTstartProp, isodtime );
due_category:
sprintf( isodtime, "%sT235900", ic35recfld( rec, T_EndDate ) );
SetString( vtodo, VCDueProp, isodtime );
SetCategory( vtodo, ic35recfld( rec, T_Category ) );
}
SetString( vtodo, VCStatusProp, *ic35recfld( rec, T_Completed ) == 0
? "NEEDS ACTION" : "COMPLETED" );
switch ( *ic35recfld( rec, T_Priority ) ) {
case 0x02: prio = "1"; break; /* highest */
default:
case 0x01: prio = "3"; break; /* normal */
case 0x00: prio = "5"; break; /* lowest */
}
SetString( vtodo, VCPriorityProp, prio );
}
/* convert IC35 ToDoList record to vCal
* ------------------------------------
*/
static void
vtodo_to_ic35todo( VObject * vtodo, IC35REC * rec )
{
char *binstr, *strval;
int intval;
char * statusnote = NULL;
char * dtbeg;
char * dtend;
strval = StringValue( vtodo, VCSummaryProp );
if ( !( strval && *strval ) ) strval = "NoSubject"; /*IC35 needs subject*/
set_ic35recfld( rec, T_Subject, strval );
switch ( _vca_prodid() ) {
case VCAL_KDE: /* does not support DTSTART,DUE,CATEGORY */
dtbeg = dupStr( NotePropValue( vtodo, VCDTstartProp ), 0 );
dtend = dupStr( NotePropValue( vtodo, VCDueProp ), 0 );
set_ic35recfld( rec, T_Category,
NotePropValue( vtodo, VCCategoriesProp ) );
break;
case VCAL_GNOME: /* does not support DTSTART */
dtbeg = dupStr( NotePropValue( vtodo, VCDTstartProp ), 0 );
goto due_category;
default:
dtbeg = dupStr( StringValue( vtodo, VCDTstartProp ), 0 );
due_category:
dtend = dupStr( StringValue( vtodo, VCDueProp ), 0 );
set_ic35recfld( rec, T_Category,
CategoryValue( vtodo ) );
}
set_ic35recfld( rec, T_CategoryID, "\x00" );
set_ic35recfld( rec, T_StartDate, isodtstr_to_ymd_or_today( dtbeg ) );
set_ic35recfld( rec, T_EndDate, isodtstr_to_ymd_or_today( dtend ) );
deleteStr( dtbeg );
deleteStr( dtend );
binstr = "\x00";
if ( (strval = StringValue( vtodo, VCStatusProp )) && *strval ) {
if ( strcasecmp( strval, "COMPLETED" ) == 0 )
binstr = "\x01";
else if ( strcasecmp( strval, "NEEDS ACTION" ) != 0
&& (statusnote = malloc( 255+1 )) != NULL ) {
strcpy( statusnote, "STATUS:" );
strncat( strval, strval, 255-7-2 );
strcat( strval, "\r\n" );
}
}
set_ic35recfld( rec, T_Completed, binstr );
intval = atoi( StringValue( vtodo, VCPriorityProp ) );
if ( intval >= 5 ) binstr = "\x00"; /* lowest */
else if ( intval >= 3 ) binstr = "\x01"; /* normal */
else if ( intval >= 1 ) binstr = "\x02"; /* highest */
else /* intval == 0 */ binstr = "\x01"; /* default: normal */
set_ic35recfld( rec, T_Priority, binstr );
if ( statusnote ) {
strval = NotesValue( vtodo );
strncat( statusnote, strval, 255 - strlen( statusnote ) );
set_ic35recfld( rec, T_Notes, statusnote );
free( statusnote );
} else
set_ic35recfld( rec, T_Notes, NotesValue( vtodo ) );
}
/* ==================================================== */
/* IC35 Memo record to/from vMemo (proprietary) */
/* ==================================================== */
/*
* field mapping:
* VCSummaryProp M_Subject default: "Memo"
* VCNoteProp M_Notes
* -/- M_CategoryID default: 0x00
* VCCategoriesProp M_Category default: "Unfiled"
* use first known standard from multiple (Business,Personal,Unfiled)
* if single use it, even if non-standard
*/
/* convert IC35 Memo record to (proprietary) vMemo
* -----------------------------------------------
*/
static void
ic35memo_to_vmemo( IC35REC * rec, VObject * vmemo )
{
SetString( vmemo, VCSummaryProp, ic35recfld( rec, M_Subject ) );
SetNotes( vmemo, ic35recfld( rec, M_Notes ) );
SetCategory( vmemo, ic35recfld( rec, M_Category ) );
}
/* convert IC35 Memo record to (proprietary) vMemo
* -----------------------------------------------
*/
static void
vmemo_to_ic35memo( VObject * vmemo, IC35REC * rec )
{
char *strval;
strval = StringValue( vmemo, VCSummaryProp );
if ( !( strval && *strval ) ) strval = "NoSubject"; /*IC35 needs subject*/
set_ic35recfld( rec, M_Subject, strval );
set_ic35recfld( rec, M_Notes, NotesValue( vmemo ) );
set_ic35recfld( rec, M_CategoryID, "\x00" );
set_ic35recfld( rec, M_Category, CategoryValue( vmemo ) );
}
/* ============================================ */
/* vCard,vCal access functions */
/* ============================================ */
/*
* vca_open()
* vca_close()
* vca_rewind()
*
* vca_getrec( int fileid ) -> VObject* / NULL
* vca_getrec_byID( ulong recid ) -> VObject* / NULL
* vca_cmpic35rec( IC35REC*, VObject* ) -> 0:same 1:differ
* vca_updic35rec( IC35REC*, VObject* ) VObject to IC35REC
* vca_putic35rec( IC35REC* ) IC35REC to VObject
* vca_delrec( VObject* )
*
* vca_recid( VObject* )
* vca_set_recid( VObject*, ulong )
* vca_recstat( VObject* )
* vca_set_recstat( VObject*, int )
*/
struct vcaget { /* current position in vcalist */
VObject * vobj; /* current vCard,vCal,vMemo */
bool in_vcal; /* flag: vcal_iterator in use */
VObjectIterator vcal_iter; /* iterator within vCal object */
};
static VObject * vcalist; /* list of vCard,vCal,vMemo objects */
static VObject * vcal; /* vCalendar contains vEvent,vTodo */
static struct vcaget vcaget; /* _vca_getrec position in vcalist */
static ulong vca_recid( VObject * vobj );
/* internal: determine vCalender program from PRODID
* -------------------------------------------------
* inspect vCalender PRODID for creating program:
* PRODID:-//GNOME//NONSGML GnomeCalendar//EN
* PRODID:-//K Desktop Environment//NONSGML KOrganizer//EN
* some IC35 to/from vCalendar conversions are handled special
* depending on program.
*/
static int
_vca_prodid( void )
{
char * prodid;
int rval;
rval = 0;
if ( vcal != NULL
&& (prodid = dupStringValue( vcal, VCProdIdProp )) != NULL ) {
if ( strstr( prodid, "GnomeCalendar//" ) != NULL )
rval = VCAL_GNOME;
if ( strstr( prodid, "KOrganizer//" ) != NULL )
rval = VCAL_KDE;
deleteStr( prodid );
}
return rval;
}
/* internal: rewind vCard,vCal list
* --------------------------------
*/
static void
_vca_rewind( struct vcaget * vcaget )
{
vcaget->vobj = NULL;
vcaget->in_vcal = FALSE;
}
/* internal: get next vCard,vCal record
* ------------------------------------
*/
static VObject *
_vca_getnext( struct vcaget * vcaget )
{
VObject * vcal;
if ( vcaget == NULL )
return NULL;
if ( vcaget->vobj == NULL )
vcaget->vobj = vcalist;
else if ( ! vcaget->in_vcal )
vcaget->vobj = nextVObjectInList( vcaget->vobj );
while ( vcaget->vobj != NULL ) {
switch ( vca_type( vcaget->vobj ) ) {
case VCARD:
case VMEMO:
return vcaget->vobj;
case VCAL:
if ( ! vcaget->in_vcal ) {
initPropIterator( &vcaget->vcal_iter, vcaget->vobj );
vcaget->in_vcal = TRUE;
}
while ( moreIteration( &vcaget->vcal_iter ) ) {
vcal = nextVObject( &vcaget->vcal_iter );
switch ( vca_type( vcal ) ) {
case VEVENT:
case VTODO:
return vcal;
}
}
vcaget->in_vcal = FALSE;
break;
}
vcaget->vobj = nextVObjectInList( vcaget->vobj );
}
return NULL;
}
/* open vCard,vCal file(s)
* -----------------------
* if file(s) exist, read into internal vObject-tree 'vcalist'
* complain if open file(s) failed.
* ??? check if output file creatable in dirname(filename)
* rewind so that _vca_getrec() gets first record in 'vcalist'
*/
static char * iomode;
static char * addr_fname;
static char * vcal_fname;
static char * memo_fname;
static int addr_CRLF; /* CRLF / NL mode per PIMfile */
static int vcal_CRLF; /* from Parse_MIME_FromFile() */
static int memo_CRLF; /* calls in vca_open() */
/* mimeErrorHandler for Parse_MIME_FromFile()
*/
static int _vca_errok;
static char * _vca_fname;
static void
_vca_errmsg( char * msg )
{
error( "vCard/vCal \"%s\": %s", _vca_fname ? _vca_fname : "", msg );
_vca_errok = ERR;
}
/* check and read vCard/vCal from filepointer
*/
static int
_vca_readfp( FILE * fp, char * fname, VObject ** pvlist, int * pcrlf )
{
int chr;
LPRINTF(( L_INFO, "vca_open: read %s ..", fname ));
*pvlist = NULL;
*pcrlf = 1;
do {
if ( (chr = fgetc( fp )) == EOF ) /* empty file or only CR/LF */
return OK; /* is accepted OK */
} while ( chr == '\r' || chr == '\n' );
rewind( fp );
registerMimeErrorHandler( _vca_errmsg );
_vca_errok = OK;
_vca_fname = fname;
*pvlist = Parse_MIME_FromFile( fp );
*pcrlf = CRLFmode(); /* CRLF/NL input from Parse_MIME */
return _vca_errok; /* ok / error from _vca_errmsg() */
}
/* open,check+read,close vCard/vCal file
*/
static int
_vca_readfile( char * fname, VObject ** pvlist, int * pcrlf )
{
FILE * fp;
int rval;
*pvlist = NULL;
*pcrlf = 1;
if ( !( fname && *fname ) ) /* no filename specified */
return OK;
if ( (fp = fopen( fname, "r" )) == NULL ) {
if ( access( fname, F_OK ) == 0 )
return ERR; /* file exists, but not readable */
else
return OK; /* non-existing file is OK */
}
rval = _vca_readfp( fp, fname, pvlist, pcrlf );
fclose( fp );
return rval;
}
/* read-in vCard,vCal file(s)
*/
static int
vca_open( char * mode, char * addrfname, char * vcalfname, char * memofname )
{
VObject * vlist;
VObject * vobj;
int rval;
LPRINTF(( L_INFO, "vca_open(%s,%s,%s)",
addrfname ? addrfname : "NULL",
vcalfname ? addrfname : "NULL",
vcalfname ? addrfname : "NULL" ));
iomode = mode; /* note input/output for close */
addr_fname = addrfname; /* note filenames for close */
vcal_fname = vcalfname;
memo_fname = memofname;
vcalist = vcal = NULL; /* init vCard,vCal record lists */
addr_CRLF = vcal_CRLF = memo_CRLF = 1; /* init CRLF mode default ON */
if ( iomode[0] != 'r' )
return OK; /* open for output only */
if ( addrfname && strcmp( addrfname, "-" ) == 0 /* using stdin */
&& !( vcalfname && *vcalfname ) /* is allowed if */
&& !( memofname && *memofname ) ) /* only one filename */
rval = _vca_readfp( stdin, "(stdin)", &vcalist, &addr_CRLF );
else
rval = _vca_readfile( addrfname, &vcalist, &addr_CRLF );
if ( rval != OK ) /* open/parse vCard file failed */
return ERR;
rval = _vca_readfile( vcalfname, &vcal, &vcal_CRLF );
if ( rval != OK ) /* open/parse vCal file failed */
return ERR;
if ( vcal != NULL ) /* vCal object parsed from file */
addList( &vcalist, vcal ); /* add vCal object to vcalist */
else /* vCal object in addr file */
for ( vobj = vcalist; vobj != NULL; vobj = nextVObjectInList( vobj ) )
if ( vca_type( vobj ) == VCAL ) {
vcal = vobj; /* setup pointer to vCal obj */
break;
}
rval = _vca_readfile( memofname, &vlist, &memo_CRLF );
if ( rval != OK ) /* open/parse VMEMO file failed */
return ERR;
while ( vlist != NULL ) {
vobj = vlist;
vlist = nextVObjectInList( vlist );
addList( &vcalist, vobj ); /* add memo records to vcalist */
}
_vca_rewind( &vcaget ); /* rewind for _vca_getrec() get first record */
LPRINTF(( L_INFO, "vca_open: done" ));
return OK;
}
/* close vCard,vCal file(s)
* ------------------------
* flush internal vObject-tree to vCard,vCal file(s)
* if file(s) exist, rename file(s) for backup
* static filename(s) were setup by pim_open()
*/
static void
vca_close( void )
{
FILE * addrfp = NULL;
FILE * vcalfp = NULL;
FILE * memofp = NULL;
VObject * vobj;
if ( iomode[0] == 'w' || iomode[1] == '+' ) {
addrfp = backup_and_openwr( addr_fname );
vcalfp = backup_and_openwr( vcal_fname );
if ( vcalfp == NULL ) { vcalfp = addrfp; vcal_CRLF = addr_CRLF; }
memofp = backup_and_openwr( memo_fname );
if ( memofp == NULL ) { memofp = vcalfp; memo_CRLF = memo_CRLF; }
}
LPRINTF(( L_INFO, "vca_close: %s",
addrfp && vcalist ? "write .." : "no output" ));
for ( vobj = vcalist; vobj != NULL; vobj = nextVObjectInList( vobj ) ) {
FILE * fp = NULL;
int crlf = 0;
switch ( vca_type( vobj ) ) {
case VCARD: fp = addrfp; crlf = addr_CRLF; break;
case VCAL: fp = vcalfp; crlf = vcal_CRLF; break;
case VMEMO: fp = memofp; crlf = memo_CRLF; break;
}
if ( fp != NULL ) {
setCRLFmode( crlf );
writeVObject( fp, vobj );
}
}
cleanVObjects( vcalist );
vcalist = vcal = NULL; /* all vCard,vCal,vMemo objects were removed */
_vca_rewind( &vcaget ); /* sanity for vca_getrec() */
if ( addrfp != NULL && addrfp != stdout )
fclose( addrfp );
if ( vcalfp && vcalfp != addrfp && vcalfp != stdout )
fclose( vcalfp );
if ( memofp && memofp != vcalfp && memofp != stdout )
fclose( memofp );
LPRINTF(( L_INFO, "vca_close: done" ));
}
/* rewind vCard,vCal list
* ----------------------
*/
static void
vca_rewind( void )
{
_vca_rewind( &vcaget );
}
/* get vCard,vCal record for fileid
* --------------------------------
* fileid specifies which type of record to get:
* FILEADDR VCARD
* FILESCHED VCAL:VEVENT
* FILETODO VCAL:VTODO
* FILEMEMO VMEMO
* returns:
* VObject* next record
* NULL no more records
*/
static VObject *
vca_getrec( int fileid )
{
VObject * vobj;
int wanttype;
switch ( fileid ) {
case FILEADDR: wanttype = VCARD; break;
case FILESCHED: wanttype = VEVENT; break;
case FILETODO: wanttype = VTODO; break;
case FILEMEMO: wanttype = VMEMO; break;
case FILE_ANY: wanttype = 0; break;
default:
return NULL; /* unknown fileid */
}
while ( (vobj = _vca_getnext( &vcaget )) ) {
if ( wanttype == 0 /* next record with any fileid */
|| vca_type( vobj ) == wanttype )
return vobj;
}
return NULL;
}
/* get vCard,vCal record by record-ID
* ----------------------------------
*/
static VObject *
vca_getrec_byID( ulong recid )
{
VObject * vobj;
struct vcaget tmpget;
_vca_rewind( &tmpget );
while ( (vobj = _vca_getnext( &tmpget )) )
if ( vca_recid( vobj ) == recid )
return vobj;
return NULL;
}
/* update IC35 record with vCard,vCal record
* -----------------------------------------
*/
static IC35REC *
vca_updic35rec( IC35REC * ic35rec, VObject * vobj )
{
int fid;
void (* vobj_to_ic35 )(VObject*,IC35REC*);
switch ( vca_type( vobj ) ) {
case VCARD: vobj_to_ic35 = vcard_to_ic35addr; fid = FILEADDR; break;
case VEVENT: vobj_to_ic35 = vevent_to_ic35sched; fid = FILESCHED; break;
case VTODO: vobj_to_ic35 = vtodo_to_ic35todo; fid = FILETODO; break;
case VMEMO: vobj_to_ic35 = vmemo_to_ic35memo; fid = FILEMEMO; break;
default:
return NULL;
}
if ( ic35rec == NULL
&& (ic35rec = new_ic35rec()) == NULL )
return NULL;
/* must set fileid,recid first to specify number of fields */
set_ic35recid( ic35rec, FileRecId( fid, RecId(vca_recid( vobj )) ) );
(*vobj_to_ic35)( vobj, ic35rec );
return ic35rec;
}
/* compare IC35 record with vCard,vCal record
* ------------------------------------------
*/
static int
vca_cmpic35rec( IC35REC * ic35rec, VObject * vobj )
{
IC35REC * pimic35;
int rval;
if ( ic35rec == NULL && vobj == NULL )
return 0;
if ( ic35rec == NULL || vobj == NULL )
return -1;
if ( (pimic35 = new_ic35rec()) == NULL )
return -1;
vca_updic35rec( pimic35, vobj );
rval = cmp_ic35rec( ic35rec, pimic35 );
del_ic35rec( pimic35 );
return rval;
}
/* put IC35 record to (new) vCard,vCal record
* ------------------------------------------
*/
static VObject *
vca_putic35rec( IC35REC * ic35rec )
{
VObject * oldvobj;
VObject * vobj = NULL;
VObject * locvcal;
const char *id;
void (* ic35_to_vobj )(IC35REC*,VObject*);
switch ( FileId( ic35recid( ic35rec ) ) ) {
case FILEADDR: ic35_to_vobj = ic35addr_to_vcard; id = VCCardProp; break;
case FILEMEMO: ic35_to_vobj = ic35memo_to_vmemo; id = VCMemoProp; break;
case FILESCHED: ic35_to_vobj = ic35sched_to_vevent; id = VCEventProp; break;
case FILETODO: ic35_to_vobj = ic35todo_to_vtodo; id = VCTodoProp; break;
default:
return NULL;
}
if ( (vobj = oldvobj = vca_getrec_byID( ic35recid( ic35rec ) )) == NULL
&& (vobj = newVObject( id )) == NULL )
return NULL;
clr_vobjdirty();
(*ic35_to_vobj)( ic35rec, vobj );
SetModtimeIfdirty( vobj );
vca_set_recid( vobj, ic35recid( ic35rec ) );
vca_set_recstat( vobj, VCA_CLEAN );
if ( oldvobj != NULL )
return vobj;
switch ( vca_type( vobj ) ) {
case VCARD:
case VMEMO:
addList( &vcalist, vobj );
break;
case VEVENT:
case VTODO:
/* create vCalendar header of not yet present */
if ( (locvcal = vcal) == NULL )
locvcal = newVObject( VCCalProp );
if ( isAPropertyOf( locvcal, VCProdIdProp ) == NULL )
addPropValue( locvcal, VCProdIdProp,
"-//IC35//NONSGML IC35Calendar//EN" );
/* -//GNOME//NONSGML GnomeCalendar//EN */
/* -//K Desktop Environment//NONSGML KOrganizer//EN */
if ( isAPropertyOf( locvcal, VCVersionProp ) == NULL )
addPropValue( locvcal, VCVersionProp, "1.0" );
if ( isAPropertyOf( locvcal, VCTimeZoneProp ) == NULL
|| isAPropertyOf( locvcal, VCDCreatedProp ) == NULL ) {
extern long timezone;
time_t tnow;
struct tm * ptm;
char isodtime[24];
char tzoffset[8];
long tzmineastUTC;
tnow = time( NULL ); ptm = localtime( &tnow );
tzmineastUTC = -timezone / 60;
strftime( isodtime, sizeof(isodtime), "%Y-%m-%dT%T", ptm );
sprintf( tzoffset, "%+03ld:%02ld",
tzmineastUTC/60, tzmineastUTC%60 );
if ( isAPropertyOf( locvcal, VCTimeZoneProp ) == NULL )
addPropValue( locvcal, VCTimeZoneProp, tzoffset );
if ( isAPropertyOf( locvcal, VCDCreatedProp ) == NULL )
addPropValue( locvcal, VCDCreatedProp, isodtime );
}
if ( vcal == NULL )
addList( &vcalist, vcal = locvcal );
addVObjectProp( vcal, vobj );
break;
}
return vobj;
}
/* delete vCard,vCal record
* ------------------------
*/
static void
vca_delrec( VObject * vobj )
{
switch ( vca_type( vobj ) ) {
case VCARD:
case VMEMO:
cleanVObject( delList( &vcalist, vobj ) );
break;
case VEVENT:
case VTODO:
cleanVObject( delProp( vcal, vobj ) );
break;
}
}
/* get,set record-ID
* -----------------
*/
static ulong
vca_recid( VObject * vobj )
{
long recid;
if ( (recid = LongValue( vobj, XPilotIdProp )) == -1 )
return 0;
return (ulong)recid;
}
static void
vca_set_recid( VObject * vobj, ulong recid )
{
char * IC35id = "IC35id";
char * ouid;
char nuid[7+8+1];
ouid = StringValue( vobj, VCUniqueStringProp );
if ( !( ouid && *ouid ) /* not present yet */
|| strncmp( ouid, IC35id, strlen( IC35id ) ) == 0 ) { /* or IC35 recID */
sprintf( nuid, "IC35id-%08lX", recid );
SetString( vobj, VCUniqueStringProp, nuid ); /* korganizer wants UID */
}
SetLong( vobj, XPilotIdProp, recid );
}
/* get,set record-changeflag
* -------------------------
* gnomecard (from gnome-pim-1.2.0) does not maintain X-PILOTSTAT !
* as workaround the last-revised-time VCARD.REV is compared against
* the previous time of sync with IC35 'oldic35dt()' to obtain the
* record-status CLEAN or DIRTY.
*/
static int
vca_recstat( VObject * vobj )
{
long stat;
if ( (stat = LongValue( vobj, XPilotStatusProp )) == -1 )
return VCA_DIRTY;
if ( stat <= 0
&& vca_type( vobj ) == VCARD
&& oldic35dt() != 0
&& oldic35dt() < isodtime_to_unixtime( vobj, VCLastRevisedProp ) )
return VCA_DIRTY;
return (int)stat;
}
static void
vca_set_recstat( VObject * vobj, int stat )
{
SetLong( vobj, XPilotStatusProp, (long)stat );
}
/* vCard,vCal format operations
* ----------------------------
*/
struct pim_oper vca_oper = {
vca_open,
vca_close,
vca_rewind,
(void*(*)(int))vca_getrec,
(void*(*)(ulong))vca_getrec_byID,
(int(*)(IC35REC*,void*))vca_cmpic35rec,
(IC35REC*(*)(IC35REC*,void*))vca_updic35rec,
(void*(*)(IC35REC*))vca_putic35rec,
(void(*)(void*))vca_delrec,
(ulong(*)(void*))vca_recid,
(void(*)(void*,ulong))vca_set_recid,
(int(*)(void*))vca_recstat,
(void(*)(void*,int))vca_set_recstat,
};
Reference in New Issue View Git Blame Copy Permalink