<?php
/*
如有转载,请注明作者
原作者: 何志强
改进: sonymusic[sonymusic@163.net]
文件: ubb.php
备注: 说是改进,其实核心函数parse()已经完全重写了,而且思路也是不一样的。
不过仍是受何志强的例子的启发,而且测试的例子还有urlcheck等几个函数也是沿用的何志强的程序,谢谢何志强。
目前还没有颜色的功能,但我会加入的。
如果在程序上有什么bug或不便的地方,请给我mail。
谢谢!
改进功能:
对字符串进行ubb编码,该类目前只支持下列几个简单且实用的编码:
1. url裢接
http://phpuser.com/
http://头可以不需要
如phpuser.com也是可以的。
2. email裢接
sonymusic@163.net
3. 图片裢接
同url链接一样,前面的http也可以不要。
4. 文字方面
粗体字
斜体字
加下划线
1号标题字
…
6号标题字
[tt][/tt]
[s][/s]
[em][/em]
[strong][/strong]
[code][/code]
[samp][/samp]
[kbd][/kbd]
[var][/var]
[dfn][/dfn]
[cite][/cite]
注意以下几点:
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."<br>";
return $parse;//如果不能是不能嵌套的标记,直接返回
}
$parse2 = substr($parse,0,$pos);//标记之前
$parse = substr($parse,$pos+$tag_len+2);//标记之后
if(!isset($this->tags[$tag])){
echo "$tag_start<br>";
$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 <.$start.>.$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 <a href=".$trim_value." .$this->attr_url.>.$value.</a>;
else return [.$start.].$value.[/.$end.];
}
function email($start,$end,$value){
if(emailcheck($value)) return <a href="mailto:.$value.">.$value.</a>;
else return [.$start.].$value.[/.$end.];
}
function img($start,$end,$value){
$trim_value=trim($value);
if ((strtolower(substr($trim_value,0,7))!="http://") or ($this->urlcheck->check($trim_value)))
return <img src=".$trim_value."></img>;
else return [.$start.].$value.[/.$end.];
}
}
//测试
echo <html>;
echo <head><title>测试</title></head>;
echo <body>;
echo <form action=".str2url($path_info)." method="post">;
echo <textarea cols="100" rows="10" name="ubb">.htmlencode4textarea($ubb).</textarea><br>;
echo <input type="submit" value="转换">;
echo </form>;
if(isset($ubb)){
$ubbcode = new ubbcode(target="_blank");
echo <hr>.$ubbcode->parse($ubb);
}
echo </body>;
echo </html>;
?>
文件urlcheck.php的内容
<?php
//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 $fileurl;
//http,https
var $search;
var $hsegment;
var $hpath;
var $httpurl;
//gopher
var $gopher_string;
var $selector;
var $gtype;
var $gopherurl;
//news
var $article;
var $group;
var $grouppart;
var $newsurl;
//nntp
var $nntpurl;
//telnet
var $telneturl;
//wais
var $wpath;
var $wtype;
var $database;
var $waisdoc;
var $waisindex;
var $waisdatabase;
var $waisurl;
function check($url){
$pos = @strpos($url,:,1);
if($pos<1) return false;
$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->extra.);
$this->uchar = (.$this->unreserved.|.$this->escape.);
$this->xchar = (.$this->unreserved.|.$this->reserved.|.$this->escape.);
$this->digits = (.$this->digit.+);
$this->urlpath = (.$this->xchar.*);
$this->password = ((.$this->uchar.|[?;&=].)*);
$this->user = ((.$this->uchar.|[?;&=].)*);
$this->port = $this->digits;
$this->hostnumber = (.$this->digits…$this->digits…$this->digits…$this->digits.);
$this->alphadigit = (.$this->alpha.|.$this->digit.);
$this->toplabel = (.$this->alpha.|(.$this->alpha.(.$this->alphadigit.|-)*.$this->alphadigit.));
$this->domainlabel = (.$this->alphadigit.|(.$this->alphadigit.(.$this->alphadigit.|-)*.$this->alphadigit.));
$this->hostname = ((.$this->domainlabel.\\.)*.$this->toplabel.);
$this->host = (.$this->hostname.|.$this->hostnumber.);
$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->search.)?)?);
$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->selector.(%09.$this->search.(%09.$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->hostport./.$this->group.(/.$this->digits.)?);
$this->telneturl = ([tt][ee][ll][nn][ee][tt]://.$this->login./?);
$this->wpath = (.$this->uchar.*);
$this->wtype = (.$this->uchar.*);
$this->database = (.$this->uchar.*);
$this->waisdoc = ([ww][aa][ii][ss]://.$this->hostport./.$this->database./.$this->wtype./.$this->wpath.);
$this->waisindex = ([ww][aa][ii][ss]://.$this->hostport./.$this->database.[?].$this->search.);
$this->waisdatabase = ([ww][aa][ii][ss]://.$this->hostport./.$this->database.);
$this->waisurl = (.$this->waisdatabase.|.$this->waisindex.|.$this->waisdoc.);
}
}
?>
文件otherfunc.php的内容
<?php
//otherfunc.php
function htmlencode($str){
$str = (string)$str;
$ret = ;
$len = strlen($str);
$nl = false;
for($i=0;$i<$len;$i++){
$chr = $str[$i];
switch($chr){
case <:
$ret .= <;
$nl = false;
break;
case >:
$ret .= >;
$nl = false;
break;
case ":
$ret .= ";
$nl = false;
break;
case &:
$ret .= &;
$nl = false;
break;
/*
case :
$ret .= ;
$nl = false;
break;
*/
case chr(9):
$ret .= ;
$nl = false;
break;
case chr(10):
if($nl) $nl = false;
else{
$ret .= <br>;
$nl = true;
}
break;
case chr(13):
if($nl) $nl = false;
else{
$ret .= <br>;
$nl = true;
}
break;
default:
$ret .= $chr;
$nl = false;
break;
}
}
return $ret;
}
function htmlencode4textarea($str){
$str = (string)$str;
$ret = ;
$len = strlen($str);
for($i=0;$i<$len;$i++){
$chr = $str[$i];
switch($chr){
case <:
$ret .= <;
break;
case >:
$ret .= >;
break;
case ":
$ret .= ";
break;
case &:
$ret .= &;
break;
case :
$ret .= ;
break;
case chr(9):
$ret .= ;
break;
default:
$ret .= $chr;
break;
}
}
return $ret;
}
function emailcheck($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})$", $email)){
$ret=true;
}
}
return $ret;
}
function str2url($path){
return eregi_replace("%2f","/",urlencode($path));
}
?>