]*)>#i', '#]*)>#i'), array('<script\\1>', '</script\\1>'), $body); // Find all [code] tags and check if they contain a newline. If we find a newline, // that [code] should be rendered as a block, otherwise it will still be inline $mode = variable_get("bbcode_paragraph_breaks_$format", 2); $pre = array(); $i = 0; if (preg_match_all('#\[code(?::\w+)?\](.*?)\[/code(?::\w+)?\]#si', $body, $code_tags, PREG_SET_ORDER)) { foreach ($code_tags as $code_tag) { $code_tag[1] = str_replace(array('<', '>'), array('<', '>'), $code_tag[1]); if (strpos($code_tag[1], "\n") === FALSE) $body = str_replace($code_tag[0], ''. $code_tag[1] .'', $body); elseif ($mode) { // Strip preformatted code blocks from text during line break processing, replaced below $body = str_replace($code_tag[0], "***pRe_sTrInG$i***", $body); $pre[$i++] = '
'. $code_tag[1] .'
'; } else $body = str_replace($code_tag[0], '
'. $code_tag[1] .'
', $body); } } // Apply line and paragraph breaks (skipping preformatted code) if ($mode) { if ($mode == 1) // Line breaks only (starting with PHP 4.0.5, nl2br() is XHTML compliant) $body = nl2br($body); if ($mode == 2) { // Line and paragraph breaks (may not always be XHTML compliant) $body = preg_replace("/(\r\n|\n|\r)/", "\n", $body); $body = preg_replace("/\n\n+/", "\n\n", $body); $parts = explode("\n\n", $body); for ($i=0; $i/', $parts[$i]) ) $parts[$i] = nl2br($parts[$i]); // Some tags should not be in paragraph blocks if ( !preg_match('/^(?:<|\[)(?:table|list|ol|ul|pre|select|form|blockquote|hr)/i', $parts[$i]) ) $parts[$i] = '

'. $parts[$i] .'

