/** * parse iCal file into vcalendar, components, properties and parameters * * @author Kjell-Inge Gustafsson <*****@*****.**> * @since 2.4.10 - 2008-08-06 * @param string $filename optional filname (incl. opt. directory/path) or URL * @return bool FALSE if error occurs during parsing * */ function parse($filename = FALSE) { if (!$filename) { /* directory/filename previous set via setConfig directory+filename / url */ if (FALSE === ($filename = $this->getConfig('url'))) { $filename = $this->getConfig('dirfile'); } } elseif ('http://' == strtolower(substr($filename, 0, 7)) || 'webcal://' == strtolower(substr($filename, 0, 9))) { /* remote file - URL */ $this->setConfig('URL', $filename); if (!($filename = $this->getConfig('url'))) { return FALSE; } /* err 2 */ } else { /* local directory/filename */ $parts = pathinfo($filename); if (!empty($parts['dirname']) && '.' != $parts['dirname']) { if (!$this->setConfig('directory', $parts['dirname'])) { return FALSE; } /* err 3 */ } if (!$this->setConfig('filename', $parts['basename'])) { return FALSE; } /* err 4 */ } if ('http://' != substr($filename, 0, 7) && 'https://' != substr($filename, 0, 8)) { /* local file error tests */ if (!is_file($filename)) { /* err 5 */ return FALSE; } if (!is_readable($filename)) { return FALSE; } /* err 6 */ if (!filesize($filename)) { return FALSE; } /* err 7 */ clearstatcache(); } /* READ FILE */ if (FALSE === ($rows = file($filename))) { return FALSE; } /* err 1 */ /* identify BEGIN:VCALENDAR, MUST be first row */ if ('BEGIN:VCALENDAR' != strtoupper(trim($rows[0]))) { return FALSE; } /* err 8 */ /* remove empty trailing lines */ while ('' == trim($rows[count($rows) - 1])) { unset($rows[count($rows) - 1]); $rows = array_values($rows); } /* identify ending END:VCALENDAR row */ if ('END:VCALENDAR' != strtoupper(trim($rows[count($rows) - 1]))) { return FALSE; /* err 9 */ } if (3 > count($rows)) { return FALSE; } /* err 10 */ $comp = $subcomp = null; $actcomp =& $this; $nl = $this->getConfig('nl'); $calsync = 0; /* identify components and update unparsed data within component */ foreach ($rows as $line) { if ('' == trim($line)) { continue; } if ($nl == substr($line, 0 - strlen($nl))) { $line = substr($line, 0, strlen($line) - strlen($nl)) . '\\n'; } if ('BEGIN:VCALENDAR' == strtoupper(substr($line, 0, 15))) { $calsync++; continue; } elseif ('END:VCALENDAR' == strtoupper(substr($line, 0, 13))) { $calsync--; continue; } elseif (1 != $calsync) { return FALSE; } /* err 20 */ if ('END:' == strtoupper(substr($line, 0, 4))) { if (null != $subcomp) { $comp->setComponent($subcomp); $subcomp = null; } else { $this->setComponent($comp); $comp = null; } $actcomp = null; continue; } elseif ('BEGIN:' == strtoupper(substr($line, 0, 6))) { $line = str_replace('\\n', '', $line); $compname = trim(strtoupper(substr($line, 6))); if (null != $comp) { if ('VALARM' == $compname) { $subcomp = new valarm(); } elseif ('STANDARD' == $compname) { $subcomp = new vtimezone('STANDARD'); } elseif ('DAYLIGHT' == $compname) { $subcomp = new vtimezone('DAYLIGHT'); } else { return FALSE; } /* err 6 */ $actcomp =& $subcomp; } else { switch ($compname) { case 'VALARM': $comp = new valarm(); break; case 'VEVENT': $comp = new vevent(); break; case 'VFREEBUSY': $comp = new vfreebusy(); break; case 'VJOURNAL': $comp = new vjournal(); break; case 'VTODO': $comp = new vtodo(); break; case 'VTIMEZONE': $comp = new vtimezone(); break; default: return FALSE; // err 7 break; } // end - switch $actcomp =& $comp; } continue; } // end - elsif ( 'BEGIN:'.. . /* update selected component with unparsed data */ $actcomp->unparsed[] = $line; } // end - foreach( rows.. . /* parse data for calendar (this) object */ if (is_array($this->unparsed) && 0 < count($this->unparsed)) { /* concatenate property values spread over several lines */ $lastix = -1; $propnames = array('calscale', 'method', 'prodid', 'version', 'x-'); $proprows = array(); foreach ($this->unparsed as $line) { $newProp = FALSE; foreach ($propnames as $propname) { if ($propname == strtolower(substr($line, 0, strlen($propname)))) { $newProp = TRUE; break; } } if ($newProp) { $newProp = FALSE; $lastix++; $proprows[$lastix] = $line; } else { /* remove line breaks */ if ('\\n' == substr($proprows[$lastix], -2) && ' ' == substr($line, 0, 1)) { $proprows[$lastix] = substr($proprows[$lastix], 0, strlen($proprows[$lastix]) - 2); $line = substr($line, 1); } $proprows[$lastix] .= $line; } } $toolbox = new calendarComponent(); foreach ($proprows as $line) { if ('\\n' == substr($line, -2)) { $line = substr($line, 0, strlen($line) - 2); } /* get propname */ $cix = $propname = null; for ($cix = 0; $cix < strlen($line); $cix++) { if (in_array($line[$cix], array(':', ';'))) { break; } else { $propname .= $line[$cix]; } } /* ignore version/prodid properties */ if (in_array(strtoupper($propname), array('VERSION', 'PRODID'))) { continue; } $line = substr($line, $cix); /* separate attributes from value */ $attr = array(); $attrix = -1; $strlen = strlen($line); for ($cix = 0; $cix < $strlen; $cix++) { if (':' == $line[$cix] && '://' != substr($line, $cix, 3) && 'mailto:' != strtolower(substr($line, $cix - 6, 7))) { $attrEnd = TRUE; if ($cix < $strlen - 4 && ctype_digit(substr($line, $cix + 1, 4))) { // an URI with a (4pos) portnr?? for ($c2ix = $cix; 3 < $c2ix; $c2ix--) { if ('://' == substr($line, $c2ix - 2, 3)) { $attrEnd = FALSE; break; // an URI with a portnr!! } } } if ($attrEnd) { $line = substr($line, $cix + 1); break; } } if (';' == $line[$cix]) { $attr[++$attrix] = null; } else { $attr[$attrix] .= $line[$cix]; } } /* make attributes in array format */ $propattr = array(); foreach ($attr as $attribute) { $attrsplit = explode('=', $attribute, 2); if (1 < count($attrsplit)) { $propattr[$attrsplit[0]] = $attrsplit[1]; } else { $propattr[] = $attribute; } } /* update Property */ if (FALSE !== strpos($line, ',')) { $content = explode(',', $line); $clen = count($content); for ($cix = 0; $cix < $clen; $cix++) { if ("\\" == substr($content[$cix], -1)) { $content[$cix] .= ',' . $content[$cix + 1]; unset($content[$cix + 1]); $cix++; } } if (1 < count($content)) { foreach ($content as $cix => $contentPart) { $content[$cix] = $toolbox->_strunrep($contentPart); } $this->setProperty($propname, $content, $propattr); continue; } else { $line = reset($content); } $line = $toolbox->_strunrep($line); } $this->setProperty($propname, trim($line), $propattr); } // end - foreach( $this->unparsed.. . } // end - if( is_array( $this->unparsed.. . /* parse Components */ if (is_array($this->components) && 0 < count($this->components)) { for ($six = 0; $six < count($this->components); $six++) { if (!empty($this->components[$six])) { $this->components[$six]->parse(); } } } else { return FALSE; } /* err 91 or something.. . */ return TRUE; }
/** * parse component unparsed data into properties * * @author Kjell-Inge Gustafsson, kigkonsult <*****@*****.**> * @since 2.8.2 - 2011-05-21 * @param mixed $unparsedtext, optional, strict rfc2445 formatted, single property string or array of strings * @return bool FALSE if error occurs during parsing * */ function parse($unparsedtext = null) { if (!empty($unparsedtext)) { $nl = $this->getConfig('nl'); if (is_array($unparsedtext)) { $unparsedtext = implode('\\n' . $nl, $unparsedtext); } /* fix line folding */ $eolchars = array("\r\n", "\n\r", "\n", "\r"); // check all line endings $EOLmark = FALSE; foreach ($eolchars as $eolchar) { if (!$EOLmark && FALSE !== strpos($unparsedtext, $eolchar)) { $unparsedtext = str_replace($eolchar . " ", '', $unparsedtext); $unparsedtext = str_replace($eolchar . "\t", '', $unparsedtext); if ($eolchar != $nl) { $unparsedtext = str_replace($eolchar, $nl, $unparsedtext); } $EOLmark = TRUE; } } $tmp = explode($nl, $unparsedtext); $unparsedtext = array(); foreach ($tmp as $tmpr) { if (!empty($tmpr)) { $unparsedtext[] = $tmpr; } } } elseif (!isset($this->unparsed)) { $unparsedtext = array(); } else { $unparsedtext = $this->unparsed; } $this->unparsed = array(); $comp =& $this; $config = $this->getConfig(); foreach ($unparsedtext as $line) { // echo $comp->objName.": $line<br />"; // test ### if (in_array(strtoupper(substr($line, 0, 6)), array('END:VA', 'END:ST', 'END:DA'))) { $this->components[] = $comp->copy(); } elseif ('END:' == strtoupper(substr($line, 0, 4))) { break; } elseif ('BEGIN:VALARM' == strtoupper(substr($line, 0, 12))) { $comp = new valarm($config); } elseif ('BEGIN:STANDARD' == strtoupper(substr($line, 0, 14))) { $comp = new vtimezone('standard', $config); } elseif ('BEGIN:DAYLIGHT' == strtoupper(substr($line, 0, 14))) { $comp = new vtimezone('daylight', $config); } elseif ('BEGIN:' == strtoupper(substr($line, 0, 6))) { continue; } else { $comp->unparsed[] = $line; // echo $comp->objName.": $line<br />\n"; // test ### } } unset($config); // echo $this->objName.'<br />'.var_export( $this->unparsed, TRUE )."<br />\n"; // test ### /* concatenate property values spread over several lines */ $lastix = -1; $propnames = array('action', 'attach', 'attendee', 'categories', 'comment', 'completed', 'contact', 'class', 'created', 'description', 'dtend', 'dtstart', 'dtstamp', 'due', 'duration', 'exdate', 'exrule', 'freebusy', 'geo', 'last-modified', 'location', 'organizer', 'percent-complete', 'priority', 'rdate', 'recurrence-id', 'related-to', 'repeat', 'request-status', 'resources', 'rrule', 'sequence', 'status', 'summary', 'transp', 'trigger', 'tzid', 'tzname', 'tzoffsetfrom', 'tzoffsetto', 'tzurl', 'uid', 'url', 'x-'); $proprows = array(); foreach ($this->unparsed as $line) { $newProp = FALSE; foreach ($propnames as $propname) { if ($propname == strtolower(substr($line, 0, strlen($propname)))) { $newProp = TRUE; break; } } if ($newProp) { if (-1 < $lastix) { $proprows[$lastix] = $proprows[$lastix]; } $newProp = FALSE; $lastix++; $proprows[$lastix] = $line; } else { $proprows[$lastix] .= '!"#¤%&/()=?' . $line; } } /* parse each property 'line' */ foreach ($proprows as $line) { $line = str_replace('!"#¤%&/()=? ', '', $line); $line = str_replace('!"#¤%&/()=?', '', $line); if ('\\n' == substr($line, -2)) { $line = substr($line, 0, strlen($line) - 2); } /* get propname, (problem with x-properties, otherwise in previous loop) */ $cix = $propname = null; for ($cix = 0, $clen = strlen($line); $cix < $clen; $cix++) { if (in_array($line[$cix], array(':', ';'))) { break; } else { $propname .= $line[$cix]; } } if ('x-' == substr($propname, 0, 2) || 'X-' == substr($propname, 0, 2)) { $propname2 = $propname; $propname = 'X-'; } /* rest of the line is opt.params and value */ $line = substr($line, $cix); /* separate attributes from value */ $attr = array(); $attrix = -1; $clen = strlen($line); for ($cix = 0; $cix < $clen; $cix++) { if (':' == $line[$cix] && '://' != substr($line, $cix, 3) && !in_array(strtolower(substr($line, $cix - 3, 4)), array('fax:', 'cid:', 'sms:', 'tel:', 'urn:')) && !in_array(strtolower(substr($line, $cix - 4, 5)), array('crid:', 'news:', 'pres:')) && 'mailto:' != strtolower(substr($line, $cix - 6, 7))) { $attrEnd = TRUE; if ($cix < $clen - 4 && ctype_digit(substr($line, $cix + 1, 4))) { // an URI with a (4pos) portnr?? for ($c2ix = $cix; 3 < $c2ix; $c2ix--) { if ('://' == substr($line, $c2ix - 2, 3)) { $attrEnd = FALSE; break; // an URI with a portnr!! } } } if ($attrEnd) { $line = substr($line, $cix + 1); break; } } if (';' == $line[$cix]) { $attr[++$attrix] = null; } else { $attr[$attrix] .= $line[$cix]; } } /* make attributes in array format */ $propattr = array(); foreach ($attr as $attribute) { $attrsplit = explode('=', $attribute, 2); if (1 < count($attrsplit)) { $propattr[$attrsplit[0]] = $attrsplit[1]; } else { $propattr[] = $attribute; } } /* call setProperty( $propname.. . */ switch (strtoupper($propname)) { case 'ATTENDEE': foreach ($propattr as $pix => $attr) { $attr2 = explode(',', $attr); if (1 < count($attr2)) { $propattr[$pix] = $attr2; } } $this->setProperty($propname, $line, $propattr); break; case 'CATEGORIES': case 'RESOURCES': if (FALSE !== strpos($line, ',')) { $content = explode(',', $line); $clen = count($content); for ($cix = 0; $cix < $clen; $cix++) { if ("\\" == substr($content[$cix], -1)) { $content[$cix] .= ',' . $content[$cix + 1]; unset($content[$cix + 1]); $cix++; } } if (1 < count($content)) { $content = array_values($content); foreach ($content as $cix => $contentPart) { $content[$cix] = calendarComponent::_strunrep($contentPart); } $this->setProperty($propname, $content, $propattr); break; } else { $line = reset($content); } } case 'X-': $propname = isset($propname2) ? $propname2 : $propname; case 'COMMENT': case 'CONTACT': case 'DESCRIPTION': case 'LOCATION': case 'SUMMARY': if (empty($line)) { $propattr = null; } $this->setProperty($propname, calendarComponent::_strunrep($line), $propattr); unset($propname2); break; case 'REQUEST-STATUS': $values = explode(';', $line, 3); $values[1] = !isset($values[1]) ? null : calendarComponent::_strunrep($values[1]); $values[2] = !isset($values[2]) ? null : calendarComponent::_strunrep($values[2]); $this->setProperty($propname, $values[0], $values[1], $values[2], $propattr); break; case 'FREEBUSY': $fbtype = isset($propattr['FBTYPE']) ? $propattr['FBTYPE'] : ''; // force setting default, if missing unset($propattr['FBTYPE']); $values = explode(',', $line); foreach ($values as $vix => $value) { $value2 = explode('/', $value); if (1 < count($value2)) { $values[$vix] = $value2; } } $this->setProperty($propname, $fbtype, $values, $propattr); break; case 'GEO': $value = explode(';', $line, 2); if (2 > count($value)) { $value[1] = null; } $this->setProperty($propname, $value[0], $value[1], $propattr); break; case 'EXDATE': $values = !empty($line) ? explode(',', $line) : null; $this->setProperty($propname, $values, $propattr); break; case 'RDATE': if (empty($line)) { $this->setProperty($propname, $line, $propattr); break; } $values = explode(',', $line); foreach ($values as $vix => $value) { $value2 = explode('/', $value); if (1 < count($value2)) { $values[$vix] = $value2; } } $this->setProperty($propname, $values, $propattr); break; case 'EXRULE': case 'RRULE': $values = explode(';', $line); $recur = array(); foreach ($values as $value2) { if (empty($value2)) { continue; } // ;-char in ending position ??? $value3 = explode('=', $value2, 2); $rulelabel = strtoupper($value3[0]); switch ($rulelabel) { case 'BYDAY': $value4 = explode(',', $value3[1]); if (1 < count($value4)) { foreach ($value4 as $v5ix => $value5) { $value6 = array(); $dayno = $dayname = null; $value5 = trim((string) $value5); if (ctype_alpha(substr($value5, -1)) && ctype_alpha(substr($value5, -2, 1))) { $dayname = substr($value5, -2, 2); if (2 < strlen($value5)) { $dayno = substr($value5, 0, strlen($value5) - 2); } } if ($dayno) { $value6[] = $dayno; } if ($dayname) { $value6['DAY'] = $dayname; } $value4[$v5ix] = $value6; } } else { $value4 = array(); $dayno = $dayname = null; $value5 = trim((string) $value3[1]); if (ctype_alpha(substr($value5, -1)) && ctype_alpha(substr($value5, -2, 1))) { $dayname = substr($value5, -2, 2); if (2 < strlen($value5)) { $dayno = substr($value5, 0, strlen($value5) - 2); } } if ($dayno) { $value4[] = $dayno; } if ($dayname) { $value4['DAY'] = $dayname; } } $recur[$rulelabel] = $value4; break; default: $value4 = explode(',', $value3[1]); if (1 < count($value4)) { $value3[1] = $value4; } $recur[$rulelabel] = $value3[1]; break; } // end - switch $rulelabel } // end - foreach( $values.. . $this->setProperty($propname, $recur, $propattr); break; case 'ACTION': case 'CLASSIFICATION': case 'STATUS': case 'TRANSP': case 'UID': case 'TZID': case 'RELATED-TO': case 'TZNAME': $line = calendarComponent::_strunrep($line); default: $this->setProperty($propname, $line, $propattr); break; } // end switch( $propname.. . } // end - foreach( $proprows.. . unset($unparsedtext, $this->unparsed, $proprows); if (isset($this->components) && is_array($this->components) && 0 < count($this->components)) { $ckeys = array_keys($this->components); foreach ($ckeys as $ckey) { if (!empty($this->components[$ckey]) && !empty($this->components[$ckey]->unparsed)) { $this->components[$ckey]->parse(); } } } return TRUE; }
/** * parse component unparsed data into properties * * @author Kjell-Inge Gustafsson, kigkonsult <*****@*****.**> * @since 2.15.10 - 2012-10-28 * @param mixed $unparsedtext, optional, strict rfc2445 formatted, single property string or array of strings * @return bool FALSE if error occurs during parsing * */ function parse($unparsedtext = null) { $nl = $this->getConfig('nl'); if (!empty($unparsedtext)) { if (is_array($unparsedtext)) { $unparsedtext = implode('\\n' . $nl, $unparsedtext); } $unparsedtext = explode($nl, iCalUtilityFunctions::convEolChar($unparsedtext, $nl)); } elseif (!isset($this->unparsed)) { $unparsedtext = array(); } else { $unparsedtext = $this->unparsed; } /* skip leading (empty/invalid) lines */ foreach ($unparsedtext as $lix => $line) { $tst = trim($line); if ('\\n' == $tst || empty($tst)) { unset($unparsedtext[$lix]); } else { break; } } $this->unparsed = array(); $comp =& $this; $config = $this->getConfig(); $compsync = $subsync = 0; foreach ($unparsedtext as $lix => $line) { if ('END:VALARM' == strtoupper(substr($line, 0, 10))) { if (1 != $subsync) { return FALSE; } $this->components[] = $comp->copy(); $subsync--; } elseif ('END:DAYLIGHT' == strtoupper(substr($line, 0, 12))) { if (1 != $subsync) { return FALSE; } $this->components[] = $comp->copy(); $subsync--; } elseif ('END:STANDARD' == strtoupper(substr($line, 0, 12))) { if (1 != $subsync) { return FALSE; } array_unshift($this->components, $comp->copy()); $subsync--; } elseif ('END:' == strtoupper(substr($line, 0, 4))) { // end:<component> if (1 != $compsync) { return FALSE; } if (0 < $subsync) { $this->components[] = $comp->copy(); } $compsync--; break; /* skip trailing empty lines */ } elseif ('BEGIN:VALARM' == strtoupper(substr($line, 0, 12))) { $comp = new valarm($config); ++$subsync; } elseif ('BEGIN:STANDARD' == strtoupper(substr($line, 0, 14))) { $comp = new vtimezone('standard', $config); ++$subsync; } elseif ('BEGIN:DAYLIGHT' == strtoupper(substr($line, 0, 14))) { $comp = new vtimezone('daylight', $config); ++$subsync; } elseif ('BEGIN:' == strtoupper(substr($line, 0, 6))) { // begin:<component> ++$compsync; } else { $comp->unparsed[] = $line; } } if (0 < $subsync) { $this->components[] = $comp->copy(); } unset($config); /* concatenate property values spread over several lines */ $lastix = -1; $propnames = array('action', 'attach', 'attendee', 'categories', 'comment', 'completed', 'contact', 'class', 'created', 'description', 'dtend', 'dtstart', 'dtstamp', 'due', 'duration', 'exdate', 'exrule', 'freebusy', 'geo', 'last-modified', 'location', 'organizer', 'percent-complete', 'priority', 'rdate', 'recurrence-id', 'related-to', 'repeat', 'request-status', 'resources', 'rrule', 'sequence', 'status', 'summary', 'transp', 'trigger', 'tzid', 'tzname', 'tzoffsetfrom', 'tzoffsetto', 'tzurl', 'uid', 'url', 'x-'); $proprows = array(); for ($i = 0; $i < count($this->unparsed); $i++) { // concatenate lines $line = rtrim($this->unparsed[$i], $nl); while (isset($this->unparsed[$i + 1]) && !empty($this->unparsed[$i + 1]) && ' ' == $this->unparsed[$i + 1][0]) { $line .= rtrim(substr($this->unparsed[++$i], 1), $nl); } $proprows[] = $line; } /* parse each property 'line' */ $paramMStz = array('utc-', 'utc+', 'gmt-', 'gmt+'); $paramProto3 = array('fax:', 'cid:', 'sms:', 'tel:', 'urn:'); $paramProto4 = array('crid:', 'news:', 'pres:'); foreach ($proprows as $line) { if ('\\n' == substr($line, -2)) { $line = substr($line, 0, -2); } /* get propname */ $propname = null; $cix = 0; while (isset($line[$cix])) { if (in_array($line[$cix], array(':', ';'))) { break; } else { $propname .= $line[$cix]; } $cix++; } if ('x-' == substr($propname, 0, 2) || 'X-' == substr($propname, 0, 2)) { $propname2 = $propname; $propname = 'X-'; } if (!in_array(strtolower($propname), $propnames)) { // skip non standard property names continue; } /* rest of the line is opt.params and value */ $line = substr($line, $cix); /* separate attributes from value */ $attr = array(); $attrix = -1; $clen = strlen($line); $WithinQuotes = FALSE; $cix = 0; while (FALSE !== substr($line, $cix, 1)) { if (':' == $line[$cix] && substr($line, $cix, 3) != '://' && !in_array(strtolower(substr($line, $cix - 6, 4)), $paramMStz) && !in_array(strtolower(substr($line, $cix - 3, 4)), $paramProto3) && !in_array(strtolower(substr($line, $cix - 4, 5)), $paramProto4) && strtolower(substr($line, $cix - 6, 7)) != 'mailto:' && !$WithinQuotes) { $attrEnd = TRUE; if ($cix < $clen - 4 && ctype_digit(substr($line, $cix + 1, 4))) { // an URI with a (4pos) portnr?? for ($c2ix = $cix; 3 < $c2ix; $c2ix--) { if ('://' == substr($line, $c2ix - 2, 3)) { $attrEnd = FALSE; break; // an URI with a portnr!! } } } if ($attrEnd) { $line = substr($line, $cix + 1); break; } ++$cix; } if ('"' == $line[$cix]) { $WithinQuotes = FALSE === $WithinQuotes ? TRUE : FALSE; } if (';' == $line[$cix]) { $attr[++$attrix] = null; } else { $attr[$attrix] .= $line[$cix]; } ++$cix; } /* make attributes in array format */ $propattr = array(); foreach ($attr as $attribute) { $attrsplit = explode('=', $attribute, 2); if (1 < count($attrsplit)) { $propattr[$attrsplit[0]] = $attrsplit[1]; } else { $propattr[] = $attribute; } } /* call setProperty( $propname.. . */ switch (strtoupper($propname)) { case 'ATTENDEE': foreach ($propattr as $pix => $attr) { if (!in_array(strtoupper($pix), array('MEMBER', 'DELEGATED-TO', 'DELEGATED-FROM'))) { continue; } $attr2 = explode(',', $attr); if (1 < count($attr2)) { $propattr[$pix] = $attr2; } } $this->setProperty($propname, $line, $propattr); break; case 'X-': $propname = isset($propname2) ? $propname2 : $propname; unset($propname2); case 'CATEGORIES': case 'RESOURCES': if (FALSE !== strpos($line, ',')) { $content = array(0 => ''); $cix = $lix = 0; while (FALSE !== substr($line, $lix, 1)) { if (',' == $line[$lix] && "\\" != $line[$lix - 1]) { ++$cix; $content[$cix] = ''; } else { $content[$cix] .= $line[$lix]; } ++$lix; } if (1 < count($content)) { $content = array_values($content); foreach ($content as $cix => $contentPart) { $content[$cix] = calendarComponent::_strunrep($contentPart); } $this->setProperty($propname, $content, $propattr); break; } else { $line = reset($content); } } case 'COMMENT': case 'CONTACT': case 'DESCRIPTION': case 'LOCATION': case 'SUMMARY': if (empty($line)) { $propattr = null; } $this->setProperty($propname, calendarComponent::_strunrep($line), $propattr); break; case 'REQUEST-STATUS': $values = explode(';', $line, 3); $values[1] = !isset($values[1]) ? null : calendarComponent::_strunrep($values[1]); $values[2] = !isset($values[2]) ? null : calendarComponent::_strunrep($values[2]); $this->setProperty($propname, $values[0], $values[1], $values[2], $propattr); break; case 'FREEBUSY': $fbtype = isset($propattr['FBTYPE']) ? $propattr['FBTYPE'] : ''; // force setting default, if missing unset($propattr['FBTYPE']); $values = explode(',', $line); foreach ($values as $vix => $value) { $value2 = explode('/', $value); if (1 < count($value2)) { $values[$vix] = $value2; } } $this->setProperty($propname, $fbtype, $values, $propattr); break; case 'GEO': $value = explode(';', $line, 2); if (2 > count($value)) { $value[1] = null; } $this->setProperty($propname, $value[0], $value[1], $propattr); break; case 'EXDATE': $values = !empty($line) ? explode(',', $line) : null; $this->setProperty($propname, $values, $propattr); break; case 'RDATE': if (empty($line)) { $this->setProperty($propname, $line, $propattr); break; } $values = explode(',', $line); foreach ($values as $vix => $value) { $value2 = explode('/', $value); if (1 < count($value2)) { $values[$vix] = $value2; } } $this->setProperty($propname, $values, $propattr); break; case 'EXRULE': case 'RRULE': $values = explode(';', $line); $recur = array(); foreach ($values as $value2) { if (empty($value2)) { continue; } // ;-char in ending position ??? $value3 = explode('=', $value2, 2); $rulelabel = strtoupper($value3[0]); switch ($rulelabel) { case 'BYDAY': $value4 = explode(',', $value3[1]); if (1 < count($value4)) { foreach ($value4 as $v5ix => $value5) { $value6 = array(); $dayno = $dayname = null; $value5 = trim((string) $value5); if (ctype_alpha(substr($value5, -1)) && ctype_alpha(substr($value5, -2, 1))) { $dayname = substr($value5, -2, 2); if (2 < strlen($value5)) { $dayno = substr($value5, 0, strlen($value5) - 2); } } if ($dayno) { $value6[] = $dayno; } if ($dayname) { $value6['DAY'] = $dayname; } $value4[$v5ix] = $value6; } } else { $value4 = array(); $dayno = $dayname = null; $value5 = trim((string) $value3[1]); if (ctype_alpha(substr($value5, -1)) && ctype_alpha(substr($value5, -2, 1))) { $dayname = substr($value5, -2, 2); if (2 < strlen($value5)) { $dayno = substr($value5, 0, strlen($value5) - 2); } } if ($dayno) { $value4[] = $dayno; } if ($dayname) { $value4['DAY'] = $dayname; } } $recur[$rulelabel] = $value4; break; default: $value4 = explode(',', $value3[1]); if (1 < count($value4)) { $value3[1] = $value4; } $recur[$rulelabel] = $value3[1]; break; } // end - switch $rulelabel } // end - foreach( $values.. . $this->setProperty($propname, $recur, $propattr); break; case 'ACTION': case 'CLASSIFICATION': case 'STATUS': case 'TRANSP': case 'UID': case 'TZID': case 'RELATED-TO': case 'TZNAME': $line = calendarComponent::_strunrep($line); default: $this->setProperty($propname, $line, $propattr); break; } // end switch( $propname.. . } // end - foreach( $proprows.. . unset($unparsedtext, $this->unparsed, $proprows); if (isset($this->components) && is_array($this->components) && 0 < count($this->components)) { $ckeys = array_keys($this->components); foreach ($ckeys as $ckey) { if (!empty($this->components[$ckey]) && !empty($this->components[$ckey]->unparsed)) { $this->components[$ckey]->parse(); } } } return TRUE; }
/** * parse iCal text/file into iCal_Vcalendar, components, properties and parameters * * @author Kjell-Inge Gustafsson, kigkonsult <*****@*****.**> * @since 2.8.2 - 2011-05-21 * @param mixed $unparsedtext, optional, strict rfc2445 formatted, single property string or array of property strings * @return bool FALSE if error occurs during parsing * */ function parse($unparsedtext = FALSE) { $nl = $this->getConfig('nl'); if (FALSE === $unparsedtext || empty($unparsedtext)) { /* directory+filename is set previously via setConfig directory+filename or url */ if (FALSE === ($filename = $this->getConfig('url'))) { $filename = $this->getConfig('dirfile'); } /* READ FILE */ if (FALSE === ($rows = file_get_contents($filename))) { return FALSE; } /* err 1 */ } elseif (is_array($unparsedtext)) { $rows = implode('\\n' . $nl, $unparsedtext); } else { $rows =& $unparsedtext; } /* identify BEGIN:VCALENDAR, MUST be first row */ if ('BEGIN:VCALENDAR' != strtoupper(substr($rows, 0, 15))) { return FALSE; } /* err 8 */ /* fix line folding */ $eolchars = array("\r\n", "\n\r", "\n", "\r"); // check all line endings $EOLmark = FALSE; foreach ($eolchars as $eolchar) { if (!$EOLmark && FALSE !== strpos($rows, $eolchar)) { $rows = str_replace($eolchar . " ", '', $rows); $rows = str_replace($eolchar . "\t", '', $rows); if ($eolchar != $nl) { $rows = str_replace($eolchar, $nl, $rows); } $EOLmark = TRUE; } } $tmp = explode($nl, $rows); $rows = array(); foreach ($tmp as $tmpr) { if (!empty($tmpr)) { $rows[] = $tmpr; } } /* skip trailing empty lines */ $lix = count($rows) - 1; while (empty($rows[$lix]) && 0 < $lix) { $lix -= 1; } /* identify ending END:VCALENDAR row, MUST be last row */ if ('END:VCALENDAR' != strtoupper(substr($rows[$lix], 0, 13))) { return FALSE; } /* err 9 */ if (3 > count($rows)) { return FALSE; } /* err 10 */ $comp =& $this; $calsync = 0; /* identify components and update unparsed data within component */ $config = $this->getConfig(); foreach ($rows as $line) { if ('' == trim($line)) { continue; } if ('BEGIN:VCALENDAR' == strtoupper(substr($line, 0, 15))) { $calsync++; continue; } elseif ('END:VCALENDAR' == strtoupper(substr($line, 0, 13))) { $calsync--; break; } elseif (1 != $calsync) { return FALSE; } elseif (in_array(strtoupper(substr($line, 0, 6)), array('END:VE', 'END:VF', 'END:VJ', 'END:VT'))) { $this->components[] = $comp->copy(); continue; } if ('BEGIN:VEVENT' == strtoupper(substr($line, 0, 12))) { $comp = new vevent($config); } elseif ('BEGIN:VFREEBUSY' == strtoupper(substr($line, 0, 15))) { $comp = new vfreebusy($config); } elseif ('BEGIN:VJOURNAL' == strtoupper(substr($line, 0, 14))) { $comp = new vjournal($config); } elseif ('BEGIN:VTODO' == strtoupper(substr($line, 0, 11))) { $comp = new vtodo($config); } elseif ('BEGIN:VTIMEZONE' == strtoupper(substr($line, 0, 15))) { $comp = new vtimezone($config); } else { /* update component with unparsed data */ $comp->unparsed[] = $line; } } // end - foreach( rows.. . unset($config); /* parse data for calendar (this) object */ if (isset($this->unparsed) && is_array($this->unparsed) && 0 < count($this->unparsed)) { /* concatenate property values spread over several lines */ $lastix = -1; $propnames = array('calscale', 'method', 'prodid', 'version', 'x-'); $proprows = array(); foreach ($this->unparsed as $line) { if ('' == trim($line)) { continue; } $newProp = FALSE; foreach ($propnames as $propname) { if ($propname == strtolower(substr($line, 0, strlen($propname)))) { $newProp = TRUE; break; } } if ($newProp) { $newProp = FALSE; $lastix++; $proprows[$lastix] = $line; } else { $proprows[$lastix] .= '!"#¤%&/()=?' . $line; } } foreach ($proprows as $line) { $line = str_replace('!"#¤%&/()=? ', '', $line); $line = str_replace('!"#¤%&/()=?', '', $line); if ('\\n' == substr($line, -2)) { $line = substr($line, 0, strlen($line) - 2); } /* get property name */ $cix = $propname = null; for ($cix = 0, $clen = strlen($line); $cix < $clen; $cix++) { if (in_array($line[$cix], array(':', ';'))) { break; } else { $propname .= $line[$cix]; } } /* ignore version/prodid properties */ if (in_array(strtoupper($propname), array('VERSION', 'PRODID'))) { continue; } $line = substr($line, $cix); /* separate attributes from value */ $attr = array(); $attrix = -1; $strlen = strlen($line); for ($cix = 0; $cix < $strlen; $cix++) { if (':' == $line[$cix] && '://' != substr($line, $cix, 3) && !in_array(strtolower(substr($line, $cix - 3, 4)), array('fax:', 'cid:', 'sms:', 'tel:', 'urn:')) && !in_array(strtolower(substr($line, $cix - 4, 5)), array('crid:', 'news:', 'pres:')) && 'mailto:' != strtolower(substr($line, $cix - 6, 7))) { $attrEnd = TRUE; if ($cix < $strlen - 4 && ctype_digit(substr($line, $cix + 1, 4))) { // an URI with a (4pos) portnr?? for ($c2ix = $cix; 3 < $c2ix; $c2ix--) { if ('://' == substr($line, $c2ix - 2, 3)) { $attrEnd = FALSE; break; // an URI with a portnr!! } } } if ($attrEnd) { $line = substr($line, $cix + 1); break; } } if (';' == $line[$cix]) { $attr[++$attrix] = null; } else { $attr[$attrix] .= $line[$cix]; } } /* make attributes in array format */ $propattr = array(); foreach ($attr as $attribute) { $attrsplit = explode('=', $attribute, 2); if (1 < count($attrsplit)) { $propattr[$attrsplit[0]] = $attrsplit[1]; } else { $propattr[] = $attribute; } } /* update Property */ if (FALSE !== strpos($line, ',')) { $content = explode(',', $line); $clen = count($content); for ($cix = 0; $cix < $clen; $cix++) { if ("\\" == substr($content[$cix], -1)) { $content[$cix] .= ',' . $content[$cix + 1]; unset($content[$cix + 1]); $cix++; } } if (1 < count($content)) { foreach ($content as $cix => $contentPart) { $content[$cix] = calendarComponent::_strunrep($contentPart); } $this->setProperty($propname, $content, $propattr); continue; } else { $line = reset($content); } $line = calendarComponent::_strunrep($line); } $this->setProperty($propname, trim($line), $propattr); } // end - foreach( $this->unparsed.. . } // end - if( is_array( $this->unparsed.. . unset($unparsedtext, $rows, $this->unparsed, $proprows); /* parse Components */ if (is_array($this->components) && 0 < count($this->components)) { $ckeys = array_keys($this->components); foreach ($ckeys as $ckey) { if (!empty($this->components[$ckey]) && !empty($this->components[$ckey]->unparsed)) { $this->components[$ckey]->parse(); } } } else { return FALSE; } /* err 91 or something.. . */ return TRUE; }