<?php
/*=====================================================================*\
|| ###################################################################
|| # Blue Static ISSO Framework
|| # Copyright (c)2005-2008 Blue Static
|| #
|| # This program is free software; you can redistribute it and/or modify
|| # it under the terms of the GNU General Public License as published by
|| # the Free Software Foundation; version 2 of the License.
|| #
|| # This program is distributed in the hope that it will be useful, but
|| # WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
|| # or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
|| # more details.
|| #
|| # You should have received a copy of the GNU General Public License along
|| # with this program; if not, write to the Free Software Foundation, Inc.,
|| # 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
|| ###################################################################
\*=====================================================================*/

/**
* Static functions (Functions.php)
*
* @package	ISSO
*/

/**
* Functions
*
* This is a bunch of static functions. This class is singleton so it
* can store data while remaining static.
*
* @author		Blue Static
* @copyright	Copyright (c)2005 - 2008, Blue Static
* @package		ISSO
* 
*/
class BSFunctions
{
	/**
	* Singleton instance
	* @var	object
	*/
	private static $instance;
	
	/**
	* Cookie path
	* @var	string
	*/
	private $cookiePath = '/';
	
	/**
	* Cookie domain setting
	* @var	string
	*/
	private $cookieDomain = '';
	
	/**
	* Cookie expiration time
	* @var	integer
	*/
	private $cookieTimeout = 900;
	
	/**
	* Current swapped CSS class
	* @var	string
	*/
	public static $cssClass = '';
	
	// ###################################################################
	/**
	* Constructor
	*/
	private function __construct() {}
	
	// ###################################################################
	/**
	* Returns the shared instance for singleton
	*
	* @return	object	Shared instance
	*/
	private function _instance()
	{
		if (!self::$instance)
		{
			self::$instance = new BSFunctions();
		}		
		return self::$instance;
	}
	
	// ###################################################################
	/**
	* Sets the cookie path
	*
	* @param	string	New path
	*/
	public static function set_cookie_path($path)
	{
		self::_instance()->cookiePath = $path;
	}
	
	// ###################################################################
	/**
	* Sets the cookie domain setting
	*
	* @param	string	Cookie domain
	*/
	public static function set_cookie_domain($domain)
	{
		self::_instance()->cookieDomain = $domain;
	}
	
	// ###################################################################
	/**
	* Sets the cookie timeout
	*
	* @param	integer	Cookie timeout
	*/
	public static function set_cookie_timeout($timeout)
	{
		self::_instance()->cookieTimeout = intval($timeout);
	}
	
	// ###################################################################
	/**
	* Sets a cookie in the user's computer/browing session
	*
	* @param	string	Name of the cookie
	* @param	string	Value of the cookie, FALSE to clear
	* @param	bool	Is the cookie permanent?
	*/
	public static function cookie($name, $value, $sticky = true)
	{
		// expire the cookie
		if ($value === false)
		{
			setcookie($name, $value, time() - (2 * self::_instance()->cookieTimeout), self::_instance()->cookiePath, self::_instance()->cookieDomain);
		}
		// set the cookie
		else
		{
			if ($sticky)
			{
				$expire = time() + 60 * 60 * 24 * 365;
			}
			else
			{
				$expire = time() + self::_instance()->cookieTimeout;
			}
			
			setcookie($name, $value, $expire, self::_instance()->cookiePath, self::_instance()->cookieDomain);
		}
	}
	
	// ###################################################################
	/**
	* Alternate between two CSS classes
	*
	* @param	string	First CSS class name
	* @param	string	Second CSS class name
	*/
	public static function swap_css_classes($class1 = 'alt1', $class2 = 'alt2')
	{
		static $count;
		
		self::$cssClass = ($count % 2) ? $class1 : $class2;
		$count++;
	}
	
	// ###################################################################
	/**
	* Returns the 'source path' version of a file path. It adds a
	* directory separator to the end of a string if it does not already
	* exist.
	*
	* @param	string	Path
	*
	* @return	string	Path with directory separator ending
	*/
	public static function fetch_source_path($source)
	{
		if (substr($source, strlen($source) - 1) != DIRECTORY_SEPARATOR)
		{
			$source .= DIRECTORY_SEPARATOR;
		}
		return $source;
	}
	
