lib.php

php写的论坛,代码精简到极点 请相看说明文件。是从英文翻译过来的：）

if($data[level]>$level){
if(!$url){error($msg);}
else{go($url);}
}
}

////////////////////////////// 檢查會員等級 + 直接離開
function chk_level_return($level)
{
global $HTTP_COOKIE_VARS,$connect,$member_table,$member_cookie,$pass_cookie,$error;
$query="select * from $member_table where id='$HTTP_COOKIE_VARS[$member_cookie]' and pass='$HTTP_COOKIE_VARS[$pass_cookie]'";
$data=@mysql_fetch_array(@mysql_query($query,$connect));
if(!$data[level]){$data[level]=10;}
if($data[level]<=$level){return 1;}
}

////////////////////////////// 讀取會員資料
function member_info($id)
{
global $connect,$member_table;
$query="select * from $member_table where id='$id'";
$member=@mysql_fetch_array(@mysql_query($query,$connect));
return $member;
}

////////////////////////////// 讀取佈告欄資料
function bd_info($id)
{
global $connect,$config_table;
$table=$config_table.$id;
$query="select * from $table where no=1";
$set=@mysql_fetch_array(@mysql_query($query,$connect));
return $set;
}

////////////////////////////// 讀取安全性設定資料
function sec_info()
{
global $HTTP_COOKIE_VARS,$connect,$security_table;
$query="select * from $security_table where no=1";
$sec=@mysql_fetch_array(@mysql_query($query,$connect));
return $sec;
}

////////////////////////////// 檢查所輸入的網站位址是否正確
function chk_home($str,$msg) {
if(!eregi("^http://[_a-z0-9-]+(\.[a-z0-9-]+){1,}",$str)){error($msg);}
}

////////////////////////////// 檢查所輸入的電子郵件地址是否正確
function chk_mail($str,$msg) {
if(!eregi("^[_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+){1,}$",$str)){error($msg);}
}

////////////////////////////// 檢查所輸入的名稱是否已存在
function chk_input($table,$key,$value,$msg){
global $connect;
$query="select * from $table where $key='$value'";
$data=@mysql_fetch_array(@mysql_query($query,$connect));
if($data){error($msg);}
}

////////////////////////////// 寫入資料
function input($table,$key,$value){
global $connect;
$query="insert into $table ($key) values ($value)";
$result=@mysql_query($query,$connect);
if(!$result){error($error.'数据库写入错误');}
}

////////////////////////////// 編輯(修改)資料
function edit($table,$value,$where){
global $connect;
$query="update $table set $value where $where";
$result=@mysql_query($query,$connect);
if(!$result){error($error.'数据库读取错误');}
}

////////////////////////////// 擷取資料
function selects($table,$where){
global $connect;
$query="select * from $table where 1 $where";
$data=mysql_fetch_array(mysql_query($query));
return $data;
}

////////////////////////////// 刪除資料
function del($table,$where){
global $connect;
$query="delete from $table where $where";
$result=@mysql_query($query,$connect);
if(!$result){error($error.'数据库写入错误');}
}

////////////////////////////// 刪除資料表
function drop($table){
global $connect;
$query="drop table $table";
$result=@mysql_query($query,$connect);
if(!$result){error($error.'数据库写入错误');}
}

////////////////////////////// 計算總數
function total($table,$where){
global $connect;
$query="select count(*) from $table where 1 $where";
$total=mysql_fetch_array(mysql_query($query));
$total=$total["count(*)"];
return $total;
}

////////////////////////////// 儲存Cookie
function cookie($name,$value,$time){
if($time){$time=time()+24*3600*100;}
else{$time=0;}
setcookie("$name","$value",$time,"/");
global $HTTP_COOKIE_VARS;
}

////////////////////////////// 針對過長的字串做「截尾」動作(以“...”取代)
function cut($str,$max){
$count = strlen($str);
if($count >= $max) {
for ($pos=$max;$pos>0 && ord($str[$pos-1])>=127;$pos--);
if (($max-$pos)%2 == 0)
$str = substr($str, 0, $max) . "...";
else
$str = substr($str, 0, $max+1) . "...";
return $str;
}
else {
$str = "$str";
return $str;
}
}

////////////////////////////// 針對過長的字串做「截尾」動作(不提示)
function cut2($str,$max){
$count = strlen($str);
if($count >= $max) {
for ($pos=$max;$pos>0 && ord($str[$pos-1])>=127;$pos--);
if (($max-$pos)%2 == 0)
$str = substr($str, 0, $max);
else
$str = substr($str, 0, $max+1);
return $str;
}
else {
$str = "$str";
return $str;
}
}

////////////////////////////// 跳頁及換頁
function index(){
global $PHP_SELF,$pagegroup,$pagestart,$pageend,$pageviewsu,$send,$pagenum,$pagesu,$total;
$file_name=$PHP_SELF;
if($pagegroup>1){
$prev=$pagestart-$pageviewsu-1;
echo"<a href=$file_name?${send}pagenum=$prev title='快速换页(向前)'><font size=1>&#9664;&#9664;</font></a> ";
}
if($pagenum){
$prevpage=$pagenum-1;
echo"<a href=$file_name?${send}pagenum=$prevpage title='上一页'><font size=1>&#9664;</font></a> ";
}
for($i=$pagestart;$i<=$pageend;$i++)
{
if($pagesu<$i){break;}
$j=$i-1;
if($j==$pagenum){echo "<b>$i</b> ";}
else{echo "[<a href=$file_name?${send}pagenum=$j>$i</a>] ";}
}
if(($pagenum+1)!=$pagesu && $total){
$nextpage=$pagenum+1;
echo"<a href=$file_name?${send}pagenum=$nextpage title='下一页'><font size=1>&#9654;</font></a> ";
}
if($pageend<$pagesu){echo"<a href=$file_name?${send}pagenum=$pageend title='快速换页(向后)'><font size=1>&#9654;&#9654;</font></a> ";}
}

