nik/davical
1
0
Fork 0
mirror of https://gitlab.com/davical-project/davical.git synced 2026-03-13 08:00:15 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Update timezone database from remote server.

Browse Source
This commit is contained in:
Andrew McMillan 2011-09-22 07:54:09 +12:00
parent fe659b4aaa
commit bc36ff60a3
1 changed files with 106 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

108
inc/tz/updatecheck.php
View File

@ -10,6 +10,8 @@
*/
require_once('vCalendar.php');
require_once('XMLDocument.php');
require_once('RRule-v2.php');
$new_zones = 0;
$modified_zones = 0;
@ -17,6 +19,107 @@ $modified_zones = 0;
if ( empty($c->tzsource) ) $c->tzsource = '../zonedb/vtimezones';
if ( preg_match('{^http}', $c->tzsource ) ) {
function fetch_tz_ids( $base_url, $current_zones ) {
global $request;
$result = array();
$list_url = $base_url . '?action=list';
printf( "Fetching timezone list\n", $list_url );
$raw_xml = file_get_contents($list_url);
$xml_parser = xml_parser_create_ns('UTF-8');
$xml_tags = array();
xml_parser_set_option ( $xml_parser, XML_OPTION_SKIP_WHITE, 1 );
xml_parser_set_option ( $xml_parser, XML_OPTION_CASE_FOLDING, 0 );
$rc = xml_parse_into_struct( $xml_parser, $raw_xml, $xml_tags );
if ( $rc == false ) {
dbg_error_log( 'ERROR', 'XML parsing error: %s at line %d, column %d', xml_error_string(xml_get_error_code($xml_parser)),
xml_get_current_line_number($xml_parser), xml_get_current_column_number($xml_parser) );
$request->PreconditionFailed(400, 'invalid-xml',
sprintf('XML parsing error: %s at line %d, column %d', xml_error_string(xml_get_error_code($xml_parser)),
xml_get_current_line_number($xml_parser), xml_get_current_column_number($xml_parser) ));
}
xml_parser_free($xml_parser);
$position = 0;
$xmltree = BuildXMLTree( $xml_tags, $position);
$zones = $xmltree->GetElements('urn:ietf:params:xml:ns:timezone-service:summary');
foreach( $zones AS $zone ) {
$elements = $zone->GetElements('urn:ietf:params:xml:ns:timezone-service:tzid');
$tzid = $elements[0]->GetContent();
$elements = $zone->GetElements('urn:ietf:params:xml:ns:timezone-service:last-modified');
$last_modified = new RepeatRuleDateTime($elements[0]->GetContent());
if ( $last_modified > $current_zones[$tzid] ) {
$result[] = $tzid;
printf("Found timezone %s needs updating\n", $tzid);
}
$elements = $zone->GetElements('urn:ietf:params:xml:ns:timezone-service:alias');
foreach( $elements AS $element ) {
$alias = $element->GetContent();
}
}
return $result;
}
$changesince = null;
$qry = new AwlQuery("SELECT tzid, to_char(last_modified,'YYYY-MM-DD\"T\"HH24:MI:SS') AS last_modified FROM timezones");
$current_zones = array();
if ( $qry->Exec('tz/updatecheck',__LINE__,__FILE__) && $qry->rows() > 0 ) {
$row = $qry->Fetch();
$current_zones[$row->tzid] = new RepeatRuleDateTime($row->last_modified);
}
foreach( fetch_tz_ids($c->tzsource, $current_zones) AS $tzid ) {
$tz_url = $c->tzsource . '?action=get&tzid=' .$tzid;
$tzrow = null;
if ( $qry->QDo('SELECT * FROM timezones WHERE tzid=:tzid', array(':tzid' => $tzid)) && $qry->rows() > 0 ) {
$tzrow = $qry->Fetch();
}
printf( "Fetching zone for %s from %s\n", $tzid, $tz_url );
dbg_error_log( 'tz/updatecheck', "Fetching zone for %s from %s\n", $tzid, $tz_url );
$vtimezone = file_get_contents( $tz_url );
if ( empty($vtimezone) ) {
dbg_error_log('tz/updatecheck', 'Skipping zone "%s" - no data from server', $tzid );
continue;
}
if ( $vtimezone == $tzrow->vtimezone ) {
dbg_error_log('tz/updatecheck', 'Skipping zone "%s" - no change', $tzid );
continue;
}
$vtz = new vCalendar($vtimezone);
$last_modified = $vtz->GetPValue('LAST-MODIFIED');
if ( empty($last_modified) ) {
$last_modified = gmdate('Ymd\THis\Z');
// Then it was probably that way when we last updated the data, too :-(
if ( !empty($tzrow) ) {
$old_vtz = new vCalendar($tzrow->vtimezone);
$old_vtz->ClearProperties('LAST-MODIFIED');
// We need to add & remove this property so the Render is equivalent.
$vtz->AddProperty('LAST-MODIFIED',$last_modified);
$vtz->ClearProperties('LAST-MODIFIED');
if ( $vtz->Render() == $old_vtz->Render() ) {
dbg_error_log('tz/updatecheck', 'Skipping zone "%s" - no change', $tzid );
continue;
}
}
$vtz->AddProperty('LAST-MODIFIED',$last_modified);
}
dbg_error_log('tz/updatecheck', 'Writing %s zone for "%s"', (empty($tzrow)?"new":"updated"), $tzid );
$params = array(
':tzid' => $tzid,
':olson_name' => $tzid,
':vtimezone' => $vtz->Render(),
':last_modified' => $last_modified,
':etag' => md5($vtz->Render())
);
if ( empty($tzrow) ) {
$new_zones++;
$sql = 'INSERT INTO timezones(tzid,active,olson_name,last_modified,etag,vtimezone) ';
$sql .= 'VALUES(:tzid,TRUE,:olson_name,:last_modified,:etag,:vtimezone)';
}
else {
$modified_zones++;
$sql = 'UPDATE timezones SET active=TRUE, olson_name=:olson_name, last_modified=:last_modified, ';
$sql .= 'etag=:etag, vtimezone=:vtimezone WHERE tzid=:tzid';
}
$qry->QDo($sql,$params);
}
}
else if ( file_exists($c->tzsource) ) {
/**
@ -90,11 +193,12 @@ else if ( file_exists($c->tzsource) ) {
}
$qry->QDo($sql,$params);
}
header('Content-type: text/plain');
printf('Added %d new zones and updated data for %d zones', $new_zones, $modified_zones);
}
else {
dbg_error_log('ERROR', '$c->tzsource is not configured to a good source of timezone data');
}
header('Content-type: text/plain');
printf("Added %d new zones and updated data for %d zones\n", $new_zones, $modified_zones);
exit(0);