<?php
/**
 * @version		$Id: html.php 20206 2011-01-09 17:11:35Z chdemko $
 * @package		Joomla.Framework
 * @subpackage	HTML
 * @copyright	Copyright (C) 2005 - 2011 Open Source Matters, Inc. All rights reserved.
 * @license		GNU General Public License version 2 or later; see LICENSE.txt
 */

// no direct access
defined('JPATH_BASE') or die;

JHtml::addIncludePath(JPATH_LIBRARIES.'/joomla/html/html');

jimport('joomla.environment.uri');
jimport('joomla.environment.browser');
jimport('joomla.filesystem.file');

/**
 * Utility class for all HTML drawing classes
 *
 * @static
 * @package		Joomla.Framework
 * @subpackage	HTML
 * @since		1.5
 */
abstract class JHtml
{
	/**
	 * Option values related to the generation of HTML output. Recognized
	 * options are:
	 * <ul><li>fmtDepth, integer. The current indent depth.
	 * </li><li>fmtEol, string. The end of line string, default is linefeed.
	 * </li><li>fmtIndent, string. The string to use for indentation, default is
	 * tab.
	 * </ul>
	 *
	 * @var array
	 */
	static $formatOptions = array(
		'format.depth' => 0,
		'format.eol' => "\n",
		'format.indent' => "\t"
 );

	private static $includePaths = array();

	/**
	 * An array to hold method references
	 *
	 * @var array
	 */
	private static $registry = array();

	protected static function extract($key)
	{
		$key = preg_replace('#[^A-Z0-9_\.]#i', '', $key);

		// Check to see if we need to load a helper file
		$parts = explode('.', $key);

		$prefix = (count($parts) == 3 ? array_shift($parts) : 'JHtml');
		$file	= (count($parts) == 2 ? array_shift($parts) : '');
		$func	= array_shift($parts);

		return array(strtolower($prefix.'.'.$file.'.'.$func), $prefix, $file, $func);
	}
	/**
	 * Class loader method
	 *
	 * Additional arguments may be supplied and are passed to the sub-class.
	 * Additional include paths are also able to be specified for third-party use
	 *
	 * @param	string	The name of helper method to load, (prefix).(class).function
	 *					prefix and class are optional and can be used to load custom
	 *					html helpers.
	 */
	public static function _($key)
	{
		list($key, $prefix, $file, $func) = self::extract($key);
		if (array_key_exists($key, self::$registry))
		{
			$function = self::$registry[$key];
			$args = func_get_args();
			// remove function name from arguments
			array_shift($args);
			return JHtml::call($function, $args);
		}

		$className = $prefix.ucfirst($file);

		if (!class_exists($className))
		{
			jimport('joomla.filesystem.path');
			if ($path = JPath::find(JHtml::$includePaths, strtolower($file).'.php'))
			{
				require_once $path;

				if (!class_exists($className))
				{
					JError::raiseError(500, JText::sprintf('JLIB_HTML_ERROR_NOTFOUNDINFILE', $className, $func));
					return false;
				}
			}
			else
			{
				JError::raiseError(500, JText::sprintf('JLIB_HTML_ERROR_NOTSUPPORTED_NOFILE', $prefix, $file));
				return false;
			}
		}

		$toCall = array($className, $func);
		if (is_callable($toCall))
		{
			JHtml::register($key, $toCall);
			$args = func_get_args();
			// remove function name from arguments
			array_shift($args);
			return JHtml::call($toCall, $args);
		}
		else
		{
			JError::raiseError(500, JText::sprintf('JLIB_HTML_ERROR_NOTSUPPORTED', $className, $func));
			return false;
		}
	}

	/**
	 * Registers a function to be called with a specific key
	 *
	 * @param	string	The name of the key
	 * @param	string	Function or method
	 */
	public static function register($key, $function)
	{
		list($key) = self::extract($key);
		if (is_callable($function))
		{
			self::$registry[$key] = $function;
			return true;
		}
		return false;
	}

