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
14 // corrects a time stamp to be the local time
15 function getGMTSeconds($stamp, $gmt) {
16 if (($gmt == "Pacific") ||
($gmt == "PST"))
18 else if (($gmt == "EDT"))
20 else if (($gmt == "Eastern") ||
($gmt == "EST") ||
($gmt == "CDT"))
22 else if (($gmt == "Central") ||
($gmt == "CST") ||
($gmt == "MDT"))
24 else if (($gmt == "Mountain") ||
($gmt == "MST") ||
($gmt == "PDT"))
26 else if ($gmt == "BST")
28 else if ($gmt == "EET")
30 else if ($gmt == "GMT")
32 else if ($gmt == "HKT")
34 else if ($gmt == "IST")
36 else if ($gmt == "JST")
38 else if ($gmt == "MET")
40 else if ($gmt == "MET DST" ||
$gmt == "METDST")
43 if (substr($gmt, 0, 1) == "-") {
45 $gmt = substr($gmt, 1, strlen($gmt));
46 } else if (substr($gmt, 0, 1) == "+") {
48 $gmt = substr($gmt, 1, strlen($gmt));
52 $gmt = substr($gmt, 0, 2);
59 /** now find what the server is at **/
60 $current = date("Z", time());
62 $current = - $current;
63 $stamp = (int)$stamp - (int)$gmt +
(int)$current;
68 function getLongDateString($stamp) {
69 return date("D, F j, Y g:i a", $stamp);
72 function getDateString($stamp) {
74 $dateZ = date("Z", $now);
77 $midnight = $now - ($now %
86400) - $dateZ;
79 if ($midnight < $stamp) {
81 return date("g:i a", $stamp);
82 } else if ($midnight - (60 * 60 * 24 * 6) < $stamp) {
84 return date("D, g:i a", $stamp);
87 return date("M j, Y", $stamp);
91 function getTimeStamp($dateParts) {
92 /** $dateParts[0] == <day of week> Mon, Tue, Wed
93 ** $dateParts[1] == <day of month> 23
94 ** $dateParts[2] == <month> Jan, Feb, Mar
95 ** $dateParts[3] == <year> 1999
96 ** $dateParts[4] == <time> 18:54:23 (HH:MM:SS)
97 ** $dateParts[5] == <from GMT> +0100
98 ** $dateParts[6] == <zone> (EDT)
100 ** NOTE: In RFC 822, it states that <day of week> is optional.
101 ** In that case, dateParts[0] would be the <day of month>
102 ** and everything would be bumped up one.
105 // Simply check to see if the first element in the dateParts
106 // array is an integer or not.
107 // Since the day of week is optional, this check is needed.
109 // The old code used eregi("mon|tue|wed|thu|fri|sat|sun",
110 // $dateParts[0], $tmp) to find if the first element was the
111 // day of week or day of month. This is an expensive call
112 // (processing time) to have inside a loop. Doing it this way
113 // saves quite a bit of time for large mailboxes.
115 // It is also quicker to call explode only once rather than
116 // the 3 times it was getting called by calling the functions
117 // getHour, getMinute, and getSecond.
119 if (intval(trim($dateParts[0])) > 0) {
120 $string = $dateParts[0] . " " . $dateParts[1] . " " . $dateParts[2] . " " . $dateParts[3];
121 return getGMTSeconds(strtotime($string), $dateParts[4]);
123 $string = $dateParts[0] . " " . $dateParts[1] . " " . $dateParts[2] . " " . $dateParts[3] . " " . $dateParts[4];
124 return getGMTSeconds(strtotime($string), $dateParts[5]);
127 // I use this function for profiling. Should never be called in
128 // actual versions of squirrelmail released to public.
129 function getmicrotime() {
130 $mtime = microtime();
131 $mtime = explode(" ",$mtime);
132 $mtime = $mtime[1] +
$mtime[0];