/lenasys/trunk

<?php  if ( ! defined('BASEPATH')) exit('No direct script access allowed');

/**

 * CodeIgniter

 *

 * An open source application development framework for PHP 5.1.6 or newer

 *

 * @package		CodeIgniter

 * @author		ExpressionEngine Dev Team

 * @copyright	Copyright (c) 2008 - 2011, EllisLab, Inc.

 * @license		http://codeigniter.com/user_guide/license.html

 * @link		http://codeigniter.com

 * @since		Version 1.0

 * @filesource

 */

// ------------------------------------------------------------------------

/**

 * CodeIgniter Text Helpers

 *

 * @package		CodeIgniter

 * @subpackage	Helpers

 * @category	Helpers

 * @author		ExpressionEngine Dev Team

 * @link		http://codeigniter.com/user_guide/helpers/text_helper.html

 */

// ------------------------------------------------------------------------

/**

 * Word Limiter

 *

 * Limits a string to X number of words.

 *

 * @access	public

 * @param	string

 * @param	integer

 * @param	string	the end character. Usually an ellipsis

 * @return	string

 */

if ( ! function_exists('word_limiter'))

{

	function word_limiter($str, $limit = 100, $end_char = '…')

	{

		if (trim($str) == '')

		{

			return $str;

		}

		preg_match('/^\s*+(?:\S++\s*+){1,'.(int) $limit.'}/', $str, $matches);

		if (strlen($str) == strlen($matches[0]))

		{

			$end_char = '';

		}

		return rtrim($matches[0]).$end_char;

	}

}

// ------------------------------------------------------------------------

/**

 * Character Limiter

 *

 * Limits the string based on the character count.  Preserves complete words

 * so the character count may not be exactly as specified.

 *

 * @access	public

 * @param	string

 * @param	integer

 * @param	string	the end character. Usually an ellipsis

 * @return	string

 */

if ( ! function_exists('character_limiter'))

{

	function character_limiter($str, $n = 500, $end_char = '…')

	{

		if (strlen($str) < $n)

		{

			return $str;

		}

		$str = preg_replace("/\s+/", ' ', str_replace(array("\r\n", "\r", "\n"), ' ', $str));

		if (strlen($str) <= $n)

		{

			return $str;

		}

		$out = "";

		foreach (explode(' ', trim($str)) as $val)

		{

			$out .= $val.' ';

			if (strlen($out) >= $n)

			{

				$out = trim($out);

				return (strlen($out) == strlen($str)) ? $out : $out.$end_char;

			}

		}

	}

}

// ------------------------------------------------------------------------

/**

 * High ASCII to Entities

 *

 * Converts High ascii text and MS Word special characters to character entities

 *

 * @access	public

 * @param	string

 * @return	string

 */

if ( ! function_exists('ascii_to_entities'))

{

	function ascii_to_entities($str)

	{

		$count	= 1;

		$out	= '';

		$temp	= array();

		for ($i = 0, $s = strlen($str); $i < $s; $i++)

		{

			$ordinal = ord($str[$i]);

			if ($ordinal < 128)

			{

				/*

					If the $temp array has a value but we have moved on, then it seems only

					fair that we output that entity and restart $temp before continuing. -Paul

				*/

				if (count($temp) == 1)

				{

					$out  .= '&#'.array_shift($temp).';';

					$count = 1;

				}

				$out .= $str[$i];

			}

			else

			{

				if (count($temp) == 0)

				{

					$count = ($ordinal < 224) ? 2 : 3;

				}

				$temp[] = $ordinal;

				if (count($temp) == $count)

				{

					$number = ($count == 3) ? (($temp['0'] % 16) * 4096) + (($temp['1'] % 64) * 64) + ($temp['2'] % 64) : (($temp['0'] % 32) * 64) + ($temp['1'] % 64);

					$out .= '&#'.$number.';';

					$count = 1;

					$temp = array();

				}

			}

		}

		return $out;

	}

}

// ------------------------------------------------------------------------

/**

 * Entities to ASCII

 *

 * Converts character entities back to ASCII

 *

 * @access	public

 * @param	string

 * @param	bool

 * @return	string

 */

if ( ! function_exists('entities_to_ascii'))