'; } $body = implode("\n\n", $parts); } // Reinsert preformatted code blocks foreach ($pre as $i => $code_tag) $body = str_replace("***pRe_sTrInG$i***", $code_tag, $body); } // Add closing tags to prevent users from disruping your site's HTML // (required for nestable tags only: [list] and [quote]) preg_match_all('/\[quote/i', $body, $matches); $opentags = count($matches['0']); preg_match_all('/\[\/quote\]/i', $body, $matches); $unclosed = $opentags - count($matches['0']); for ($i = 0; $i < $unclosed; $i++) $body .= '[/quote]'; preg_match_all('/\[list/i', $body, $matches); $opentags = count($matches['0']); preg_match_all('/\[\/list\]/i', $body, $matches); $unclosed = $opentags - count($matches['0']); for ($i = 0; $i < $unclosed; $i++) $body .= '[/list]'; // begin processing for [size] if (stristr($body, '[size=') !== FALSE) { // prevent useless processing $arr = array( 'tag' => 'size', 'pattern' => '#\[\x07=([\d]+)(?::\w+)?\]([^\x07]*)\[/\x07(?::\w+)?\]#esi', 'replacement' => '"". str_replace(\'\"\', \'"\', \'$2\') .""', 'text' => $body); $body = _bbcode_replace_nest_tag($arr); } // end processing for [size] // begin processing for [color] if (stristr($body, '[color=') !== FALSE) { // prevent useless processing $arr = array( 'tag' => 'color', 'pattern' => '#\[\x07=([\#\w]+)(?::\w+)?\]([^\x07]*)\[/\x07(?::\w+)?\]#si', 'replacement' => '$2', 'text' => $body); $body = _bbcode_replace_nest_tag($arr); } // end processing for [color] // begin processing for [font] if (stristr($body, '[font=') !== FALSE) { // prevent useless processing $arr = array( 'tag' => 'font', 'pattern' => '#\[\x07=([\w\s]+)(?::\w+)?\]([^\x07]*)\[/\x07(?::\w+)?\]#si', 'replacement' => '$2', 'text' => $body); $body = _bbcode_replace_nest_tag($arr); } // end processing for [font] // begin processing for [list] and [*] if (stristr($body, '[list') !== FALSE) { // prevent useless processing $l_type = array( NULL => array('style' => 'circle', 'tag' => 'ul'), 'c' => array('style' => 'circle', 'tag' => 'ul'), 'd' => array('style' => 'disc', 'tag' => 'ul'), 's' => array('style' => 'square', 'tag' => 'ul'), '1' => array('style' => 'decimal', 'tag' => 'ol'), 'a' => array('style' => 'lower-alpha', 'tag' => 'ol'), 'A' => array('style' => 'upper-alpha', 'tag' => 'ol'), 'i' => array('style' => 'lower-roman', 'tag' => 'ol'), 'I' => array('style' => 'upper-roman', 'tag' => 'ol') ); $body = preg_replace('#(\[[/]*)list(.*?\])#si', "$1\x07$2", $body); // replace to
  • tags - [*]..[*]|[*]..[/list] $body = preg_replace('#\[\*(?::\w+)?\]([^\x07]*?)(?=\s*?(\[\*(?::\w+)?\]|\[/\x07(?::\w+)?\]))#si', '
  • $1
    • ', $body); // add tags to nested
  • - [/list]..[/list] $body = preg_replace('#(\[/\x07(?::\w+)?\])(?=[^\x07]*?\[/\x07(?::\w+)?\])#si', '$1
    • ', $body); // add tags to nested
  • - [/list]..[*]..[list] $body = preg_replace('#(\[/\x07(?::\w+)?\])(?=[^\x07]*?\[\*(?::\w+)?\][^\x07]*?\[\x07.*(?::\w+)?\])#si', '$1
    • ', $body); // replace to
  • tags for nested
  • - [*]..[list] $body = preg_replace('#\[\*(?::\w+)?\]([^\x07]*)?(?=\[\x07.*(?::\w+)?\])#si', '
  • $1', $body); // replace to
      /
        and
    / tags // It will be better to use &count and do-while, if php 5 or higher. while (preg_match("#\[\x07[=]*((?-i)[cds1aAiI])*(?::\w+)?\]([^\x07]*)\[/\x07(?::\w+)?\]#si", $body)) { $body = preg_replace("#\[\x07[=]*((?-i)[cds1aAiI])*(?::\w+)?\]([^\x07]*)\[/\x07(?::\w+)?\]#esi", '"<". $l_type[\'$1\']["tag"] ." class=\"bb-list\" style=\"list-style-type:". $l_type[\'$1\']["style"] .";\">". str_replace(\'\"\', \'"\', \'$2\') .""', $body); } // remove
    tags $body = preg_replace('#(<[/]*([uo]l|li).*>.*)
    #i', '$1', $body); } // end processing for [list] and [*] // Define BBCode tags $preg = array( // Implement [notag] '#\[notag(?::\w+)?\](.*?)\[/notag(?::\w+)?\]#sie' => '_bbcode_notag_tag(\'\\1\')', // Headings and indexes - articles will almost always need them '#\[h([1-6])(?::\w+)?\](.*?)\[/h[1-6](?::\w+)?\]#sie' => '_bbcode_generate_heading(\\1, \'\\2\')', '#\[index\s*/?\]#sie' => '_bbcode_generate_index($body)', '#\[index style=(ol|ul)\]#sie' => '_bbcode_generate_index($body, \'\\1\')', // Font, text and alignment '#\[align=(\w+)(?::\w+)?\](.*?)\[/align(?::\w+)?\]#si' => '\\2', '#\[float=(left|right)(?::\w+)?\](.*?)\[/float(?::\w+)?\]#si' => '\\2', '#\[justify(?::\w+)?\](.*?)\[/justify(?::\w+)?\]#si' => '
    \\1
    ', '#\[(b|strong)(?::\w+)?\](.*?)\[/(b|strong)(?::\w+)?\]#si' => '\\2', '#\[(i|em)(?::\w+)?\](.*?)\[/(i|em)(?::\w+)?\]#si' => '\\2', '#\[u(?::\w+)?\](.*?)\[/u(?::\w+)?\]#si' => '\\1', '#\[s(?::\w+)?\](.*?)\[/s(?::\w+)?\]#si' => '\\1', '#\[sup(?::\w+)?\](.*?)\[/sup(?::\w+)?\]#si' => '\\1', '#\[sub(?::\w+)?\](.*?)\[/sub(?::\w+)?\]#si' => '\\1', '#\[center(?::\w+)?\](.*?)\[/center(?::\w+)?\]#si' => '
    \\1
    ', '#\[left(?::\w+)?\](.*?)\[/left(?::\w+)?\]#si' => '
    \\1
    ', '#\[right(?::\w+)?\](.*?)\[/right(?::\w+)?\]#si' => '
    \\1
    ', // Links without a protocol, with a protocol, and with good looking text '#\[url(?::\w+)?\]www\.([\w:;&,%+~!=@\/\.\-\#\?]+?)\[/url(?::\w+)?\]#si' => '\\1', '#\[url(?::\w+)?\]([\w:;&,%+~!=@\/\.\-\#\?]+?)\[/url(?::\w+)?\]#si' => '\\1', '#\[url=www\.([\w:;&,%+~!=@\/\.\-\#\?]+?)\](.*?)\[/url(?::\w+)?\]#si' => '\\2', '#\[url=([\w:;&,%+~!=@\/\.\-\#\?]+?)\](.*?)\[/url(?::\w+)?\]#si' => '\\2', // Anchor tags for linking within documents '#\[anchor=(\w+)(?::\w+)?\](.*?)\[/anchor(?::\w+)?\]#si' => '\\2', // Images without or with client-side sizing '#\[img(?::\w+)?\]([\w:;&,~%+!=@\/\.\-\#\?]+)\[/img(?::\w+)?\]#si' => '', '#\[img=(\d+)x(\d+)(?::\w+)?\]([\w:;&,~%+!=@\/\.\-\#\?]+)\[/img(?::\w+)?\]#si' => '', '#\[img=([\w\s:;,\.\-\'\(\)]+)(?::\w+)?\]([\w:;&,~%+!=@\/\.\-\#\?]+)\[/img(?::\w+)?\]#si' => '\\1', '#\[img align=(left|right|center)(?::\w+)?\]([\w:;&,~%+!=@\/\.\-\#\?]+)\[/img(?::\w+)?\]#si' => '', // Flash animations and other special effects '#\[flash=(\d+)x(\d+)(?::\w+)?\]([\w:;&,~%+!=@\/\.\-\#\?]+)\[/flash(?::\w+)?\]#si' => '', // Acronyms & abbreviations - show description when mouse moves over tag '#\[acronym=([\w\s-,\.]+)(?::\w+)?\](.*?)\[/acronym(?::\w+)?\]#si' => '\\2', '#\[abbr=([\w\s-,\.]+)(?::\w+)?\](.*?)\[/abbr(?::\w+)?\]#si' => '\\2', // Quoting with or without specifying the source '#\[quote(?::\w+)?\]#i' => '
    '.$quote_text.'
    ', '#\[quote=(?:"|"|\')?(.*?)["\']?(?:"|"|\')?\]#i' => '
    '.$quote_user.'
    ', '#\[/quote(?::\w+)?\]#si' => '
    ', // PHP code blocks (syntax highlighted) '#\[php(?::\w+)?\](?:[\r\n])*(.*?)\[/php(?::\w+)?\]#sie' => '_bbcode_php_tag(\'\\1\')', // Links to popular sites '#\[google(?::\w+)?\]([\w\s-]+?)\[/google(?::\w+)?\]#si' => '\\1', '#\[wikipedia(?::\w+)?\]([\w\s-]+?)\[/wikipedia(?::\w+)?\]#si' => '\\1', '#\[youtube\]([0-9a-zA-Z]+)\[/youtube\]#si' => '', // Table tags '#\[table\](.+?)\[/table\]#si' => '\\1
    ', '#\[(row|r|tr)\](.+?)\[/(row|r|tr)\]#si' => '\\2', '#\[(row|r|tr) color=([\#\w]+)\](.+?)\[/(row|r|tr)\]#si' => '\\3', '#\[(header|head|h)\](.+?)\[/(header|head|h)\]#si' => '\\2', '#\[(col|c|td)\](.+?)\[/(col|c|td)\]#si' => '\\2', // Cleanup table output (td, th and tr tags) '#<([\/]?)t([dhr])>
    #si' => '<\\1t\\2>', '#
    #si' => '', ); $body = preg_replace(array_keys($preg), array_values($preg), $body); // Simple replacements (str_replace is faster than preg_replace) $str = array( // Horizontal delimiter '[hr]' => '
    ', // Force line break '[br]' => '
    ', // Force space '[sp]' => ' ', ); $body = str_replace(array_keys($str), array_values($str), $body); // We cannot evaluate the variable in callback function because // there is no way to pass the $format variable if (variable_get("bbcode_encode_mailto_$format", 1)) { // Replacing email addresses with encoded html $body = preg_replace_callback('#\[email(?::\w+)?\]([\w\.\-\+~@]+)\[/email(?::\w+)?\]#si', '_bbcode_encode_mailto', $body); $body = preg_replace_callback('#\[email=(.*?)(?::\w+)?\](.*?)\[/email(?::\w+)?\]#si', '_bbcode_encode_mailto', $body); } else { $body = preg_replace( array('#\[email(?::\w+)?\](.*?)\[/email(?::\w+)?\]#si','#\[email=(.*?)(?::\w+)?\]([\w\s]+)\[/email(?::\w+)?\]#si'), array('\\1', '\\2'), $body); } // Turns web and e-mail addresses into clickable links if (variable_get("bbcode_make_links_$format", 1)) { // pad with a space so we can match things at the start of the 1st line $ret = ' ' . $body; // padding to already filtered links $ret = preg_replace('#()(.+)#i', "$1\x07$2", $ret); // matches an "xxx://yyyy" URL at the start of a line, or after a space. // xxxx can only be alpha characters. // yyyy is anything up to the first space, newline, comma, double quote or < $ret = preg_replace('#(?<=^|[\t\r\n >\(\[\]\|])([a-z]+?://[\w\-]+\.([\w\-]+\.)*\w+(:[0-9]+)?(/[^ "\'\(\n\r\t<\)\[\]\|]*)?)((?\1', $ret); // matches a "www|ftp.xxxx.yyyy[/zzzz]" kinda lazy URL thing // Must contain at least 2 dots. xxxx contains either alphanum, or "-" // zzzz is optional.. will contain everything up to the first space, newline, // comma, double quote or <. $ret = preg_replace('#([\t\r\n >\(\[\|])(www|ftp)\.(([\w\-]+\.)*[\w]+(:[0-9]+)?(/[^ \"\'\(\n\r\t<\)\[\]\|]*)?)#i', '\1\2.\3', $ret); // matches an email@domain type address at the start of a line, or after a space. // Note: Only the followed chars are valid; alphanums, "-", "_" and or ".". if (variable_get("bbcode_encode_mailto_$format", 1)) $ret = preg_replace_callback("#([\t\r\n ])([a-z0-9\-_.]+?)@([\w\-]+\.([\w\-\.]+\.)*[\w]+)#i", '_bbcode_encode_mailto', $ret); else $ret = preg_replace('#([\t\r\n ])([a-z0-9\-_.]+?)@([\w\-]+\.([\w\-\.]+\.)*[\w]+)#i', '\\1\\2@\\3', $ret); // Remove our padding $ret = str_replace("\x07", '', $ret); $body = substr($ret, 1); } if (variable_get("bbcode_filter_nofollow_$format", 0)) { $body = preg_replace('#]+)>#i', '', $body); } return $body; } function _bbcode_generate_heading($level, $text) { $anchor = preg_replace('/([\s]+)/', '_', $text); $anchor = preg_replace('/([\W]+)/', '', $anchor); return ''. $text .''; } function _bbcode_generate_index($body, $tag = 'ol') { $level = 0; $index = '<'. $tag .">\n"; $close_tags = 0; if (preg_match_all('#\[h([1-6]).*?\](.*?)\[/h([1-6]).*?\]#si', $body, $head_tags, PREG_SET_ORDER)) { foreach ($head_tags as $head_tag) { if ($level == 0) $level = $head_tag[1]; $anchor = preg_replace('/([\s]+)/', '_', $head_tag[2]); $anchor = preg_replace('/([\W]+)/', '', $anchor); if ($head_tag[1] > $level) { $index .= '<'. $tag .">\n"; $index .= '
  • '. $head_tag[2] ."\n"; $close_tags++; $level = $head_tag[1]; } else if ($head_tag[1] < $level) { while ($close_tags > 0) { $index .= '\n"; $close_tags--; } $index .= '
  • '. $head_tag[2] ."\n"; $level = $head_tag[1]; } else { $index .= '
  • '. $head_tag[2] ."\n"; $level = $head_tag[1]; } } } while ($close_tags >= 0) { $index .= '\n"; $close_tags--; } return $index; } function _bbcode_encode_mailto($matches) { if (isset($matches[3])) $link = 'document.write(\'' . $matches[2].'@'.$matches[3] . '\');'; else $link = 'document.write(\'' . (isset($matches[2]) ? $matches[2] : $matches[1]) . '\');'; $js_encode = ''; for ($x = 0; $x < strlen($link); $x++) $js_encode .= '%' . bin2hex($link{$x}); $link = ''; if (isset($matches[3])) $link = $matches[1] . $link; return $link; } function _bbcode_notag_tag($text = NULL) { return str_replace( array('[', ']', '@'), array('[', ']', '@'), stripslashes($text)); } function _bbcode_php_tag($text = NULL) { return '
    '. highlight_string( str_replace('
    ', '', stripslashes($text)), true) .'
    '; } function _bbcode_round_size_val($size) { if ($size < 6) return 6; elseif ($size > 48) return 48; else return $size; } function _bbcode_replace_nest_tag($arr = NULL) { $text = preg_replace('#(\[[/]*)'. $arr['tag'] .'(.*?\])#si', "$1\x07$2", $arr['text']); // It will be better to use &count and do-while, if php 5 or higher. while (preg_match($arr['pattern'], $text)) { $text = preg_replace($arr['pattern'], $arr['replacement'], $text); } return $text; }