<?php
/**
 *  global.func.php 公共函式庫
 */

/**
 * 返回經addslashes處理過的字串或陣列
 * @param $string 需要處理的字串或陣列
 * @return mixed
 */
function new_addslashes($string){
    if(!is_array($string)) return addslashes($string);
    foreach($string as $key => $val) $string[$key] = new_addslashes($val);
    return $string;
}

/**
 * 返回經stripslashes處理過的字串或陣列
 * @param $string 需要處理的字串或陣列
 * @return mixed
 */
function new_stripslashes($string) {
    if(!is_array($string)) return stripslashes($string);
    foreach($string as $key => $val) $string[$key] = new_stripslashes($val);
    return $string;
}

/**
 * 返回經htmlspecialchars處理過的字串或陣列
 * @param $obj 需要處理的字串或陣列
 * @return mixed
 */
function new_html_special_chars($string) {
    $encoding = 'utf-8';
    if(strtolower(CHARSET)=='gbk') $encoding = 'ISO-8859-15';
    if(!is_array($string)) return htmlspecialchars($string,ENT_QUOTES,$encoding);
    foreach($string as $key => $val) $string[$key] = new_html_special_chars($val);
    return $string;
}

function new_html_entity_decode($string) {
    $encoding = 'utf-8';
    if(strtolower(CHARSET)=='gbk') $encoding = 'ISO-8859-15';
    return html_entity_decode($string,ENT_QUOTES,$encoding);
}

function new_htmlentities($string) {
    $encoding = 'utf-8';
    if(strtolower(CHARSET)=='gbk') $encoding = 'ISO-8859-15';
    return htmlentities($string,ENT_QUOTES,$encoding);
}

/**
 * 安全過濾函式
 *
 * @param $string
 * @return string
 */
function safe_replace($string) {
    $string = str_replace('%20','',$string);
    $string = str_replace('%27','',$string);
    $string = str_replace('%2527','',$string);
    $string = str_replace('*','',$string);
    $string = str_replace('"','&quot;',$string);
    $string = str_replace("'",'',$string);
    $string = str_replace('"','',$string);
    $string = str_replace(';','',$string);
    $string = str_replace('<','&lt;',$string);
    $string = str_replace('>','&gt;',$string);
    $string = str_replace("{",'',$string);
    $string = str_replace('}','',$string);
    $string = str_replace('\\','',$string);
    return $string;
}

/**
 * xss過濾函式
 *
 * @param $string
 * @return string
 */
function remove_xss($string) {
    $string = preg_replace('/[\x00-\x08\x0B\x0C\x0E-\x1F\x7F]+/S', '', $string);

    $parm1 = Array('javascript', 'vbscript', 'expression', 'applet', 'meta', 'xml', 'blink', 'link', 'script', 'embed', 'object', 'iframe', 'frame', 'frameset', 'ilayer', 'layer', 'bgsound', 'title', 'base');

    $parm2 = Array('onabort', 'onactivate', 'onafterprint', 'onafterupdate', 'onbeforeactivate', 'onbeforecopy', 'onbeforecut', 'onbeforedeactivate', 'onbeforeeditfocus', 'onbeforepaste', 'onbeforeprint', 'onbeforeunload', 'onbeforeupdate', 'onblur', 'onbounce', 'oncellchange', 'onchange', 'onclick', 'oncontextmenu', 'oncontrolselect', 'oncopy', 'oncut', 'ondataavailable', 'ondatasetchanged', 'ondatasetcomplete', 'ondblclick', 'ondeactivate', 'ondrag', 'ondragend', 'ondragenter', 'ondragleave', 'ondragover', 'ondragstart', 'ondrop', 'onerror', 'onerrorupdate', 'onfilterchange', 'onfinish', 'onfocus', 'onfocusin', 'onfocusout', 'onhelp', 'onkeydown', 'onkeypress', 'onkeyup', 'onlayoutcomplete', 'onload', 'onlosecapture', 'onmousedown', 'onmouseenter', 'onmouseleave', 'onmousemove', 'onmouseout', 'onmouseover', 'onmouseup', 'onmousewheel', 'onmove', 'onmoveend', 'onmovestart', 'onpaste', 'onpropertychange', 'onreadystatechange', 'onreset', 'onresize', 'onresizeend', 'onresizestart', 'onrowenter', 'onrowexit', 'onrowsdelete', 'onrowsinserted', 'onscroll', 'onselect', 'onselectionchange', 'onselectstart', 'onstart', 'onstop', 'onsubmit', 'onunload');

    $parm = array_merge($parm1, $parm2);

    for ($i = 0; $i < sizeof($parm); $i++) {
        $pattern = '/';
        for ($j = 0; $j < strlen($parm[$i]); $j++) {
            if ($j > 0) {
                $pattern .= '(';
                $pattern .= '(&#[x|X]0([9][a][b]);?)?';
                $pattern .= '|(&#0([9][10][13]);?)?';
                $pattern .= ')?';
            }
            $pattern .= $parm[$i][$j];
        }
        $pattern .= '/i';
        $string = preg_replace($pattern, ' ', $string);
    }
    return $string;
}

/**
 * 過濾ASCII碼從0-28的控制字元
 * @return String
 */
function trim_unsafe_control_chars($str) {
    $rule = '/[' . chr ( 1 ) . '-' . chr ( 8 ) . chr ( 11 ) . '-' . chr ( 12 ) . chr ( 14 ) . '-' . chr ( 31 ) . ']*/';
    return str_replace ( chr ( 0 ), '', preg_replace ( $rule, '', $str ) );
}

/**
 * 格式化文字域內容
 *
 * @param $string 文字域內容
 * @return string
 */
function trim_textarea($string) {
    $string = nl2br ( str_replace ( ' ', '&nbsp;', $string ) );
    return $string;
}

/**
 * 將文字格式成適合js輸出的字串
 * @param string $string 需要處理的字串
 * @param intval $isjs 是否執行字串格式化，預設為執行
 * @return string 處理後的字串
 */
function format_js($string, $isjs = 1) {
    $string = addslashes(str_replace(array("\r", "\n", "\t"), array('', '', ''), $string));
    return $isjs ? 'document.write("'.$string.'");' : $string;
}

/**
 * 轉義 javascript 程式碼標記
 *
 * @param $str
 * @return mixed
 */
 function trim_script($str) {
    if(is_array($str)){
        foreach ($str as $key => $val){
            $str[$key] = trim_script($val);
        }
     }else{
         $str = preg_replace ( '/\<([\/]?)script([^\>]*?)\>/si', '&lt;\\1script\\2&gt;', $str );
        $str = preg_replace ( '/\<([\/]?)iframe([^\>]*?)\>/si', '&lt;\\1iframe\\2&gt;', $str );
        $str = preg_replace ( '/\<([\/]?)frame([^\>]*?)\>/si', '&lt;\\1frame\\2&gt;', $str );
        $str = str_replace ( 'javascript:', 'javascript：', $str );
     }
    return $str;
}
/**
 * 獲取當前頁面完整URL地址
 */
