本地分享，多功能的点评网站管理系统

【实例简介】

Modoer是一款以本地分享，多功能的点评网站管理系统。采用 PHP MYSQL 开发设计，开放全部源代码。因具有非凡的访问速度和卓越的负载能力而深受国内外朋友的喜爱。3.5版现已发布，重点推出商户微站功能，不仅仅是PC上的商户，现在手机web，手机微信上也可以绑定商户，实现手机商铺维护和在线购买！一款专业的点评网站系统，多种行业的点评，可以自由调控点评项目，类型。Web 2.0的建站方式，网站会员能让快速上手。3.x是一个全新的产品，不再局限于商铺类点评，真正实现了多类型的点评，可以让您的网站点评任何事与物，同时增加产品模块，也更好的显示商铺的网站展示。

注意1：从 Modoer 3.5 正式版开始使用新的序列号，请论坛-商业模块里生成3.5版用的序列号

注意2：从 Modoer 3.5 开始，Modoer 将不再支持 PHP 5.2 版本，最低支持版本必须是 PHP 5.3

注意3：从 Modoer 3.5 开始，Modoer 将以 UTF-8 编码为主要版本，GBK 版本会计划在今年下半年停止发布（届时会提供 GBK 转 UTF-8 工具，新安装用户如果你没有整合 GBK 版本的 UCenter(包含discuz！) 的话，请选择 UTF-8 版本）


