functions/date.php

   1 <?php
   2    /**
   3     **  date.php
   4     **
   5     **  Takes a date and parses it into a usable format.  The form that a
   6     **  date SHOULD arrive in is:
   7     **        <Tue,> 29 Jun 1999 09:52:11 -0500 (EDT)
   8     **  (as specified in RFC 822) -- "Tue" is optional
   9     **
  10     **  $Id$
  11     **/
  12
  13    $date_php = true;
  14
  15    // corrects a time stamp to be the local time
  16    function getGMTSeconds($stamp, $gmt) {
  17       global $invert_time;
  18       if (($gmt == "Pacific") || ($gmt == "PST"))
  19          $gmt = "-0800";
  20       else if (($gmt == "EDT"))
  21          $gmt = "-0400";
  22       else if (($gmt == "Eastern") || ($gmt == "EST") || ($gmt == "CDT"))
  23          $gmt = "-0500";
  24       else if (($gmt == "Central") || ($gmt == "CST") || ($gmt == "MDT"))
  25          $gmt = "-0600";
  26       else if (($gmt == "Mountain") || ($gmt == "MST") || ($gmt == "PDT"))
  27          $gmt = "-0700";
  28       else if ($gmt == "BST")
  29          $gmt = "+0100";
  30       else if ($gmt == "EET")
  31          $gmt = "+0200";
  32       else if ($gmt == "GMT")
  33          $gmt = "+0000";
  34       else if ($gmt == "HKT")
  35          $gmt = "+0800";
  36       else if ($gmt == "IST")
  37          $gmt = "+0200";
  38       else if ($gmt == "JST")
  39          $gmt = "+0900";
  40       else if ($gmt == "MET")
  41          $gmt = "+0100";
  42       else if ($gmt == "MET DST" || $gmt == "METDST")
  43          $gmt = "+0200";
  44
  45       if (substr($gmt, 0, 1) == "-") {
  46          $neg = true;
  47          $gmt = substr($gmt, 1, strlen($gmt));
  48       } else if (substr($gmt, 0, 1) == "+") {
  49          $neg = false;
  50          $gmt = substr($gmt, 1, strlen($gmt));
  51       } else
  52          $neg = false;
  53
  54       $gmt = substr($gmt, 0, 2);
  55       $gmt = $gmt * 3600;
  56       if ($neg == true)
  57          $gmt = "-$gmt";
  58       else
  59          $gmt = "+$gmt";
  60
  61       /** now find what the server is at **/
  62       $current = date("Z", time());
  63       if ($invert_time)
  64           $current = - $current;
  65       $stamp = (int)$stamp - (int)$gmt + (int)$current;
  66
  67       return $stamp;
  68    }
  69
  70    function getLongDateString($stamp) {
  71       return date("D, F j, Y g:i a", $stamp);
  72    }
  73
  74    function getDateString($stamp) {
  75       global $invert_time;
  76       $now = time();
  77       $dateZ = date("Z", $now);
  78       if ($invert_time)
  79           $dateZ = - $dateZ;
  80       $midnight = $now - ($now % 86400) - $dateZ;
  81
  82       if ($midnight < $stamp) {
  83          // Today
  84          return date("g:i a", $stamp);
  85       } else if ($midnight - (60 * 60 * 24 * 6) < $stamp) {
  86          // This week
  87          return date("D, g:i a", $stamp);
  88       } else {
  89          // before this week
  90          return date("M j, Y", $stamp);
  91       }
  92    }
  93
  94    function getTimeStamp($dateParts) {
  95       /** $dateParts[0] == <day of week>   Mon, Tue, Wed
  96        ** $dateParts[1] == <day of month>  23
  97        ** $dateParts[2] == <month>         Jan, Feb, Mar
  98        ** $dateParts[3] == <year>          1999
  99        ** $dateParts[4] == <time>          18:54:23 (HH:MM:SS)
 100        ** $dateParts[5] == <from GMT>      +0100
 101        ** $dateParts[6] == <zone>          (EDT)
 102        **
 103        ** NOTE:  In RFC 822, it states that <day of week> is optional.
 104        **        In that case, dateParts[0] would be the <day of month>
 105        **        and everything would be bumped up one.
 106        **/
 107
 108       // Simply check to see if the first element in the dateParts
 109       // array is an integer or not.
 110       //    Since the day of week is optional, this check is needed.
 111       //
 112       //    The old code used eregi("mon|tue|wed|thu|fri|sat|sun",
 113       //    $dateParts[0], $tmp) to find if the first element was the
 114       //    day of week or day of month. This is an expensive call
 115       //    (processing time) to have inside a loop. Doing it this way
 116       //    saves quite a bit of time for large mailboxes.
 117       //
 118       //    It is also quicker to call explode only once rather than
 119       //    the 3 times it was getting called by calling the functions
 120       //    getHour, getMinute, and getSecond.
 121       //
 122       if (intval(trim($dateParts[0])) > 0) {
 123          $string = $dateParts[0] . " " . $dateParts[1] . " " . $dateParts[2] . " " . $dateParts[3];
 124          return getGMTSeconds(strtotime($string), $dateParts[4]);
 125       }
 126       $string = $dateParts[0] . " " . $dateParts[1] . " " . $dateParts[2] . " " . $dateParts[3] . " " . $dateParts[4];
 127           if (isset($dateParts[5]))
 128         return getGMTSeconds(strtotime($string), $dateParts[5]);
 129           else
 130                 return getGMTSeconds(strtotime($string), "");
 131    }
 132
 133    // I use this function for profiling. Should never be called in
 134    // actual versions of squirrelmail released to public.
 135    function getmicrotime() {
 136       $mtime = microtime();
 137       $mtime = explode(" ",$mtime);
 138       $mtime = $mtime[1] + $mtime[0];
 139       return ($mtime);
 140    }
 141 ?>