	// ###################################################################
	/**
	* Force-download a file by sending application/octetstream
	*
	* @param	string	The text of the file to be streamed
	* @param	string	File name of the new file
	* @param	bool	Whether or not to die after stringeaming the file
	*/
	public static function download_file($file, $name, $exit = true)
	{
		if (self::is_browser('ie') OR self::is_browser('opera') OR self::is_browser('safari'))
		{
			$mime = 'application/octetstream';
		}
		else
		{
			$mime = 'application/octet-stream';
		}
		
		header("Content-Type: $mime");
		header('Expires: ' . gmdate('D, d M Y H:i:s') . ' GMT');
		header('Content-Disposition: attachment; filename="' . $name . '"');
		header('Content-length: ' . strlen($file));
		header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
		header('Pragma: public');
		
		print($file);
		
		if ($exit)
		{
			exit;
		}
	}
	
	// ###################################################################
	/**
	* Verify that an email address is valid via regex
	*
	* @param	string	An email address
	*
	* @return	bool	Validity of the email address
	*/
	public static function is_valid_email($email)
	{
		if (preg_match('#^[a-z0-9\.\-\+_]+?@(.*?\.)*?[a-z0-9\-_]+?\.[a-z]{2,4}$#i', $email))
		{
			return true;
		}
		else
		{
			return false;
		}
	}
	
	// ###################################################################
	/**
	* Check a browser's user agent against a pre-determined list
	*
	* @param	string	Browser name
	* @param	string	The browser's version
	*
	* @param	mixed	False if there is no match, the version if there is
	*/
	public static function is_browser($check, $version = '')
	{
		$useragent = strtolower($_SERVER['HTTP_USER_AGENT']);
		$browser = array();
		$matches = array();
		
		// -------------------------------------------------------------------
		// -- Opera
		// -------------------------------------------------------------------
		# Opera/6.05 (Windows 98; U) [en]
		# Mozilla/4.0 (compatible; MSIE 5.0; Windows 98) Opera 6.0 [en]
		# Mozilla/5.0 (Windows 98; U) Opera 6.0 [en]
		# Mozilla/4.0 (compatible; MSIE, 6.0; Windows 98) Opera 7.0 [en]
		if (preg_match('#opera ([0-9\.]+)#', $useragent, $matches) !== false)
		{
			if (isset($matches[1]))
			{
				$browser['opera'] = $matches[1];
			}
		}
		
		// -------------------------------------------------------------------
		// -- Mac browser
		// -------------------------------------------------------------------
		if (strpos($useragent, 'mac') !== false)
		{
			$browser['mac'] = true;
		}
		
		// -------------------------------------------------------------------
		// -- Internet explorer
		// -------------------------------------------------------------------
		# Mozilla/4.0 (compatible; MSIE 6.0b; Windows NT 5.1; .NET CLR 1.0.2914)
		# Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0)
		if (preg_match('#msie ([0-9\.]+)#', $useragent, $matches) !== false AND !isset($browser['opera']))
		{
			if (isset($matches[1]))
			{
				$browser['ie'] = $matches[1];
			}
		}
		
		// -------------------------------------------------------------------
		// -- Safari
		// -------------------------------------------------------------------
		# Mozilla/5.0 (Macintosh; U; PPC Mac OS X; en) AppleWebKit/125.4 (KHTML, like Gecko) Safari/125.9
		if (preg_match('#safari/([0-9\.]+)#', $useragent, $matches) !== false)
		{
			if (isset($matches[1]))
			{
				$browser['safari'] = $matches[1];
			}
		}
		
		// -------------------------------------------------------------------
		// -- Konqueror
		// -------------------------------------------------------------------
		# Mozilla/5.0 (compatible; Konqueror/3)
		# Mozilla/5.0 (compatible; Konqueror/3.1; i686 Linux; 20020628)
		if (preg_match('#konqueror/([0-9\.]+)#', $useragent, $matches) !== false)
		{
			if (isset($matches[1]))
			{
				$browser['konqueror'] = $matches[1];
			}
		}
		
		// -------------------------------------------------------------------
		// -- Mozilla
		// -------------------------------------------------------------------
		# Mozilla/5.001 (windows; U; NT4.0; en-us) Gecko/25250101
		# Mozilla/5.001 (Macintosh; N; PPC; ja) Gecko/25250101 MegaCorpBrowser/1.0 (MegaCorp, Inc.)
		if (preg_match('#gecko/([0-9]+)#', $useragent, $matches) !== false AND !isset($browser['safari']))
		{
			if (isset($matches[1]))
			{
				$browser['mozilla'] = $matches[1];
			}
			
			// -------------------------------------------------------------------
			// -- Firefox
			// -------------------------------------------------------------------
			# Mozilla/5.0 (Macintosh; U; PPC Mac OS X Mach-O; en-US; rv:1.7) Gecko/20040628 Firefox/0.9.1
			# Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.4a) Gecko/20030423 Firebird Browser/0.6
			if (preg_match('#(firebird|firefox)( browser)?/([0-9\.]+)#', $useragent, $matches) !== false)
			{
				if (isset($matches[3]))
				{
					$browser['firefox'] = $matches[3];
				}
			}
			
			// -------------------------------------------------------------------
			// -- Netscape
			// -------------------------------------------------------------------
			# Mozilla/5.0 (Macintosh; U; PPC; en-US; rv:0.9.4.1) Gecko/20020318 Netscape6/6.2.2
			if (preg_match('#netscape([0-9].*?)?/([0-9\.]+)#', $useragent, $matches) !== false)
			{
				if (isset($matches[2]))
				{
					$browser['netscape'] = $matches[2];
				}
			}
			
			// -------------------------------------------------------------------
			// -- Camino
			// -------------------------------------------------------------------
			# Mozilla/5.0 (Macintosh; U; PPC Mac OS X Mach-O; en-US; rv:1.7) Gecko/20040623 Camino/0.8
			if (preg_match('#camino/([0-9\.]+)#', $useragent, $matches) !== false)
			{
				if (isset($matches[1]))
				{
					$browser['camino'] = $matches[1];
				}
			}
		}
		
		if (isset($browser["$check"]))
		{
			if ($version)
			{
				if ($browser["$check"] >= $version)
				{
					return $browser["$check"];
				}
				else
				{
					return false;
				}
			}
			else
			{
				return $browser["$check"];
			}
		}
		else
		{
			return false;
		}
	}
	
