<?php /** * EGroupware - Calendar iCal import and export via Horde iCalendar classes * * @link http://www.egroupware.org * @author Lars Kneschke <lkneschke@egroupware.org> * @author Ralf Becker <RalfBecker-AT-outdoor-training.de> * @author Joerg Lehrke <jlehrke@noc.de> * @license http://opensource.org/licenses/gpl-license.php GPL - GNU General Public License * @package calendar * @subpackage export * @version $Id$ */ require_once EGW_SERVER_ROOT.'/phpgwapi/inc/horde/lib/core.php'; /** * iCal import and export via Horde iCalendar classes * * @ToDo: NOT changing default-timezone as it messes up timezone calculation of timestamps eg. in calendar_boupdate::send_update * (currently fixed by restoring server-timezone in calendar_boupdate::send_update) */ class calendar_ical extends calendar_boupdate { /** * @var array $supportedFields array containing the supported fields of the importing device */ var $supportedFields; var $recur_days_1_0 = array( MCAL_M_MONDAY => 'MO', MCAL_M_TUESDAY => 'TU', MCAL_M_WEDNESDAY => 'WE', MCAL_M_THURSDAY => 'TH', MCAL_M_FRIDAY => 'FR', MCAL_M_SATURDAY => 'SA', MCAL_M_SUNDAY => 'SU', ); /** * @var array $status_egw2ical conversation of the participant status egw => ical */ var $status_egw2ical = array( 'U' => 'NEEDS-ACTION', 'A' => 'ACCEPTED', 'R' => 'DECLINED', 'T' => 'TENTATIVE', 'D' => 'DELEGATED' ); /** * @var array conversation of the participant status ical => egw */ var $status_ical2egw = array( 'NEEDS-ACTION' => 'U', 'NEEDS ACTION' => 'U', 'ACCEPTED' => 'A', 'DECLINED' => 'R', 'TENTATIVE' => 'T', 'DELEGATED' => 'D', 'X-UNINVITED' => 'G', // removed ); /** * @var array $priority_egw2ical conversion of the priority egw => ical */ var $priority_egw2ical = array( 0 => 0, // undefined 1 => 9, // low 2 => 5, // normal 3 => 1, // high ); /** * @var array $priority_ical2egw conversion of the priority ical => egw */ var $priority_ical2egw = array( 0 => 0, // undefined 9 => 1, 8 => 1, 7 => 1, 6 => 1, // low 5 => 2, // normal 4 => 3, 3 => 3, 2 => 3, 1 => 3, // high ); /** * @var array $priority_egw2funambol conversion of the priority egw => funambol */ var $priority_egw2funambol = array( 0 => 1, // undefined (mapped to normal since undefined does not exist) 1 => 0, // low 2 => 1, // normal 3 => 2, // high ); /** * @var array $priority_funambol2egw conversion of the priority funambol => egw */ var $priority_funambol2egw = array( 0 => 1, // low 1 => 2, // normal 2 => 3, // high ); /** * manufacturer and name of the sync-client * * @var string */ var $productManufacturer = 'file'; var $productName = ''; /** * user preference: import all-day events as non blocking * * @var boolean */ var $nonBlockingAllday = false; /** * user preference: attach UID entries to the DESCRIPTION * * @var boolean */ var $uidExtension = false; /** * user preference: calendar to synchronize with * * @var int */ var $calendarOwner = 0; /** * user preference: Use this timezone for import from and export to device * * === false => use event's TZ * === null => export in UTC * string => device TZ * * @var string|boolean */ var $tzid = null; /** * Device CTCap Properties * * @var array */ var $clientProperties; /** * vCalendar Instance for parsing * * @var array */ var $vCalendar; /** * Addressbook BO instance * * @var array */ var $addressbook; /** * Set Logging * * @var boolean */ var $log = false; var $logfile="/tmp/log-vcal"; /** * Constructor * * @param array $_clientProperties client properties */ function __construct(&$_clientProperties = array()) { parent::__construct(); if ($this->log) $this->logfile = $GLOBALS['egw_info']['server']['temp_dir']."/log-vcal"; $this->clientProperties = $_clientProperties; $this->vCalendar = new Horde_iCalendar; $this->addressbook = new addressbook_bo; } /** * Exports one calendar event to an iCalendar item * * @param int|array $events (array of) cal_id or array of the events with timestamps in server time * @param string $version='1.0' could be '2.0' too * @param string $method='PUBLISH' * @param int $recur_date=0 if set export the next recurrence at or after the timestamp, * default 0 => export whole series (or events, if not recurring) * @param string $principalURL='' Used for CalDAV exports * @param string $charset='UTF-8' encoding of the vcalendar, default UTF-8 * @return string|boolean string with iCal or false on error (e.g. no permission to read the event) */ function &exportVCal($events, $version='1.0', $method='PUBLISH', $recur_date=0, $principalURL='', $charset='UTF-8') { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "($version, $method, $recur_date, $principalURL, $charset)\n", 3, $this->logfile); } $egwSupportedFields = array( 'CLASS' => 'public', 'SUMMARY' => 'title', 'DESCRIPTION' => 'description', 'LOCATION' => 'location', 'DTSTART' => 'start', 'DTEND' => 'end', 'ATTENDEE' => 'participants', 'ORGANIZER' => 'owner', 'RRULE' => 'recur_type', 'EXDATE' => 'recur_exception', 'PRIORITY' => 'priority', 'TRANSP' => 'non_blocking', 'CATEGORIES' => 'category', 'UID' => 'uid', 'RECURRENCE-ID' => 'recurrence', 'SEQUENCE' => 'etag', 'STATUS' => 'status', 'ATTACH' => 'attachments', ); if (!is_array($this->supportedFields)) $this->setSupportedFields(); if ($this->productManufacturer == '' ) { // syncevolution is broken $version = '2.0'; } $vcal = new Horde_iCalendar; $vcal->setAttribute('PRODID','-//EGroupware//NONSGML EGroupware Calendar '.$GLOBALS['egw_info']['apps']['calendar']['version'].'//'. strtoupper($GLOBALS['egw_info']['user']['preferences']['common']['lang'])); $vcal->setAttribute('VERSION', $version); if ($method) $vcal->setAttribute('METHOD', $method); $events_exported = false; if (!is_array($events)) $events = array($events); $vtimezones_added = array(); foreach ($events as $event) { $organizerURL = ''; $organizerCN = false; $recurrence = $this->date2usertime($recur_date); $tzid = null; if ((!is_array($event) || empty($event['tzid']) && ($event = $event['id'])) && !($event = $this->read($event, $recurrence, false, 'server'))) { if ($this->read($event, $recurrence, true, 'server')) { if ($this->bo->check_perms(EGW_ACL_FREEBUSY, $event, 0, 'server')) { $this->bo->clear_private_infos($event, array($this->user, $event['owner'])); } else { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. '() User does not have the permission to read event ' . $event['id']. "\n", 3,$this->logfile); } return -1; // Permission denied } } else { $retval = false; // Entry does not exist if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "() Event $event not found.\n", 3, $this->logfile); } } continue; } if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. '() export event UID: ' . $event['uid'] . ".\n", 3, $this->logfile); } if ($this->tzid) { // explicit device timezone $tzid = $this->tzid; } elseif ($this->tzid === false) { // use event's timezone $tzid = $event['tzid']; } if (!isset(self::$tz_cache[$event['tzid']])) { self::$tz_cache[$event['tzid']] = calendar_timezones::DateTimeZone($event['tzid']); } if ($this->so->isWholeDay($event)) $event['whole_day'] = true; if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. '(' . $event['id']. ',' . $recurrence . ")\n" . array2string($event)."\n",3,$this->logfile); } if ($recurrence) { if (!($master = $this->read($event['id'], 0, true, 'server'))) continue; if (!isset($this->supportedFields['participants'])) { $days = $this->so->get_recurrence_exceptions($master, $tzid, 0, 0, 'tz_rrule'); if (isset($days[$recurrence])) { $recurrence = $days[$recurrence]; // use remote representation } else { // We don't need status only exceptions if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "($_id, $recurrence) Gratuitous pseudo exception, skipped ...\n", 3,$this->logfile); } continue; // unsupported status only exception } } else { $days = $this->so->get_recurrence_exceptions($master, $tzid, 0, 0, 'rrule'); if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__."()\n" . array2string($days)."\n",3,$this->logfile); } $recurrence = $days[$recurrence]; // use remote representation } // force single event foreach (array('recur_enddate','recur_interval','recur_exception','recur_data','recur_date','id','etag') as $name) { unset($event[$name]); } $event['recur_type'] = MCAL_RECUR_NONE; } // check if tzid of event (not only recuring ones) is already added to export if ($tzid && $tzid != 'UTC' && !in_array($tzid,$vtimezones_added)) { // check if we have vtimezone component data for tzid of event, if not default to user timezone (default to server tz) if (calendar_timezones::add_vtimezone($vcal, $tzid) || !in_array($tzid = egw_time::$user_timezone->getName(), $vtimezones_added) && calendar_timezones::add_vtimezone($vcal, $tzid)) { $vtimezones_added[] = $tzid; if (!isset(self::$tz_cache[$tzid])) { self::$tz_cache[$tzid] = calendar_timezones::DateTimeZone($tzid); } } } if ($this->productManufacturer != 'file' && $this->uidExtension) { // Append UID to DESCRIPTION if (!preg_match('/\[UID:.+\]/m', $event['description'])) { $event['description'] .= "\n[UID:" . $event['uid'] . "]"; } } $vevent = Horde_iCalendar::newComponent('VEVENT', $vcal); $parameters = $attributes = $values = array(); if ($this->productManufacturer == 'sonyericsson') { $eventDST = date('I', $event['start']); if ($eventDST) { $attributes['X-SONYERICSSON-DST'] = 4; } } if ($event['recur_type'] != MCAL_RECUR_NONE) { $exceptions = array(); // dont use "virtual" exceptions created by participant status for GroupDAV or file export if (!in_array($this->productManufacturer,array('file','groupdav'))) { $filter = isset($this->supportedFields['participants']) ? 'rrule' : 'tz_rrule'; $exceptions = $this->so->get_recurrence_exceptions($event, $tzid, 0, 0, $filter); if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__."(EXCEPTIONS)\n" . array2string($exceptions)."\n",3,$this->logfile); } } elseif (is_array($event['recur_exception'])) { $exceptions = array_unique($event['recur_exception']); sort($exceptions); } $event['recur_exception'] = $exceptions; } foreach ($egwSupportedFields as $icalFieldName => $egwFieldName) { if (!isset($this->supportedFields[$egwFieldName])) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. '(' . $event['id'] . ") [$icalFieldName] not supported\n", 3,$this->logfile); } continue; } $values[$icalFieldName] = array(); switch ($icalFieldName) { case 'ATTENDEE': foreach ((array)$event['participants'] as $uid => $status) { calendar_so::split_status($status, $quantity, $role); // do not include event owner/ORGANIZER as participant in his own calendar, if he is only participant if (count($event['participants']) == 1 && $event['owner'] == $uid) continue; if (!($info = $this->resource_info($uid))) continue; if ($status == 'X') continue; // dont include deleted participants if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . '()attendee:' . array2string($info) ."\n",3,$this->logfile); } $participantCN = trim(empty($info['cn']) ? $info['name'] : $info['cn']); $participantCN = str_replace(array('\\', ',', ';', ':'), array('\\\\', '\\,', '\\;', '\\:'), $participantCN); if ($version == '1.0') { $participantURL = trim('"' . $participantCN . '"' . (empty($info['email']) ? '' : ' <' . $info['email'] .'>')); } else { $participantURL = empty($info['email']) ? '' : 'MAILTO:' . $info['email']; } // RSVP={TRUE|FALSE} // resonse expected, not set in eGW => status=U $rsvp = $status == 'U' ? 'TRUE' : 'FALSE'; if ($role == 'CHAIR') { $organizerURL = $participantURL; $rsvp = ''; $organizerCN = $participantCN; $organizerUID = ($info['type'] != 'e' ? $uid : ''); } // PARTSTAT={NEEDS-ACTION|ACCEPTED|DECLINED|TENTATIVE|DELEGATED|COMPLETED|IN-PROGRESS} everything from delegated is NOT used by eGW atm. $status = $this->status_egw2ical[$status]; // CUTYPE={INDIVIDUAL|GROUP|RESOURCE|ROOM|UNKNOWN} switch ($info['type']) { case 'g': $cutype = 'GROUP'; $participantURL = 'urn:uuid:'.common::generate_uid('accounts', $uid); if (!isset($event['participants'][$this->user]) && ($members = $GLOBALS['egw']->accounts->members($uid, true)) && in_array($this->user, $members)) { $user = $this->resource_info($this->user); $attributes['ATTENDEE'][] = 'MAILTO:' . $user['email']; $parameters['ATTENDEE'][] = array( 'CN' => $user['name'], 'ROLE' => 'REQ-PARTICIPANT', 'PARTSTAT' => 'NEEDS-ACTION', 'CUTYPE' => 'INDIVIDUAL', 'RSVP' => 'TRUE', 'X-EGROUPWARE-UID' => $this->user, ); $event['participants'][$this->user] = true; } break; case 'r': $participantURL = 'urn:uuid:'.common::generate_uid('resources', substr($uid, 1)); $cutype = groupdav_principals::resource_is_location(substr($uid, 1)) ? 'ROOM' : 'RESOURCE'; // unset resource email (email of responsible user) as iCal at least has problems, // if resonpsible is also pariticipant or organizer unset($info['email']); break; case 'u': // account case 'c': // contact case 'e': // email address $cutype = 'INDIVIDUAL'; break; default: $cutype = 'UNKNOWN'; break; } // generate urn:uuid, if we have no other participant URL if (empty($participantURL) && $info && $info['app']) { $participantURL = 'urn:uuid:'.common::generate_uid($info['app'], substr($uid, 1)); } // ROLE={CHAIR|REQ-PARTICIPANT|OPT-PARTICIPANT|NON-PARTICIPANT|X-*} $options = array(); if (!empty($participantCN)) $options['CN'] = $participantCN; if (!empty($role)) $options['ROLE'] = $role; if (!empty($status)) $options['PARTSTAT'] = $status; if (!empty($cutype)) $options['CUTYPE'] = $cutype; if (!empty($rsvp)) $options['RSVP'] = $rsvp; if (!empty($info['email']) && $participantURL != 'MAILTO:'.$info['email']) { $options['EMAIL'] = $info['email']; // only add EMAIL attribute, if not already URL, as eg. Akonadi is reported to have problems with it } if ($info['type'] != 'e') $options['X-EGROUPWARE-UID'] = $uid; if ($quantity > 1) $options['X-EGROUPWARE-QUANTITY'] = $quantity; $attributes['ATTENDEE'][] = $participantURL; $parameters['ATTENDEE'][] = $options; } break; case 'CLASS': $attributes['CLASS'] = $event['public'] ? 'PUBLIC' : 'PRIVATE'; // Apple iCal on OS X uses X-CALENDARSERVER-ACCESS: CONFIDENTIAL on VCALANDAR (not VEVENT!) if (!$event['public']) $vcal->setAttribute('X-CALENDARSERVER-ACCESS', 'CONFIDENTIAL'); break; case 'ORGANIZER': if (!$organizerURL) { $organizerCN = '"' . trim($GLOBALS['egw']->accounts->id2name($event['owner'],'account_firstname') . ' ' . $GLOBALS['egw']->accounts->id2name($event['owner'],'account_lastname')) . '"'; $organizerEMail = $GLOBALS['egw']->accounts->id2name($event['owner'],'account_email'); if ($version == '1.0') { $organizerURL = trim($organizerCN . (empty($organizerURL) ? '' : ' <' . $organizerURL .'>')); } else { $organizerURL = empty($organizerEMail) ? '' : 'MAILTO:' . $organizerEMail; } $organizerUID = $event['owner']; if (!isset($event['participants'][$event['owner']])) { $options = array( 'ROLE' => 'CHAIR', 'PARTSTAT' => 'DELEGATED', 'CUTYPE' => 'INDIVIDUAL', //'RSVP' => 'FALSE', ); if (!empty($organizerCN)) $options['CN'] = $organizerCN; if (!empty($organizerEMail)) $options['EMAIL'] = $organizerEMail; if (!empty($event['owner'])) $options['X-EGROUPWARE-UID'] = $event['owner']; $attributes['ATTENDEE'][] = $organizerURL; $parameters['ATTENDEE'][] = $options; } } // do NOT use ORGANIZER for events without further participants or a different organizer if (count($event['participants']) > 1 || !isset($event['participants'][$event['owner']])) { $attributes['ORGANIZER'] = $organizerURL; $parameters['ORGANIZER']['CN'] = $organizerCN; if (!empty($organizerUID)) { $parameters['ORGANIZER']['X-EGROUPWARE-UID'] = $organizerUID; } } break; case 'DTSTART': if (empty($event['whole_day'])) { $attributes['DTSTART'] = self::getDateTime($event['start'],$tzid,$parameters['DTSTART']); } break; case 'DTEND': if (empty($event['whole_day'])) { $attributes['DTEND'] = self::getDateTime($event['end'],$tzid,$parameters['DTEND']); } else { // write start + end of whole day events as dates $event['end-nextday'] = $event['end'] + 12*3600; // we need the date of the next day, as DTEND is non-inclusive (= exclusive) in rfc2445 foreach (array('start' => 'DTSTART','end-nextday' => 'DTEND') as $f => $t) { $time = new egw_time($event[$f],egw_time::$server_timezone); $arr = egw_time::to($time,'array'); $vevent->setAttribute($t, array('year' => $arr['year'],'month' => $arr['month'],'mday' => $arr['day']), array('VALUE' => 'DATE')); } unset($attributes['DTSTART']); // Outlook does NOT care about type of DTSTART/END, only setting X-MICROSOFT-CDO-ALLDAYEVENT is used to determine an event is a whole-day event $vevent->setAttribute('X-MICROSOFT-CDO-ALLDAYEVENT','TRUE'); } break; case 'RRULE': if ($event['recur_type'] == MCAL_RECUR_NONE) break; // no recuring event $rriter = calendar_rrule::event2rrule($event, false, $tzid); $rrule = $rriter->generate_rrule($version); if ($event['recur_enddate']) { if ($this->productManufacturer == 'groupdav' && $this->productName == 'iphone') { // Fix iPhone issue $length = ($event['end'] - $event['start']); $rrule['UNTIL']->modify($length . ' second'); $rrule['UNTIL']->setTime(23, 59, 59); } else { $length = ($event['end'] - $event['start']) / 2; $rrule['UNTIL']->modify((int)$length . ' second'); } if (!$tzid || $version != '1.0') { if (!isset(self::$tz_cache['UTC'])) { self::$tz_cache['UTC'] = calendar_timezones::DateTimeZone('UTC'); } $rrule['UNTIL']->setTimezone(self::$tz_cache['UTC']); $rrule['UNTIL'] = $rrule['UNTIL']->format('Ymd\THis\Z'); } } if ($version == '1.0') { if ($event['recur_enddate'] && $tzid) { $rrule['UNTIL'] = self::getDateTime($rrule['UNTIL'],$tzid); } $attributes['RRULE'] = $rrule['FREQ'].' '.$rrule['UNTIL']; } else // $version == '2.0' { $attributes['RRULE'] = ''; $parameters['RRULE'] = $rrule; } break; case 'EXDATE': if ($event['recur_type'] == MCAL_RECUR_NONE) break; if (!empty($event['recur_exception'])) { if (empty($event['whole_day'])) { foreach ($event['recur_exception'] as $key => $timestamp) { $event['recur_exception'][$key] = self::getDateTime($timestamp,$tzid,$parameters['EXDATE']); } if ($version != '1.0') { // VALUE=DATE-TIME is default and optional // adding it causes iCal on iOS 5.1.1 / OSX 10.7.4 to fail to recognice exceptions if (!empty($tzid)) $parameters['EXDATE']['TZID'] = $tzid; } } else { // use 'DATE' instead of 'DATE-TIME' on whole day events foreach ($event['recur_exception'] as $id => $timestamp) { $time = new egw_time($timestamp,egw_time::$server_timezone); $time->setTimezone(self::$tz_cache[$event['tzid']]); $arr = egw_time::to($time,'array'); $days[$id] = array( 'year' => $arr['year'], 'month' => $arr['month'], 'mday' => $arr['day'], ); } $event['recur_exception'] = $days; if ($version != '1.0') $parameters['EXDATE']['VALUE'] = 'DATE'; } if ($this->productManufacturer == 'groupdav' && ($this->productName == 'iphone' || $this->productName == 'davkit')) { foreach ($event['recur_exception'] as $exdate) { $vevent->setAttribute('EXDATE', $exdate, $parameters['EXDATE']); } } else { $attributes['EXDATE'] = ''; $values['EXDATE'] = $event['recur_exception']; } } break; case 'PRIORITY': if ($this->productManufacturer == 'funambol' && (strpos($this->productName, 'outlook') !== false || strpos($this->productName, 'pocket pc') !== false)) { $attributes['PRIORITY'] = (int) $this->priority_egw2funambol[$event['priority']]; } else { $attributes['PRIORITY'] = (int) $this->priority_egw2ical[$event['priority']]; } break; case 'TRANSP': if ($version == '1.0') { $attributes['TRANSP'] = ($event['non_blocking'] ? 1 : 0); } else { $attributes['TRANSP'] = ($event['non_blocking'] ? 'TRANSPARENT' : 'OPAQUE'); } break; case 'STATUS': $attributes['STATUS'] = 'CONFIRMED'; break; case 'CATEGORIES': if ($event['category'] && ($values['CATEGORIES'] = $this->get_categories($event['category']))) { if (count($values['CATEGORIES']) == 1) { $attributes['CATEGORIES'] = array_shift($values['CATEGORIES']); } else { $attributes['CATEGORIES'] = ''; } } break; case 'RECURRENCE-ID': if ($version == '1.0') { $icalFieldName = 'X-RECURRENCE-ID'; } if ($recur_date) { // We handle a pseudo exception if (empty($event['whole_day'])) { $attributes[$icalFieldName] = self::getDateTime($recur_date,$tzid,$parameters[$icalFieldName]); } else { $time = new egw_time($recur_date,egw_time::$server_timezone); $time->setTimezone(self::$tz_cache[$event['tzid']]); $arr = egw_time::to($time,'array'); $vevent->setAttribute($icalFieldName, array( 'year' => $arr['year'], 'month' => $arr['month'], 'mday' => $arr['day']), array('VALUE' => 'DATE') ); } } elseif ($event['recurrence'] && $event['reference']) { // $event['reference'] is a calendar_id, not a timestamp if (!($revent = $this->read($event['reference']))) break; // referenced event does not exist if (empty($revent['whole_day'])) { $attributes[$icalFieldName] = self::getDateTime($event['recurrence'],$tzid,$parameters[$icalFieldName]); } else { $time = new egw_time($event['recurrence'],egw_time::$server_timezone); $time->setTimezone(self::$tz_cache[$event['tzid']]); $arr = egw_time::to($time,'array'); $vevent->setAttribute($icalFieldName, array( 'year' => $arr['year'], 'month' => $arr['month'], 'mday' => $arr['day']), array('VALUE' => 'DATE') ); } unset($revent); } break; case 'ATTACH': groupdav::add_attach('calendar', $event['id'], $attributes, $parameters); break; default: if (isset($this->clientProperties[$icalFieldName]['Size'])) { $size = $this->clientProperties[$icalFieldName]['Size']; $noTruncate = $this->clientProperties[$icalFieldName]['NoTruncate']; if ($this->log && $size > 0) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() $icalFieldName Size: $size, NoTruncate: " . ($noTruncate ? 'TRUE' : 'FALSE') . "\n",3,$this->logfile); } //Horde::logMessage("vCalendar $icalFieldName Size: $size, NoTruncate: " . // ($noTruncate ? 'TRUE' : 'FALSE'), __FILE__, __LINE__, PEAR_LOG_DEBUG); } else { $size = -1; $noTruncate = false; } $value = $event[$egwFieldName]; $cursize = strlen($value); if ($size > 0 && $cursize > $size) { if ($noTruncate) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() $icalFieldName omitted due to maximum size $size\n",3,$this->logfile); } //Horde::logMessage("vCalendar $icalFieldName omitted due to maximum size $size", // __FILE__, __LINE__, PEAR_LOG_WARNING); continue; // skip field } // truncate the value to size $value = substr($value, 0, $size - 1); if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() $icalFieldName truncated to maximum size $size\n",3,$this->logfile); } //Horde::logMessage("vCalendar $icalFieldName truncated to maximum size $size", // __FILE__, __LINE__, PEAR_LOG_INFO); } if (!empty($value) || ($size >= 0 && !$noTruncate)) { $attributes[$icalFieldName] = $value; } } } if ($this->productManufacturer == 'nokia') { if ($event['special'] == '1') { $attributes['X-EPOCAGENDAENTRYTYPE'] = 'ANNIVERSARY'; $attributes['DTEND'] = $attributes['DTSTART']; } elseif ($event['special'] == '2' || !empty($event['whole_day'])) { $attributes['X-EPOCAGENDAENTRYTYPE'] = 'EVENT'; } else { $attributes['X-EPOCAGENDAENTRYTYPE'] = 'APPOINTMENT'; } } if ($event['created'] || $event['modified']) { $attributes['CREATED'] = $event['created'] ? $event['created'] : $event['modified']; } if ($event['modified']) { $attributes['LAST-MODIFIED'] = $event['modified']; } $attributes['DTSTAMP'] = time(); foreach ((array)$event['alarm'] as $alarmID => $alarmData) { // skip over alarms that don't have the minimum required info if (!$alarmData['offset'] && !$alarmData['time']) continue; // skip alarms not being set for all users and alarms owned by other users if ($alarmData['all'] != true && $alarmData['owner'] != $this->user) { continue; } if ($alarmData['offset']) { $alarmData['time'] = $event['start'] - $alarmData['offset']; } $description = trim(preg_replace("/\r?\n?\\[[A-Z_]+:.*\\]/i", '', $event['description'])); if ($version == '1.0') { if ($event['title']) $description = $event['title']; if ($description) { $values['DALARM']['snooze_time'] = ''; $values['DALARM']['repeat count'] = ''; $values['DALARM']['display text'] = $description; $values['AALARM']['snooze_time'] = ''; $values['AALARM']['repeat count'] = ''; $values['AALARM']['display text'] = $description; } $attributes['DALARM'] = self::getDateTime($alarmData['time'],$tzid,$parameters['DALARM']); $attributes['AALARM'] = self::getDateTime($alarmData['time'],$tzid,$parameters['AALARM']); // lets take only the first alarm break; } else { // VCalendar 2.0 / RFC 2445 // RFC requires DESCRIPTION for DISPLAY if (!$event['title'] && !$description) continue; // Lightning infinitly pops up alarms for recuring events, if the only use an offset if ($this->productName == 'lightning' && $event['recur_type'] != MCAL_RECUR_NONE) { // return only future alarms to lightning if (($nextOccurence = $this->read($event['id'], $this->now_su + $alarmData['offset'], false, 'server'))) { $alarmData['time'] = $nextOccurence['start'] - $alarmData['offset']; $alarmData['offset'] = false; } else { continue; } } // for SyncML non-whole-day events always use absolute times // (probably because some devices have no clue about timezones) // GroupDAV uses offsets, as web UI assumes alarms are relative too // (with absolute times GroupDAV clients do NOT move alarms, if events move!) if ($this->productManufacturer != 'GroupDAV' && !empty($event['whole_day']) && $alarmData['offset']) { $alarmData['offset'] = false; } $valarm = Horde_iCalendar::newComponent('VALARM',$vevent); if ($alarmData['offset'] !== false) { $valarm->setAttribute('TRIGGER', -$alarmData['offset'], array('VALUE' => 'DURATION', 'RELATED' => 'START')); } else { $params = array('VALUE' => 'DATE-TIME'); $value = self::getDateTime($alarmData['time'],$tzid,$params); $valarm->setAttribute('TRIGGER', $value, $params); } $valarm->setAttribute('ACTION','DISPLAY'); $valarm->setAttribute('DESCRIPTION',$event['title'] ? $event['title'] : $description); $vevent->addComponent($valarm); } } foreach ($attributes as $key => $value) { foreach (is_array($value) && $parameters[$key]['VALUE']!='DATE' ? $value : array($value) as $valueID => $valueData) { $valueData = translation::convert($valueData,translation::charset(),$charset); $paramData = (array) translation::convert(is_array($value) ? $parameters[$key][$valueID] : $parameters[$key], translation::charset(),$charset); $valuesData = (array) translation::convert($values[$key], translation::charset(),$charset); $content = $valueData . implode(';', $valuesData); if (preg_match('/[^\x20-\x7F]/', $content) || ($paramData['CN'] && preg_match('/[^\x20-\x7F]/', $paramData['CN']))) { $paramData['CHARSET'] = $charset; switch ($this->productManufacturer) { case 'groupdav': if ($this->productName == 'kde') { $paramData['ENCODING'] = 'QUOTED-PRINTABLE'; } else { $paramData['CHARSET'] = ''; if (preg_match('/([\000-\012\015\016\020-\037\075])/', $valueData)) { $paramData['ENCODING'] = 'QUOTED-PRINTABLE'; } else { $paramData['ENCODING'] = ''; } } break; case 'funambol': $paramData['ENCODING'] = 'FUNAMBOL-QP'; } } /* if (preg_match('/([\000-\012])/', $valueData)) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() Has invalid XML data: $valueData",3,$this->logfile); } } */ $vevent->setAttribute($key, $valueData, $paramData, true, $valuesData); } } $vcal->addComponent($vevent); $events_exported = true; } $retval = $events_exported ? $vcal->exportvCalendar() : false; if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() '$this->productManufacturer','$this->productName'\n",3,$this->logfile); error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "()\n".array2string($retval)."\n",3,$this->logfile); } return $retval; } /** * Get DateTime value for a given time and timezone * * @param int|string|DateTime $time in server-time as returned by calendar_bo for $data_format='server' * @param string $tzid TZID of event or 'UTC' or NULL for palmos timestamps in usertime * @param array &$params=null parameter array to set TZID * @return mixed attribute value to set: integer timestamp if $tzid == 'UTC' otherwise Ymd\THis string IN $tzid */ static function getDateTime($time,$tzid,array &$params=null) { if (empty($tzid) || $tzid == 'UTC') { return egw_time::to($time,'ts'); } if (!is_a($time,'DateTime')) { $time = new egw_time($time,egw_time::$server_timezone); } if (!isset(self::$tz_cache[$tzid])) { self::$tz_cache[$tzid] = calendar_timezones::DateTimeZone($tzid); } $time->setTimezone(self::$tz_cache[$tzid]); $params['TZID'] = $tzid; return $time->format('Ymd\THis'); } /** * Number of events imported in last call to importVCal * * @var int */ var $events_imported; /** * Import an iCal * * @param string|resource $_vcalData * @param int $cal_id=-1 must be -1 for new entries! * @param string $etag=null if an etag is given, it has to match the current etag or the import will fail * @param boolean $merge=false merge data with existing entry * @param int $recur_date=0 if set, import the recurrence at this timestamp, * default 0 => import whole series (or events, if not recurring) * @param string $principalURL='' Used for CalDAV imports * @param int $user=null account_id of owner, default null * @param string $charset The encoding charset for $text. Defaults to * utf-8 for new format, iso-8859-1 for old format. * @param string $caldav_name=null name from CalDAV client or null (to use default) * @return int|boolean cal_id > 0 on success, false on failure or 0 for a failed etag|permission denied */ function importVCal($_vcalData, $cal_id=-1, $etag=null, $merge=false, $recur_date=0, $principalURL='', $user=null, $charset=null, $caldav_name=null,$skip_notification=false) { //error_log(__METHOD__."(, $cal_id, $etag, $merge, $recur_date, $principalURL, $user, $charset, $caldav_name)"); $this->events_imported = 0; $replace = $delete_exceptions= false; if (!is_array($this->supportedFields)) $this->setSupportedFields(); if (!($events = $this->icaltoegw($_vcalData, $principalURL, $charset))) { return false; } if (!is_array($events)) $cal_id = -1; // just to be sure, as iterator does NOT allow array access (eg. $events[0]) if ($cal_id > 0) { if (count($events) == 1) { $replace = $recur_date == 0; $events[0]['id'] = $cal_id; if (!is_null($etag)) $events[0]['etag'] = (int) $etag; if ($recur_date) $events[0]['recurrence'] = $recur_date; } elseif (($foundEvent = $this->find_event(array('id' => $cal_id), 'exact')) && ($eventId = array_shift($foundEvent)) && ($egwEvent = $this->read($eventId))) { foreach ($events as $k => $event) { if (!isset($event['uid'])) $events[$k]['uid'] = $egwEvent['uid']; } } } // check if we are importing an event series with exceptions in CalDAV // only first event / series master get's cal_id from URL // other events are exceptions and need to be checked if they are new // and for real (not status only) exceptions their recurrence-id need // to be included as recur_exception to the master if ($this->productManufacturer == 'groupdav' && $cal_id > 0 && $events[0]['recur_type'] != MCAL_RECUR_NONE) { calendar_groupdav::fix_series($events); } if ($this->tzid) { $tzid = $this->tzid; } else { $tzid = egw_time::$user_timezone->getName(); } date_default_timezone_set($tzid); foreach ($events as $event) { if (!is_array($event)) continue; // the iterator may return false ++$this->events_imported; if ($this->so->isWholeDay($event)) $event['whole_day'] = true; if (is_array($event['category'])) { $event['category'] = $this->find_or_add_categories($event['category'], isset($event['id']) ? $event['id'] : -1); } if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ ."($cal_id, $etag, $recur_date, $principalURL, $user, $charset)\n" . array2string($event)."\n",3,$this->logfile); } $updated_id = false; if ($replace) { $event_info['type'] = $event['recur_type'] == MCAL_RECUR_NONE ? 'SINGLE' : 'SERIES-MASTER'; $event_info['acl_edit'] = $this->check_perms(EGW_ACL_EDIT, $cal_id); if (($event_info['stored_event'] = $this->read($cal_id, 0, false, 'server')) && $event_info['stored_event']['recur_type'] != MCAL_RECUR_NONE && ($event_info['stored_event']['recur_type'] != $event['recur_type'] || $event_info['stored_event']['recur_interval'] != $event['recur_interval'] || $event_info['stored_event']['recur_data'] != $event['recur_data'] || $event_info['stored_event']['start'] != $event['start'])) { // handle the old exceptions $recur_exceptions = $this->so->get_related($event_info['stored_event']['uid']); foreach ($recur_exceptions as $id) { if ($delete_exceptions) { $this->delete($id,0,false,$skip_notification); } else { if (!($exception = $this->read($id))) continue; $exception['uid'] = common::generate_uid('calendar', $id); $exception['reference'] = $exception['recurrence'] = 0; $this->update($exception, true,true,false,true,$msg,$skip_notification); } } } } else { $event_info = $this->get_event_info($event); } // common adjustments for existing events if (is_array($event_info['stored_event'])) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "(UPDATE Event)\n" . array2string($event_info['stored_event'])."\n",3,$this->logfile); } if (empty($event['uid'])) { $event['uid'] = $event_info['stored_event']['uid']; // restore the UID if it was not delivered } elseif (empty($event['id'])) { $event['id'] = $event_info['stored_event']['id']; // CalDAV does only provide UIDs } if (is_array($event['participants'])) { // if the client does not return a status, we restore the original one foreach ($event['participants'] as $uid => $status) { if ($status[0] == 'X') { if (isset($event_info['stored_event']['participants'][$uid])) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "() Restore status for $uid\n",3,$this->logfile); } $event['participants'][$uid] = $event_info['stored_event']['participants'][$uid]; } else { $event['participants'][$uid] = calendar_so::combine_status('U'); } } } } if ($merge) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "()[MERGE]\n",3,$this->logfile); } // overwrite with server data for merge foreach ($event_info['stored_event'] as $key => $value) { switch ($key) { case 'participants_types': continue; case 'participants': foreach ($event_info['stored_event']['participants'] as $uid => $status) { // Is a participant and no longer present in the event? if (!isset($event['participants'][$uid])) { // Add it back in $event['participants'][$uid] = $status; } } break; default: if (!empty($value)) $event[$key] = $value; } } } else { // no merge if(!isset($this->supportedFields['category']) || !isset($event['category'])) { $event['category'] = $event_info['stored_event']['category']; } if (!isset($this->supportedFields['participants']) || !$event['participants'] || !is_array($event['participants']) || !count($event['participants'])) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "() No participants\n",3,$this->logfile); } // If this is an updated meeting, and the client doesn't support // participants OR the event no longer contains participants, add them back unset($event['participants']); } // since we export now all participants in CalDAV as urn:uuid, if they have no email, // we dont need and dont want that special treatment anymore, as it keeps client from changing resources elseif ($this->productManufacturer != 'groupdav') { foreach ($event_info['stored_event']['participants'] as $uid => $status) { // Is it a resource and no longer present in the event? if ($uid[0] == 'r' && !isset($event['participants'][$uid])) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "() Restore resource $uid to status $status\n",3,$this->logfile); } // Add it back in $event['participants'][$uid] = $status; } } } /* Modifying an existing event with timezone different from default timezone of user * to a whole-day event (no timezone allowed according to iCal rfc) * --> code to modify start- and end-time here creates a one day longer event! * Skipping that code, creates the event correct in default timezone of user if (!empty($event['whole_day']) && $event['tzid'] != $event_info['stored_event']['tzid']) { // Adjust dates to original TZ $time = new egw_time($event['start'],egw_time::$server_timezone); $time =& $this->so->startOfDay($time, $event_info['stored_event']['tzid']); $event['start'] = egw_time::to($time,'server'); //$time = new egw_time($event['end'],egw_time::$server_timezone); //$time =& $this->so->startOfDay($time, $event_info['stored_event']['tzid']); //$time->setTime(23, 59, 59); $time->modify('+'.round(($event['end']-$event['start'])/DAY_s).' day'); $event['end'] = egw_time::to($time,'server'); if ($event['recur_type'] != MCAL_RECUR_NONE) { foreach ($event['recur_exception'] as $key => $day) { $time = new egw_time($day,egw_time::$server_timezone); $time =& $this->so->startOfDay($time, $event_info['stored_event']['tzid']); $event['recur_exception'][$key] = egw_time::to($time,'server'); } } elseif ($event['recurrence']) { $time = new egw_time($event['recurrence'],egw_time::$server_timezone); $time =& $this->so->startOfDay($time, $event_info['stored_event']['tzid']); $event['recurrence'] = egw_time::to($time,'server'); } error_log(__METHOD__."() TZ adjusted {$event_info['stored_event']['tzid']} --> {$event['tzid']} event=".array2string($event)); }*/ calendar_rrule::rrule2tz($event, $event_info['stored_event']['start'], $event_info['stored_event']['tzid']); $event['tzid'] = $event_info['stored_event']['tzid']; // avoid that iCal changes the organizer, which is not allowed $event['owner'] = $event_info['stored_event']['owner']; } $event['caldav_name'] = $event_info['stored_event']['caldav_name']; // as we no longer export event owner/ORGANIZER as only participant, we have to re-add owner as participant // to not loose him, as EGroupware knows events without owner/ORGANIZER as participant if (isset($event_info['stored_event']['participants'][$event['owner']]) && !isset($event['participants'][$event['owner']])) { $event['participant'][$event['owner']] = $event_info['stored_event']['participants'][$event['owner']]; } } else // common adjustments for new events { unset($event['id']); if ($caldav_name) $event['caldav_name'] = $caldav_name; // set non blocking all day depending on the user setting if (!empty($event['whole_day']) && $this->nonBlockingAllday) { $event['non_blocking'] = 1; } if (!is_null($user)) { if ($user > 0 && $this->check_perms(EGW_ACL_ADD, 0, $user)) { $event['owner'] = $user; } elseif ($user > 0) { date_default_timezone_set($GLOBALS['egw_info']['server']['server_timezone']); return 0; // no permission } else { // add group or resource invitation $event['owner'] = $this->user; if (!isset($event['participants'][$this->user])) { $event['participants'][$this->user] = calendar_so::combine_status('A', 1, 'CHAIR'); } // for resources check which new-status to give (eg. with direct booking permision 'A' instead 'U') $event['participants'][$user] = calendar_so::combine_status( $user < 0 || !isset($this->resources[$user[0]]['new_status']) ? 'U' : ExecMethod($this->resources[$user[0]]['new_status'], substr($user, 1))); } } // check if an owner is set and the current user has add rights // for that owners calendar; if not set the current user elseif (!isset($event['owner']) || !$this->check_perms(EGW_ACL_ADD, 0, $event['owner'])) { $event['owner'] = $this->user; } if (!$event['participants'] || !is_array($event['participants']) || !count($event['participants']) // for new events, allways add owner as participant. Users expect to participate too, if they invite further participants. // They can now only remove themselfs, if that is desired, after storing the event first. || !isset($event['participants'][$event['owner']])) { $status = $event['owner'] == $this->user ? 'A' : 'U'; $status = calendar_so::combine_status($status, 1, 'CHAIR'); if (!is_array($event['participants'])) $event['participants'] = array(); $event['participants'][$event['owner']] = $status; } else { foreach ($event['participants'] as $uid => $status) { // if the client did not give us a proper status => set default if ($status[0] == 'X') { if ($uid == $event['owner']) { $event['participants'][$uid] = calendar_so::combine_status('A', 1, 'CHAIR'); } else { $event['participants'][$uid] = calendar_so::combine_status('U'); } } } } } // update alarms depending on the given event type if (count($event['alarm']) > 0 || isset($this->supportedFields['alarm'])) { switch ($event_info['type']) { case 'SINGLE': case 'SERIES-MASTER': case 'SERIES-EXCEPTION': case 'SERIES-EXCEPTION-PROPAGATE': if (count($event['alarm']) > 0) { foreach ($event['alarm'] as $newid => &$alarm) { if (!isset($alarm['offset']) && isset($alarm['time'])) { $alarm['offset'] = $event['start'] - $alarm['time']; } elseif (!isset($alarm['time']) && isset($alarm['offset'])) { $alarm['time'] = $event['start'] - $alarm['offset']; } $alarm['owner'] = $this->user; $alarm['all'] = false; // if no edit rights, allow participants to set alarms directly (like status) if ($event_info['stored_event'] && !$event_info['acl_edit']) { if ($alarm['time'] < time() && !calendar_so::shift_alarm($event, $alarm)) { continue; //pgoerzen: don't add an alarm in the past } $this->save_alarm($event_info['stored_event']['id'], $alarm); } if (is_array($event_info['stored_event']) && count($event_info['stored_event']['alarm']) > 0) { foreach ($event_info['stored_event']['alarm'] as $alarm_id => $alarm_data) { if ($alarm['offset'] == $alarm_data['offset'] && ($alarm_data['all'] || $alarm_data['owner'] == $this->user)) { unset($event['alarm'][$newid]); unset($event_info['stored_event']['alarm'][$alarm_id]); continue 2; } } } } } break; case 'SERIES-PSEUDO-EXCEPTION': // nothing to do here break; } if (is_array($event_info['stored_event']) && count($event_info['stored_event']['alarm']) > 0) { foreach ($event_info['stored_event']['alarm'] as $alarm_id => $alarm_data) { // only touch own alarms if ($alarm_data['all'] == false && $alarm_data['owner'] == $this->user) { $this->delete_alarm($alarm_id); } } } } if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . '(' . $event_info['type'] . ")\n" . array2string($event)."\n",3,$this->logfile); } // Android (any maybe others) delete recurrences by setting STATUS: CANCELLED // as we ignore STATUS we have to delete the recurrence by calling delete if (in_array($event_info['type'], array('SERIES-EXCEPTION', 'SERIES-EXCEPTION-PROPAGATE', 'SERIES-PSEUDO-EXCEPTION')) && $event['status'] == 'CANCELLED') { if (!$this->delete($event['id'] ? $event['id'] : $cal_id, $event['recurrence'],false,$skip_notification)) { // delete fails (because no rights), reject recurrence $this->set_status($event['id'] ? $event['id'] : $cal_id, $this->user, 'R', $event['recurrence'],false,true,$skip_notification); } continue; } // save event depending on the given event type switch ($event_info['type']) { case 'SINGLE': if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "(): event SINGLE\n",3,$this->logfile); } // update the event if ($event_info['acl_edit']) { // Force SINGLE $event['reference'] = 0; $event_to_store = $event; // prevent $event from being changed by the update method $this->server2usertime($event_to_store); $updated_id = $this->update($event_to_store, true,true,false,true,$msg,$skip_notification); unset($event_to_store); } break; case 'SERIES-MASTER': if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "(): event SERIES-MASTER\n",3,$this->logfile); } // remove all known pseudo exceptions and update the event if ($event_info['acl_edit']) { $filter = isset($this->supportedFields['participants']) ? 'map' : 'tz_map'; $days = $this->so->get_recurrence_exceptions($event_info['stored_event'], $this->tzid, 0, 0, $filter); if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__."(EXCEPTIONS MAPPING):\n" . array2string($days)."\n",3,$this->logfile); } if (is_array($days)) { $recur_exceptions = array(); foreach ($event['recur_exception'] as $recur_exception) { if (isset($days[$recur_exception])) { $recur_exceptions[] = $days[$recur_exception]; } } $event['recur_exception'] = $recur_exceptions; } $event_to_store = $event; // prevent $event from being changed by the update method $this->server2usertime($event_to_store); $updated_id = $this->update($event_to_store, true,true,false,true,$msg,$skip_notification); unset($event_to_store); } break; case 'SERIES-EXCEPTION': case 'SERIES-EXCEPTION-PROPAGATE': if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "(): event SERIES-EXCEPTION\n",3,$this->logfile); } // update event if ($event_info['acl_edit']) { if (isset($event_info['stored_event']['id'])) { // We update an existing exception $event['id'] = $event_info['stored_event']['id']; $event['category'] = $event_info['stored_event']['category']; } else { // We create a new exception unset($event['id']); unset($event_info['stored_event']); $event['recur_type'] = MCAL_RECUR_NONE; if (empty($event['recurrence'])) { // find an existing exception slot $occurence = $exception = false; foreach ($event_info['master_event']['recur_exception'] as $exception) { if ($exception > $event['start']) break; $occurence = $exception; } if (!$occurence) { if (!$exception) { // use start as dummy recurrence $event['recurrence'] = $event['start']; } else { $event['recurrence'] = $exception; } } else { $event['recurrence'] = $occurence; } } else { $event_info['master_event']['recur_exception'] = array_unique(array_merge($event_info['master_event']['recur_exception'], array($event['recurrence']))); } $event['reference'] = $event_info['master_event']['id']; $event['category'] = $event_info['master_event']['category']; $event['owner'] = $event_info['master_event']['owner']; $event_to_store = $event_info['master_event']; // prevent the master_event from being changed by the update method $this->server2usertime($event_to_store); $this->update($event_to_store, true,true,false,true,$msg,$skip_notification); unset($event_to_store); } $event_to_store = $event; // prevent $event from being changed by update method $this->server2usertime($event_to_store); $updated_id = $this->update($event_to_store, true,true,false,true,$msg,$skip_notification); unset($event_to_store); } break; case 'SERIES-PSEUDO-EXCEPTION': if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "(): event SERIES-PSEUDO-EXCEPTION\n",3,$this->logfile); } //Horde::logMessage('importVCAL event SERIES-PSEUDO-EXCEPTION', // __FILE__, __LINE__, PEAR_LOG_DEBUG); if ($event_info['acl_edit']) { // truncate the status only exception from the series master $recur_exceptions = array(); foreach ($event_info['master_event']['recur_exception'] as $recur_exception) { if ($recur_exception != $event['recurrence']) { $recur_exceptions[] = $recur_exception; } } $event_info['master_event']['recur_exception'] = $recur_exceptions; // save the series master with the adjusted exceptions $event_to_store = $event_info['master_event']; // prevent the master_event from being changed by the update method $this->server2usertime($event_to_store); $updated_id = $this->update($event_to_store, true, true, false, false,$msg,$skip_notification); unset($event_to_store); } break; } // read stored event into info array for fresh stored (new) events if (!is_array($event_info['stored_event']) && $updated_id > 0) { $event_info['stored_event'] = $this->read($updated_id, 0, false, 'server'); } if (isset($event['participants'])) { // update status depending on the given event type switch ($event_info['type']) { case 'SINGLE': case 'SERIES-MASTER': case 'SERIES-EXCEPTION': case 'SERIES-EXCEPTION-PROPAGATE': if (is_array($event_info['stored_event'])) // status update requires a stored event { if ($event_info['acl_edit']) { // update all participants if we have the right to do that $this->update_status($event, $event_info['stored_event'],0,$skip_notification); } elseif (isset($event['participants'][$this->user]) || isset($event_info['stored_event']['participants'][$this->user])) { // update the users status only $this->set_status($event_info['stored_event']['id'], $this->user, ($event['participants'][$this->user] ? $event['participants'][$this->user] : 'R'), 0, true,true,$skip_notification); } } break; case 'SERIES-PSEUDO-EXCEPTION': if (is_array($event_info['master_event'])) // status update requires a stored master event { $recurrence = $this->date2usertime($event['recurrence']); if ($event_info['acl_edit']) { // update all participants if we have the right to do that $this->update_status($event, $event_info['stored_event'], $recurrence,$skip_notification); } elseif (isset($event['participants'][$this->user]) || isset($event_info['master_event']['participants'][$this->user])) { // update the users status only $this->set_status($event_info['master_event']['id'], $this->user, ($event['participants'][$this->user] ? $event['participants'][$this->user] : 'R'), $recurrence, true,true,$skip_notification); } } break; } } // choose which id to return to the client switch ($event_info['type']) { case 'SINGLE': case 'SERIES-MASTER': case 'SERIES-EXCEPTION': $return_id = is_array($event_info['stored_event']) ? $event_info['stored_event']['id'] : false; break; case 'SERIES-PSEUDO-EXCEPTION': $return_id = is_array($event_info['master_event']) ? $event_info['master_event']['id'] . ':' . $event['recurrence'] : false; break; case 'SERIES-EXCEPTION-PROPAGATE': if ($event_info['acl_edit'] && is_array($event_info['stored_event'])) { // we had sufficient rights to propagate the status only exception to a real one $return_id = $event_info['stored_event']['id']; } else { // we did not have sufficient rights to propagate the status only exception to a real one // we have to keep the SERIES-PSEUDO-EXCEPTION id and keep the event untouched $return_id = $event_info['master_event']['id'] . ':' . $event['recurrence']; } break; } // handle ATTACH attribute for managed attachments if ($updated_id) { groupdav::handle_attach('calendar', $updated_id, $event['attach'], $event['attach-delete-by-put']); } if ($this->log) { $event_info['stored_event'] = $this->read($event_info['stored_event']['id']); error_log(__FILE__.'['.__LINE__.'] '.__METHOD__."()[$updated_id]\n" . array2string($event_info['stored_event'])."\n",3,$this->logfile); } } date_default_timezone_set($GLOBALS['egw_info']['server']['server_timezone']); return $updated_id === 0 ? 0 : $return_id; } /** * get the value of an attribute by its name * * @param array $attributes * @param string $name eg. 'DTSTART' * @param string $what='value' * @return mixed */ static function _get_attribute($components,$name,$what='value') { foreach ($components as $attribute) { if ($attribute['name'] == $name) { return !$what ? $attribute : $attribute[$what]; } } return false; } static function valarm2egw(&$alarms, &$valarm) { $count = 0; foreach ($valarm->_attributes as $vattr) { switch ($vattr['name']) { case 'TRIGGER': $vtype = (isset($vattr['params']['VALUE'])) ? $vattr['params']['VALUE'] : 'DURATION'; //default type switch ($vtype) { case 'DURATION': if (isset($vattr['params']['RELATED']) && $vattr['params']['RELATED'] != 'START') { error_log("Unsupported VALARM offset anchor ".$vattr['params']['RELATED']); } else { $alarms[] = array('offset' => -$vattr['value']); $count++; } break; case 'DATE-TIME': $alarms[] = array('time' => $vattr['value']); $count++; break; default: // we should also do ;RELATED=START|END error_log('VALARM/TRIGGER: unsupported value type:' . $vtype); } break; case 'ACTION': case 'DISPLAY': case 'DESCRIPTION': case 'SUMMARY': case 'ATTACH': case 'ATTENDEE': // we ignore these fields silently break; default: error_log('VALARM field ' .$vattr['name'] . ': ' . $vattr['value'] . ' HAS NO CONVERSION YET'); } } return $count; } function setSupportedFields($_productManufacturer='', $_productName='') { $state =& $_SESSION['SyncML.state']; if (isset($state)) { $deviceInfo = $state->getClientDeviceInfo(); } // store product manufacturer and name for further usage if ($_productManufacturer) { $this->productManufacturer = strtolower($_productManufacturer); $this->productName = strtolower($_productName); } if (isset($deviceInfo) && is_array($deviceInfo)) { /* if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. '() ' . array2string($deviceInfo) . "\n",3,$this->logfile); } */ if (isset($deviceInfo['uidExtension']) && $deviceInfo['uidExtension']) { $this->uidExtension = true; } if (isset($deviceInfo['nonBlockingAllday']) && $deviceInfo['nonBlockingAllday']) { $this->nonBlockingAllday = true; } if (isset($deviceInfo['tzid']) && $deviceInfo['tzid']) { switch ($deviceInfo['tzid']) { case -1: $this->tzid = false; // use event's TZ break; case -2: $this->tzid = null; // use UTC for export break; default: $this->tzid = $deviceInfo['tzid']; } } elseif (strpos($this->productName, 'palmos') !== false) { // for palmos we have to use user-time and NO timezone $this->tzid = false; } if (isset($GLOBALS['egw_info']['user']['preferences']['syncml']['calendar_owner'])) { $owner = $GLOBALS['egw_info']['user']['preferences']['syncml']['calendar_owner']; switch ($owner) { case 'G': case 'P': case 0: case -1: $owner = $this->user; break; default: if ((int)$owner && $this->check_perms(EGW_ACL_EDIT, 0, $owner)) { $this->calendarOwner = $owner; } } } if (!isset($this->productManufacturer) || $this->productManufacturer == '' || $this->productManufacturer == 'file') { $this->productManufacturer = strtolower($deviceInfo['manufacturer']); } if (!isset($this->productName) || $this->productName == '') { $this->productName = strtolower($deviceInfo['model']); } } $defaultFields['minimal'] = array( 'public' => 'public', 'description' => 'description', 'end' => 'end', 'start' => 'start', 'location' => 'location', 'recur_type' => 'recur_type', 'recur_interval' => 'recur_interval', 'recur_data' => 'recur_data', 'recur_enddate' => 'recur_enddate', 'recur_exception' => 'recur_exception', 'title' => 'title', 'alarm' => 'alarm', 'whole_day' => 'whole_day', ); $defaultFields['basic'] = $defaultFields['minimal'] + array( 'priority' => 'priority', ); $defaultFields['nexthaus'] = $defaultFields['basic'] + array( 'participants' => 'participants', 'uid' => 'uid', ); $defaultFields['s60'] = $defaultFields['basic'] + array( 'category' => 'category', 'recurrence' => 'recurrence', 'uid' => 'uid', ); $defaultFields['synthesis'] = $defaultFields['basic'] + array( 'participants' => 'participants', 'owner' => 'owner', 'category' => 'category', 'non_blocking' => 'non_blocking', 'uid' => 'uid', 'recurrence' => 'recurrence', 'etag' => 'etag', ); $defaultFields['funambol'] = $defaultFields['basic'] + array( 'participants' => 'participants', 'owner' => 'owner', 'category' => 'category', 'non_blocking' => 'non_blocking', ); $defaultFields['evolution'] = $defaultFields['basic'] + array( 'participants' => 'participants', 'owner' => 'owner', 'category' => 'category', 'uid' => 'uid', ); $defaultFields['full'] = $defaultFields['basic'] + array( 'participants' => 'participants', 'owner' => 'owner', 'category' => 'category', 'non_blocking' => 'non_blocking', 'uid' => 'uid', 'recurrence' => 'recurrence', 'etag' => 'etag', 'status' => 'status', ); switch ($this->productManufacturer) { case 'nexthaus corporation': case 'nexthaus corp': switch ($this->productName) { default: $this->supportedFields = $defaultFields['nexthaus']; break; } break; // multisync does not provide anymore information then the manufacturer // we suppose multisync with evolution case 'the multisync project': switch ($this->productName) { default: $this->supportedFields = $defaultFields['basic']; break; } break; case 'siemens': switch ($this->productName) { case 'sx1': $this->supportedFields = $defaultFields['minimal']; break; default: error_log("Unknown Siemens phone '$_productName', using minimal set"); $this->supportedFields = $defaultFields['minimal']; break; } break; case 'nokia': switch ($this->productName) { case 'e61': $this->supportedFields = $defaultFields['minimal']; break; case 'e51': case 'e90': case 'e71': case 'e72-1': case 'e75-1': case 'e66': case '6120c': case 'nokia 6131': case 'n97': case 'n97 mini': case '5800 xpressmusic': $this->supportedFields = $defaultFields['s60']; break; default: if ($this->productName[0] == 'e') { $model = 'E90'; $this->supportedFields = $defaultFields['s60']; } else { $model = 'E61'; $this->supportedFields = $defaultFields['minimal']; } error_log("Unknown Nokia phone '$_productName', assuming same as '$model'"); break; } break; case 'sonyericsson': case 'sony ericsson': switch ($this->productName) { case 'd750i': case 'p910i': case 'g705i': case 'w890i': $this->supportedFields = $defaultFields['basic']; break; default: error_log("Unknown Sony Ericsson phone '$this->productName' assuming d750i"); $this->supportedFields = $defaultFields['basic']; break; } break; case 'synthesis ag': switch ($this->productName) { case 'sysync client pocketpc std': case 'sysync client pocketpc pro': case 'sysync client iphone contacts': case 'sysync client iphone contacts+todoz': default: $this->supportedFields = $defaultFields['synthesis']; break; } break; //Syncevolution compatibility case 'patrick ohly': $this->supportedFields = $defaultFields['evolution']; break; case '': // seems syncevolution 0.5 doesn't send a manufacturer error_log("No vendor name, assuming syncevolution 0.5"); $this->supportedFields = $defaultFields['evolution']; break; case 'file': // used outside of SyncML, eg. by the calendar itself ==> all possible fields if ($this->cal_prefs['export_timezone']) { $this->tzid = $this->cal_prefs['export_timezone']; } else // not set or '0' = use event TZ { $this->tzid = false; // use event's TZ } $this->supportedFields = $defaultFields['full']; break; case 'full': case 'groupdav': // all GroupDAV access goes through here $this->tzid = false; // use event's TZ switch ($this->productName) { default: $this->supportedFields = $defaultFields['full']; unset($this->supportedFields['whole_day']); } break; case 'funambol': $this->supportedFields = $defaultFields['funambol']; break; // the fallback for SyncML default: error_log("Unknown calendar SyncML client: manufacturer='$this->productManufacturer' product='$this->productName'"); $this->supportedFields = $defaultFields['synthesis']; } if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. '(' . $this->productManufacturer . ', '. $this->productName .', ' . ($this->tzid ? $this->tzid : egw_time::$user_timezone->getName()) . ', ' . $this->calendarOwner . ")\n" , 3, $this->logfile); } //Horde::logMessage('setSupportedFields(' . $this->productManufacturer . ', ' // . $this->productName .', ' . // ($this->tzid ? $this->tzid : egw_time::$user_timezone->getName()) .')', // __FILE__, __LINE__, PEAR_LOG_DEBUG); } /** * Convert vCalendar data in EGw events * * @param string|resource $_vcalData * @param string $principalURL='' Used for CalDAV imports * @param string $charset The encoding charset for $text. Defaults to * utf-8 for new format, iso-8859-1 for old format. * @return Iterator|array|boolean Iterator if resource given or array of events on success, false on failure */ function icaltoegw($_vcalData, $principalURL='', $charset=null) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__."($principalURL, $charset)\n" . array2string($_vcalData)."\n",3,$this->logfile); } if (!is_array($this->supportedFields)) $this->setSupportedFields(); // we use egw_ical_iterator only on resources, as calling importVCal() accesses single events like an array (eg. $events[0]) if (is_resource($_vcalData)) { return new egw_ical_iterator($_vcalData,'VCALENDAR',$charset,array($this,'_ical2egw_callback'),array($this->tzid,$principalURL)); } if ($this->tzid) { $tzid = $this->tzid; } else { $tzid = egw_time::$user_timezone->getName(); } date_default_timezone_set($tzid); $events = array(); $vcal = new Horde_iCalendar; if (!$vcal->parsevCalendar($_vcalData, 'VCALENDAR', $charset)) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__. "(): No vCalendar Container found!\n",3,$this->logfile); } date_default_timezone_set($GLOBALS['egw_info']['server']['server_timezone']); return false; } $version = $vcal->getAttribute('VERSION'); foreach ($vcal->getComponents() as $n => $component) { if (($event = $this->_ical2egw_callback($component,$this->tzid,$principalURL))) { $events[] = $event; } } date_default_timezone_set($GLOBALS['egw_info']['server']['server_timezone']); return $events; } /** * Callback for egw_ical_iterator to convert Horde_iCalendar_vevent to EGw event array * * @param Horde_iCalendar $component * @param string $tzid timezone * @param string $principalURL='' Used for CalDAV imports * @return array|boolean event array or false if $component is no Horde_iCalendar_vevent */ function _ical2egw_callback(Horde_iCalendar $component, $tzid, $principalURL='') { //unset($component->_container); _debug_array($component); if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__.'() '.get_class($component)." found\n",3,$this->logfile); } if (!is_a($component, 'Horde_iCalendar_vevent') || !($event = $this->vevent2egw($component, $component->_container->getAttribute('VERSION'), $this->supportedFields, $principalURL))) { return false; } //common adjustments if ($this->productManufacturer == '' && $this->productName == '' && !empty($event['recur_enddate'])) { // syncevolution needs an adjusted recur_enddate $event['recur_enddate'] = (int)$event['recur_enddate'] + 86400; } if ($event['recur_type'] != MCAL_RECUR_NONE) { // No reference or RECURRENCE-ID for the series master $event['reference'] = $event['recurrence'] = 0; } // handle the alarms $alarms = $event['alarm']; foreach ($component->getComponents() as $valarm) { if (is_a($valarm, 'Horde_iCalendar_valarm')) { $this->valarm2egw($alarms, $valarm); } } $event['alarm'] = $alarms; if ($tzid || empty($event['tzid'])) { $event['tzid'] = $tzid; } return $event; } /** * Parse a VEVENT * * @param array $component VEVENT * @param string $version vCal version (1.0/2.0) * @param array $supportedFields supported fields of the device * @param string $principalURL='' Used for CalDAV imports, no longer used in favor of groupdav_principals::url2uid() * @param string $check_component='Horde_iCalendar_vevent' * * @return array|boolean event on success, false on failure */ function vevent2egw(&$component, $version, $supportedFields, $principalURL='', $check_component='Horde_iCalendar_vevent') { if ($check_component && !is_a($component, $check_component)) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__.'()' . get_class($component)." found\n",3,$this->logfile); } return false; } /* $mozillaACK = $component->getAttribute('X-MOZ-LASTACK'); if ($this->productName == 'lightning' && !is_a($mozillaACK, 'PEAR_Error')) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__.'()' . "X-MOZ-LASTACK found\n",3,$this->logfile); } return false; } */ if (!empty($GLOBALS['egw_info']['user']['preferences']['syncml']['minimum_uid_length'])) { $minimum_uid_length = $GLOBALS['egw_info']['user']['preferences']['syncml']['minimum_uid_length']; } else { $minimum_uid_length = 8; } $isDate = false; $event = array(); $alarms = array(); $vcardData = array( 'recur_type' => MCAL_RECUR_NONE, 'recur_exception' => array(), ); // we need to parse DTSTART, DTEND or DURATION (in that order!) first foreach (array_merge( $component->getAllAttributes('DTSTART'), $component->getAllAttributes('DTEND'), $component->getAllAttributes('DURATION')) as $attributes) { switch ($attributes['name']) { case 'DTSTART': if (isset($attributes['params']['VALUE']) && $attributes['params']['VALUE'] == 'DATE') { $isDate = true; } $dtstart_ts = is_numeric($attributes['value']) ? $attributes['value'] : $this->date2ts($attributes['value']); $vcardData['start'] = $dtstart_ts; if ($this->tzid) { $event['tzid'] = $this->tzid; } else { $event['tzid'] = date_default_timezone_get(); if (!empty($attributes['params']['TZID'])) { // import TZID, if PHP understands it (we only care about TZID of starttime, // as we store only a TZID for the whole event) try { $tz = calendar_timezones::DateTimeZone($attributes['params']['TZID']); // sometimes we do not get an egw_time object but no exception is thrown // may be php 5.2.x related. occurs when a NokiaE72 tries to open Outlook invitations if ($tz instanceof DateTimeZone) { $event['tzid'] = $tz->getName(); } else { error_log(__METHOD__ . '() unknown TZID=' . $attributes['params']['TZID'] . ', defaulting to timezone "' . date_default_timezone_get() . '".'.array2string($tz)); $event['tzid'] = date_default_timezone_get(); // default to current timezone } } catch(Exception $e) { error_log(__METHOD__ . '() unknown TZID=' . $attributes['params']['TZID'] . ', defaulting to timezone "' . date_default_timezone_get() . '".'.$e->getMessage()); $event['tzid'] = date_default_timezone_get(); // default to current timezone } } } break; case 'DTEND': $dtend_ts = is_numeric($attributes['value']) ? $attributes['value'] : $this->date2ts($attributes['value']); if (date('H:i:s',$dtend_ts) == '00:00:00') { $dtend_ts -= 1; } $vcardData['end'] = $dtend_ts; break; case 'DURATION': // clients can use DTSTART+DURATION, instead of DTSTART+DTEND if (!isset($vcardData['end'])) { $vcardData['end'] = $vcardData['start'] + $attributes['value']; } else { error_log(__METHOD__."() find DTEND AND DURATION --> ignoring DURATION"); } break; } } if (!isset($vcardData['start'])) { if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() DTSTART missing!\n",3,$this->logfile); } return false; // not a valid entry } // lets see what we can get from the vcard foreach ($component->_attributes as $attributes) { switch ($attributes['name']) { case 'X-MICROSOFT-CDO-ALLDAYEVENT': if (isset($supportedFields['whole_day'])) { $event['whole_day'] = (isset($attributes['value'])?strtoupper($attributes['value'])=='TRUE':true); } break; case 'AALARM': case 'DALARM': $alarmTime = $attributes['value']; $alarms[$alarmTime] = array( 'time' => $alarmTime ); break; case 'CLASS': $vcardData['public'] = (int)(strtolower($attributes['value']) == 'public'); break; case 'DESCRIPTION': $vcardData['description'] = str_replace("\r\n", "\n", $attributes['value']); if (preg_match('/\s*\[UID:(.+)?\]/Usm', $attributes['value'], $matches)) { if (!isset($vCardData['uid']) && strlen($matches[1]) >= $minimum_uid_length) { $vcardData['uid'] = $matches[1]; } } break; case 'RECURRENCE-ID': case 'X-RECURRENCE-ID': $vcardData['recurrence'] = $attributes['value']; break; case 'LOCATION': $vcardData['location'] = str_replace("\r\n", "\n", $attributes['value']); break; case 'RRULE': $recurence = $attributes['value']; $vcardData['recur_interval'] = 1; $type = preg_match('/FREQ=([^;: ]+)/i',$recurence,$matches) ? $matches[1] : $recurence[0]; // vCard 2.0 values for all types if (preg_match('/UNTIL=([0-9TZ]+)/',$recurence,$matches)) { $vcardData['recur_enddate'] = $this->vCalendar->_parseDateTime($matches[1]); } elseif (preg_match('/COUNT=([0-9]+)/',$recurence,$matches)) { $vcardData['recur_count'] = (int)$matches[1]; } if (preg_match('/INTERVAL=([0-9]+)/',$recurence,$matches)) { $vcardData['recur_interval'] = (int) $matches[1] ? (int) $matches[1] : 1; } $vcardData['recur_data'] = 0; switch($type) { case 'D': // 1.0 if (preg_match('/D(\d+) #(\d+)/', $recurence, $recurenceMatches)) { $vcardData['recur_interval'] = $recurenceMatches[1]; $vcardData['recur_count'] = $recurenceMatches[2]; } elseif (preg_match('/D(\d+) (.*)/', $recurence, $recurenceMatches)) { $vcardData['recur_interval'] = $recurenceMatches[1]; $vcardData['recur_enddate'] = $this->vCalendar->_parseDateTime(trim($recurenceMatches[2])); } else break; // fall-through case 'DAILY': // 2.0 $vcardData['recur_type'] = MCAL_RECUR_DAILY; if (stripos($recurence, 'BYDAY') === false) break; // hack to handle TYPE=DAILY;BYDAY= as WEEKLY, which is true as long as there's no interval // fall-through case 'W': case 'WEEKLY': $days = array(); if (preg_match('/W(\d+) *((?i: [AEFHMORSTUW]{2})+)?( +([^ ]*))$/',$recurence, $recurenceMatches)) // 1.0 { $vcardData['recur_interval'] = $recurenceMatches[1]; if (empty($recurenceMatches[2])) { $days[0] = strtoupper(substr(date('D', $vcardData['start']),0,2)); } else { $days = explode(' ',trim($recurenceMatches[2])); } if (preg_match('/#(\d+)/',$recurenceMatches[4],$repeatMatches)) { if ($repeatMatches[1]) $vcardData['recur_count'] = $repeatMatches[1]; } else { $vcardData['recur_enddate'] = $this->vCalendar->_parseDateTime($recurenceMatches[4]); } $recur_days = $this->recur_days_1_0; } elseif (preg_match('/BYDAY=([^;: ]+)/',$recurence,$recurenceMatches)) // 2.0 { $days = explode(',',$recurenceMatches[1]); $recur_days = $this->recur_days; } else // no day given, use the day of dtstart { $vcardData['recur_data'] |= 1 << (int)date('w',$vcardData['start']); $vcardData['recur_type'] = MCAL_RECUR_WEEKLY; } if ($days) { foreach ($recur_days as $id => $day) { if (in_array(strtoupper(substr($day,0,2)),$days)) { $vcardData['recur_data'] |= $id; } } $vcardData['recur_type'] = MCAL_RECUR_WEEKLY; } break; case 'M': if (preg_match('/MD(\d+)(?: [^ ]+)? #(\d+)/', $recurence, $recurenceMatches)) { $vcardData['recur_type'] = MCAL_RECUR_MONTHLY_MDAY; $vcardData['recur_interval'] = $recurenceMatches[1]; $vcardData['recur_count'] = $recurenceMatches[2]; } elseif (preg_match('/MD(\d+)(?: [^ ]+)? ([0-9TZ]+)/',$recurence, $recurenceMatches)) { $vcardData['recur_type'] = MCAL_RECUR_MONTHLY_MDAY; $vcardData['recur_interval'] = $recurenceMatches[1]; $vcardData['recur_enddate'] = $this->vCalendar->_parseDateTime($recurenceMatches[2]); } elseif (preg_match('/MP(\d+) (.*) (.*) (.*)/',$recurence, $recurenceMatches)) { $vcardData['recur_type'] = MCAL_RECUR_MONTHLY_WDAY; $vcardData['recur_interval'] = $recurenceMatches[1]; if (preg_match('/#(\d+)/',$recurenceMatches[4],$recurenceMatches)) { $vcardData['recur_count'] = $recurenceMatches[1]; } else { $vcardData['recur_enddate'] = $this->vCalendar->_parseDateTime(trim($recurenceMatches[4])); } } break; case 'Y': // 1.0 if (preg_match('/YM(\d+)(?: [^ ]+)? #(\d+)/', $recurence, $recurenceMatches)) { $vcardData['recur_interval'] = $recurenceMatches[1]; $vcardData['recur_count'] = $recurenceMatches[2]; } elseif (preg_match('/YM(\d+)(?: [^ ]+)? ([0-9TZ]+)/',$recurence, $recurenceMatches)) { $vcardData['recur_interval'] = $recurenceMatches[1]; $vcardData['recur_enddate'] = $this->vCalendar->_parseDateTime($recurenceMatches[2]); } else break; // fall-through case 'YEARLY': // 2.0 if (strpos($recurence, 'BYDAY') === false) { $vcardData['recur_type'] = MCAL_RECUR_YEARLY; break; } // handle FREQ=YEARLY;BYDAY= as FREQ=MONTHLY;BYDAY= with 12*INTERVAL $vcardData['recur_interval'] = $vcardData['recur_interval'] ? 12*$vcardData['recur_interval'] : 12; // fall-through case 'MONTHLY': // does currently NOT parse BYDAY or BYMONTH, it has to be specified/identical to DTSTART $vcardData['recur_type'] = strpos($recurence,'BYDAY') !== false ? MCAL_RECUR_MONTHLY_WDAY : MCAL_RECUR_MONTHLY_MDAY; break; } break; case 'EXDATE': if (!$attributes['value']) break; if ((isset($attributes['params']['VALUE']) && $attributes['params']['VALUE'] == 'DATE') || (!isset($attributes['params']['VALUE']) && $isDate)) { $days = array(); $hour = date('H', $vcardData['start']); $minutes = date('i', $vcardData['start']); $seconds = date('s', $vcardData['start']); foreach ($attributes['values'] as $day) { $days[] = mktime( $hour, $minutes, $seconds, $day['month'], $day['mday'], $day['year']); } $vcardData['recur_exception'] = array_merge($vcardData['recur_exception'], $days); } else { $vcardData['recur_exception'] = array_merge($vcardData['recur_exception'], $attributes['values']); } break; case 'SUMMARY': $vcardData['title'] = str_replace("\r\n", "\n", $attributes['value']); break; case 'UID': if (strlen($attributes['value']) >= $minimum_uid_length) { $event['uid'] = $vcardData['uid'] = $attributes['value']; } break; case 'TRANSP': if ($version == '1.0') { $vcardData['non_blocking'] = ($attributes['value'] == 1); } else { $vcardData['non_blocking'] = ($attributes['value'] == 'TRANSPARENT'); } break; case 'PRIORITY': if ($this->productManufacturer == 'funambol' && (strpos($this->productName, 'outlook') !== false || strpos($this->productName, 'pocket pc') !== false)) { $vcardData['priority'] = (int) $this->priority_funambol2egw[$attributes['value']]; } else { $vcardData['priority'] = (int) $this->priority_ical2egw[$attributes['value']]; } break; case 'CATEGORIES': if ($attributes['value']) { $vcardData['category'] = explode(',', $attributes['value']); } else { $vcardData['category'] = array(); } break; case 'ORGANIZER': $event['organizer'] = $attributes['value']; // no egw field, but needed in AS if (strtoupper(substr($event['organizer'],0,7)) == 'MAILTO:') { $event['organizer'] = substr($event['organizer'],7); } if (!empty($attributes['params']['CN'])) { $event['organizer'] = $attributes['params']['CN'].' <'.$event['organizer'].'>'; } // fall throught case 'ATTENDEE': if (isset($attributes['params']['PARTSTAT'])) { $attributes['params']['STATUS'] = $attributes['params']['PARTSTAT']; } if (isset($attributes['params']['STATUS'])) { $status = $this->status_ical2egw[strtoupper($attributes['params']['STATUS'])]; if (empty($status)) $status = 'X'; } else { $status = 'X'; // client did not return the status } $uid = $email = $cn = ''; $quantity = 1; $role = 'REQ-PARTICIPANT'; if (!empty($attributes['params']['ROLE'])) { $role = $attributes['params']['ROLE']; } // CN explicit given --> use it if (strtoupper(substr($attributes['value'], 0, 7)) == 'MAILTO:' && !empty($attributes['params']['CN'])) { $email = substr($attributes['value'], 7); $cn = $attributes['params']['CN']; } // try parsing email and cn from attendee elseif (preg_match('/MAILTO:([@.a-z0-9_-]+)|MAILTO:"?([.a-z0-9_ -]*)"?[ ]*<([@.a-z0-9_-]*)>/i', $attributes['value'],$matches)) { $email = $matches[1] ? $matches[1] : $matches[3]; $cn = isset($matches[2]) ? $matches[2]: ''; } elseif (!empty($attributes['value']) && preg_match('/"?([.a-z0-9_ -]*)"?[ ]*<([@.a-z0-9_-]*)>/i', $attributes['value'],$matches)) { $cn = $matches[1]; $email = $matches[2]; } elseif (strpos($attributes['value'],'@') !== false) { $email = $attributes['value']; } // try X-EGROUPWARE-UID, but only if it resolves to same email (otherwise we are in trouble if different EGw installs talk to each other) if (!$uid && !empty($attributes['params']['X-EGROUPWARE-UID']) && ($res_info = $this->resource_info($attributes['params']['X-EGROUPWARE-UID'])) && !strcasecmp($res_info['email'], $email)) { $uid = $attributes['params']['X-EGROUPWARE-UID']; if (!empty($attributes['params']['X-EGROUPWARE-QUANTITY'])) { $quantity = $attributes['params']['X-EGROUPWARE-QUANTITY']; } if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "(): Found X-EGROUPWARE-UID: '$uid'\n",3,$this->logfile); } } elseif ($attributes['value'] == 'Unknown') { // we use the current user $uid = $this->user; } // check principal url from CalDAV here after X-EGROUPWARE-UID and to get optional X-EGROUPWARE-QUANTITY if (!$uid) $uid = groupdav_principals::url2uid($attributes['value'], null, $cn); // try to find an email address if (!$uid && $email && ($uid = $GLOBALS['egw']->accounts->name2id($email, 'account_email'))) { // we use the account we found if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() Found account: '$uid', '$cn', '$email'\n",3,$this->logfile); } } if (!$uid) { $searcharray = array(); // search for provided email address ... if ($email) { $searcharray = array('email' => $email, 'email_home' => $email); } // ... and for provided CN if (!empty($attributes['params']['CN'])) { $cn = str_replace(array('\\,', '\\;', '\\:', '\\\\'), array(',', ';', ':', '\\'), $attributes['params']['CN']); if ($cn[0] == '"' && substr($cn,-1) == '"') { $cn = substr($cn,1,-1); } // not searching for $cn, as match can be not unique or without an email address // --> notification will fail, better store just as email } if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() Search participant: '$cn', '$email'\n",3,$this->logfile); } //elseif (//$attributes['params']['CUTYPE'] == 'GROUP' if (preg_match('/(.*) '. lang('Group') . '/', $cn, $matches)) { // we found a group if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() Found group: '$matches[1]', '$cn', '$email'\n",3,$this->logfile); } if (($uid = $GLOBALS['egw']->accounts->name2id($matches[1], 'account_lid', 'g'))) { //Horde::logMessage("vevent2egw: group participant $uid", // __FILE__, __LINE__, PEAR_LOG_DEBUG); if (!isset($vcardData['participants'][$this->user]) && $status != 'X' && $status != 'U') { // User tries to reply to the group invitiation if (($members = $GLOBALS['egw']->accounts->members($uid, true)) && in_array($this->user, $members)) { //Horde::logMessage("vevent2egw: set status to " . $status, // __FILE__, __LINE__, PEAR_LOG_DEBUG); $vcardData['participants'][$this->user] = calendar_so::combine_status($status,$quantity,$role); } } $status = 'U'; // keep the group } else continue; // can't find this group } elseif (empty($searcharray)) { continue; // participants without email AND CN --> ignore it } elseif ((list($data) = $this->addressbook->search($searcharray, array('id','egw_addressbook.account_id as account_id','n_fn'), 'egw_addressbook.account_id IS NOT NULL DESC, n_fn IS NOT NULL DESC', '','',false,'OR'))) { // found an addressbook entry $uid = $data['account_id'] ? (int)$data['account_id'] : 'c'.$data['id']; if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() Found addressbook entry: '$uid', '$cn', '$email'\n",3,$this->logfile); } } else { if (!$email) { $email = 'no-email@egroupware.org'; // set dummy email to store the CN } $uid = 'e'. ($cn ? $cn . ' <' . $email . '>' : $email); if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__ . "() Not Found, create dummy: '$uid', '$cn', '$email'\n",3,$this->logfile); } } } switch($attributes['name']) { case 'ATTENDEE': if (!isset($attributes['params']['ROLE']) && isset($event['owner']) && $event['owner'] == $uid) { $attributes['params']['ROLE'] = 'CHAIR'; } if (!isset($vcardData['participants'][$uid]) || $vcardData['participants'][$uid][0] != 'A') { // keep role 'CHAIR' from an external organizer, even if he is a regular participant with a different role // as this is currently the only way to store an external organizer and send him iMip responses if (isset($vcardData['participants'][$uid]) && ($s=$vcardData['participants'][$uid]) && calendar_so::split_status($s, $q, $r) && $r == 'CHAIR') { $role = 'CHAIR'; } // for multiple entries the ACCEPT wins // add quantity and role $vcardData['participants'][$uid] = calendar_so::combine_status($status, $quantity, $role); if (!$this->calendarOwner && is_numeric($uid) && $role == 'CHAIR' && is_a($component->getAttribute('ORGANIZER'), 'PEAR_Error')) { // we can store the ORGANIZER as event owner $event['owner'] = $uid; } } break; case 'ORGANIZER': if (isset($vcardData['participants'][$uid])) { $status = $vcardData['participants'][$uid]; calendar_so::split_status($status, $quantity, $role); $vcardData['participants'][$uid] = calendar_so::combine_status($status, $quantity, 'CHAIR'); } if (!$this->calendarOwner && is_numeric($uid)) { // we can store the ORGANIZER as event owner $event['owner'] = $uid; } else { // we must insert a CHAIR participant to keep the ORGANIZER $event['owner'] = $this->user; if (!isset($vcardData['participants'][$uid])) { // save the ORGANIZER as event CHAIR $vcardData['participants'][$uid] = calendar_so::combine_status('D', 1, 'CHAIR'); } } } break; case 'CREATED': // will be written direct to the event if ($event['modified']) break; // fall through case 'LAST-MODIFIED': // will be written direct to the event $event['modified'] = $attributes['value']; break; case 'STATUS': // currently no EGroupware event column, but needed as Android uses it to delete single recurrences $event['status'] = $attributes['value']; break; } } // check if the entry is a birthday // this field is only set from NOKIA clients $agendaEntryType = $component->getAttribute('X-EPOCAGENDAENTRYTYPE'); if (!is_a($agendaEntryType, 'PEAR_Error')) { if (strtolower($agendaEntryType) == 'anniversary') { $event['special'] = '1'; $event['non_blocking'] = 1; // make it a whole day event for eGW $vcardData['end'] = $vcardData['start'] + 86399; } elseif (strtolower($agendaEntryType) == 'event') { $event['special'] = '2'; } } $event['priority'] = 2; // default $event['alarm'] = $alarms; // now that we know what the vard provides, // we merge that data with the information we have about the device while (($fieldName = array_shift($supportedFields))) { switch ($fieldName) { case 'recur_interval': case 'recur_enddate': case 'recur_data': case 'recur_exception': case 'recur_count': case 'whole_day': // not handled here break; case 'recur_type': $event['recur_type'] = $vcardData['recur_type']; if ($event['recur_type'] != MCAL_RECUR_NONE) { $event['reference'] = 0; foreach (array('recur_interval','recur_enddate','recur_data','recur_exception','recur_count') as $r) { if (isset($vcardData[$r])) { $event[$r] = $vcardData[$r]; } } } break; default: if (isset($vcardData[$fieldName])) { $event[$fieldName] = $vcardData[$fieldName]; } break; } } if ($event['recur_enddate']) { // reset recure_enddate to 00:00:00 on the last day $rriter = calendar_rrule::event2rrule($event, false); $last = $rriter->normalize_enddate(); $last->setTime(0, 0, 0); //error_log(__METHOD__."() rrule=$recurence --> ".array2string($rriter)." --> enddate=".array2string($last).'='.egw_time::to($last, '')); $event['recur_enddate'] = egw_time::to($last, 'server'); } // translate COUNT into an enddate, as we only store enddates elseif($event['recur_count']) { $rriter = calendar_rrule::event2rrule($event, false); $last = $rriter->count2date($event['recur_count']); $last->setTime(0, 0, 0); $event['recur_enddate'] = egw_time::to($last, 'server'); unset($event['recur_count']); } // Apple iCal on OS X uses X-CALENDARSERVER-ACCESS: CONFIDENTIAL on VCALANDAR (not VEVENT!) if (($x_calendarserver_access = $component->_container->getAttribute('X-CALENDARSERVER-ACCESS')) && !is_a($x_calendarserver_access, 'PEAR_Error')) { $event['public'] = (int)(strtoupper($x_calendarserver_access) == 'PUBLIC'); } //error_log(__METHOD__."() X-CALENDARSERVER-ACCESS=".array2string($x_calendarserver_access).' --> public='.array2string($event['public'])); // if no end is given in iCal we use the default lenght from user prefs // whole day events get one day in calendar_boupdate::save() if (!isset($event['end'])) { $event['end'] = $event['start'] + 60 * $this->cal_prefs['defaultlength']; } if ($this->calendarOwner) $event['owner'] = $this->calendarOwner; // parsing ATTACH attributes for managed attachments $attr = $component->getAttribute('X-EGROUPWARE-ATTACH-INCLUDED'); $event['attach-delete-by-put'] = !is_a($attr, PEAR_Error) && $attr === 'TRUE'; $event['attach'] = $component->getAllAttributes('ATTACH'); if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__."()\n" . array2string($event)."\n",3,$this->logfile); } //Horde::logMessage("vevent2egw:\n" . print_r($event, true), // __FILE__, __LINE__, PEAR_LOG_DEBUG); return $event; } function search($_vcalData, $contentID=null, $relax=false, $charset=null) { if (($events = $this->icaltoegw($_vcalData, $charset))) { // this function only supports searching a single event if (count($events) == 1) { $filter = $relax ? 'relax' : 'check'; $event = array_shift($events); $eventId = -1; if ($this->so->isWholeDay($event)) $event['whole_day'] = true; if ($contentID) { $parts = preg_split('/:/', $contentID); $event['id'] = $eventId = $parts[0]; } $event['category'] = $this->find_or_add_categories($event['category'], $eventId); return $this->find_event($event, $filter); } if ($this->log) { error_log(__FILE__.'['.__LINE__.'] '.__METHOD__."() found:\n" . array2string($events)."\n",3,$this->logfile); } } return array(); } /** * Create a freebusy vCal for the given user(s) * * @param int $user account_id * @param mixed $end=null end-date, default now+1 month * @param boolean $utc=true if false, use severtime for dates * @param string $charset='UTF-8' encoding of the vcalendar, default UTF-8 * @param mixed $start=null default now * @param string $method='PUBLISH' or eg. 'REPLY' * @param array $extra=null extra attributes to add * X-CALENDARSERVER-MASK-UID can be used to not include an event specified by this uid as busy */ function freebusy($user,$end=null,$utc=true, $charset='UTF-8', $start=null, $method='PUBLISH', array $extra=null) { if (!$start) $start = time(); // default now if (!$end) $end = time() + 100*DAY_s; // default next 100 days $vcal = new Horde_iCalendar; $vcal->setAttribute('PRODID','-//EGroupware//NONSGML EGroupware Calendar '.$GLOBALS['egw_info']['apps']['calendar']['version'].'//'. strtoupper($GLOBALS['egw_info']['user']['preferences']['common']['lang'])); $vcal->setAttribute('VERSION','2.0'); $vcal->setAttribute('METHOD',$method); $vfreebusy = Horde_iCalendar::newComponent('VFREEBUSY',$vcal); if ($uid) $vfreebusy->setAttribute('UID', $uid); $attributes = array( 'DTSTAMP' => time(), 'DTSTART' => $this->date2ts($start,true), // true = server-time 'DTEND' => $this->date2ts($end,true), // true = server-time ); if (!$utc) { foreach ($attributes as $attr => $value) { $attributes[$attr] = date('Ymd\THis', $value); } } if (is_null($extra)) $extra = array( 'URL' => $this->freebusy_url($user), 'ORGANIZER' => 'mailto:'.$GLOBALS['egw']->accounts->id2name($user,'account_email'), ); foreach($attributes+$extra as $attr => $value) { $vfreebusy->setAttribute($attr, $value); } $fbdata = parent::search(array( 'start' => $start, 'end' => $end, 'users' => $user, 'date_format' => 'server', 'show_rejected' => false, )); if (is_array($fbdata)) { foreach ($fbdata as $event) { if ($event['non_blocking']) continue; if ($event['uid'] === $extra['X-CALENDARSERVER-MASK-UID']) continue; $fbtype = $event['participants'][$user] == 'T' ? 'BUSY-TENTATIVE' : 'BUSY'; if ($utc) { $vfreebusy->setAttribute('FREEBUSY',array(array( 'start' => $event['start'], 'end' => $event['end'], )), array('FBTYPE' => $fbtype)); } else { $vfreebusy->setAttribute('FREEBUSY',array(array( 'start' => date('Ymd\THis',$event['start']), 'end' => date('Ymd\THis',$event['end']), )), array('FBTYPE' => $fbtype)); } } } $vcal->addComponent($vfreebusy); return $vcal->exportvCalendar($charset); } }