function archive_calendar in Drupal 4

Generates a monthly calendar, for display in the archive block.

1 call to archive_calendar()

archive_block in modules/archive.module

Implementation of hook_block().

File

modules/archive.module, line 66

Displays a calendar to navigate old content.

Code

function archive_calendar() {
  global $user;

  // Extract today's date:
  $start_of_today = mktime(0, 0, 0, date('n', time()), date('d', time()), date('Y', time())) + $user->timezone;
  $end_of_today = mktime(23, 59, 59, date('n', time()), date('d', time()), date('Y', time())) + $user->timezone;

  // Extract the requested date:
  if (arg(0) == 'archive' && arg(3)) {
    $year = arg(1);
    $month = arg(2);
    $day = arg(3);
    $requested = mktime(0, 0, 0, $month, $day, $year) + $user->timezone;
  }
  else {
    $year = date('Y', time());
    $month = date('n', time());
    $day = date('d', time());
    $requested = $end_of_today + $user->timezone;
  }
  $start_of_month = mktime(0, 0, 0, $month, 1, $year);

  // Extract first day of the month:
  $first = date('w', $start_of_month);

  // Extract last day of the month:
  $last = date('t', $start_of_month);
  $end_of_month = mktime(23, 59, 59, $month, $last, $year);
  $cache = cache_get("archive:calendar:{$day}-{$month}-{$year}");
  if (!empty($cache)) {
    return $cache->data;
  }

  // Calculate previous and next months dates and check for shorter months (28/30 days)
  $prevmonth = mktime(23, 59, 59, $month - 1, 1, $year);
  $prev = mktime(23, 59, 59, $month - 1, min(date('t', $prevmonth), $day), $year);
  $nextmonth = mktime(23, 59, 59, $month + 1, 1, $year);
  $next = mktime(23, 59, 59, $month + 1, min(date('t', $nextmonth), $day), $year);
  $sql = 'SELECT n.nid, n.created FROM {node} n WHERE n.status = 1 AND n.created > %d AND n.created < %d ORDER BY n.created';
  $sql = db_rewrite_sql($sql);
  $result = db_query($sql, $start_of_month, $end_of_month);
  $days_with_posts = array();
  while ($day_with_post = db_fetch_object($result)) {
    $daynum = date('j', $day_with_post->created + $user->timezone);
    if (isset($days_with_posts[$daynum])) {
      $days_with_posts[$daynum]++;
    }
    else {
      $days_with_posts[$daynum] = 1;
    }
  }

  // Generate calendar header:
  $output .= "\n<!-- calendar -->\n";
  $output .= '<div class="calendar">';
  $output .= '<table summary="' . t('A calendar to browse the archives') . ".\">\n";
  $output .= ' <caption>' . l('«', 'archive/' . date('Y/m/d', $prev), array(
    'title' => t('Previous month'),
  )) . ' ' . format_date($requested, 'custom', 'F') . date(' Y', $requested) . ' ' . ($nextmonth <= time() ? l('»', 'archive/' . date('Y/m/d', $next), array(
    'title' => t('Next month'),
  )) : ' ') . "</caption>\n";

  // First day of week (0 => Sunday, 1 => Monday, ...)
  $weekstart = variable_get('date_first_day', 0);

  // Last day of week
  $weekstart - 1 == -1 ? $lastday = 6 : ($lastday = $weekstart - 1);

  // Generate the days of the week:
  $firstcolumn = mktime(0, 0, 0, 3, 20 + $weekstart, 1994);
  $output .= " <tr class=\"header-week\">\n";
  $days = array(
    t('Sunday') => t('Su'),
    t('Monday') => t('Mo'),
    t('Tuesday') => t('Tu'),
    t('Wednesday') => t('We'),
    t('Thursday') => t('Th'),
    t('Friday') => t('Fr'),
    t('Saturday') => t('Sa'),
  );
  if ($weekstart) {
    $days = array_merge(array_slice($days, $weekstart), array_slice($days, 0, $weekstart));
  }
  foreach ($days as $fullname => $name) {
    $output .= ' <th abbr="' . $fullname . '">' . $name . "</th>\n";
  }
  $output .= "</tr>\n";

  // Initialize temporary variables:
  $nday = 1;
  $sday = $first;

  // Loop through all the days of the month:
  while ($nday <= $last) {

    // Set up blank days for first week of the month (allowing individual blank day styling):
    if ($first != $weekstart) {
      $blankdays = ($first - $weekstart + 7) % 7;
      $output .= " <tr class=\"row-week\">" . str_repeat("<td class=\"day-blank\">&nbsp;</td>\n", $blankdays);
      $first = $weekstart;
    }

    // Start every week on a new line:
    if ($sday == $weekstart) {
      $output .= " <tr class=\"row-week\">\n";
    }

    // Print one cell:
    $date = mktime(0, 0, 0, $month, $nday, $year) + $user->timezone;
    if (isset($days_with_posts[$nday])) {
      $daytext = l($nday, "archive/{$year}/{$month}/{$nday}", array(
        "title" => format_plural($days_with_posts[$nday], "1 post", "%count posts"),
      ));
      $dayclass = 'day-link';
    }
    else {
      $daytext = $nday;
      $dayclass = 'day-normal';
    }
    if ($date == $requested) {
      $output .= "  <td class=\"day-selected\">{$daytext}</td>\n";
    }
    else {
      if ($date == $start_of_today) {
        $output .= "  <td class=\"day-today\">{$daytext}</td>\n";
      }
      else {
        if ($date > $end_of_today) {
          $output .= "  <td class=\"day-future\">{$daytext}</td>\n";
        }
        else {
          $output .= "  <td class=\"{$dayclass}\">{$daytext}</td>\n";
        }
      }
    }

    // Start every week on a new line:
    if ($sday == $lastday) {
      $output .= " </tr>\n";
    }

    // Update temporary variables:
    $sday++;
    $sday = $sday % 7;
    $nday++;
  }

  // Complete the calendar (allowing individual blank day styling):
  if ($sday != $weekstart) {
    $end = (7 - $sday + $weekstart) % 7;
    $output .= str_repeat("<td class=\"day-blank\">&nbsp;</td>\n", $end) . "</tr>\n";
  }
  $output .= "</table></div>\n\n";
  cache_set("archive:calendar:{$day}-{$month}-{$year}", $output, CACHE_TEMPORARY);
  return $output;
}