| // +----------------------------------------------------------------------+ // // $Id: Links.php,v 1.12 2007/07/02 18:26:17 cweiske Exp $ // /** * @package HTML_BBCodeParser * @author Stijn de Reede */ require_once 'HTML/BBCodeParser/Filter.php'; /** * */ class HTML_BBCodeParser_Filter_Links extends HTML_BBCodeParser_Filter { /** * List of allowed schemes * * @access private * @var array */ var $_allowedSchemes = array('http', 'https', 'ftp'); /** * Default scheme * * @access private * @var string */ var $_defaultScheme = 'http'; /** * An array of tags parsed by the engine * * @access private * @var array */ var $_definedTags = array( 'url' => array( 'htmlopen' => 'a', 'htmlclose' => 'a', 'allowed' => 'none^img', 'attributes'=> array('url' => 'href=%2$s%1$s%2$s') ) ); /** * Executes statements before the actual array building starts * * This method should be overwritten in a filter if you want to do * something before the parsing process starts. This can be useful to * allow certain short alternative tags which then can be converted into * proper tags with preg_replace() calls. * The main class walks through all the filters and and calls this * method if it exists. The filters should modify their private $_text * variable. * * @return none * @access private * @see $_text * @author Stijn de Reede * @author Seth Price */ function _preparse() { $options = PEAR::getStaticProperty('HTML_BBCodeParser', '_options'); $o = $options['open']; $c = $options['close']; $oe = $options['open_esc']; $ce = $options['close_esc']; $schemes = implode('|', $this->_allowedSchemes); $pattern = array( "/(?_text); $pp = preg_replace($pattern[1], $o."url=\$2\$1\$2".$o."/url".$c, $pp); $this->_preparsed = preg_replace_callback($pattern[2], array($this, 'smarterPPLink'), $pp); } /** * Intelligently expand a URL into a link * * @return string * @access private * @author Seth Price * @author Lorenzo Alberton */ function smarterPPLinkExpand($matches) { //echo '

';var_dump($matches);echo '

'; $options = PEAR::getStaticProperty('HTML_BBCodeParser','_options'); $o = $options['open']; $c = $options['close']; //If we have an intro tag that is [url], then skip this match if ($matches[1] == $o.'url'.$c) { return $matches[0]; } $punctuation = '.,;:'; // Links can't end with these chars $trailing = ''; // Knock off ending punctuation $last = substr($matches[2], -1); while (strpos($punctuation, $last) !== false) { // Last character is punctuation - remove it from the url $trailing = $last.$trailing; $matches[2] = substr($matches[2], 0, -1); $last = substr($matches[2], -1); } $off = strpos($matches[2], ':'); //Is a ":" (therefore a scheme) defined? if ($off === false) { /* * Create a link with the default scheme of http. Notice that the * text that is viewable to the user is unchanged, but the link * itself contains the "http://". */ return $matches[1].$o.'url='.$this->_defaultScheme.'://'.$matches[2].$c.$matches[2].$o.'/url'.$c.$trailing; } $scheme = substr($matches[2], 0, $off); /* * If protocol is in the approved list than allow it. Note that this * check isn't really needed, but the created link will just be deleted * later in smarterPPLink() if we create it now and it isn't on the * scheme list. */ if (in_array($scheme, $this->_allowedSchemes)) { return $matches[1].$o.'url'.$c.$matches[2].$o.'/url'.$c.$trailing; } return $matches[0]; } /** * Finish preparsing URL to clean it up * * @return string * @access private * @author Seth Price */ function smarterPPLink($matches) { $options = PEAR::getStaticProperty('HTML_BBCodeParser','_options'); $o = $options['open']; $c = $options['close']; $urlServ = $matches[1]; $path = $matches[5]; $off = strpos($urlServ, ':'); if ($off === false) { //Default to http $urlServ = $this->_defaultScheme.'://'.$urlServ; $off = strpos($urlServ, ':'); } //Add trailing slash if missing (to create a valid URL) if (!$path) { $path = '/'; } $protocol = substr($urlServ, 0, $off); if (in_array($protocol, $this->_allowedSchemes)) { //If protocol is in the approved list than allow it return $o.'url='.$urlServ.$path.$c.$matches[6].$o.'/url'.$c; } //Else remove url tag return $matches[6]; } } ?>