<?php defined('MW_PATH') || exit('No direct script access allowed');

/**
 * StringHelper
 * 
 * @package MailWizz EMA
 * @author Serban George Cristian <cristian.serban@mailwizz.com> 
 * @link http://www.mailwizz.com/
 * @copyright 2013-2014 MailWizz EMA (http://www.mailwizz.com)
 * @license http://www.mailwizz.com/license/
 * @since 1.0
 */
 
class StringHelper 
{
    /**
     * StringHelper::simpleCamelCase()
     * 
     * @param string $str
     * @param bool $startUppercase
     * @return string
     */
    public static function simpleCamelCase($str, $startUppercase = true)
    {
        $str = str_replace(array('_','-'), ' ', $str);
        $str = ucwords($str);
        $str = str_replace(' ', '', $str);
        $str[0] = $startUppercase ? strtoupper($str[0]) : strtolower($str[0]);

        return $str;
    }
    
    /**
     * StringHelper::isEqual()
     * 
     * @param string $compare
     * @param string $against
     * @return bool
     */
    public static function isEqual($compare, $against)
    {
        if ($compare !== $against) {
            return false;
        }
        
        $lengthFunction = function_exists('mb_strlen') ? 'mb_strlen' : 'strlen';
        
        if ($lengthFunction($compare) !== $lengthFunction($against)) {
            return false;
        }
        
        $result = 0;
        
        for ($i = 0; $i < $lengthFunction($compare); $i++) {
            $result |= ord($compare[$i]) ^ ord($against[$i]);
        }
        
        return $result == 0;
    }
    
    /**
     * StringHelper::random()
     * 
     * @param integer $length
     * @param bool $lowerCaseOnly
     * @param bool $lettersOnly
     * @param bool $numbersOnly
     * @return string
     */
    public static function random($length = 13, $lowerCaseOnly = false, $lettersOnly = false, $numbersOnly = false)
    {
        $pool = '';
        
        if (!$lettersOnly || $numbersOnly) {
            $pool .= '0123456789';
        }
        
        if (!$numbersOnly) {
            $pool .= 'abcdefghjklmnopqrstvwxyz';    
        }

        if (!$lowerCaseOnly && !$numbersOnly) {
            $pool .= 'ABCDEFGHJKLMNOPQRSTVWXYZ';
        }
        
        if (empty($pool)) {
            $pool = '0123456789abcdefghjklmnopqrstvwxyzABCDEFGHJKLMNOPQRSTVWXYZ';
        }

        $str = '';
        for ($i=0; $i < $length; $i++) {
            $str .= substr($pool, rand(0, strlen($pool) -1), 1);
        }
        return $str;
    }
    
    /**
     * StringHelper::truncateLength()
     * 
     * @param string $string
     * @param integer $length
     * @param string $elipse
     * @return string
     */
    public static function truncateLength($string, $length = 100, $elipse = '...')
    {
        $length = (int)$length;
        $string = strip_tags(CHtml::decode($string));
        $strlen = function_exists('mb_strlen') ? 'mb_strlen' : 'strlen';
        $substr = function_exists('mb_substr') ? 'mb_substr' : 'substr';
        if ($strlen($string) - $strlen($elipse) >= $length) {
            return $substr($string, 0, $length) . $elipse;
        }
        return $string;
    }
    
    /**
     * StringHelper::getTagFromString()
     * 
     * @param string $string
     * @return string
     */
    public static function getTagFromString($string)
    {
        $substr = function_exists('mb_substr') ? 'mb_substr' : 'substr';
        $tagName = $substr($string, 0, 50);
        $tagName = preg_replace('/[^a-z0-9\s_]/six', '', $string);
        $tagName = preg_replace('/\s{2,}/', ' ', $tagName);
        $tagName = preg_replace('/_{2,}/', ' ', $tagName);
        $tagName = strtoupper($tagName);
        $tagName = str_replace('  ', ' ', $tagName);
        $tagName = str_replace(' ', '_', $tagName);
        $tagName = trim($tagName, ' _');
        
        return $tagName;
    }
    