function get_url() {
    $sys_protocal = isset($_SERVER['SERVER_PORT']) && $_SERVER['SERVER_PORT'] == '443' ? 'https://' : 'http://';
    $php_self = $_SERVER['PHP_SELF'] ? safe_replace($_SERVER['PHP_SELF']) : safe_replace($_SERVER['SCRIPT_NAME']);
    $path_info = isset($_SERVER['PATH_INFO']) ? safe_replace($_SERVER['PATH_INFO']) : '';
    $relate_url = isset($_SERVER['REQUEST_URI']) ? safe_replace($_SERVER['REQUEST_URI']) : $php_self.(isset($_SERVER['QUERY_STRING']) ? '?'.safe_replace($_SERVER['QUERY_STRING']) : $path_info);
    return $sys_protocal.(isset($_SERVER['HTTP_HOST']) ? $_SERVER['HTTP_HOST'] : '').$relate_url;
}
/**
 * 字元擷取 支援UTF8/GBK
 * @param $string
 * @param $length
 * @param $dot
 */
function str_cut($string, $length, $dot = '...') {
    $strlen = strlen($string);
    if($strlen <= $length) return $string;
    $string = str_replace(array(' ','&nbsp;', '&amp;', '&quot;', '&#039;', '&ldquo;', '&rdquo;', '&mdash;', '&lt;', '&gt;', '&middot;', '&hellip;'), array('∵',' ', '&', '"', "'", '“', '”', '—', '<', '>', '·', '…'), $string);
    $strcut = '';
    if(strtolower(CHARSET) == 'utf-8') {
        $length = intval($length-strlen($dot)-$length/3);
        $n = $tn = $noc = 0;
        while($n < strlen($string)) {
            $t = ord($string[$n]);
            if($t == 9 || $t == 10 || (32 <= $t && $t <= 126)) {
                $tn = 1; $n++; $noc++;
            } elseif(194 <= $t && $t <= 223) {
                $tn = 2; $n += 2; $noc += 2;
            } elseif(224 <= $t && $t <= 239) {
                $tn = 3; $n += 3; $noc += 2;
            } elseif(240 <= $t && $t <= 247) {
                $tn = 4; $n += 4; $noc += 2;
            } elseif(248 <= $t && $t <= 251) {
                $tn = 5; $n += 5; $noc += 2;
            } elseif($t == 252 || $t == 253) {
                $tn = 6; $n += 6; $noc += 2;
            } else {
                $n++;
            }
            if($noc >= $length) {
                break;
            }
        }
        if($noc > $length) {
            $n -= $tn;
        }
        $strcut = substr($string, 0, $n);
        $strcut = str_replace(array('∵', '&', '"', "'", '“', '”', '—', '<', '>', '·', '…'), array(' ', '&amp;', '&quot;', '&#039;', '&ldquo;', '&rdquo;', '&mdash;', '&lt;', '&gt;', '&middot;', '&hellip;'), $strcut);
    } else {
        $dotlen = strlen($dot);
        $maxi = $length - $dotlen - 1;
        $current_str = '';
        $search_arr = array('&',' ', '"', "'", '“', '”', '—', '<', '>', '·', '…','∵');
        $replace_arr = array('&amp;','&nbsp;', '&quot;', '&#039;', '&ldquo;', '&rdquo;', '&mdash;', '&lt;', '&gt;', '&middot;', '&hellip;',' ');
        $search_flip = array_flip($search_arr);
        for ($i = 0; $i < $maxi; $i++) {
            $current_str = ord($string[$i]) > 127 ? $string[$i].$string[++$i] : $string[$i];
            if (in_array($current_str, $search_arr)) {
                $key = $search_flip[$current_str];
                $current_str = str_replace($search_arr[$key], $replace_arr[$key], $current_str);
            }
            $strcut .= $current_str;
        }
    }
    return $strcut.$dot;
}



/**
 * 獲取請求ip
 *
 * @return ip地址
 */
function ip() {
    if(getenv('HTTP_CLIENT_IP') && strcasecmp(getenv('HTTP_CLIENT_IP'), 'unknown')) {
        $ip = getenv('HTTP_CLIENT_IP');
    } elseif(getenv('HTTP_X_FORWARDED_FOR') && strcasecmp(getenv('HTTP_X_FORWARDED_FOR'), 'unknown')) {
        $ip = getenv('HTTP_X_FORWARDED_FOR');
    } elseif(getenv('REMOTE_ADDR') && strcasecmp(getenv('REMOTE_ADDR'), 'unknown')) {
        $ip = getenv('REMOTE_ADDR');
    } elseif(isset($_SERVER['REMOTE_ADDR']) && $_SERVER['REMOTE_ADDR'] && strcasecmp($_SERVER['REMOTE_ADDR'], 'unknown')) {
        $ip = $_SERVER['REMOTE_ADDR'];
    }
    return preg_match ( '/[\d\.]{7,15}/', $ip, $matches ) ? $matches [0] : '';
}

function get_cost_time() {
    $microtime = microtime ( TRUE );
    return $microtime - SYS_START_TIME;
}
/**
 * 程式執行時間
 *
 * @return    int    單位ms
 */
function execute_time() {
    $stime = explode ( ' ', SYS_START_TIME );
    $etime = explode ( ' ', microtime () );
    return number_format ( ($etime [1] + $etime [0] - $stime [1] - $stime [0]), 6 );
}


/**
* 將字串轉換為陣列
*
* @param    string    $data    字串
* @return    array    返回陣列格式，如果，data為空，則返回空陣列
*/
function string2array($data) {
    if($data == '') return array();
    $data = stripslashes($data);
    @eval("\$array = $data;");
    return $array;
}
/**
* 將陣列轉換為字串
*
* @param    array    $data        陣列
* @param    bool    $isformdata    如果為0，則不使用new_stripslashes處理，可選引數，預設為1
* @return    string    返回字串，如果，data為空，則返回空
*/
function array2string($data, $isformdata = 1) {
    if($data == '') return '';
    if($isformdata) $data = new_stripslashes($data);
    return addslashes(var_export($data, TRUE));
}