	/**
	 * Removes a key for a method from registry.
	 *
	 * @param	string	The name of the key
	 */
	public static function unregister($key)
	{
		list($key) = self::extract($key);
		if (isset(self::$registry[$key])) {
			unset(self::$registry[$key]);
			return true;
		}

		return false;
	}

	/**
	 * Test if the key is registered.
	 *
	 * @param	string	The name of the key
	 */
	public static function isRegistered($key)
	{
		list($key) = self::extract($key);
		return isset(self::$registry[$key]);
	}

	/**
	 * Function caller method
	 *
	 * @param	string	Function or method to call
	 * @param	array	Arguments to be passed to function
	 */
	private static function call($function, $args)
	{
		if (is_callable($function))
		{
			// PHP 5.3 workaround
			$temp	= array();
			foreach ($args AS &$arg) {
				$temp[] = &$arg;
			}
			return call_user_func_array($function, $temp);
		}
		else {
			JError::raiseError(500, JText::_('JLIB_HTML_ERROR_FUNCTION_NOT_SUPPORTED'));
			return false;
		}
	}

	/**
	 * Write a <a></a> element
	 *
	 * @access	public
	 * @param	string	The relative URL to use for the href attribute
	 * @param	string	The target attribute to use
	 * @param	array	An associative array of attributes to add
	 * @since	1.5
	 */
	public static function link($url, $text, $attribs = null)
	{
		if (is_array($attribs)) {
			$attribs = JArrayHelper::toString($attribs);
		}

		return '<a href="'.$url.'" '.$attribs.'>'.$text.'</a>';
	}

	/**
	 * Write a <iframe></iframe> element
	 *
	 * @access	public
	 * @param	string	The relative URL to use for the src attribute
	 * @param	string	The target attribute to use
	 * @param	array	An associative array of attributes to add
	 * @param	string	The message to display if the iframe tag is not supported
	 * @since	1.5
	 */
	public static function iframe($url, $name, $attribs = null, $noFrames = '')
	{
		if (is_array($attribs)) {
			$attribs = JArrayHelper::toString($attribs);
		}

		return '<iframe src="'.$url.'" '.$attribs.' name="'.$name.'">'.$noFrames.'</iframe>';
	}