安装说明：
    【【请将FTP上传模式设置为二进制模式上传】】
    最佳安装环境 Linux Apache 2.x MYSQL 5.x PHP 5.3.x Zend Gourd Loader For PHP 5.3
    最低安装环境 Linux/Win Apache/IIS PHP 5.3.3 MYSQL 5.0 Zend Guard Loader For PHP 5.3
    请打开PHP.INI的短标签(short_open_tag=On)，GD库，curl库，iconv库
    请将 upload 文件夹内的文件上传到您的ftp空间，执行根目录下的install.php进行安装(http://www.你的网站.com/install.php)，如有安装问题，请在论坛板块发帖。

权限说明：
    data文件夹和uplaods文件夹，包括其中的子文件夹和文件都必须具有读，写，修改，删除的权限，Linux下必须保持 0777 的权限
    其他文件夹和文件则为标准的权限
    如果需要使用在线模板编辑功能，则必须要使 templates 文件夹以及下属的文件夹，文件具有有读，写，修改，删除的权限，Linux下必须保持0777的权限

程序说明：
    后台登录文件是admin.php，可以自由更改，Modoer前后和后台帐号是分开的，安装时注册的帐号为后台帐号。
    程序URL改写的实现方式，请参考 2.0 的安装教程，2.x的URL改写规则文件都是通用的。

UCenter整合说明：
    程序默认没有安装ucenter模块，请到Modoer后台=>模块管理=>安装模块，输入"ucenter"进行模块安装。

商业授权说明：
    Modoer点评系统 多城市版 在操作后台时需要从开发商处购买商业授权码，以后买的，请登录您购买商业版时提供的论坛帐号登录到bbs.modoer.com，然后在首页头部找到“商业模块”=》“我的授权”处获得商业授权码，复制并输入到您已授权的Modoer后台。

更新内容：
增加 后台内容管理加入内联管理功能
增加 新闻模块增加内联功能
增加 个人空间我的文章列表
增加 会员每日登录积分策略
增加 主题模块浏览地图增加搜索功能
增加 系统工具箱增加系统文件夹权限检测
增加 框架内分站类接管当前城市信息读取
改进 分站以及URL解析代码
改进 所有现金支取必须进行双表验证
改进 后台广告列表改进
增加 微信模块商户主题绑定微信公众平台（可设置绑定权限，可单独开关）
增加 微信模块商家自定义指令添加（支持文字和图文类型）
增加 微信模块商家微站引导页（管理导航，轮换图片）
增加 微信模块商家微站引导页模板系统
增加 微信模块微信自定义菜单新类型（扫描，上传图片等新类型）
增加 榜单模块会员组添加榜单权限
增加 榜单模块会员组添加榜单数量限制的权限
增加 主题模块内容页添加到榜单的功能
增加 主题模块自定义字段里单行文本图形化来防采集（显示模版内些
增加 会员模块手机web里允许添加支付密码的功能
增加 会员模块Facebook帐号登录绑定功能
增加 点评模块点评内容同步Facebook功能
增加 在线充值模块Paypal提现功能（可自由选择，个人设置里需填写PayPal帐号）
增加 手机Web模块首页菜单管理集成到后台
增加 个人空间模块空间可上传背景图片
重构 微信模块所有代码以支持多用户绑定
改进 Modoer框架代码使用PHP5.3新特性
改进 微信模块内置指令管理
改进 文件（图片）上传功能<
改进 后台模板添加模式

演示：http://www.modoer.org/

【实例截图】

【核心代码】

<?php
/**
* 通用函数库
* @author moufer<moufer@163.com>
* @copyright (C)2001-2007 Moufersoft
*/
!defined('IN_MUDDER') && exit('Access Denied');

define('MF_INT_KEY', '_int_keyid');
define('MF_INT', 'intval');
define('MF_FLOAT', 'floatval');
define('MF_HTML', '_HTML');
define('MF_TEXT', '_T');

//取得$_GET里的变量
function _get($var, $default = null, $convert_fun='') {
    if(isset($_GET[$var])) {
        if($convert_fun) return $convert_fun($_GET[$var]);
        return $_GET[$var];
    }
    return $default;
}
//取得$_GET里的变量
function _post($var, $default = null, $convert_fun='') {
    if(isset($_POST[$var])) {
        if($convert_fun) return $convert_fun($_POST[$var]);
        return $_POST[$var];
    }
    return $default;
}
//取得$_COOKIE里的变量
function _cookie($var, $default = null, $prefix = 1) {
    global $_G;
    if($prefix) {
        return isset($_G['cookie'][$var]) ? $_G['cookie'][$var] : $default;
    } else {
        return isset($_COOKIE[$var]) ? $_COOKIE[$var] : $default;
    }
}
//取得一个输入变量
function _input($var, $default = null, $convert_fun='', $sx='pg') {
    $r = $default;
    $c = strlen($sx);
    $funs = array('p'=>'_post','g'=>'_get');
    for($i=0;$i<$c;$i ) {
        $x = $sx{$i};
        $f = isset($funs[$x]) ? $funs[$x] : '';
        if(!$f) continue;
        $r = $f($var, $default, $convert_fun);
        if(!empty($r) && $r != $default) return $r;
    }
    if(!$r) $r = $default;
    return $r;
}
//设置$_POST里的变量
function set_post($var, $value = '') {
    $_POST[$var] = $value;
}
//设置$_POST里的变量
function set_get($var, $value = '') {
    $_GET[$var] = $value;
}
//设置cookie
function set_cookie($var, $value, $life = 0, $prefix = 1) {
    $life = $life ? _G('timestamp') $life : 0;
    $secure = $_SERVER['SERVER_PORT'] == '443' ? 1 : 0;
    $var = ($prefix ? _G('cookiepre') : '') . $var;
    return setcookie($var, $value, $life, _G('cookiepath'), _G('cookiedomain'), $secure);
}
//删除cookie
function del_cookie($var, $prefix = 1) {
    if(is_array($var)) {
        foreach($var as $val) set_cookie($val, '', -360000, $prefix);
    } else {
        set_cookie($var, '', -360000, $prefix);
    }
}
// Get Global value
function &_G() {
    global $_G;
    $max_level = 5;
    $result = '';
    $args_num = func_num_args();
    if($args_num > $max_level) return $result;
    $args = func_get_args();
    $val =& $_G;
    foreach ($args as $v) {
        if(!isset($val[$v])) return $result;
        $val =& $val[$v];
    }
    return $val;
}
//获取一个数字型的数据库主键id值
function _int_keyid($string) {
    if(is_array($string)) {
        foreach($string as $key => $val) $string[$key] = _int_keyid($val);
        return $string;
    } else {
        return abs((int)$string);
    }
}
//过滤HTML，用于Text
function _T($string) {
    if(is_array($string)) {
        foreach($string as $key => $val) $string[$key] = _T($val);
        return $string;
    } else {
        $string = is_string($string) ? preg_replace("/&amp;(#[0-9] |[a-z] );/i", "&$1;", htmlspecialchars($string, ENT_QUOTES)) : $string;
        return str_replace($wu, $rp, trim($string));
    }
}
//过滤HTML，用于TextArea
function _TA($string) {
    return preg_replace("/(\r\n|\n\r|\n|\r)/", "\r\n", _T($string));
}
//支持HTML格式,过滤可能引起安全问题的HTML标记
function _HTML($string) {
    $search_arr = array("/(javascript|jscript|js|vbscript|vbs|about):/i","/on(mouse|exit|error|click|dblclick|key|load|unload|change|move|submit|reset|cut|copy|select|start|stop)/i","/<script([^>]*)>/i","/<iframe([^>]*)>/i","/<frame([^>]*)>/i","/<link([^>]*)>/i","/@import/i");
    $replace_arr = array("\\1\n:","on\n\\1","&lt;script\\1&gt;","&lt;iframe\\1&gt;","&lt;frame\\1&gt;","&lt;link\\1&gt;","@\nimport");
    $string = preg_replace($search_arr, $replace_arr, $string);
    //$string = str_replace("&#", "&\n#", $string);
    return $string;
}
//格式化换行符号
function _NL($string) {
    return trim(preg_replace("/\s*(\r\n|\n\r|\n|\r)\s*/", "\r\n", $string));
}
//把字符串转化为JS的字符变量
function _JStr($string) {
return str_replace(array('"', "\r\n", "\n"), array('\"', '', ''), $string);
}
//把一维数组转换为字符串
function _ArrayToStr($array, $split=',') {
    if(empty($array)) return '';
    if(!is_array($array)) return $array;
    return implode($split, $array);
}
//简单加密
function authcode($string, $operation = 'DECODE') {
    $string = $operation == 'DECODE' ? base64_decode($string) : base64_encode($string);
    return $string;
}
//数组格式化
function arrayeval($array, $level = 0) {
    if(!is_array($array)) {
        return "'".$array."'";
    }
    if(is_array($array) && function_exists('var_export')) {
        return var_export($array, true);
    }
    $space = '';
    for($i = 0; $i <= $level; $i ) {
        $space .= "\t";
    }
    $evaluate = "array (\n\r";
    $comma = $space;
    if(is_array($array)) {
        foreach($array as $key => $val) {
            $key = is_string($key) ? '\''.add_cs_lashes($key).'\'' : $key;
            $val = !is_array($val) && (!preg_match("/^\-?[0-9]\d*$/", $val) || strlen($val) > 12) ? '\''.add_cs_lashes($val, '\'\\').'\'' : $val;
            if(is_array($val)) {
                $evaluate .= "$comma$key => ".arrayeval($val, $level 1);
            } else {
                $evaluate .= "$comma$key => $val";
            }
            $comma = ",\n\r$space";
        }
    }
    $evaluate .= "\n\r$space)";
    return $evaluate;
}
//以 C 语言风格使用反斜线转义字符串中的字符
function add_cs_lashes($string) {
    return $string ? addcslashes($string, '\'\\') : '';
}
//转换数组里的全部数值
function new_intval($number) {
    if(is_array($number))
        foreach($number as $key => $val) $number[$key] = new_intval($val); 
    else
        return intval($number);
    return $number;
}
//Un-quotes a quoted string
function strip_slashes($string) {
    if(is_array($string))
        foreach($string as $key => $val) $string[$key] = strip_slashes($val); 
    else
        $string = is_string($string) ? stripslashes($string) : $string;
    return $string;
}
//过滤SQL
function strip_sql($string) {
    $pattern_arr = array("/ union /i", "/ select /i", "/ update /i", "/ outfile /i", "/ or /i");
    $replace_arr = array('&nbsp;union&nbsp;', '&nbsp;select&nbsp;', '&nbsp;update&nbsp;','&nbsp;outfile&nbsp;', '&nbsp;or&nbsp;');
    return is_array($string) ? array_map('strip_sql', $string) : preg_replace($pattern_arr, $replace_arr, $string);
}
//过滤orderby
function strip_order($string) {
    $string = preg_replace('/.?select. from. /i', '', $string);
    $string = preg_replace("/.?delete. from. /i", '', $string);
    $string = preg_replace("/.?update. set. /i", '', $string);
    $string = preg_replace("/.?select. union. /i", '', $string);
    return $string;
}
//转换浮点数
function cfloat($float) {
    $num = (float)$float;
    return $num;
}
//从开端截取
function trimmed_title($text, $limit=12, $ext='') {
    if ($limit) {
        $val = csubstr($text, 0, $limit);
        return $val[1] ? $val[0].$ext : $val[0];
    } else {
        return $text;
    }
}
//截取
function csubstr($text, $start=0, $limit=12) {
    $charset = _G('charset');
    if (function_exists('mb_substr')) {
        $more = (mb_strlen($text, $charset) > $limit) ? true : false;
        $text = mb_substr($text, $start, $limit, $charset);
        return array($text, $more);
    } elseif (function_exists('iconv_substr')) {
        $more = (iconv_strlen($text) > $limit) ? true : false;
        $text = iconv_substr($text, $start, $limit, $charset);
        return array($text, $more);
    } elseif (strtolower($charset) == "utf-8") {
        preg_match_all("/[\x01-\x7f]|[\xc2-\xdf][\x80-\xbf]|\xe0[\xa0-\xbf][\x80-\xbf]|[\xe1-\xef][\x80-\xbf][\x80-\xbf]|\xf0[\x90-\xbf][\x80-\xbf][\x80-\xbf]|[\xf1-\xf7][\x80-\xbf][\x80-\xbf][\x80-\xbf]/", $text, $ar);
        if(func_num_args() >= 3) {
            if (count($ar[0])>$limit) {
                $more = true;
                $text = join("",array_slice($ar[0],$start,$limit))."...";
            } else {
                $more = false;
                $text = join("",array_slice($ar[0],$start,$limit));
            }
        } else {
            $more = false;
            $text = join("",array_slice($ar[0],$start));
        }
        return array($text, $more);
    } else {
        $fStart = 0;
        $fStart = $fStart * 2; 
        $limit = $limit * 2; 
        $strlen = strlen($text);
        for ( $i = 0; $i < $strlen; $i ) { 
            if ($i >= $fStart && $i < ($fStart $limit ) ) { 
                if (ord(substr($text, $i, 1)) > 129) $tmpstr .= substr($text, $i, 2); 
                else $tmpstr .= substr($text, $i, 1); 
            } 
            if (ord(substr($text, $i, 1)) > 129 ) $i ; 
        } 
        $more = strlen($tmpstr) < $strlen; 
        return array($tmpstr, $more);
    }
}
//计算字符数量，非占用字节
function strlen_ex($str) {
    $charset = _G('charset');
    if(function_exists('mb_strlen')) {
        return mb_strlen($str, $charset);
    } elseif(function_exists('iconv_strlen')) {
        return iconv_strlen($str, $charset);
    } elseif($charset == 'utf-8') {
        preg_match_all("/[\x01-\x7f]|[\xc2-\xdf][\x80-\xbf]|\xe0[\xa0-\xbf][\x80-\xbf]|[\xe1-\xef][\x80-\xbf][\x80-\xbf]|\xf0[\x90-\xbf][\x80-\xbf][\x80-\xbf]|[\xf1-\xf7][\x80-\xbf][\x80-\xbf][\x80-\xbf]/", $str, $ar);
        return count($ar[0]);
    } else {
        $len = 0;
        $strlen = strlen($str);
        for( $i = 0; $i < $strlen; $i ) { 
            $len ;
            if (ord(substr($str, $i, 1)) > 129 ) $i ; 
        }
        return $len;
    }
}
//截取，按字节数量截取
function substr_ex($text, $start=0, $limit=255) {
    $charset = _G('charset');
    list($s,) = csubstr($text, $start, $limit);
    $len = strlen($s);
    if($len <= $limit) return $s;
    $i = $l =0;
    $mo = $charset == 'utf-8' ? 3 : 2;
    $str = '';
    while($l < $limit) {
        $z = floor(($limit - $l) / $mo);
        !$z && $z = 1;
        $y = csubstr($s, $i, $z);
        $i = $z;
        $l = strlen($str) strlen($y[0]);
        if($l <= $limit) {
            $str .= $y[0];
        } else {
            break;
        }
    }
    return $str;
}
//转换unix时间戳
function newdate($date, $format='Y-m-d H:i', $dnum=2, $dunit='月') {
    $timestamp = _G('timestamp');
    $date == 'NOW' ? $timestamp : $date;
    if(!$date) return '';
    $date = is_numeric($date) ? $date : (!$date ? $timestamp : strtotime($date));
    $date = ($date == -1 || !$date) ? $timestamp : $date;
    if($format != 'w2style') {
        return date($format, $date);
    } else {
        $tm = $timestamp - $date;
        $num = 0;
        if($tm < 60) {
            $num = $tm;
            $unit = 'second';
        } elseif($tm < 3600) {
            $num = floor($tm / 60);
            $unit = 'minute';
        } elseif($tm < 3600 * 24) {
            $num = floor($tm / 3600);
            $unit = 'hour';
        } elseif($tm < 3600 * 24 * 30) {
            $num = floor($tm / (3600 * 24));
            $unit = 'day';
        } elseif($tm < 3600 * 24 * 30 * 365) {
            $num = floor($tm / (3600 * 24 * 30));
            $unit = 'month';
        }
        if($dnum <= $num && $dunit == $unit) {
            return date('Y-m-d H:i', $date);
        }
        return $num > 0 ? (lang('global_time_format', array($num, lang('global_time_'.$unit)))) : date('Y-m-d', $date);
    }
}
//判断电子邮件
function isemail($email) {
    return strlen($email) > 6 && preg_match("/^[\w\-\.] @[\w\-\.] (\.\w ) $/", $email);
}
//判断是不是图片
function is_image($imgfile) {
    if(!$imgfile) return;
    $ext = strtolower(pathinfo($imgfile, PATHINFO_EXTENSION));
    $exts = array('png','jpeg','jpg','gif');
    if(!in_array($ext, $exts)) return false;
    if(!function_exists('getimagesize')) return false;
    if(!is_file($imgfile)) return false;
    return @getimagesize($imgfile);
}
//判断字符串是否被序列化
function is_serialized( $data ) {
    // if it isn't a string, it isn't serialized
    if ( !is_string( $data ) )
        return false;
    $data = trim( $data );
    if ( 'N;' == $data )
        return true;
    if ( !preg_match( '/^([adObis]):/', $data, $badions ) )
        return false;
    switch ( $badions[1] ) {
        case 'a' :
        case 'O' :
        case 's' :
            if ( preg_match( "/^{$badions[1]}:[0-9] :.*[;}]\$/s", $data ) )
                return true;
            break;
        case 'b' :
        case 'i' :
        case 'd' :
            if ( preg_match( "/^{$badions[1]}:[0-9.E-] ;\$/", $data ) )
                return true;
            break;
    }
    return false;
}
//判断文件是否可写
function is__writable($path) {
    if ($path{strlen($path)-1}=='/')
        return is__writable($path.uniqid(mt_rand()).'.tmp');
    else if (is_dir($path))
        return is__writable($path.'/'.uniqid(mt_rand()).'.tmp');
    $rm = file_exists($path);
    $f = @fopen($path, 'a');
    if ($f===false)
        return false;
    fclose($f);
    if (!$rm)
        unlink($path);
    return true;
}
//获取随机数 ALL(数字或字母),NUM(数字),WORD(字母)
function random($length=8, $idtype='ALL') {
    PHP_VERSION < '4.2.0' && mt_srand((double)microtime() * 1000000);
    $hash = '';
    for ($i = 0; $i < $length;  $i ) {
        if ( 'NUM' == $idtype ) {
            if (0==$i) {
                $hash .= chr(rand(49, 57));
            } else {
                $hash .= chr(rand(48, 57));
            }
        } else if ( 'WORD' == $idtype ){
            $hash .= chr(rand(65, 90));
        } else {
            if ( 0==$i ) {
                $hash .= chr(rand(65, 90));
            } else {
                $hash .= (0==rand(0,1))?chr(rand(65, 90)):chr(rand(48,57));
            }
        }
    }
    return $hash;
}
//生成参数序列
function create_identifier($params) {
    return substr(md5(serialize($params)),0,8);
}
//生成表单序列
function create_formhash($p1, $p2, $p3) {
    $authkey = _G('cfg','authkey');
    return substr(md5($authkey . $p1 . $p2 . $p3), 8, 8);
}
//替换全角数字
function cdc2dbc($number) {
    $search_arr = array('０','１','２','３','４','５','６','７','８','９');
    $replace_arr = array('0','1','2','3','4','5','6','7','8','9');
    return str_replace($search_arr, $replace_arr, $number);
}
//判断字串长度范围
function string_length($string, $min, $max) {
    return strlen($string) >= $min && strlen($string) <= $max;
}
/**
 * 判断是否为0 ，支持浮点数
 * @return Boolean
 * */
function num_empty($num, $alow_minus = TRUE) {
    if(!$alow_minus) {
        $num = (int) $num;
        return $num == 0;
    }
    if($num > 0 || $num < 0) return false;
    return true;
}
/**
 * 在字符串中查找指定的字符
 * @return Boolean
 * */
function strposex($string, $find, $offset = 0) {
    return !(strpos($string, $find, $offset) === false);
}
//获取大小单位
function size_unit($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;
}
//取得字节单位
function size_bytes($val) {
    $val = trim($val);
    $last = strtolower($val{strlen($val)-1});
    switch($last) {
        case 'g':
             $val *= 1024;
        case 'm':
             $val *= 1024;
        case 'k':
             $val *= 1024;
    }
    return $val;
}
//写入文本内容
if(!function_exists('file_get_contents')) {
    function file_get_contents($file) {
        if(!@$fp = fopen($file, 'r')) {
            show_error("Could not open file " . (DEBUG ? "($file)" : "") . "!");
        }
        $content = fread($fp, filesize($file));
        fclose($fp);
        return $content;
    }
}
//获取文本内容
if(!function_exists('file_put_contents')) {
    function file_put_contents($file, $content) {
        if(!@$fp = fopen($file, 'w')) {
            show_error("The specified file " . (DEBUG ? "($file)" : "") . "may not exist!");
        }
        flock($fp, 2);
        fwrite($fp, $content, strlen($content));
        fclose($fp);
        return TRUE;
    }
}
//分页
function multi($num, $perpage, $curpage, $mpurl, $anchor = '', $onclick = '') {
    $multipage = '';
    if(substr($mpurl,0,11) != 'javascript:') {
        $mpurl = preg_replace("/(\?|&amp;)page=(.*?)(&|$)/i","\\1page=_PAGE_\\3",$mpurl);
        if(!strpos($mpurl, '_PAGE_')) {
            $mpurl .= strposex($mpurl, '?') ? '&amp;' : '?';
            $mpurl = $mpurl . 'page={PAGE}' . $anchor;
        } else {
            $mpurl = str_replace('_PAGE_', '{PAGE}', $mpurl) . $anchor;
        }
    }
    if($onclick) {
        $onclick = ' onclick="return ' . $onclick . '";';
    }
    if($num > $perpage) {
        $page = 10;
        $offset = 5;
        $pages = @ceil($num / $perpage);
        if($page > $pages) {
            $from = 1;
            $to = $pages;
        } else {
            $from = $curpage - $offset;
            $to = $curpage $page - $offset - 1;
            if($from < 1) {
                $to = $curpage 1 - $from;
                $from = 1;
                if(($to - $from) < $page && ($to - $from) < $pages) {
                    $to = $page;
                }
            } elseif($to > $pages) {
                $from = $curpage - $pages $to;
                $to = $pages;
                if(($to - $from) < $page && ($to - $from) < $pages) {
                    $from = $pages - $page 1;
                }
            }
        }
        $multipage = ($curpage - $offset > 1 && $pages > $page ? '<a href="'.str_replace('{PAGE}',1,$mpurl).'"'.str_replace('{PAGE}',1,$onclick).' class="p_redirect">&lt;&lt;</a>' : '').($curpage > 1 ? '<a href="'.str_replace('{PAGE}',$curpage-1,$mpurl).'"'.str_replace('{PAGE}',$curpage-1,$onclick).' class="p_redirect">&lt;</a>' : '');
        for($i = $from; $i <= $to; $i ) {
            $multipage .= $i == $curpage ? '<span class="p_curpage">'.$i.'</span>' : '<a href="'.str_replace('{PAGE}',$i,$mpurl).'"'.str_replace('{PAGE}',$i,$onclick).' class="p_num">'.$i.'</a>';
        }
        $multipage .= ($curpage < $pages ? '<a href="'.str_replace('{PAGE}',$curpage 1,$mpurl).'"'.str_replace('{PAGE}',$curpage 1,$onclick).' class="p_redirect" nextpage="Y">&gt;</a>' : '').($to < $pages ? '<a href="'.str_replace('{PAGE}',$pages,$mpurl).'"'.str_replace('{PAGE}',$pages,$onclick).' class="p_redirect">&gt;&gt;</a>' : '');
        $multipage = $multipage ? '<div class="p_bar"><span class="p_info">'.$num.'</span>'.$multipage.'</div>' : '';
    }
    return $multipage;
}
//分页2
function multi_w($count, $offset, $page, $mpurl, $anchor = '') {
    $multipage = '';

    if(substr($mpurl,0,11) != 'javascript:') {
        $mpurl = preg_replace("/page=(.*?)(&|$)/i","page=_PAGE_\\2",$mpurl);
        if(!strpos($mpurl, '_PAGE_')) {
            $mpurl .= strposex($mpurl, '?') ? '&amp;' : '?';
            $mpurl = $mpurl . 'page={PAGE}' . $anchor;
        } else {
            $mpurl = str_replace('_PAGE_', '{PAGE}', $mpurl) . $anchor;
        }
    }

    $start = ($page-1) * $offset;
    if($start > 1) $multipage .= '<a href="'.str_replace('{PAGE}',$page-1,$mpurl).'" class="p_redirect">&lt;</a>';
    if($count > 0) $multipage .=  '<span class="p_info">' . ($start 1) . '~' . ($start $count) . '</span>';
    if($count >= $offset) $multipage .= '<a href="'.str_replace('{PAGE}',$page 1,$mpurl).'" class="p_redirect" nextpage="Y">&gt;</a>';
    $multipage = $multipage ? '<div class="p_bar">'.$multipage.'</div>' : '';
    return $multipage;
}
//检测模块是否存在
function check_module($flag) {
    $module =& _G('modules',$flag);
    return $module && is_array($module);
}
//检测提交是否有效
function check_submit($var, $allowget = 0) {
    if(empty($_POST[$var])) return FALSE;
    if($allowget || ($_SERVER['REQUEST_METHOD'] == 'POST' && (empty($_SERVER['HTTP_REFERER']) || 
        preg_replace("/https?:\/\/([^\:\/] ).*/i", "\\1", get_fl_domain($_SERVER['HTTP_REFERER'])) == get_fl_domain(preg_replace("/([^\:] ).*/", "\\1", $_SERVER['HTTP_HOST']))))) {
        return TRUE;
    }
    redirect('global_op_submit_invalid');
}
//检测验证码
function check_seccode($seccode, $return = FALSE, $del=true) {
    if(!$seccode) redirect('global_op_seccode_empty');
    if(!$cookie_seccode = _G('cookie', 'seccode')) {
        if($return) return FALSE;
        redirect('global_op_seccode_cookie_empty');
    }
    $hash = create_formhash(strtolower($seccode),'','');
    if($hash != $cookie_seccode) {
        if($return) return FALSE;
        redirect('global_op_seccode_invalid');
    }
    if($del) del_cookie('seccode');
    return TRUE;
}
//检测IP
function check_ipaccess($ipstr) {
    $myip = _G('ip');
    if(!$ipstr) return false;
    $iplist = explode("\r\n", $ipstr);
    return in_array($myip, $iplist);
}
//消息提示
function redirect($lang, $url = 'javascript:history.go(-1);', $navs = null, $min = '3') {
    global $_G, $_CITY;
    //数组情况，0：lang，1：参数
    if(is_array($lang)) {
        list($lang, $params) = $lang;
    }
    if(preg_match('/^[a-zA-Z0-9_\-] $/', $lang)) {
        if(isset($params)) {
            $msg = lang($lang, $params);
        } else {
            $msg = lang($lang);
        }
    } else {
        $msg = $lang;
    }

    if($lang == 'member_not_login') {
        $extra = 'login';
    } elseif(strpos($lang, '_succeed') === false) {
        $extra = 'error';
    } else {
        $extra = '';
    }

    $url = str_replace('&amp;','&',$url);

    if(defined('IN_AJAX')) {
        dialog(lang('global_op_title'), $msg, $extra, $url);
    } elseif(defined("IN_ADMIN")) {
        cpmsg($msg, $url);
    } elseif(defined("IN_IFRAME")) {
        redirect_lite($msg, $url);
    } else {
        $auto_url = trim($url);
        if($auto_url == 'stop'  || !$auto_url) $auto_url = '';
        if($auto_url == 'javascript:history.go(-1);' && !$_G['web']['referer']) $auto_url = '';
        if(!is_array($navs)) $navs = array();
        array_unshift($navs,array(lang('global_window_close'),'javascript:window.close();'));
        if(!$_G['user']->isLogin) {
            array_unshift($navs,array(lang('member_reg_title'),url('city:0/member/reg')));
            array_unshift($navs,array(lang('member_login_title'),url('city:0/member/login')));
        } else {
            array_unshift($navs,array(lang('member_operation_title'),url('city:0/member/index')));
        }
        array_unshift($navs,array(lang('global_index'),url('modoer/index')));
        if($auto_url=='javascript:history.go(-1);' && $_G['web']['referer'] && (strpos($_G['web']['referer'],'reg')||strpos($_G['web']['referer'],'login')) && $_G['user']->isLogin) {
            $auto_url = url('member/index');
        }
        require_once template('modoer_redirect');
        output();
    }
}
//跨域提交表单返回信息
function redirect_lite($lang, $url = 'javascript:history.go(-1);', $navs = null, $min = '3') {
    if(preg_match('/^[a-zA-Z0-9_\-] $/', $lang)) {
        $msg = lang($lang);
    } else {
        $msg = $lang;
    }
    $content = '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"><html>';
    $content .= '<head><script type="text/javascript">document.domain="'.$domain.'";</script></head><body>';
    if($url) {
        $url = str_replace('&amp;', '&', $url);
        $content .= '<script type="text/javascript">
        window.onload = function() { setTimeout(do_location, 1500); }
        function do_location() { document.location.href = \''.$url.'\';}
        </script>';
    }
    $content .= '<div style="width:100%;text-align:center;margin-top:20px;font-size:12px;line-height:20px;">';
    $content .= '<div style="padding:10px;">'.$msg.'</div>';
    if($url) {
        $content .= '<div style="padding:10px;"><a href="'.$url.'">'.lang('global_message_des').'</a></div>';
    }
    $content .= '</div>';
    $content .= '</body></html>';
    echo $content;
    output();
}
//ajax消息提示
function dialog($caption, $msg, $extra = '', $url = '') {
    $caption = _T($caption);
    $msg = trim($msg);
    $search = array('"',"\r\n","\r","\n","\n\r");
    $replace = array('\\"',"{LF}","{LF}","{LF}","{LF}");
    if($extra == 'error' || $extra == 'login') {
        $msg = 'ERROR:' . $msg;
    }
    if($_POST['in_iframe']) {
        $domain = get_fl_domain();
        echo '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"><html>';
        if($domain !='' && is_domain($domain)) {
            echo '<head><script type="text/javascript">document.domain="'.$domain.'";</script></head><body>';
        } else {
            echo '<head></head><body>';
        }
    }
    echo '{ caption:"' . $caption . '",message:' . '"'.str_replace($search, $replace, $msg) . '"';
    if($extra == 'login') {
        $forward = _G('web','referer') ? _G('web','referer') : _G('cfg','siteurl');
        $url = get_url('member', 'login', array('forward'=>base64_encode($forward)), '', 1);
        echo ',extra:"'.$extra.'",url:"'.$url.'" }';
    } elseif($extra == 'dlg') {
        echo ',extra:"dlg" }';
    } elseif($extra == 'msg') {
        echo ',extra:"msg" }';
    } else {
        echo '}';
    }
    if($_POST['in_iframe']) {
        echo '</body></html>';
    }
    output();
}
//跨域提交表单返回信息
function fetch_iframe($string) {
    $domain = get_fl_domain();
    $content = '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"><html>';
    if(is_domain($domain)) {
        $content .= '<head><script type="text/javascript">document.domain="'.$domain.'";</script></head><body>';
    } else {
        $content = '<head></head><body>';
    }
    $content .= $string;
    $content .= '</body></html>';
    return $content;
}
/**
 * 提示页面不存在
 * 
 * @param string $nexturl 自动返回的URL地址
 * */
function http_404($nexturl='') {
    global $_G, $_CFG;
    if($nexturl) {
        $nexturl = str_replace('&amp;','&',$nexturl);
    } else {
        $nexturl = url('modoer/index');
    }
    $msg = lang('global_http_404');
    @header('HTTP/1.1 404 Not Found');
    @header('Status: 404 Not Found');
    require_once template('modoer_http_404');
    output();
}
//数组转换url
function http_query($array, $pathinfo=FALSE, $check_rewritecompatible=TRUE) {
    global $_G;
    if($check_rewritecompatible) {
        foreach($array as $key => $val) {
            if(is_string($val)) {
                $v = rawurlencode($val);
                if($_G['cfg']['rewrite'] && $_G['cfg']['rewrite_hide_index'] && $_G['cfg']['rewritecompatible']) {
                    $v = rawurlencode($v);
                }
                $array[$key] = $v;
            }
        }
    }
    $param = url_implode($array,null,'','',false);
    if($pathinfo) {
        return str_replace(array('&','='), '/', $param);
    }
    return $param;
}
//转换模板url标签
function url($pathinfo, $au='', $fullurl=FALSE, $no_rewrite=FALSE, $city_id=NULL) {

    if(strtolower(substr($pathinfo,0,4)) == 'http') return $pathinfo;
    $params = array();
    $info = explode("/", $pathinfo);
    if(preg_match("/city:([0-9] )/i",$info[0],$matches)) {
        $city_id = $matches[1];
        $info = explode('/', substr($pathinfo, strlen($matches[0]) 1));
    }

    if(empty($info)) {
        $module = "modoer";
        $script = "";
    } elseif(count($info) == 1) {
        $module = $info[0];
        $script = "";
    } else {
        $module = $info[0];
        $script = $info[1];
        if(count($info) > 2) {
            for($i=2; $i<count($info); $i ) {
                $tmp = $info[ $i];
                if($tmp == '') continue;
                $params[$info[$i-1]] = $tmp; 
            }
        }
    }

    //不需要城市目录的
    $citypath_without = _G('cfg', 'citypath_without');
    $city_sldomain = _G('cfg','city_sldomain');
    is_string($citypath_without) && $citypath_without = explode("\r\n", $citypath_without);
    if($city_sldomain) {
        if($city_sldomain=='2'||$module=='member'||$script=='member') {
        if($citypath_without && in_array("$module/$script",$citypath_without)) $city_id = 0;
            foreach($citypath_without as $match) {
                list($m,$a) = explode('/',$match);
                if($module==$m && $a=='*') $city_id = 0;
                if($script==$a && $m=='*') $city_id = 0;
            }
        }
    }

    return get_url($module, $script, $params, $au, $fullurl, $no_rewrite, $city_id);
}
//URL路径
function url_path($name, $url='', $target='') {
    if($target) $target = ' target="'.$target."'";
    if($url)
        return '<a href="'.$url.'"'.$target.'>'.$name.'</a>';
    else
        return $name;
}
//转换数组成为URL
function url_implode($data, $prefix=null, $sep='', $key='', $encode=true) {
    $ret = array();
    foreach((array)$data as $k => $v) {
       $k = urlencode($k);
       if(is_int($k) && $prefix != null) {
           $k = $prefix . $k;
       }
       if(!empty($key)) {
           $k = $key . "[" . $k . "]";
       }
       if(is_array($v) || is_object($v)) {
           array_push($ret,url_implode($v, "", $sep, $k));
       }
       else {
           array_push($ret, $k . "=" . ($encode?rawurlencode($v):$v));
       }
    }
   if(empty($sep)) $sep = "&amp;";
   return implode($sep, $ret);
}
//替换URL的其中一个参数的值
function url_replace($url, $name, $value, $del_page = TRUE) {
    $value = rawurlencode($value);
    if(strposex($url, $name)){
        $url = preg_replace("/$name=(.*?)(&|$)/i","$name=$value\\2", $url);
    } else {
        $url .= (strpos($url,'?') ? "&" : "?") . "$name=$value";
    }
    if(!$del_page) return $url;
    return preg_replace("/(\?|&amp;&|)a=(.*?)(&|$)/i","\\2", $url);
}
//获取服务器信息
function get_webinfo() {
    $result = array();
    $result['self'] = strtolower($_SERVER['PHP_SELF'] ? $_SERVER['PHP_SELF'] : $_SERVER['SCRIPT_NAME']);
    $result['domain'] = strtolower($_SERVER['SERVER_NAME']);
    $result['agent'] = $_SERVER['HTTP_USER_AGENT'];
    $result['referer'] = isset($_SERVER['HTTP_REFERER']) ? $_SERVER['HTTP_REFERER'] : '';
    $result['scheme'] = $_SERVER['SERVER_PORT'] == '443' ? 'https://' : 'http://';
    $result['reuri'] = isset($_SERVER['REQUEST_URI']) ? $_SERVER['REQUEST_URI'] : '';
    $result['port'] = $_SERVER['SERVER_PORT'] == '80' ? '' : ':'.$_SERVER['SERVER_PORT'];
    $result['url'] = $result['scheme'] . $result['domain'] . $result['port'];
    return $result;
}
//获取当前访问的城市
function get_city($new_city_id=null) {
global $_G, $_CITY;

$_G['citys'] = $_G['loader']->variable('area');
    $citys =& $_G['citys'];
$city_id = 0;

if($_G['cfg']['city_sldomain']=='1') {
$sldomain = get_sl_domain();
    } elseif($_G['cfg']['city_sldomain']=='2'&&$_G['cfg']['rewrite']&&$_G['cfg']['rewrite_mod']=='pathinfo') {
        $sldomain = _T($_GET['city_domain']);
}
    if($sldomain) {
        foreach($citys as $val) {
            if($val['domain']==$sldomain) {
                $city_id = $val['aid'];
                $_GET['city_domain'] = $sldomain;
            }
        }
        if(!$city_id) $_GET['unkown_city_domain'] = $sldomain;
    } elseif($sl_domain = get_sl_domain()) {
        if(strtolower( $sl_domain ) != strtolower(substr($_G['cfg']['siteurl'],7,strlen($sl_domain)))) {
            $_GET['unkown_city_domain'] = $sl_domain;
        }
    }

if(!$city_id) $city_id = abs((int) $_G['cookie']['city_id']);
    if(!$city_id || !isset($citys[$city_id])) return;

    if(!$citys[$city_id]['enabled'] && !defined('IN_ADMIN')) {
        if($d_city = get_default_city()) {
            $_CITY = init_city($d_city['aid']);
        } else {
            set_cookie('city_id', '', 0);
        }
        //vp($d_city);
        if(!defined('IN_AJAX') && !defined('IN_JS')) {
            redirect(lang('global_area_city_disabled', $citys[$city_id]['name']), url('city:0/index/city'));
        } else {
            show_error(lang('global_area_city_disabled', $citys[$city_id]['name']));
        }
    }

    //save cookie
    if($_C['city_id'] != $city_id) set_cookie('city_id', $city_id, 2592000);
    define('_NULL_CITYID_',"0,$city_id");

    return $citys[$city_id];
}
//判断并获取唯一城市
function get_single_city() {
    global $_G;
    $citys = $_G['loader']->variable('area');
    if(count($citys)==1) return array_pop($citys);
    $enable_citys = array();
    foreach($citys as $val) {
        if($val['enable']) {
            $enable_citys[] = $val;
        }
    }
    if(count($enable_citys)==1) return array_pop($enable_citys);
    return false;
}
//获取默认城市
function get_default_city() {
    global $_G;
    if(!$city_id = get_cityid_ip()) {
        $city_id = _G('cfg','city_id');
    }
    $citys = $_G['loader']->variable('area');
    if(!$city = $citys[$city_id]) {
        if($citys) return array_shift($citys);
        return;
    }
    if(!$citys[$city_id]['enabled']) {
        foreach($citys as $val) {
            if($val['enabled']) return $val;
        }
    }
    return $citys[$city_id];
}
//初始化
function init_city($city_id=null,$jump=false) {
    global $_G;

    $citys = $_G['loader']->variable('area');
    $city = $citys[$city_id];
    //SEO替换
    foreach(array('sitename','meta_keywords','meta_description') as $k) {
   if($city['config'][$k]) {
             $_G['cfg'][$k] = $city['config'][$k];
        }
        $_G['cfg'][$k] = str_replace('{city}', $city['name'], $_G['cfg'][$k]);
    }
    //风格替换
    if($_G['city']['templateid'] > 0) {
        $_G['cfg']['templateid'] = $_G['city']['templateid'];
    }
    set_cookie('city_id', $city_id, 2592000);
    return $city;
}
function get_cityurl($city_id,$urlparams='') {
    global $_G;

    $citys = $_G['loader']->variable('area');
    if(!$city = $citys[$city_id]) $_G['cfg']['city_sldomain'] = 0;
    if(!$city['domain']) $_G['cfg']['city_sldomain'] = 0;
    if($_G['cfg']['city_sldomain']=='1'||$_G['cfg']['city_sldomain']=='2') {
        $siteurl = display('modoer:cityurl',"domain/$city[domain]");
    } else {
        $siteurl = $_G['siteurl'];
    }
    $url = url($urlparams,'','','',$city_id);
    return $url;
}
function get_city_domain($city_id) {
    global $_G;

    $citys = $_G['loader']->variable('area');
    if(!$city = $citys[$city_id]) $_G['cfg']['city_sldomain'] = 0;
    if(!$city['domain']) $_G['cfg']['city_sldomain'] = 0;
    if($_G['cfg']['city_sldomain']=='1') {
        $siteurl = 'http://' . $city['domain'] . '.' . get_fl_domain() . '/';
    } elseif($_G['cfg']['city_sldomain']=='2'&&$_G['cfg']['rewrite']&&$_G['cfg']['rewrite_mod']=='pathinfo') {
        $urlpre = $_G['cfg']['rewrite_hide_index'] ? '' : 'index.php/';
        $siteurl = $_G['cfg']['siteurl'] . $urlpre . $city['domain'] . '/';
    } else {
        $siteurl = $_G['cfg']['siteurl'];
    }
    return $siteurl;
}
//获取主域名
function get_current_domain() {
    $ServerName = strtolower($_SERVER['HTTP_HOST'] ? $_SERVER['HTTP_HOST'] : $_SERVER['SERVER_NAME']);
    if($i=strpos($ServerName,':')) $ServerName = substr($ServerName,0,$i);
    return str_replace(array('http://','https://'),'',$ServerName);
}
//获取顶级域名
function get_fl_domain($full_domain='') {
    static $library = '';
    if(!$library) {
        $library = file_get_contents(MUDDER_DATA . 'domain_library.inc');
        if($library) $library = str_replace('.', '\.', preg_replace("/\s*(\r\n|\n\r|\n|\r)\s*/", "|", $library));
        if(!$library) $library = 'com\.cn|com\.hk|net|com|cn|us|tw|hk';
    }
    $url = $full_domain ? $full_domain : get_current_domain();
    if(preg_match('/[\w][\w-]*\.(?:' . $library . ')(\/|$)/isU', $url, $domain)) {
        return rtrim($domain[0], '/');
    }
    return;
}
//获取二级域名前缀
function get_sl_domain() {
    $domain = get_current_domain();
$list = explode('.', $domain);
if(count($list)<=2 || $list[0]=='www') return '';
return $list[0];
}
//获取二级域名对应的地图api地址
function get_mapapi() {
global $_G;
if(!$sldomain = get_sl_domain()) return $_G['cfg']['mapapi'];
$citys = $_G['loader']->variable('area');
foreach($citys as $val) {
if($val['domain'] == $sldomain && $val['config']['mapapikey']) {
return $val['config']['mapapikey'];
}
}
return $_G['cfg']['mapapi'];
}
//判断当前是一个有效的域名
function is_domain($domain) {
    if(!$domain) return false;
    if(!strpos($domain, '.')) return false;
    if(preg_match("/^[0-9] \.[0-9] \.[0-9] \.[0-9] $/", $domain)) return false;
    return preg_match ("/^[a-z0-9][a-z0-9\-] [a-z0-9](\.[a-z]{2,4}) $/i", $domain);
}
//获取头像链接
function get_face($uid, $create_src = FALSE, $show_root = TRUE) {
    if(defined('IN_UC')) {
        return UC_API.'/avatar.php?uid='.$uid.'&type=virtual&size=small';
    } else {
        $uid = abs(intval($uid));
        $uid = sprintf("%09d", $uid);
        $dir1 = substr($uid, 0, 3);
        $dir2 = substr($uid, 3, 2);
        $dir3 = substr($uid, 5, 2);
        $root = url('modoer', '', TRUE, TRUE, 0);
        $src = 'uploads/faces/'.$dir1.'/'.$dir2.'/'.$dir3.'/'.substr($uid, -2) . ".jpg";
        if($create_src || is_file(MUDDER_ROOT . $src)) return ($show_root ? $root : (URLROOT.'/')) . $src;
        return ($show_root ? $root : URLROOT) . 'static/images/noface.jpg';
    }
}
//转换页码为数据开始下标
function get_start($page, $offset) {
    if(!$offset || $offset < 1) $offset = 10;
    return ($page-1) * $offset;
}
//转换输出URL
function get_url($module='modoer', $scriptname='', $param='', $au='', $full = FALSE, $no_rewrite = FALSE, $city_id=NULL) {
    global $_G, $_CITY;

    $_modules =& _G('modules');

    if(defined('IN_AJAX')) $full = TRUE;
    if(isset($_G['fullalways']) && $_G['fullalways']) $full = TRUE;

    static $instance = array();
    if(!defined("IN_ADMIN") && !empty($_G['mod'])) {
        $cmod =& _G('mod');
        //$current_empty_dir = empty($cmod['directory']);
        $current_empty_dir = TRUE;
    }

    if($module != 'modoer' || !$module) {
        if(!$param) $param = array();
        if($scriptname && is_array($param)) {
            array_unshift($param, array('act' => $scriptname));
        } elseif($scriptname && is_string($param)) {
            $param = 'act=' . $module . ($param ? ('&' . $param) : '');
        }
        $scriptname = $module;
    }

    $scriptname && $scriptname .= '.php';
    if(is_array($param) && $param) {
        if(!$no_rewrite && _G('cfg','rewrite')) {
            foreach($param as $k=>$v) $param[$k] = str_replace('-', '_f_',$v);
        }
        $paramstr = $scriptname . '?' . http_query($param,0,!$no_rewrite);
    } elseif(is_string($param) && $param) {
        $paramstr = $scriptname .'?' . $param;
    } else {
        $paramstr = $scriptname;
    }

    if(is_numeric($city_id)) {
        if($city_id > 0) $domain = display('modoer:area',"aid/$city_id/keyname/domain");
        if(!$city_id) $domain = '{GLOBAL}';
    }

    if(!$no_rewrite && _G('cfg','rewrite') && $paramstr) {
        $RW =& $_G['loader']->lib('urlrewriter');
        $paramstr = $RW->preg_parse($paramstr, $domain);
    } elseif(_G('cfg','city_sldomain')=='1') {
        !$domain && $domain = $_CITY['domain'];
        $newdomain = $domain == '{GLOBAL}' ? _G('cfg','siteurl') : ('http://' . $domain.'.'.get_fl_domain().'/');
        if($domain == $_GET['city_domain']) $newdomain = '';
        $paramstr = $newdomain . $paramstr;
    }

    //$fldomain = get_fl_domain();
    if($_G['sldomain']) $fullurl = TRUE;
    $is_fullurl = substr($paramstr,0,7) == 'http://';

    $siteurl = _G('cfg', 'siteurl');
    $c_url = 'http://' . get_current_domain() . URLROOT . '/';
    if($_G['sldomain']) $c_url = $_G['cfg']['siteurl'];
    $urlpre = $full ? ($is_fullurl?'':$c_url) : ($is_fullurl?'':(URLROOT.'/'));

    $austr = '';
    $au && $austr = '#' . $au;
    return $urlpre . $paramstr . $austr;
}
//获取IP
function get_ip() {
    $onlineip = null;
    $onlineipmatches = array();
    if(getenv('HTTP_CLIENT_IP') && strcasecmp(getenv('HTTP_CLIENT_IP'), 'unknown')) {
        $onlineip = getenv('HTTP_CLIENT_IP');
    } elseif(getenv('HTTP_X_FORWARDED_FOR') && strcasecmp(getenv('HTTP_X_FORWARDED_FOR'), 'unknown')) {
        $onlineip = getenv('HTTP_X_FORWARDED_FOR');
    } elseif(getenv('REMOTE_ADDR') && strcasecmp(getenv('REMOTE_ADDR'), 'unknown')) {
        $onlineip = getenv('REMOTE_ADDR');
    } elseif(isset($_SERVER['REMOTE_ADDR']) && $_SERVER['REMOTE_ADDR'] &&
        strcasecmp($_SERVER['REMOTE_ADDR'], 'unknown')) {
        $onlineip = $_SERVER['REMOTE_ADDR'];
    }
    $onlineip = addslashes($onlineip);
    @preg_match("/[\d\.]{7,15}/", $onlineip, $onlineipmatches);
    $onlineip = $onlineipmatches[0] ? $onlineipmatches[0] : 'unknown';
    unset($onlineipmatches);
    return $onlineip;
}
//获取根路径
function get_urlroot() {
    global $_G;
    $url = str_replace('\\', '/', dirname(SELF));
    if(strposex($url, '/index.php')) {
        $x = strpos($url, '/index.php');
        $url = substr($url, 0, $x);
        $_G['index_url_rewrite'] = TRUE;
    }
    if($url == '/' || $url == '\\') 
        $url = '';
    return $url;
}
//获取IP地址真实地址
function get_cityid_ip($ip=null) {
    $addr = _G('loader')->lib('ipaddress')->set_ip($ip)->get_address();
    if($addr && !is_numeric($addr)) {
        $citys = _G('loader')->variable('area');
        foreach($citys as $val) {
            if(strposex($addr, $val['name'])) return $val['aid'];
        }
    }
    return 0;
}
//通过城市域名获取id
function get_city_for_doman($domain) {
    global $_G;
    $citys = $_G['loader']->variable('area');
    foreach($citys as $city) {
        if($city['domain']==$domain) return $city;
    }
    return false;
}
//获取上一页URL，并设置没有时的默认返回
function get_forward($default = null, $get_post = FALSE) {
    $web = _G('web');
    $siteurl = _G('siteurl');
    if($get_post) {
        $forward = $_POST['forward'];
    } else {
        $forward = $web['referer'] ? $web['referer'] : '';
    }
    if($forward && substr($forward, 0, strlen($siteurl)) != $siteurl) $forward = '';
    if(!$forward && $default) {
        return $default == 'home' ? (defined('IN_ADMIN') ? SELF : url('modoer/index')) : $default;
    }
    return _T($forward);
}
//判断是否是对应类型的模板
function is_template($templateid,$type) {
    global $_G;
    $templates = $_G['loader']->variable('templates');
    return isset($templates[$type][$templateid]);
}
//载入模板
function template($file, $type='main', $templateid='', $custom_dir='', $update=FALSE) {
    global $_G, $_CFG;

    if(!$templateid) {
        $mainid = $_G['cfg']['templateid'] ? $_G['cfg']['templateid'] : 1;
    } else {
        $mainid = $templateid;
    }
    $templates = $_G['loader']->variable('templates');
    $main_dir = isset($templates['main'][$mainid]) ? $templates['main'][$mainid]['directory'] : 'default';
    $_G['tplurl'] = 'templates/main/'. $main_dir . '/';

    if($type == 'member') {
        $dir = 'core' . DS . 'modules' . DS . $templateid;
        $tpldir = $dir . DS . 'assistant' . DS . 'templates' . DS;
        $cachedir = 'data' . DS . 'templates' . DS;
        $_G['tplurl_member'] = 'templates/main/'. str_replace(DS,'/', $dir);
    } elseif($type == 'datacall') {
        $tpldir = 'templates' . DS . 'main' . DS . $main_dir . DS . 'datacall' . DS;
        $cachedir = 'data' . DS . 'templates' . DS;
        $_G['tplurl_datacall'] = $_G['tplurl'] . 'datacall/';
    } elseif($type != 'main') {
        $type_dir = isset($templates[$type][$templateid]) ? $templates[$type][$templateid]['directory'] : 'default';
        $tpldir = 'templates' . DS . $type . DS . $type_dir . DS;
        $_G['tplurl_'.$type] = 'templates/'.$type.'/'. str_replace(DS,'/', $type_dir) . '/';
        @define(strtoupper($type).'_TPL_DIR', URLROOT . '/' . substr($_G['tplurl_'.$type],0,-1));
    } else {
        if($custom_dir) {
            $tpldir = $custom_dir . DS;
            $_G['tplurl_custom'] = str_replace(DS, '/', $custom_dir) . '/';
            $templateid = $mainid . '_custom';
        } else {
            $tpldir = 'templates' . DS . $type . DS . $main_dir . DS;
            $_G['tplurl_'.$type] = 'templates/' . $type . '/' . $main_dir . '/';
            $templateid = $mainid . '_' . $type;
        }
    }

    $cachedir = 'data' . DS . 'templates' . DS;
    $ext = empty($_G['cfg']['tplext']) ? '.htm' : $_G['cfg']['tplext'];
    $tplfile = $tpldir . $file . $ext;
    $objfile = $cachedir . $templateid . '_' . $type . '_' . $file . '.tpl.php';
//$update=true;
    if($update || !is_file(MUDDER_ROOT . $tplfile) || (@filemtime(MUDDER_ROOT . $tplfile) > @filemtime(MUDDER_ROOT . $objfile))) {
        $_G['loader']->helper('template');
        parse_template($tplfile, $objfile);
    }
    return MUDDER_ROOT . $objfile;
}
//模板尾部
function footer($templateid = '') {
    global $_G, $_CFG;

    if(!$templateid) {
        $mainid = $_G['cfg']['templateid'] ? $_G['cfg']['templateid'] : 1;
    } else {
        $mainid = $templateid;
    }

    $_G['fullalways'] = 1;
    if($_G['cfg']['scriptinfo']) {
        $mtime = explode(' ', microtime());
        $totaltime = number_format(($mtime[1] $mtime[0] - $_G['starttime']), 6);
        $gzip = $_G['cfg']['gzipcompress'] ? 'enabled' : 'disabled';
        $sitedebug = 'Processed in '.$totaltime.' second(s), '.$_G['db']->query_num.' queries, Gzip '.$gzip;
    }
    if(!defined('IN_AJAX')) {
        require template('modoer_footer', 'main', $mainid);
    }
    output();
}
//程序结束ob处理
function output() {
    global $_G;
    //处理h缓存更新
    //if($_G['datacall']) $_G['datacall']->cachelife();
    $output = ob_get_contents();
    ob_end_clean();
    $_G['cfg']['gzipcompress'] ? @ob_start('ob_gzhandler') : ob_start();
    echo $output;
    exit;
}
//取得语言
function lang($lng, $param = null) {
    global $_G;
    $string = '';
    list($file, $page, ) = explode("_", $lng);
    if(!preg_match("/^[a-zA-Z_\.] $/", $file)) {
        $string = $lng;
    } elseif(!isset($_G['lng'][$file])) {
        $filename = MUDDER_CORE . 'lang' . DS . $_G['lang_directory'] . DS . $file . '.php';
        if(!is_file($filename)) {
            $string = $lng;
        } else {
$_G['lng'][$file] = include $filename;
}
    }
    if(!$string && !isset($_G['lng'][$file][$lng])) {
        $string = $lng;
    } elseif(!$string) {
$string = $_G['lng'][$file][$lng];
}
if($param) {
if(!is_array($param)) $param = array($param);
$string = vsprintf($string, $param);
}
    return $string;
}
//跳转
function location($url, $header_301 = false) {
    if(!$url) return;
$url = str_replace('&amp;', '&', $url);
    if(defined('IN_AJAX')) {
        echo '{ caption:"301",message:' . '"'.$url. '"';
        echo ',extra:"location" }';
        output();
    } else {
        if($header_301) header("HTTP/1.1 301 Moved Permanently");
        header('Location:' . $url);
        exit;
    }
}
//终端程序，抛出错误信息
function show_error($lang, $param=null) {
    global $_G;
    if(preg_match('/^[a-zA-Z0-9_\-] $/', $lang)) {
        $message = lang($lang);
    } else {
        $message = $lang;
    }
    $trace = debug_backtrace();
    $urlroot = URLROOT;
    ob_end_clean();
    $_G['cfg']['gzipcompress'] ? @ob_start('ob_gzhandler') : ob_start();
print <<< EOT
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=$_G[charset]">
<meta http-equiv="x-ua-compatible" content="ie=7" />
<link rel="stylesheet" type="text/css" href="$urlroot/static/images/error.css">
</head>
<body>
<div class="error">
    <h3>Modoer reporting</h3>
    <p class="error">$message</p>
</div>
EOT;
    if(DEBUG){
print <<< EOT
<div class="debug">
    <h3>Debug backtrace</h3>
    <table border='0' cellspacing='0' cellpadding='0' class="trace">
        <tr>
            <th width="400" align="left">File</th>
            <th width="50">Line</th>
            <th align="right">Function</th>
        </tr>
EOT;
        foreach($trace as $k=>$t) {
            //if(!$k) continue;
            echo "<tr><td>".str_replace(MUDDER_ROOT,'',$t['file'])."</td>
            <td align='center'>$t[line]</td>
            <td align='right'>".($t['class']?("{$t['class']}->"):'')."$t[function]()</td></tr>";
        }
print <<< EOT
    </table>
</div>
EOT;
    }
print <<< EOT
</body>
</html>
EOT;
exit;
}

//中断程序，输出信息
function diex($msg) {
    global $_CFG;
    include MUDDER_CORE . 'diex.php';
    exit(0);
}
//格式化显示数组
function vp() {
    $args = func_get_args();
    if(!$args) return;
    foreach($args as $var) {
        echo "<div style=\"border:1px solid #ddd;background:#F7F7F7;padding:5px 10px;\">\r\n";
        echo "<pre style=\"font-family:Arial,Vrinda;font-size:14px;\">\r\n";
        var_dump($var);
        echo "\r\n</pre>\r\n";
        echo "</div>";
    }
}
//格式化显示数组
function pr($var) {
    $args = func_get_args();
    if(!$args) return;
    foreach($args as $var) {
        echo "<div style=\"border:1px solid #ddd;background:#F7F7F7;padding:5px 10px;\">\r\n";
        echo "<pre style=\"font-family:Arial,Vrinda;font-size:14px;\">\r\n";
        print_r($var);
        echo "\r\n</pre>\r\n";
        echo "</div>";
    }
}
//获取系统需要的文件修改时间
function myfilemtime($filename) {
    $timezone = _G('timezone');
    return filemtime($filename) $_G['timezone'] * 3600;
}
//获取一个数字
function get_numeric($num) {
    if(is_numeric($num)&&!strposex($num,'.')) return $num;
    $len = strlen($num);
    $sub = 0;
    for($i=$len-1;$i>=0;$i--) {
        if($num{$i} == '0') $sub ; else break;
    }
    if($sub>0) {
        $num = substr($num, 0, -$sub);
        if(substr($num,-1)=='.') $num = substr($num, 0, -1);
    }
    return $num;
}
//把秒转换成时间
function get_time($time) {
    $h = floor($time / 3600);
    $i = floor(($time  - 3600 * $h) / 60);
    $s = $time  - 3600 * $h - 60 * $i;
    return array($h, $i, $s);
}
//获取url的内容
function get_url_content($url) {
    $t = parse_url($url);
    $host = $t['host'];
    $file = $t['path'] . '?' . $t['query'];
    $errno = 0;
    $errstr = '';
    $time_out = 10;
    $html = '';
    $fp = @fsockopen($host, 80, $errno, $errstr, $time_out);
    if(!$fp) {
        echo $url;
        echo '<br />';
        echo $errstr;
        return false;
    } else {
        $header = "GET $file HTTP/1.1\r\n";
        $header .= "Host: $host\r\n";
        $header .= "User-Agent: Mozilla/5.0 (Windows; U; Windows NT 6.0; zh-CN; rv:1.9.0.1) Gecko/2008070208 Firefox/4.0.1\r\n";
        $header .= "Referer: http://$host\r\n";
        $header .= "Connection: Close\r\n\r\n";
        @fwrite($fp, $header);
        //跳过HTTP头信息
        while(!feof($fp)) {
            if(($header = @fgets($fp)) && ($header == "\r\n" ||  $header == "\n")) break;
        }
        while (!feof($fp)) {
            $s = @fgets($fp,128);
            $html .= $s;
        }
        @fclose($fp);
        return $html;
    }
}
//获取视频地址
function get_video_url(&$html, $flag) {
    global $_G;
    if($_G['charset'] != $flag['charset']) {
        $_G['loader']->lib('chinese', NULL, FALSE);
        $CHS = new ms_chinese($flag['charset'], $_G['charset']);
        $html = $CHS->Convert($html);
    }
    if(preg_match('%'.$flag['preg'].'%i', $html, $match)) { 
        return $match[1];
    } else {
        return false;
    }
}
//函数调用的默认参数处理
function query_default($params) {
    global $_CITY;
    if(!isset($params['start']) || (!$params['start'] || $params['start'] < 0)) {
        $params['start'] = 0;
    }
    if(isset($params['row'])) $params['rows'] = $params['row'];
    if(!isset($params['rows']) || (!$params['rows'] || $params['rows'] < 0)) {
        $params['rows'] = 10;
    }
    if(!isset($params['cachetime']) || (!$params['cachetime'] || $params['cachetime'] < 0)) {
        $params['cachetime'] = 0;
    }
    if(!isset($params['ordersc']) || strtoupper($params['ordersc'])!='DESC') {
        $params['ordersc'] = 'ASC';
    }
    $cityid = '0,' . $_CITY['aid'];
    if(isset($params['city_id'])) {
        $params['city_id'] = str_replace(array('_NULL_CITYID_', '_CITYID_'), array($cityid, $_CITY['aid']), $params['city_id']);
    }
    if(isset($params['where'])) {
        $params['where'] = str_replace(array('_NULL_CITYID_', '_CITYID_'), array($cityid, $_CITY['aid']), $params['where']);
    }
    return $params;
}
//载入helper/print的函数(仅供模板引擎使用)
function template_print($flag,$fun,$params) {
    global $_G;
    if(!$fun) return '';
    $module = '';
    if($flag && $flag != 'modoer') {
        $modules =& $_G['modules'];
        if(!isset($modules[$flag])) return '';
        $module = $flag;
    }
    $_G['loader']->helper('display', $module);
    $classname = !$module ? 'display' : ('display_' . $module);
    $result = call_user_func(array($classname, $fun), $params);
    return $result;
}
//载入helper/print的函数(PHP内部使用)
function display($flag, $params) {
global $_G;
list($module, $fun) = explode(':', $flag);
$modules =& $_G['modules'];
if($module == 'modoer') $module = '';
if($module) if(!isset($_G['modules'][$module])) return '';
$_G['loader']->helper('display', $module);
$classname = !$module ? 'display' : ('display_' . $module);
$result = call_user_func(array($classname, $fun), params2array($params));
return $result;
}
//获取星星个数
function get_star($point, $scoretype) {
    if($scoretype==5) return round($point);
    if($scoretype==10) return round($point/2);
    if($scoretype==100) return round($point/20);
}
//获取a/b形式到数组array
function params2array($str) {
    if(is_array($str)) return $str;
$info = explode('/', $str);
if(count($info)<2) return null;
$result = array();
    for($i=0; $i<count($info); $i ) {
        $tmp = $info[ $i];
        if($tmp == '') continue;
        $result[$info[$i-1]]= $tmp;
    }
return $result;
}
//获取seo全局标签值
function get_seo_tags() {
    global $_G;
    return array(
        'site_name' => _G('cfg','sitename'),
        'city_name' => _G('city','name'),
        'module_name' => _G('mod','name'),
        'site_keywords' => _G('cfg','meta_keywords'),
        'site_description' => _G('cfg','meta_description'),
    );
}
//获取替换后的seo设置里的标签
function parse_seo_tags($str,$mapping) {
    if(!$str) return '';
    if(!$mapping||!is_array($mapping)) return $str;
    foreach($mapping as $key=>$val) {
        if(empty($val)) {
            $f = '{'.$key.'}';
            $i = strpos($str,$f);
            if($i===FALSE) continue;
            $atts = array(',','|','-');
            $x = FALSE;
            foreach ($atts as $key) {
                if($x===FALSE) $x = strpos($str, $key, $i strlen($f));
            }
            if($x===FALSE) {
                $str = substr($str, 0, $i);
            } else {
                $str = substr($str, 0, $i) . substr($str, $x 1);
            }
        }
    }
    $keys = array();
    foreach(array_keys($mapping) as $val) {
        $keys[] = '{'.$val.'}';
    }
    $str = str_replace($keys,array_values($mapping),$str);
    return preg_replace("/\{[a-z0-9_] \}/i", "", $str);
}
//判断是否使用总站地址访问
function check_use_global_url($urlact) {
    global $_G;
    if(!$_GET['city_domain'] || !$_G['cfg']['citypath_without']) return false;
    list($mm,$aa) = explode('/', $urlact);
    if($_G['cfg']['city_sldomain']!='2' && $mm!='member') return false;
    if(in_array($urlact, $_G['cfg']['citypath_without'])) return true;
    foreach($_G['cfg']['citypath_without'] as $match) {
        list($m,$a) = explode('/',$match);
        if($mm==$m && $a=='*') return true;
        if($aa==$a && $m=='*') return true;
    }
}
//判断页面内容是否属于当前城市，返回是否URL跳转
function check_jump_city($city_id) {
    global $_CITY;
    if($city_id && $city_id != $_CITY['aid']) {
        $_CITY = init_city($city_id);
        return $_GET['city_domain']!='';
    } elseif(!$city_id && $_GET['city_domain']) {
        return true;
    }
}
//判断是否为url
function check_is_url($url) {
    return preg_match('/http:\/\/[\w.] [\w\/]*[\w.]*\??[\w=&\ \%]*/is', $url);
}
//编码转换
function charset_convert($str, $src='gbk', $dst='utf-8') {
    global $_G;
    if(is_numeric($str)) return $str;
    $_G['loader']->lib('chinese', NULL, FALSE);
    $CHS = new ms_chinese($src, $dst);
    if(is_array($str)) {
        foreach ($str as $key => $value) {
            $str[$key] = $CHS->Convert($value);
        }
    } else {
        $str = $CHS->Convert($str);
    }
    return $str;
}
//清空网站配置缓存
function clear_site_setting_cache() {
    foreach (glob(MUDDER_CACHE."*_*.php") as $filename) {
        if(str_replace(MUDDER_CACHE,'',$filename)!='' && is_file($filename)) {
            @unlink($filename);
        }
    }
}
//写入log
function log_write($file, $log) {
    $yearmonth = gmdate('Ym', _G('timestamp'));
    $logdir = MUDDER_DATA.'logs'.DS;
    $logfile = $logdir.$yearmonth.'_'.$file.'.php';
    if(@filesize($logfile) > 2048000) {
        $dir = opendir($logdir);
        $length = strlen($file);
        $maxid = $id = 0;
        while($entry = readdir($dir)) {
            if(strposex($entry, $yearmonth.'_'.$file)) {
                $id = intval(substr($entry, $length 8, -4));
                $id > $maxid && $maxid = $id;
            }
        }
        closedir($dir);
        $logfilebak = $logdir.$yearmonth.'_'.$file.'_'.($maxid 1).'.php';
        @rename($logfile, $logfilebak);
    }
    if($fp = @fopen($logfile, 'a')) {
        @flock($fp, 2);
        $log = is_array($log) ? $log : array($log);
        foreach($log as $tmp) {
            fwrite($fp, "<?PHP exit;?>\t".str_replace(array('<?', '?>'), '', $tmp)."\n");
        }
        fclose($fp);
    }
}
?>