/**
* 轉換位元組數為其他單位
*
*
* @param    string    $filesize    位元組大小
* @return    string    返回大小
*/
function sizecount($filesize) {
    if ($filesize >= 1073741824) {
        $filesize = round($filesize / 1073741824 * 100) / 100 .' GB';
    } elseif ($filesize >= 1048576) {
        $filesize = round($filesize / 1048576 * 100) / 100 .' MB';
    } elseif($filesize >= 1024) {
        $filesize = round($filesize / 1024 * 100) / 100 . ' KB';
    } else {
        $filesize = $filesize.' Bytes';
    }
    return $filesize;
}
/**
* 字串加密、解密函式
*
*
* @param    string    $txt        字串
* @param    string    $operation    ENCODE為加密，DECODE為解密，可選引數，預設為ENCODE，
* @param    string    $key        金鑰：數字、字母、下劃線
* @param    string    $expiry        過期時間
* @return    string
*/
function sys_auth($string, $operation = 'ENCODE', $key = '', $expiry = 0) {
    $key_length = 4;
    $key = md5($key != '' ? $key : app_base::load_config('system', 'auth_key'));
    $fixedkey = md5($key);
    $egiskeys = md5(substr($fixedkey, 16, 16));
    $runtokey = $key_length ? ($operation == 'ENCODE' ? substr(md5(microtime(true)), -$key_length) : substr($string, 0, $key_length)) : '';
    $keys = md5(substr($runtokey, 0, 16) . substr($fixedkey, 0, 16) . substr($runtokey, 16) . substr($fixedkey, 16));
    $string = $operation == 'ENCODE' ? sprintf('%010d', $expiry ? $expiry + time() : 0).substr(md5($string.$egiskeys), 0, 16) . $string : base64_decode(substr($string, $key_length));

    $i = 0; $result = '';
    $string_length = strlen($string);
    for ($i = 0; $i < $string_length; $i++){
        $result .= chr(ord($string{$i}) ^ ord($keys{$i % 32}));
    }
    if($operation == 'ENCODE') {
        return $runtokey . str_replace('=', '', base64_encode($result));
    } else {
        if((substr($result, 0, 10) == 0 || substr($result, 0, 10) - time() > 0) && substr($result, 10, 16) == substr(md5(substr($result, 26).$egiskeys), 0, 16)) {
            return substr($result, 26);
        } else {
            return '';
        }
    }
}
/**
* 語言檔案處理
*
* @param    string        $language    標示符
* @param    array        $pars    轉義的陣列,二維陣列 ,'key1'=>'value1','key2'=>'value2',
* @param    string        $modules 多個模組之間用半形逗號隔開，如：member,guestbook
* @return    string        語言字元
*/
function L($language = 'no_language',$pars = array(), $modules = '') {
    static $LANG = array();
    static $LANG_MODULES = array();
    static $lang = '';
    if(defined('IN_ADMIN')) {
        $lang = SYS_STYLE ? SYS_STYLE : 'zh-cn';
    } else {
        $lang = app_base::load_config('system','lang');
    }
    if(!$LANG) {
        require_once CODE_PATH.'languages'.DIRECTORY_SEPARATOR.$lang.DIRECTORY_SEPARATOR.'system.lang.php';
        if(defined('IN_ADMIN')) require_once CODE_PATH.'languages'.DIRECTORY_SEPARATOR.$lang.DIRECTORY_SEPARATOR.'system_menu.lang.php';
        if(file_exists(CODE_PATH.'languages'.DIRECTORY_SEPARATOR.$lang.DIRECTORY_SEPARATOR.ROUTE_M.'.lang.php')) require_once CODE_PATH.'languages'.DIRECTORY_SEPARATOR.$lang.DIRECTORY_SEPARATOR.ROUTE_M.'.lang.php';
    }
    if(!empty($modules)) {
        $modules = explode(',',$modules);
        foreach($modules AS $m) {
            if(!isset($LANG_MODULES[$m])) require_once CODE_PATH.'languages'.DIRECTORY_SEPARATOR.$lang.DIRECTORY_SEPARATOR.$m.'.lang.php';
        }
    }
    if(!array_key_exists($language,$LANG)) {
        return $language;
    } else {
        $language = $LANG[$language];
        if($pars) {
            foreach($pars AS $_k=>$_v) {
                $language = str_replace('{'.$_k.'}',$_v,$language);
            }
        }
        return $language;
    }
}

/**
 * 模板呼叫
 *
 * @param $module
 * @param $template
 * @param $istag
 * @return unknown_type
 */
function template($module = 'content', $template = 'index', $style = '') {

    if(strpos($module, 'plugin/')!== false) {
        $plugin = str_replace('plugin/', '', $module);
        return p_template($plugin, $template,$style);
    }
    $module = str_replace('/', DIRECTORY_SEPARATOR, $module);
    if(!empty($style) && preg_match('/([a-z0-9\-_]+)/is',$style)) {
    } elseif (empty($style) && !defined('STYLE')) {
        if(defined('SITEID')) {
            $siteid = SITEID;
        } else {
            $siteid = param::get_cookie('siteid');
        }
        if (!$siteid) $siteid = 1;
        $sitelist = getcache('sitelist','commons');
        if(!empty($siteid)) {
            $style = $sitelist[$siteid]['default_style'];
        }
    } elseif (empty($style) && defined('STYLE')) {
        $style = STYLE;
    } else {
        $style = 'default';
    }
    if(!$style) $style = 'default';
    $template_cache = app_base::load_sys_class('template_cache');
    $compiledtplfile = ROOT_PATH.'caches'.DIRECTORY_SEPARATOR.'caches_template'.DIRECTORY_SEPARATOR.$style.DIRECTORY_SEPARATOR.$module.DIRECTORY_SEPARATOR.$template.'.php';
    if(file_exists(CODE_PATH.'templates'.DIRECTORY_SEPARATOR.$style.DIRECTORY_SEPARATOR.$module.DIRECTORY_SEPARATOR.$template.'.html')) {
        if(!file_exists($compiledtplfile) || (@filemtime(CODE_PATH.'templates'.DIRECTORY_SEPARATOR.$style.DIRECTORY_SEPARATOR.$module.DIRECTORY_SEPARATOR.$template.'.html') > @filemtime($compiledtplfile))) {
            $template_cache->template_compile($module, $template, $style);
        }
    } else {
        $compiledtplfile = ROOT_PATH.'caches'.DIRECTORY_SEPARATOR.'caches_template'.DIRECTORY_SEPARATOR.'default'.DIRECTORY_SEPARATOR.$module.DIRECTORY_SEPARATOR.$template.'.php';
        if(!file_exists($compiledtplfile) || (file_exists(CODE_PATH.'templates'.DIRECTORY_SEPARATOR.'default'.DIRECTORY_SEPARATOR.$module.DIRECTORY_SEPARATOR.$template.'.html') && filemtime(CODE_PATH.'templates'.DIRECTORY_SEPARATOR.'default'.DIRECTORY_SEPARATOR.$module.DIRECTORY_SEPARATOR.$template.'.html') > filemtime($compiledtplfile))) {
            $template_cache->template_compile($module, $template, 'default');
        } elseif (!file_exists(CODE_PATH.'templates'.DIRECTORY_SEPARATOR.'default'.DIRECTORY_SEPARATOR.$module.DIRECTORY_SEPARATOR.$template.'.html')) {
            showmessage('Template does not exist.'.DIRECTORY_SEPARATOR.$style.DIRECTORY_SEPARATOR.$module.DIRECTORY_SEPARATOR.$template.'.html');
        }
    }
    return $compiledtplfile;
}

/**
 * 輸出自定義錯誤
 *
 * @param $errno 錯誤號
 * @param $errstr 錯誤描述
 * @param $errfile 報錯檔案地址
 * @param $errline 錯誤行號
 * @return string 錯誤提示
 */

function my_error_handler($errno, $errstr, $errfile, $errline) {
    if($errno==8) return '';
    $errfile = str_replace(ROOT_PATH,'',$errfile);
    if(app_base::load_config('system','errorlog')) {
        error_log('<?php exit;?>'.date('m-d H:i:s',SYS_TIME).' | '.$errno.' | '.str_pad($errstr,30).' | '.$errfile.' | '.$errline."\r\n", 3, CACHE_PATH.'error_log.php');
    } else {
        $str = '<div style="font-size:12px;text-align:left; border-bottom:1px solid #9cc9e0; border-right:1px solid #9cc9e0;padding:1px 4px;color:#000000;font-family:Arial, Helvetica,sans-serif;"><span>errorno:' . $errno . ',str:' . $errstr . ',file:<font color="blue">' . $errfile . '</font>,line' . $errline .'<br />Need Help?</span></div>';
        echo $str;
    }
}