	/**
	 * compute the files to be include
	 * @param	string		path to file
	 * @param	boolean		path to file is relative to /media folder
	 * @param	boolean		detect browser to include specific browser js files
	 * @param	folder		folder name to search into (images, css, js, ...)
	 * @see		JBrowser
	 * @return	array		files to be included
	 * @since	1.6
	 */
	private static function _includeRelativeFiles($file, $relative, $detect_browser, $folder)
	{
		// if http is present in filename
		if (strpos($file, 'http') === 0)
		{
			$includes = array($file);
		}
		else
		{
			// Detect browser and compute potential files
			if ($detect_browser)
			{
				$navigator	= JBrowser::getInstance();
				$browser	= $navigator->getBrowser();
				$major		= $navigator->getMajor();
				$minor		= $navigator->getMinor();
				$ext		= JFile::getExt($file);
				$strip		= JFile::stripExt($file);

				// try to include files named filename.ext, filename_browser.ext, filename_browser_major.ext, filename_browser_major_minor.ext
				// where major and minor are the browser version names
				$potential = array($file, $strip.'_'.$browser.'.'.$ext,  $strip.'_'.$browser.'_'.$major.'.'.$ext, $strip.'_'.$browser.'_'.$major.'_'.$minor.'.'.$ext);
			}
			else
			{
				$potential = array($file);
			}

			// if relative search in template directory or media directory
			if($relative)
			{

				// Get the template
				$app = JFactory::getApplication();
				$template = $app->getTemplate();

				// Prepare array of files
				$includes = array();

				// for each potential files
				foreach ($potential as $file)
				{
					// if the file is in the template folder
					if (file_exists(JPATH_THEMES . "/$template/$folder/$file"))
					{
						$includes[] = JURI::base(true) . "/templates/$template/$folder/$file";
					}
					else
					{
						// if the file contains any /: it can be in an media extension subfolder
						if (strpos($file, '/'))
						{
							// divide the file extracting the extension as the first part before /
							list($extension, $file) = explode('/', $file, 2);

							// if the file yet contains any /: it can be a plugin
							if (strpos($file, '/'))
							{
								// divide the file extracting the element as the first part before /
								list($element, $file) = explode('/', $file, 2);

								// Try to deal with plugins group in the media folder
								if (file_exists(JPATH_ROOT . "/media/$extension/$element/$folder/$file")) {
									$includes[] = JURI::root(true) . "/media/$extension/$element/$folder/$file";
								}
								// Try to deal with classical file in a a media subfolder called element
								elseif (file_exists(JPATH_ROOT . "/media/$extension/$folder/$element/$file")) {
									$includes[] = JURI::root(true) . "/media/$extension/$folder/$element/$file";
								}
								// Try to deal with system files in the template folder
								elseif (file_exists(JPATH_THEMES . "/$template/$folder/system/$element/$file")) {
									$includes[] = JURI::root(true) . "/templates/$template/$folder/system/$element/$file";
								}
								// Try to deal with system files in the media folder
								elseif (file_exists(JPATH_ROOT . "/media/system/$folder/$element/$file")) {
									$includes[] = JURI::root(true) . "/media/system/$folder/$element/$file";
								}
							}
							// Try to deals in the extension media folder
							elseif (file_exists(JPATH_ROOT . "/media/$extension/$folder/$file"))
							{
								$includes[] = JURI::root(true) . "/media/$extension/$folder/$file";
							}
							// Try to deal with system files in the template folder
							elseif (file_exists(JPATH_THEMES . "/$template/$folder/system/$file"))
							{
								$includes[] = JURI::root(true) . "/templates/$template/$folder/system/$file";
							}
							// Try to deal with system files in the media folder
							elseif (file_exists(JPATH_ROOT . "/media/system/$folder/$file"))
							{
								$includes[] = JURI::root(true) . "/media/system/$folder/$file";
							}
						}
						// Try to deal with system files in the media folder
						elseif (file_exists(JPATH_ROOT . "/media/system/$folder/$file"))
						{
							$includes[] = JURI::root(true) . "/media/system/$folder/$file";
						}
					}
				}
			}
			// if not relative and http is not present in filename
			else
			{
				$includes = array();
				foreach ($potential as $file)
				{
					if (file_exists(JPATH_ROOT . "/$file")) {
						$includes[] = JURI::root(true) . "/$file";
					}
				}
			}
		}
		return $includes;
	}

	/**
	 * Write a <img></img> element
	 *
	 * @access	public
	 * @param	string	The relative or absolute URL to use for the src attribute
	 * @param	string	The target attribute to use
	 * @param	array	An associative array of attributes to add
	 * @param	boolean	If set to true, it tries to find an override for the file in the template
	 * @since	1.5
	 */
	public static function image($file, $alt, $attribs = null, $relative = false, $path_only = false)
	{
		if (is_array($attribs)) {
			$attribs = JArrayHelper::toString($attribs);
		}

		$includes = self::_includeRelativeFiles($file, $relative, false, 'images');

		// if only path is required
		if($path_only)
		{
			if (count($includes)) {
				return $includes[0];
			}
			else {
				return null;
			}
		}
		else {
			return '<img src="'.(count($includes) ? $includes[0] : '').'" alt="'.$alt.'" '.$attribs.' />';
		}
	}

