save_parsed_cals == 'yes') {
if (sizeof ($cal_filelist) > 1) {
$parsedcal = $phpiCal_config->tmp_dir.'/parsedcal-'.urlencode($cpath.'::'.$cal_filename).'-'.$this_year;
if (file_exists($parsedcal)) {
$fd = fopen($parsedcal, 'r');
$contents = fread($fd, filesize($parsedcal));
fclose($fd);
$master_array = unserialize($contents);
$z=1;
$y=0;
$webcal_mtime = time() - ($phpiCal_config->webcal_hours * 3600);
if (sizeof($master_array['-4']) == (sizeof($cal_filelist))) {
foreach ($master_array['-4'] as $temp_array) {
$mtime = $master_array['-4'][$z]['mtime'];
$fname = $master_array['-4'][$z]['filename'];
$wcalc = $master_array['-4'][$z]['webcal'];
if ($wcalc == 'no') $realcal_mtime = filemtime($fname);
if (($mtime == $realcal_mtime) && ($wcalc == 'no')) {
$y++;
} elseif (($wcalc == 'yes') && ($mtime > $webcal_mtime)) {
//echo date('H:i',$mtime). ' > '. date('H:i',$webcal_mtime);
$y++;
}
$z++;
}
foreach ($master_array['-3'] as $temp_array) {
if (isset($temp_array) && $temp_array !='') $caldisplaynames[] = $temp_array;
}
if ($y == sizeof($cal_filelist)) {
if ($master_array['-1'] == 'valid cal file') {
$parse_file = false;
$calendar_name = $master_array['calendar_name'];
$calendar_tz = $master_array['calendar_tz'];
}
}
}
}
if ($parse_file == true) unset($master_array);
} else {
foreach ($cal_filelist as $filename) {
$realcal_mtime = filemtime($filename);
$parsedcal = $phpiCal_config->tmp_dir.'/parsedcal-'.urlencode($cpath.'::'.$cal_filename).'-'.$this_year;
if (file_exists($parsedcal)) {
$parsedcal_mtime = filemtime($parsedcal);
if ($realcal_mtime == $parsedcal_mtime) {
$fd = fopen($parsedcal, 'r');
$contents = fread($fd, filesize($parsedcal));
fclose($fd);
$master_array = unserialize($contents);
if ($master_array['-1'] == 'valid cal file') {
$parse_file = false;
$calendar_name = $master_array['calendar_name'];
$calendar_tz = $master_array['calendar_tz'];
}
}
}
}
}
}
if ($parse_file) {
$overlap_array = array ();
$uid_counter = 0;
}
$calnumber = 1;
foreach ($cal_filelist as $cal_key=>$filename) {
// Find the real name of the calendar.
$actual_calname = getCalendarName($filename);
if ($parse_file) {
// Let's see if we're doing a webcal
$is_webcal = FALSE;
if (substr($filename, 0, 7) == 'http://' || substr($filename, 0, 8) == 'https://' || substr($filename, 0, 9) == 'webcal://') {
$is_webcal = TRUE;
$cal_webcalPrefix = str_replace('http://','webcal://',$filename);
$cal_httpPrefix = str_replace('webcal://','http://',$filename);
$cal_httpsPrefix = str_replace('webcal://','https://',$filename);
$cal_httpsPrefix = str_replace('http://','https://',$cal_httpsPrefix);
$filename = $cal_httpPrefix;
$master_array['-4'][$calnumber]['webcal'] = 'yes';
$actual_mtime = time();
} else {
$actual_mtime = @filemtime($filename);
}
include(BASE.'functions/parse/parse_tzs.php');
$ifile = @fopen($filename, "r");
if ($ifile == FALSE) exit(error($lang['l_error_cantopen'], $filename));
$nextline = fgets($ifile, 1024);
if (trim($nextline) != 'BEGIN:VCALENDAR') exit(error($lang['l_error_invalidcal'], $filename));
// Set a value so we can check to make sure $master_array contains valid data
$master_array['-1'] = 'valid cal file';
// Set default calendar name - can be overridden by X-WR-CALNAME
$calendar_name = $cal_filename;
$master_array['calendar_name'] = $calendar_name;
// read file in line by line
// XXX end line is skipped because of the 1-line readahead
while (!feof($ifile)) {
$line = $nextline;
$nextline = fgets($ifile, 1024);
$nextline = ereg_replace("[\r\n]", "", $nextline);
#handle continuation lines that start with either a space or a tab (MS Outlook)
while (isset($nextline{0}) && ($nextline{0} == " " || $nextline{0} == "\t")) {
$line = $line . substr($nextline, 1);
$nextline = fgets($ifile, 1024);
$nextline = ereg_replace("[\r\n]", "", $nextline);
}
$line = trim(stripslashes($line));
switch ($line) {
case 'BEGIN:VFREEBUSY':
case 'BEGIN:VEVENT':
// each of these vars were being set to an empty string
unset (
$start_time, $end_time, $start_date, $end_date,
$allday_start, $allday_end, $start, $end, $the_duration,
$beginning, $start_of_vevent,
$valarm_description, $start_unixtime, $end_unixtime, $display_end_tmp, $end_time_tmp1,
$recurrence_id, $uid, $rrule, $until_check,
$until, $byweek, $byweekno,
$byminute, $byhour, $bysecond
);
$interval = 1;
$summary = '';
$description = '';
$status = '';
$class = '';
$location = '';
$url = '';
$geo = '';
$type = '';
$other = '';
$wkst = 'MO';
$vtodo_categories = '';
$except_dates = array();
$except_times = array();
$rrule_array = array();
$byday = array();
$bymonth = array();
$bymonthday = array();
$byyearday = array();
$bysetpos = array();
$first_duration = TRUE;
$count = 1000000;
$valarm_set = FALSE;
$attendee = array();
$organizer = array();
break;
case 'END:VFREEBUSY':
case 'END:VEVENT':
include BASE."functions/parse/end_vevent.php";
break;
case 'END:VTODO':
if (($vtodo_priority == '') && ($status == 'COMPLETED')) {
$vtodo_sort = 11;
} elseif ($vtodo_priority == '') {
$vtodo_sort = 10;
} else {
$vtodo_sort = $vtodo_priority;
}
// CLASS support
if (isset($class)) {
if ($class == 'PRIVATE') {
$summary = '**PRIVATE**';
$description = '**PRIVATE**';
} elseif ($class == 'CONFIDENTIAL') {
$summary = '**CONFIDENTIAL**';
$description = '**CONFIDENTIAL**';
}
}
$master_array['-2']["$vtodo_sort"]["$uid"] = array (
'start_date' => $start_date,
'start_time' => $start_time,
'vtodo_text' => $summary,
'due_date'=> $due_date,
'due_time'=> $due_time,
'completed_date' => $completed_date,
'completed_time' => $completed_time,
'priority' => $vtodo_priority,
'status' => $status,
'class' => $class,
'categories' => $vtodo_categories,
'description' => $description,
'calname' => $actual_calname,
'geo' => $geo,
'url' => $url
);
unset ($start_date, $start_time, $due_date, $due_time, $completed_date, $completed_time, $vtodo_priority, $status, $class, $vtodo_categories, $summary, $description);
$vtodo_set = FALSE;
break;
case 'BEGIN:VTODO':
$vtodo_set = TRUE;
$summary = '';
$due_date = '';
$due_time = '';
$completed_date = '';
$completed_time = '';
$vtodo_priority = '';
$vtodo_categories = '';
$status = '';
$class = '';
$description = '';
break;
case 'BEGIN:VALARM':
$valarm_set = TRUE;
break;
case 'END:VALARM':
$valarm_set = FALSE;
break;
default:
unset ($field, $data, $prop_pos, $property);
if (ereg ("([^:]+):(.*)", $line, $line)){
$field = $line[1];
$data = $line[2];
$property = strtoupper($field);
$prop_pos = strpos($property,';');
if ($prop_pos !== false) $property = substr($property,0,$prop_pos);
switch ($property) {
// Start VTODO Parsing
//
case 'DUE':
$datetime = extractDateTime($data, $property, $field);
$due_date = $datetime[1];
$due_time = $datetime[2];
break;
case 'COMPLETED':
$datetime = extractDateTime($data, $property, $field);
$completed_date = $datetime[1];
$completed_time = $datetime[2];
break;
case 'PRIORITY':
$vtodo_priority = "$data";
break;
case 'STATUS':
$status = "$data";
break;
case 'GEO':
$geo = "$data";
break;
case 'CLASS':
$class = "$data";
break;
case 'CATEGORIES':
$vtodo_categories = "$data";
break;
//
// End VTODO Parsing
case 'DTSTART':
$datetime = extractDateTime($data, $property, $field);
$start_unixtime = $datetime[0];
$start_date = $datetime[1];
$start_time = $datetime[2];
$allday_start = $datetime[3];
$start_tz = $datetime[4];
preg_match ('/([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{0,2})([0-9]{0,2})/', $data, $regs);
$vevent_start_date = $regs[1] . $regs[2] . $regs[3];
$day_offset = dayCompare($start_date, $vevent_start_date);
#echo date("Ymd Hi", $start_unixtime)." $start_date $start_time $vevent_start_date $day_offset
";
break;
case 'DTEND':
$datetime = extractDateTime($data, $property, $field);
$end_unixtime = $datetime[0];
$end_date = $datetime[1];
$end_time = $datetime[2];
$allday_end = $datetime[3];
break;
case 'EXDATE':
$data = split(",", $data);
foreach ($data as $exdata) {
$exdata = str_replace('T', '', $exdata);
$exdata = str_replace('Z', '', $exdata);
preg_match ('/([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{0,2})([0-9]{0,2})/', $exdata, $regs);
$except_dates[] = $regs[1] . $regs[2] . $regs[3];
// Added for Evolution, since they dont think they need to tell me which time to exclude.
if ($regs[4] == '' && isset($start_time) && $start_time != '') {
$except_times[] = $start_time;
} else {
$except_times[] = $regs[4] . $regs[5];
}
}
break;
case 'SUMMARY':
$data = str_replace("\\n", "
", $data);
$data = str_replace("\\t", " ", $data);
$data = str_replace("\\r", "
", $data);
$data = str_replace('$', '$', $data);
$data = stripslashes($data);
$data = htmlentities(urlencode($data));
if ($valarm_set == FALSE) {
$summary = $data;
} else {
$valarm_summary = $data;
}
break;
case 'DESCRIPTION':
$data = str_replace("\\n", "
", $data);
$data = str_replace("\\t", " ", $data);
$data = str_replace("\\r", "
", $data);
$data = str_replace('$', '$', $data);
$data = stripslashes($data);
$data = htmlentities(urlencode($data));
if ($valarm_set == FALSE) {
$description = $data;
} else {
$valarm_description = $data;
}
break;
case 'RECURRENCE-ID':
$parts = explode(';', $field);
foreach($parts as $part) {
$eachval = split('=',$part);
if ($eachval[0] == 'RECURRENCE-ID') {
// do nothing
} elseif ($eachval[0] == 'TZID') {
$recurrence_id['tzid'] = $eachval[1];
} elseif ($eachval[0] == 'RANGE') {
$recurrence_id['range'] = $eachval[1];
} elseif ($eachval[0] == 'VALUE') {
$recurrence_id['value'] = $eachval[1];
} else {
$recurrence_id[] = $eachval[1];
}
}
unset($parts, $part, $eachval);
$data = str_replace('T', '', $data);
$data = str_replace('Z', '', $data);
ereg ('([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{0,2})([0-9]{0,2})', $data, $regs);
$recurrence_id['date'] = $regs[1] . $regs[2] . $regs[3];
$recurrence_id['time'] = $regs[4] . $regs[5];
$recur_unixtime = mktime($regs[4], $regs[5], 0, $regs[2], $regs[3], $regs[1]);
if (isset($recurrence_id['tzid'])) {
$offset_tmp = chooseOffset($recur_unixtime, $recurrence_id['tzid']);
} elseif (isset($calendar_tz)) {
$offset_tmp = chooseOffset($recur_unixtime, $calendar_tz);
} else {
$offset_tmp = $chooseOffset($recur_unixtime);
}
$recur_unixtime = calcTime($offset_tmp, @$server_offset_tmp, $recur_unixtime);
$recurrence_id['date'] = date('Ymd', $recur_unixtime);
$recurrence_id['time'] = date('Hi', $recur_unixtime);
$recurrence_d = date('Ymd', $recur_unixtime);
$recurrence_t = date('Hi', $recur_unixtime);
unset($server_offset_tmp);
break;
case 'UID':
$uid = $data;
break;
case 'X-WR-CALNAME':
$actual_calname = $data;
$master_array['calendar_name'] = $actual_calname;
$cal_displaynames[$cal_key] = $actual_calname; #correct the default calname based on filename
break;
case 'X-WR-TIMEZONE':
$calendar_tz = $data;
$master_array['calendar_tz'] = $calendar_tz;
break;
case 'DURATION':
if (($first_duration == TRUE) && (!stristr($field, '=DURATION'))) {
ereg ('^P([0-9]{1,2}[W])?([0-9]{1,3}[D])?([T]{0,1})?([0-9]{1,2}[H])?([0-9]{1,2}[M])?([0-9]{1,2}[S])?', $data, $duration);
$weeks = str_replace('W', '', $duration[1]);
$days = str_replace('D', '', $duration[2]);
$hours = str_replace('H', '', $duration[4]);
$minutes = str_replace('M', '', $duration[5]);
$seconds = str_replace('S', '', $duration[6]);
$the_duration = ($weeks * 60 * 60 * 24 * 7) + ($days * 60 * 60 * 24) + ($hours * 60 * 60) + ($minutes * 60) + ($seconds);
$first_duration = FALSE;
}
break;
case 'RRULE':
$data = str_replace ('RRULE:', '', $data);
$rrule = split (';', $data);
foreach ($rrule as $recur) {
ereg ('(.*)=(.*)', $recur, $regs);
$rrule_array[$regs[1]] = $regs[2];
}
break;
case 'ATTENDEE':
$attendee[] = array ('name' => ereg_replace ("ATTENDEE;CN=([^;]*).*", "\\1", $field),
'email' => ereg_replace (".*mailto:(.*).*", "\\1", $field),
'RSVP' => ereg_replace (".*RSVP=([^;]*).*", "\\1", $field),
'PARSTAT' => ereg_replace (".*PARTSTAT=([^;]*).*", "\\1", $field),
'ROLE' => ereg_replace (".*ROLE=([^;]*).*", "\\1", $field));
break;
case 'ORGANIZER':
$field = str_replace("ORGANIZER;CN=", "", $field);
$data = str_replace ("mailto:", "", $data);
$organizer[] = array ('name' => stripslashes($field), 'email' => stripslashes($data));
break;
case 'LOCATION':
$data = str_replace("\\n", "
", $data);
$data = str_replace("\\t", " ", $data);
$data = str_replace("\\r", "
", $data);
$data = stripslashes($data);
$location = $data;
break;
case 'URL':
$url = $data;
break;
default:
if(strpos(':',$data) > 1) $other .= $data;
}
}
}
}
}
if (!isset($master_array['-3'][$calnumber])) $master_array['-3'][$calnumber] = $actual_calname;
if (!isset($master_array['-4'][$calnumber]['mtime'])) $master_array['-4'][$calnumber]['mtime'] = $actual_mtime;
if (!isset($master_array['-4'][$calnumber]['filename'])) $master_array['-4'][$calnumber]['filename'] = $filename;
if (!isset($master_array['-4'][$calnumber]['webcal'])) $master_array['-4'][$calnumber]['webcal'] = 'no';
$calnumber = $calnumber + 1;
}
if ($parse_file) {
// Sort the array by absolute date.
if (isset($master_array) && is_array($master_array)) {
ksort($master_array);
reset($master_array);
// sort the sub (day) arrays so the times are in order
foreach (array_keys($master_array) as $k) {
if (isset($master_array[$k]) && is_array($master_array[$k])) {
ksort($master_array[$k]);
reset($master_array[$k]);
}
}
}
// write the new master array to the file
if (isset($master_array) && is_array($master_array) && $phpiCal_config->save_parsed_cals == 'yes') {
$write_me = serialize($master_array);
$fd = @fopen($parsedcal, 'w');
if ($fd == FALSE) exit(error($lang['l_error_cache'], $filename));
@fwrite($fd, $write_me);
@fclose($fd);
@touch($parsedcal, $realcal_mtime);
}
}
// Set a calender name for all calenders combined
if ($cal == $phpiCal_config->ALL_CALENDARS_COMBINED) {
$calendar_name = $all_cal_comb_lang;
}
/* example of how to customize the display name sort order
if(in_array('US Holidays',$cal_displaynames)){
unset($cal_displaynames[array_search('US Holidays',$cal_displaynames)]);
array_unshift($cal_displaynames, 'US Holidays');
}
*/
$cal_displayname = urldecode(implode(', ', $cal_displaynames)); #reset this with the correct names
$template_started = getmicrotime();
//If you want to see the values in the arrays, uncomment below.
#print '';
#var_dump($phpiCal_config);
#print_r($master_array);
#var_dump($overlap_array['20081211']);
//print_r($day_array);
//print_r($rrule_array);
//print_r($byday_arr);
//print_r($recurrence_delete);
//print_r($cal_displaynames);
//print_r($cal_filelist);
//print_r($tz_array);
#print '
';
?>