/**
 * 提示資訊頁面跳轉，跳轉地址如果傳入陣列，頁面會提示多個地址供使用者選擇，預設跳轉地址為陣列的第一個值，時間為5秒。
 * showmessage('登入成功', array('預設跳轉地址'=>'http://www.baidu.com'));
 * @param string $msg 提示資訊
 * @param mixed(string/array) $url_forward 跳轉地址
 * @param int $ms 跳轉等待時間
 */
function showmessage($msg, $url_forward = 'goback', $ms = 1250, $dialog = '', $returnjs = '') {
    if(defined('IN_ADMIN')) {
        include(admin::admin_tpl('showmessage', 'admin'));
    } else {
        include(template('content', 'message'));
    }
    exit;
}
/**
 * 查詢字元是否存在於某字串
 *
 * @param $haystack 字串
 * @param $needle 要查詢的字元
 * @return bool
 */
function str_exists($haystack, $needle)
{
    return !(strpos($haystack, $needle) === FALSE);
}

/**
 * 取得檔案擴充套件
 *
 * @param $filename 檔名
 * @return 副檔名
 */
function fileext($filename) {
    return strtolower(trim(substr(strrchr($filename, '.'), 1, 10)));
}

/**
 * 載入模板標籤快取
 * @param string $name 快取名
 * @param integer $times 快取時間
 */
function tpl_cache($name,$times = 0) {
    $filepath = 'tpl_data';
    $info = getcacheinfo($name, $filepath);
    if (SYS_TIME - $info['filemtime'] >= $times) {
        return false;
    } else {
        return getcache($name,$filepath);
    }
}

/**
 * 寫入快取，預設為檔案快取，不載入快取配置。
 * @param $name 快取名稱
 * @param $data 快取資料
 * @param $filepath 資料路徑（模組名稱） caches/cache_$filepath/
 * @param $type 快取型別[file,memcache,apc]
 * @param $config 配置名稱
 * @param $timeout 過期時間
 */
function setcache($name, $data, $filepath='', $type='file', $config='', $timeout=0) {
    app_base::load_sys_class('cache_factory','',0);
    if($config) {
        $cacheconfig = app_base::load_config('cache');
        $cache = cache_factory::get_instance($cacheconfig)->get_cache($config);
    } else {
        $cache = cache_factory::get_instance()->get_cache($type);
    }

    return $cache->set($name, $data, $timeout, '', $filepath);
}

/**
 * 讀取快取，預設為檔案快取，不載入快取配置。
 * @param string $name 快取名稱
 * @param $filepath 資料路徑（模組名稱） caches/cache_$filepath/
 * @param string $config 配置名稱
 */
function getcache($name, $filepath='', $type='file', $config='') {
    app_base::load_sys_class('cache_factory','',0);
    if($config) {
        $cacheconfig = app_base::load_config('cache');
        $cache = cache_factory::get_instance($cacheconfig)->get_cache($config);
    } else {
        $cache = cache_factory::get_instance()->get_cache($type);
    }
    return $cache->get($name, '', '', $filepath);
}
//根據行政區劃數字獲取對應名稱名稱  如 110101 得到 北京市東城區
function get_div($div='')
{
    if(empty($div)){
        return false;
    }
    $regioncode = getcache('1','linkage');
    if($regioncode)
    {
        $l1=substr($div,0,2).'0000';
        $L1_n=$regioncode['data'][$l1]['name'];
        $tb=array('110000','120000','310000','500000');
        if(in_array($l1,$tb)){
            $l2 = $l1=substr($div,0,2)."0000-r";
        }else{
            $l2 = substr($div,0,4)."00";
        }
        $L2_n =  $regioncode['data'][$l2]['name'];
        $L3_n =  $regioncode['data'][$div]['name'];
        if($L2_n===$L1_n){
            $res_div = $L1_n.$L3_n;
        }else{
            $res_div = $L1_n.$L2_n.$L3_n;
        }
        return $res_div;
    }else{
        return '無行政區劃地址';
    }
}

//根據行業型別數字獲取對應名稱名稱  如 $trade=‘1A0112’ 得到 農、林、牧、漁業-農業-穀物及其他作物的種植-薯類的種植
function get_trade_category($trade=''){
    if(empty($trade)){
        return false;
    }
    $trade_category = getcache('3','linkage');
    if($trade_category){
        $t1=substr($trade,0,2);
        $T_1=$trade_category['data'][$t1]['name']?$trade_category['data'][$t1]['name']:'';
        $t2=substr($trade,0,4);
        $T_2=$trade_category['data'][$t2]['name']?$trade_category['data'][$t2]['name']:'';
        $t3=substr($trade,0,5);
        $T_3=$trade_category['data'][$t3]['name']?$trade_category['data'][$t3]['name']:'';
        $T_4=$trade_category['data'][$trade]['name']?$trade_category['data'][$trade]['name']:'';
        if($T_3===$T_4){
            $res_trade = $T_1.'-'.$T_2.'-'.$T_3;
        }else{
            $res_trade = $T_1.'-'.$T_2.'-'.$T_3.'-'.$T_4;
        }
        if(empty($res_trade)){
            return '行業型別資料不存在';
        }
        return $res_trade;

    }else{
        return '行業型別資料不存在';
    }
}

/**
 * 刪除快取，預設為檔案快取，不載入快取配置。
 * @param $name 快取名稱
 * @param $filepath 資料路徑（模組名稱） caches/cache_$filepath/
 * @param $type 快取型別[file,memcache,apc]
 * @param $config 配置名稱
 */
function delcache($name, $filepath='', $type='file', $config='') {
    app_base::load_sys_class('cache_factory','',0);
    if($config) {
        $cacheconfig = app_base::load_config('cache');
        $cache = cache_factory::get_instance($cacheconfig)->get_cache($config);
    } else {
        $cache = cache_factory::get_instance()->get_cache($type);
    }
    return $cache->delete($name, '', '', $filepath);
}

/**
 * 讀取快取，預設為檔案快取，不載入快取配置。
 * @param string $name 快取名稱
 * @param $filepath 資料路徑（模組名稱） caches/cache_$filepath/
 * @param string $config 配置名稱
 */
function getcacheinfo($name, $filepath='', $type='file', $config='') {
    app_base::load_sys_class('cache_factory');
    if($config) {
        $cacheconfig = app_base::load_config('cache');
        $cache = cache_factory::get_instance($cacheconfig)->get_cache($config);
    } else {
        $cache = cache_factory::get_instance()->get_cache($type);
    }
    return $cache->cacheinfo($name, '', '', $filepath);
}

/**
 * 生成sql語句，如果傳入$in_cloumn 生成格式為 IN('a', 'b', 'c')
 * @param $data 條件陣列或者字串
 * @param $front 連線符
 * @param $in_column 欄位名稱
 * @return string
 */