	// ###################################################################
	/**
	* Generates a random string of random length (unless otherwise
	* specified)
	*
	* @param	integer	Optional length
	*
	* @return	string	A random string
	*/
	public static function random($length = 0)
	{
		// custom high and lows
		if (is_array($length))
		{
			$length = rand($length[0], $length[1]);
		}
		else if (!$length)
		{
			$length = rand(20, 65);
		}
		
		$string = '';
		while (strlen($string) < $length)
		{
			$type = rand(0, 300);
			if ($type < 100)
			{
				$string .= rand(0, 9);
			}
			else if ($type < 200)
			{
				$string .= chr(rand(65, 90));
			}
			else
			{
				$string .= chr(rand(97, 122));
			}
		}
		
		return $string;
	}
	
	// ###################################################################
	/**
	* Sets the current array position to be the specified key. This
	* function should be avoided on large arrays.
	*
	* @param	array	The array whose counter is to be updated
	* @param	mixed	The key of the element of the array that the counter is to be set to
	*
	* @return	mixed	Return the elelment of the array that we just put the counter to
	*/
	public static function array_set_current(&$array, $key)
	{
		reset($array);
		while (current($array) !== false)
		{
			if (key($array) == $key)
			{
				break;
			}
			next($array);
		}
		return current($array);
	}
	
	// ###################################################################
	/**
	* Calculates the microtime difference by taking a given microtime and
	* subtracting it from the current one
	*
	* @param	string	The start microtime
	*
	* @return	float	Microtime difference
	*/
	public static function fetch_microtime_diff($mtstart)
	{
		$mtend = microtime();
		list($startMicro, $startSec) = explode(' ', $mtstart);
		list($endMicro, $endSec) = explode(' ', $mtend);
		return ($endMicro + $endSec) - ($startMicro + $startSec);
	}
	
	// ###################################################################
	/**
	* Fetches the extension of a file by extracting everything after the
	* last period
	*
	* @param	string	Filename
	*
	* @return	string	The extension for the specifid file name
	*/
	public static function fetch_extension($filename)
	{
		$array = explode('.', $filename);
		
		if (sizeof($array) == 1)
		{
			return '';
		}
		
		return strval(end($array));
	}
	
	// ###################################################################
	/**
	* Gets the maximum file size for attachment uploading, as specified by
	* PHP. If no value is present, 10 MB (represented in bytes) is
	* returned.
	*
	* @return	integer	The maximum file upload size in bytes
	*/
	public static function fetch_max_php_file_size()
	{
		if ($size = @ini_get('upload_max_filesize'))
		{
			if (preg_match('#[^0-9].#', $size))
			{
				return $size;
			}
			else
			{
				return intval($size) * 1048576;
			}
		}
		else
		{
			return 10 * 1048576;
		}
	}
	
