Discuz!源代码分析系列:./include/global.func.php(2)

xq8995209

转自www.discuz.net　作者：郭鑫　　/**
　　* 用来得到上一个页面的地址，也就是来路。
　　* @para string $default 这个参数是直接设置一个refer，不用判断得到
　　*
　　* @return string
　　*/
　　function dreferer($default = '') {
　　global $referer, $indexname;
　　$default = empty($default) ? $indexname : '';
　　if(empty($referer) && isset($GLOBALS['_SERVER']['HTTP_REFERER'])) {
　　$referer = preg_replace("/([\?&])((sid\=[a-z0-9]{6})(&|$))/i", '\\1', $GLOBALS['_SERVER']['HTTP_REFERER']);
　　$referer = substr($referer, -1) == '?' ? substr($referer, 0, -1) : $referer;
　　} else {
　　$referer = dhtmlspecialchars($referer);
　　}
　　if(!preg_match("/(\.php|[a-z]+(\-\d+)+\.html)/", $referer) || strpos($referer, 'logging.php')) {
　　$referer = $default;
　　}
　　return $referer;
　　}
　　复制内容到剪贴板代码:
　　/**
　　* 设置cookie用的，我觉得这个和clearcookies放到一起比较好，不过好像这个是按字母排的…
　　* @para string $var cookie名
　　* @para string $value cookie值
　　* @para int $life 生存时间
　　* @para int $prefix cookie前缀
　　*
　　*/
　　function dsetcookie($var, $value, $life = 0, $prefix = 1) {
　　global $cookiepre, $cookiedomain, $cookiepath, $timestamp, $_SERVER;
　　//echo $prefix."--".$var."--".$value."--".$life."--".$cookiepath;
　　setcookie(($prefix ? $cookiepre : '').$var, $value,
　　$life ? $timestamp + $life : 0, $cookiepath,
　　$cookiedomain, $_SERVER['SERVER_PORT'] == 443 ? 1 : 0);
　　}
　　复制内容到剪贴板代码:
　　/**
　　* 删除论坛的附件用的
　　* @para string $filename 附件名
　　* @para int $havethumb 是否有缩略图
　　* @para int $remote 是否为远程附件
　　*
　　*/
　　function dunlink($filename, $havethumb = 0, $remote = 0) {
　　global $authkey, $ftp, $attachdir;
　　if($remote) {
　　require_once DISCUZ_ROOT.'./include/ftp.func.php';
　　if(!$ftp['connid']) {
　　if(!($ftp['connid'] = dftp_connect($ftp['host'], $ftp['username'], authcode($ftp['password'], 'DECODE', md5($authkey)), $ftp['attachdir'], $ftp['port'], $ftp['ssl']))) {
　　return;
　　}
　　}
　　dftp_delete($ftp['connid'], $filename);
　　$havethumb && dftp_delete($ftp['connid'], $filename.'.thumb.jpg');
　　} else {
　　@unlink($attachdir.'/'.$filename);
　　$havethumb && @unlink($attachdir.'/'.$filename.'.thumb.jpg');
　　}
　　}
　　复制内容到剪贴板代码:
　　/**
　　* 生成email连接用的，比如把nicollelord@yahoo.com换成：nicollelord@yahoo.com这样的形式
　　* @para string $email
　　* @para int $tolink
　　*/
　　function emailconv($email, $tolink = 1) {
　　$email = str_replace(array('@', '.'), array('@', '.'), $email);
　　return $tolink ? ''.$email.'': $email;
　　}
　　复制内容到剪贴板代码:
　　/**
　　* 记录错误日志用的
　　* @para string $type 错误类型
　　* @para string $message 错误内容
　　* @para int $halt 发生错误后是不是就马上停止论坛的运行
　　*
　　*/
　　function errorlog($type, $message, $halt = 1) {
　　global $timestamp, $discuz_userss, $onlineip, $_SERVER;
　　$user = empty($discuz_userss) ? '' : $discuz_userss.'';
　　$user .= $onlineip.'|'.$_SERVER['REMOTE_ADDR'];
　　writelog('errorlog', dhtmlspecialchars("$timestamp\t$type\t$user\t".str_replace(array("\r", "\n"), array(' ', ' '), trim($message))));
　　if($halt) {
　　dexit();
　　}
　　}
　　复制内容到剪贴板代码:
　　/**
　　* 判断访问者是不是robot
　　*
　　* @return boolean
　　*/
　　function getrobot() {
　　if(!defined('IS_ROBOT')) {
　　$kw_spiders = 'Bot|Crawl|Spider|slurp|sohu-search|lycos|robozilla';
　　$kw_browsers = 'MSIE|Netscape|Opera|Konqueror|Mozilla';
　　if(preg_match("/($kw_browsers)/", $_SERVER['HTTP_USER_AGENT'])) {
　　define('IS_ROBOT', FALSE);
　　} elseif(preg_match("/($kw_spiders)/", $_SERVER['HTTP_USER_AGENT'])) {
　　define('IS_ROBOT', TRUE);
　　} else {
　　define('IS_ROBOT', FALSE);
　　}
　　}
　　return IS_ROBOT;
　　}
　　复制内容到剪贴板代码:
　　/**
　　* 得到一个文件的扩展名
　　* @para string $filename
　　*
　　* @return string
　　*/
　　function fileext($filename) {
　　return trim(substr(strrchr($filename, '.'), 1, 10));
　　}
　　/**
　　* 用当前时间，会员名，uid，密码，authkey生成一个form hash(哈希)
　　*
　　* @return string
　　*/
　　function formhash() {
　　global $discuz_user, $discuz_uid, $discuz_pw, $timestamp, $discuz_auth_key;
　　return substr(md5(substr($timestamp, 0, -7).$discuz_user.$discuz_uid.$discuz_pw.$discuz_auth_key), 8, 8);
　　}
　　复制内容到剪贴板代码:
　　/**
　　* 生成论坛访问权限的字串，以|隔开
　　* @para string $permstr 访问权限字串
　　*
　　* @return string
　　*/
　　function forumperm($permstr) {
　　global $groupid, $extgroupids;
　　$groupidarray = array($groupid);
　　foreach(explode("\t", $extgroupids) as $extgroupid) {
　　if($extgroupid = intval(trim($extgroupid))) {
　　$groupidarray[] = $extgroupid;
　　}
　　}
　　return preg_match("/(^|\t)(".implode('|', $groupidarray).")(\t|$)/", $permstr);
　　}
　　复制内容到剪贴板代码:
　　/**
　　* 得到用户组，同步groupid和member['groupid']，当会员积分和当前积分不一致更新members表。
　　* @para int $uid 会员的uid
　　* @para array $group 会员所属的用户组
　　* @para array $member
　　*
　　* @return string
　　*/
　　function getgroupid($uid, $group, &$member) {
　　global $creditsformula, $db, $tablepre;
　　if(!empty($creditsformula)) {
　　$updatearray = array();
　　eval("\$credits = round($creditsformula);");
　　if($credits != $member['credits']) {
　　$updatearray[] = "credits='$credits'";
　　}
　　if($group['type'] == 'member' && !($member['credits'] >= $group['creditshigher'] && $member['credits'] < $group['creditslower'])) {
　　$query = $db->query("SELECT groupid FROM {$tablepre}usergroups WHERE type='member' AND $member[credits]>=creditshigher AND $member[credits]