You are here

function ical_import in Event 5

Same name and namespace in other branches
  1. 5.2 ical.inc \ical_import()

Given the location of a valide iCalendar file, will return an array of event information

Parameters

$filename: Location (local or remote) of a valid iCalendar file

Return value

An array of associative arrays where 'start' => Unix timestamp (GMT) of start time 'end' => Unix timestamp (GMT) of end time 'allday_start' => Start date of all-day event in YYYYMMDD format 'allday_end' => End date of all-day event in YYYYMMDD format 'summary' => Title of event 'description' => Description of event 'location' => Location of event 'uid' => ID of the event in calendaring program 'url' => URL of event information *

File

./ical.inc, line 105
API for event import/export in iCalendar format as outlined in Internet Calendaring and Scheduling Core Object Specification http://www.ietf.org/rfc/rfc2445.txt

Code

function ical_import($filename) {
  $items = array();
  $ifile = @fopen($filename, "r");
  if ($ifile == FALSE) {
    exit('Invalid input file');
  }
  $nextline = fgets($ifile, 1024);
  if (trim($nextline) != 'BEGIN:VCALENDAR') {
    exit('Invalid calendar file:' . $filename);
  }
  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':
        unset($start_unixtime, $start_date, $start_time, $end_unixtime, $end_date, $end_time, $allday_start, $allday_end, $the_duration, $uid, $summary, $description, $url, $location);
        break;
      case 'END:VEVENT':
        if (empty($uid)) {
          $uid = $uid_counter;
          $uid_counter++;
        }
        if (empty($end_unixtime) && isset($the_duration)) {
          $end_unixtime = $start_unixtime + $the_duration;
          $end_time = date('Hi', $end_unixtime);
        }
        $items[$uid] = array(
          'start' => $start_unixtime,
          'end' => $end_unixtime,
          'allday_start' => $allday_start,
          'allday_end' => $allday_end,
          'summary' => $summary,
          'description' => $description,
          'location' => $location,
          'url' => $url,
          'uid' => $uid,
        );
        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) {
          case 'DTSTART':
            $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);
              $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 = _ical_chooseOffset($start_unixtime, 'Same as Server');
              if (isset($tz_dtstart)) {
                if ($tz = _ical_tz($tz_dtstart)) {
                  $offset_tmp = date('I', $start_unixtime) ? $tz->offset_dst : $tz->offset;
                }
                else {
                  $offset_tmp = '+0000';
                }
              }
              else {
                if (isset($calendar_tz)) {
                  if ($tz = _ical_tz($calendar_tz)) {
                    $offset_tmp = date('I', $start_unixtime) ? $tz->offset_dst : $tz->offset;
                  }
                  else {
                    $offset_tmp = '+0000';
                  }
                }
                else {
                  $offset_tmp = $server_offset_tmp;
                }
              }
              $start_unixtime = _ical_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':
            $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) || ereg('^([0-9]{4})([0-9]{2})([0-9]{2})$', $data)) {
              $allday_end = $data;
              $end_date = $allday_end;
              $end_unixtime = strtotime($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]);
              $server_offset_tmp = _ical_chooseOffset($end_unixtime, 'Same as Server');
              if (isset($tz_dtend)) {
                if ($tz = _ical_tz($tz_dtend)) {
                  $offset_tmp = date('I', $end_unixtime) ? $tz->offset_dst : $tz->offset;
                }
                else {
                  $offset_tmp = '+0000';
                }
              }
              else {
                if (isset($calendar_tz)) {
                  if ($tz = _ical_tz($calendar_tz)) {
                    $offset_tmp = date('I', $end_unixtime) ? $tz->offset_dst : $tz->offset;
                  }
                  else {
                    $offset_tmp = '+0000';
                  }
                }
                else {
                  $offset_tmp = $server_offset_tmp;
                }
              }
              $end_unixtime = _ical_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 'DURATION':
            if (!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;
            }
            break;
          case 'SUMMARY':
            $summary = $data;
            break;
          case 'DESCRIPTION':
            $description = $data;
            break;
          case 'UID':
            $uid = $data;
            break;
          case 'X-WR-CALNAME':
            $actual_calname = $data;
            break;
          case 'X-WR-TIMEZONE':
            $calendar_tz = $data;
            break;
          case 'LOCATION':
            $location = $data;
            break;
          case 'URL':
            $url = $data;
            break;
        }
    }
  }
  return $items;
}