", $s);
// [youtube] code added 30th Jan 2010
$s = preg_replace("#\[youtube\](.*)\[\/youtube\]#Ui", "", $s);
$s = preg_replace("#\[quote\]#i", "\"", $s);
if (PHP_VERSION >= 5) {
$highlight_string_type = 'span';
} else {
$highlight_string_type = 'font';
}
//$s = preg_replace("#\[php\]\<#i", "
<$highlight_string_type style=\"color: #000000;\">\n<", $s);
// [list]...[/list] parse
if (preg_match("#\[list\](.*?)\[\/list\]#is", $s)) {
preg_match_all("#\[list\](.*?)\[\/list\]#is", $s, $list);
$list = $list[1];
$backupList = $list;
// now seperate lines
foreach ($list as $listNum => $lt) {
$lt = explode("\n", $lt);
unset($lt[0], $lt[count($lt)]); // get rid of first/last arrays
foreach ($lt as $ltaNum => $lta) {
$lta = str_replace("\n", '', $lta);
$lt[$ltaNum] = ''.$lta.' ';
}
$lt = implode("", $lt);
$list[$listNum] = '' . "\n" . $lt . "\n" . '
';
// replace...
foreach ($backupList as $backupListNum => $bla) {
$s = str_replace($bla, $list[$backupListNum], $s);
}
}
$s = $this->stir('[list]stir('[/list]', '', $s);
}
// [list=xxx]...[/list] parse
if (preg_match("#\[list\=([A-z]{1,})\](.*?)\[\/list\]#is", $s)) {
preg_match_all("#\[list\=([A-z]{1,})\](.*)\[\/list\]#Uis", $s, $listd);
$listd = $listd[2];
$backupListd = $listd;
foreach ($listd as $listdNum => $ltd) {
$ltd = explode("\n", $ltd);
unset($ltd[0], $ltd[count($ltd)]);
foreach ($ltd as $ltdNum => $ltda) {
$ltda = str_replace("\n", '', $ltda);
$ltd[$ltdNum] = ''.$ltda.' ';
}
$ltd = implode("", $ltd);
$listd[$listdNum] = '' . "\n" . $ltd . "\n" . '
';
foreach ($backupListd as $backupListdNum => $blda) {
$s = str_replace($blda, $listd[$backupListdNum], $s);
}
}
$s = preg_replace("#\[list\=([A-z]{1,})\]stir('[/list]', '', $s);
}
// clean empty LISTs
$s = preg_replace("#\([\r\n])\<\/li\>#", '', $s);
// fix line formats (neccessary for deparse process)
$s = $this->stir('', " \n", $s);
// E x t r a s
if ($protectMails != 0) {
$mails = preg_match_all("#\#Ui", $s, $mailsFound);
$correctMails = $mailsFound[1];
foreach ($correctMails as $mailNum => $mailContent) {
$protected = $this->protect($correctMails[$mailNum]);
$currMail = $correctMails[$mailNum];
$currMail = str_replace('#', '\#', $currMail);
$s = preg_replace("#\#i", "", $s);
}
$simplemPattern = "#\(.*)\@(.*)\<\/a\>#Ui"; // * simplem = simple Mail
$simplemProtect = preg_match_all($simplemPattern, $s, $simplemFound);
$simplemImportant = $simplemFound[1];
$smCount = count($simplemImportant);
for ($csm = 0; $csm < $smCount; $csm++) {
$this_simplem = $simplemImportant[$csm];
$smExp = explode('&', $this_simplem);
// clean up that array
foreach ($smExp as $smArNum => $smEntries) {
$remove = array('#', ';');
$smExp[$smArNum] = str_replace($remove, NULL, $smExp[$smArNum]);
if (empty($smExp[$smArNum])) {
unset($smExp[$smArNum]);
}
}
foreach ($smExp as $numsNum => $asciiStuff) {
$smExp[$numsNum] = sprintf('%c', $asciiStuff);
}
foreach ($smExp as $nonalphanumericNum => $nonAlphanumeric) {
// quotemeta() nor preg_quote() is not sufficient here
if ($smExp[$nonalphanumericNum] == '#') {
$smExp[$nonalphanumericNum] = '\#';
}
elseif (!preg_match("#[A-z0-9]#", $smExp[$nonalphanumericNum])) {
$smExp[$nonalphanumericNum] = '\\'.$smExp[$nonalphanumericNum];
}
}
$smExp = implode("", $smExp);
$this_simplem = str_replace('#', '\#', $this_simplem);
$this_simplem = str_replace('&', '\&', $this_simplem);
$this_replace = str_replace(array('\#', '\&'), array('#', '&'), $this_simplem);
$s = preg_replace("#\$smExp\<\/a\>#i", "$this_replace", $s);
}
}
if ($toBr != 0) {
// this following line cleans up rubbish made by previous
// search & replace actions
$s = str_replace('
', NULL, $s);
$s = nl2br($s);
// now remove
within [code]...[/code] and [list]...[/list] and [list=*]...[/list]
// and after that around them too
// this will REALLY enhance parsed text, especially when viewed through Opera
$lineBreaks = array(
0 => array('', ''),
1 => array('', '
'),
2 => array('', '
'));
foreach ($lineBreaks as $lbArray) {
$lb1 = $lbArray[0];
$lb2 = $lbArray[1];
$lb1Quoted = preg_quote($lb1, '#');
$lb2Quoted = preg_quote($lb2, '#');
$lbNeedle = "#" . $lb1Quoted . "(.+?)" . $lb2Quoted . "#sie";
$s = preg_replace($lbNeedle, "'" . $lb1 . "'.str_replace('
', '', str_replace('\\\"', '\"', '$1')).'".$lb2."'", $s);
$s = preg_replace("#\
(\r\n)" . $lb1Quoted . "#i", "\n" . $lb1, $s);
$s = preg_replace("#" . $lb2Quoted . "\
#i", $lb2, $s);
$s = preg_replace("#" . $lb2Quoted . "(\r\n)\
#i", $lb2, $s);
}
// some other tags, works in most cases but it's faster
$s = str_replace('
', '' . "\n", $s);
$s = str_replace('
' . "\r\n" . '', "\n" . '', $s);
} else {
// or simply clean!
$s = str_replace('
', NULL, $s);
}
if ($showFormattedTwice != 0) {
define('RP_INTERNAL_BUFFER_FOR_TWICE', $s);
function showFormattedTwice($just_return = 0) {
$layout = array(
1 => '',
2 => ''
);
$show = "\n\n" . $layout[1] . "\n\n" . RP_INTERNAL_BUFFER_FOR_TWICE . "\n\n" . $layout[2] . "\n\n";
if ($just_return == 0) {
echo $show;
} else {
return define('RP_BUFFER', $show);
}
}
showFormattedTwice(1);
register_shutdown_function('showFormattedTwice');
}
// Output
if ($justParse == 0) {
echo $s;
} else {
return $s;
}
@eval($onShutdown);
} // p()...
public function deparse($string, $removeBr = 1, $return = 1) {
// DEPARSE CORE
// This one returns PARSED text to UNPARSED, ORIGINAL text
// However, it probably won't be ORIGINAL, but it will have the SAME MEANING
// Example:
// Before parsing: [email]my@email.com[/email]
// After parsing/deparsing: [email=my@email.com]my@email.com[/email]
$s = (string) $string;
// D e p a r s e
// #1 Basic BBcode
$bbc = $this->bbc;
$rep = $this->rep;
for ($i = 1; $i <= count($bbc); $i++) {
$s = preg_replace("#" . preg_quote($rep[$i], '#') . "(.*)" . preg_quote($rep[$i+1], '#') . "#Uis",
$bbc[$i] . "$1" . $bbc[$i+1], $s);
$i += 1;
}
foreach ($this->xht as $xhtNum => $xhtCode) {
$s = $this->stir($xhtCode, $xhtNum, $s);
}
// #2 Smilies
$s = preg_replace("#\![]()
#Ui", ":$2:", $s);
// #3 Advanced BBCode
$adv = array(
"[email=$1]$2[/email]" => "\(.*)\<\/a\>",
"[url=$1]$2[/url]" => "\(.*)\<\/a\>",
"[img]$1[/img]" => "\![]()
",
"[font=$1]$2[/font]" => "\(.*)\<\/span\>",
"[color=$1]$2[/color]" => "\(.*)\<\/span\>",
"[youtube]$1[/youtube]" => "\