1
0
mirror of https://github.com/EGroupware/egroupware.git synced 2024-12-29 10:09:24 +01:00
egroupware_official/phpgwapi/inc/class.ischedule_server.inc.php

880 lines
27 KiB
PHP
Raw Normal View History

2012-09-30 23:03:33 +02:00
<?php
/**
* EGroupware: iSchedule server
*
* @link http://www.egroupware.org
* @license http://opensource.org/licenses/gpl-license.php GPL - GNU General Public License
* @package api
* @subpackage groupdav
* @author Ralf Becker <RalfBecker-AT-outdoor-training.de>
* @copyright (c) 2012-13 by Ralf Becker <RalfBecker-AT-outdoor-training.de>
2012-09-30 23:03:33 +02:00
* @version $Id$
*/
/**
* iSchedule server: serverside of iSchedule
*
* @link https://tools.ietf.org/html/draft-desruisseaux-ischedule-03 iSchedule draft from 2013-01-22
*
* groupdav get's extended here to get it's logging, should separate that out ...
2012-09-30 23:03:33 +02:00
*/
class ischedule_server extends groupdav
2012-09-30 23:03:33 +02:00
{
/**
* iSchedule xml namespace
*/
const ISCHEDULE = 'urn:ietf:params:xml:ns:ischedule';
/**
* Own iSchedule version
*/
const VERSION = '1.0';
2013-11-11 09:31:33 +01:00
/**
* Supported versions for capablities
*
* Might be more then current version above
*
* @var array
*/
static $supported_versions = array(self::VERSION);
/**
* Required headers in DKIM signature (DKIM-Signature is always a required header!)
*/
2012-10-06 21:42:05 +02:00
const REQUIRED_DKIM_HEADERS = 'iSchedule-Version:Content-Type:Originator:Recipient';
/**
* Constructor
*/
public function __construct()
{
// install our own exception handler sending exceptions as http status
set_exception_handler(array(__CLASS__, 'exception_handler'));
self::$instance = $this;
}
2012-09-30 23:03:33 +02:00
/**
* Serve an iSchedule request
*/
public function ServeRequest()
{
self::$log_level = $GLOBALS['egw_info']['user']['preferences']['groupdav']['debug_level'];
self::$log_level = 'f';
if (self::$log_level === 'r' || self::$log_level === 'f' || $this->debug)
{
self::$request_starttime = microtime(true);
$this->store_request = true;
ob_start();
}
// get raw request body
$this->request = file_get_contents('php://input');
2012-09-30 23:03:33 +02:00
switch($_SERVER['REQUEST_METHOD'])
{
case 'GET':
$this->get();
break;
case 'POST':
$this->post();
break;
default:
error_log(__METHOD__."() invalid iSchedule request using {$_SERVER['REQUEST_METHOD']}!");
header("HTTP/1.1 400 Bad Request");
}
if (self::$request_starttime) self::log_request();
2012-09-30 23:03:33 +02:00
}
2013-11-11 09:31:33 +01:00
/**
* List of supported components and methods
*
* @var array
*/
static $supported_components = array(
'VFREEBUSY' => array('REQUEST'),
'VEVENT' => array('REQUEST', 'REPLY', 'CANCEL'),
//'VTODO' => array('REQUEST', 'REPLY', 'CANCEL'),
);
/**
* List of supported calendar-data-types
*
* @var array
*/
static $supported_calendar_data_types = array(
array('content-type' => 'text/calendar', 'version' => '2.0'),
);
/**
* Supported attachment types for capabilities
*
* @var array
*/
static $supported_attachments = array('external', 'inline');
/**
* Other capablities
*
* @var array name => value pairs
*/
static $capablities = array(
'max-content-length' => 102400,
'min-date-time' => '19910101T000000Z',
'max-date-time' => '20381231T000000Z',
'max-instances' => 150,
'max-recipients' => 250,
// for server config: 'administrator' => 'mailto:ischedule-admin@example.com</administrator',
);
2012-10-01 16:21:55 +02:00
/**
* Requiremnt for originator to match depending on method
*
* @var array method => array('ORGANIZER','ATTENDEE')
2013-11-11 09:31:33 +01:00
* @link https://tools.ietf.org/html/draft-desruisseaux-ischedule-03#section-6.1
2012-10-01 16:21:55 +02:00
*/
static $supported_method2origin_requirement = array(
//'PUBLISH' => null, // no requirement
'REQUEST' => array('ORGANIZER', 'ATTENDEE'),
'REPLY' => array('ATTENDEE'),
'ADD' => array('ORGANIZER'),
'CANCEL' => array('ORGANIZER'),
//'REFRESH' => null,
//'COUNTER' => array('ATTENDEE'),
//'DECLINECOUNTER' => array('ORGANIZER'),
);
2012-09-30 23:03:33 +02:00
/**
* Serve an iSchedule POST request
*/
public function post()
2012-09-30 23:03:33 +02:00
{
// get and verify required headers
2012-09-30 23:03:33 +02:00
$headers = array();
foreach($_SERVER as $name => $value)
2012-09-30 23:03:33 +02:00
{
$name = strtolower(str_replace('_', '-', $name));
list($first, $rest) = explode('-', $name, 2);
switch($first)
{
case 'content':
$headers[$name] = $value;
break;
case 'http':
$headers[$rest] = $value;
break;
}
2012-09-30 23:03:33 +02:00
}
if (($missing = array_diff(explode(':', strtolower(self::REQUIRED_DKIM_HEADERS.':DKIM-Signature')), array_keys($headers))))
2012-09-30 23:03:33 +02:00
{
//error_log('headers='.array2string(array_keys($headers)).', required='.self::REQUIRED_DKIM_HEADERS.', missing='.array($missing));
if (in_array('originator', $missing))
{
$error = 'originator-missing';
}
elseif(in_array('recipient', $missing))
{
$error = 'recipient-missing';
}
else
{
$error = 'invalid-scheduling-message';
}
throw new Exception ("Bad Request: $error: missing required headers: ".implode(', ', $missing), 400);
2012-09-30 23:03:33 +02:00
}
// validate dkim signature
// for multivalued Recipient header: as PHP engine agregates them ", " separated,
// we cant tell it apart from ", " separated recipients in one header, therefore we try to validate both.
// It will fail if multiple recipients in a single header are also ", " separated (just comma works fine)
2012-10-06 21:42:05 +02:00
if (!self::dkim_validate($headers, $this->request, $error))
2012-09-30 23:03:33 +02:00
{
throw new Exception('Bad Request: verification-failed: DKIM signature invalid: '.$error, 400);
2012-10-01 16:21:55 +02:00
}
// check if recipient is a user
// todo: multiple recipients, currently we use last recipient for EGroupware enviroment
2013-11-11 09:31:33 +01:00
// it is no error, to not specify a correct user, in that case we return just a request-status of "3.7;Invalid Calendar User"!
//foreach(preg_split('/, */', $headers['recipient']) as $recipient)
/*{
if (!stripos($recipient, 'mailto:') === 0 ||
!($account_id = $GLOBALS['egw']->accounts->name2id(substr($recipient, 7), 'account_email')))
{
throw new Exception("Bad Request: recipient-missing: unknown recipient '$recipient'", 400);
}
2012-10-01 16:21:55 +02:00
}
// create enviroment for recipient user, as we act on his behalf
$GLOBALS['egw']->session->account_id = $account_id;
$GLOBALS['egw']->session->account_lid = $GLOBALS['egw']->accounts->id2name($account_id);
//$GLOBALS['egw']->session->account_domain = $domain;
$GLOBALS['egw_info']['user'] = $GLOBALS['egw']->session->read_repositories();
translation::init();
2013-11-11 09:31:33 +01:00
*/
2012-10-01 16:21:55 +02:00
// check originator is allowed to iSchedule with recipient
// ToDo: preference for user/admin to specify with whom to iSchedule: $allowed_origins
2013-11-11 09:31:33 +01:00
$allowed_origins = preg_split('/, ?/', $GLOBALS['egw_info']['user']['preferences']['groupdav']['ischedule_allowed_origins']);
2012-10-01 16:21:55 +02:00
/* disabled 'til UI is ready to specifiy
2013-11-11 09:31:33 +01:00
* ToDo: this should be no error but a response-status of "3.8;No authority"
2012-10-01 16:21:55 +02:00
list(,$originator_domain) = explode('@', $headers['Originator']);
if (!in_array($headers['Originator'], $allowed_orgins) && !in_array($originator_domain, $allowed_origins))
{
throw new Exception('Forbidden', 403);
}*/
// check method and component of Content-Type are valid
2013-11-11 09:31:33 +01:00
// ToDo: no component or method in Content-Type should give an "invalid-scheduling-message" error
// only unsupported (not in capablities) component should give "invalid-caledar-data-type"
if (!preg_match('/component=([^;]+)/i', $headers['content-type'], $matches) ||
2012-10-01 16:21:55 +02:00
(!in_array($component=strtoupper($matches[1]), self::$supported_components)))
{
throw new Exception ('Bad Request: invalid-calendar-data-type: missing or unsupported component in Content-Type header', 400);
2012-10-01 16:21:55 +02:00
}
if (!preg_match('/method=([^;]+)/i', $headers['content-type'], $matches) ||
2012-10-01 16:21:55 +02:00
(!isset(self::$supported_method2origin_requirement[$method=strtoupper($matches[1])])) ||
$component == 'VFREEBUSY' && $method != 'REQUEST')
{
throw new Exception ('Bad Request: missing or unsupported method in Content-Type header', 400);
2012-09-30 23:03:33 +02:00
}
// parse iCal
2012-10-01 16:21:55 +02:00
// code copied from calendar_groupdav::outbox_freebusy_request for now
include_once EGW_SERVER_ROOT.'/phpgwapi/inc/horde/lib/core.php';
$vcal = new Horde_iCalendar();
if (!$vcal->parsevCalendar($this->request, 'VCALENDAR', 'utf-8'))
2012-10-01 16:21:55 +02:00
{
2013-11-11 09:31:33 +01:00
throw new Exception('Bad Request: invalid-calendar-data: Failed parsing iCal', 400);
2012-10-01 16:21:55 +02:00
}
$version = $vcal->getAttribute('VERSION');
$handler = new calendar_ical();
$handler->setSupportedFields('GroupDAV',$this->agent);
$handler->calendarOwner = $handler->user = 0; // to NOT default owner/organizer to something
if (!($vcal_comp = $vcal->getComponent(0)) ||
!($event = $handler->vevent2egw($vcal_comp, $version, $handler->supportedFields,
$principalURL='', $check_component='Horde_iCalendar_'.strtolower($component))))
{
2013-11-11 09:31:33 +01:00
throw new Exception('Bad Request: invalid-calendar-data: Failed converting iCal', 400);
2012-10-01 16:21:55 +02:00
}
2012-09-30 23:03:33 +02:00
// validate originator matches organizer or attendee
2012-10-01 16:21:55 +02:00
$originator_requirement = self::$supported_method2origin_requirement[$method];
if (isset($originator_requirement))
{
$matches = false;
foreach($originator_requirement as $requirement)
{
$originator = $headers['originator'];
if (stripos($originator, 'mailto:') === 0) $originator = substr($originator, 7);
2012-10-01 16:21:55 +02:00
if ($requirement == 'ORGANIZER' &&
($event['organizer'] == $originator || strpos($event['organizer'], '<'.$originator.'>') !== false) ||
2012-10-01 16:21:55 +02:00
$requirement == 'ATTENDEE' &&
(in_array('e'.$originator, $event['participants']) ||
2012-10-01 16:21:55 +02:00
// ToDO: Participant could have CN, need to check that too
$originator_account_id = $GLOBALS['egw']->accounts->name2id($originator, 'account_email') &&
2012-10-01 16:21:55 +02:00
in_array($originator_account_id, $event['participants'])))
{
$matches = true;
break; // no need to try further as we OR
}
}
if (!$matches)
{
throw new Exception("Bad Request: originator-invalid: originator '$originator' invalid for given $component component!", 400);
2012-10-01 16:21:55 +02:00
}
}
$xml = new XMLWriter;
$xml->openMemory();
$xml->setIndent(true);
$xml->startDocument('1.0', 'UTF-8');
$xml->startElementNs(null, 'schedule-response', self::ISCHEDULE); // null = no prefix
switch($component)
{
case 'VFREEBUSY':
$this->vfreebusy($event, $handler, $vcal_comp, $xml);
break;
case 'VEVENT':
$this->vevent($event, $handler, $component, $xml);
break;
2012-10-01 16:21:55 +02:00
default:
2013-11-11 09:31:33 +01:00
throw new Exception ('Bad Request: invalid-calendar-data-type: not implemented', 400);
2012-10-01 16:21:55 +02:00
}
$xml->endElement(); // schedule-response
$xml->endDocument();
header('Content-Type: text/xml; charset=UTF-8');
2012-10-01 16:21:55 +02:00
header('iSchedule-Version: '.self::VERSION);
header('iSchedule-Capabilities: '.self::SERIAL);
2012-10-01 16:21:55 +02:00
echo $xml->outputMemory();
}
/**
* Handle VEVENT component
*
* @param array $event
* @param calendar_ical $handler
* @param string $component
* @param XMLWriter $xml
*/
function vevent(array $event, calendar_ical $handler, Horde_iCalendar_vevent $component, XMLWriter $xml)
{
$organizer = $component->getAttribute('ORGANIZER');
$attendees = (array)$component->getAttribute('ATTENDEE');
$handler->importVCal($vCalendar, $eventId,
self::etag2value($this->http_if_match), false, 0, $this->groupdav->current_user_principal, $user, $charset, $id);
foreach($event['participants'] as $uid => $status)
{
$xml->startElement('response');
$xml->writeElement('recipient', $attendee=array_shift($attendees)); // iSchedule has not DAV:href!
if (is_numeric($uid))
{
$xml->writeElement('request-status', '2.0;Success');
$xml->writeElement('responsedescription', 'Delivered to recipient');
}
else
{
$xml->writeElement('request-status', '3.7;Invalid Calendar User');
$xml->writeElement('responsedescription', 'Recipient not a local user');
}
$xml->endElement(); // response
}
}
2012-10-01 16:21:55 +02:00
/**
* Handle VFREEBUSY component
*
* @param array $event
* @param calendar_ical $handler
* @param Horde_iCalendar_vfreebusy $component
* @param XMLWriter $xml
*/
function vfreebusy(array $event, calendar_ical $handler, Horde_iCalendar_vfreebusy $component, XMLWriter $xml)
{
$organizer = $component->getAttribute('ORGANIZER');
$attendees = (array)$component->getAttribute('ATTENDEE');
foreach($attendees as $attendee)
2012-10-01 16:21:55 +02:00
{
$xml->startElement('response');
$xml->writeElement('recipient', $attendee); // iSchedule has not DAV:href!
2012-10-01 16:21:55 +02:00
if (stripos($attendee, 'mailto:') === 0 &&
($uid = $GLOBALS['egw']->accounts->name2id(substr($attendee, 7), 'account_email')))
2012-10-01 16:21:55 +02:00
{
$xml->writeElement('request-status', '2.0;Success');
$xml->writeElement('calendar-data',
$handler->freebusy($uid, $event['end'], true, 'utf-8', $event['start'], 'REPLY', array(
'UID' => $event['uid'],
'ORGANIZER' => $organizer,
'ATTENDEE' => $attendee,
)));
}
else
{
$xml->writeElement('request-status', '3.7;Invalid Calendar User');
}
$xml->endElement(); // response
}
2012-09-30 23:03:33 +02:00
}
2012-10-06 21:42:05 +02:00
/**
* Required DKIM tags
*
* @link https://tools.ietf.org/html/rfc6376#section-3.5
*
* @var array
*/
public static $required_dkim_tags = array('v', 'a', 'b', 'bh', 'd', 'h', 's');
2012-09-30 23:03:33 +02:00
/**
* Validate DKIM signature
*
2013-11-11 09:31:33 +01:00
* For multivalued and multiple Recipient header(s): PHP engine agregates them ", " separated.
* ischedule-relaxed canonisation takes care of that.
*
* @param array $headers header-name in lowercase(!) as key
* @param string $body
* @param string &$error=null error if false returned
2012-09-30 23:03:33 +02:00
* @return boolean true if signature could be validated, false otherwise
*/
public static function dkim_validate(array $headers, $body, &$error=null)
2012-09-30 23:03:33 +02:00
{
// parse dkim signature, after unfolding it
if (!isset($headers['dkim-signature']) ||
!preg_match_all('/[\t\s]*([a-z]+)\s*=\s*([^;]+);?/i',
preg_replace("|\r\n\s+|", "", $headers['dkim-signature']), $matches))
{
$error = "Can't parse DKIM signature";
return false;
}
$dkim = array_combine($matches[1], $matches[2]);
2012-10-06 21:42:05 +02:00
// check required DKIM tags
if (($missing = array_diff(self::$required_dkim_tags, array_keys($dkim))))
{
$error = 'missing required DKIM tags: '.implode(', ', $missing);
return false;
}
// check dkim version, have to fail if it's not 1
if ($dkim['v'] !== '1')
{
$error = "Wrong DKIM version '$dkim[v]'";
return false;
}
// create headers array, h tag can contain whitespace, which need to be removed
$dkim_headers = array();
$check = $headers;
foreach(explode(':', strtolower(preg_replace("|\s|", "", $dkim['h']))) as $header)
{
// dkim oversigning: ommit not existing headers in signing
if (!isset($check[$header])) continue;
$value = $check[$header];
unset($check[$header]);
$dkim_headers[] = $header.': '.$value;
}
2012-10-06 21:42:05 +02:00
// dkim signature is obvious without content of signature, but must not necessarly be last tag
$dkim_unsigned = 'DKIM-Signature: '.str_replace($dkim['b'], '', $headers['dkim-signature']);
2012-10-06 21:42:05 +02:00
// c defaults to 'simple/simple', check on valid canonicalization methods is performed further down
list($header_canon, $body_canon) = explode('/', isset($dkim['c']) ? $dkim['c'] : 'simple/simple');
// Canonicalization for Body
switch($body_canon)
{
case 'relaxed':
$_b = mailDomainSigner::bodyRelaxCanon($body);
break;
case 'simple':
$_b = mailDomainSigner::bodySimpleCanon($body);
break;
default:
$error = "Unknown body canonicalization '$body_canon'";
return false;
}
2012-10-06 21:42:05 +02:00
// check signing and hashing algorithms
list($sign_algo, $hash_algo) = explode('-', $dkim['a']);
if ($sign_algo != 'rsa' || !in_array($hash_algo, array('sha1', 'sha256', 'sha384', 'sha512')))
{
$error = "Unknown or unimplemented algorithm a='$dkim[a]'";
return false;
}
// Hash of the canonicalized body [tag:bh]
$_bh = base64_encode(hash($hash_algo, $_b, true));
// check body hash, need to remove optional whitespace
if ($_bh != preg_replace("|\s|", "", $dkim['bh']))
{
$error = 'Body hash does NOT verify';
error_log(__METHOD__."() body-hash='$_bh' != '$dkim[bh]'=dkim-bh $error");
return false;
}
// Canonicalization Header Data
switch($header_canon)
{
case 'relaxed':
$_unsigned = mailDomainSigner::headRelaxCanon(implode("\r\n", $dkim_headers). "\r\n".$dkim_unsigned);
break;
case 'ischedule-relaxed':
$_unsigned = mailDomainSigner::headIScheduleRelaxCanon(implode("\r\n", $dkim_headers). "\r\n".$dkim_unsigned);
break;
case 'simple':
$_unsigned = mailDomainSigner::headSimpleCanon(implode("\r\n", $dkim_headers). "\r\n".$dkim_unsigned);
break;
default:
$error = "Unknown header canonicalization '$header_canon'";
return false;
}
// fetch public key using method in dkim q
foreach(explode(':', $dkim['q']) as $method)
{
switch($method)
{
case 'dns/txt':
$public_key = self::dns_txt_pubkey($dkim['d'], $dkim['s']);
break;
2012-10-06 21:42:05 +02:00
case 'http/well-known':
$public_key = self::well_known_pubkey($dkim['d'], $dkim['s']);
break;
case 'private-exchange':
$public_key = self::private_exchange_pubkey($dkim['d'], $dkim['s']);
break;
default: // not understood q method
$public_key = false;
break;
}
if ($public_key) break;
}
2012-10-06 21:42:05 +02:00
// for testing purpose allways try private-exchange, if none other match
if (!$public_key) $public_key = self::private_exchange_pubkey($dkim['d'], $dkim['s']);
if (!$public_key)
{
$error = "No public key for d='$dkim[d]' and s='$dkim[s]' using methods q='$dkim[q]'";
return false;
}
// value of b tag can contain whitespace, which need to be removed
$ok = openssl_verify($_unsigned, base64_decode(preg_replace("|\s|", "", $dkim['b'])), $public_key, $hash_algo);
if ($ok != 1) error_log(__METHOD__."() openssl_verify('$_unsigned', ..., '$public_key', '$hash_algo') returned ".array2string($ok));
switch($ok)
{
case -1:
$error = 'Error while verifying DKIM';
return false;
case 0:
$error = 'DKIM signature does NOT verify';
return false;
}
// verify optional x tag, unix timestamp when signature expires
if (isset($dkim['x']) && (!is_numeric($dkim['x']) || $dkim['x'] < time()))
{
$error = "DKIM signature is expired x=$dkim[x] < ".time();
return false;
}
return true;
}
/**
* Provisional private-exchange public keys
*
* @var array domain => selector => public key
*/
static $private_exchange = array(
'example.com' => array(
'ischedule' => '-----BEGIN PUBLIC KEY-----
MIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQDtocSHvSS1Nn0uIL4Sg+0wp6Kc
W31WRC4Fww8P+jvsVAazVOxvxkShNSd18EvApiNa55P8WgKVEu02OQePjnjKNqfg
JPeajkWy/0CJn+d6rX/ncPMGX2EYzqXy/CyVqpcnVAosToymo6VHL6ufhzlyLJFD
znLtV121CZLUZlAySQIDAQAB
-----END PUBLIC KEY-----',
),
2012-10-06 21:42:05 +02:00
'mysite.edu' => array(
'selector' => '-----BEGIN PUBLIC KEY-----
MIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQCuv+6UtGUdPerJ3s0HCng2sv3c
R3ttma0JB6rMFfOTi1oHgk+h328MfGzhZK+SA9tsRPBcrJE/3uxs4SS2XNG9qRCG
0YMmNFOmubht4RhQhS9drSNyMZbhy2MPVbl9lHAJULFdaDdLj1hc3xTMWy8sDa8s
M8r0gHvp/sPSe9CQQQIDAQAB
-----END PUBLIC KEY-----',
),
'ken.name' => array(
'ischedule' => '-----BEGIN PUBLIC KEY-----
MIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQCfAWRKjVWS/W4F3nUYnj4XWYsy
+DsJdTjMKiHilUgQoz5MLnWpE/rt0LZklMG4Vz0io82pvnUzRrhmiaTTynlEwkj7
gDABr/WCxv2j5vKNayz13my8z+D6efYkuHsPP8z5iQp9yzbKa8FXKb+O7AXbK5fS
3U7S1OJgMpBeCrcpdwIDAQAB
2012-10-06 21:42:05 +02:00
-----END PUBLIC KEY-----',
),
'caldav.egroupware.net' => array(
'calendar' => '-----BEGIN PUBLIC KEY-----
MIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQCiawhLuTSVhnl1zz5pXs1A748y
N3aNE181dni8nsYqIQB1h4H32J4dZurEiAnP9nflQRjCmmg1NTvFcNz11Bem4zo1
K4r4mcfbjlheorK2Mwoh445HR3fo/pP7uV6CcXTNboBJLTxs6ZHswmQjxyuKBKmx
yXUKsIQVi3qPyPdB3QIDAQAB
-----END PUBLIC KEY-----',
),
'outdoor-training.de' => array(
'calendar' => '-----BEGIN PUBLIC KEY-----
MIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQCiawhLuTSVhnl1zz5pXs1A748y
N3aNE181dni8nsYqIQB1h4H32J4dZurEiAnP9nflQRjCmmg1NTvFcNz11Bem4zo1
K4r4mcfbjlheorK2Mwoh445HR3fo/pP7uV6CcXTNboBJLTxs6ZHswmQjxyuKBKmx
yXUKsIQVi3qPyPdB3QIDAQAB
-----END PUBLIC KEY-----',
),
);
/**
2012-10-06 21:42:05 +02:00
* Fetch public key from dns txt recored dkim q=private-exchange
*
* @param string $d domain
* @param string $s selector
* @return string|boolean string with (full) public key or false if not found or other error retrieving it
*/
public static function private_exchange_pubkey($d, $s)
{
if (!isset(self::$private_exchange[$d]) || !isset(self::$private_exchange[$d][$s]))
{
return false;
}
return self::$private_exchange[$d][$s];
}
2012-10-06 21:42:05 +02:00
/**
* Fetch public key via http for q=http/well-known
*
* GET request to https://$domain/.well-known/domainkey/$selector
* Content should be identical to txt record for dns/txt.
*
* @param string $d domain
* @param string $s selector
* @return string|boolean string with (full) public key or false if not found or other error retrieving it
*/
public static function well_known_pubkey($d, $s)
{
if (!($keys = @file_get_contents('https://'.$d.'/.well-known/domainkey/'.$s)) ||
preg_match('/p=([^;]+)/i', $keys, $matches))
{
return false;
}
return "-----BEGIN PUBLIC KEY-----\n".chunk_split($matches[1], 64, "\n")."-----END PUBLIC KEY-----\n";
}
/**
* Fetch public key from dns txt recored dkim q=dns/txt
*
* @param string $d domain
* @param string $s selector
* @return string|boolean string with (full) public key or false if not found or other error retrieving it
*/
public function dns_txt_pubkey($d, $s)
{
if (!($dns = self::fetch_dns($d, $s)))
{
return false;
}
return "-----BEGIN PUBLIC KEY-----\n".chunk_split($dns['p'], 64, "\n")."-----END PUBLIC KEY-----\n";
}
/**
* Fetch dns record and return parsed array
*
* @param string $domain
* @param string $selector
* @return array with values for keys parsed from eg. "v=DKIM1\;k=rsa\;h=sha1\;s=calendar\;t=s\;p=..."
*/
public static function fetch_dns($domain, $selector='calendar')
{
if (!($records = dns_get_record($host=$selector.'._domainkey.'.$domain, DNS_TXT))) return false;
if (!isset($records[0]['text']) &&
!preg_match_all('/[\t\s]*([a-z]+)=([^;]+);?/i', $records[0]['txt'], $matches))
{
return false;
}
return array_combine($matches[1], $matches[2]);
2012-09-30 23:03:33 +02:00
}
2013-11-11 09:31:33 +01:00
const SERIAL = '124';
2012-09-30 23:03:33 +02:00
/**
* Serve an iSchedule GET request, currently only action=capabilities
2012-09-30 23:03:33 +02:00
*
* GET /.well-known/ischedule?action=capabilities HTTP/1.1
2012-09-30 23:03:33 +02:00
* Host: cal.example.com
*
* HTTP/1.1 200 OK
* Date: Mon, 15 Dec 2008 09:32:12 GMT
* Content-Type: application/xml; charset=utf-8
* Content-Length: xxxx
* iSchedule-Version: 1.0
* iSchedule-Capabilities: 123
2012-09-30 23:03:33 +02:00
* ETag: "afasdf-132afds"
*
* <?xml version="1.0" encoding="utf-8" ?>
* <query-result xmlns="urn:ietf:params:xml:ns:ischedule">
2012-10-03 13:19:12 +02:00
* <capabilities>
* <serial-number>123</serial-number>
2012-10-03 13:19:12 +02:00
* <versions>
2012-09-30 23:03:33 +02:00
* <version>1.0</version>
2012-10-03 13:19:12 +02:00
* </versions>
* <scheduling-messages>
* <component name="VEVENT">
2012-09-30 23:03:33 +02:00
* <method name="REQUEST"/>
* <method name="ADD"/>
* <method name="REPLY"/>
* <method name="CANCEL"/>
2012-10-03 13:19:12 +02:00
* </component>
* <component name="VTODO"/>
* <component name="VFREEBUSY"/>
* </scheduling-messages>
* <calendar-data-types>
2012-09-30 23:03:33 +02:00
* <calendar-data-type content-type="text/calendar" version="2.0"/>
2012-10-03 13:19:12 +02:00
* </calendar-data-types>
* <attachmens>
* <inline/>
* <external/>
* </attachments>
2012-09-30 23:03:33 +02:00
* <max-content-length>102400</max-content-length>
* <min-date-time>19910101T000000Z</min-date-time>
* <max-date-time>20381231T000000Z</max-date-time>
* <max-instances>150</max-instances>
* <max-recipients>250</max-recipients>
* <administrator>mailto:ischedule-admin@example.com</administrator>
2012-10-03 13:19:12 +02:00
* </capabilities>
2012-09-30 23:03:33 +02:00
* </query-result>
*/
public function get()
2012-09-30 23:03:33 +02:00
{
if (!isset($_GET['action']) || $_GET['action'] !== 'capabilities')
2012-09-30 23:03:33 +02:00
{
error_log(__METHOD__."() invalid iSchedule request using GET without action=capabilities!");
2012-09-30 23:03:33 +02:00
header("HTTP/1.1 400 Bad Request");
2013-11-11 09:31:33 +01:00
echo "<h1>Invalid iSchedule request using GET without action=capabilities!</h1>\n";
2012-09-30 23:03:33 +02:00
return;
}
// generate capabilities
2013-11-11 09:31:33 +01:00
$xml = new XMLWriter;
2012-09-30 23:03:33 +02:00
$xml->openMemory();
$xml->setIndent(true);
$xml->startDocument('1.0', 'UTF-8');
$xml->startElementNs(null, 'query-result', self::ISCHEDULE);
2013-11-11 09:31:33 +01:00
$xml->startElement('capabilities');
$xml->writeElement('serial-number', self::SERIAL);
2012-09-30 23:03:33 +02:00
2013-11-11 09:31:33 +01:00
$xml->startElement('versions');
foreach(self::$supported_versions as $version)
{
$xml->writeElement('version', $version);
}
$xml->endElement(); // versions
$xml->startElement('scheduling-messages');
foreach(self::$supported_components as $component => $methods)
{
$xml->startElement('component');
$xml->writeAttribute('name', $component);
foreach($methods as $method)
{
$xml->startElement('method');
$xml->writeAttribute('name', $method);
$xml->endElement(); // method
}
$xml->endElement(); // component
}
$xml->endElement(); // scheduling-messages
$xml->startElement('calendar-data-types');
foreach(self::$supported_calendar_data_types as $data)
{
$xml->startElement('calendar-data-type');
foreach($data as $name => $value)
{
$xml->writeAttribute($name, $value);
}
$xml->endElement(); // calendar-data-type
}
$xml->endElement(); // calendar-data-types
$xml->startElement('attachments');
foreach(self::$supported_attachments as $type)
{
$xml->writeElement($type, '');
}
$xml->endElement(); // attachments
if (!empty($GLOBALS['egw_info']['server']['admin_mails']))
{
self::$capablities['administrator'] = 'mailto:'.$GLOBALS['egw_info']['server']['admin_mails'];
}
foreach(self::$capablities as $name => $value)
2012-09-30 23:03:33 +02:00
{
2013-11-11 09:31:33 +01:00
$xml->writeElement($name, $value);
2012-09-30 23:03:33 +02:00
}
2013-11-11 09:31:33 +01:00
$xml->endElement(); // capabilities
2012-09-30 23:03:33 +02:00
$xml->endElement(); // query-result
$xml->endDocument();
2013-11-11 09:31:33 +01:00
$capabilities = $xml->outputMemory();
2012-09-30 23:03:33 +02:00
// returning capabilities
header('Content-Type: application/xml; charset=utf-8');
header('iSchedule-Version: '.self::VERSION);
header('iSchedule-Capabilities: '.self::SERIAL);
2012-09-30 23:03:33 +02:00
header('Content-Length: '.bytes($capabilites));
header('ETag: "'.md5($capabilites).'"');
echo $capabilities;
common::egw_exit();
}
/**
* Exception handler, which additionally logs the request (incl. a trace)
*
* Does NOT return and get installed in constructor.
*
* @param Exception $e
*/
public static function exception_handler(Exception $e)
{
// logging exception as regular egw_execption_hander does
_egw_log_exception($e,$headline);
// exception handler sending message back to the client as http status
$code = $e->getCode();
$msg = $e->getMessage();
list($http_status, $error, $description) = explode(': ', $msg, 3);
// check if we have a valid iSchedule error element, if not we use invalid-scheduling-message
if (!empty($error) && strpos($error, ' ') !== false)
{
$description = $error.($description ? ': '.$description : '');
$error = 'invalid-scheduling-message';
}
2012-09-30 23:03:33 +02:00
if (!in_array($code, array(400, 403, 407, 503))) $code = 500;
header('HTTP/1.1 '.$code.' '.$http_status, true, $code);
header('Content-Type: text/xml; charset=UTF-8');
header('iSchedule-Version: '.self::VERSION);
header('iSchedule-Capabilities: '.self::SERIAL);
if ($error)
{
echo '<?xml version="1.0" encoding="utf-8" ?>
<error xmlns="urn:ietf:params:xml:ns:ischedule">
<'.$error.' />
<response-description>'.htmlspecialchars($description).'</response-description>
</error>
';
}
2012-09-30 23:03:33 +02:00
// if our groupdav logging is active, log the request plus a trace, if enabled in server-config
if (groupdav::$request_starttime && isset(self::$instance))
2012-09-30 23:03:33 +02:00
{
self::$instance->_http_status = $code.' '.$http_status;
2012-09-30 23:03:33 +02:00
if ($GLOBALS['egw_info']['server']['exception_show_trace'])
{
self::$instance->log_request("\n".$e->getTraceAsString()."\n");
2012-09-30 23:03:33 +02:00
}
else
{
self::$instance->log_request();
2012-09-30 23:03:33 +02:00
}
}
2012-09-30 23:03:33 +02:00
if (is_object($GLOBALS['egw']))
{
common::egw_exit();
}
exit;
}
}