function to_sqls($data, $front = ' AND ', $in_column = false) {
    if($in_column && is_array($data)) {
        $ids = '\''.implode('\',\'', $data).'\'';
        $sql = "$in_column IN ($ids)";
        return $sql;
    } else {
        if ($front == '') {
            $front = ' AND ';
        }
        if(is_array($data) && count($data) > 0) {
            $sql = '';
            foreach ($data as $key => $val) {
                $sql .= $sql ? " $front $key = '$val' " : " $key = '$val' ";
            }
            return $sql;
        } else {
            return $data;
        }
    }
}

/**
 * 分頁函式
 *
 * @param $num 資訊總數
 * @param $curr_page 當前分頁
 * @param $perpage 每頁顯示數
 * @param $urlrule URL規則
 * @param $array 需要傳遞的陣列，用於增加額外的方法
 * @return 分頁
 */
function pages($num, $curr_page, $perpage = 20, $urlrule = '', $array = array(),$setpages = 10) {
    if(defined('URLRULE') && $urlrule == '') {
        $urlrule = URLRULE;
        $array = $GLOBALS['URL_ARRAY'];
    } elseif($urlrule == '') {
        $urlrule = url_par('page={$page}');
    }
    $multipage = '';
    if($num > $perpage) {
        $page = $setpages+1;
        $offset = ceil($setpages/2-1);
        $pages = ceil($num / $perpage);
        if (defined('IN_ADMIN') && !defined('PAGES')) define('PAGES', $pages);
        $from = $curr_page - $offset;
        $to = $curr_page + $offset;
        $more = 0;
        if($page >= $pages) {
            $from = 2;
            $to = $pages-1;
        } else {
            if($from <= 1) {
                $to = $page-1;
                $from = 2;
            }  elseif($to >= $pages) {
                $from = $pages-($page-2);
                $to = $pages-1;
            }
            $more = 1;
        }
        //$multipage .= '<a class="a1">'.$num.L('page_item').'</a>';
        if($curr_page>0) {
            $multipage .= ' <a href="'.pageurl($urlrule, $curr_page-1, $array).'" class="a1">'.L('previous').'</a>';
            if($curr_page==1) {
                $multipage .= ' <span>1</span>';
            } elseif($curr_page>6 && $more) {
                $multipage .= ' <a href="'.pageurl($urlrule, 1, $array).'">1</a>..';
            } else {
                $multipage .= ' <a href="'.pageurl($urlrule, 1, $array).'">1</a>';
            }
        }
        for($i = $from; $i <= $to; $i++) {
            if($i != $curr_page) {
                $multipage .= ' <a href="'.pageurl($urlrule, $i, $array).'">'.$i.'</a>';
            } else {
                $multipage .= ' <span>'.$i.'</span>';
            }
        }
        if($curr_page<$pages) {
            if($curr_page<$pages-5 && $more) {
                $multipage .= ' ..<a href="'.pageurl($urlrule, $pages, $array).'">'.$pages.'</a> <a href="'.pageurl($urlrule, $curr_page+1, $array).'" class="a1">'.L('next').'</a>';
            } else {
                $multipage .= ' <a href="'.pageurl($urlrule, $pages, $array).'">'.$pages.'</a> <a href="'.pageurl($urlrule, $curr_page+1, $array).'" class="a1">'.L('next').'</a>';
            }
        } elseif($curr_page==$pages) {
            $multipage .= ' <span>'.$pages.'</span> <a href="'.pageurl($urlrule, $curr_page, $array).'" class="a1">'.L('next').'</a>';
        } else {
            $multipage .= ' <a href="'.pageurl($urlrule, $pages, $array).'">'.$pages.'</a> <a href="'.pageurl($urlrule, $curr_page+1, $array).'" class="a1">'.L('next').'</a>';
        }
    }
    return $multipage;
}

function pages1($num, $curr_page, $perpage = 20, $urlrule = '', $array = array(),$setpages = 10) {
    if(defined('URLRULE') && $urlrule == '') {
        $urlrule = URLRULE;
        $array = $GLOBALS['URL_ARRAY'];
    } elseif($urlrule == '') {
        $urlrule = url_par('page={$page}');
    }
    $multipage = '';
    if($num > $perpage) {
        $page = $setpages+1;
        $offset = ceil($setpages/2-1);
        $pages = ceil($num / $perpage);
        if (defined('IN_ADMIN') && !defined('PAGES')) define('PAGES', $pages);
        $from = $curr_page - $offset;
        $to = $curr_page + $offset;
        $more = 0;
        if($page >= $pages) {
            $from = 2;
            $to = $pages-1;
        } else {
            if($from <= 1) {
                $to = $page-1;
                $from = 2;
            }  elseif($to >= $pages) {
                $from = $pages-($page-2);
                $to = $pages-1;
            }
            $more = 1;
        }
        //$multipage .= '<a class="a1">'.$num.L('page_item').'</a>';
        if($curr_page>0) {
            $multipage .= ' <a href="###" onclick="$(\'#page\').val('.($curr_page-1).');$(\'#pageform\').submit();" class="a1">'.L('previous').'</a>';
            if($curr_page==1) {
                $multipage .= ' <span>1</span>';
            } elseif($curr_page>6 && $more) {
                $multipage .= ' <a href="###" onclick="$(\'#page\').val(1);$(\'#pageform\').submit();">1</a>..';
            } else {
                $multipage .= ' <a href="###" onclick="$(\'#page\').val(1);$(\'#pageform\').submit();">1</a>';
            }
        }
        for($i = $from; $i <= $to; $i++) {
            if($i != $curr_page) {
                $multipage .= ' <a href="###" onclick="$(\'#page\').val('.$i.');$(\'#pageform\').submit();">'.$i.'</a>';
            } else {
                $multipage .= ' <span>'.$i.'</span>';
            }
        }
        if($curr_page<$pages) {
            if($curr_page<$pages-5 && $more) {
                $multipage .= ' ..<a href="###" onclick="$(\'#page\').val('.$pages.');$(\'#pageform\').submit();">'.$pages.'</a> <a href="###" onclick="$(\'#page\').val('.($curr_page+1).');$(\'#pageform\').submit();" class="a1">'.L('next').'</a>';
            } else {
                $multipage .= ' <a href="###" onclick="$(\'#page\').val('.$pages.');$(\'#pageform\').submit();">'.$pages.'</a> <a href="###"  onclick="$(\'#page\').val('.($curr_page+1).');$(\'#pageform\').submit();" class="a1">'.L('next').'</a>';
            }
        } elseif($curr_page==$pages) {
            $multipage .= ' <span>'.$pages.'</span> <a href="###" onclick="$(\'#page\').val('.$curr_page.');$(\'#pageform\').submit();" class="a1">'.L('next').'</a>';
        } else {
            $multipage .= ' <a href="###" onclick="$(\'#page\').val('.$pages.');$(\'#pageform\').submit();">'.$pages.'</a> <a href="###" onclick="$(\'#page\').val('.($curr_page+1).');$(\'#pageform\').submit();" class="a1">'.L('next').'</a>';
        }
    }
    return $multipage;
}