	// ###################################################################
	/**
	* Scans a specified directory path and returns an array of all the
	* items in that directory. Directories found by this are end in a "/"
	*
	* @param	string	Path to scan
	* @param	bool	Whether or not to recursively scan the directories encountered
	* @param	bool	Ignore files beginning with a dot
	*
	* @return	array	A list of all the files in the specified path
	*/
	public static function scan_directory($path, $recurse = true, $ignoreDot = true)
	{
		return self::_help_scan_directory($path, $recurse, $ignoreDot, '');
	}
	
	// ###################################################################
	/**
	* Scans a specified directory path and returns an array of all the
	* items in that directory. Directories found by this are end in a "/"
	*
	* @param	string	Path to scan
	* @param	bool	Whether or not to recursively scan the directories encountered
	* @param	bool	Ignore files beginning with a dot
	* @param	string	Add to the beginning of the path
	*
	* @return	array	A list of all the files in the specified path
	*/
	private static function _help_scan_directory($path, $recurse = true, $ignoreDot = true, $pathAdd = '')
	{
		$filelist = array();
		$path = self::fetch_source_path($path);
		
		$dir = new DirectoryIterator($path);
		foreach ($dir AS $file)
		{
			$name = $file->getFilename();
			if (($file->isDot() OR $name[0] == '.') AND $ignoreDot)
			{
				continue;
			}
			
			if ($file->isDir() AND $recurse)
			{
				$filelist = array_merge($filelist, self::_help_scan_directory($path . $name, $recurse, $ignoreDot, $pathAdd . BSFunctions::fetch_source_path(str_replace($path, '', $file->getPathname()))));
				continue;
			}
			
			$filelist[] = $pathAdd . $name;
		}
		
		return $filelist;
	}
	
	// ###################################################################
	/**
	* Changes line breaks into one format
	*
	* @param	string	Text
	* @param	string	New line break (default is UNIX \n format)
	*
	* @return	string	Text with one type of line break
	*/
	public static function convert_line_breaks($text, $convert_to = "\n")
	{
		$text = trim($text);
		$text = str_replace(array("\r\n", "\r", "\n"), "\n", $text);
		$text = str_replace("\n", $convert_to, $text);
		return $text;
	}
	
	// ###################################################################
	/**
	* Removes all empty() [by PHP's standards] elements in an array. This
	* can be used in place of using PREG_SPLIT_NO_EMPTY.
	*
	* @param	array	An array to strip empties from
	*
	* @return	array	Full-valued array
	*/
	public static function array_strip_empty($array)
	{
		foreach ($array AS $key => $value)
		{
			if (is_array($array["$key"]))
			{
				$array["$key"] = self::array_strip_empty($array["$key"]);
			}
			else if (empty($value) OR is_null($value))
			{
				unset($array["$key"]);
			}
		}
		return $array;
	}
	
	// ###################################################################
	/**
	* A backtrace formatter.
	*
	* This is very slightly modified from PEAR/PHP_Compat (PHP license)
	*
	* @author	Laurent Laville <pear@laurent-laville.org>
	* @author	Aidan Lister <aidan@php.net>
	*
	* @param	array	The backtrace from debug_backtrace() to format
	*
	* @return	string	Formatted output
	*/
	public static function format_backtrace($backtrace)
	{
		// Unset call to debug_print_backtrace
		array_shift($backtrace);
		if (empty($backtrace))
		{
			return '';
		}

		// Iterate backtrace
		$calls = array();
		foreach ($backtrace AS $i => $call)
		{
			if (!isset($call['file']))
			{
				$call['file'] = '(null)';
			}
			if (!isset($call['line']))
			{
				$call['line'] = '0';
			}
			$location = $call['file'] . ':' . $call['line'];
			$function = (isset($call['class'])) ? $call['class'] . (isset($call['type']) ? $call['type'] : '.') . $call['function'] : $call['function'];
			
			$params = '';
			if (isset($call['args']))
			{
				$args = array();
				foreach ($call['args'] AS $arg)
				{
					if (is_array($arg))
					{
						$args[] = 'Array';
					}
					elseif (is_object($arg))
					{
						$args[] = get_class($arg);
					}
					else
					{
						$args[] = $arg;
					}
				}
				$params = implode(', ', $args);
			}

			$calls[] = sprintf('#%d	 %s(%s) called at [%s]', $i, $function, $params, $location);
		}

		return implode("\n", $calls);
	}
	
	// ###################################################################
	/**
	* A variation of PHP's substr() method that takes in the start
	* and end position of a string, rather than a start and length. This
	* mimics Java's String.substring() method.
	*
	* @param	string	The string
	* @param	integer	Start position
	* @param	integer	End position
	*
	* @return	string	Part of a string
	*/
	public static function substring($string, $start, $end)
	{
		return substr($string, $start, $end - $start);
	}
}

?>