	/**
	 * Write a <link rel="stylesheet" style="text/css" /> element
	 *
	 * @param	string		path to file
	 * @param	array		attributes to be added to the stylesheet
	 * @param	boolean		path to file is relative to /media folder
	 * @param	boolean		return the path to the file only
	 * @param	boolean		detect browser to include specific browser css files
	 *						will try to include file, file_*browser*, file_*browser*_*major*, file_*browser*_*major*_*minor*
	 *						<table>
	 *							<tr><th>Navigator</th>					<th>browser</th>	<th>major.minor</th></tr>
	 *
	 *							<tr><td>Safari 3.0.x</td>				<td>konqueror</td>	<td>522.x</td></tr>
	 *							<tr><td>Safari 3.1.x and 3.2.x</td>		<td>konqueror</td>	<td>525.x</td></tr>
	 *							<tr><td>Safari 4.0 to 4.0.2</td>		<td>konqueror</td>	<td>530.x</td></tr>
	 *							<tr><td>Safari 4.0.3 to 4.0.4</td>		<td>konqueror</td>	<td>531.x</td></tr>
	 *							<tr><td>iOS 4.0 Safari</td>				<td>konqueror</td>	<td>532.x</td></tr>
	 *							<tr><td>Safari 5.0</td>					<td>konqueror</td>	<td>533.x</td></tr>
	 *
	 *							<tr><td>Google Chrome 1.0</td>			<td>konqueror</td>	<td>528.x</td></tr>
	 *							<tr><td>Google Chrome 2.0</td>			<td>konqueror</td>	<td>530.x</td></tr>
	 *							<tr><td>Google Chrome 3.0 and 4.x</td>	<td>konqueror</td>	<td>532.x</td></tr>
	 *							<tr><td>Google Chrome 5.0</td>			<td>konqueror</td>	<td>533.x</td></tr>
	 *
	 *							<tr><td>Internet Explorer 5.5</td>		<td>msie</td>		<td>5.5</td></tr>
	 *							<tr><td>Internet Explorer 6.x</td>		<td>msie</td>		<td>6.x</td></tr>
	 *							<tr><td>Internet Explorer 7.x</td>		<td>msie</td>		<td>7.x</td></tr>
	 *							<tr><td>Internet Explorer 8.x</td>		<td>msie</td>		<td>8.x</td></tr>
	 *
	 *							<tr><td>Firefox</td>					<td>mozilla</td>	<td>5.0</td></tr>
	 *						</table>
	 *						a lot of others
	 * @see JBrowser
	 *
	 * @return	mixed		nothing if $path_only is false, null, path or array of path if specific css browser files were detected
	 * @since	1.6
	 */
	public static function stylesheet($file, $attribs = array(), $relative = false, $path_only = false, $detect_browser = true)
	{
		// Need to adjust for the change in API from 1.5 to 1.6.
		// function stylesheet($filename, $path = 'media/system/css/', $attribs = array())
		if (is_string($attribs)) {
			// Assume this was the old $path variable.
			$file = $attribs.$file;
		}

		if (is_array($relative)) {
			// Assume this was the old $attribs variable.
			$attribs	= $relative;
			$relative	= false;
		}

		$includes = self::_includeRelativeFiles($file, $relative, $detect_browser, 'css');

		// if only path is required
		if ($path_only) {
			if (count($includes)==0) {
				return null;
			}
			elseif (count($includes)==1) {
				return $includes[0];
			}
			else {
				return $includes;
			}
		}
		// if inclusion is required
		else {
			$document = JFactory::getDocument();
			foreach ($includes as $include)
			{
				$document->addStylesheet($include, 'text/css', null, $attribs);
			}
		}
	}

	/**
	 * Write a <script></script> element
	 * @param	string		path to file
	 * @param	boolean		load the JS framework
	 * @param	boolean		path to file is relative to /media folder
	 * @param	boolean		return the path to the file only
	 * @param	boolean		detect browser to include specific browser js files
	 * @return	mixed		nothing if $path_only is false, null, path or array of path if specific js browser files were detected
	 * @see 	JHtml::stylesheet
	 * @since	1.6
	 */
	public static function script($file, $framework = false, $relative = false, $path_only = false, $detect_browser = true)
	{
		JHtml::core();

		// Need to adjust for the change in API from 1.5 to 1.6.
		// function script($filename, $path = 'media/system/js/', $mootools = true)
		if (is_string($framework)) {
			// Assume this was the old $path variable.
			$file		= $framework.$file;
			$framework	= $relative;
		}

		// Include mootools framework
		if ($framework) {
			JHtml::_('behavior.framework');
		}

		$includes = self::_includeRelativeFiles($file, $relative, $detect_browser, 'js');

		// if only path is required
		if ($path_only) {
			if (count($includes)==0) {
				return null;
			}
			elseif (count($includes)==1) {
				return $includes[0];
			}
			else {
				return $includes;
			}
		}
		// if inclusion is required
		else {
			$document = JFactory::getDocument();
			foreach ($includes as $include)
			{
				$document->addScript($include);
			}
		}
	}

