public static function _durationStr2arr($duration) { $duration = (string) trim($duration); while ('P' != strtoupper(substr($duration, 0, 1))) { if (0 < strlen($duration)) { $duration = substr($duration, 1); } else { return false; } // no leading P !?!? } $duration = substr($duration, 1); // skip P $duration = str_replace('t', 'T', $duration); $duration = str_replace('T', '', $duration); $output = array(); $val = null; for ($ix = 0; $ix < strlen($duration); $ix++) { switch (strtoupper(substr($duration, $ix, 1))) { case 'W': $output['week'] = $val; $val = null; break; case 'D': $output['day'] = $val; $val = null; break; case 'H': $output['hour'] = $val; $val = null; break; case 'M': $output['min'] = $val; $val = null; break; case 'S': $output['sec'] = $val; $val = null; break; default: if (!ctype_digit(substr($duration, $ix, 1))) { return false; } else { $val .= substr($duration, $ix, 1); } } } return ICalUtilityFunctions::_duration2arr($output); }
/** * set calendar component property rdate * * @author Kjell-Inge Gustafsson, kigkonsult <*****@*****.**> * @since 2.14.1 - 2012-10-04 * @param array $rdates * @param array $params, optional * @param integer $index, optional * @return bool */ function setRdate($rdates, $params = FALSE, $index = FALSE) { if (empty($rdates)) { if ($this->getConfig('allowEmpty')) { ICalUtilityFunctions::_setMval($this->rdate, null, $params, FALSE, $index); return TRUE; } else { return FALSE; } } $input = array('params' => ICalUtilityFunctions::_setParams($params, array('VALUE' => 'DATE-TIME'))); if (in_array($this->objName, array('VTimeZone', 'standard', 'daylight'))) { unset($input['params']['TZID']); $input['params']['VALUE'] = 'DATE-TIME'; } $zArr = array('GMT', 'UTC', 'Z'); $toZ = isset($params['TZID']) && in_array(strtoupper($params['TZID']), $zArr) ? TRUE : FALSE; /* check if PERIOD, if not set */ if ((!isset($input['params']['VALUE']) || !in_array($input['params']['VALUE'], array('DATE', 'PERIOD'))) && isset($rdates[0]) && is_array($rdates[0]) && 2 == count($rdates[0]) && isset($rdates[0][0]) && isset($rdates[0][1]) && !isset($rdates[0]['timestamp']) && (is_array($rdates[0][0]) && (isset($rdates[0][0]['timestamp']) || ICalUtilityFunctions::_isArrayDate($rdates[0][0])) || is_string($rdates[0][0]) && 8 <= strlen(trim($rdates[0][0]))) && (is_array($rdates[0][1]) || is_string($rdates[0][1]) && 3 <= strlen(trim($rdates[0][1])))) { $input['params']['VALUE'] = 'PERIOD'; } /* check 1:st date, upd. $parno (opt) and save ev. timezone * */ $date = reset($rdates); if (isset($input['params']['VALUE']) && 'PERIOD' == $input['params']['VALUE']) { // PERIOD $date = reset($date); } ICalUtilityFunctions::_chkdatecfg($date, $parno, $input['params']); ICalUtilityFunctions::_existRem($input['params'], 'VALUE', 'DATE-TIME'); // remove default foreach ($rdates as $rpix => $theRdate) { $inputa = null; ICalUtilityFunctions::_strDate2arr($theRdate); if (is_array($theRdate)) { if (isset($input['params']['VALUE']) && 'PERIOD' == $input['params']['VALUE']) { // PERIOD foreach ($theRdate as $rix => $rPeriod) { ICalUtilityFunctions::_strDate2arr($theRdate); if (is_array($rPeriod)) { if (ICalUtilityFunctions::_isArrayTimestampDate($rPeriod)) { // timestamp if (isset($rPeriod['tz']) && !ICalUtilityFunctions::_isOffset($rPeriod['tz'])) { if (isset($input['params']['TZID'])) { $rPeriod['tz'] = $input['params']['TZID']; } else { $input['params']['TZID'] = $rPeriod['tz']; } } $inputab = ICalUtilityFunctions::_timestamp2date($rPeriod, $parno); } elseif (ICalUtilityFunctions::_isArrayDate($rPeriod)) { $d = 3 < count($rPeriod) ? ICalUtilityFunctions::_chkDateArr($rPeriod, $parno) : ICalUtilityFunctions::_chkDateArr($rPeriod, 6); if (isset($d['tz']) && 'Z' != $d['tz'] && ICalUtilityFunctions::_isOffset($d['tz'])) { $strdate = sprintf('%04d-%02d-%02d %02d:%02d:%02d %s', $d['year'], $d['month'], $d['day'], $d['hour'], $d['min'], $d['sec'], $d['tz']); $inputab = ICalUtilityFunctions::_strdate2date($strdate, 7); unset($inputab['unparsedtext']); } else { $inputab = $d; } } elseif (1 == count($rPeriod) && 8 <= strlen(reset($rPeriod))) { // text-date $inputab = ICalUtilityFunctions::_strdate2date(reset($rPeriod), $parno); unset($inputab['unparsedtext']); } else { // array format duration $inputab = ICalUtilityFunctions::_duration2arr($rPeriod); } } elseif (3 <= strlen(trim($rPeriod)) && in_array($rPeriod[0], array('P', '+', '-'))) { if ('P' != $rPeriod[0]) { $rPeriod = substr($rPeriod, 1); } $inputab = ICalUtilityFunctions::_durationStr2arr($rPeriod); } elseif (8 <= strlen(trim($rPeriod))) { // text date ex. 2006-08-03 10:12:18 $inputab = ICalUtilityFunctions::_strdate2date($rPeriod, $parno); unset($inputab['unparsedtext']); } if (0 == $rpix && 0 == $rix) { if (isset($inputab['tz']) && in_array(strtoupper($inputab['tz']), $zArr)) { $inputab['tz'] = 'Z'; $toZ = TRUE; } } else { if (isset($inputa[0]['tz']) && 'Z' == $inputa[0]['tz'] && isset($inputab['year'])) { $inputab['tz'] = 'Z'; } else { unset($inputab['tz']); } } if ($toZ && isset($inputab['year'])) { $inputab['tz'] = 'Z'; } $inputa[] = $inputab; } } elseif (ICalUtilityFunctions::_isArrayTimestampDate($theRdate)) { // timestamp if (isset($theRdate['tz']) && !ICalUtilityFunctions::_isOffset($theRdate['tz'])) { if (isset($input['params']['TZID'])) { $theRdate['tz'] = $input['params']['TZID']; } else { $input['params']['TZID'] = $theRdate['tz']; } } $inputa = ICalUtilityFunctions::_timestamp2date($theRdate, $parno); } else { // date[-time] $inputa = ICalUtilityFunctions::_chkDateArr($theRdate, $parno); if (isset($inputa['tz']) && 'Z' != $inputa['tz'] && ICalUtilityFunctions::_isOffset($inputa['tz'])) { $strdate = sprintf('%04d-%02d-%02d %02d:%02d:%02d %s', $inputa['year'], $inputa['month'], $inputa['day'], $inputa['hour'], $inputa['min'], $inputa['sec'], $inputa['tz']); $inputa = ICalUtilityFunctions::_strdate2date($strdate, 7); unset($inputa['unparsedtext']); } } } elseif (8 <= strlen(trim($theRdate))) { // text date ex. 2006-08-03 10:12:18 $inputa = ICalUtilityFunctions::_strdate2date($theRdate, $parno); unset($inputa['unparsedtext']); if ($toZ) { $inputa['tz'] = 'Z'; } } if (!isset($input['params']['VALUE']) || 'PERIOD' != $input['params']['VALUE']) { // no PERIOD if (0 == $rpix && !$toZ) { $toZ = isset($inputa['tz']) && in_array(strtoupper($inputa['tz']), $zArr) ? TRUE : FALSE; } if ($toZ) { $inputa['tz'] = 'Z'; } if (3 == $parno) { unset($inputa['hour'], $inputa['min'], $inputa['sec'], $inputa['tz']); } elseif (isset($inputa['tz'])) { $inputa['tz'] = (string) $inputa['tz']; } if (isset($input['params']['TZID']) || isset($input['value'][0]) && !isset($input['value'][0]['tz'])) { if (!$toZ) { unset($inputa['tz']); } } } $input['value'][] = $inputa; } if (3 == $parno) { $input['params']['VALUE'] = 'DATE'; unset($input['params']['TZID']); } if ($toZ) { unset($input['params']['TZID']); } ICalUtilityFunctions::_setMval($this->rdate, $input['value'], $input['params'], FALSE, $index); return TRUE; }