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 function getMinutes($hour) {
17 if (($hour == 0) ||
($hour == "00"))
19 else if (($hour == 1) ||
($hour == "01"))
21 else if (($hour == 2) ||
($hour == "02"))
23 else if (($hour == 3) ||
($hour == "03"))
25 else if (($hour == 4) ||
($hour == "04"))
27 else if (($hour == 5) ||
($hour == "05"))
29 else if (($hour == 6) ||
($hour == "06"))
31 else if (($hour == 7) ||
($hour == "07"))
33 else if (($hour == 8) ||
($hour == "08"))
35 else if (($hour == 9) ||
($hour == "09"))
41 // corrects a time stamp to be the local time
42 function getGMTSeconds($stamp, $gmt) {
43 if (($gmt == "Pacific") ||
($gmt == "PST") ||
($gmt == "PDT"))
45 if (($gmt == "Eastern") ||
($gmt == "EST") ||
($gmt == "EDT"))
47 if (($gmt == "Central") ||
($gmt == "CST") ||
($gmt == "CDT"))
49 if (($gmt == "Mountain") ||
($gmt == "MST") ||
($gmt == "MDT"))
52 if (substr($gmt, 0, 1) == "-") {
54 $gmt = substr($gmt, 1, strlen($gmt));
55 } else if (substr($gmt, 0, 1) == "+") {
57 $gmt = substr($gmt, 1, strlen($gmt));
61 $gmt = substr($gmt, 0, 2);
68 /** now find what the server is at **/
69 $current = date("Z", time());
71 $stamp = (int)$stamp - (int)$gmt +
(int)$current;
76 function getHour($hour) {
77 $time = explode(":", $hour);
81 function getMinute($min) {
82 $time = explode(":", $min);
86 function getSecond($sec) {
87 $time = explode(":", $sec);
91 function getMonthNum($month) {
92 if (eregi("jan|january", $month, $tmp))
94 else if (eregi("feb|february|febuary", $month, $tmp))
96 else if (eregi("mar|march", $month, $tmp))
98 else if (eregi("apr|april", $month, $tmp))
100 else if (eregi("may", $month, $tmp))
102 else if (eregi("jun|june", $month, $tmp))
104 else if (eregi("jul|july", $month, $tmp))
106 else if (eregi("aug|august", $month, $tmp))
108 else if (eregi("sep|sept|september", $month, $tmp))
110 else if (eregi("oct|october", $month, $tmp))
112 else if (eregi("nov|november", $month, $tmp))
114 else if (eregi("dec|december", $month, $tmp))
120 function getDayOfWeek($day) {
123 if (eregi("(mon|monday)", $day, $tmp))
125 else if (eregi("(tue|tuesday)", $day, $tmp))
127 else if (eregi("(wed|wednesday)", $day, $tmp))
129 else if (eregi("(thurs|thu|thursday)", $day, $tmp))
131 else if (eregi("(fri|friday)", $day, $tmp))
133 else if (eregi("(sat|saturday)", $day, $tmp))
135 else if (eregi("(sun|sunday)", $day, $tmp))
141 function getDayOfMonth($day) {
142 return ereg_replace("^0", "", $day); /* remove a preceeding 0 */
145 function getMonth($month) {
147 if (eregi("jan|january", $month, $tmp))
149 else if (eregi("feb|february|febuary", $month, $tmp))
151 else if (eregi("mar|march", $month, $tmp))
153 else if (eregi("apr|april", $month, $tmp))
155 else if (eregi("may", $month, $tmp))
157 else if (eregi("jun|june", $month, $tmp))
159 else if (eregi("jul|july", $month, $tmp))
161 else if (eregi("aug|august", $month, $tmp))
163 else if (eregi("sep|sept|september", $month, $tmp))
165 else if (eregi("oct|october", $month, $tmp))
167 else if (eregi("nov|november", $month, $tmp))
169 else if (eregi("dec|december", $month, $tmp))
175 function getYear($year) {
179 function getLongDateString($stamp) {
180 return date("D, F j, Y g:i a", $stamp);
183 function getDateString($stamp) {
184 return date("M j, Y", $stamp);
187 function getTimeStamp($dateParts) {
188 /** $dateParts[0] == <day of week> Mon, Tue, Wed
189 ** $dateParts[1] == <day of month> 23
190 ** $dateParts[2] == <month> Jan, Feb, Mar
191 ** $dateParts[3] == <year> 1999
192 ** $dateParts[4] == <time> 18:54:23 (HH:MM:SS)
193 ** $dateParts[5] == <from GMT> +0100
194 ** $dateParts[6] == <zone> (EDT)
196 ** NOTE: In RFC 822, it states that <day of week> is optional.
197 ** In that case, dateParts[0] would be the <day of month>
198 ** and everything would be bumped up one.
201 // Simply check to see if the first element in the dateParts
202 // array is an integer or not.
203 // Since the day of week is optional, this check is needed.
205 // The old code used eregi("mon|tue|wed|thu|fri|sat|sun",
206 // $dateParts[0], $tmp) to find if the first element was the
207 // day of week or day of month. This is an expensive call
208 // (processing time) to have inside a loop. Doing it this way
209 // saves quite a bit of time for large mailboxes.
211 // It is also quicker to call explode only once rather than
212 // the 3 times it was getting called by calling the functions
213 // getHour, getMinute, and getSecond.
215 if (intval(trim($dateParts[0])) > 0) {
216 $time = explode(":", $dateParts[3]);
220 $d[3] = getMonthNum(trim($dateParts[1]));
221 $d[4] = getDayOfMonth(trim($dateParts[0]));
222 $d[5] = getYear(trim($dateParts[2]));
223 return getGMTSeconds(mktime($d[0], $d[1], $d[2], $d[3], $d[4], $d[5]), $dateParts[4]);
225 $time = explode(":", $dateParts[4]);
229 $d[3] = getMonthNum(trim($dateParts[2]));
230 $d[4] = getDayOfMonth(trim($dateParts[1]));
231 $d[5] = getYear(trim($dateParts[3]));
232 return getGMTSeconds(mktime($d[0], $d[1], $d[2], $d[3], $d[4], $d[5]), $dateParts[5]);
235 // I use this function for profiling. Should never be called in
236 // actual versions of squirrelmail released to public.
237 function getmicrotime() {
238 $mtime = microtime();
239 $mtime = explode(" ",$mtime);
240 $mtime = $mtime[1] +
$mtime[0];