157 lines
No EOL
5.3 KiB
PHP
157 lines
No EOL
5.3 KiB
PHP
<?php
|
|
/*
|
|
+-------------------------------------------------------------------------+
|
|
| iCalendar functions for the Calendar Plugin |
|
|
| Version 0.3 beta |
|
|
| |
|
|
| This program is free software; you can redistribute it and/or modify |
|
|
| it under the terms of the GNU General Public License version 2 |
|
|
| as published by the Free Software Foundation. |
|
|
| |
|
|
| This program is distributed in the hope that it will be useful, |
|
|
| but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
|
| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
|
| GNU General Public License for more details. |
|
|
| |
|
|
| You should have received a copy of the GNU General Public License along |
|
|
| with this program; if not, write to the Free Software Foundation, Inc., |
|
|
| 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. |
|
|
| |
|
|
+-------------------------------------------------------------------------+
|
|
| Author: Lazlo Westerhof <hello@lazlo.me> |
|
|
| Bogomil "Bogo" Shopov <shopov@kolabsys.com> |
|
|
+-------------------------------------------------------------------------+
|
|
*/
|
|
|
|
class calendar_ical
|
|
{
|
|
private $rc;
|
|
private $driver;
|
|
|
|
function __construct($rc, $driver)
|
|
{
|
|
$this->rc = $rc;
|
|
$this->driver = $driver;
|
|
}
|
|
|
|
/**
|
|
* Import events from iCalendar format
|
|
*
|
|
* @param array Associative events array
|
|
* @access public
|
|
*/
|
|
public function import($events)
|
|
{
|
|
//TODO
|
|
// for ($events as $event)
|
|
// $this->backend->newEvent(...);
|
|
}
|
|
|
|
/**
|
|
* Export events to iCalendar format
|
|
*
|
|
* @param array Events as array
|
|
* @return string Events in iCalendar format (http://tools.ietf.org/html/rfc5545)
|
|
*/
|
|
public function export($events)
|
|
{
|
|
if (!empty($this->rc->user->ID)) {
|
|
$ical = "BEGIN:VCALENDAR\r\n";
|
|
$ical .= "VERSION:2.0\r\n";
|
|
$ical .= "PRODID:-//Roundcube Webmail " . RCMAIL_VERSION . "//NONSGML Calendar//EN\r\n";
|
|
$ical .= "CALSCALE:GREGORIAN\r\n";
|
|
|
|
foreach ($events as $event) {
|
|
$ical .= "BEGIN:VEVENT\r\n";
|
|
$ical .= "UID:" . self::escpape($event['uid']) . "\r\n";
|
|
$ical .= "DTSTART:" . gmdate('Ymd\THis\Z', $event['start']) . "\r\n";
|
|
$ical .= "DTEND:" . gmdate('Ymd\THis\Z', $event['end']) . "\r\n";
|
|
$ical .= "SUMMARY:" . self::escpape($event['title']) . "\r\n";
|
|
$ical .= "DESCRIPTION:" . wordwrap(self::escpape($event['description']),75,'\r\n ') . "\r\n";
|
|
|
|
if (!empty($event['attendees'])){
|
|
|
|
$ical .= $this->_get_attendees($event['attendees']);
|
|
}
|
|
|
|
if (!empty($event['location'])) {
|
|
$ical .= "LOCATION:" . self::escpape($event['location']) . "\r\n";
|
|
}
|
|
if ($event['recurrence']) {
|
|
$ical .= "RRULE:" . calendar::to_rrule($event['recurrence']) . "\r\n";
|
|
}
|
|
if(!empty($event['categories'])) {
|
|
$ical .= "CATEGORIES:" . self::escpape(strtoupper($event['categories'])) . "\r\n";
|
|
}
|
|
if ($event['sensitivity'] > 0) {
|
|
$ical .= "X-CALENDARSERVER-ACCESS:CONFIDENTIAL";
|
|
}
|
|
if ($event['alarms']) {
|
|
list($trigger, $action) = explode(':', $event['alarms']);
|
|
$val = calendar::parse_alaram_value($trigger);
|
|
|
|
$ical .= "BEGIN:VALARM\n";
|
|
if ($val[1]) $ical .= "TRIGGER:" . preg_replace('/^([-+])(.+)/', '\\1PT\\2', $trigger) . "\r\n";
|
|
else $ical .= "TRIGGER;VALUE=DATE-TIME:" . gmdate('Ymd\THis\Z', $val[0]) . "\r\n";
|
|
if ($action) $ical .= "ACTION:" . self::escpape(strtoupper($action)) . "\r\n";
|
|
$ical .= "END:VALARM\n";
|
|
}
|
|
$ical .= "TRANSP:" . ($event['free_busy'] == 'free' ? 'TRANSPARENT' : 'OPAQUE') . "\r\n";
|
|
|
|
// TODO: export attachments
|
|
|
|
$ical .= "END:VEVENT\r\n";
|
|
}
|
|
|
|
$ical .= "END:VCALENDAR";
|
|
|
|
return $ical;
|
|
}
|
|
}
|
|
|
|
private function escpape($str)
|
|
{
|
|
return preg_replace('/(?<!\\\\)([\:\;\,\\n\\r])/', '\\\$1', $str);
|
|
}
|
|
|
|
/**
|
|
* Construct the orginizer of the event.
|
|
* @param Array Attendees and roles
|
|
*
|
|
*/
|
|
private function _get_attendees($ats)
|
|
{
|
|
$organizer = "";
|
|
$attendees = "";
|
|
foreach ($ats as $at){
|
|
|
|
if ($at['role']=="ORGANIZER"){
|
|
//I am an orginizer
|
|
$organizer .= "ORGANIZER;";
|
|
if (!empty($at['name']))
|
|
$organizer .="CN=".$at['name'].":";
|
|
//handling limitations according to rfc2445#section-4.1
|
|
$organizer .="MAILTO:"."\r\n ".$at['email'];
|
|
|
|
|
|
|
|
}else{
|
|
//I am an attendee
|
|
$attendees .= "ATTENDEE;ROLE=".$at['role'].";PARTSTAT=".$at['status'];
|
|
$attendees .= "\r\n "; ////handling limitations according to rfc2445#section-4.1
|
|
if (!empty($at['name']))
|
|
$attendees .=";CN=".$at['name'].":";
|
|
|
|
$attendees .="MAILTO:".$at['email']."\r\n";
|
|
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
return $organizer."\r\n".$attendees;
|
|
|
|
}
|
|
} |