function pages2($num, $curr_page, $pages, $urlrule = '', $array = array(),$setpages = 10) {
    if(defined('URLRULE') && $urlrule == '') {
        $urlrule = URLRULE;
        $array = $GLOBALS['URL_ARRAY'];
    } elseif($urlrule == '') {
        $urlrule = url_par('page={$page}');
    }
    $multipage = '';
    if($pages > 1) {
        $page = $setpages+1;
        $offset = ceil($setpages/2-1);
        if (defined('IN_ADMIN') && !defined('PAGES')) define('PAGES', $pages);
        $from = $curr_page - $offset;
        $to = $curr_page + $offset;
        $more = 0;
        if($page >= $pages) {
            $from = 2;
            $to = $pages-1;
        } else {
            if($from <= 1) {
                $to = $page-1;
                $from = 2;
            }  elseif($to >= $pages) {
                $from = $pages-($page-2);
                $to = $pages-1;
            }
            $more = 1;
        }
        //$multipage .= '<a class="a1">'.$num.L('page_item').'</a>';
        if($curr_page>0) {
            $multipage .= ' <a href="###" onclick="$(\'#dosearch\').trigger(\'click\',['.($curr_page-1).']);" class="a1">'.L('previous').'</a>';
            if($curr_page==1) {
                $multipage .= ' <span>1</span>';
            } elseif($curr_page>6 && $more) {
                $multipage .= ' <a href="###" onclick="$(\'#dosearch\').trigger(\'click\',[1]);">1</a>..';
            } else {
                $multipage .= ' <a href="###" onclick="$(\'#dosearch\').trigger(\'click\',[1]);">1</a>';
            }
        }
        for($i = $from; $i <= $to; $i++) {
            if($i != $curr_page) {
                $multipage .= ' <a href="###" onclick="$(\'#dosearch\').trigger(\'click\',['.$i.']);">'.$i.'</a>';
            } else {
                $multipage .= ' <span>'.$i.'</span>';
            }
        }
        if($curr_page<$pages) {
            if($curr_page<$pages-5 && $more) {
                $multipage .= ' ..<a href="###" onclick="$(\'#dosearch\').trigger(\'click\',['.$pages.']);">'.$pages.'</a> <a href="###" onclick="$(\'#dosearch\').trigger(\'click\',['.($curr_page+1).']);" class="a1">'.L('next').'</a>';
            } else {
                $multipage .= ' <a href="###" onclick="$(\'#dosearch\').trigger(\'click\',['.$pages.']);">'.$pages.'</a> <a href="###"  onclick="$(\'#dosearch\').trigger(\'click\',['.($curr_page+1).']);" class="a1">'.L('next').'</a>';
            }
        } elseif($curr_page==$pages) {
            $multipage .= ' <span>'.$pages.'</span> <a href="###" onclick="$(\'#dosearch\').trigger(\'click\',['.($curr_page).']);" class="a1">'.L('next').'</a>';
        } else {
            $multipage .= ' <a href="###" onclick="$(\'#dosearch\').trigger(\'click\',['.$pages.']);">'.$pages.'</a> <a href="###" onclick="$(\'#dosearch\').trigger(\'click\',['.($curr_page+1).']);" class="a1">'.L('next').'</a>';
        }
    }
    return $multipage;
}
/**
 * 返回分頁路徑
 *
 * @param $urlrule 分頁規則
 * @param $page 當前頁
 * @param $array 需要傳遞的陣列，用於增加額外的方法
 * @return 完整的URL路徑
 */
function pageurl($urlrule, $page, $array = array()) {
    if(strpos($urlrule, '~')) {
        $urlrules = explode('~', $urlrule);
        $urlrule = $page < 2 ? $urlrules[0] : $urlrules[1];
    }
    $findme = array('{$page}');
    $replaceme = array($page);
    if (is_array($array)) foreach ($array as $k=>$v) {
        $findme[] = '{$'.$k.'}';
        $replaceme[] = $v;
    }
    $url = str_replace($findme, $replaceme, $urlrule);
    $url = str_replace(array('http://','//','~'), array('~','/','http://'), $url);
    return $url;
}

/**
 * URL路徑解析，pages 函式的輔助函式
 *
 * @param $par 傳入需要解析的變數 預設為，page={$page}
 * @param $url URL地址
 * @return URL
 */
function url_par($par, $url = '') {
    if($url == '') $url = get_url();
    $pos = strpos($url, '?');
    if($pos === false) {
        $url .= '?'.$par;
    } else {
        $querystring = substr(strstr($url, '?'), 1);
        parse_str($querystring, $pars);
        $query_array = array();
        foreach($pars as $k=>$v) {
            if($k != 'page') $query_array[$k] = $v;
        }
        $querystring = http_build_query($query_array).'&'.$par;
        $url = substr($url, 0, $pos).'?'.$querystring;
    }
    return $url;
}

/**
 * 判斷email格式是否正確
 * @param $email
 */
