Discuz教程网

1314学习网»站长论坛 › 1314学习交流区 › php学习 › PHP源码 › PHP操作ubb代码类
返回列表 发新帖

PHP操作ubb代码类

[复制链接]
authicon dly 发表于 2011-1-7 12:43:29 | 显示全部楼层 |阅读模式
  1. //ubbcode类  
  2. class ubbcode
  3. {  
  4.     var $nest;  // 递归深度，for debug
  5.     //可处理标签及处理函数表  
  6.     var $tags = array(
  7.         \'url\' => \'$this->url\',  
  8.         \'email\' => \'$this->email\',  
  9.         \'mail\' => \'$this->email\',  // 为了容错，[mail]和[email]等效
  10.         \'img\' => \'$this->img\',  
  11.         \'b\' => \'$this->simple\',  
  12.         \'i\' => \'$this->simple\',  
  13.         \'u\' => \'$this->simple\',  
  14.         \'tt\' => \'$this->simple\',  
  15.         \'s\' => \'$this->simple\',  
  16.         \'strike\' => \'$this->simple\',  
  17.         \'h1\' => \'$this->simple\',  
  18.         \'h2\' => \'$this->simple\',  
  19.         \'h3\' => \'$this->simple\',  
  20.         \'h4\' => \'$this->simple\',  
  21.         \'h5\' => \'$this->simple\',  
  22.         \'h6\' => \'$this->simple\',  
  23.         \'sup\' => \'$this->simple\',  
  24.         \'sub\' => \'$this->simple\',  
  25.         \'em\' => \'$this->simple\',  
  26.         \'strong\' => \'$this->simple\',  
  27.         \'code\' => \'$this->simple\',   
  28.         \'small\' => \'$this->simple\',  
  29.         \'big\' => \'$this->simple\',  
  30.         \'blink\' => \'$this->simple\',
  31.         \'fly\' => \'$this->fly\',
  32.         \'move\' => \'$this->move\',
  33.         \'glow\' => \'$this->CSSStyle\',
  34.         \'shadow\' => \'$this->CSSStyle\',
  35.         \'blur\' => \'$this->CSSStyle\',
  36.         \'wave\' => \'$this->CSSStyle\',
  37.         \'sub\' => \'$this->simple\',
  38.         \'sup\' => \'$this->simple\',
  39.         \'size\' => \'$this->size\',
  40.         \'face\' => \'$this->face\',
  41.         \'font\' => \'$this->face\',  // 为了容错，[font]和[face]等效
  42.         \'color\' => \'$this->color\',
  43.         \'html\' => \'$this->html\',
  44.         \'quote\' => \'$this->quote\',
  45.         \'swf\' => \'$this->swf\',
  46.         \'upload\' => \'$this->upload\'
  47.         );  
  48.     function ubbcode()
  49.     {  
  50.       $this->$nest= 0;
  51.       $this->$sLastModified= sprintf("%s", date("Y-m-j H:i", getlastmod()));
  52.     }  

  54.     /***********************************************************************
  55.     *  对使用者输入的 E-Mail 作简单的检查，
  56.     *  检查使用者的 E-Mail 字串是否有 @ 字元，
  57.     *  在 @ 字元前有英文字母或数字，在之后有数节字串，
  58.     *  最后的小数点后只能有二个或三个英文字母。
  59.     *  [email]super@mail.wilson.gs[/email] 就可以通过检查，[email]super@mail.wilson[/email] 就不能通过检查
  60.     ************************************************************************/
  61.     function emailcheck($str)
  62.     {
  63.       if (eregi("^[_\\.0-9a-z-]+@([0-9a-z][0-9a-z-]+\\.)+[a-z]{2,3}$", $str))
  64.         return true;
  65.       else
  66.         return false;  
  67.     }
  68.     /***********************************************************************
  69.     *  对使用者输入的 URL 作简单的检查，
  70.     *  目前只能简单判断，不能自动检查fpt，finger等
  71.     ************************************************************************/
  72.     function checkURL($str)
  73.     {
  74.       $bValidURL= true;
  75.       if (eregi("([a-z0-9-]+([\\.][a-z0-9\\-]+)+)", $str, $er_arr))
  76.       {   
  77.   /*
  78.   printf ("0. %s
  79. \\n", $er_arr[0]);
  80.   printf ("1. %s
  81. \\n", $er_arr[1]);
  82.   printf ("2. %s
  83. \\n", $er_arr[2]);
  84.   printf ("3. %s
  85. \\n", $er_arr[3]);
  86.   printf ("4. %s
  87. \\n", $er_arr[4]);
  88.   */
  89.       }
  90.       else
  91.          $bValidURL= false;
  92.       return $bValidURL;
  93.     }
  94.     /***********************************************************************
  95.     *  对使用者输入的 图片URL 作简单的检查，
  96.     *  目前只能简单判断结尾是否为图片文件
  97.     *  不支持由CGI动态生成的图片，比如计数器这类的
  98.     ************************************************************************/
  99.     function checkImgURL($str)
  100.     {
  101.       if ($this->checkURL($str)) {
  102.         if(eregi("\\.(jpeg|jpg|gif|bmp|png|pcx|tiff|tga|lwf)$", $str))
  103.           return true;
  104.         else
  105.           return false;
  106.       }
  107.       else
  108.         return false;
  109.     }
  110.     /***********************************************************************
  111.     *  自动补全URL部分，主要是协议前缀，
  112.     *  默认是htpp://，支持https://；ftp://；finger://；gopher://等
  113.     *  函数并不对URL的合法性作检查
  114.     ************************************************************************/
  115.     function formatURL($str)
  116.     {
  117.       if (!eregi("^(ftp|http|https|mms|gopher|finger|bbs|telnet)\\/\\/|\\\\\\\\)", $str))
  118.         $str= \'http://\'.$str;
  119.       return $str;
  120.     }
  121.     //对$str进行UBB编码解析  
  122.     function parse($str)
  123.     {  
  124.         $nest ++;
  125.         $parse = \'\'.($str);  
  126.         $ret = \'\';  
  127.         while(true){  
  128.             //查找[xx] 或者[xx=xx] , 但不包括[xx=]
  129.             $eregi_ret=eregi("\\[([a-z][a-z0-9]{0,7})(=[a-zA-Z0-9#.:/&@|\\?,%=_\\+\\"\\\']+)?\\]", $parse, $eregi_arr);
  130.             if(!$eregi_ret)
  131.             {  
  132.                 $ret .= $parse;  
  133.                 break; //如果没有，返回  
  134.             }
  135. /*  for Debug
  136.             else
  137.             {
  138.               printf ("$. %s
  139. ", $eregi_ret);
  140.               printf ("0. %s
  141. ", $eregi_arr[0]);
  142.               printf ("1. %s
  143. ", $eregi_arr[1]);
  144.               printf ("2. %s
  145. ", $eregi_arr[2]);
  146.               printf ("3. %s
  147. ", $eregi_arr[3]);
  148.             }
  149. */

  151.             $pos = @strpos($parse, $eregi_arr[0]);  // 起始位置
  152.             $tag_start= $eregi_arr[1];
  153.             $tag= strtolower($eregi_arr[1]);
  154.             $tag_param= $eregi_arr[2];
  155.             $parse2 = substr($parse, 0, $pos);//标记之前
  156.             $parse = substr($parse, $pos + $eregi_ret);//标记之后
  157.             if(!isset($this->tags[$tag]))
  158.             {  
  159.                 $ret .= $parse2.\'[\'.$tag_start.\']\';  
  160.                 continue;    //如果是不支持的标记  
  161.             }  
  162.             //查找对应的结束标记  
  163.             $eregi_ret=eregi("\\[(/".$tag.")\\]", $parse, $eregi_arr);  
  164.             if(!$eregi_ret)
  165.             {  
  166.                 $ret .= $parse2.\'[\'.$tag_start.$tag_param.\']\';  
  167.                 continue;//没有对应该的结束标记  
  168.             }  
  169.             $pos= strpos($parse, $eregi_arr[0]);  
  170.             $value= substr($parse, 0, $pos);   //起止标记之间的内容
  171.             $tag_end= $eregi_arr[1];
  172.             $parse= substr($parse, $pos + $eregi_ret);//结束标记之后的内容  
  173.             // 允许嵌套标记，递归分析
  174.             if (!(($tag == \'code\') or ($tag=="url") or ($tag=="email") or ($tag=="img"))){
  175.                 $value= $this->parse($value);  
  176.             }
  177.             $ret.= $parse2;
  178.             $parseFun= sprintf(\'$ret .= %s($tag_start, $tag_param, $tag_end, $value);\', $this->tags[$tag]);
  179.             eval($parseFun);  
  180.         }  
  181.         $nest --;
  182.         return $ret;  
  183.     }
  184.   /*****************************************************
  185.     * 简单替换，类似变为
  186.     * 标签内容不便，只是替代括号为<>
  187.     *****************************************************/
  188.     function simple($start, $para, $end, $value){
  189.         if (strlen($para) > 0)
  190.           return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  191.         else
  192.           return sprintf("<%s>%s<%s>", $start, $value, $end);
  193.     }
  194.     /*****************************************************
  195.     * 如下认为合法可以没有“http://”；ftp一定要自己加“ftp://”
  196.     * 93611
  197.     * [/URL]
  198.     * [url]http://www.fogsun.com[/url]
  199.     *****************************************************/
  200.     function url($start, $para, $end, $value){  
  201.         $sA= $value;
  202.         $sURL= substr(trim($para), 1);
  203.         if (strlen($sURL) > 0)
  204.         {
  205.           if (strlen($value) == 0)
  206.             $sA= $sURL;
  207.         }
  208.         else
  209.         {
  210.           $sURL= trim($value);
  211.         }
  212.         $sURL= $this->formatURL($sURL);
  213.         if($this->checkURL($sURL))
  214.           return "[url=%5C%22$sURL%5C%22]$sA";  
  215.         else {
  216.           return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  217.         }
  218.     }  
  219.     /*****************************************************
  220.     * 如下认为合法可以没有“mailto:”头；
  221.     * pazee
  222.     *
  223.     * [email]pazee@21cn.com[/email]
  224.     *****************************************************/
  225.     function email($start, $para, $end, $value){  
  226.         $sA= $value;
  227.         $sURL= substr(trim($para), 1);
  228.         if (strlen($sURL) > 0)
  229.         {
  230.           if (strlen($value) == 0)
  231.             $sA= $sURL;
  232.         }
  233.         else
  234.         {
  235.           $sURL= trim($value);
  236.         }
  237.         //if (strtolower(substr($sURL, 0, 7)) != "mailto:")  
  238.           $sURL= "mail.php?email=". $sURL;  
  239.         if($this->emailcheck(substr($sURL, 15)))
  240.           return "[url=%5C%22$sURL%5C%22]$sA[/url]";  
  241.         else
  242.           return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  243.     }  
  244.     /*****************************************************
  245.     * 显示图片；如下用法认为合法
  246.     * [img=www.21cn.com/title.jpg][/img]
  247.     *
  248.     *****************************************************/
  249.     function img($start, $para, $end, $value){  
  250.         $sURL= substr(trim($para), 1);
  251.         if (strlen($sURL) <= 0)
  252.           $sURL= trim($value);
  253.         //$sURL= $this->formatURL($sURL);
  254.         if ($this->checkImgURL($sURL))  
  255.           return sprintf("", $sURL,$sURL);  
  256.         else
  257.           return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  258.     }  
  259.     /*****************************************************
  260.     * 字符串从右向左循环移动
  261.     * 无参数
  262.     * 等效与html的
  263.     *****************************************************/
  264.     function fly($start, $para, $end, $value){  
  265.       if (strlen($para)>0) // 有参数
  266.         return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  267.       else
  268.         return \'\'.$value.\'\';  
  269.     }  
  270.     /*****************************************************
  271.     * 字符串来回移动
  272.     * 无参数
  273.     * 等效与html的
  274.     *****************************************************/
  275.     function move($start, $para, $end, $value) {
  276.       if (strlen($para)>0) // 有参数
  277.         return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  278.       else
  279.         return \'\'.$value.\'\';  
  280.     }  
  281.     /*****************************************************
  282.     * 字符晕光效果包括 glow、shadow和blur
  283.     * 字符晕光效果[glow=a,b,c]或者[shadow=a,b,c]
  284.     * 3个参数允许缺省
  285.     * 实现文字阴影特效，
  286.     * glow, shadow,blur 属性依次为颜色、宽度和边界大小
  287.     * wave 属性依次为变形频率、宽度和边界大小
  288.     *****************************************************/
  289.     function CSSStyle(&$start, &$para, &$end, &$value){
  290.         $rets= sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  291.         if (strlen($para)==0)
  292.         {
  293.           $para="=,,";
  294.         }
  295.         if (eregi("^=([#]?[[:xdigit:]]{6}|[a-z0-9]*),([0-9]*),([0-9]*)", $para, $er_arr))
  296.         {
  297.           $color=  ($er_arr[1] != "") ? $er_arr[1] : red;   // Default Color
  298.           $width=  ($er_arr[2] != "") ? $er_arr[2] : 400;   // Default Width
  299.           $border= ($er_arr[3] != "") ? $er_arr[3] : 5;     // Default Border
  300.           switch ($start)
  301.           {
  302.             case "glow":
  303.             case "shadow":
  304.               $rets= sprintf("%s", $start, $color, $border, $width, $value);
  305.               break;
  306.             case "blur";
  307.               $rets= sprintf("%s", $start, $border, $color, $width, $value);
  308.               break;
  309.             case "wave":
  310.               $color=  ($er_arr[1] != "") ? $er_arr[1] : 4;   // Default Color
  311.               $border= ($er_arr[3] != "") ? $er_arr[3] : 2;     // Default Border
  312.               $rets= sprintf("%s", $start, $color, $border, $width, $value);
  313.               break;
  314.           }
  315.         }
  316.         return  $rets;
  317.     }  
  318.     /*****************************************************
  319.     * 字体颜色 xxx
  320.     * n 可以是 #xxxxxx 或者 xxxxxx (6位16进制数)
  321.     * red,greed,blue,black等颜色保留字也有效
  322.     * 等效与html的xxx
  323.     * [color]xxxx等效于
  324.     *****************************************************/
  325.     function color($start, $para, $end, $value){
  326.         $cl= strtolower(substr($para, 1));
  327.         if ($cl == "")
  328.           $cl= "red";
  329.         if (eregi("(^[#]?[[:xdigit:]]{6})|red|green|blue|yellow|blue|white|gray|brown|silver|purple|orange" ,$cl))
  330.           return sprintf("%s",$cl, $value);
  331.         else
  332.           return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  333.     }
  334.     /*****************************************************
  335.     * 字体大小 [size=n]xxx 1<= n <= 7；
  336.     * 等效与html的[size=n]xxx
  337.     *****************************************************/
  338.     function size($start, $para, $end, $value){
  339.         $size= substr($para, 1);
  340.         if ($size >=1 && $size <=7 && (strlen($para) > 1))
  341.           return sprintf("[size=%s]%s",$size, $value);
  342.         else
  343.           return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  344.     }  
  345.     /*****************************************************
  346.     * 字体名字 [face=n] n字体名称，不需要引号
  347.     * 等效与html的xxx
  348.     *****************************************************/
  349.     function face($start, $para, $end, $value){
  350.         $fn= substr($para, 1);
  351.         if (!eregi("[[:punct:]]", $fn) && strlen($para) > 1) {
  352.           switch (strtoupper($fn))
  353.           {
  354.             case "ST":
  355.               $fn= "宋体";
  356.               break;
  357.             case "HT":
  358.               $fn= "黑体";
  359.               break;
  360.             case "KT":
  361.               $fn= "楷体_GB2312";
  362.               break;
  363.             case "FT":
  364.               $fn= "仿宋_GB2312";
  365.               break;
  366.             case "YY":
  367.               $fn= "幼圆";
  368.               break;
  369.             case "LS":
  370.               $fn= "隶书";
  371.               break;
  372.             case "XST":
  373.               $fn= "新宋体";
  374.               break;
  375.             default:
  376.               $fn= substr($para, 1);
  377.           }
  378.           return sprintf("%s",$fn, $value);
  379.         }
  380.         else
  381.           return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);
  382.     }  
  383.      /*****************************************************
  384.     * 文件上传[upload]
  385.     *****************************************************/
  386.     function upload($start, $para, $end, $value){
  387.         $fn= trim(substr($para, 1));
  388.         if (!eregi("[[:punct:]]", $fn) && strlen($para) > 1) {
  389.             if (eregi("jpg|jpeg|bmp|gif|png", $fn)) {
  390.                 if ($this->checkImgURL($value))  
  391.                     return sprintf(" 此主题相关图片如下:


  394. ",$fn,$value,$value);
  395.                 else
  396.                     return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);   
  397.             } elseif ($fn == "swf") {
  398.                 return sprintf(" 此主题相关Flash:


  401. [url=%5C%22%s%5C%22]全屏欣赏[/url] (点右键->另存为可将动画下载)",$fn,$value,$value);
  402.             } elseif (eregi("rar|zip|doc", $fn)) {
  403.                 return sprintf(" [url=%5C%22%s%5C%22]点击下载此主题相关附件[/url]
  404. ",$fn,$value);
  405.             }
  406.         } else
  407.             return sprintf("[%s%s]%s[%s]", $start, $para, $value, $end);            
  408.     }     
  409.     /*****************************************************
  410.     * 调试代码标签[html]
  411.     *****************************************************/
  412.     function html($start, $para, $end, $value)

  414.     {
  415.       if (strlen($value) > 0) {
  416.           $value = eregi_replace(\'
  417. \', "", $value);
  418.           return sprintf("
  419. %s
  420. [Ctrl+A 全部选择提示：你可先修改部分代码，再按运行]
  421. ",$value);
  422.       } else {
  423.           return sprintf("[%s]%s[%s]", $start, $value, $end);
  424.       }
  425.     }
  426.     /*****************************************************
  427.     * 引用标签[quote]
  428.     *****************************************************/
  429.     function quote($start, $para, $end, $value)
  430.     {
  431.       if (strlen($value) > 0) {
  432.           return sprintf("



  436. 以下为引用内容:
  437. %s
  438. ",$value);
  439.       } else {
  440.           return sprintf("[%s]%s[%s]", $start, $value, $end);
  441.       }
  442.     }
  443.     /*****************************************************
  444.     * FLASH[swf]
  445.     *****************************************************/
  446.     function swf($start, $para, $end, $value)

  448.     {

  450.       if (strlen($value) > 0) {

  452.           return sprintf ("

  454. [url=%5C%22%s%5C%22]全屏欣赏[/url] (点右键->另存为可将动画下载)",$value,$value);

  456.       } else {

  458.           return sprintf("[%s]%s[%s]", $start, $value, $end);

  460.       }

  462.     }

  464. }  
  465. ?>
复制代码







上一篇：php调用web service方法
下一篇：Smarty缩图函数
回复

举报

authicon nancybingling 发表于 2011-6-18 09:59:58 | 显示全部楼层
支持!好东西，拿走了！
回复

举报

authicon lightning123 发表于 2011-6-22 01:59:44 | 显示全部楼层
看看  好像不错
回复

举报

authicon D_hong 发表于 2011-6-26 11:59:59 | 显示全部楼层
看一下啊，嘻嘻
回复

举报

authicon 月之海洋 发表于 2011-6-27 07:59:54 | 显示全部楼层
这个贴不错！！！
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

1314学习网 ( 浙ICP备10214163号 )

GMT+8, 2025-5-3 07:29

Powered by Discuz! X3.4

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表