一個改進的UBB類別_PHP教程

/*
如有轉載，請註明作者

原作者: 何志強
改良: SonyMusic[ sonymusic@163.net ]
檔: ubb.php
備註: 說是改進，其實核心函數parse()已經完全重寫了，而且思路也是不一樣的。
不過仍是受何志強的例子的啟發，而且測試的例子還有URLCHECK等幾個函數也是沿用的何志強的程序，謝謝何志強。
目前還沒有顏色的功能，但我會加入的。
如果在程序上有什麼BUG或不便的地方，請給我MAIL。
謝謝！
改進功能:
對字串進行UBB編碼,該類別目前只支援下列幾個簡單且實用的編碼:
1. URL褳接
[url] http://phpuser. com/ [/url]
http://頭可以不需要
如[url]phpuser.com[/url]也是可以的。
2. Email褳接
[email] sonymusic@163.net [/email]
3. 圖片褳接
[img] http://www.phpchina.com/images/logo .gif [/img]
同URL連結一樣，前面的http也可以不要。
4. 文字方面
[b]粗體字[/b]
[i]斜體字[/i]
[u]加底線[/u]
[h1] 1號標題字[/h1] ... [h6]6號標題字[/h6]
[sup][/sup]
[sub][/sub]
[tt][/ tt]
[s][/s]
[strike][/strike]
[em][/em]
[strong][/strong]
[code][/ code]
[samp][/samp]
[kbd][/kbd]
[var][/var]
[dfn][/dfn]
[cite][/ cite]
[small][/small]
[big][/big]
[blink][/blink]
注意以下幾點:
1. url,email,img等標籤是不分大小寫的.
2. 在標籤中不允許有TAB鍵出現，但空格允許。
3. 類別要呼叫htmlencode,htmlencode4textarea,emailcheck函數和urlcheck類別.
4. 修改後支援巢狀，但url,email,img這三個標籤不是允許巢狀的。
技術資料:
Ultimate Bulletin Board
http://www.ultimatebb.com/  
What is UBB Code
http://www.scriptkeeper.com/ubb/ubbcode.html
*/

include("urlcheck.php");
include("otherfunc.php"); //這兩個檔案的內容，附在最後。