function is_email($email) {
    return strlen($email) > 6 && preg_match("/^[\w\-\.]

[email protected][\w\-\.]+(\.\w+)+$/", $email);
}

/**
 * iconv 編輯轉換
 */
if (!function_exists('iconv')) {
    function iconv($in_charset, $out_charset, $str) {
        $in_charset = strtoupper($in_charset);
        $out_charset = strtoupper($out_charset);
        if (function_exists('mb_convert_encoding')) {
            return mb_convert_encoding($str, $out_charset, $in_charset);
        } else {
            app_base::load_sys_func('iconv');
            $in_charset = strtoupper($in_charset);
            $out_charset = strtoupper($out_charset);
            if ($in_charset == 'UTF-8' && ($out_charset == 'GBK' || $out_charset == 'GB2312')) {
                return utf8_to_gbk($str);
            }
            if (($in_charset == 'GBK' || $in_charset == 'GB2312') && $out_charset == 'UTF-8') {
                return gbk_to_utf8($str);
            }
            return $str;
        }
    }
}

/**
 * 程式碼廣告展示函式
 * @param intval $siteid 所屬站點
 * @param intval $id 廣告ID
 * @return 返回廣告程式碼
 */
function show_ad($siteid, $id) {
    $siteid = intval($siteid);
    $id = intval($id);
    if(!$id || !$siteid) return false;
    $p = app_base::load_model('poster_model');
    $r = $p->get_one(array('spaceid'=>$id, 'siteid'=>$siteid), 'disabled, setting', 'id ASC');
    if ($r['disabled']) return '';
    if ($r['setting']) {
        $c = string2array($r['setting']);
    } else {
        $r['code'] = '';
    }
    return $c['code'];
}

/**
 * 獲取當前的站點ID
 */
function get_siteid() {
    static $siteid;
    if (!empty($siteid)) return $siteid;
    if (defined('IN_ADMIN')) {
        if ($d = param::get_cookie('siteid')) {
            $siteid = $d;
        } else {
            return '';
        }
    } else {
        $data = getcache('sitelist', 'commons');
        if(!is_array($data)) return '1';
        $site_url = SITE_PROTOCOL.SITE_URL;
        foreach ($data as $v) {
            if ($v['url'] == $site_url.'/') $siteid = $v['siteid'];
        }
    }
    if (empty($siteid)) $siteid = 1;
    return $siteid;
}

/**
 * 獲取使用者暱稱
 * 不傳入userid取當前使用者nickname,如果nickname為空取username
 * 傳入field，取使用者$field欄位資訊
 */
function get_nickname($userid='', $field='') {
    $return = '';
    if(is_numeric($userid)) {
        $member_db = app_base::load_model('member_model');
        $memberinfo = $member_db->get_one(array('userid'=>$userid));
        if(!empty($field) && $field != 'nickname' && isset($memberinfo[$field]) &&!empty($memberinfo[$field])) {
            $return = $memberinfo[$field];
        } else {
            $return = isset($memberinfo['nickname']) && !empty($memberinfo['nickname']) ? $memberinfo['nickname'].'('.$memberinfo['username'].')' : $memberinfo['username'];
        }
    } else {
        if (param::get_cookie('_nickname')) {
            $return .= '('.param::get_cookie('_nickname').')';
        } else {
            $return .= '('.param::get_cookie('_username').')';
        }
    }
    return $return;
}

/**
 * 獲取使用者資訊
 * 不傳入$field返回使用者所有資訊,
 * 傳入field，取使用者$field欄位資訊
 */
function get_memberinfo($userid, $field='') {
    if(!is_numeric($userid)) {
        return false;
    } else {
        static $memberinfo;
        if (!isset($memberinfo[$userid])) {
            $member_db = app_base::load_model('member_model');
            $memberinfo[$userid] = $member_db->get_one(array('userid'=>$userid));
        }
        if(!empty($field) && !empty($memberinfo[$userid][$field])) {
            return $memberinfo[$userid][$field];
        } else {
            return $memberinfo[$userid];
        }
    }
}

/**
 * 通過 username 值，獲取使用者所有資訊
 * 獲取使用者資訊
 * 不傳入$field返回使用者所有資訊,
 * 傳入field，取使用者$field欄位資訊
 */
function get_memberinfo_buyusername($username, $field='') {
    if(empty($username)){return false;}
    static $memberinfo;
    if (!isset($memberinfo[$username])) {
        $member_db = app_base::load_model('member_model');
        $memberinfo[$username] = $member_db->get_one(array('username'=>$username));
    }
    if(!empty($field) && !empty($memberinfo[$username][$field])) {
        return $memberinfo[$username][$field];
    } else {
        return $memberinfo[$username];
    }
}

/**
 * 呼叫關聯選單
 * @param $linkageid 聯動選單id
 * @param $id 生成聯動選單的樣式id
 * @param $defaultvalue 預設值
 */
function menu_linkage($linkageid = 0, $id = 'linkid', $defaultvalue = 0, $defaultlabel = array()) {
    $linkageid = intval($linkageid);
    $datas = array();
    $datas = getcache($linkageid,'linkage');
    $infos = $datas['data'];

    if($datas['style']=='1') {
        $title = $datas['title'];
        $container = 'content'.create_randomnum(100, 999).date('is');
        if(!defined('DIALOG_INIT_1')) {
            define('DIALOG_INIT_1', 1);
            $string .= '<script type="text/javascript" src="'.JS_PATH.'dialog.js"></script>';
            //TODO $string .= '<link href="'.CSS_PATH.'dialog.css" rel="stylesheet" type="text/css">';
        }
        if(!defined('LINKAGE_INIT_1')) {
            define('LINKAGE_INIT_1', 1);
            $string .= '<script type="text/javascript" src="'.JS_PATH.'linkage/js/pop.js"></script>';
        }
        $var_div = $defaultvalue && (ROUTE_A=='edit' || ROUTE_A=='account_manage_info'  || ROUTE_A=='info_publish' || ROUTE_A=='orderinfo') ? menu_linkage_level($defaultvalue,$linkageid,$infos) : $datas['title'];
        $var_input = $defaultvalue && (ROUTE_A=='edit' || ROUTE_A=='account_manage_info'  || ROUTE_A=='info_publish') ? '<input type="hidden" name="info['.$id.']" value="'.$defaultvalue.'">' : '<input type="hidden" name="info['.$id.']" value="">';
        $string .= '<div name="'.$id.'" value="" id="'.$id.'" class="ib">'.$var_div.'</div>'.$var_input.' <input type="button" name="btn_'.$id.'" class="button" value="'.L('linkage_select').'" onclick="open_linkage(\''.$id.'\',\''.$title.'\','.$container.',\''.$linkageid.'\')">';
        $string .= '<script type="text/javascript">';
        $string .= 'var returnid_'.$id.'= \''.$id.'\';';
        $string .= 'var returnkeyid_'.$id.' = \''.$linkageid.'\';';
        $string .=  'var '.$container.' = new Array(';
        foreach($infos AS $k=>$v) {
            if($v['parentid'] == 0) {
                $s[]='new Array(\''.$v['linkageid'].'\',\''.$v['name'].'\',\''.$v['parentid'].'\')';
            } else {
                continue;
            }
        }
        $s = implode(',',$s);
        $string .=$s;
        $string .= ')';
        $string .= '</script>';
        
    } elseif($datas['style']=='2') {
        if(!defined('LINKAGE_INIT_1')) {
            define('LINKAGE_INIT_1', 1);
            $string .= '<script type="text/javascript" src="'.JS_PATH.'linkage/js/jquery.ld.js"></script>';
        }
        $default_txt = '';
        if($defaultvalue) {
                $default_txt = menu_linkage_level($defaultvalue,$linkageid,$infos);
                $default_txt = '["'.str_replace(' > ','","',$default_txt).'"]';
        }
        $string .= $defaultvalue && (ROUTE_A=='edit' || ROUTE_A=='account_manage_info'  || ROUTE_A=='info_publish') ? '<input type="hidden" name="info['.$id.']"  id="'.$id.'" value="'.$defaultvalue.'">' : '<input type="hidden" name="info['.$id.']"  id="'.$id.'" value="">';

        for($i=1;$i<=$datas['setting']['level'];$i++) {
            $txt = isset($defaultlabel[$i]) ? $defaultlabel[$i] : '請選擇';
            $string .='<select class="pc-select-'.$id.'" name="'.$id.'-'.$i.'" id="'.$id.'-'.$i.'" width="100"><option value="">' . $txt . '</option></select> ';
        }

        $string .= '<script type="text/javascript">
                    $(function(){
                        var $ld5 = $(".pc-select-'.$id.'");                      
                        $ld5.ld({ajaxOptions : {"url" : "'.APP_PATH.'api.php?op=get_linkage&act=ajax_select&keyid='.$linkageid.'"},defaultParentId : 0,style : {"width" : 120}})     
                        var ld5_api = $ld5.ld("api");
                        //ld5_api.selected('.$default_txt.');
                        $ld5.bind("change",onchange);
                        function onchange(e){
                            var $target = $(e.target);
                            var index = $ld5.index($target);
                            $("#'.$id.'-'.$i.'").remove();
                            $("#'.$id.'").val($ld5.eq(index).show().val());
                            index ++;
                            $ld5.eq(index).show();                                }
                    })
        </script>';
            
    } else {
        $title = $defaultvalue ? $infos[$defaultvalue]['name'] : $datas['title'];
        $colObj = create_randomnum(100, 999).date('is');
        $string = '';
        if(!defined('LINKAGE_INIT')) {
            define('LINKAGE_INIT', 1);
            $string .= '<script type="text/javascript" src="'.JS_PATH.'linkage/js/mln.colselect.js"></script>';
            if(defined('IN_ADMIN')) {
                $string .= '<link href="'.JS_PATH.'linkage/style/admin.css" rel="stylesheet" type="text/css">';
            } else {
                $string .= '<link href="'.JS_PATH.'linkage/style/css.css" rel="stylesheet" type="text/css">';
            }
        }
        $string .= '<input type="hidden" name="info['.$id.']" value="1"><div id="'.$id.'"></div>';
        $string .= '<script type="text/javascript">';
        $string .= 'var colObj'.$colObj.' = {"Items":[';

        foreach($infos AS $k=>$v) {
            $s .= '{"name":"'.$v['name'].'","topid":"'.$v['parentid'].'","colid":"'.$k.'","value":"'.$k.'","fun":function(){}},';
        }

        $string .= substr($s, 0, -1);
        $string .= ']};';
        $string .= '$("#'.$id.'").mlnColsel(colObj'.$colObj.',{';
        $string .= 'title:"'.$title.'",';
        $string .= 'value:"'.$defaultvalue.'",';
        $string .= 'width:100';
        $string .= '});';
        $string .= '</script>';
    }
    return $string;
}

/**
 * 聯動選單層級
 */

function menu_linkage_level($linkageid,$keyid,$infos,$result=array()) {
    if(array_key_exists($linkageid,$infos)) {
        $result[]=$infos[$linkageid]['name'];
        return menu_linkage_level($infos[$linkageid]['parentid'],$keyid,$infos,$result);
    }
    krsort($result);
    return implode(' > ',$result);
}
/**
 * 通過catid獲取顯示選單完整結構
 * @param  $menuid 選單ID
 * @param  $cache_file 選單快取檔名稱
 * @param  $cache_path 快取檔案目錄
 * @param  $key 取得快取值的鍵值名稱
 * @param  $parentkey 父級的ID
 * @param  $linkstring 連結字元
 */
function menu_level($menuid, $cache_file, $cache_path = 'commons', $key = 'catname', $parentkey = 'parentid', $linkstring = ' > ', $result=array()) {
    $menu_arr = getcache($cache_file, $cache_path);
    if (array_key_exists($menuid, $menu_arr)) {
        $result[] = $menu_arr[$menuid][$key];
        return menu_level($menu_arr[$menuid][$parentkey], $cache_file, $cache_path, $key, $parentkey, $linkstring, $result);
    }
    krsort($result);
    return implode($linkstring, $result);
}
/**
 * 通過id獲取顯示聯動選單
 * @param  $linkageid 聯動選單ID
 * @param  $keyid 選單keyid
 * @param  $space 選單間隔符
 * @param  $tyoe 1 返回間隔符連結，完整路徑名稱 3 返回完整路徑陣列，2返回當前聯動選單名稱，4 直接返回ID
 * @param  $result 遞迴使用欄位1
 * @param  $infos 遞迴使用欄位2
 */
function get_linkage($linkageid, $keyid, $space = '>', $type = 1, $result = array(), $infos = array()) {
    if($space=='' || !isset($space))$space = '>';
    if(!$infos) {
        $datas = getcache($keyid,'linkage');
        $infos = $datas['data'];
    }
    if($type == 1 || $type == 3 || $type == 4) {
        if(array_key_exists($linkageid,$infos)) {
            $result[]= ($type == 1) ? $infos[$linkageid]['name'] : (($type == 4) ? $linkageid :$infos[$linkageid]);
            return get_linkage($infos[$linkageid]['parentid'], $keyid, $space, $type, $result, $infos);
        } else {
            if(count($result)>0) {
                krsort($result);
                if($type == 1 || $type == 4) $result = implode($space,$result);
                return $result;
            } else {
                return $result;
            }
        }
    } else {
        return $infos[$linkageid]['name'];
    }
}
/**
 * IE瀏覽器判斷
 */

function is_ie() {
    $useragent = strtolower($_SERVER['HTTP_USER_AGENT']);
    if((strpos($useragent, 'opera') !== false) || (strpos($useragent, 'konqueror') !== false)) return false;
    if(strpos($useragent, 'msie ') !== false) return true;
    return false;
}


/**
 * 檔案下載
 * @param $filepath 檔案路徑
 * @param $filename 檔名稱
 */

function file_down($filepath, $filename = '') {
    if(!$filename) $filename = basename($filepath);
    if(is_ie()) $filename = rawurlencode($filename);
    $filetype = fileext($filename);
    $filesize = sprintf("%u", filesize($filepath));
    if(ob_get_length() !== false) @ob_end_clean();
    header('Pragma: public');
    header('Last-Modified: '.gmdate('D, d M Y H:i:s') . ' GMT');
    header('Cache-Control: no-store, no-cache, must-revalidate');
    header('Cache-Control: pre-check=0, post-check=0, max-age=0');
    header('Content-Transfer-Encoding: binary');
    header('Content-Encoding: none');
    header('Content-type: '.$filetype);
    header('Content-Disposition: attachment; filename="'.$filename.'"');
    header('Content-length: '.$filesize);
    readfile($filepath);
    exit;
}

/**
 * 判斷字串是否為utf8編碼，英文和半形字元返回ture
 * @param $string
 * @return bool
 */
function is_utf8($string) {
    return preg_match('%^(?:
                    [\x09\x0A\x0D\x20-\x7E] # ASCII
                    | [\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);
}

/**
 * 組裝生成ID號
 * @param $modules 模組名
 * @param $contentid 內容ID
 * @param $siteid 站點ID
 */
function id_encode($modules,$contentid, $siteid) {
    return urlencode($modules.'-'.$contentid.'-'.$siteid);
}

/**
 * 解析ID
 * @param $id 評論ID
 */
function id_decode($id) {
    return explode('-', $id);
}

/**
 * 對使用者的密碼進行加密
 * @param $password
 * @param $encrypt //傳入加密串，在修改密碼時做認證
 * @return array/password
 */
function password($password, $encrypt='') {
    $pwd = array();
    $pwd['encrypt'] =  $encrypt ? $encrypt : create_randomstr();
    $pwd['password'] = md5(md5(trim($password)).$pwd['encrypt']);
    return $encrypt ? $pwd['password'] : $pwd;
}
/**
 * 生成隨機字串
 * @param string $lenth 長度
 * @return string 字串
 */
function create_randomstr($lenth = 6) {
    //openssl_random_pseudo_bytes
    $fp = @fopen('/dev/urandom','rb');
    $pr_bits = '';
    if ($fp !== FALSE) {
        $pr_bits .= @fread($fp,$lenth/2);
        @fclose($fp);
    }
    return bin2hex($pr_bits);
    //return random($lenth, '123456789abcdefghijklmnpqrstuvwxyzABCDEFGHIJKLMNPQRSTUVWXYZ');
}

/**
 * 生成隨機數
 * @param string $lenth 長度
 * @return string 字串
 */
function create_randomnum($min,$max) {
    //openssl_random_pseudo_bytes
    $difference = $max-$min;
    $bytesNeeded = ceil($difference/256);
    $fp = @fopen('/dev/urandom','rb');
    if ($fp !== FALSE) {
        $randomBytes = @fread($fp,$bytesNeeded);
        @fclose($fp);
    }
    $sum = 0;
    for ($a = 0; $a < $bytesNeeded; $a++){
        $sum += ord($randomBytes[$a]);
    }
    $sum = $sum % ($difference);
    return $su