]>
src.bluestatic.org Git - isso.git/blob - functions.php
2 /*=====================================================================*\
3 || ###################################################################
4 || # Iris Studios Shared Object Framework [#]version[#]
5 || # Copyright ©2002-[#]year[#] Iris Studios, Inc.
7 || # This program is free software; you can redistribute it and/or modify
8 || # it under the terms of the GNU General Public License as published by
9 || # the Free Software Foundation; version [#]gpl[#] of the License.
11 || # This program is distributed in the hope that it will be useful, but
12 || # WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13 || # or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
16 || # You should have received a copy of the GNU General Public License along
17 || # with this program; if not, write to the Free Software Foundation, Inc.,
18 || # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
19 || ###################################################################
20 \*=====================================================================*/
23 * Globalized Functions
30 * Globalized Functions
32 * This framework is a set of functions that are commonly used in most
35 * @author Iris Studios, Inc.
36 * @copyright Copyright ©2002 - [#]year[#], Iris Studios, Inc.
44 * Framework registry object
51 * The path that is used to set cookies
53 * @access pprivateublic
55 var $cookiepath = '/';
58 * The domain used for cookie setting
65 * The time it takes for a cookie to expire
72 * State of the current background colour during alternation
79 * Fields array that is used in this module
84 'cookiepath' => array(REQ_YES
, null, true),
85 'cookiedom' => array(REQ_YES
, null, true),
86 'cookieexp' => array(REQ_YES
, null, true)
89 // ###################################################################
93 function __construct(&$registry)
95 $this->registry
=& $registry;
98 // ###################################################################
100 * (PHP 4) Constructor
102 function Functions(&$registry)
104 $this->__construct($registry);
107 // ###################################################################
113 * @param string Field name
114 * @param mixed Value of the field
116 function set($name, $value)
118 $this->registry
->do_set($name, $value, 'functions');
121 // ###################################################################
123 * Sets a cookie with a friendly interface
127 * @param string The name of the cookie
128 * @param string Value of the cookie
129 * @param bool Is the cookie permanent?
131 function cookie($name, $value = '', $sticky = true)
133 $this->registry
->check_isso_fields(get_class($this));
138 setcookie($name, $value, time() - (2 * $this->cookieexp
), $this->cookiepath
, $this->cookiedom
);
145 $expire = time() +
60 * 60 * 24 * 365;
149 $expire = time() +
$this->cookieexp
;
152 setcookie($name, $value, $expire, $this->cookiepath
, $this->cookiedom
);
156 // ###################################################################
158 * Alternate between two background colours
162 * @param string First CSS class name
163 * @param string Second CSS class name
165 function exec_swap_bg($class1 = 'alt1', $class2 = 'alt2')
169 $this->bgcolour
= ($count %
2) ? $class1 : $class2;
173 // ###################################################################
175 * Force-download a file by sending application/octetstream
179 * @param string The text of the file to be streamed
180 * @param string File name of the new file
181 * @param bool Whether or not to die after stringeaming the file
183 function download_file($file, $name, $exit = true)
185 if ($this->is_browser('ie') OR $this->is_browser('opera') OR $this->is_browser('safari'))
187 $mime = 'application/octetstream';
191 $mime = 'application/octet-stream';
194 header("Content-Type: $mime");
195 header('Expires: ' . gmdate('D, d M Y H:i:s') . ' GMT');
196 header('Content-Disposition: attachment; filename="' . $name . '"');
197 header('Content-length: ' . strlen($file));
198 header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
199 header('Pragma: public');
209 // ###################################################################
211 * Verify that an email address is valid via regex
215 * @param string An email address
217 * @return bool Validity of the email address
219 function is_valid_email($email)
221 if (preg_match('#^[a-z0-9\.\-\+_]+?@(.*?\.)*?[a-z0-9\-_]+?\.[a-z]{2,4}$#i', $email))
231 // ###################################################################
233 * Check a browser's user agent against a pre-determined list
237 * @param string Browser name
238 * @param string The browser's version
240 * @param mixed False if there is no match, the version if there is
242 function is_browser($check, $version = '')
244 $useragent = strtolower($_SERVER['HTTP_USER_AGENT']);
248 // -------------------------------------------------------------------
250 // -------------------------------------------------------------------
251 # Opera/6.05 (Windows 98; U) [en]
252 # Mozilla/4.0 (compatible; MSIE 5.0; Windows 98) Opera 6.0 [en]
253 # Mozilla/5.0 (Windows 98; U) Opera 6.0 [en]
254 # Mozilla/4.0 (compatible; MSIE, 6.0; Windows 98) Opera 7.0 [en]
255 if (preg_match('#opera ([0-9\.]+)#', $useragent, $matches) !== false)
257 if (isset($matches[1]))
259 $browser['opera'] = $matches[1];
263 // -------------------------------------------------------------------
265 // -------------------------------------------------------------------
266 if (strpos($useragent, 'mac') !== false)
268 $browser['mac'] = true;
271 // -------------------------------------------------------------------
272 // -- Internet explorer
273 // -------------------------------------------------------------------
274 # Mozilla/4.0 (compatible; MSIE 6.0b; Windows NT 5.1; .NET CLR 1.0.2914)
275 # Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0)
276 if (preg_match('#msie ([0-9\.]+)#', $useragent, $matches) !== false AND !isset($browser['opera']))
278 if (isset($matches[1]))
280 $browser['ie'] = $matches[1];
284 // -------------------------------------------------------------------
286 // -------------------------------------------------------------------
287 # Mozilla/5.0 (Macintosh; U; PPC Mac OS X; en) AppleWebKit/125.4 (KHTML, like Gecko) Safari/125.9
288 if (preg_match('#safari/([0-9\.]+)#', $useragent, $matches) !== false)
290 if (isset($matches[1]))
292 $browser['safari'] = $matches[1];
296 // -------------------------------------------------------------------
298 // -------------------------------------------------------------------
299 # Mozilla/5.0 (compatible; Konqueror/3)
300 # Mozilla/5.0 (compatible; Konqueror/3.1; i686 Linux; 20020628)
301 if (preg_match('#konqueror/([0-9\.]+)#', $useragent, $matches) !== false)
303 if (isset($matches[1]))
305 $browser['konqueror'] = $matches[1];
309 // -------------------------------------------------------------------
311 // -------------------------------------------------------------------
312 # Mozilla/5.001 (windows; U; NT4.0; en-us) Gecko/25250101
313 # Mozilla/5.001 (Macintosh; N; PPC; ja) Gecko/25250101 MegaCorpBrowser/1.0 (MegaCorp, Inc.)
314 if (preg_match('#gecko/([0-9]+)#', $useragent, $matches) !== false AND !isset($browser['safari']))
316 if (isset($matches[1]))
318 $browser['mozilla'] = $matches[1];
321 // -------------------------------------------------------------------
323 // -------------------------------------------------------------------
324 # Mozilla/5.0 (Macintosh; U; PPC Mac OS X Mach-O; en-US; rv:1.7) Gecko/20040628 Firefox/0.9.1
325 # Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.4a) Gecko/20030423 Firebird Browser/0.6
326 if (preg_match('#(firebird|firefox)( browser)?/([0-9\.]+)#', $useragent, $matches) !== false)
328 if (isset($matches[3]))
330 $browser['firefox'] = $matches[3];
334 // -------------------------------------------------------------------
336 // -------------------------------------------------------------------
337 # Mozilla/5.0 (Macintosh; U; PPC; en-US; rv:0.9.4.1) Gecko/20020318 Netscape6/6.2.2
338 if (preg_match('#netscape([0-9].*?)?/([0-9\.]+)#', $useragent, $matches) !== false)
340 if (isset($matches[2]))
342 $browser['netscape'] = $matches[2];
346 // -------------------------------------------------------------------
348 // -------------------------------------------------------------------
349 # Mozilla/5.0 (Macintosh; U; PPC Mac OS X Mach-O; en-US; rv:1.7) Gecko/20040623 Camino/0.8
350 if (preg_match('#camino/([0-9\.]+)#', $useragent, $matches) !== false)
352 if (isset($matches[1]))
354 $browser['camino'] = $matches[1];
359 if (isset($browser["$check"]))
363 if ($browser["$check"] >= $version)
365 return $browser["$check"];
374 return $browser["$check"];
383 // ###################################################################
385 * Generates a random string of random length (unless otherwise
390 * @param integer Optional length
392 * @return string A random string
394 function rand($length = 0)
396 // custom high and lows
397 if (is_array($length))
399 $length = rand($length[0], $length[1]);
404 $length = rand(20, 65);
407 // Number of ints in our salt
408 $intcount = rand(0, intval($length / 2));
411 $charcount = $length - $intcount;
414 $upperchars = rand(1, intval($charcount / 2));
417 $lowerchars = $charcount - $upperchars;
420 for ($i = 0; $i < $intcount; $i++)
422 $string[] = rand(0, 9);
425 // Generate upper chars
426 for ($i = 0; $i < $upperchars; $i++)
428 $string[] = chr(rand(65, 90));
431 // Generate lower chars
432 for ($i = 0; $i < $lowerchars; $i++)
434 $string[] = chr(rand(97, 122));
437 // Randomly key the chars
438 foreach ($string AS $char)
441 $newstr["$rand"] = $char;
444 // Sort the chars by thier random assignment
449 foreach ($newstr AS $char)
457 // ###################################################################
459 * Sets the current array position to be the specified key. This
460 * function should be avoided on large arrays.
464 * @param array The array whose counter is to be updated
465 * @param mixed The key of the element of the array that the counter is to be set to
467 * @return mixed Return the elelment of the array that we just put the counter to
469 function array_set_current(&$array, $key)
472 while (current($array) !== false)
474 if (key($array) == $key)
480 return current($array);
483 // ###################################################################
485 * Calculates the microtime difference by taking a given microtime and
486 * subtracting it from the current one
490 * @param string The start microtime
492 * @return float Microtime difference
494 function fetch_microtime_diff($mtstart)
496 $mtend = microtime();
497 list ($starttime['micro'], $starttime['sec']) = explode(' ', $mtstart);
498 list ($endtime['micro'], $endtime['sec']) = explode(' ', $mtend);
499 return ($endtime['micro'] +
$endtime['sec']) - ($starttime['micro'] +
$starttime['sec']);
502 // ###################################################################
504 * Fetches the extension of a file by extracting everything after the
509 * @param string Filename
511 * @return string The extension for the specifid file name
513 function fetch_extension($filename)
515 return strval(end(explode('.', $filename)));
518 // ###################################################################
520 * Gets the maximum file size for attachment uploading, as specified by
521 * PHP. If no value is present, 10 MB (represented in bytes) is
526 * @return integer The maximum file upload size in bytes
528 function fetch_max_attachment_size()
530 if ($size = @ini_get('upload_max_filesize'))
532 if (preg_match('#[^0-9].#', $size))
538 return intval($size) * 1048576;
547 // ###################################################################
549 * Scans a specified directory path and returns an array of all the
550 * items in that directory. Directories found by this are end in a "/"
554 * @param string Path to scan
555 * @param bool Whether or not to recursively scan the directories encountered
556 * @param bool Ignore files beginning with a dot
557 * @param bool Ignore 'CVS' dirctories
559 * @return array A list of all the files in the specified path
561 function scandir($path, $recurse = true, $ignoredot = true, $ignorecvs = true, $basepath = '', $unset = 1)
570 if (substr($path, (strlen($path) - 1), 1) != '/')
575 if ($handle = opendir($path))
577 while (($file = readdir($handle)) !== false)
579 $isdot = ((substr($file, 0, 1) == '.') ? true : false);
580 $isdot = (($ignoredot) ? $isdot : true);
581 $iscvs = (($file == 'CVS') ? true : false);
582 $iscvs = (($ignorecvs) ? $iscvs : true);
583 if (!$isdot AND !$iscvs)
585 if (is_dir($path . $file))
587 $filelist["$basepath"][] = "$file/";
590 $this->scandir("$path$file", true, $ignoredot, $ignorecvs, "$basepath$file/", 0);
595 $filelist["$basepath"][] = $file;
605 /*=====================================================================*\
606 || ###################################################################
609 || ###################################################################
610 \*=====================================================================*/