//ubbcode類別
class ubbcode{
var $call_time=0;
//可處理標籤及處理函數對應表
var $tags = array( //小寫的標籤=> 對應的處理函數
'url' => '$this->url',
'email' => '$this->email',
'img' => '$ this->img',
'b' => '$this->simple',
'i' => '$this->simple',
'u' => '$this- >simple',
'tt' => '$this->simple',
's' => '$this->simple',
'strike' => '$this->simple ',
'h1' => '$this->simple',
'h2' => '$this->simple',
'h3' => '$this->simple',
'h4' => '$this->simple',
'h5' => '$this->simple',
'h6' => '$this->simple',
'sup' => '$this->simple',
'sub' => '$this->simple',
'em' => '$this->simple',
' strong' => '$this->simple',
'code' => '$this->simple',
'samp' => '$this->simple',
'kbd' => '$this->simple',
'var' => '$this->simple',
'dfn' => '$this->simple',
'cite' => '$this->simple',
'small' => '$this->simple',
'big' => '$this->simple',
'blink' => '$ this->simple'
);
//url褳接屬性
var $attr_url;
//url合法性檢查物件
var $urlcheck;

function ubbcode($attr_url){
$this->attr_url = ''.$attr_url;
$this->urlcheck = new urlcheck();
}

//對$str進行UBB編碼解析
function parse($str){
$this->call_time ;
$parse = ''.htmlencode($str);

$ret = '';
while(true){
$eregi_ret=eregi("[[#]{0,1}[[:alnum:]]{1,7}]",$parse,$eregi_arr); //找[xx]
if(!$eregi_ret){
$ret .= $parse;
break; //如果沒有，回傳
}
$pos = @strpos ($parse ,$eregi_arr[0]);
$tag_len=strlen($eregi_arr[0])-2;//標記長度
$tag_start=substr($eregi_arr[0],1,$tag_len);
$tag=strtolower($tag_start);

if((($tag=="url") or ($tag=="email") or ($tag=="img")) and ($this->call_time>1)){
echo $this->call_time."
";
return $parse;//如果不能是不能嵌套的標記，直接回傳
}

$parse2 = substr($parse,0,$pos);//標記之前
$parse = substr($parse,$pos $tag_len 2);//標記之後
if(!isset($this->tags[$tag])){
echo "$tag_start
";
$ret .= $parse2.'['.$tag_start.']' ;
continue;//如果是不支援的標記
}

//找出對應的結束標記
$eregi_ret=eregi("[/".$tag."] ",$parse,$eregi_arr);
if(!$eregi_ret){
$ret .= $parse2.'['.$tag_start.']';
continue;//如果沒有對應該的結束標記
}
$pos=strpos($parse,$eregi_arr[0]);
$value=substr($parse,0,$pos);//這是起止標記之間的內容
$tag_end=substr($parse,$pos 2,$tag_len);
$parse=substr($parse,$pos $tag_len 3);//結束標記之後的內容

if(($tag!="url") and ($tag!="email") and ($tag!="img")){
$value=$this->parse($value );
}

$ret .= $parse2;
eval('$ret .= '.$this->tags[$tag].'("'.$tag_start.' ","'.$tag_end.'","'.$value.'");');
}
$this->call_time--;
return $ret;
}

function simple($start,$end,$value){
return ''.$value.''.$end.'>';
}

function url($start,$end,$value){
$trim_value=trim($value);
if (strtolower(substr($trim_value,0,7) )!="http://")
$trim_value="http://".$trim_value;
if($this->urlcheck->check($trim_value)) return 'attr_url.'>'.$value.'';
else return '['.$start.']'.$value.' [/'.$end.']';
}

function email($start,$end,$value){
if(emailcheck($value)) return ''.$value.'';
else return '['.$start.']'.$value.'[/'.$end .']';
}

function img($start,$end,$value){
$trim_value=trim($value);
if ((strtolower(substr( $trim_value,0,7))!="http://") 或 ($this->urlcheck->check($trim_value)))
return '';
else return '['.$start.']'.$value.'[/'.$end.']';
}
}

//測驗
echo '';
echo '

';
echo '' ;
echo '

';
echo ''.htmlencode4textarea($ubb).'
';
echo '';
echo '

' ;

if(isset($ubb)){
$ubbcode = new ubbcode('target="_blank"');
echo '

---

'.$ubbcode->parse( $ubb);
}

echo '';
echo '';

?>


