Club Drupal

              $parent[array_pop($parents)][] = array_pop($subgroups);

            }

            break;

          // Add the timezones in with their index their TZID.

          case 'VTIMEZONE':

            $subgroup = end($subgroups);

            array_pop($subgroups);

            array_pop($parents);

            break;

          // Do some fun stuff with durations and all_day events and then append

          // to parent.

          case 'VEVENT':

            // assumes the end date is inclusive.

            if (!empty($subgroup['DTEND']) && (!empty($subgroup['DTEND']['all_day']))) {

              // Make the end date one day earlier.

              date_modify($date, '-1 day');

            }

            // If a start datetime is defined AND there is no definition for

            // the end datetime THEN make the end datetime equal the start

            if (!empty($subgroup['DTSTART']['all_day'])) {

              $subgroup['all_day'] = TRUE;

            }

            prev($subgroups);

            $parent = &$subgroups[key($subgroups)];

      $field = !empty($matches[2]) ? $matches[2] : '';

      $data = !empty($matches[3]) ? $matches[3] : '';

      $parse_result = '';

      switch ($name) {

        // Keep blank lines out of the results.

        case '':

          break;

        case 'CREATED':

        case 'LAST-MODIFIED':

        case 'DTSTART':

          $parse_result = date_ical_parse_location($field, $data);

          break;

        default:

          $parse_result = $data;

          break;

 *                      has no timezone; the ical specs say no timezone

 *                      conversion should be done if no timezone info is

 *                      supplied

 *   Another option for dates is the format PROPERTY;VALUE=PERIOD:XXXX. The

 *   period may include a duration, or a date and a duration, or two dates, so

 *   would have to be split into parts and run through date_ical_parse_date()

        // Date.

        $datetime = date_pad($regs[1]) . '-' . date_pad($regs[2]) . '-' . date_pad($regs[3]);

        break;

      case 'DATE-TIME':

        preg_match(DATE_REGEX_ICAL_DATETIME, $data, $regs);

        // Date.

  $data  = $items['DATA'];

  preg_match('/^P(\d{1,4}[Y])?(\d{1,2}[M])?(\d{1,2}[W])?(\d{1,2}[D])?([T]{0,1})?(\d{1,2}[H])?(\d{1,2}[M])?(\d{1,2}[S])?/', $data, $duration);

  $items['year'] = isset($duration[1]) ? str_replace('Y', '', $duration[1]) : '';

  $start_date = array_key_exists('DTSTART', $subgroup) ? $subgroup['DTSTART']['datetime'] : date_format(date_now(), DATE_FORMAT_ISO);

  $timezone = array_key_exists('DTSTART', $subgroup) ? $subgroup['DTSTART']['tz'] : variable_get('date_default_timezone');

  if (empty($timezone)) {

    'datetime' => date_format($date2, DATE_FORMAT_DATETIME),

    'all_day' => isset($subgroup['DTSTART']['all_day']) ? $subgroup['DTSTART']['all_day'] : 0,

    'tz' => $timezone,

  $duration = date_format($date2, 'U') - date_format($date, 'U');

  $subgroup['DURATION'] = array('DATA' => $data, 'DURATION' => $duration);

}

 *

 * @return string

 *   Escaped text

 */

function date_ical_escape_text($text) {

  $text = drupal_html_to_text($text);

 *     )

 */

function date_api_ical_build_rrule($form_values) {

  if (empty($form_values) || !is_array($form_values)) {

  }

  // Grab the RRULE data and put them into iCal RRULE format.

  // Unset the empty 'All' values.

  if (array_key_exists('BYDAY', $form_values) && is_array($form_values['BYDAY'])) {

    unset($form_values['BYMONTHDAY']['']);

  }

  }

  }

  }

  // The UNTIL date is supposed to always be expressed in UTC.

  // The input date values may already have been converted to a date object on a

    if (!is_object($form_values['UNTIL']['datetime'])) {

      // If this is a date without time, give it time.

      if (strlen($form_values['UNTIL']['datetime']) < 11) {

        $form_values['UNTIL']['datetime'] .= ' 23:59:59';

        $form_values['UNTIL']['all_day'] = FALSE;

      }

      $until = date_ical_date($form_values['UNTIL'], 'UTC');

    else {

      $until = $form_values['UNTIL']['datetime'];

    }

  }

  // Our form doesn't allow a value for COUNT, but it may be needed by

  // modules using the API, so add it to the rule.

  if (array_key_exists('COUNT', $form_values)) {

  }

  // iCal rules presume the week starts on Monday unless otherwise specified,

  // so we'll specify it.

  if (array_key_exists('WKST', $form_values)) {

  }

  else {

  }

  // Exceptions dates go last, on their own line.

    foreach ($form_values['EXDATE'] as $value) {

      if (!empty($value['datetime'])) {

        $date = !is_object($value['datetime']) ? date_ical_date($value, 'UTC') : $value['datetime'];

        if (!empty($ex_date)) {

          $ex_dates[] = $ex_date;

        }

    }

    if (!empty($ex_dates)) {

      sort($ex_dates);

    }

  }

  elseif (!empty($form_values['EXDATE'])) {

  }

  // Exceptions dates go last, on their own line.

    $ex_dates = array();

    foreach ($form_values['RDATE'] as $value) {

      $date = !is_object($value['datetime']) ? date_ical_date($value, 'UTC') : $value['datetime'];

      if (!empty($ex_date)) {

        $ex_dates[] = $ex_date;

      }

    }

    if (!empty($ex_dates)) {

      sort($ex_dates);

    }

  }

  elseif (!empty($form_values['RDATE'])) {

  }

}