{

	function entities_to_ascii($str, $all = TRUE)

	{

		if (preg_match_all('/\&#(\d+)\;/', $str, $matches))

		{

			for ($i = 0, $s = count($matches['0']); $i < $s; $i++)

			{

				$digits = $matches['1'][$i];

				$out = '';

				if ($digits < 128)

				{

					$out .= chr($digits);

				}

				elseif ($digits < 2048)

				{

					$out .= chr(192 + (($digits - ($digits % 64)) / 64));

					$out .= chr(128 + ($digits % 64));

				}

				else

				{

					$out .= chr(224 + (($digits - ($digits % 4096)) / 4096));

					$out .= chr(128 + ((($digits % 4096) - ($digits % 64)) / 64));

					$out .= chr(128 + ($digits % 64));

				}

				$str = str_replace($matches['0'][$i], $out, $str);

			}

		}

		if ($all)

		{

			$str = str_replace(array("&", "<", ">", """, "'", "-"),

								array("&","<",">","\"", "'", "-"),

								$str);

		}

		return $str;

	}

}

// ------------------------------------------------------------------------

/**

 * Word Censoring Function

 *

 * Supply a string and an array of disallowed words and any

 * matched words will be converted to #### or to the replacement

 * word you've submitted.

 *

 * @access	public

 * @param	string	the text string

 * @param	string	the array of censoered words

 * @param	string	the optional replacement value

 * @return	string

 */

if ( ! function_exists('word_censor'))

{

	function word_censor($str, $censored, $replacement = '')

	{

		if ( ! is_array($censored))

		{

			return $str;

		}

		$str = ' '.$str.' ';

		// \w, \b and a few others do not match on a unicode character

		// set for performance reasons. As a result words like über

		// will not match on a word boundary. Instead, we'll assume that

		// a bad word will be bookeneded by any of these characters.

		$delim = '[-_\'\"`(){}<>\[\]|!?@#%&,.:;^~*+=\/ 0-9\n\r\t]';

		foreach ($censored as $badword)

		{

			if ($replacement != '')

			{

				$str = preg_replace("/({$delim})(".str_replace('\*', '\w*?', preg_quote($badword, '/')).")({$delim})/i", "\\1{$replacement}\\3", $str);

			}

			else

			{

				$str = preg_replace("/({$delim})(".str_replace('\*', '\w*?', preg_quote($badword, '/')).")({$delim})/ie", "'\\1'.str_repeat('#', strlen('\\2')).'\\3'", $str);

			}

		}

		return trim($str);

	}

}

// ------------------------------------------------------------------------

/**

 * Code Highlighter

 *

 * Colorizes code strings

 *

 * @access	public

 * @param	string	the text string

 * @return	string

 */

if ( ! function_exists('highlight_code'))

{

	function highlight_code($str)

	{

		// The highlight string function encodes and highlights

		// brackets so we need them to start raw

		$str = str_replace(array('&lt;', '&gt;'), array('<', '>'), $str);

		// Replace any existing PHP tags to temporary markers so they don't accidentally

		// break the string out of PHP, and thus, thwart the highlighting.

		$str = str_replace(array('<?', '?>', '<%', '%>', '\\', '</script>'),

							array('phptagopen', 'phptagclose', 'asptagopen', 'asptagclose', 'backslashtmp', 'scriptclose'), $str);

		// The highlight_string function requires that the text be surrounded

		// by PHP tags, which we will remove later

		$str = '<?php '.$str.' ?>'; // <?

		// All the magic happens here, baby!

		$str = highlight_string($str, TRUE);

		// Prior to PHP 5, the highligh function used icky <font> tags

		// so we'll replace them with <span> tags.

		if (abs(PHP_VERSION) < 5)

		{

			$str = str_replace(array('<font ', '</font>'), array('<span ', '</span>'), $str);

			$str = preg_replace('#color="(.*?)"#', 'style="color: \\1"', $str);

		}

		// Remove our artificially added PHP, and the syntax highlighting that came with it

		$str = preg_replace('/<span style="color: #([A-Z0-9]+)">&lt;\?php(&nbsp;| )/i', '<span style="color: #$1">', $str);

		$str = preg_replace('/(<span style="color: #[A-Z0-9]+">.*?)\?&gt;<\/span>\n<\/span>\n<\/code>/is', "$1</span>\n</span>\n</code>", $str);

		$str = preg_replace('/<span style="color: #[A-Z0-9]+"\><\/span>/i', '', $str);

		// Replace our markers back to PHP tags.

		$str = str_replace(array('phptagopen', 'phptagclose', 'asptagopen', 'asptagclose', 'backslashtmp', 'scriptclose'),

							array('<?', '?>', '<%', '%>', '\\', '</script>'), $str);

		return $str;

	}

}

// ------------------------------------------------------------------------

/**

 * Phrase Highlighter

 *

 * Highlights a phrase within a text string

 *

 * @access	public

 * @param	string	the text string

 * @param	string	the phrase you'd like to highlight

 * @param	string	the openging tag to precede the phrase with

 * @param	string	the closing tag to end the phrase with

 * @return	string

 */

if ( ! function_exists('highlight_phrase'))

{

	function highlight_phrase($str, $phrase, $tag_open = '<strong>', $tag_close = '</strong>')

	{

		if ($str == '')

		{

			return '';

		}

		if ($phrase != '')

		{

			return preg_replace('/('.preg_quote($phrase, '/').')/i', $tag_open."\\1".$tag_close, $str);

		}

		return $str;

	}

}

// ------------------------------------------------------------------------

/**

 * Convert Accented Foreign Characters to ASCII

 *

 * @access	public

 * @param	string	the text string

 * @return	string

 */

if ( ! function_exists('convert_accented_characters'))

{

	function convert_accented_characters($str)

	{

		if (defined('ENVIRONMENT') AND is_file(APPPATH.'config/'.ENVIRONMENT.'/foreign_chars.php'))

		{

			include(APPPATH.'config/'.ENVIRONMENT.'/foreign_chars.php');

		}

		elseif (is_file(APPPATH.'config/foreign_chars.php'))

		{

			include(APPPATH.'config/foreign_chars.php');

		}

		if ( ! isset($foreign_characters))

		{

			return $str;

		}

		return preg_replace(array_keys($foreign_characters), array_values($foreign_characters), $str);

	}

}

// ------------------------------------------------------------------------

/**

 * Word Wrap

 *

 * Wraps text at the specified character.  Maintains the integrity of words.

 * Anything placed between {unwrap}{/unwrap} will not be word wrapped, nor

 * will URLs.

 *

 * @access	public

 * @param	string	the text string

 * @param	integer	the number of characters to wrap at

 * @return	string

 */

if ( ! function_exists('word_wrap'))

{

	function word_wrap($str, $charlim = '76')

	{

		// Se the character limit

		if ( ! is_numeric($charlim))

			$charlim = 76;

		// Reduce multiple spaces

		$str = preg_replace("| +|", " ", $str);

		// Standardize newlines

		if (strpos($str, "\r") !== FALSE)

		{

			$str = str_replace(array("\r\n", "\r"), "\n", $str);

		}

		// If the current word is surrounded by {unwrap} tags we'll

		// strip the entire chunk and replace it with a marker.

		$unwrap = array();

		if (preg_match_all("|(\{unwrap\}.+?\{/unwrap\})|s", $str, $matches))

		{

			for ($i = 0; $i < count($matches['0']); $i++)

			{

				$unwrap[] = $matches['1'][$i];

				$str = str_replace($matches['1'][$i], "{{unwrapped".$i."}}", $str);

			}

		}

		// Use PHP's native function to do the initial wordwrap.

		// We set the cut flag to FALSE so that any individual words that are

		// too long get left alone.  In the next step we'll deal with them.

		$str = wordwrap($str, $charlim, "\n", FALSE);

		// Split the string into individual lines of text and cycle through them

		$output = "";

		foreach (explode("\n", $str) as $line)

		{

			// Is the line within the allowed character count?

			// If so we'll join it to the output and continue

			if (strlen($line) <= $charlim)

			{

				$output .= $line."\n";

				continue;

			}

			$temp = '';

			while ((strlen($line)) > $charlim)

			{

				// If the over-length word is a URL we won't wrap it

				if (preg_match("!\[url.+\]|://|wwww.!", $line))

				{

					break;

				}

				// Trim the word down

				$temp .= substr($line, 0, $charlim-1);

				$line = substr($line, $charlim-1);

			}

			// If $temp contains data it means we had to split up an over-length

			// word into smaller chunks so we'll add it back to our current line

			if ($temp != '')

			{

				$output .= $temp."\n".$line;

			}

			else

			{

				$output .= $line;

			}

			$output .= "\n";

		}

		// Put our markers back

		if (count($unwrap) > 0)

		{

			foreach ($unwrap as $key => $val)

			{

				$output = str_replace("{{unwrapped".$key."}}", $val, $output);

			}

		}

		// Remove the unwrap tags

		$output = str_replace(array('{unwrap}', '{/unwrap}'), '', $output);

		return $output;

	}

}

// ------------------------------------------------------------------------

/**

 * Ellipsize String

 *

 * This function will strip tags from a string, split it at its max_length and ellipsize

 *

 * @param	string		string to ellipsize

 * @param	integer		max length of string

 * @param	mixed		int (1|0) or float, .5, .2, etc for position to split

 * @param	string		ellipsis ; Default '...'

 * @return	string		ellipsized string

 */

if ( ! function_exists('ellipsize'))

{

	function ellipsize($str, $max_length, $position = 1, $ellipsis = '…')

	{

		// Strip tags

		$str = trim(strip_tags($str));

		// Is the string long enough to ellipsize?

		if (strlen($str) <= $max_length)

		{

			return $str;

		}

		$beg = substr($str, 0, floor($max_length * $position));

		$position = ($position > 1) ? 1 : $position;

		if ($position === 1)

		{

			$end = substr($str, 0, -($max_length - strlen($beg)));

		}

		else

		{

			$end = substr($str, -($max_length - strlen($beg)));

		}

		return $beg.$ellipsis.$end;

	}

}

/* End of file text_helper.php */

/* Location: ./system/helpers/text_helper.php */