RSS
热门关键字： 　数据挖掘 　人工智能 　数据仓库 　搜索引擎 　数据挖掘导论
当前位置 :| 首页>编程技术>Php技术教程>

很久没来这里了，各位可好？！

来源： 作者：unkonwn 时间：2006-03-06 点击：

<?
//ubbcode类
  class ubbcode{
  var $call_time=0;
  //可处理标签及处理函数对应表
  var $tags = array( //小写的标签 => 对应的处理函数
  "url" => "$this->url",
  "email" => "$this->email",
  "img" => "$this->img",
"flash" => "$this->flash",
"sound" => "$this->sound",

"black" => "$this->font_color",
"white" => "$this->font_color",
"red" => "$this->font_color",
"pink" => "$this->font_color",
"blue" => "$this->font_color",
"green" => "$this->font_color",
"olive" => "$this->font_color",
"navy" => "$this->font_color", 数据挖掘研究院
"gray"=> "$this->font_color",
"fuchsia" => "$this->font_color",
"yellow" => "$this->font_color",
"silver" => "$this->font_color",
"purple" => "$this->font_color",

"marquee" => "$this->simple",
  "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") or ($tag=="flash")) 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")and ($tag!="flash")){
  $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."]";
  }

  function flash($start,$end,$value){
  $trim_value=trim($value);
  if ((strtolower(substr($trim_value,0,7))!="http://") or ($this->urlcheck->check($trim_value)))

return "<embed src=".$trim_value." quality=high pluginspage=http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash type=application/x-shockwave-flash width=520 height=360>";

  else return "[".$start."]".$value."[/".$end."]";
  } 数据挖掘研究院

function sound($start,$end,$value){
  $trim_value=trim($value);
  if ((strtolower(substr($trim_value,0,7))!="http://") or ($this->urlcheck->check($trim_value)))

return "<embed src=".$trim_value." hidden autostart=true loop=true>";

  else return "[".$start."]".$value."[/".$end."]";
  }

function font_color($start,$end,$value){
if(strstr("black|white|red|pink|blue|green|olive|navy|gray|fuchsia|yellow|silver|purple",$start))
return "<font color=".$start.">".$value."</font>";
else return "[".$start."]".$value."[/".$end."]";
  }
  }
   
//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.")";
  }
  }
   

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));
  }

?>
--------------------------

说明：在网上找了半天发现全是何志强的那段代码，我也就拿来改了一下用上了。其中加入了一部分自己的内容，只是还不太清楚如何规定图片等元素的大小。我曾经把 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."]";
  }
改为：
function img($start,$end,$value){
  $trim_value=trim($value);
  if ((strtolower(substr($trim_value,0,7))!="http://") or ($this->urlcheck->check($trim_value)))
{
$pisces=explode(" ",$start);
if(!is_int($pisces[1]) || !!is_int($pisces[2]))

数据挖掘研究院


return "<img src="".$trim_value."" width=$pisces[1] height=$pisces[2]></img>";
else
return "<img src="".$trim_value.""></img>";
}
  
  else return "[".$start."]".$value."[/".$end."]";
  }

但由于对前面的正则表达式不熟悉没成功。
[数据挖掘工作交流] [数据挖掘研究院] [数据挖掘论坛] [数据挖掘实验室]
上一篇：键盘和鼠标事件测试
下一篇：一个用session传递对象的典型例子,和用面向对象编程的朋友共同分
最新评论共有 0 位网友发表了评论
查看所有评论
发表评论
评论内容：不能超过250字，需审核，请自觉遵守互联网相关政策法规。
匿名?
热点关注
相关文章
关于我们 - 联系方式 - 版权申明 - 友情链接 - 交流空间 - 同徽科技
增值电信业务经营许可证编号：皖B2-20040042 文网文编号：[2005]027号