You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
449 lines
11 KiB
449 lines
11 KiB
7 years ago
|
<?php
|
||
|
|
/**
|
||
|
|
* Part of the Fuel framework.
|
||
|
|
*
|
||
|
|
* @package Fuel
|
||
|
|
* @version 1.8
|
||
|
|
* @author Fuel Development Team
|
||
|
|
* @license MIT License
|
||
|
|
* @copyright 2010 - 2016 Fuel Development Team
|
||
|
|
* @link http://fuelphp.com
|
||
|
|
*/
|
||
|
|
|
||
|
|
namespace Fuel\Core;
|
||
|
|
|
||
|
|
/**
|
||
|
|
* String handling with encoding support
|
||
|
|
*
|
||
|
|
* PHP needs to be compiled with --enable-mbstring
|
||
|
|
* or a fallback without encoding support is used
|
||
|
|
*/
|
||
|
|
class Str
|
||
|
|
{
|
||
|
|
/**
|
||
|
|
* Truncates a string to the given length. It will optionally preserve
|
||
|
|
* HTML tags if $is_html is set to true.
|
||
|
|
*
|
||
|
|
* @param string $string the string to truncate
|
||
|
|
* @param int $limit the number of characters to truncate too
|
||
|
|
* @param string $continuation the string to use to denote it was truncated
|
||
|
|
* @param bool $is_html whether the string has HTML
|
||
|
|
* @return string the truncated string
|
||
|
|
*/
|
||
|
|
public static function truncate($string, $limit, $continuation = '...', $is_html = false)
|
||
|
|
{
|
||
|
|
$offset = 0;
|
||
|
|
$tags = array();
|
||
|
|
if ($is_html)
|
||
|
|
{
|
||
|
|
// Handle special characters.
|
||
|
|
preg_match_all('/&[a-z]+;/i', strip_tags($string), $matches, PREG_OFFSET_CAPTURE | PREG_SET_ORDER);
|
||
|
|
// fix preg_match_all broken multibyte support
|
||
|
|
if (MBSTRING and strlen($string !== mb_strlen($string)))
|
||
|
|
{
|
||
|
|
$correction = 0;
|
||
|
|
foreach ($matches as $index => $match)
|
||
|
|
{
|
||
|
|
$matches[$index][0][1] -= $correction;
|
||
|
|
$correction += (strlen($match[0][0]) - mb_strlen($match[0][0]));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
foreach ($matches as $match)
|
||
|
|
{
|
||
|
|
if ($match[0][1] >= $limit)
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
$limit += (static::length($match[0][0]) - 1);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Handle all the html tags.
|
||
|
|
preg_match_all('/<[^>]+>([^<]*)/', $string, $matches, PREG_OFFSET_CAPTURE | PREG_SET_ORDER);
|
||
|
|
// fix preg_match_all broken multibyte support
|
||
|
|
if (MBSTRING and strlen($string !== mb_strlen($string)))
|
||
|
|
{
|
||
|
|
$correction = 0;
|
||
|
|
foreach ($matches as $index => $match)
|
||
|
|
{
|
||
|
|
$matches[$index][0][1] -= $correction;
|
||
|
|
$matches[$index][1][1] -= $correction;
|
||
|
|
$correction += (strlen($match[0][0]) - mb_strlen($match[0][0]));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
foreach ($matches as $match)
|
||
|
|
{
|
||
|
|
if($match[0][1] - $offset >= $limit)
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
$tag = static::sub(strtok($match[0][0], " \t\n\r\0\x0B>"), 1);
|
||
|
|
if($tag[0] != '/')
|
||
|
|
{
|
||
|
|
$tags[] = $tag;
|
||
|
|
}
|
||
|
|
elseif (end($tags) == static::sub($tag, 1))
|
||
|
|
{
|
||
|
|
array_pop($tags);
|
||
|
|
}
|
||
|
|
$offset += $match[1][1] - $match[0][1];
|
||
|
|
}
|
||
|
|
}
|
||
|
|
$new_string = static::sub($string, 0, $limit = min(static::length($string), $limit + $offset));
|
||
|
|
$new_string .= (static::length($string) > $limit ? $continuation : '');
|
||
|
|
$new_string .= (count($tags = array_reverse($tags)) ? '</'.implode('></', $tags).'>' : '');
|
||
|
|
return $new_string;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Add's _1 to a string or increment the ending number to allow _2, _3, etc
|
||
|
|
*
|
||
|
|
* @param string $str required
|
||
|
|
* @param int $first number that is used to mean first
|
||
|
|
* @param string $separator separtor between the name and the number
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public static function increment($str, $first = 1, $separator = '_')
|
||
|
|
{
|
||
|
|
preg_match('/(.+)'.$separator.'([0-9]+)$/', $str, $match);
|
||
|
|
|
||
|
|
return isset($match[2]) ? $match[1].$separator.($match[2] + 1) : $str.$separator.$first;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Checks whether a string has a precific beginning.
|
||
|
|
*
|
||
|
|
* @param string $str string to check
|
||
|
|
* @param string $start beginning to check for
|
||
|
|
* @param boolean $ignore_case whether to ignore the case
|
||
|
|
* @return boolean whether a string starts with a specified beginning
|
||
|
|
*/
|
||
|
|
public static function starts_with($str, $start, $ignore_case = false)
|
||
|
|
{
|
||
|
|
return (bool) preg_match('/^'.preg_quote($start, '/').'/m'.($ignore_case ? 'i' : ''), $str);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Checks whether a string has a precific ending.
|
||
|
|
*
|
||
|
|
* @param string $str string to check
|
||
|
|
* @param string $end ending to check for
|
||
|
|
* @param boolean $ignore_case whether to ignore the case
|
||
|
|
* @return boolean whether a string ends with a specified ending
|
||
|
|
*/
|
||
|
|
public static function ends_with($str, $end, $ignore_case = false)
|
||
|
|
{
|
||
|
|
return (bool) preg_match('/'.preg_quote($end, '/').'$/m'.($ignore_case ? 'i' : ''), $str);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* substr
|
||
|
|
*
|
||
|
|
* @param string $str required
|
||
|
|
* @param int $start required
|
||
|
|
* @param int|null $length
|
||
|
|
* @param string $encoding default UTF-8
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public static function sub($str, $start, $length = null, $encoding = null)
|
||
|
|
{
|
||
|
|
$encoding or $encoding = \Fuel::$encoding;
|
||
|
|
|
||
|
|
// substr functions don't parse null correctly
|
||
|
|
$length = is_null($length) ? (MBSTRING ? mb_strlen($str, $encoding) : strlen($str)) - $start : $length;
|
||
|
|
|
||
|
|
return MBSTRING
|
||
|
|
? mb_substr($str, $start, $length, $encoding)
|
||
|
|
: substr($str, $start, $length);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* strlen
|
||
|
|
*
|
||
|
|
* @param string $str required
|
||
|
|
* @param string $encoding default UTF-8
|
||
|
|
* @return int
|
||
|
|
*/
|
||
|
|
public static function length($str, $encoding = null)
|
||
|
|
{
|
||
|
|
$encoding or $encoding = \Fuel::$encoding;
|
||
|
|
|
||
|
|
return MBSTRING
|
||
|
|
? mb_strlen($str, $encoding)
|
||
|
|
: strlen($str);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* lower
|
||
|
|
*
|
||
|
|
* @param string $str required
|
||
|
|
* @param string $encoding default UTF-8
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public static function lower($str, $encoding = null)
|
||
|
|
{
|
||
|
|
$encoding or $encoding = \Fuel::$encoding;
|
||
|
|
|
||
|
|
return MBSTRING
|
||
|
|
? mb_strtolower($str, $encoding)
|
||
|
|
: strtolower($str);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* upper
|
||
|
|
*
|
||
|
|
* @param string $str required
|
||
|
|
* @param string $encoding default UTF-8
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public static function upper($str, $encoding = null)
|
||
|
|
{
|
||
|
|
$encoding or $encoding = \Fuel::$encoding;
|
||
|
|
|
||
|
|
return MBSTRING
|
||
|
|
? mb_strtoupper($str, $encoding)
|
||
|
|
: strtoupper($str);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* lcfirst
|
||
|
|
*
|
||
|
|
* Does not strtoupper first
|
||
|
|
*
|
||
|
|
* @param string $str required
|
||
|
|
* @param string $encoding default UTF-8
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public static function lcfirst($str, $encoding = null)
|
||
|
|
{
|
||
|
|
$encoding or $encoding = \Fuel::$encoding;
|
||
|
|
|
||
|
|
return MBSTRING
|
||
|
|
? mb_strtolower(mb_substr($str, 0, 1, $encoding), $encoding).
|
||
|
|
mb_substr($str, 1, mb_strlen($str, $encoding), $encoding)
|
||
|
|
: lcfirst($str);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* ucfirst
|
||
|
|
*
|
||
|
|
* Does not strtolower first
|
||
|
|
*
|
||
|
|
* @param string $str required
|
||
|
|
* @param string $encoding default UTF-8
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public static function ucfirst($str, $encoding = null)
|
||
|
|
{
|
||
|
|
$encoding or $encoding = \Fuel::$encoding;
|
||
|
|
|
||
|
|
return MBSTRING
|
||
|
|
? mb_strtoupper(mb_substr($str, 0, 1, $encoding), $encoding).
|
||
|
|
mb_substr($str, 1, mb_strlen($str, $encoding), $encoding)
|
||
|
|
: ucfirst($str);
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* ucwords
|
||
|
|
*
|
||
|
|
* First strtolower then ucwords
|
||
|
|
*
|
||
|
|
* ucwords normally doesn't strtolower first
|
||
|
|
* but MB_CASE_TITLE does, so ucwords now too
|
||
|
|
*
|
||
|
|
* @param string $str required
|
||
|
|
* @param string $encoding default UTF-8
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public static function ucwords($str, $encoding = null)
|
||
|
|
{
|
||
|
|
$encoding or $encoding = \Fuel::$encoding;
|
||
|
|
|
||
|
|
return MBSTRING
|
||
|
|
? mb_convert_case($str, MB_CASE_TITLE, $encoding)
|
||
|
|
: ucwords(strtolower($str));
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Creates a random string of characters
|
||
|
|
*
|
||
|
|
* @param string $type the type of string
|
||
|
|
* @param int $length the number of characters
|
||
|
|
* @return string the random string
|
||
|
|
*/
|
||
|
|
public static function random($type = 'alnum', $length = 16)
|
||
|
|
{
|
||
|
|
switch($type)
|
||
|
|
{
|
||
|
|
case 'basic':
|
||
|
|
return mt_rand();
|
||
|
|
break;
|
||
|
|
|
||
|
|
default:
|
||
|
|
case 'alnum':
|
||
|
|
case 'numeric':
|
||
|
|
case 'nozero':
|
||
|
|
case 'alpha':
|
||
|
|
case 'distinct':
|
||
|
|
case 'hexdec':
|
||
|
|
switch ($type)
|
||
|
|
{
|
||
|
|
case 'alpha':
|
||
|
|
$pool = 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ';
|
||
|
|
break;
|
||
|
|
|
||
|
|
default:
|
||
|
|
case 'alnum':
|
||
|
|
$pool = '0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ';
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'numeric':
|
||
|
|
$pool = '0123456789';
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'nozero':
|
||
|
|
$pool = '123456789';
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'distinct':
|
||
|
|
$pool = '2345679ACDEFHJKLMNPRSTUVWXYZ';
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'hexdec':
|
||
|
|
$pool = '0123456789abcdef';
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
$str = '';
|
||
|
|
for ($i=0; $i < $length; $i++)
|
||
|
|
{
|
||
|
|
$str .= substr($pool, mt_rand(0, strlen($pool) -1), 1);
|
||
|
|
}
|
||
|
|
return $str;
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'unique':
|
||
|
|
return md5(uniqid(mt_rand()));
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'sha1' :
|
||
|
|
return sha1(uniqid(mt_rand(), true));
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'uuid':
|
||
|
|
$pool = array('8', '9', 'a', 'b');
|
||
|
|
return sprintf('%s-%s-4%s-%s%s-%s',
|
||
|
|
static::random('hexdec', 8),
|
||
|
|
static::random('hexdec', 4),
|
||
|
|
static::random('hexdec', 3),
|
||
|
|
$pool[array_rand($pool)],
|
||
|
|
static::random('hexdec', 3),
|
||
|
|
static::random('hexdec', 12));
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Returns a closure that will alternate between the args which to return.
|
||
|
|
* If you call the closure with false as the arg it will return the value without
|
||
|
|
* alternating the next time.
|
||
|
|
*
|
||
|
|
* @return Closure
|
||
|
|
*/
|
||
|
|
public static function alternator()
|
||
|
|
{
|
||
|
|
// the args are the values to alternate
|
||
|
|
$args = func_get_args();
|
||
|
|
|
||
|
|
return function ($next = true) use ($args)
|
||
|
|
{
|
||
|
|
static $i = 0;
|
||
|
|
return $args[($next ? $i++ : $i) % count($args)];
|
||
|
|
};
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Parse the params from a string using strtr()
|
||
|
|
*
|
||
|
|
* @param string $string string to parse
|
||
|
|
* @param array $array params to str_replace
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public static function tr($string, $array = array())
|
||
|
|
{
|
||
|
|
if (is_string($string))
|
||
|
|
{
|
||
|
|
$tr_arr = array();
|
||
|
|
|
||
|
|
foreach ($array as $from => $to)
|
||
|
|
{
|
||
|
|
substr($from, 0, 1) !== ':' and $from = ':'.$from;
|
||
|
|
$tr_arr[$from] = $to;
|
||
|
|
}
|
||
|
|
unset($array);
|
||
|
|
|
||
|
|
return strtr($string, $tr_arr);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
return $string;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Check if a string is json encoded
|
||
|
|
*
|
||
|
|
* @param string $string string to check
|
||
|
|
* @return bool
|
||
|
|
*/
|
||
|
|
public static function is_json($string)
|
||
|
|
{
|
||
|
|
json_decode($string);
|
||
|
|
return json_last_error() === JSON_ERROR_NONE;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Check if a string is a valid XML
|
||
|
|
*
|
||
|
|
* @param string $string string to check
|
||
|
|
* @return bool
|
||
|
|
* @throws \FuelException
|
||
|
|
*/
|
||
|
|
public static function is_xml($string)
|
||
|
|
{
|
||
|
|
if ( ! defined('LIBXML_COMPACT'))
|
||
|
|
{
|
||
|
|
throw new \FuelException('libxml is required to use Str::is_xml()');
|
||
|
|
}
|
||
|
|
|
||
|
|
$internal_errors = libxml_use_internal_errors();
|
||
|
|
libxml_use_internal_errors(true);
|
||
|
|
$result = simplexml_load_string($string) !== false;
|
||
|
|
libxml_use_internal_errors($internal_errors);
|
||
|
|
|
||
|
|
return $result;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Check if a string is serialized
|
||
|
|
*
|
||
|
|
* @param string $string string to check
|
||
|
|
* @return bool
|
||
|
|
*/
|
||
|
|
public static function is_serialized($string)
|
||
|
|
{
|
||
|
|
$array = @unserialize($string);
|
||
|
|
return ! ($array === false and $string !== 'b:0;');
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Check if a string is html
|
||
|
|
*
|
||
|
|
* @param string $string string to check
|
||
|
|
* @return bool
|
||
|
|
*/
|
||
|
|
public static function is_html($string)
|
||
|
|
{
|
||
|
|
return strlen(strip_tags($string)) < strlen($string);
|
||
|
|
}
|
||
|
|
}
|