檔案urlcheck.php
class urlcheck{
var $regex = array(//協定名稱(注意在這裡必須寫成小寫) =>對應的正規表示式
'ftp' => '$this->ftpurl',
'file' => '$this->fileurl',
'http' => '$this-> httpurl',
'https' => '$this->httpurl',
'gopher' => '$this->gopherurl',
'news' => '$this->newsurl' ,
'nntp' => '$this->nntpurl',
'telnet' => '$this->telneturl',
'wais' => '$this->waisurl'
);

var $lowalpha;
var $hialpha;
var $alpha;
var $digit;
var $safe;
var $extra;
var $national;
var $punctuation;
var $reserved;
var $hex;
var $escape;
var $unreserved;
var $uchar;
var $xchar;
var $digits;

var $urlpath;
var $password;
var $user;
var $port;
var $hostnumber;
var $alphadigit;
var $toplabel;
var $domainlabel;
var $hostname;
var $host;
var $hostport;
var $login

//ftp
var $ftptype;
var $fsegment;
var $fpath;
var $ftpurl;

//file var $ftpurl;

//file var $.fileurl ;

//http,https
var $search;
var $hsegment;
var $hpath;
var $httpurl;

//gopher var $httpurl;

//gopher
var $gopher_string;
var $selector;
var $gtype;
var $gopherurl;

//news
var $article; var $grouppart;
var $newsurl;

//nntp
var $nntpurl;

//telnet
var $telneturl

//telnet
var $telneturl; 🎜>//wais
var $wpath;
var $wtype;
var $database;
var $waisdoc;
var $waisindex;
var $waisdata
;
; var $waisurl;

function check($url){
$pos = @strpos ($url,':',1);
if($pos$prot = substr($url,0,$pos);
if(!isset($this->regex[$prot])) return false;
eval('$regex = '.$ this->regex[$prot].';');
return ereg('^'.$regex.'$',$url);
}

function urlcheck(){
$this->lowalpha = '[a-z]';
$this->hialpha = '[A-Z]';
$this->alpha = '('.$this->lowalpha.' |'.$this->hialpha.')';
$this->digit = '[0-9]';
$this->safe = '[$. _-]';
$this->extra = '[*()'!,]';
$this->national = '([{}|^~`]|[|])';
$this- >punctuation = '[#%"]';
$this->reserved = '[?;/: @&= ]'; $this->hex = '('.$this- >digit.'|[a-fA-F])'; $this->escape = '(%'.$this->hex.'{2})';
$this->unreserved = '('.$this->alpha.'|'.$this->digit.'|'.$this->safe.'|'.$this- >額外。 '('.$this->未保留。'|'.$this->保留。'|'.$this->轉義。')';
$this->digits = '('.$ this->digit.' )';

$this->urlpath = '('.$this->xchar.'*)';
$this->password = '(('. $this->uchar.'|[?;&=]'.')*)';
$this->user = '(('.$this->uchar.'|[?;&=] '.')*)';
$this->port = $this->digits;
$this->主機編號= '('.$this->數字.'.'.$this- >數字.'.'.$this->數字.'.'.$this- >數字。 ')';
$this->alphadigit = '('.$this->alpha.'|'. $this->digit.')';
$this->toplabel = '('.$this->alpha.'|('.$this->alpha.'('.$this->alphadigit. '|-)*' .$this->字母數字。 '))';
$this->domainlabel = '('.$this->alphadigit.'|('.$this->alphadigit.' ('.$this->alphadigit.'|-)*' .$this->字母數字。 '))';
$this->主機名稱= '(('.$this->domainlabel.' .)*'.$this->toplabel.')';
$this->host = '('.$this->主機名稱.'|'.$this->主機號碼.')';
$this->hostport = '('.$this->host.'(:'.$this->port.')?)';
$this->login = '(('. $this->user.'(:'.$this->password.')?@)?'.$this->hostport.' )';

$this->ftptype = '[aidAID ]';
$this->fsegment = '(('.$this->uchar.'|[?: @&= ])*)';
$this->fpath = '('. $this->fsegment.'(/'.$this->fsegment.')*)';
$this->ftpurl = '([fF][tT][pP]://'.$this ->login.'(/'.$this->fpath.'(;[tT ][yY][pP][eE]='.$this->ftptype.')?)?)';

$this->fileurl = '([fF][iI][lL][eE]://('.$this->host.'|[lL][oO][cC ][aA][ lL][hH][oO][sS][tT])?/'.$this->fpath.')';

$this->search = '(('.$this-> uchar.'|[;: @&= ])*)';
$this->hsegment = '(('.$this->uchar.'|[;: @&= ])*)';
$this->hpath = '('.$this->hsegment.'(/'.$this->hsegment.')*)';
$this->httpurl = '([hH] [tT][tT][pP][sS]?://'.$this->hostport.'(/'.$this->; hpath.'([?]'.$this->搜尋。 ')?)?)';

$this->gopher_string = '('.$this->xchar.'*)';
$this->selector = '('.$this ->xchar.'*)';
$this->gtype = $this->xchar;
$this->gopherurl = '([gG][oO][pP][hH][eE] [rR]://'.$this->hostport.'(/('.$this ->gtype.'('.$this->選擇器。'('.$this->search.'(' .$this->gopher_string.')?)?)?)?)?) ';

$this->article = '(('.$this->uchar.'|[;/? :&=]) @'.$this->host.')';
$this->group = '('.$this->alpha.'('.$this->alpha.'|' .$this->digit.'|[-. _] )*)';
$this->grouppart = '([*]|'.$this->group.'|'.$this-> article.')';
$this->newsurl = '([nN][eE][wW][sS]:'.$this->grouppart.')';

$this ->nntpurl = '([nN][nN][tT][pP]://'.$this->主機連接埠.'/'.$this->group. '(/'.$this->數字。 '/?)' ;

$this->wpath = '('.$this->uchar.'*)';
$this->wtype = '('.$this-> uchar.'*)';
$this->database = '('.$this->uchar.'*)';
$this->waisdoc = '([wW][aA][iI ][sS]://'.$this->主機連接埠.'/'.$this->資料庫.'/' .$this->wtype.'/'.$this->wpath.')';
$this->waisindex = '([wW][aA][iI][sS]://'.$this->主機連接埠.'/'.$this->資料庫.'[? ]' $this->搜尋。 ')';
$this->waisdatabase = '([wW][aA][iI][sS]://'.$this->hostport.'/'.$this->database.') ' ;
$this->waisurl = '('.$this->waisdatabase.'|'.$this->waisindex.'|'.$this->waisdoc.')';
}
}

