1) {
$parsedcal = $tmp_dir.'/parsedcal-'.$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;
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);
$webcal_mtime = strtotime("now -$webcal_hours hours");
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++;
}
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 = $tmp_dir.'/parsedcal-'.$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 $filename) {
// Find the real name of the calendar.
$actual_calname = str_replace($calendar_path, '', $filename);
$actual_calname = str_replace('/', '', str_replace('.ics', '', $actual_calname));
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);
}
$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);
while (substr($nextline, 0, 1) == " ") {
$line = $line . substr($nextline, 1);
$nextline = fgets($ifile, 1024);
$nextline = ereg_replace("[\r\n]", "", $nextline);
}
$line = trim($line);
switch ($line) {
case 'BEGIN:VEVENT':
// each of these vars were being set to an empty string
unset (
$start_time, $end_time, $start_date, $end_date, $summary,
$allday_start, $allday_end, $start, $end, $the_duration,
$beginning, $rrule_array, $start_of_vevent, $description, $bd, $url,
$valarm_description, $start_unixtime, $end_unixtime, $display_end_tmp, $end_time_tmp1,
$recurrence_id, $uid, $class, $location, $rrule, $abs_until, $until_check,
$until, $bymonth, $byday, $bymonthday, $byweek, $byweekno,
$byminute, $byhour, $bysecond, $byyearday, $bysetpos, $wkst,
$interval, $number
);
$except_dates = array();
$except_times = array();
$bymonth = array();
$bymonthday = array();
$first_duration = TRUE;
$count = 1000000;
$valarm_set = FALSE;
$attendee = array();
$organizer = array();
break;
case 'END:VEVENT':
if (!isset($url)) $url = '';
if (!isset($type)) $type = '';
// Handle DURATION
if (!isset($end_unixtime) && isset($the_duration)) {
$end_unixtime = $start_unixtime + $the_duration;
$end_time = date ('Hi', $end_unixtime);
}
// CLASS support
if (isset($class)) {
if ($class == 'PRIVATE') {
$summary ='**PRIVATE**';
$description ='**PRIVATE**';
} elseif ($class == 'CONFIDENTIAL') {
$summary ='**CONFIDENTIAL**';
$description ='**CONFIDENTIAL**';
}
}
// make sure we have some value for $uid
if (!isset($uid)) {
$uid = $uid_counter;
$uid_counter++;
$uid_valid = false;
} else {
$uid_valid = true;
}
if ($uid_valid && isset($processed[$uid]) && isset($recurrence_id['date'])) {
$old_start_date = $processed[$uid][0];
$old_start_time = $processed[$uid][1];
if ($recurrence_id['value'] == 'DATE') $old_start_time = '-1';
$start_date_tmp = $recurrence_id['date'];
if (!isset($start_date)) $start_date = $old_start_date;
if (!isset($start_time)) $start_time = $master_array[$old_start_date][$old_start_time][$uid]['event_start'];
if (!isset($start_unixtime)) $start_unixtime = $master_array[$old_start_date][$old_start_time][$uid]['start_unixtime'];
if (!isset($end_unixtime)) $end_unixtime = $master_array[$old_start_date][$old_start_time][$uid]['end_unixtime'];
if (!isset($end_time)) $end_time = $master_array[$old_start_date][$old_start_time][$uid]['event_end'];
if (!isset($summary)) $summary = $master_array[$old_start_date][$old_start_time][$uid]['event_text'];
if (!isset($length)) $length = $master_array[$old_start_date][$old_start_time][$uid]['event_length'];
if (!isset($description)) $description = $master_array[$old_start_date][$old_start_time][$uid]['description'];
if (!isset($location)) $location = $master_array[$old_start_date][$old_start_time][$uid]['location'];
if (!isset($organizer)) $organizer = $master_array[$old_start_date][$old_start_time][$uid]['organizer'];
if (!isset($status)) $status = $master_array[$old_start_date][$old_start_time][$uid]['status'];
if (!isset($attendee)) $attendee = $master_array[$old_start_date][$old_start_time][$uid]['attendee'];
if (!isset($url)) $url = $master_array[$old_start_date][$old_start_time][$uid]['url'];
removeOverlap($start_date_tmp, $old_start_time, $uid);
if (isset($master_array[$start_date_tmp][$old_start_time][$uid])) {
unset($master_array[$start_date_tmp][$old_start_time][$uid]); // SJBO added $uid twice here
if (sizeof($master_array[$start_date_tmp][$old_start_time]) == 0) {
unset($master_array[$start_date_tmp][$old_start_time]);
}
}
$write_processed = false;
} else {
$write_processed = true;
}
if (!isset($summary)) $summary = '';
if (!isset($description)) $description = '';
if (!isset($status)) $status = '';
if (!isset($class)) $class = '';
if (!isset($location)) $location = '';
$mArray_begin = mktime (0,0,0,12,21,($this_year - 1));
$mArray_end = mktime (0,0,0,1,12,($this_year + 1));
if (isset($start_time) && isset($end_time)) {
// Mozilla style all-day events or just really long events
if (($end_time - $start_time) > 2345) {
$allday_start = $start_date;
$allday_end = ($start_date + 1);
}
}
if (isset($start_unixtime,$end_unixtime) && date('Ymd',$start_unixtime) != date('Ymd',$end_unixtime)) {
$spans_day = true;
$bleed_check = (($start_unixtime - $end_unixtime) < (60*60*24)) ? '-1' : '0';
} else {
$spans_day = false;
$bleed_check = 0;
}
if (isset($start_time) && $start_time != '') {
preg_match ('/([0-9]{2})([0-9]{2})/', $start_time, $time);
preg_match ('/([0-9]{2})([0-9]{2})/', $end_time, $time2);
if (isset($start_unixtime) && isset($end_unixtime)) {
$length = $end_unixtime - $start_unixtime;
} else {
$length = ($time2[1]*60+$time2[2]) - ($time[1]*60+$time[2]);
}
$drawKey = drawEventTimes($start_time, $end_time);
preg_match ('/([0-9]{2})([0-9]{2})/', $drawKey['draw_start'], $time3);
$hour = $time3[1];
$minute = $time3[2];
}
// RECURRENCE-ID Support
if (isset($recurrence_d)) {
$recurrence_delete["$recurrence_d"]["$recurrence_t"] = $uid;
}
// handle single changes in recurring events
// Maybe this is no longer need since done at bottom of parser? - CL 11/20/02
if ($uid_valid && $write_processed) {
if (!isset($hour)) $hour = 00;
if (!isset($minute)) $minute = 00;
$processed[$uid] = array($start_date,($hour.$minute), $type);
}
// Handling of the all day events
if ((isset($allday_start) && $allday_start != '')) {
$start = strtotime($allday_start);
if ($spans_day) {
$allday_end = date('Ymd',$end_unixtime);
}
if (isset($allday_end)) {
$end = strtotime($allday_end);
} else {
$end = strtotime('+1 day', $start);
}
// Changed for 1.0, basically write out the entire event if it starts while the array is written.
if (($start < $mArray_end) && ($start < $end)) {
while (($start != $end) && ($start < $mArray_end)) {
$start_date2 = date('Ymd', $start);
$master_array[($start_date2)][('-1')][$uid]= array ('event_text' => $summary, 'description' => $description, 'location' => $location, 'organizer' => serialize($organizer), 'attendee' => serialize($attendee), 'calnumber' => $calnumber, 'calname' => $actual_calname, 'url' => $url, 'status' => $status, 'class' => $class );
$start = strtotime('+1 day', $start);
}
if (!$write_processed) $master_array[($start_date)]['-1'][$uid]['exception'] = true;
}
}
// Handling regular events
if ((isset($start_time) && $start_time != '') && (!isset($allday_start) || $allday_start == '')) {
if (($end_time > $bleed_time) && ($bleed_check == '-1')) {
$start_tmp = strtotime(date('Ymd',$start_unixtime));
$end_date_tmp = date('Ymd',$end_unixtime);
while ($start_tmp < $end_unixtime) {
$start_date_tmp = date('Ymd',$start_tmp);
if ($start_date_tmp == $start_date) {
$time_tmp = $hour.$minute;
$start_time_tmp = $start_time;
} else {
$time_tmp = '0000';
$start_time_tmp = '0000';
}
if ($start_date_tmp == $end_date_tmp) {
$end_time_tmp = $end_time;
} else {
$end_time_tmp = '2400';
$display_end_tmp = $end_time;
}
$nbrOfOverlaps = checkOverlap($start_date_tmp, $start_time_tmp, $end_time_tmp, $uid);
$master_array[$start_date_tmp][$time_tmp][$uid] = array ('event_start' => $start_time_tmp, 'event_end' => $end_time_tmp, 'display_end' => $display_end_tmp, 'start_unixtime' => $start_unixtime, 'end_unixtime' => $end_unixtime, 'event_text' => $summary, 'event_length' => $length, 'event_overlap' => $nbrOfOverlaps, 'description' => $description, 'status' => $status, 'class' => $class, 'spans_day' => true, 'location' => $location, 'organizer' => serialize($organizer), 'attendee' => serialize($attendee), 'calnumber' => $calnumber, 'calname' => $actual_calname, 'url' => $url );
$start_tmp = strtotime('+1 day',$start_tmp);
}
if (!$write_processed) $master_array[$start_date][($hour.$minute)][$uid]['exception'] = true;
} else {
if ($bleed_check == '-1') {
$display_end_tmp = $end_time;
$end_time_tmp1 = '2400';
}
if (!isset($end_time_tmp1)) $end_time_tmp1 = $end_time;
// This if statement should prevent writing of an excluded date if its the first recurrance - CL
if (!in_array($start_date, $except_dates)) {
$nbrOfOverlaps = checkOverlap($start_date, $start_time, $end_time_tmp1, $uid);
$master_array[($start_date)][($hour.$minute)][$uid] = array ('event_start' => $start_time, 'event_end' => $end_time_tmp1, 'display_end' => $display_end_tmp, 'start_unixtime' => $start_unixtime, 'end_unixtime' => $end_unixtime, 'event_text' => $summary, 'event_length' => $length, 'event_overlap' => $nbrOfOverlaps, 'description' => $description, 'status' => $status, 'class' => $class, 'spans_day' => false, 'location' => $location, 'organizer' => serialize($organizer), 'attendee' => serialize($attendee), 'calnumber' => $calnumber, 'calname' => $actual_calname, 'url' => $url );
if (!$write_processed) $master_array[($start_date)][($hour.$minute)][$uid]['exception'] = true;
}
}
}
// Handling of the recurring events, RRULE
if (isset($rrule_array) && is_array($rrule_array)) {
if (isset($allday_start) && $allday_start != '') {
$hour = '-';
$minute = '1';
$rrule_array['START_DAY'] = $allday_start;
$rrule_array['END_DAY'] = $allday_end;
$rrule_array['END'] = 'end';
$recur_start = $allday_start;
$start_date = $allday_start;
if (isset($allday_end)) {
$diff_allday_days = dayCompare($allday_end, $allday_start);
} else {
$diff_allday_days = 1;
}
} else {
$rrule_array['START_DATE'] = $start_date;
$rrule_array['START_TIME'] = $start_time;
$rrule_array['END_TIME'] = $end_time;
$rrule_array['END'] = 'end';
}
$start_date_time = strtotime($start_date);
$this_month_start_time = strtotime($this_year.$this_month.'01');
if ($save_parsed_cals == 'yes' && !$is_webcal) {
$start_range_time = strtotime($this_year.'-01-01 -2 weeks');
$end_range_time = strtotime($this_year.'-12-31 +2 weeks');
} else {
$start_range_time = strtotime('-1 month -2 day', $this_month_start_time);
$end_range_time = strtotime('+2 month +2 day', $this_month_start_time);
}
foreach ($rrule_array as $key => $val) {
switch($key) {
case 'FREQ':
switch ($val) {
case 'YEARLY': $freq_type = 'year'; break;
case 'MONTHLY': $freq_type = 'month'; break;
case 'WEEKLY': $freq_type = 'week'; break;
case 'DAILY': $freq_type = 'day'; break;
case 'HOURLY': $freq_type = 'hour'; break;
case 'MINUTELY': $freq_type = 'minute'; break;
case 'SECONDLY': $freq_type = 'second'; break;
}
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = strtolower($val);
break;
case 'COUNT':
$count = $val;
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $count;
break;
case 'UNTIL':
$until = str_replace('T', '', $val);
$until = str_replace('Z', '', $until);
if (strlen($until) == 8) $until = $until.'235959';
$abs_until = $until;
ereg ('([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{2})([0-9]{2})', $until, $regs);
$until = mktime($regs[4],$regs[5],$regs[6],$regs[2],$regs[3],$regs[1]);
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = localizeDate($dateFormat_week,$until);
break;
case 'INTERVAL':
$number = $val;
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $number;
break;
case 'BYSECOND':
$bysecond = $val;
$bysecond = split (',', $bysecond);
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $bysecond;
break;
case 'BYMINUTE':
$byminute = $val;
$byminute = split (',', $byminute);
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $byminute;
break;
case 'BYHOUR':
$byhour = $val;
$byhour = split (',', $byhour);
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $byhour;
break;
case 'BYDAY':
$byday = $val;
$byday = split (',', $byday);
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $byday;
break;
case 'BYMONTHDAY':
$bymonthday = $val;
$bymonthday = split (',', $bymonthday);
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $bymonthday;
break;
case 'BYYEARDAY':
$byyearday = $val;
$byyearday = split (',', $byyearday);
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $byyearday;
break;
case 'BYWEEKNO':
$byweekno = $val;
$byweekno = split (',', $byweekno);
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $byweekno;
break;
case 'BYMONTH':
$bymonth = $val;
$bymonth = split (',', $bymonth);
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $bymonth;
break;
case 'BYSETPOS':
$bysetpos = $val;
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $bysetpos;
break;
case 'WKST':
$wkst = $val;
$master_array[($start_date)][($hour.$minute)][$uid]['recur'][$key] = $wkst;
break;
case 'END':
// Modify the COUNT based on BYDAY
if ((is_array($byday)) && (isset($count))) {
$blah = sizeof($byday);
$count = ($count / $blah);
unset ($blah);
}
if (!isset($number)) $number = 1;
// if $until isn't set yet, we set it to the end of our range we're looking at
if (!isset($until)) $until = $end_range_time;
if (!isset($abs_until)) $abs_until = date('YmdHis', $end_range_time);
$end_date_time = $until;
$start_range_time_tmp = $start_range_time;
$end_range_time_tmp = $end_range_time;
// For weekly's without a byday
if ((!isset($byday)) && ($rrule_array['FREQ'] == 'WEEKLY')) {
ereg ('([0-9]{4})([0-9]{2})([0-9]{2})', $start_date, $startregs);
$bd = strtolower(date ("l", mktime($hour,$minute,0,$startregs[2],$startregs[3],$startregs[1])));
}
// If the $end_range_time is less than the $start_date_time, or $start_range_time is greater
// than $end_date_time, we may as well forget the whole thing
// It doesn't do us any good to spend time adding data we aren't even looking at
// this will prevent the year view from taking way longer than it needs to
if ($end_range_time_tmp >= $start_date_time && $start_range_time_tmp <= $end_date_time) {
// if the beginning of our range is less than the start of the item, we may as well set it equal to it
if ($start_range_time_tmp < $start_date_time) $start_range_time_tmp = $start_date_time;
if ($end_range_time_tmp > $end_date_time) $end_range_time_tmp = $end_date_time;
// initialze the time we will increment
$next_range_time = $start_range_time_tmp;
// FIXME: This is a hack to fix repetitions with $interval > 1
if ($count > 1 && $number > 1) $count = 1 + ($count - 1) * $number;
$count_to = 0;
// start at the $start_range and go until we hit the end of our range.
while (($next_range_time >= $start_range_time_tmp) && ($next_range_time <= $end_range_time_tmp) && ($count_to != $count)) {
$func = $freq_type.'Compare';
$diff = $func(date('Ymd',$next_range_time), $start_date);
if ($diff < $count) {
if ($diff % $number == 0) {
$interval = $number;
switch ($rrule_array['FREQ']) {
case 'DAILY':
$next_date_time = $next_range_time;
$recur_data[] = $next_date_time;
break;
case 'WEEKLY':
if (!isset($byday)) {
$next_date = dateOfWeek(date('Ymd', $next_range_time),$bd);
$next_date_time = strtotime($next_date);
$recur_data[] = $next_date_time;
} elseif (is_array($byday)) {
foreach($byday as $day) {
$day = two2threeCharDays($day);
$next_date = dateOfWeek(date('Ymd', $next_range_time),$day);
$next_date_time = strtotime($next_date);
$recur_data[] = $next_date_time;
}
}
break;
case 'MONTHLY':
if (empty($bymonth)) $bymonth = array(1,2,3,4,5,6,7,8,9,10,11,12);
$next_range_time = strtotime(date('Y-m-01', $next_range_time));
$next_date_time = $next_date_time;
if ((isset($bymonthday)) && (!isset($byday))) {
foreach($bymonthday as $day) {
$year = date('Y', $next_range_time);
$month = date('m', $next_range_time);
if (checkdate($month,$day,$year)) {
$next_date_time = mktime(0,0,0,$month,$day,$year);
$recur_data[] = $next_date_time;
}
}
} elseif (is_array($byday)) {
foreach($byday as $day) {
ereg ('([-\+]{0,1})?([0-9]{1})?([A-Z]{2})', $day, $byday_arr);
//Added for 2.0 when no modifier is set
if ($byday_arr[2] != '') {
$nth = $byday_arr[2]-1;
} else {
$nth = 0;
}
$on_day = two2threeCharDays($byday_arr[3]);
$on_day_num = two2threeCharDays($byday_arr[3],false);
if ((isset($byday_arr[1])) && ($byday_arr[1] == '-')) {
$last_day_tmp = date('t',$next_range_time);
$next_range_time = strtotime(date('Y-m-'.$last_day_tmp, $next_range_time));
$last_tmp = (date('w',$next_range_time) == $on_day_num) ? '' : 'last ';
$next_date_time = strtotime($last_tmp.$on_day.' -'.$nth.' week', $next_range_time);
$month = date('m', $next_date_time);
if (in_array($month, $bymonth)) {
$recur_data[] = $next_date_time;
}
} elseif (isset($bymonthday) && (!empty($bymonthday))) {
// This supports MONTHLY where BYDAY and BYMONTH are both set
foreach($bymonthday as $day) {
$year = date('Y', $next_range_time);
$month = date('m', $next_range_time);
if (checkdate($month,$day,$year)) {
$next_date_time = mktime(0,0,0,$month,$day,$year);
$daday = strtolower(strftime("%a", $next_date_time));
if ($daday == $on_day && in_array($month, $bymonth)) {
$recur_data[] = $next_date_time;
}
}
}
} elseif ((isset($byday_arr[1])) && ($byday_arr[1] != '-')) {
$next_date_time = strtotime($on_day.' +'.$nth.' week', $next_range_time);
$month = date('m', $next_date_time);
if (in_array($month, $bymonth)) {
$recur_data[] = $next_date_time;
}
}
$next_date = date('Ymd', $next_date_time);
}
}
break;
case 'YEARLY':
if ((!isset($bymonth)) || (sizeof($bymonth) == 0)) {
$m = date('m', $start_date_time);
$bymonth = array("$m");
}
foreach($bymonth as $month) {
// FIXME: Jan 1 does not display in December
$year = date('Y', $next_range_time);
if (($year != $this_year) && ($month < 3)) {
$year = $this_year;
}
if ((isset($byday)) && (is_array($byday))) {
$checkdate_time = mktime(0,0,0,$month,1,$year);
foreach($byday as $day) {
ereg ('([-\+]{0,1})?([0-9]{1})?([A-Z]{2})', $day, $byday_arr);
if ($byday_arr[2] != '') {
$nth = $byday_arr[2]-1;
} else {
$nth = 0;
}
$on_day = two2threeCharDays($byday_arr[3]);
$on_day_num = two2threeCharDays($byday_arr[3],false);
if ($byday_arr[1] == '-') {
$last_day_tmp = date('t',$checkdate_time);
$checkdate_time = strtotime(date('Y-m-'.$last_day_tmp, $checkdate_time));
$last_tmp = (date('w',$checkdate_time) == $on_day_num) ? '' : 'last ';
$next_date_time = strtotime($last_tmp.$on_day.' -'.$nth.' week', $checkdate_time);
} else {
$next_date_time = strtotime($on_day.' +'.$nth.' week', $checkdate_time);
}
}
} else {
$day = date('d', $start_date_time);
$next_date_time = mktime(0,0,0,$month,$day,$year);
//echo date('Ymd',$next_date_time).$summary.'
';
}
$recur_data[] = $next_date_time;
}
if (isset($byyearday)) {
foreach ($byyearday as $yearday) {
ereg ('([-\+]{0,1})?([0-9]{1,3})', $yearday, $byyearday_arr);
if ($byyearday_arr[1] == '-') {
$ydtime = mktime(0,0,0,12,31,$this_year);
$yearnum = $byyearday_arr[2] - 1;
$next_date_time = strtotime('-'.$yearnum.' days', $ydtime);
} else {
$ydtime = mktime(0,0,0,1,1,$this_year);
$yearnum = $byyearday_arr[2] - 1;
$next_date_time = strtotime('+'.$yearnum.' days', $ydtime);
}
$recur_data[] = $next_date_time;
}
}
break;
default:
// anything else we need to end the loop
$next_range_time = $end_range_time_tmp + 100;
$count_to = $count;
}
} else {
$interval = 1;
}
$next_range_time = strtotime('+'.$interval.' '.$freq_type, $next_range_time);
} else {
// end the loop because we aren't going to write this event anyway
$count_to = $count;
}
// use the same code to write the data instead of always changing it 5 times
if (isset($recur_data) && is_array($recur_data)) {
$recur_data_hour = @substr($start_time,0,2);
$recur_data_minute = @substr($start_time,2,2);
foreach($recur_data as $recur_data_time) {
$recur_data_year = date('Y', $recur_data_time);
$recur_data_month = date('m', $recur_data_time);
$recur_data_day = date('d', $recur_data_time);
$recur_data_date = $recur_data_year.$recur_data_month.$recur_data_day;
if (($recur_data_time > $start_date_time) && ($recur_data_time <= $end_date_time) && ($count_to != $count) && !in_array($recur_data_date, $except_dates)) {
if (isset($allday_start) && $allday_start != '') {
$start_time2 = $recur_data_time;
$end_time2 = strtotime('+'.$diff_allday_days.' days', $recur_data_time);
while ($start_time2 < $end_time2) {
$start_date2 = date('Ymd', $start_time2);
$master_array[($start_date2)][('-1')][] = array ('event_text' => $summary, 'description' => $description, 'location' => $location, 'organizer' => serialize($organizer), 'attendee' => serialize($attendee), 'calnumber' => $calnumber, 'calname' => $actual_calname, 'url' => $url, 'status' => $status, 'class' => $class );
$start_time2 = strtotime('+1 day', $start_time2);
}
} else {
$start_unixtime_tmp = mktime($recur_data_hour,$recur_data_minute,0,$recur_data_month,$recur_data_day,$recur_data_year);
$end_unixtime_tmp = $start_unixtime_tmp + $length;
if (($end_time > $bleed_time) && ($bleed_check == '-1')) {
$start_tmp = strtotime(date('Ymd',$start_unixtime_tmp));
$end_date_tmp = date('Ymd',$end_unixtime_tmp);
while ($start_tmp < $end_unixtime_tmp) {
$start_date_tmp = date('Ymd',$start_tmp);
if ($start_date_tmp == $recur_data_year.$recur_data_month.$recur_data_day) {
$time_tmp = $hour.$minute;
$start_time_tmp = $start_time;
} else {
$time_tmp = '0000';
$start_time_tmp = '0000';
}
if ($start_date_tmp == $end_date_tmp) {
$end_time_tmp = $end_time;
} else {
$end_time_tmp = '2400';
$display_end_tmp = $end_time;
}
// Let's double check the until to not write past it
$until_check = $start_date_tmp.$time_tmp.'00';
if ($abs_until > $until_check) {
$nbrOfOverlaps = checkOverlap($start_date_tmp, $start_time_tmp, $end_time_tmp, $uid);
$master_array[$start_date_tmp][$time_tmp][$uid] = array ('event_start' => $start_time_tmp, 'event_end' => $end_time_tmp, 'display_end' => $display_end_tmp, 'start_unixtime' => $start_unixtime_tmp, 'end_unixtime' => $end_unixtime_tmp, 'event_text' => $summary, 'event_length' => $length, 'event_overlap' => $nbrOfOverlaps, 'description' => $description, 'status' => $status, 'class' => $class, 'spans_day' => true, 'location' => $location, 'organizer' => serialize($organizer), 'attendee' => serialize($attendee), 'calnumber' => $calnumber, 'calname' => $actual_calname, 'url' => $url) ;
}
$start_tmp = strtotime('+1 day',$start_tmp);
}
} else {
if ($bleed_check == '-1') {
$display_end_tmp = $end_time;
$end_time_tmp1 = '2400';
}
if (!isset($end_time_tmp1)) $end_time_tmp1 = $end_time;
// Let's double check the until to not write past it
$until_check = $recur_data_date.$hour.$minute.'00';
if ($abs_until > $until_check) {
$nbrOfOverlaps = checkOverlap($recur_data_date, $start_time, $end_time_tmp1, $uid);
$master_array[($recur_data_date)][($hour.$minute)][$uid] = array ('event_start' => $start_time, 'event_end' => $end_time_tmp1, 'display_end' => $display_end_tmp, 'start_unixtime' => $start_unixtime_tmp, 'end_unixtime' => $end_unixtime_tmp, 'event_text' => $summary, 'event_length' => $length, 'event_overlap' => $nbrOfOverlaps, 'description' => $description, 'status' => $status, 'class' => $class, 'spans_day' => false, 'location' => $location, 'organizer' => serialize($organizer), 'attendee' => serialize($attendee), 'calnumber' => $calnumber, 'calname' => $actual_calname, 'url' => $url);
}
}
}
}
}
unset($recur_data);
}
}
}
}
}
}
// This should remove any exdates that were missed.
// Added for version 0.9.5
if (is_array($except_dates)) {
foreach ($except_dates as $key => $value) {
$time = $except_times[$key];
unset($master_array[$value][$time][$uid]);
if (count($master_array[$value][$time]) < 1) {
unset($master_array[$value][$time]);
if (count($master_array[$value]) < 1) {
unset($master_array[$value]);
}
}
}
}
// Clear event data now that it's been saved.
unset($start_time, $start_time_tmp, $end_time, $end_time_tmp, $start_unixtime, $start_unixtime_tmp, $end_unixtime, $end_unixtime_tmp, $summary, $length, $nbrOfOverlaps, $description, $status, $class, $location, $organizer, $attendee);
break;
case 'END:VTODO':
if ((!$vtodo_priority) && ($status == 'COMPLETED')) {
$vtodo_sort = 11;
} elseif (!$vtodo_priority) {
$vtodo_sort = 10;
} else {
$vtodo_sort = $vtodo_priority;
}
$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);
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;
break;
case 'BEGIN:VALARM':
$valarm_set = TRUE;
break;
case 'END:VALARM':
$valarm_set = FALSE;
break;
default:
unset ($field, $data, $prop_pos, $property);
ereg ("([^:]+):(.*)", $line, $line);
$field = $line[1];
$data = $line[2];
$property = $field;
$prop_pos = strpos($property,';');
if ($prop_pos !== false) $property = substr($property,0,$prop_pos);
$property = strtoupper($property);
switch ($property) {
// Start VTODO Parsing
//
case 'DUE':
$data = str_replace ('/softwarestudio.org/Olson_20011030_5/', '', $data);
$zulu_time = false;
if (substr($data,-1) == 'Z') $zulu_time = true;
$data = str_replace('T', '', $data);
$data = str_replace('Z', '', $data);
if (preg_match("/^DUE;VALUE=DATE/i", $field)) {
$allday_start = $data;
$start_date = $allday_start;
$start_unixtime = strtotime($data);
$due_date = date('Ymd', $start_unixtime);
} else {
if (preg_match("/^DUE;TZID=/i", $field)) {
$tz_tmp = explode('=', $field);
$tz_due = $tz_tmp[1];
unset($tz_tmp);
} elseif ($zulu_time) {
$tz_due = 'GMT';
}
ereg ('([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{0,2})([0-9]{0,2})', $data, $regs);
$due_date = $regs[1] . $regs[2] . $regs[3];
$due_time = $regs[4] . $regs[5];
$start_unixtime = mktime($regs[4], $regs[5], 0, $regs[2], $regs[3], $regs[1]);
$dlst = date('I', $start_unixtime);
$server_offset_tmp = chooseOffset($start_unixtime);
if (isset($tz_due)) {
if (array_key_exists($tz_due, $tz_array)) {
$offset_tmp = $tz_array[$tz_due][$dlst];
} else {
$offset_tmp = '+0000';
}
} elseif (isset($calendar_tz)) {
if (array_key_exists($calendar_tz, $tz_array)) {
$offset_tmp = $tz_array[$calendar_tz][$dlst];
} else {
$offset_tmp = '+0000';
}
} else {
$offset_tmp = $server_offset_tmp;
}
$start_unixtime = calcTime($offset_tmp, $server_offset_tmp, $start_unixtime);
$due_date = date('Ymd', $start_unixtime);
$due_time = date('Hi', $start_unixtime);
unset($server_offset_tmp);
}
break;
case 'COMPLETED':
$data = str_replace ('/softwarestudio.org/Olson_20011030_5/', '', $data);
$zulu_time = false;
if (substr($data,-1) == 'Z') $zulu_time = true;
$data = str_replace('T', '', $data);
$data = str_replace('Z', '', $data);
if (preg_match("/^COMPLETED;VALUE=DATE/i", $field)) {
$allday_start = $data;
$start_date = $allday_start;
} else {
if (preg_match("/^COMPLETED;TZID=/i", $field)) {
$tz_tmp = explode('=', $field);
$tz_completed = $tz_tmp[1];
unset($tz_tmp);
} elseif ($zulu_time) {
$tz_completed = 'GMT';
}
ereg ('([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{0,2})([0-9]{0,2})', $data, $regs);
$completed_date = $regs[1] . $regs[2] . $regs[3];
$completed_time = $regs[4] . $regs[5];
$start_unixtime = mktime($regs[4], $regs[5], 0, $regs[2], $regs[3], $regs[1]);
$dlst = date('I', $start_unixtime);
$server_offset_tmp = chooseOffset($start_unixtime);
if (isset($tz_completed)) {
if (array_key_exists($tz_completed, $tz_array)) {
$offset_tmp = $tz_array[$tz_completed][$dlst];
} else {
$offset_tmp = '+0000';
}
} elseif (isset($calendar_tz)) {
if (array_key_exists($calendar_tz, $tz_array)) {
$offset_tmp = $tz_array[$calendar_tz][$dlst];
} else {
$offset_tmp = '+0000';
}
} else {
$offset_tmp = $server_offset_tmp;
}
$start_unixtime = calcTime($offset_tmp, $server_offset_tmp, $start_unixtime);
$completed_date = date('Ymd', $start_unixtime);
$completed_time = date('Hi', $start_unixtime);
unset($server_offset_tmp);
}
break;
case 'PRIORITY':
$vtodo_priority = "$data";
break;
case 'STATUS':
$status = "$data";
break;
case 'CLASS':
$class = "$data";
break;
case 'CATEGORIES':
$vtodo_categories = "$data";
break;
//
// End VTODO Parsing
case 'DTSTART':
$data = str_replace ('/softwarestudio.org/Olson_20011030_5/', '', $data);
$zulu_time = false;
if (substr($data,-1) == 'Z') $zulu_time = true;
$data = str_replace('T', '', $data);
$data = str_replace('Z', '', $data);
$field = str_replace(';VALUE=DATE-TIME', '', $field);
if ((preg_match("/^DTSTART;VALUE=DATE/i", $field)) || (ereg ('^([0-9]{4})([0-9]{2})([0-9]{2})$', $data))) {
ereg ('([0-9]{4})([0-9]{2})([0-9]{2})', $data, $dtstart_check);
if ($dtstart_check[1] < 1970) {
$data = '1971'.$dtstart_check[2].$dtstart_check[3];
}
$allday_start = $data;
$start_date = $allday_start;
$start_unixtime = strtotime($data);
} else {
if (preg_match("/^DTSTART;TZID=/i", $field)) {
$tz_tmp = explode('=', $field);
$tz_dtstart = $tz_tmp[1];
unset($tz_tmp);
} elseif ($zulu_time) {
$tz_dtstart = 'GMT';
}
preg_match ('/([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{0,2})([0-9]{0,2})/', $data, $regs);
$start_date = $regs[1] . $regs[2] . $regs[3];
$start_time = $regs[4] . $regs[5];
$start_unixtime = mktime($regs[4], $regs[5], 0, $regs[2], $regs[3], $regs[1]);
$dlst = date('I', $start_unixtime);
$server_offset_tmp = chooseOffset($start_unixtime);
if (isset($tz_dtstart)) {
if (array_key_exists($tz_dtstart, $tz_array)) {
$offset_tmp = $tz_array[$tz_dtstart][$dlst];
} else {
$offset_tmp = '+0000';
}
} elseif (isset($calendar_tz)) {
if (array_key_exists($calendar_tz, $tz_array)) {
$offset_tmp = $tz_array[$calendar_tz][$dlst];
} else {
$offset_tmp = '+0000';
}
} else {
$offset_tmp = $server_offset_tmp;
}
$start_unixtime = calcTime($offset_tmp, $server_offset_tmp, $start_unixtime);
$start_date = date('Ymd', $start_unixtime);
$start_time = date('Hi', $start_unixtime);
unset($server_offset_tmp, $offset_tmp, $tz_dtstart);
}
break;
case 'DTEND':
$data = str_replace ('/softwarestudio.org/Olson_20011030_5/', '', $data);
$zulu_time = false;
if (substr($data,-1) == 'Z') $zulu_time = true;
$data = str_replace('T', '', $data);
$data = str_replace('Z', '', $data);
$field = str_replace(';VALUE=DATE-TIME', '', $field);
if (preg_match("/^DTEND;VALUE=DATE/i", $field)) {
preg_match ('/([0-9]{4})([0-9]{2})([0-9]{2})/', $data, $dtend_check);
if ($dtend_check[1] < 1970) {
$data = '1971'.$dtend_check[2].$dtend_check[3];
}
$allday_end = $data;
} else {
if (preg_match("/^DTEND;TZID=/i", $field)) {
$tz_tmp = explode('=', $field);
$tz_dtend = $tz_tmp[1];
unset($tz_tmp);
} elseif ($zulu_time) {
$tz_dtend = 'GMT';
}
preg_match ('/([0-9]{4})([0-9]{2})([0-9]{2})([0-9]{0,2})([0-9]{0,2})/', $data, $regs);
$end_date = $regs[1] . $regs[2] . $regs[3];
$end_time = $regs[4] . $regs[5];
$end_unixtime = mktime($regs[4], $regs[5], 0, $regs[2], $regs[3], $regs[1]);
$dlst = date('I', $end_unixtime);
$server_offset_tmp = chooseOffset($end_unixtime);
if (isset($tz_dtend)) {
$offset_tmp = $tz_array[$tz_dtend][$dlst];
} elseif (isset($calendar_tz)) {
$offset_tmp = $tz_array[$calendar_tz][$dlst];
} else {
$offset_tmp = $server_offset_tmp;
}
$end_unixtime = calcTime($offset_tmp, $server_offset_tmp, $end_unixtime);
$end_date = date('Ymd', $end_unixtime);
$end_time = date('Hi', $end_unixtime);
unset($server_offset_tmp, $offset_tmp, $tz_dtend);
}
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] == '') && ($start_time != '')) {
$except_times[] = $start_time;
} else {
$except_times[] = $regs[4] . $regs[5];
}
}
break;
case 'SUMMARY':
$data = str_replace("\\n", "
", $data);
$data = str_replace("\\r", "
", $data);
$data = str_replace('$', '$', $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("\\r", "
", $data);
$data = str_replace('$', '$', $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]);
$dlst = date('I', $recur_unixtime);
$server_offset_tmp = chooseOffset($recur_unixtime);
if (isset($recurrence_id['tzid'])) {
$tz_tmp = $recurrence_id['tzid'];
$offset_tmp = $tz_array[$tz_tmp][$dlst];
} elseif (isset($calendar_tz)) {
$offset_tmp = $tz_array[$calendar_tz][$dlst];
} else {
$offset_tmp = $server_offset_tmp;
}
$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;
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,2}[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':
$field = str_replace("ATTENDEE;CN=", "", $field);
$data = str_replace ("mailto:", "", $data);
$attendee[] = array ('name' => $field, 'email' => $data);
break;
case 'ORGANIZER':
$field = str_replace("ORGANIZER;CN=", "", $field);
$data = str_replace ("mailto:", "", $data);
$organizer[] = array ('name' => $field, 'email' => $data);
break;
case 'LOCATION':
$data = str_replace("\\n", "
", $data);
$data = str_replace("\\r", "
", $data);
$location = $data;
break;
case 'URL':
$url = $data;
break;
}
}
}
}
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) && $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);
}
}
//If you want to see the values in the arrays, uncomment below.
//print '
'; //print_r($master_array); //print_r($overlap_array); //print_r($day_array); //print_r($rrule_array); //print_r($recurrence_delete); //print ''; // Set a calender name for all calenders combined if ($cal == $ALL_CALENDARS_COMBINED) { $calendar_name = $all_cal_comb_lang; } $template_started = getmicrotime(); ?>