	public static function core($debug = null)
	{
		// If no debugging value is set, use the configuration setting
		if ($debug === null) {
			$debug = JFactory::getConfig()->get('debug');
		}

		$uncompressed	= $debug ? '-uncompressed' : '';

		$document = JFactory::getDocument();
		$document->addScript(JURI::root(true).'/media/system/js/core'.$uncompressed.'.js');
	}

	/**
	 * Set format related options.
	 *
	 * Updates the formatOptions array with all valid values in the passed
	 * array. See {@see JHtml::$formatOptions} for details.
	 *
	 * @param array Option key/value pairs.
	 */
	public static function setFormatOptions($options)
	{
		foreach ($options as $key => $val) {
			if (isset(self::$formatOptions[$key])) {
				self::$formatOptions[$key] = $val;
			}
		}
	}



	/**
	 * Returns formated date according to a given format and time zone.
	 *
	 * @param	string	String in a format accepted by date(), defaults to "now".
	 * @param	string	format optional format for strftime
	 * @param	mixed	Time zone to be used for the date.  Special cases: boolean true for user
	 *					setting, boolean false for server setting.
	 * @return	string	A date translated by the given format and time zone.
	 * @see		strftime
	 * @since	1.5
	 */
	public static function date($input = 'now', $format = null, $tz = true, $gregorian=false)
	{
		// Get some system objects.
		$config = JFactory::getConfig();
		$user	= JFactory::getUser();

		// UTC date converted to user time zone.
		if ($tz === true)
		{
			// Get a date object based on UTC.
			$date = JFactory::getDate($input, 'UTC');

			// Set the correct time zone based on the user configuration.
			$date->setTimeZone(new DateTimeZone($user->getParam('timezone', $config->get('offset'))));
		}
		// UTC date converted to server time zone.
		elseif ($tz === false)
		{
			// Get a date object based on UTC.
			$date = JFactory::getDate($input, 'UTC');

			// Set the correct time zone based on the server configuration.
			$date->setTimeZone(new DateTimeZone($config->get('offset')));
		}
		// No date conversion.
		elseif ($tz === null)
		{
			$date = JFactory::getDate($input);
		}
		// UTC date converted to given time zone.
		else
		{
			// Get a date object based on UTC.
			$date = JFactory::getDate($input, 'UTC');

			// Set the correct time zone based on the server configuration.
			$date->setTimeZone(new DateTimeZone($tz));
		}

		// If no format is given use the default locale based format.
		if (!$format) {
			$format = JText::_('DATE_FORMAT_LC1');
		}

		if ($gregorian) {
			return $date->format($format, true);
		}
		else {
			return $date->calendar($format, true);
		}
	}

