2012-11-22 03:25:06 +00:00
|
|
|
<?php defined('SYSPATH') OR die('No direct script access.');
|
2011-01-13 14:49:56 +00:00
|
|
|
/**
|
|
|
|
* HTML helper class. Provides generic methods for generating various HTML
|
|
|
|
* tags and making output HTML safe.
|
|
|
|
*
|
|
|
|
* @package Kohana
|
|
|
|
* @category Helpers
|
|
|
|
* @author Kohana Team
|
2012-11-22 03:25:06 +00:00
|
|
|
* @copyright (c) 2007-2012 Kohana Team
|
2011-01-13 14:49:56 +00:00
|
|
|
* @license http://kohanaframework.org/license
|
|
|
|
*/
|
|
|
|
class Kohana_HTML {
|
|
|
|
|
|
|
|
/**
|
|
|
|
* @var array preferred order of attributes
|
|
|
|
*/
|
|
|
|
public static $attribute_order = array
|
|
|
|
(
|
|
|
|
'action',
|
|
|
|
'method',
|
|
|
|
'type',
|
|
|
|
'id',
|
|
|
|
'name',
|
|
|
|
'value',
|
|
|
|
'href',
|
|
|
|
'src',
|
|
|
|
'width',
|
|
|
|
'height',
|
|
|
|
'cols',
|
|
|
|
'rows',
|
|
|
|
'size',
|
|
|
|
'maxlength',
|
|
|
|
'rel',
|
|
|
|
'media',
|
|
|
|
'accept-charset',
|
|
|
|
'accept',
|
|
|
|
'tabindex',
|
|
|
|
'accesskey',
|
|
|
|
'alt',
|
|
|
|
'title',
|
|
|
|
'class',
|
|
|
|
'style',
|
|
|
|
'selected',
|
|
|
|
'checked',
|
|
|
|
'readonly',
|
|
|
|
'disabled',
|
|
|
|
);
|
|
|
|
|
2012-11-22 03:25:06 +00:00
|
|
|
/**
|
|
|
|
* @var boolean use strict XHTML mode?
|
|
|
|
*/
|
|
|
|
public static $strict = TRUE;
|
|
|
|
|
2011-01-13 14:49:56 +00:00
|
|
|
/**
|
|
|
|
* @var boolean automatically target external URLs to a new window?
|
|
|
|
*/
|
|
|
|
public static $windowed_urls = FALSE;
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Convert special characters to HTML entities. All untrusted content
|
|
|
|
* should be passed through this method to prevent XSS injections.
|
|
|
|
*
|
|
|
|
* echo HTML::chars($username);
|
|
|
|
*
|
2012-11-22 03:25:06 +00:00
|
|
|
* @param string $value string to convert
|
|
|
|
* @param boolean $double_encode encode existing entities
|
2011-01-13 14:49:56 +00:00
|
|
|
* @return string
|
|
|
|
*/
|
|
|
|
public static function chars($value, $double_encode = TRUE)
|
|
|
|
{
|
|
|
|
return htmlspecialchars( (string) $value, ENT_QUOTES, Kohana::$charset, $double_encode);
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Convert all applicable characters to HTML entities. All characters
|
|
|
|
* that cannot be represented in HTML with the current character set
|
|
|
|
* will be converted to entities.
|
|
|
|
*
|
|
|
|
* echo HTML::entities($username);
|
|
|
|
*
|
2012-11-22 03:25:06 +00:00
|
|
|
* @param string $value string to convert
|
|
|
|
* @param boolean $double_encode encode existing entities
|
2011-01-13 14:49:56 +00:00
|
|
|
* @return string
|
|
|
|
*/
|
|
|
|
public static function entities($value, $double_encode = TRUE)
|
|
|
|
{
|
|
|
|
return htmlentities( (string) $value, ENT_QUOTES, Kohana::$charset, $double_encode);
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Create HTML link anchors. Note that the title is not escaped, to allow
|
|
|
|
* HTML elements within links (images, etc).
|
|
|
|
*
|
|
|
|
* echo HTML::anchor('/user/profile', 'My Profile');
|
|
|
|
*
|
2012-11-22 03:25:06 +00:00
|
|
|
* @param string $uri URL or URI string
|
|
|
|
* @param string $title link text
|
|
|
|
* @param array $attributes HTML anchor attributes
|
|
|
|
* @param mixed $protocol protocol to pass to URL::base()
|
|
|
|
* @param boolean $index include the index page
|
2011-01-13 14:49:56 +00:00
|
|
|
* @return string
|
|
|
|
* @uses URL::base
|
|
|
|
* @uses URL::site
|
|
|
|
* @uses HTML::attributes
|
|
|
|
*/
|
2012-11-22 03:25:06 +00:00
|
|
|
public static function anchor($uri, $title = NULL, array $attributes = NULL, $protocol = NULL, $index = TRUE)
|
2011-01-13 14:49:56 +00:00
|
|
|
{
|
|
|
|
if ($title === NULL)
|
|
|
|
{
|
|
|
|
// Use the URI as the title
|
|
|
|
$title = $uri;
|
|
|
|
}
|
|
|
|
|
|
|
|
if ($uri === '')
|
|
|
|
{
|
|
|
|
// Only use the base URL
|
2011-05-16 12:47:16 +00:00
|
|
|
$uri = URL::base($protocol, $index);
|
2011-01-13 14:49:56 +00:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
if (strpos($uri, '://') !== FALSE)
|
|
|
|
{
|
|
|
|
if (HTML::$windowed_urls === TRUE AND empty($attributes['target']))
|
|
|
|
{
|
|
|
|
// Make the link open in a new window
|
|
|
|
$attributes['target'] = '_blank';
|
|
|
|
}
|
|
|
|
}
|
|
|
|
elseif ($uri[0] !== '#')
|
|
|
|
{
|
|
|
|
// Make the URI absolute for non-id anchors
|
2011-05-16 12:47:16 +00:00
|
|
|
$uri = URL::site($uri, $protocol, $index);
|
2011-01-13 14:49:56 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
// Add the sanitized link to the attributes
|
|
|
|
$attributes['href'] = $uri;
|
|
|
|
|
|
|
|
return '<a'.HTML::attributes($attributes).'>'.$title.'</a>';
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Creates an HTML anchor to a file. Note that the title is not escaped,
|
|
|
|
* to allow HTML elements within links (images, etc).
|
|
|
|
*
|
|
|
|
* echo HTML::file_anchor('media/doc/user_guide.pdf', 'User Guide');
|
|
|
|
*
|
2012-11-22 03:25:06 +00:00
|
|
|
* @param string $file name of file to link to
|
|
|
|
* @param string $title link text
|
|
|
|
* @param array $attributes HTML anchor attributes
|
|
|
|
* @param mixed $protocol protocol to pass to URL::base()
|
|
|
|
* @param boolean $index include the index page
|
2011-01-13 14:49:56 +00:00
|
|
|
* @return string
|
|
|
|
* @uses URL::base
|
|
|
|
* @uses HTML::attributes
|
|
|
|
*/
|
2011-05-16 12:47:16 +00:00
|
|
|
public static function file_anchor($file, $title = NULL, array $attributes = NULL, $protocol = NULL, $index = FALSE)
|
2011-01-13 14:49:56 +00:00
|
|
|
{
|
|
|
|
if ($title === NULL)
|
|
|
|
{
|
|
|
|
// Use the file name as the title
|
|
|
|
$title = basename($file);
|
|
|
|
}
|
|
|
|
|
|
|
|
// Add the file link to the attributes
|
2012-11-22 03:25:06 +00:00
|
|
|
$attributes['href'] = URL::site($file, $protocol, $index);
|
2011-01-13 14:49:56 +00:00
|
|
|
|
|
|
|
return '<a'.HTML::attributes($attributes).'>'.$title.'</a>';
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Creates an email (mailto:) anchor. Note that the title is not escaped,
|
|
|
|
* to allow HTML elements within links (images, etc).
|
|
|
|
*
|
|
|
|
* echo HTML::mailto($address);
|
|
|
|
*
|
2012-11-22 03:25:06 +00:00
|
|
|
* @param string $email email address to send to
|
|
|
|
* @param string $title link text
|
|
|
|
* @param array $attributes HTML anchor attributes
|
2011-01-13 14:49:56 +00:00
|
|
|
* @return string
|
|
|
|
* @uses HTML::attributes
|
|
|
|
*/
|
|
|
|
public static function mailto($email, $title = NULL, array $attributes = NULL)
|
|
|
|
{
|
|
|
|
if ($title === NULL)
|
|
|
|
{
|
|
|
|
// Use the email address as the title
|
|
|
|
$title = $email;
|
|
|
|
}
|
|
|
|
|
|
|
|
return '<a href="mailto:'.$email.'"'.HTML::attributes($attributes).'>'.$title.'</a>';
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Creates a style sheet link element.
|
|
|
|
*
|
|
|
|
* echo HTML::style('media/css/screen.css');
|
|
|
|
*
|
2012-11-22 03:25:06 +00:00
|
|
|
* @param string $file file name
|
|
|
|
* @param array $attributes default attributes
|
|
|
|
* @param mixed $protocol protocol to pass to URL::base()
|
|
|
|
* @param boolean $index include the index page
|
2011-01-13 14:49:56 +00:00
|
|
|
* @return string
|
|
|
|
* @uses URL::base
|
|
|
|
* @uses HTML::attributes
|
|
|
|
*/
|
2011-05-16 12:47:16 +00:00
|
|
|
public static function style($file, array $attributes = NULL, $protocol = NULL, $index = FALSE)
|
2011-01-13 14:49:56 +00:00
|
|
|
{
|
|
|
|
if (strpos($file, '://') === FALSE)
|
|
|
|
{
|
|
|
|
// Add the base URL
|
2012-11-22 03:25:06 +00:00
|
|
|
$file = URL::site($file, $protocol, $index);
|
2011-01-13 14:49:56 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
// Set the stylesheet link
|
|
|
|
$attributes['href'] = $file;
|
|
|
|
|
|
|
|
// Set the stylesheet rel
|
2012-11-22 03:25:06 +00:00
|
|
|
$attributes['rel'] = empty($attributes['rel']) ? 'stylesheet' : $attributes['rel'];
|
2011-01-13 14:49:56 +00:00
|
|
|
|
|
|
|
// Set the stylesheet type
|
|
|
|
$attributes['type'] = 'text/css';
|
|
|
|
|
|
|
|
return '<link'.HTML::attributes($attributes).' />';
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Creates a script link.
|
|
|
|
*
|
|
|
|
* echo HTML::script('media/js/jquery.min.js');
|
|
|
|
*
|
2012-11-22 03:25:06 +00:00
|
|
|
* @param string $file file name
|
|
|
|
* @param array $attributes default attributes
|
|
|
|
* @param mixed $protocol protocol to pass to URL::base()
|
|
|
|
* @param boolean $index include the index page
|
2011-01-13 14:49:56 +00:00
|
|
|
* @return string
|
|
|
|
* @uses URL::base
|
|
|
|
* @uses HTML::attributes
|
|
|
|
*/
|
2011-05-16 12:47:16 +00:00
|
|
|
public static function script($file, array $attributes = NULL, $protocol = NULL, $index = FALSE)
|
2011-01-13 14:49:56 +00:00
|
|
|
{
|
|
|
|
if (strpos($file, '://') === FALSE)
|
|
|
|
{
|
|
|
|
// Add the base URL
|
2012-11-22 03:25:06 +00:00
|
|
|
$file = URL::site($file, $protocol, $index);
|
2011-01-13 14:49:56 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
// Set the script link
|
|
|
|
$attributes['src'] = $file;
|
|
|
|
|
|
|
|
// Set the script type
|
|
|
|
$attributes['type'] = 'text/javascript';
|
|
|
|
|
|
|
|
return '<script'.HTML::attributes($attributes).'></script>';
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Creates a image link.
|
|
|
|
*
|
|
|
|
* echo HTML::image('media/img/logo.png', array('alt' => 'My Company'));
|
|
|
|
*
|
2012-11-22 03:25:06 +00:00
|
|
|
* @param string $file file name
|
|
|
|
* @param array $attributes default attributes
|
|
|
|
* @param mixed $protocol protocol to pass to URL::base()
|
|
|
|
* @param boolean $index include the index page
|
2011-01-13 14:49:56 +00:00
|
|
|
* @return string
|
|
|
|
* @uses URL::base
|
|
|
|
* @uses HTML::attributes
|
|
|
|
*/
|
2011-05-16 12:47:16 +00:00
|
|
|
public static function image($file, array $attributes = NULL, $protocol = NULL, $index = FALSE)
|
2011-01-13 14:49:56 +00:00
|
|
|
{
|
|
|
|
if (strpos($file, '://') === FALSE)
|
|
|
|
{
|
|
|
|
// Add the base URL
|
2012-11-22 03:25:06 +00:00
|
|
|
$file = URL::site($file, $protocol, $index);
|
2011-01-13 14:49:56 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
// Add the image link
|
|
|
|
$attributes['src'] = $file;
|
|
|
|
|
|
|
|
return '<img'.HTML::attributes($attributes).' />';
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Compiles an array of HTML attributes into an attribute string.
|
|
|
|
* Attributes will be sorted using HTML::$attribute_order for consistency.
|
|
|
|
*
|
|
|
|
* echo '<div'.HTML::attributes($attrs).'>'.$content.'</div>';
|
|
|
|
*
|
2012-11-22 03:25:06 +00:00
|
|
|
* @param array $attributes attribute list
|
2011-01-13 14:49:56 +00:00
|
|
|
* @return string
|
|
|
|
*/
|
|
|
|
public static function attributes(array $attributes = NULL)
|
|
|
|
{
|
|
|
|
if (empty($attributes))
|
|
|
|
return '';
|
|
|
|
|
|
|
|
$sorted = array();
|
|
|
|
foreach (HTML::$attribute_order as $key)
|
|
|
|
{
|
|
|
|
if (isset($attributes[$key]))
|
|
|
|
{
|
|
|
|
// Add the attribute to the sorted list
|
|
|
|
$sorted[$key] = $attributes[$key];
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
// Combine the sorted attributes
|
|
|
|
$attributes = $sorted + $attributes;
|
|
|
|
|
|
|
|
$compiled = '';
|
|
|
|
foreach ($attributes as $key => $value)
|
|
|
|
{
|
|
|
|
if ($value === NULL)
|
|
|
|
{
|
|
|
|
// Skip attributes that have NULL values
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (is_int($key))
|
|
|
|
{
|
|
|
|
// Assume non-associative keys are mirrored attributes
|
|
|
|
$key = $value;
|
2012-11-22 03:25:06 +00:00
|
|
|
|
|
|
|
if ( ! HTML::$strict)
|
|
|
|
{
|
|
|
|
// Just use a key
|
|
|
|
$value = FALSE;
|
|
|
|
}
|
2011-01-13 14:49:56 +00:00
|
|
|
}
|
|
|
|
|
2012-11-22 03:25:06 +00:00
|
|
|
// Add the attribute key
|
|
|
|
$compiled .= ' '.$key;
|
|
|
|
|
|
|
|
if ($value OR HTML::$strict)
|
|
|
|
{
|
|
|
|
// Add the attribute value
|
|
|
|
$compiled .= '="'.HTML::chars($value).'"';
|
|
|
|
}
|
2011-01-13 14:49:56 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
return $compiled;
|
|
|
|
}
|
|
|
|
|
|
|
|
} // End html
|