    /**
     * StringHelper::uniqid()
     * 
     * I had a few collisions with uniqid() and decided to create my own, hopefully a bit better.
     * 
     * @param mixed $prefix
     * @param bool $moreEntropy
     * @return string
     */
    public static function uniqid($prefix = null, $moreEntropy = false) 
    {
        $uniqid = self::random(2, true, true) . substr(uniqid('', true), -3). self::random(5, true) . substr(uniqid(), -3);
        
        if (!empty($prefix)) {
            $uniqid = $prefix . $uniqid;
        }
        
        if (!empty($moreEntropy)) {
            $uniqid .= '.' . self::random(12, false, false, true);
        }
        
        return $uniqid;
    }
    
    /**
     * StringHelper::fixFileEncoding()
     * 
     * @param mixed $filePath
     * @return mixed
     */
    public static function fixFileEncoding($filePath) 
    {
        if (!is_file($filePath)) {
            return false;
        }
        
        if (!($handle = @fopen($filePath, 'r'))) {
            return false;
        }
        
        $sample = '';
        $line = 1;
        while (($buffer = @fgets($handle, 4096)) !== false && $line < 500) {
            $sample .= $buffer;
            $line++;
        }
        fclose($handle);
        
        // is utf-8 check 1
        if (mb_check_encoding($sample, 'UTF-8')) {
            return true;
        }
        
        // is utf-8 check 2
        if (self::isUtf8($sample)) {
            return true;
        }
        
        $encodingList = array(
            "UTF-8", "UTF-32", "UTF-32BE", "UTF-32LE", 
            "UTF-16", "UTF-16BE", "UTF-16LE", "ISO-8859-1", "WINDOWS-1252", "ASCII"
        );
        
        $encoding = mb_detect_encoding($sample, $encodingList, true);
        if ($encoding === 'UTF-8') {
            return true;
        }
        
        if (empty($encoding)) {
            return false; // what to do here?
        }
        
        if (!is_writable($filePath)) {
            return false;
        }
        
        if (!($input = @file_get_contents($filePath))) {
            return false;
        }

        $input = mb_convert_encoding($input, "UTF-8", $encoding);
        return @file_put_contents($filePath, $input);
    }
    
    /**
     * StringHelper::isUtf8()
     * 
     * @param mixed $string
     * @return bool
     */
    public static function isUtf8($string)
    {
        // http://www.php.net/manual/en/function.mb-detect-encoding.php#68607
        return preg_match('%(?:
            [\xC2-\xDF][\x80-\xBF]                      # non-overlong 2-byte
            |\xE0[\xA0-\xBF][\x80-\xBF]                 # excluding overlongs
            |[\xE1-\xEC\xEE\xEF][\x80-\xBF]{2}          # straight 3-byte
            |\xED[\x80-\x9F][\x80-\xBF]                 # excluding surrogates
            |\xF0[\x90-\xBF][\x80-\xBF]{2}              # planes 1-3
            |[\xF1-\xF3][\x80-\xBF]{3}                  # planes 4-15
            |\xF4[\x80-\x8F][\x80-\xBF]{2}              # plane 16
            )+%xs', $string);
    }
    
    /**
     * StringHelper::decodeSurroundingTags()
     * 
     * @param mixed $content
     * @return string
     */
    public static function decodeSurroundingTags($content)
    {
        return str_replace(array(urlencode('['), urlencode(']')), array('[', ']'), $content);
    }
    
    /**
     * StringHelper::normalizeTranslationString()
     * 
     * @since 1.1
     * @param string $str
     * @return string
     */
    public static function normalizeTranslationString($str) 
    {
        $str = trim(str_replace(array("\r\n", "\n", "\t", "\r"), ' ', $str));
        return preg_replace('/\s{1,}/', ' ', $str);
    }
}