	/**
	 * Creates a tooltip with an image as button
	 *
	 * @param	string			$tooltip The tip string
	 * @param	string|array	$title The title of the tooltip or an associative array with keys contained in {'title','image','text','href','alt'} and values
	 *							corresponding to parameters of the same name.
	 * @param	string			$image The image for the tip, if no text is provided
	 * @param	string			$text The text for the tip
	 * @param	string			$href An URL that will be used to create the link
	 * @param	string			$alt The alt attribute for img tag
 	 * @return	string
	 * @since	1.5
	 */
 	public static function tooltip($tooltip, $title = '', $image = 'tooltip.png', $text = '', $href = '', $alt = 'Tooltip', $class='hasTip')
 	{
 		if (is_array($title))
 		{
 			if (isset($title['image'])) {
 				$image = $title['image'];
 			}
 			if (isset($title['text'])) {
 				$text = $title['text'];
 			}
 			if (isset($title['href'])) {
 				$href = $title['href'];
 			}
 			if (isset($title['alt'])) {
 				$alt = $title['alt'];
 			}
 			if (isset($title['class'])) {
 				$class = $title['class'];
 			}
 			if (isset($title['title'])) {
 				$title = $title['title'];
 			}
 			else {
 				$title = '';
 			}
 		}
 		$tooltip	= addslashes(htmlspecialchars($tooltip,	ENT_COMPAT, 'UTF-8'));
		$title		= addslashes(htmlspecialchars($title,	ENT_COMPAT, 'UTF-8'));
		$alt 		= addslashes(htmlspecialchars($alt,		ENT_COMPAT, 'UTF-8'));

		if (!$text) {
			$text = self::image($image, $alt, null, true);
		}

		if ($href) {
			$tip = '<a href="' . $href . '">' . $text . '</a>';
		} else {
			$tip = $text;
		}

		if ($title) {
			$tooltip = $title.'::'.$tooltip;
		}
		return '<span class="'.$class.'" title="' . $tooltip . '">'.$tip.'</span>';
	}

	/**
	 * Displays a calendar control field
	 *
	 * @param	string	The date value
	 * @param	string	The name of the text field
	 * @param	string	The id of the text field
	 * @param	string	The date format
	 * @param	array	Additional html attributes
	 */
	public static function calendar($value, $name, $id, $format = '%Y-%m-%d', $attribs = null)
	{
		static $done;

		if ($done === null) {
			$done = array();
		}

		$readonly = isset($attribs['readonly']) && $attribs['readonly'] == 'readonly';
		$disabled = isset($attribs['disabled']) && $attribs['disabled'] == 'disabled';
		if (is_array($attribs)) {
			$attribs = JArrayHelper::toString($attribs);
		}

		if ((!$readonly) && (!$disabled)) {
			// Load the calendar behavior
			JHtml::_('behavior.calendar');
			JHtml::_('behavior.tooltip');

			// Only display the triggers once for each control.
			if (!in_array($id, $done))
			{
				$document = JFactory::getDocument();
				$document->addScriptDeclaration('window.addEvent(\'domready\', function() {Calendar.setup({
				inputField: "'.$id.'",		// id of the input field
				ifFormat: "'.$format.'",	// format of the input field
				button: "'.$id.'_img",		// trigger for the calendar (button ID)
				align: "Tl",				// alignment (defaults to "Bl")
				singleClick: true,
				firstDay: '.JFactory::getLanguage()->getFirstDay().'
				});});');
				$done[] = $id;
			}
		}

		return '<input type="text" title="'.(0!==(int)$value ? JHtml::_('date',$value):'').'" name="'.$name.'" id="'.$id.'" value="'.htmlspecialchars($value, ENT_COMPAT, 'UTF-8').'" '.$attribs.' />'.
				($readonly ? '' : JHTML::_('image','system/calendar.png', JText::_('JLIB_HTML_CALENDAR'), array( 'class' => 'calendar', 'id' => $id.'_img'), true));
	}

	/**
	 * Add a directory where JHtml should search for helpers. You may
	 * either pass a string or an array of directories.
	 *
	 * @access	public
	 * @param	string	A path to search.
	 * @return	array	An array with directory elements
	 * @since	1.5
	 */
	public static function addIncludePath($path = '')
	{
		// force path to array
		settype($path, 'array');

		// loop through the path directories
		foreach ($path as $dir)
		{
			if (!empty($dir) && !in_array($dir, JHtml::$includePaths)) {
				array_unshift(JHtml::$includePaths, JPath::clean($dir));
			}
		}

		return JHtml::$includePaths;
	}

}