？ >


檔案otherfunc.php的內容：
//otherfunc.php
function htmlencode($str){
$str = (string) $str;

$ret = '';
$len = strlen($str);
$nl = false;
for($i=0;$i$chr = $str[$i];
switch($chr){
case '$ret .= '$ nl = false;
休息；
case '>':
$ret .= '>';
$nl = false;
休息；
case '"':
$ret .= '"';
$nl = false;
休息；
case '&':
$ret .= '&';
$nl = false;
休息；
/*
case ' ':
$ret .= ' ';
$nl = false;
休息；
*/  
casecase (9):
$ret .= '    ';
$nl = false;
休息；
case chr(10):
if($nl) $nl = false; if($nl) $nl = false;
else{
$ret .= '
';
$nl = true;
}
休息；
case chr(13):
if($nl) $nl = false;
else{
$ret .= '
';
$nl = true;
}
休息；
預設值：
$ret .= $chr;
$nl = false;
休息；
}
}

回傳$ret;
}


函數htmlencode4textarea($str){
$str = (string)$str;

$ret = '';
$len = strlen($str);
for($i=0;$i$chr = $str[$i];
switch($chr){
case '$ret .= '休息；
case '>':
$ret .= '>';
休息；
case '"':
$ret .= '"';
休息；
case '&':
$ret .= '&';
休息；
案例「 」：
$ret .= ' ';
休息；
case chr(9):
$ret .= '    ';
休息；
預設值：
$ret .= $chr;
休息；
}
}

回傳$ret;
}
函數email ($email){
$ret=false;
if(strstr($email, '@' ) && strstr($email, '.')){
if(eregi("^([ _a-z0-9] ([._a-z0- 9-] )*)@([a-z0-9]{2,}(.[a-z0-9-]{2,})*.[ a-z]{2,3})$", $e)){
$ret=true;
}
}
回傳$ret;
}

function str2url($path){
return eregi_replace("/","/",urlencode($path));
}
？ >

http://www.bkjia.com/PHPjc/316605.htmlwww.bkjia.comtruehttp: //www.bkjia.com/PHPjc/316605.htmlTechArticle?php /* 如有轉載，請版權作者原作者: 何志強改進: SonyMusic[ sonymusic@163. net ] 文件: ubb.php 備註: 說是改進，其實核心函數parse()已經完全重寫了...