////////////////////////////// 自動連結
function http_mail_link($str)
{
$str=explode("\n",$str);
$str=implode("\n ",$str);

//kx021208m //kx030313m (HTTP自動連結)
$str=" ".$str;
$str=eregi_replace(">http://([a-z0-9\_\-\.\/\~\@\?\=\:\;\&\#\$\%\(\)\-]+)","><a href=http://\\1 target=_blank>http://\\1</a>",$str);
$str=eregi_replace("\(http://([a-z0-9\_\-\.\/\~\@\?\=\:\;\&\#\$\%\(\)\-]+)\)","(<a href=http://\\1 target=_blank>http://\\1</a>)",$str);
$str=eregi_replace("&nbsp;&nbsp;http://([a-z0-9\_\-\.\/\~\@\?\=\:\;\&\#\$\%\(\)\-]+)","&nbsp;&nbsp;<a href=http://\\1 target=_blank>http://\\1</a>",$str);
$str=eregi_replace(" http://([a-z0-9\_\-\.\/\~\@\?\=\:\;\&\#\$\%\(\)\-]+)"," <a href=http://\\1 target=_blank>http://\\1</a>",$str);

//kx021208a //kx030313m (FTP自動連結)
$str=eregi_replace(">ftp://([a-z0-9\_\-\.\/\~\@\?\=\:\;\&\#\$\%\(\)\-]+)","><a href=ftp://\\1 target=_blank>ftp://\\1</a>",$str);
$str=eregi_replace("\(ftp://([a-z0-9\_\-\.\/\~\@\?\=\:\;\&\#\$\%\(\)\-]+)\)","(<a href=ftp://\\1 target=_blank>ftp://\\1</a>)",$str);
$str=eregi_replace("&nbsp;&nbsp;ftp://([a-z0-9\_\-\.\/\~\@\?\=\:\;\&\#\$\%\(\)\-]+)","&nbsp;&nbsp;<a href=ftp://\\1 target=_blank>ftp://\\1</a>",$str);
$str=eregi_replace(" ftp://([a-z0-9\_\-\.\/\~\@\?\=\:\;\&\#\$\%\(\)\-]+)"," <a href=ftp://\\1 target=_blank>ftp://\\1</a>",$str);

$str=eregi_replace(" ([_a-z0-9-]+(\.[_a-z0-9-]+)*@[a-z0-9-]+(\.[a-z0-9-]+){1,})"," <a href=mailto:\\1>\\1</a>",$str);

return $str;
}

////////////////////////////// 以一般文字顯示HTML標籤
function tag($str)
{
$str=str_replace("<","&lt;",$str);
$str=str_replace(">","&gt;",$str);
return $str;
}

////////////////////////////// 直接連結社區內某圖檔　格式： [=佈告欄名稱.主題編號.圖檔對齊.圖檔寬度.圖檔高度.圖檔邊框=]
////////////////////////////// 　　　　　　　　　　　範例： [=gallery.12.c.640.480.1=]　或　[=photo.8.l.360=]
function get_img($str)
{
global $connect,$board_table;

$str=eregi_replace("(\[=){1}([\._a-z0-9-]+){1}(=\]){1}"," \\0 ",$str);
$str=split(" ",$str);
$str_length=sizeof($str);

for($i=0;$i<$str_length;$i++){

if(eregi("(\[=){1}([\._a-z0-9-]+){1}(=\]){1}",$str[$i]))
{
$str_temp=trim($str[$i]);
$str_temp=str_replace("[","",$str_temp);
$str_temp=str_replace("]","",$str_temp);
$str_temp=str_replace("=","",$str_temp);
$str_temp=split("\.",$str_temp);

$query="select * from $board_table$str_temp[0] where no='$str_temp[1]'";
$data=@mysql_fetch_array(mysql_query($query));

if(eregi("(\.){1}(gif)|(jpg){1}$",$data[attach_name])){$check_img=1;}else{$check_img=0;}

if($data[attach_name] && $data[attach_dir] && $check_img){
	if($str_temp[2]){

	if($str_temp[2]!="c" && $str_temp[2]!="l" && $str_temp[2]!="r" && $str_temp[2]!="center" && $str_temp[2]!="left" && $str_temp[2]!="right"){$str_temp[2]="";}

	if($str_temp[2]=="c"){$str_temp[2]="center";} // 置中
	if($str_temp[2]=="l"){$str_temp[2]="left";}   // 靠左
	if($str_temp[2]=="r"){$str_temp[2]="right";}  // 靠右

	$align="<div align='$str_temp[2]'>";$align2="</div>";$align3="";
	}
	else{$align="";$align2="";$align3="align='left'";}

	if($str_temp[3]){$width="width='$str_temp[3]'";}else{$width="";}
	if($str_temp[4]){$height="height='$str_temp[4]'";}else{$height="";}
	if($str_temp[5]){$border="border='$str_temp[5]'";}else{$border="border=0";}//kx021218m

$str[$i]="$align<a href=file/$data[attach_dir]/$data[attach_name] target=_blank><img src='file/$data[attach_dir]/$data[attach_name]' $width $height $border hspace='10' $align3></a>$align2";//kx021218m
}

}
}

$str = implode(" ", $str);
return $str;
}
?>