mirror of
https://codeberg.org/streams/streams.git
synced 2024-09-19 23:35:12 +00:00
2290 lines
84 KiB
PHP
2290 lines
84 KiB
PHP
<?php
|
|
|
|
use Code\Lib\Apps;
|
|
use Code\Lib\Libzot;
|
|
use Code\Lib\Oembed;
|
|
use Code\Lib\SvgSanitizer;
|
|
use Code\Extend\Hook;
|
|
use chillerlan\QRCode\QRCode;
|
|
use Code\Lib\Time;
|
|
|
|
|
|
/**
|
|
* @file include/bbcode.php
|
|
* @brief Converts Markdown and BBCode constructs into HTML.
|
|
*
|
|
*/
|
|
|
|
require_once('include/event.php');
|
|
require_once('include/html2plain.php');
|
|
|
|
function get_bb_tag_pos($s, $name, $occurrence = 1)
|
|
{
|
|
|
|
if ($occurrence < 1) {
|
|
$occurrence = 1;
|
|
}
|
|
|
|
$start_open = -1;
|
|
for ($i = 1; $i <= $occurrence; $i++) {
|
|
if ($start_open !== false) {
|
|
$start_open = strpos($s, '[' . $name, $start_open + 1); // allow [name= type tags
|
|
}
|
|
}
|
|
|
|
if ($start_open === false) {
|
|
return false;
|
|
}
|
|
|
|
$start_equal = strpos($s, '=', $start_open);
|
|
$start_close = strpos($s, ']', $start_open);
|
|
|
|
if ($start_close === false) {
|
|
return false;
|
|
}
|
|
|
|
$start_close++;
|
|
|
|
$end_open = strpos($s, '[/' . $name . ']', $start_close);
|
|
|
|
if ($end_open === false) {
|
|
return false;
|
|
}
|
|
|
|
$res = array( 'start' => array('open' => $start_open, 'close' => $start_close),
|
|
'end' => array('open' => $end_open, 'close' => $end_open + strlen('[/' . $name . ']')) );
|
|
if ($start_equal !== false) {
|
|
$res['start']['equal'] = $start_equal + 1;
|
|
}
|
|
|
|
return $res;
|
|
}
|
|
|
|
function bb_tag_preg_replace($pattern, $replace, $name, $s)
|
|
{
|
|
|
|
$string = $s;
|
|
|
|
$occurrence = 1;
|
|
$pos = get_bb_tag_pos($string, $name, $occurrence);
|
|
while ($pos !== false && $occurrence < 1000) {
|
|
$start = substr($string, 0, $pos['start']['open']);
|
|
$subject = substr($string, $pos['start']['open'], $pos['end']['close'] - $pos['start']['open']);
|
|
$end = substr($string, $pos['end']['close']);
|
|
if ($end === false) {
|
|
$end = '';
|
|
}
|
|
|
|
$subject = preg_replace($pattern, $replace, $subject);
|
|
$string = $start . $subject . $end;
|
|
|
|
$occurrence++;
|
|
$pos = get_bb_tag_pos($string, $name, $occurrence);
|
|
}
|
|
|
|
return $string;
|
|
}
|
|
|
|
|
|
function tryoembed($match)
|
|
{
|
|
$url = ((count($match) == 2) ? $match[1] : $match[2]);
|
|
|
|
$o = Oembed::fetch_url($url);
|
|
|
|
if ($o['type'] == 'error') {
|
|
return $match[0];
|
|
}
|
|
|
|
$html = Oembed::format_object($o);
|
|
return $html;
|
|
}
|
|
|
|
|
|
function nakedoembed($match)
|
|
{
|
|
$url = ((count($match) == 2) ? $match[1] : $match[2]);
|
|
|
|
$strip_url = strip_escaped_zids($url);
|
|
|
|
// this function no longer performs oembed on naked links
|
|
// because they author may have created naked links intentionally.
|
|
// Now it just strips zids on naked links.
|
|
|
|
return str_replace($url, $strip_url, $match[0]);
|
|
}
|
|
|
|
function tryzrlaudio($match)
|
|
{
|
|
$link = $match[1];
|
|
$zrl = isOWAEnabled($link);
|
|
if ($zrl) {
|
|
$link = zid($link);
|
|
}
|
|
|
|
return '<audio src="' . str_replace(' ', '%20', $link) . '" controls="controls" preload="none" class="my-2"><a href="' . str_replace(' ', '%20', $link) . '">' . $link . '</a></audio>';
|
|
}
|
|
|
|
function tryzrlvideo($match)
|
|
{
|
|
$link = $match[1];
|
|
$zrl = isOWAEnabled($link);
|
|
if ($zrl) {
|
|
$link = zid($link);
|
|
}
|
|
|
|
$static_link = get_config('system', 'video_default_poster', 'images/video_poster.jpg');
|
|
if ($static_link) {
|
|
$poster = 'poster="' . escape_tags($static_link) . '" ' ;
|
|
}
|
|
|
|
return '<video ' . ' controls="controls" preload="metadata" src="' . str_replace(' ', '%20', $link).'" class="img-fluid img-thumbnail"><a href="' . str_replace(' ', '%20', $link) .'">' . $link . '#t=1</a></video>';
|
|
}
|
|
|
|
function videowithopts($match)
|
|
{
|
|
$link = $match[2];
|
|
$zrl = isOWAEnabled($link);
|
|
if ($zrl) {
|
|
$link = zid($link);
|
|
}
|
|
|
|
$attributes = $match[1];
|
|
|
|
$poster = "";
|
|
|
|
preg_match("/poster='(.*?)'/ism", $attributes, $matches);
|
|
if (isset($matches[1]) && $matches[1] != "") {
|
|
$poster = 'poster="' . (($zrl) ? zid($matches[1]) : $matches[1]) . '"';
|
|
}
|
|
|
|
preg_match("/poster=\"\;(.*?)\"\;/ism", $attributes, $matches);
|
|
if (isset($matches[1]) && $matches[1] != "") {
|
|
$poster = 'poster="' . (($zrl) ? zid($matches[1]) : $matches[1]) . '"';
|
|
}
|
|
|
|
preg_match("/poster=\\\"(.*?)\\\"/ism", $attributes, $matches);
|
|
if (isset($matches[1]) && $matches[1] != "") {
|
|
$poster = 'poster="' . (($zrl) ? zid($matches[1]) : $matches[1]) . '"';
|
|
}
|
|
|
|
return '<video ' . $poster . ' controls="controls" preload="none" src="' . str_replace(' ', '%20', $link) . '" style="width:100%; max-width:100%;"><a href="' . str_replace(' ', '%20', $link) . '">' . $link . '</a></video>';
|
|
}
|
|
|
|
// [noparse][i]italic[/i][/noparse] turns into
|
|
// [noparse][ i ]italic[ /i ][/noparse],
|
|
// to hide them from parser.
|
|
|
|
function bb_spacefy($st)
|
|
{
|
|
$whole_match = $st[0];
|
|
$captured = $st[1];
|
|
$spacefied = preg_replace("/\[(.*?)\]/", "[ $1 ]", $captured);
|
|
$new_str = str_replace($captured, $spacefied, $whole_match);
|
|
|
|
return $new_str;
|
|
}
|
|
|
|
// The previously spacefied [noparse][ i ]italic[ /i ][/noparse],
|
|
// now turns back and the [noparse] tags are trimmed
|
|
// returning [i]italic[/i]
|
|
|
|
function bb_unspacefy_and_trim($st)
|
|
{
|
|
//$whole_match = $st[0];
|
|
$captured = $st[1];
|
|
$unspacefied = preg_replace("/\[ (.*?)\ ]/", "[$1]", $captured);
|
|
|
|
return $unspacefied;
|
|
}
|
|
|
|
|
|
function bb_extract_images($body)
|
|
{
|
|
|
|
$saved_image = [];
|
|
$orig_body = $body;
|
|
$new_body = '';
|
|
|
|
$cnt = 0;
|
|
$img_start = strpos($orig_body, '[img');
|
|
$img_st_close = ($img_start !== false ? strpos(substr($orig_body, $img_start), ']') : false);
|
|
$img_end = ($img_start !== false ? strpos(substr($orig_body, $img_start), '[/img]') : false);
|
|
while (($img_st_close !== false) && ($img_end !== false)) {
|
|
$img_st_close++; // make it point to AFTER the closing bracket
|
|
$img_end += $img_start;
|
|
|
|
if (! strcmp(substr($orig_body, $img_start + $img_st_close, 5), 'data:')) {
|
|
// This is an embedded image
|
|
|
|
$saved_image[$cnt] = substr($orig_body, $img_start + $img_st_close, $img_end - ($img_start + $img_st_close));
|
|
$new_body = $new_body . substr($orig_body, 0, $img_start) . '[$#saved_image' . $cnt . '#$]';
|
|
|
|
$cnt++;
|
|
} else {
|
|
$new_body = $new_body . substr($orig_body, 0, $img_end + strlen('[/img]'));
|
|
}
|
|
|
|
$orig_body = substr($orig_body, $img_end + strlen('[/img]'));
|
|
|
|
if ($orig_body === false) { // in case the body ends on a closing image tag
|
|
$orig_body = '';
|
|
}
|
|
|
|
$img_start = strpos($orig_body, '[img');
|
|
$img_st_close = ($img_start !== false ? strpos(substr($orig_body, $img_start), ']') : false);
|
|
$img_end = ($img_start !== false ? strpos(substr($orig_body, $img_start), '[/img]') : false);
|
|
}
|
|
|
|
$new_body = $new_body . $orig_body;
|
|
|
|
return array('body' => $new_body, 'images' => $saved_image);
|
|
}
|
|
|
|
|
|
function bb_replace_images($body, $images)
|
|
{
|
|
|
|
$newbody = $body;
|
|
$cnt = 0;
|
|
|
|
if (! $images) {
|
|
return $newbody;
|
|
}
|
|
|
|
foreach ($images as $image) {
|
|
// We're depending on the property of 'foreach' (specified on the PHP website) that
|
|
// it loops over the array starting from the first element and going sequentially
|
|
// to the last element
|
|
$newbody = str_replace('[$#saved_image' . $cnt . '#$]', '<img src="' . $image . '" alt="' . t('Image/photo') . '" loading="eager" />', $newbody);
|
|
$cnt++;
|
|
}
|
|
// logger('replace_images: ' . $newbody);
|
|
return $newbody;
|
|
}
|
|
|
|
/**
|
|
* @brief Parses crypt BBCode.
|
|
*
|
|
* @param array $match
|
|
* @return string HTML code
|
|
*/
|
|
|
|
function bb_parse_crypt($match)
|
|
{
|
|
|
|
$matches = [];
|
|
$hint = '';
|
|
$algorithm = '';
|
|
$payload = $match[1];
|
|
|
|
if (isset($match[2])) {
|
|
// backwards compatibility
|
|
|
|
$attributes = $match[1];
|
|
$payload = $match[2];
|
|
|
|
preg_match("/alg='(.*?)'/ism", $attributes, $matches);
|
|
$algorithm = $matches[1] ?? '';
|
|
|
|
if (!$algorithm) {
|
|
preg_match("/alg=\"\;(.*?)\"\;/ism", $attributes, $matches);
|
|
$algorithm = $matches[1] ?? '';
|
|
}
|
|
|
|
if (!$algorithm) {
|
|
preg_match("/alg=\\\"(.*?)\\\"/ism", $attributes, $matches);
|
|
$algorithm = $matches[1] ?? '';
|
|
}
|
|
|
|
$matches = [];
|
|
|
|
preg_match("/hint='(.*?)'/ism", $attributes, $matches);
|
|
$hint = $matches[1] ?? '';
|
|
|
|
if (!$hint) {
|
|
preg_match("/hint=\"\;(.*?)\"\;/ism", $attributes, $matches);
|
|
$hint = $matches[1] ?? '';
|
|
}
|
|
|
|
if (!$hint) {
|
|
preg_match("/hint=\\\"(.*?)\\\"/ism", $attributes, $matches);
|
|
$hint = $matches[1] ?? '';
|
|
}
|
|
}
|
|
|
|
$x = random_string(32);
|
|
|
|
$onclick = 'onclick="sodium_decrypt(\'' . $payload . '\',\'#' . $x . '\');"';
|
|
|
|
if (in_array($algorithm, ['AES-128-CCM', 'rot13', 'triple-rot13'])) {
|
|
// backwards compatibility
|
|
$onclick = 'onclick="hz_decrypt(\'' . $algorithm . '\',\'' . $hint . '\',\'' . $payload . '\',\'#' . $x . '\');"';
|
|
}
|
|
|
|
$label = t('Encrypted content');
|
|
|
|
$Text = '<br><div id="' . $x . '"><img class="cursor-pointer" src="' . z_root() . '/images/lock_icon.svg" ' . $onclick . ' alt="' . $label . '" title="' . $label . '" /></div><br><br>' . bb_parse_b64_crypt($match);
|
|
|
|
return $Text;
|
|
}
|
|
|
|
/**
|
|
* @brief Returns raw base64 encoded crypt content.
|
|
*
|
|
* @param array $match
|
|
* @return string
|
|
*/
|
|
function bb_parse_b64_crypt($match)
|
|
{
|
|
$r = '-----BEGIN ENCRYPTED MESSAGE-----' . "\n";
|
|
$r .= base64_encode($match[1]) . (($match[2]) ? "." . $match[2] : '') . "\n";
|
|
$r .= '-----END ENCRYPTED MESSAGE-----' . "\n";
|
|
|
|
$r = '<code>' . str_replace("\n", '<br>', wordwrap($r, 75, "\n", true)) . '</code>';
|
|
|
|
return $r;
|
|
}
|
|
|
|
function bb_parse_app($match)
|
|
{
|
|
|
|
$app = Apps::app_decode($match[1]);
|
|
if ($app) {
|
|
return Apps::app_render($app);
|
|
}
|
|
}
|
|
|
|
function bb_parse_app_ap($match)
|
|
{
|
|
$app = Apps::app_decode($match[1]);
|
|
if ($app) {
|
|
return sprintf(t('(Embedded app \'%s\' could not be displayed).'), $app['name']) . EOL
|
|
. '<a href="' . $app['url'] . '">' . $app['url'] . '</a>' . EOL;
|
|
}
|
|
}
|
|
|
|
function bb_svg($match)
|
|
{
|
|
|
|
$params = str_replace(['<br>', '"'], [ '', '"'], $match[1]);
|
|
$Text = str_replace([ '[',']' ], [ '<','>' ], $match[2]);
|
|
|
|
$output = '<svg' . (($params) ? $params : ' width="100%" height="480" ') . '>' . str_replace(['<br>', '"', ' '], [ '', '"', ' '], $Text) . '</svg>';
|
|
|
|
$purify = new SvgSanitizer();
|
|
$purify->loadXML($output);
|
|
$purify->sanitize();
|
|
$output = $purify->saveSVG();
|
|
$output = preg_replace("/\<\?xml(.*?)\?\>/", '', $output);
|
|
return $output;
|
|
}
|
|
|
|
function bb_svg_export($match)
|
|
{
|
|
|
|
$params = str_replace(['<br>', '"'], [ '', '"'], $match[1]);
|
|
$Text = str_replace([ '[',']' ], [ '<','>' ], $match[2]);
|
|
|
|
$output = '<svg' . (($params) ? $params : ' width="100%" height="480" ') . '>' . str_replace(['<br>', '"', ' '], [ '', '"', ' '], $Text) . '</svg>';
|
|
|
|
$purify = new SvgSanitizer();
|
|
$purify->loadXML($output);
|
|
$purify->sanitize();
|
|
$output = $purify->saveSVG();
|
|
$output = preg_replace("/\<\?xml(.*?)\?\>/", '', $output);
|
|
$output = '<img alt="svg" src="data:image/svg+xml,' . urlencode($output) . '" >';
|
|
return $output;
|
|
}
|
|
|
|
|
|
function bb_parse_element($match)
|
|
{
|
|
$j = json_decode(base64url_decode($match[1]), true);
|
|
|
|
if ($j && local_channel()) {
|
|
$text = sprintf(t('Install %1$s element %2$s'), translate_design_element($j['type']), $j['pagetitle']);
|
|
$o = EOL . '<button class="btn btn-primary" onclick="importElement(\'' . $match[1] . '\'); return false;" >' . $text . '</button>' . EOL;
|
|
} else {
|
|
$text = sprintf(t('This post contains an installable %s element, however you lack permissions to install it on this site.'), translate_design_element($j['type'])) . $j['pagetitle'];
|
|
$o = EOL . $text . EOL;
|
|
}
|
|
|
|
return $o;
|
|
}
|
|
|
|
function translate_design_element($type)
|
|
{
|
|
switch ($type) {
|
|
case 'webpage':
|
|
$ret = t('webpage');
|
|
break;
|
|
case 'layout':
|
|
$ret = t('layout');
|
|
break;
|
|
case 'block':
|
|
$ret = t('block');
|
|
break;
|
|
case 'menu':
|
|
$ret = t('menu');
|
|
break;
|
|
}
|
|
|
|
return $ret;
|
|
}
|
|
|
|
function bb_format_attachdata($body)
|
|
{
|
|
|
|
$data = getAttachmentData($body);
|
|
|
|
|
|
if ($data) {
|
|
$txt = '';
|
|
if ($data['url'] && $data['title']) {
|
|
$txt .= "\n\n" . '[url=' . $data['url'] . ']' . $data['title'] . '[/url]';
|
|
} else {
|
|
if ($data['url']) {
|
|
$txt .= "\n\n" . $data['url'];
|
|
}
|
|
if ($data['title']) {
|
|
$txt .= "\n\n" . $data['title'];
|
|
}
|
|
}
|
|
if ($data['preview']) {
|
|
$txt .= "\n\n" . '[img]' . $data['preview'] . '[/img]';
|
|
}
|
|
if ($data['image']) {
|
|
$txt .= "\n\n" . '[img]' . $data['image'] . '[/img]';
|
|
}
|
|
|
|
|
|
$txt .= "\n\n" . $data['text'];
|
|
return preg_replace('/\[attachment(.*?)\](.*?)\[\/attachment\]/ism', $txt, $body);
|
|
}
|
|
return $body;
|
|
}
|
|
|
|
|
|
|
|
|
|
function getAttachmentData($body)
|
|
{
|
|
$data = [];
|
|
|
|
if (! preg_match("/\[attachment(.*?)\](.*?)\[\/attachment\]/ism", $body, $match)) {
|
|
return null;
|
|
}
|
|
|
|
$attributes = $match[1];
|
|
|
|
$data["text"] = trim($match[2]);
|
|
|
|
$type = "";
|
|
preg_match("/type='(.*?)'/ism", $attributes, $matches);
|
|
|
|
if (x($matches, 1)) {
|
|
$type = strtolower($matches[1]);
|
|
}
|
|
|
|
preg_match('/type=\"\;(.*?)\"\;/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$type = strtolower($matches[1]);
|
|
}
|
|
|
|
preg_match('/type=\\\"(.*?)\\\"/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$type = strtolower($matches[1]);
|
|
}
|
|
|
|
if ($type == "") {
|
|
return [];
|
|
}
|
|
|
|
if (!in_array($type, ["link", "audio", "photo", "video"])) {
|
|
return [];
|
|
}
|
|
|
|
if ($type != "") {
|
|
$data["type"] = $type;
|
|
}
|
|
$url = "";
|
|
preg_match("/url='(.*?)'/ism", $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$url = $matches[1];
|
|
}
|
|
|
|
preg_match('/url=\"\;(.*?)\"\;/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$url = $matches[1];
|
|
}
|
|
|
|
preg_match('/url=\\\"(.*?)\\\"/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$url = $matches[1];
|
|
}
|
|
|
|
if ($url != "") {
|
|
$data["url"] = html_entity_decode($url, ENT_QUOTES, 'UTF-8');
|
|
}
|
|
|
|
$title = "";
|
|
preg_match("/title='(.*?)'/ism", $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$title = $matches[1];
|
|
}
|
|
|
|
preg_match('/title=\"\;(.*?)\"\;/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$title = $matches[1];
|
|
}
|
|
|
|
preg_match('/title=\\\"(.*?)\\\"/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$title = $matches[1];
|
|
}
|
|
|
|
if ($title != "") {
|
|
$title = html_entity_decode($title, ENT_QUOTES, 'UTF-8');
|
|
$title = str_replace(["[", "]"], ["[", "]"], $title);
|
|
$data["title"] = $title;
|
|
}
|
|
|
|
$image = "";
|
|
preg_match("/image='(.*?)'/ism", $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$image = $matches[1];
|
|
}
|
|
|
|
preg_match('/image=\"\;(.*?)\"\;/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$image = $matches[1];
|
|
}
|
|
|
|
preg_match('/image=\\\"(.*?)\\\"/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$image = $matches[1];
|
|
}
|
|
|
|
if ($image != "") {
|
|
$data["image"] = html_entity_decode($image, ENT_QUOTES, 'UTF-8');
|
|
}
|
|
|
|
$preview = "";
|
|
preg_match("/preview='(.*?)'/ism", $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$preview = $matches[1];
|
|
}
|
|
|
|
preg_match('/preview=\"\;(.*?)\"\;/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$preview = $matches[1];
|
|
}
|
|
|
|
preg_match('/preview=\\\"(.*?)\\\"/ism', $attributes, $matches);
|
|
if (x($matches, 1)) {
|
|
$preview = $matches[1];
|
|
}
|
|
|
|
if ($preview != "") {
|
|
$data["preview"] = html_entity_decode($preview, ENT_QUOTES, 'UTF-8');
|
|
}
|
|
|
|
$data["description"] = trim($match[3]);
|
|
|
|
$data["after"] = trim($match[4]);
|
|
|
|
return $data;
|
|
}
|
|
|
|
|
|
|
|
|
|
function bb_ShareAttributes($match)
|
|
{
|
|
|
|
$matches = [];
|
|
$attributes = $match[1];
|
|
|
|
$author = "";
|
|
preg_match("/author='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$author = urldecode($matches[1]);
|
|
}
|
|
|
|
$link = "";
|
|
preg_match("/link='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$link = $matches[1];
|
|
}
|
|
|
|
$avatar = "";
|
|
preg_match("/avatar='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$avatar = $matches[1];
|
|
}
|
|
|
|
$profile = "";
|
|
preg_match("/profile='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$profile = $matches[1];
|
|
}
|
|
|
|
$posted = "";
|
|
preg_match("/posted='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$posted = $matches[1];
|
|
}
|
|
|
|
$auth = "";
|
|
preg_match("/auth='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
if ($matches[1] === 'true') {
|
|
$auth = true;
|
|
} else {
|
|
$auth = false;
|
|
}
|
|
}
|
|
|
|
if ($auth === EMPTY_STR) {
|
|
$auth = isOWAEnabled($profile);
|
|
}
|
|
|
|
// message_id is never used, do we still need it?
|
|
$message_id = "";
|
|
preg_match("/message_id='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$message_id = $matches[1];
|
|
}
|
|
|
|
if (! $message_id) {
|
|
preg_match("/guid='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$message_id = $matches[1];
|
|
}
|
|
}
|
|
|
|
|
|
$reldate = '<span class="autotime" title="' . Time::convert('UTC', date_default_timezone_get(), $posted, 'c') . '" >' . Time::convert('UTC', date_default_timezone_get(), $posted, 'r') . '</span>';
|
|
|
|
// I was going to wrap this in <article> to make it semantically correct HTML and permit cross-platform styling, but doing so results in text/plain
|
|
// projects stripping out the content completely. Hence that effort was reverted.
|
|
|
|
$headline = '<div class="shared_container"><div class="shared_header">';
|
|
|
|
if ($avatar != "") {
|
|
$headline .= '<a href="' . (($auth) ? zid($profile) : $profile) . '" ><img src="' . $avatar . '" alt="' . htmlspecialchars($author, ENT_COMPAT, 'UTF-8', false) . '" height="32" width="32" loading="lazy" /></a> ';
|
|
}
|
|
|
|
if (strpos($link, '/cards/')) {
|
|
$type = t('card');
|
|
} elseif (strpos($link, '/articles/')) {
|
|
$type = t('article');
|
|
} else {
|
|
$type = t('post');
|
|
}
|
|
|
|
// Bob Smith wrote the following post 2 hours ago
|
|
|
|
$fmt = sprintf(
|
|
t('%1$s wrote the following %2$s %3$s'),
|
|
'<a href="' . (($auth) ? zid($profile) : $profile) . '" ><bdi>' . $author . '</bdi></a>',
|
|
'<a href="' . (($auth) ? zid($link) : $link) . '" >' . $type . '</a>',
|
|
$reldate
|
|
);
|
|
|
|
$headline .= '<span>' . $fmt . '</span></div>';
|
|
|
|
return $headline . '<div class="reshared-content">' . trim($match[2]) . '</div></div>';
|
|
}
|
|
|
|
function bb_location($match)
|
|
{
|
|
// not yet implemented
|
|
}
|
|
|
|
/**
|
|
* @brief Returns an iframe from $match[1].
|
|
*
|
|
* @param array $match
|
|
* @return string HTML iframe with content of $match[1]
|
|
*/
|
|
function bb_iframe($match)
|
|
{
|
|
|
|
$sandbox = ((strpos($match[1], App::get_hostname())) ? ' sandbox="allow-scripts" ' : '');
|
|
|
|
return '<iframe ' . $sandbox . ' src="' . $match[1] . '" width="100%" height="' . App::$videoheight . '"><a href="' . $match[1] . '">' . $match[1] . '</a></iframe>';
|
|
}
|
|
|
|
function bb_ShareAttributesSimple($match)
|
|
{
|
|
|
|
$matches = [];
|
|
$attributes = $match[1];
|
|
|
|
$author = "";
|
|
preg_match("/author='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$author = html_entity_decode($matches[1], ENT_QUOTES, 'UTF-8');
|
|
}
|
|
|
|
preg_match('/author="(.*?)"/ism', $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$author = $matches[1];
|
|
}
|
|
|
|
$profile = "";
|
|
preg_match("/profile='(.*?)'/ism", $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$profile = $matches[1];
|
|
}
|
|
|
|
preg_match('/profile="(.*?)"/ism', $attributes, $matches);
|
|
if ($matches[1] != "") {
|
|
$profile = $matches[1];
|
|
}
|
|
|
|
$text = html_entity_decode("♲ ", ENT_QUOTES, 'UTF-8') . ' <a href="' . $profile . '">' . $author . '</a>: <div class="reshared-content">' . $match[2] . '</div>';
|
|
|
|
return($text);
|
|
}
|
|
|
|
function rpost_callback($match)
|
|
{
|
|
if ($match[2]) {
|
|
return str_replace($match[0], Libzot::get_rpost_path(App::get_observer()) . '&title=' . urlencode($match[2]) . '&body=' . urlencode($match[3]), $match[0]);
|
|
} else {
|
|
return str_replace($match[0], Libzot::get_rpost_path(App::get_observer()) . '&body=' . urlencode($match[3]), $match[0]);
|
|
}
|
|
}
|
|
|
|
function bb_map_latlon($match)
|
|
{
|
|
return str_replace($match[0], '<div class="map">'
|
|
. generate_map(floatval($match[1]),floatval($match[2]))
|
|
. '</div>',
|
|
$match[0]);
|
|
}
|
|
|
|
|
|
function bb_map_coords($match)
|
|
{
|
|
$x = str_replace(['/', ','], [' ', ' '], $match[1]);
|
|
$tmp = explode(' ', $x);
|
|
if (count($tmp) > 1) {
|
|
$lat = $tmp[0];
|
|
$lon = $tmp[1];
|
|
}
|
|
// the extra space in the following line is intentional
|
|
return str_replace($match[0], '<div class="map" >' . generate_map($lat,$lon) . '</div>', $match[0]);
|
|
}
|
|
|
|
function bb_map_location($match)
|
|
{
|
|
// the extra space in the following line is intentional
|
|
return str_replace($match[0], '<div class="map" >' . generate_named_map($match[1]) . '</div>', $match[0]);
|
|
}
|
|
|
|
function bb_qr($match)
|
|
{
|
|
$str = $match[1];
|
|
return str_replace($match[0], '<img src="' . (new QRCode())->render($str) . '" alt="' . $str . '" title="' . $str . '" loading="eager" />', $match[0]);
|
|
}
|
|
|
|
function bb_opentag($match)
|
|
{
|
|
$openclose = (($match[2]) ? '<span class="bb-open" title="' . t('Click to open/close') . '">' . $match[1] . '</span>' : t('Click to open/close'));
|
|
$text = (($match[2]) ? $match[2] : $match[1]);
|
|
$rnd = mt_rand();
|
|
|
|
return '<div onclick="openClose(\'opendiv-' . $rnd . '\'); return false;" class="fakelink">' . $openclose . '</div><div id="opendiv-' . $rnd . '" style="display: none;">' . $text . '</div>';
|
|
}
|
|
|
|
function bb_spoilertag($match)
|
|
{
|
|
$openclose = (($match[2]) ? '<span class="bb-spoiler" title="' . t('Click to open/close') . '">' . $match[1] . ' ' . t('spoiler') . '</span>' : t('Click to open/close'));
|
|
$text = (($match[2]) ?: $match[1]);
|
|
$rnd = mt_rand();
|
|
|
|
return '<div onclick="openClose(\'opendiv-' . $rnd . '\'); return false;" class="fakelink">' . $openclose . '</div><blockquote id="opendiv-' . $rnd . '" style="display: none;">' . $text . '</blockquote>';
|
|
}
|
|
|
|
function bb_summary($match)
|
|
{
|
|
$rnd1 = mt_rand();
|
|
$rnd2 = mt_rand();
|
|
$rnd3 = mt_rand();
|
|
$rnd4 = mt_rand();
|
|
|
|
return $match[1] . $match[2] . EOL . EOL . $match[3];
|
|
|
|
// return $match[1] . '<div style="display: block;" id="opendiv-' . $rnd2 . '">' . $match[2] . '</div><div style="display: block;" id="opendiv-' . $rnd3 . '" onclick="openClose(\'opendiv-' . $rnd1 . '\'); openClose(\'opendiv-' . $rnd2 . '\'); openClose(\'opendiv-' . $rnd3 . '\'); openClose(\'opendiv-' . $rnd4 . '\'); return false;" class="fakelink view-article">' . t('View article') . '</div><div style="display: none;" id="opendiv-' . $rnd4 . '" onclick="openClose(\'opendiv-' . $rnd1 . '\'); openClose(\'opendiv-' . $rnd2 . '\'); openClose(\'opendiv-' . $rnd3 . '\'); openClose(\'opendiv-' . $rnd4 . '\'); return false;" class="fakelink view-summary">' . t('View summary') . '</div><div id="opendiv-' . $rnd1 . '" style="display: none;">' . $match[3] . '</div>';
|
|
}
|
|
|
|
|
|
function bb_definitionList($match)
|
|
{
|
|
// $match[1] is the markup styles for the "terms" in the definition list.
|
|
// $match[2] is the content between the [dl]...[/dl] tags
|
|
|
|
$classes = '';
|
|
if (stripos($match[1], "b") !== false) {
|
|
$classes .= 'dl-terms-bold ';
|
|
}
|
|
if (stripos($match[1], "i") !== false) {
|
|
$classes .= 'dl-terms-italic ';
|
|
}
|
|
if (stripos($match[1], "u") !== false) {
|
|
$classes .= 'dl-terms-underline ';
|
|
}
|
|
if (stripos($match[1], "l") !== false) {
|
|
$classes .= 'dl-terms-large ';
|
|
}
|
|
if (stripos($match[1], "m") !== false) {
|
|
$classes .= 'dl-terms-monospace ';
|
|
}
|
|
if (stripos($match[1], "h") !== false) {
|
|
$classes .= 'dl-horizontal '; // dl-horizontal is already provided by bootstrap
|
|
}
|
|
if (strlen($classes) === 0) {
|
|
$classes = "dl-terms-plain";
|
|
}
|
|
|
|
// The bbcode transformation will be:
|
|
// [*=term-text] description-text => </dd> <dt>term-text<dt><dd> description-text
|
|
// then after all replacements have been made, the extra </dd> at the start of the
|
|
// first line can be removed. HTML5 allows the tag to be missing from the end of the last line.
|
|
// Using '(?<!\\\)' to allow backslash-escaped closing braces to appear in the term-text.
|
|
$closeDescriptionTag = "</dd>\n";
|
|
$eatLeadingSpaces = '(?: |[ \t])*'; // prevent spaces infront of [*= from adding another line to the previous element
|
|
$listElements = preg_replace('/^(\n|<br>)/', '', $match[2]); // ltrim the first newline
|
|
$listElements = preg_replace(
|
|
'/' . $eatLeadingSpaces . '\[\*=([[:print:]]*?)(?<!\\\)\]/uism',
|
|
$closeDescriptionTag . '<dt>$1</dt><dd>',
|
|
$listElements
|
|
);
|
|
// Unescape any \] inside the <dt> tags
|
|
$listElements = preg_replace_callback('/<dt>(.*?)<\/dt>/ism', 'bb_definitionList_unescapeBraces', $listElements);
|
|
|
|
// Remove the extra </dd> at the start of the string, if there is one.
|
|
$firstOpenTag = strpos($listElements, '<dd>');
|
|
$firstCloseTag = strpos($listElements, $closeDescriptionTag);
|
|
if ($firstCloseTag !== false && ($firstOpenTag === false || ($firstCloseTag < $firstOpenTag))) {
|
|
$listElements = preg_replace('/<\/dd>/ism', '', $listElements, 1);
|
|
}
|
|
|
|
return '<dl class="bb-dl ' . rtrim($classes) . '">' . $listElements . '</dl>';
|
|
}
|
|
function bb_definitionList_unescapeBraces($match)
|
|
{
|
|
return '<dt>' . str_replace('\]', ']', $match[1]) . '</dt>';
|
|
}
|
|
|
|
|
|
function bb_checklist($match)
|
|
{
|
|
$str = $match[1];
|
|
$str = str_replace("[]", "<li><input type=\"checkbox\" disabled=\"disabled\">", $str);
|
|
$str = str_replace("[x]", "<li><input type=\"checkbox\" checked=\"checked\" disabled=\"disabled\">", $str);
|
|
return '<ul class="checklist" style="list-style-type: none;">' . $str . '</ul>';
|
|
}
|
|
|
|
|
|
/**
|
|
* @brief Sanitize style properties from BBCode to HTML.
|
|
*
|
|
* @param array|string $input
|
|
* @return string A HTML span tag with the styles.
|
|
*/
|
|
function bb_sanitize_style($input)
|
|
{
|
|
// whitelist array: property => limits (0 = no limitation)
|
|
$w = array(
|
|
// color properties
|
|
"color" => 0,
|
|
"background-color" => 0,
|
|
// box properties
|
|
"padding" => array("px" => 100, "%" => 0, "em" => 2, "ex" => 2, "mm" => 0, "cm" => 0, "in" => 0, "pt" => 0, "pc" => 0),
|
|
"margin" => array("px" => 100, "%" => 0, "em" => 2, "ex" => 2, "mm" => 0, "cm" => 0, "in" => 0, "pt" => 0, "pc" => 0),
|
|
"border" => array("px" => 100, "%" => 0, "em" => 2, "ex" => 2, "mm" => 0, "cm" => 0, "in" => 0, "pt" => 0, "pc" => 0),
|
|
"float" => 0,
|
|
"clear" => 0,
|
|
// text properties
|
|
"text-decoration" => 0,
|
|
);
|
|
|
|
// determine if input is string or array
|
|
|
|
$input_is_array = is_array($input);
|
|
$css = [];
|
|
$css_string = (($input_is_array) ? $input[1] : $input);
|
|
$a = explode(';', $css_string);
|
|
|
|
foreach ($a as $parts) {
|
|
list($k, $v) = explode(':', $parts);
|
|
$css[ trim($k) ] = trim($v);
|
|
}
|
|
|
|
// sanitize properties
|
|
$b = array_merge(array_diff_key($css, $w), array_diff_key($w, $css));
|
|
$css = array_diff_key($css, $b);
|
|
$css_string_san = '';
|
|
|
|
foreach ($css as $key => $value) {
|
|
if ($w[$key] != null) {
|
|
foreach ($w[$key] as $limit_key => $limit_value) {
|
|
//sanitize values
|
|
if (strpos($value, $limit_key)) {
|
|
$value = preg_replace_callback(
|
|
"/(\S.*?)$limit_key/ism",
|
|
function ($match) use ($limit_value, $limit_key) {
|
|
if ($match[1] > $limit_value) {
|
|
return $limit_value . $limit_key;
|
|
} else {
|
|
return $match[1] . $limit_key;
|
|
}
|
|
},
|
|
$value
|
|
);
|
|
}
|
|
}
|
|
}
|
|
$css_string_san .= $key . ":" . $value . "; ";
|
|
}
|
|
|
|
if ($input_is_array) {
|
|
return '<span style="' . $css_string_san . '">' . $input[2] . '</span>';
|
|
}
|
|
|
|
return $css_string_san;
|
|
}
|
|
|
|
function obnetwork_callback($matches)
|
|
{
|
|
$observer = App::get_observer();
|
|
if ($observer && $observer['xchan_network'] === $matches[1]) {
|
|
return $matches[2];
|
|
}
|
|
return '';
|
|
}
|
|
|
|
function obnetwork_necallback($matches)
|
|
{
|
|
$observer = App::get_observer();
|
|
if ($observer && $observer['xchan_network'] === $matches[1]) {
|
|
return '';
|
|
}
|
|
return $matches[2];
|
|
}
|
|
|
|
|
|
function oblanguage_callback($matches)
|
|
{
|
|
if (strlen($matches[1]) == 2) {
|
|
$compare = strtolower(substr(App::$language, 0, 2));
|
|
} else {
|
|
$compare = strtolower(App::$language);
|
|
}
|
|
|
|
if ($compare === strtolower($matches[1])) {
|
|
return $matches[2];
|
|
}
|
|
|
|
return '';
|
|
}
|
|
|
|
function oblanguage_necallback($matches)
|
|
{
|
|
if (strlen($matches[1]) == 2) {
|
|
$compare = strtolower(substr(App::$language, 0, 2));
|
|
} else {
|
|
$compare = strtolower(App::$language);
|
|
}
|
|
|
|
if ($compare !== strtolower($matches[1])) {
|
|
return $matches[2];
|
|
}
|
|
|
|
return '';
|
|
}
|
|
|
|
function bb_observer($Text)
|
|
{
|
|
|
|
$observer = App::get_observer();
|
|
|
|
if ((str_contains($Text, '[/observer]')) || (str_contains($Text, '[/rpost]'))) {
|
|
if ($observer) {
|
|
$Text = preg_replace("/\[observer\=1\](.*?)\[\/observer\]/ism", '$1', $Text);
|
|
$Text = preg_replace("/\[observer\=0\].*?\[\/observer\]/ism", '', $Text);
|
|
$Text = preg_replace_callback("/\[rpost(=(.*?))?\](.*?)\[\/rpost\]/ism", 'rpost_callback', $Text);
|
|
} else {
|
|
$Text = preg_replace("/\[observer\=1\].*?\[\/observer\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[observer\=0\](.*?)\[\/observer\]/ism", '$1', $Text);
|
|
$Text = preg_replace("/\[rpost(=.*?)?\](.*?)\[\/rpost\]/ism", '', $Text);
|
|
}
|
|
}
|
|
|
|
$channel = App::get_channel();
|
|
|
|
if (str_contains($Text, '[/channel]')) {
|
|
if ($channel) {
|
|
$Text = preg_replace("/\[channel\=1\](.*?)\[\/channel\]/ism", '$1', $Text);
|
|
$Text = preg_replace("/\[channel\=0\].*?\[\/channel\]/ism", '', $Text);
|
|
} else {
|
|
$Text = preg_replace("/\[channel\=1\].*?\[\/channel\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[channel\=0\](.*?)\[\/channel\]/ism", '$1', $Text);
|
|
}
|
|
}
|
|
|
|
return $Text;
|
|
}
|
|
|
|
function bb_imgoptions($match)
|
|
{
|
|
|
|
// $Text = preg_replace_callback("/\[([zi])mg([ \=])(.*?)\](.*?)\[\/[zi]mg\]/ism",'bb_imgoptions',$Text);
|
|
// alt text cannot contain ']'
|
|
|
|
// [img|zmg=wwwxhhh float=left|right alt=alt text]url[/img|zmg]
|
|
// [img|zmg width="nnn" height="nnn" alt="xyz" style="float: abc;"]url[/img|zmg]
|
|
|
|
$local_match = null;
|
|
$width = 0;
|
|
$float = false;
|
|
$alt = false;
|
|
$src = false;
|
|
|
|
$style = EMPTY_STR;
|
|
|
|
$attributes = $match[3];
|
|
|
|
$x = preg_match("/alt='(.*?)'/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$alt = $matches[1];
|
|
}
|
|
|
|
$x = preg_match("/alt=\"\;(.*?)\"\;/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$alt = $matches[1];
|
|
}
|
|
|
|
$x = preg_match("/alt=\\\"(.*?)\\\"/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$alt = $matches[1];
|
|
}
|
|
|
|
$x = preg_match("/width=([0-9]*)/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$width = bb_xss($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/width='(.*?)'/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$width = bb_xss($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/width=\"\;(.*?)\"\;/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$width = bb_xss($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/width=\\\"(.*?)\\\"/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$width = bb_xss($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/height=([0-9]*)/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$height = bb_xss($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/height='(.*?)'/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$height = bb_xss($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/height=\"\;(.*?)\"\;/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$height = bb_xss($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/height=\\\"(.*?)\\\"/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$height = bb_xss($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/style='(.*?)'/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$style = bb_sanitize_style($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/style=\"\;(.*?)\"\;/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$style = bb_sanitize_style($matches[1]);
|
|
}
|
|
|
|
$x = preg_match("/style=\\\"(.*?)\\\"/ism", $attributes, $matches);
|
|
if ($x) {
|
|
$style = bb_sanitize_style($matches[1]);
|
|
}
|
|
|
|
// legacy img options
|
|
|
|
if ($match[2] === '=') {
|
|
|
|
if (str_starts_with($attributes, 'http')) {
|
|
$alt = $match[4];
|
|
$src = $match[3];
|
|
}
|
|
else {
|
|
// pull out (optional) legacy size declarations first
|
|
if (preg_match("/([0-9]*)x([0-9]*)/ism", $match[3], $local_match)) {
|
|
$width = intval($local_match[1]);
|
|
}
|
|
$match[3] = substr($match[3], strpos($match[3], ' '));
|
|
}
|
|
}
|
|
|
|
// then (optional) legacy float specifiers
|
|
if ($n = str_contains($match[3], 'float=left')) {
|
|
$float = 'left';
|
|
$match[3] = substr($match[3], $n + 10);
|
|
}
|
|
if ($n = str_contains($match[3], 'float=right')) {
|
|
$float = 'right';
|
|
$match[3] = substr($match[3], $n + 11);
|
|
}
|
|
|
|
// finally alt text which extends to the close of the tag
|
|
if ((! $alt) && ($n = str_contains($match[3], 'alt='))) {
|
|
$alt = substr($match[3], $n + 4);
|
|
}
|
|
|
|
// now assemble the resulting img tag from these components
|
|
|
|
$output = '<img ' . (($match[1] === 'z') ? 'class="zrl" ' : '') . ' loading="eager" ';
|
|
|
|
if ($width) {
|
|
$style .= 'width: 100%; max-width: ' . $width . 'px; ';
|
|
} else {
|
|
$style .= 'max-width: 100%; ';
|
|
}
|
|
if ($float) {
|
|
$style .= 'float: ' . $float . '; ';
|
|
}
|
|
$output .= (($style) ? 'style="' . $style . '" ' : '') . 'alt="' . htmlentities(($alt) ? str_replace('<br>', "\n" , $alt) : t('Image/photo'), ENT_COMPAT, 'UTF-8') . '" ' . 'title="' . htmlentities(($alt) ? str_replace('<br>', "\n" , $alt) : t('Image/photo'), ENT_COMPAT, 'UTF-8') . '" ';
|
|
|
|
$output .= 'src="' . (($src) ? $src : $match[4]) . '" >';
|
|
|
|
return $output;
|
|
}
|
|
|
|
function multicode_purify($s)
|
|
{
|
|
|
|
$s = preg_replace_callback("/\[code(.*?)\](.*?)\[\/code\]/ism", function ($match) {
|
|
return '[code' . $match[1] . ']' . bb_code_protect($match[2]) . '[/code]';
|
|
}, $s);
|
|
|
|
// escape_tags anywhere html is disabled.
|
|
|
|
$s = preg_replace_callback("/\[nohtml\](.*?)\[\/nohtml\]/ism", function ($match) {
|
|
return escape_tags($match[1]);
|
|
}, $s);
|
|
|
|
$s = preg_replace_callback('#(^|\n)([`~]{3,})(?: *\.?([a-zA-Z0-9\-.]+))?\n+([\s\S]+?)\n+\2(\n|$)#', function ($match) {
|
|
return $match[1] . $match[2] . "\n" . bb_code_protect($match[4]) . "\n" . $match[2] . (($match[5]) ? $match[5] : "\n");
|
|
}, $s);
|
|
|
|
try {
|
|
$s = purify_html($s, [ 'escape' ]);
|
|
}
|
|
catch (Exception $e) {
|
|
$s = escape_tags($s);
|
|
}
|
|
|
|
return bb_code_unprotect($s);
|
|
}
|
|
|
|
function bb_mdlink_protect($matches)
|
|
{
|
|
$token = strtok($matches[1],'= ');
|
|
if (!$token) {
|
|
$token = $matches[1];
|
|
}
|
|
if ($token === $matches[3]) {
|
|
return '[' . $matches[1] . ']' . html_entity_decode('​')
|
|
. '(' . $matches[2] . ')[/' . $matches[3] . ']';
|
|
}
|
|
else {
|
|
return $matches[0];
|
|
}
|
|
}
|
|
|
|
function bb_code_preprotect($matches)
|
|
{
|
|
return '[code' . $matches[1] . ']' . 'b64.^8e%.' . base64_encode(str_replace('<br>', '|+br+|', $matches[2])) . '.b64.$8e%' . '[/code]';
|
|
}
|
|
|
|
function bb_code_preunprotect($s)
|
|
{
|
|
return preg_replace_callback('|b64\.\^8e\%\.(.*?)\.b64\.\$8e\%|ism', 'bb_code_unprotect_sub', $s);
|
|
}
|
|
|
|
|
|
function bb_code_protect($s)
|
|
{
|
|
return 'b64.^9e%.' . base64_encode(str_replace('<br>', '|+br+|', $s)) . '.b64.$9e%';
|
|
}
|
|
|
|
function bb_code_unprotect($s)
|
|
{
|
|
return preg_replace_callback('|b64\.\^9e\%\.(.*?)\.b64\.\$9e\%|ism', 'bb_code_unprotect_sub', $s);
|
|
}
|
|
|
|
function bb_code_unprotect_sub($match)
|
|
{
|
|
$x = str_replace([ '<', '>' ], [ '<', '>' ], base64_decode($match[1]));
|
|
return str_replace('|+br+|', '<br>', $x);
|
|
}
|
|
|
|
function bb_colorbox($match)
|
|
{
|
|
if (strpos($match[1], 'zrl')) {
|
|
$url = zid($match[2]);
|
|
} else {
|
|
$url = $match[2];
|
|
}
|
|
return '<a href="' . $url . '" target="censored"><img src="' . $url . '" alt="censored" style="opacity: 0.03;"></a>';
|
|
}
|
|
|
|
function bb_code($match)
|
|
{
|
|
if (strpos($match[0], "<br>")) {
|
|
return '<pre><code>' . bb_code_protect(trim($match[1])) . '</code></pre>';
|
|
} else {
|
|
return '<code class="inline-code">' . bb_code_protect(trim($match[1])) . '</code>';
|
|
}
|
|
}
|
|
|
|
function bb_code_options($match)
|
|
{
|
|
if (strpos($match[0], "<br>")) {
|
|
$class = "";
|
|
$pre = true;
|
|
} else {
|
|
$class = "inline-code";
|
|
$pre = false;
|
|
}
|
|
if (strpos($match[1], 'nowrap')) {
|
|
$style = "overflow-x: auto; white-space: pre;";
|
|
} else {
|
|
$style = "";
|
|
}
|
|
if ($pre) {
|
|
return '<pre><code class="' . $class . '" style="' . $style . '">' . bb_code_protect(trim($match[2])) . '</code></pre>';
|
|
} else {
|
|
return '<code class="' . $class . '" style="' . $style . '">' . bb_code_protect(trim($match[2])) . '</code>';
|
|
}
|
|
}
|
|
|
|
function md_protect($match)
|
|
{
|
|
return bb_code_protect($match[1]);
|
|
}
|
|
|
|
function html_protect($match)
|
|
{
|
|
return str_replace(['<','>'], ['<','>'], $match[1]);
|
|
}
|
|
|
|
function md_header($content)
|
|
{
|
|
|
|
$headingLevel = strlen($content[1]);
|
|
$header = trim($content[2]);
|
|
// Build anchor without space, numbers.
|
|
$anchor = preg_replace('#[^a-z?!]#', '', strtolower($header));
|
|
return sprintf('<h%d id="%s">%s</h%d>', $headingLevel, $anchor, $header, $headingLevel);
|
|
}
|
|
|
|
function md_codeblock($content)
|
|
{
|
|
$language = !empty($content[3]) ? filter_var($content[3], FILTER_SANITIZE_STRING) : '';
|
|
$class = !empty($language) ? sprintf(' class="%s language-%s"', $language, $language) : '';
|
|
// Build one block so that we not render each paragraph separately.
|
|
$content = str_replace("\n", '<br>', $content[4]);
|
|
|
|
return sprintf('<pre><code%s>%s</code></pre>', $class, bb_code_protect($content));
|
|
}
|
|
|
|
function md_italic($content)
|
|
{
|
|
return '<em>' . $content[1] . $content[3] . '</em>';
|
|
}
|
|
|
|
function md_bold($content)
|
|
{
|
|
|
|
return '<strong>' . $content[1] . $content[3] . '</strong>';
|
|
}
|
|
|
|
function md_bolditalic($content)
|
|
{
|
|
|
|
return '<strong><em>' . $content[1] . $content[3] . '</em></strong>';
|
|
}
|
|
|
|
/** @noinspection HtmlUnknownAttribute */
|
|
function md_image($content)
|
|
{
|
|
$url = filter_var($content[1], FILTER_SANITIZE_URL);
|
|
$alt = '';
|
|
if (isset($content[2])) {
|
|
$content[2] = str_replace('"', '', $content[2]);
|
|
$alt = 'alt="' . htmlentities(filter_var($content[2], FILTER_SANITIZE_STRING)) . '"';
|
|
$title = str_replace('alt=', 'title=', $alt);
|
|
}
|
|
|
|
/** @noinspection HtmlRequiredAltAttribute */
|
|
return sprintf('<img src="%s" %s %s>', $url, $alt, $title);
|
|
}
|
|
|
|
function md_topheader($matches)
|
|
{
|
|
// Terrible hack to check we haven't found an empty list item.
|
|
if ($matches[2] == '-' && preg_match('{^-(?: |$)}', $matches[1])) {
|
|
return $matches[0];
|
|
}
|
|
|
|
$level = $matches[2][0] == '=' ? 1 : 2;
|
|
|
|
return "<h$level>" . $matches[1] . "</h$level>" . "\n";
|
|
}
|
|
|
|
function bb_fixtable_lf($match)
|
|
{
|
|
|
|
// bbcode version (1 arg)
|
|
// remove extraneous whitespace between table element tags since newlines will all
|
|
// be converted to '<br>' and turn your neatly crafted tables into a whole lot of
|
|
// empty space.
|
|
|
|
$x = preg_replace("/\]\s+\[/", '][', $match[1]);
|
|
$x = str_replace("\\\n", "\n", $x);
|
|
return '[table]' . $x . '[/table]';
|
|
}
|
|
|
|
function ht_fixtable_lf($match)
|
|
{
|
|
|
|
// HTML version (2 args)
|
|
// remove extraneous whitespace between table element tags since newlines will all
|
|
// be converted to '<br>' and turn your neatly crafted tables into a whole lot of
|
|
// empty space.
|
|
|
|
$x = preg_replace("/\>\s+\</", '><', $match[2]);
|
|
return '<table' . $match[1] . '>' . $x . '</table>';
|
|
}
|
|
|
|
function bb_colortag($matches)
|
|
{
|
|
return '<span style="color: ' . bb_xss($matches[1]) . ';">' . $matches[2] . '</span>';
|
|
}
|
|
|
|
function bb_fonttag($matches)
|
|
{
|
|
return '<span style="font-family: ' . bb_xss($matches[1]) . ';">' . $matches[2] . '</span>';
|
|
}
|
|
|
|
function bb_sizetag($matches)
|
|
{
|
|
return '<span style="font-size: ' . bb_xss($matches[1]) . ';">' . $matches[2] . '</span>';
|
|
}
|
|
|
|
function bb_hltag($matches)
|
|
{
|
|
return '<span style="background-color: ' . bb_xss($matches[1]) . ';">' . $matches[2] . '</span>';
|
|
}
|
|
|
|
function bb_nakedlinks($Text) {
|
|
$urlchars = '[a-zA-Z0-9\pL\:\/\-\?\&\;\.\=\_\~\#\%\$\!\+\,\@\(\)]';
|
|
|
|
$Text = preg_replace_callback('/\[url(.*?)\[\/(url)\]/ism', '\red_escape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[zrl(.*?)\[\/(zrl)\]/ism', '\red_escape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[svg(.*?)\[\/(svg)\]/ism', '\red_escape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[img(.*?)\[\/(img)\]/ism', '\red_escape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[zmg(.*?)\[\/(zmg)\]/ism', '\red_escape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[audio(.*?)\[\/(audio)\]/ism', '\red_escape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[video(.*?)\[\/(video)\]/ism', '\red_escape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[oembed(.*?)\[\/(oembed)\]/ism', '\red_escape_codeblock', $Text);
|
|
|
|
if (str_contains($Text, 'http')) {
|
|
$Text = preg_replace("/([^\]\='" . '"' . "\;\/]\()(https?\:\/\/$urlchars+)/ismu", '$1<a href="$2" target="_blank" rel="nofollow noopener">$2</a>', $Text);
|
|
}
|
|
$Text = preg_replace_callback('/\[\$b64url(.*?)\[\/(url)\]/ism', '\red_unescape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[\$b64zrl(.*?)\[\/(zrl)\]/ism', '\red_unescape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[\$b64svg(.*?)\[\/(svg)\]/ism', '\red_unescape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[\$b64img(.*?)\[\/(img)\]/ism', '\red_unescape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[\$b64zmg(.*?)\[\/(zmg)\]/ism', '\red_unescape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[\$b64audio(.*?)\[\/(audio)\]/ism', '\red_unescape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[\$b64video(.*?)\[\/(video)\]/ism', '\red_unescape_codeblock', $Text);
|
|
$Text = preg_replace_callback('/\[\$b64oembed(.*?)\[\/(oembed)\]/ism', '\red_unescape_codeblock', $Text);
|
|
|
|
return $Text;
|
|
}
|
|
|
|
|
|
function bb_xss($s)
|
|
{
|
|
// don't allow functions of any kind
|
|
$s = str_replace([ '(', ')' ], [ '', '' ], $s);
|
|
|
|
// don't allow injection of multiple params
|
|
|
|
if (str_contains($s, ';')) {
|
|
return substr($s, 0, strpos($s, ';'));
|
|
}
|
|
return $s;
|
|
}
|
|
|
|
function bbtopoll($s)
|
|
{
|
|
|
|
$pl = [];
|
|
|
|
$match = '';
|
|
if (! preg_match("/\[poll=(.*?)\](.*?)\[\/poll\]/ism", $s, $match)) {
|
|
return null;
|
|
}
|
|
$pl['poll_id'] = $match[1];
|
|
$pl['poll_question'] = $match[2];
|
|
|
|
$match = [];
|
|
if (preg_match_all("/\[poll\-answer=(.*?)\](.*?)\[\/poll\-answer\]/is", $s, $match, PREG_SET_ORDER)) {
|
|
$pl['answer'] = [];
|
|
foreach ($match as $m) {
|
|
$ans = [ 'answer_id' => $m[1], 'answer_text' => $m[2] ];
|
|
$pl['answer'][] = $ans;
|
|
}
|
|
}
|
|
|
|
return $pl;
|
|
}
|
|
|
|
|
|
function parseIdentityAwareHTML($Text)
|
|
{
|
|
|
|
// Hide all [noparse] contained bbtags by spacefying them
|
|
if (str_contains($Text, '[noparse]')) {
|
|
$Text = preg_replace_callback("/\[noparse\](.*?)\[\/noparse\]/ism", 'bb_spacefy', $Text);
|
|
}
|
|
if (str_contains($Text, '[nobb]')) {
|
|
$Text = preg_replace_callback("/\[nobb\](.*?)\[\/nobb\]/ism", 'bb_spacefy', $Text);
|
|
}
|
|
if (str_contains($Text, '[pre]')) {
|
|
$Text = preg_replace_callback("/\[pre\](.*?)\[\/pre\]/ism", 'bb_spacefy', $Text);
|
|
}
|
|
// process [observer] tags before we do anything else because we might
|
|
// be stripping away stuff that then doesn't need to be worked on anymore
|
|
|
|
$observer = App::get_observer();
|
|
|
|
if ((str_contains($Text, '[/observer]')) || (str_contains($Text, '[/rpost]'))) {
|
|
$Text = preg_replace_callback("/\[observer\.language\=(.*?)\](.*?)\[\/observer\]/ism", 'oblanguage_callback', $Text);
|
|
$Text = preg_replace_callback("/\[observer\.language\!\=(.*?)\](.*?)\[\/observer\]/ism", 'oblanguage_necallback', $Text);
|
|
$Text = preg_replace_callback("/\[observer\.network\=(.*?)\](.*?)\[\/observer\]/ism", 'obnetwork_callback', $Text);
|
|
$Text = preg_replace_callback("/\[observer\.network\!\=(.*?)\](.*?)\[\/observer\]/ism", 'obnetwork_necallback', $Text);
|
|
|
|
if ($observer) {
|
|
$Text = preg_replace("/\[observer\=1\](.*?)\[\/observer\]/ism", '$1', $Text);
|
|
$Text = preg_replace("/\[observer\=0\].*?\[\/observer\]/ism", '', $Text);
|
|
$Text = preg_replace_callback("/\[rpost(=(.*?))?\](.*?)\[\/rpost\]/ism", 'rpost_callback', $Text);
|
|
} else {
|
|
$Text = preg_replace("/\[observer\=1\].*?\[\/observer\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[observer\=0\](.*?)\[\/observer\]/ism", '$1', $Text);
|
|
$Text = preg_replace("/\[rpost(=.*?)?\](.*?)\[\/rpost\]/ism", '', $Text);
|
|
}
|
|
}
|
|
// replace [observer.baseurl]
|
|
if ($observer) {
|
|
$s1 = '<span class="bb_observer" title="' . t('Different viewers will see this text differently') . '">';
|
|
$s2 = '</span>';
|
|
$obsBaseURL = $observer['xchan_connurl'];
|
|
$obsBaseURL = preg_replace("/\/poco\/.*$/", '', $obsBaseURL);
|
|
$Text = str_replace('[observer.baseurl]', $obsBaseURL, $Text);
|
|
$Text = str_replace('[observer.url]', $observer['xchan_url'], $Text);
|
|
$Text = str_replace('[observer.name]', $s1 . $observer['xchan_name'] . $s2, $Text);
|
|
$Text = str_replace('[observer.address]', $s1 . $observer['xchan_addr'] . $s2, $Text);
|
|
$Text = str_replace('[observer.webname]', substr($observer['xchan_addr'], 0, strpos($observer['xchan_addr'], '@')), $Text);
|
|
$Text = str_replace('[observer.photo]', $s1 . '[zmg]' . $observer['xchan_photo_l'] . '[/zmg]' . $s2, $Text);
|
|
$Text = str_replace('[observer.baseurl/]', $obsBaseURL, $Text);
|
|
$Text = str_replace('[observer.url/]', $observer['xchan_url'], $Text);
|
|
$Text = str_replace('[observer.name/]', $s1 . $observer['xchan_name'] . $s2, $Text);
|
|
$Text = str_replace('[observer.address/]', $s1 . $observer['xchan_addr'] . $s2, $Text);
|
|
$Text = str_replace('[observer.webname/]', substr($observer['xchan_addr'], 0, strpos($observer['xchan_addr'], '@')), $Text);
|
|
$Text = str_replace('[observer.photo/]', $s1 . '[zmg]' . $observer['xchan_photo_l'] . '[/zmg]' . $s2, $Text);
|
|
} else {
|
|
$Text = str_replace('[observer.baseurl]', '', $Text);
|
|
$Text = str_replace('[observer.url]', '', $Text);
|
|
$Text = str_replace('[observer.name]', '', $Text);
|
|
$Text = str_replace('[observer.address]', '', $Text);
|
|
$Text = str_replace('[observer.webname]', '', $Text);
|
|
$Text = str_replace('[observer.photo]', '', $Text);
|
|
$Text = str_replace('[observer.baseurl/]', '', $Text);
|
|
$Text = str_replace('[observer.url/]', '', $Text);
|
|
$Text = str_replace('[observer.name/]', '', $Text);
|
|
$Text = str_replace('[observer.address/]', '', $Text);
|
|
$Text = str_replace('[observer.webname/]', '', $Text);
|
|
$Text = str_replace('[observer.photo/]', '', $Text);
|
|
}
|
|
|
|
$Text = str_replace(array('[baseurl]','[baseurl/]','[sitename]','[sitename/]'), array(z_root(),z_root(), get_config('system', 'sitename'),get_config('system', 'sitename')), $Text);
|
|
|
|
|
|
// Unhide all [noparse] contained bbtags unspacefying them
|
|
// and triming the [noparse] tag.
|
|
if (str_contains($Text, '[noparse]')) {
|
|
$Text = preg_replace_callback("/\[noparse\](.*?)\[\/noparse\]/ism", 'bb_unspacefy_and_trim', $Text);
|
|
}
|
|
if (str_contains($Text, '[nobb]')) {
|
|
$Text = preg_replace_callback("/\[nobb\](.*?)\[\/nobb\]/ism", 'bb_unspacefy_and_trim', $Text);
|
|
}
|
|
if (str_contains($Text, '[pre]')) {
|
|
$Text = preg_replace_callback("/\[pre\](.*?)\[\/pre\]/ism", 'bb_unspacefy_and_trim', $Text);
|
|
}
|
|
return $Text;
|
|
}
|
|
|
|
|
|
function bbcode($Text, $options = [])
|
|
{
|
|
|
|
if (! is_array($options)) {
|
|
$options = [];
|
|
}
|
|
|
|
if (is_array($Text)) {
|
|
btlogger('Text is array: ' . print_r($Text, true));
|
|
}
|
|
|
|
$cache = ((array_key_exists('cache', $options)) ? $options['cache'] : false);
|
|
$newwin = ((array_key_exists('newwin', $options)) ? $options['newwin'] : true);
|
|
$export = ((array_key_exists('export', $options)) ? $options['export'] : false);
|
|
$activitypub = ((array_key_exists('activitypub', $options)) ? $options['activitypub'] : false);
|
|
$censored = ((array_key_exists('censored', $options)) ? $options['censored'] : false);
|
|
$plain = ((array_key_exists('plain', $options)) ? $options['plain'] : false);
|
|
$bbonly = ((array_key_exists('bbonly', $options)) ? $options['bbonly'] : false);
|
|
|
|
if ($activitypub) {
|
|
$export = true;
|
|
}
|
|
|
|
$target = (($newwin) ? ' target="_blank" ' : '');
|
|
|
|
Hook::call('bbcode_filter', $Text);
|
|
|
|
|
|
// Hide all [noparse] contained bbtags by spacefying them
|
|
if (str_contains($Text, '[noparse]')) {
|
|
$Text = preg_replace_callback("/\[noparse\](.*?)\[\/noparse\]/ism", 'bb_spacefy', $Text);
|
|
}
|
|
if (str_contains($Text, '[nobb]')) {
|
|
$Text = preg_replace_callback("/\[nobb\](.*?)\[\/nobb\]/ism", 'bb_spacefy', $Text);
|
|
}
|
|
if (str_contains($Text, '[pre]')) {
|
|
$Text = preg_replace_callback("/\[pre\](.*?)\[\/pre\]/ism", 'bb_spacefy', $Text);
|
|
}
|
|
|
|
$Text = preg_replace("/\[ltr\](.*?)\[\/ltr\]/ism",'<div dir="ltr">$1</div>', $Text);
|
|
$Text = preg_replace("/\[rtl\](.*?)\[\/rtl\]/ism",'<div dir="rtl">$1</div>', $Text);
|
|
|
|
$Text = bb_format_attachdata($Text);
|
|
|
|
// If we find any event code, turn it into an event.
|
|
// After we're finished processing the bbcode we'll
|
|
// replace all of the event code with a reformatted version.
|
|
|
|
$ev = bbtoevent($Text);
|
|
|
|
// and the same with polls
|
|
|
|
$pl = bbtopoll($Text);
|
|
|
|
|
|
// process [observer] tags before we do anything else because we might
|
|
// be stripping away stuff that then doesn't need to be worked on anymore
|
|
|
|
if ($cache || $export) {
|
|
$observer = false;
|
|
} else {
|
|
$observer = App::get_observer();
|
|
}
|
|
|
|
if ((str_contains($Text, '[/observer]')) || (str_contains($Text, '[/rpost]'))) {
|
|
$Text = preg_replace_callback("/\[observer\.language\=(.*?)\](.*?)\[\/observer\]/ism", 'oblanguage_callback', $Text);
|
|
$Text = preg_replace_callback("/\[observer\.language\!\=(.*?)\](.*?)\[\/observer\]/ism", 'oblanguage_necallback', $Text);
|
|
if ($observer) {
|
|
$Text = preg_replace_callback("/\[observer\.network\=(.*?)\](.*?)\[\/observer\]/ism", 'obnetwork_callback', $Text);
|
|
$Text = preg_replace_callback("/\[observer\.network\!\=(.*?)\](.*?)\[\/observer\]/ism", 'obnetwork_necallback', $Text);
|
|
}
|
|
else {
|
|
$Text = preg_replace("/\[observer\.network(.*?)\](.*?)\[\/observer\]/ism", '', $Text);
|
|
}
|
|
if ($observer) {
|
|
$Text = preg_replace("/\[observer\=1\](.*?)\[\/observer\]/ism", '$1', $Text);
|
|
$Text = preg_replace("/\[observer\=0\].*?\[\/observer\]/ism", '', $Text);
|
|
$Text = preg_replace_callback("/\[rpost(=(.*?))?\](.*?)\[\/rpost\]/ism", 'rpost_callback', $Text);
|
|
} else {
|
|
$Text = preg_replace("/\[observer\=1\].*?\[\/observer\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[observer\=0\](.*?)\[\/observer\]/ism", '$1', $Text);
|
|
$Text = preg_replace("/\[rpost(=.*?)?\](.*?)\[\/rpost\]/ism", '', $Text);
|
|
}
|
|
}
|
|
|
|
if ($cache || $export) {
|
|
$channel = false;
|
|
} else {
|
|
$channel = App::get_channel();
|
|
}
|
|
|
|
if (str_contains($Text, '[/channel]')) {
|
|
if ($channel) {
|
|
$Text = preg_replace("/\[channel\=1\](.*?)\[\/channel\]/ism", '$1', $Text);
|
|
$Text = preg_replace("/\[channel\=0\].*?\[\/channel\]/ism", '', $Text);
|
|
} else {
|
|
$Text = preg_replace("/\[channel\=1\].*?\[\/channel\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[channel\=0\](.*?)\[\/channel\]/ism", '$1', $Text);
|
|
}
|
|
}
|
|
|
|
|
|
$x = bb_extract_images($Text);
|
|
$Text = $x['body'];
|
|
$saved_images = $x['images'];
|
|
|
|
if (! $export) {
|
|
$Text = str_replace(array('[baseurl]','[baseurl/]','[sitename]','[sitename/]'), array(z_root(),z_root(), get_config('system', 'sitename'),get_config('system', 'sitename')), $Text);
|
|
}
|
|
|
|
|
|
// Replace any html brackets with HTML Entities to prevent executing HTML or script
|
|
// Don't use strip_tags here because it breaks [url] search by replacing & with amp
|
|
|
|
// These are no longer needed since we run the content through purify_html()
|
|
// $Text = str_replace("<", "<", $Text);
|
|
// $Text = str_replace(">", ">", $Text);
|
|
|
|
|
|
// Check for [code] text here, before the linefeeds are messed with.
|
|
// The highlighter will unescape and re-escape the content.
|
|
|
|
if (str_contains($Text, '[code=')) {
|
|
$Text = preg_replace_callback("/\[code=(.*?)\](.*?)\[\/code\]/ism", function ($match) use ($options) {
|
|
return bb_code_protect(text_highlight($match[2], strtolower($match[1]), $options));
|
|
}, $Text);
|
|
}
|
|
|
|
$Text = preg_replace_callback("/\[table\](.*?)\[\/table\]/ism", 'bb_fixtable_lf', $Text);
|
|
$Text = preg_replace_callback("/\<table(.*?)\>(.*?)\<\/table\>/ism", 'ht_fixtable_lf', $Text);
|
|
|
|
$Text = str_replace("\r\n", "\n", $Text);
|
|
|
|
|
|
if ($bbonly) {
|
|
$Text = escape_tags($Text);
|
|
}
|
|
|
|
// Convert new line chars to html <br> tags
|
|
|
|
$Text = str_replace("\n", '<br>', $Text);
|
|
$Text = str_replace(array("\t", " "), array(" ", " "), $Text);
|
|
|
|
|
|
// Check for [code] text
|
|
if (str_contains($Text, '[code]')) {
|
|
$Text = preg_replace_callback("/\[code\](.*?)\[\/code\]/ism", 'bb_code', $Text);
|
|
}
|
|
|
|
// Check for [code options] text
|
|
if (str_contains($Text, '[code ')) {
|
|
$Text = preg_replace_callback("/\[code(.*?)\](.*?)\[\/code\]/ism", 'bb_code_options', $Text);
|
|
}
|
|
|
|
// Set up the parameters for a URL search string
|
|
$URLSearchString = "^\[\]";
|
|
// Set up the parameters for a MAIL search string
|
|
$MAILSearchString = $URLSearchString;
|
|
|
|
// replace [observer.baseurl]
|
|
if ($observer) {
|
|
$s1 = '<span class="bb_observer" title="' . t('Different viewers will see this text differently') . '">';
|
|
$s2 = '</span>';
|
|
$obsBaseURL = $observer['xchan_connurl'];
|
|
$obsBaseURL = preg_replace("/\/poco\/.*$/", '', $obsBaseURL);
|
|
$Text = str_replace('[observer.baseurl]', $obsBaseURL, $Text);
|
|
$Text = str_replace('[observer.url]', $observer['xchan_url'], $Text);
|
|
$Text = str_replace('[observer.name]', $s1 . $observer['xchan_name'] . $s2, $Text);
|
|
$Text = str_replace('[observer.address]', $s1 . $observer['xchan_addr'] . $s2, $Text);
|
|
$Text = str_replace('[observer.webname]', substr($observer['xchan_addr'], 0, strpos($observer['xchan_addr'], '@')), $Text);
|
|
$Text = str_replace('[observer.photo]', $s1 . '[zmg]' . $observer['xchan_photo_l'] . '[/zmg]' . $s2, $Text);
|
|
$Text = str_replace('[observer.baseurl/]', $obsBaseURL, $Text);
|
|
$Text = str_replace('[observer.url/]', $observer['xchan_url'], $Text);
|
|
$Text = str_replace('[observer.name/]', $s1 . $observer['xchan_name'] . $s2, $Text);
|
|
$Text = str_replace('[observer.address/]', $s1 . $observer['xchan_addr'] . $s2, $Text);
|
|
$Text = str_replace('[observer.webname/]', substr($observer['xchan_addr'], 0, strpos($observer['xchan_addr'], '@')), $Text);
|
|
$Text = str_replace('[observer.photo/]', $s1 . '[zmg]' . $observer['xchan_photo_l'] . '[/zmg]' . $s2, $Text);
|
|
} else {
|
|
$Text = str_replace('[observer.baseurl]', '', $Text);
|
|
$Text = str_replace('[observer.url]', '', $Text);
|
|
$Text = str_replace('[observer.name]', '', $Text);
|
|
$Text = str_replace('[observer.address]', '', $Text);
|
|
$Text = str_replace('[observer.webname]', '', $Text);
|
|
$Text = str_replace('[observer.photo]', '', $Text);
|
|
$Text = str_replace('[observer.baseurl/]', '', $Text);
|
|
$Text = str_replace('[observer.url/]', '', $Text);
|
|
$Text = str_replace('[observer.name/]', '', $Text);
|
|
$Text = str_replace('[observer.address/]', '', $Text);
|
|
$Text = str_replace('[observer.webname/]', '', $Text);
|
|
$Text = str_replace('[observer.photo/]', '', $Text);
|
|
}
|
|
|
|
// Perform URL Search
|
|
|
|
$count = 0;
|
|
while (str_contains($Text, '[/share]') && $count < 10) {
|
|
$Text = preg_replace_callback("/\[share(.*?)\](.*?)\[\/share\]/ism", 'bb_ShareAttributes', $Text);
|
|
$count++;
|
|
}
|
|
|
|
if (str_contains($Text, '[/url]')) {
|
|
$Text = preg_replace("/\#\^\[url\]([$URLSearchString]*?)\[\/url\]/ism", '<a class="bookmark" href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
$Text = preg_replace("/\#\^\[url\=([$URLSearchString]*?)\](.*?)\[\/url\]/ism", '<a class="bookmark" href="$1" ' . $target . ' rel="nofollow noopener" >$2</a>', $Text);
|
|
$Text = preg_replace("/\#\[url\]([$URLSearchString]*?)\[\/url\]/ism", '#<a class="hashtag" href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
$Text = preg_replace("/\#\[url\=([$URLSearchString]*?)\](.*?)\[\/url\]/ism", '#<a class="hashtag" href="$1" ' . $target . ' rel="nofollow noopener" >$2</a>', $Text);
|
|
$Text = preg_replace("/\[url\]([$URLSearchString]*?)\[\/url\]/ism", '<a href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
$Text = preg_replace("/\@(\!?)\[url\=([$URLSearchString]*?)\](.*?)\[\/url\]/ism", '@$1<span class="h-card"><a class="u-url mention" href="$2" ' . $target . ' rel="nofollow noopener" >$3</a></span>', $Text);
|
|
$Text = preg_replace("/\!(\!?)\[url\=([$URLSearchString]*?)\](.*?)\[\/url\]/ism", '!$1<span class="h-card"><a class="u-url mention" href="$2" ' . $target . ' rel="nofollow noopener" >$3</a></span>', $Text);
|
|
$Text = preg_replace("/\[url\=([$URLSearchString]*?)\](.*?)\[\/url\]/ism", '<a href="$1" ' . $target . ' rel="nofollow noopener" >$2</a>', $Text);
|
|
}
|
|
|
|
if (str_contains($Text, '[/zrl]')) {
|
|
// render hubzilla bookmarks as normal links
|
|
$Text = preg_replace("/\#\^\[zrl\]([$URLSearchString]*?)\[\/zrl\]/ism", '<a class="zrl bookmark" href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
$Text = preg_replace("/\#\^\[zrl\=([$URLSearchString]*?)\](.*?)\[\/zrl\]/ism", '<a class="zrl bookmark" href="$1" ' . $target . ' rel="nofollow noopener" >$2</a>', $Text);
|
|
$Text = preg_replace("/\#\[zrl\]([$URLSearchString]*?)\[\/zrl\]/ism", '#<a class="zrl hashtag" href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
$Text = preg_replace("/\#\[zrl\=([$URLSearchString]*?)\](.*?)\[\/zrl\]/ism", '#<a class="zrl hashtag" href="$1" ' . $target . ' rel="nofollow noopener" >$2</a>', $Text);
|
|
$Text = preg_replace("/\[zrl\]([$URLSearchString]*?)\[\/zrl\]/ism", '<a class="zrl" href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
$Text = preg_replace("/\@(\!?)\[zrl\=([$URLSearchString]*?)\](.*?)\[\/zrl\]/ism", '@$1<span class="h-card"><a class="zrl u-url mention" href="$2" ' . $target . ' rel="nofollow noopener" >$3</a></span>', $Text);
|
|
$Text = preg_replace("/\!(\!?)\[zrl\=([$URLSearchString]*?)\](.*?)\[\/zrl\]/ism", '!$1<span class="h-card"><a class="zrl u-url mention" href="$2" ' . $target . ' rel="nofollow noopener" >$3</a></span>', $Text);
|
|
$Text = preg_replace("/\[zrl\=([$URLSearchString]*?)\](.*?)\[\/zrl\]/ism", '<a class="zrl" href="$1" ' . $target . ' rel="nofollow noopener" >$2</a>', $Text);
|
|
}
|
|
|
|
// named anchors do not work well in conversational text, as it is often collapsed by a "showmore" script.
|
|
// Included here for completeness.
|
|
|
|
if (str_contains($Text, '[/anchor]')) {
|
|
$Text = preg_replace("/\[anchor\](.*?)\[\/anchor\]/ism", '<a name="$1"></a>', $Text);
|
|
}
|
|
|
|
if (str_contains($Text, '[/goto]')) {
|
|
$Text = preg_replace("/\[goto=(.*?)\](.*?)\[\/goto\]/ism", '<a href="#$1">$2</a>', $Text);
|
|
}
|
|
|
|
// Perform MAIL Search
|
|
if (str_contains($Text, '[/mail]')) {
|
|
$Text = preg_replace("/\[mail\]([$MAILSearchString]*)\[\/mail\]/", '<a href="mailto:$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
$Text = preg_replace("/\[mail\=([$MAILSearchString]*)\](.*?)\[\/mail\]/", '<a href="mailto:$1" ' . $target . ' rel="nofollow noopener" >$2</a>', $Text);
|
|
}
|
|
|
|
|
|
// leave open the posibility of [map=something]
|
|
// this is replaced in prepare_body() which has knowledge of the item location
|
|
|
|
if ($export) {
|
|
$Text = str_replace([ '[map]','[/map]' ], [ '','' ], $Text);
|
|
$Text = preg_replace("/\[map=(.*?)[, ](.*?)\]/ism", 'geo:$1,$2', $Text);
|
|
} else {
|
|
if (str_contains($Text, '[/map]')) {
|
|
$Text = preg_replace_callback("/\[map\](.*?)\[\/map\]/ism", 'bb_map_location', $Text);
|
|
}
|
|
if (str_contains($Text, '[map=')) {
|
|
$Text = preg_replace_callback("/\[map=(.*?)\/\]/ism", 'bb_map_coords', $Text);
|
|
$Text = preg_replace_callback("/\[map=(.*?)\]/ism", 'bb_map_coords', $Text);
|
|
}
|
|
if (str_contains($Text, '[map]')) {
|
|
$Text = preg_replace("/\[map\/\]/", '<div class="map"></div>', $Text);
|
|
$Text = preg_replace("/\[map\]/", '<div class="map"></div>', $Text);
|
|
}
|
|
}
|
|
|
|
// Check for bold text
|
|
if (str_contains($Text, '[b]')) {
|
|
$Text = preg_replace("(\[b\](.*?)\[\/b\])ism", '<strong>$1</strong>', $Text);
|
|
}
|
|
// Check for Italics text
|
|
if (str_contains($Text, '[i]')) {
|
|
$Text = preg_replace("(\[i](.*?)\[/i])ism", '<em>$1</em>', $Text);
|
|
}
|
|
// Check for Underline text
|
|
if (str_contains($Text, '[u]')) {
|
|
$Text = preg_replace("(\[u](.*?)\[/u])ism", '<u>$1</u>', $Text);
|
|
}
|
|
// Check for strike-through text
|
|
if (str_contains($Text, '[s]')) {
|
|
$Text = preg_replace("(\[s\](.*?)\[\/s\])ism", '<span style="text-decoration: line-through;">$1</span>', $Text);
|
|
}
|
|
// Check for over-line text
|
|
if (str_contains($Text, '[o]')) {
|
|
$Text = preg_replace("(\[o\](.*?)\[\/o\])ism", '<span style="text-decoration: overline;">$1</span>', $Text);
|
|
}
|
|
if (str_contains($Text, '[sup]')) {
|
|
$Text = preg_replace("(\[sup\](.*?)\[\/sup\])ism", '<sup>$1</sup>', $Text);
|
|
}
|
|
if (str_contains($Text, '[sub]')) {
|
|
$Text = preg_replace("(\[sub\](.*?)\[\/sub\])ism", '<sub>$1</sub>', $Text);
|
|
}
|
|
|
|
// Check for colored text
|
|
if (str_contains($Text, '[/color]')) {
|
|
$Text = preg_replace_callback("(\[color=(.*?)\](.*?)\[\/color\])ism", 'bb_colortag', $Text);
|
|
}
|
|
// Check for highlighted text
|
|
if (str_contains($Text, '[/hl]')) {
|
|
$Text = preg_replace("(\[hl\](.*?)\[\/hl\])ism", "<span style=\"background-color: yellow;\">$1</span>", $Text);
|
|
$Text = preg_replace_callback("(\[mark=(.*?)\](.*?)\[\/mark\])ism", 'bb_hltag', $Text);
|
|
}
|
|
// Check for highlighted text
|
|
if (str_contains($Text, '[/mark]')) {
|
|
$Text = preg_replace("(\[mark\](.*?)\[\/mark\])ism", "<mark style=\"background-color: yellow;\">$1</mark>", $Text);
|
|
$Text = preg_replace_callback("(\[mark=(.*?)\](.*?)\[\/mark\])ism", 'bb_hltag', $Text);
|
|
}
|
|
|
|
// Check for sized text
|
|
// [size=50] --> font-size: 50px (with the unit).
|
|
if (str_contains($Text, '[/size]')) {
|
|
$Text = preg_replace("(\[size=(\d*?)\](.*?)\[\/size\])ism", "<span style=\"font-size: $1px;\">$2</span>", $Text);
|
|
$Text = preg_replace_callback("(\[size=(.*?)\](.*?)\[\/size\])ism", 'bb_sizetag', $Text);
|
|
}
|
|
// Check for h1
|
|
if (str_contains($Text, '[h1]')) {
|
|
$Text = preg_replace("(\[h1\](.*?)\[\/h1\])ism", '<h1>$1</h1>', $Text);
|
|
$Text = str_replace('</h1><br>', '</h1>', $Text);
|
|
}
|
|
// Check for h2
|
|
if (str_contains($Text, '[h2]')) {
|
|
$Text = preg_replace("(\[h2\](.*?)\[\/h2\])ism", '<h2>$1</h2>', $Text);
|
|
$Text = str_replace('</h2><br>', '</h2>', $Text);
|
|
}
|
|
// Check for h3
|
|
if (str_contains($Text, '[h3]')) {
|
|
$Text = preg_replace("(\[h3\](.*?)\[\/h3\])ism", '<h3>$1</h3>', $Text);
|
|
$Text = str_replace('</h3><br>', '</h3>', $Text);
|
|
}
|
|
// Check for h4
|
|
if (str_contains($Text, '[h4]')) {
|
|
$Text = preg_replace("(\[h4\](.*?)\[\/h4\])ism", '<h4>$1</h4>', $Text);
|
|
$Text = str_replace('</h4><br>', '</h4>', $Text);
|
|
}
|
|
// Check for h5
|
|
if (str_contains($Text, '[h5]')) {
|
|
$Text = preg_replace("(\[h5\](.*?)\[\/h5\])ism", '<h5>$1</h5>', $Text);
|
|
$Text = str_replace('</h5><br>', '</h5>', $Text);
|
|
}
|
|
// Check for h6
|
|
if (str_contains($Text, '[h6]')) {
|
|
$Text = preg_replace("(\[h6\](.*?)\[\/h6\])ism", '<h6>$1</h6>', $Text);
|
|
$Text = str_replace('</h6><br>', '</h6>', $Text);
|
|
}
|
|
|
|
// Check for table of content without params
|
|
while (str_contains($Text, '[toc]')) {
|
|
$toc_id = 'toc-' . random_string(10);
|
|
$Text = preg_replace("/\[toc\]/ism", '<ul id="' . $toc_id . '" class="toc" data-toc=".section-content-wrapper"></ul><script>$("#' . $toc_id . '").toc();</script>', $Text, 1);
|
|
$Text = preg_replace("/\[toc\/\]/ism", '<ul id="' . $toc_id . '" class="toc" data-toc=".section-content-wrapper"></ul><script>$("#' . $toc_id . '").toc();</script>', $Text, 1);
|
|
}
|
|
// Check for table of content with params
|
|
while (str_contains($Text, '[toc')) {
|
|
$toc_id = 'toc-' . random_string(10);
|
|
/** @noinspection HtmlUnknownAttribute */
|
|
$Text = preg_replace("/\[toc([^\]]+?)\/\]/ism", '<ul id="' . $toc_id . '" class="toc"$1></ul><script>$("#' . $toc_id . '").toc();</script>', $Text, 1);
|
|
/** @noinspection HtmlUnknownAttribute */
|
|
$Text = preg_replace("/\[toc([^\]]+?)\]/ism", '<ul id="' . $toc_id . '" class="toc"$1></ul><script>$("#' . $toc_id . '").toc();</script>', $Text, 1);
|
|
}
|
|
// Check for centered text
|
|
if (str_contains($Text, '[/center]')) {
|
|
$Text = preg_replace("(\[center\](.*?)\[\/center\])ism", "<div style=\"text-align:center;\">$1</div>", $Text);
|
|
}
|
|
// Check for footer
|
|
if (str_contains($Text, '[/footer]')) {
|
|
$Text = preg_replace("(\[footer\](.*?)\[\/footer\])ism", "<div class=\"wall-item-footer\">$1</div>", $Text);
|
|
}
|
|
|
|
// Check for bdi
|
|
if (str_contains($Text, '[/bdi]')) {
|
|
$Text = preg_replace("(\[bdi\](.*?)\[\/bdi\])ism", "<bdi>$1</bdi>", $Text);
|
|
}
|
|
|
|
|
|
// Check for list text
|
|
|
|
$Text = preg_replace("/<br>\[\*\]/ism", "[*]", $Text);
|
|
$Text = str_replace("[*]", "<li>", $Text);
|
|
|
|
// handle nested lists
|
|
$endlessloop = 0;
|
|
|
|
while (
|
|
(((str_contains($Text, "[/list]")) && (str_contains($Text, "[list"))) ||
|
|
((str_contains($Text, "[/ol]")) && (str_contains($Text, "[ol]"))) ||
|
|
((str_contains($Text, "[/ul]")) && (str_contains($Text, "[ul]"))) ||
|
|
((str_contains($Text, "[/dl]")) && (str_contains($Text, "[dl"))) ||
|
|
((str_contains($Text, "[/li]")) && (str_contains($Text, "[li]")))) && (++$endlessloop < 20)
|
|
) {
|
|
$Text = preg_replace("/\[list\](.*?)\[\/list\]/ism", '<ul class="listbullet" style="list-style-type: circle;">$1</ul>', $Text);
|
|
$Text = preg_replace("/\[list=\](.*?)\[\/list\]/ism", '<ul class="listnone" style="list-style-type: none;">$1</ul>', $Text);
|
|
$Text = preg_replace("/\[list=1\](.*?)\[\/list\]/ism", '<ul class="listdecimal" style="list-style-type: decimal;">$1</ul>', $Text);
|
|
$Text = preg_replace("/\[list=((?-i)i)\](.*?)\[\/list\]/ism", '<ul class="listlowerroman" style="list-style-type: lower-roman;">$2</ul>', $Text);
|
|
$Text = preg_replace("/\[list=((?-i)I)\](.*?)\[\/list\]/ism", '<ul class="listupperroman" style="list-style-type: upper-roman;">$2</ul>', $Text);
|
|
$Text = preg_replace("/\[list=((?-i)a)\](.*?)\[\/list\]/ism", '<ul class="listloweralpha" style="list-style-type: lower-alpha;">$2</ul>', $Text);
|
|
$Text = preg_replace("/\[list=((?-i)A)\](.*?)\[\/list\]/ism", '<ul class="listupperalpha" style="list-style-type: upper-alpha;">$2</ul>', $Text);
|
|
$Text = preg_replace("/\[ul\](.*?)\[\/ul\]/ism", '<ul class="listbullet" style="list-style-type: circle;">$1</ul>', $Text);
|
|
$Text = preg_replace("/\[ol\](.*?)\[\/ol\]/ism", '<ul class="listdecimal" style="list-style-type: decimal;">$1</ul>', $Text);
|
|
$Text = preg_replace("/\[\/li\]<br>\[li\]/ism", '[/li][li]', $Text);
|
|
$Text = preg_replace("/\[li\](.*?)\[\/li\]/ism", '<li>$1</li>', $Text);
|
|
|
|
// [dl] tags have an optional [dl terms="bi"] form where bold/italic/underline/mono/large
|
|
// etc. style may be specified for the "terms" in the definition list. The quotation marks
|
|
// are also optional. The regex looks intimidating, but breaks down as:
|
|
// "[dl" <optional-whitespace> <optional-termStyles> "]" <matchGroup2> "[/dl]"
|
|
// where optional-termStyles are: "terms=" <optional-quote> <matchGroup1> <optional-quote>
|
|
$Text = preg_replace_callback('/\[dl[[:space:]]*(?:terms=(?:"|")?([a-zA-Z]+)(?:"|")?)?\](.*?)\[\/dl\]/ism', 'bb_definitionList', $Text);
|
|
}
|
|
|
|
// Friendica generates this
|
|
if (str_contains($Text, '[/abstract]')) {
|
|
$Text = preg_replace("/\[abstract\](.*?)\[\/abstract\]/ism", '<h3>$1</h3>', $Text);
|
|
}
|
|
|
|
if (str_contains($Text, '[checklist]')) {
|
|
$Text = preg_replace_callback("/\[checklist\](.*?)\[\/checklist\]/ism", 'bb_checklist', $Text);
|
|
}
|
|
|
|
|
|
$loop = 0;
|
|
while (str_contains($Text, '[/table]') && str_contains($Text, "[table") && ++$loop < 20) {
|
|
$Text = preg_replace("/\[table\](.*?)\[\/table\]/ism", '<table class="table">$1</table>', $Text);
|
|
$Text = preg_replace("/\[table border=1\](.*?)\[\/table\]/ism", '<table class="table table-responsive table-bordered" >$1</table>', $Text);
|
|
$Text = preg_replace("/\[table border=0\](.*?)\[\/table\]/ism", '<table class="table table-responsive" >$1</table>', $Text);
|
|
}
|
|
if (str_contains($Text, '[th]')) {
|
|
$Text = preg_replace("/\[th\](.*?)\[\/th\]/ism", '<th>$1</th>', $Text);
|
|
}
|
|
if (str_contains($Text, '[td]')) {
|
|
$Text = preg_replace("/\[td\](.*?)\[\/td\]/ism", '<td>$1</td>', $Text);
|
|
}
|
|
if (str_contains($Text, '[tr]')) {
|
|
$Text = preg_replace("/\[tr\](.*?)\[\/tr\]/ism", '<tr>$1</tr>', $Text);
|
|
}
|
|
if (str_contains($Text, '[tbody]')) {
|
|
$Text = preg_replace("/\[tbody\](.*?)\[\/tbody\]/ism", '<tbody>$1</tbody>', $Text);
|
|
}
|
|
|
|
|
|
$Text = str_replace('</tr><br><tr>', "</tr>\n<tr>", $Text);
|
|
$Text = str_replace('[hr]', '<hr>', $Text);
|
|
|
|
// This is actually executed in prepare_body()
|
|
|
|
$Text = str_replace('[nosmile]', '', $Text);
|
|
|
|
// Check for font change text
|
|
if (str_contains($Text, '[/font]')) {
|
|
$Text = preg_replace_callback("/\[font=(.*?)\](.*?)\[\/font\]/sm", 'bb_fonttag', $Text);
|
|
}
|
|
|
|
if (str_contains($Text, '[/summary]')) {
|
|
$Text = preg_replace_callback("/^(.*?)\[summary\](.*?)\[\/summary\](.*?)$/ism", 'bb_summary', $Text);
|
|
}
|
|
|
|
// Check for [spoiler] text
|
|
if ($export) {
|
|
$Text = str_replace(['[spoiler]','[/spoiler]','[open]','[/open]'],[ '', '', '', ''], $Text);
|
|
}
|
|
else {
|
|
$endlessloop = 0;
|
|
while ((str_contains($Text, "[/spoiler]")) && (str_contains($Text, "[spoiler]")) && (++$endlessloop < 20)) {
|
|
$Text = preg_replace_callback("/\[spoiler\](.*?)\[\/spoiler\]/ism", 'bb_spoilertag', $Text);
|
|
}
|
|
|
|
// Check for [spoiler=Author] text
|
|
$endlessloop = 0;
|
|
while ((str_contains($Text, "[/spoiler]")) && (str_contains($Text, "[spoiler=")) && (++$endlessloop < 20)) {
|
|
$Text = preg_replace_callback("/\[spoiler=(.*?)\](.*?)\[\/spoiler\]/ism", 'bb_spoilertag', $Text);
|
|
}
|
|
|
|
// Check for [open] text
|
|
$endlessloop = 0;
|
|
while ((str_contains($Text, "[/open]")) && (str_contains($Text, "[open]")) && (++$endlessloop < 20)) {
|
|
$Text = preg_replace_callback("/\[open\](.*?)\[\/open\]/ism", 'bb_opentag', $Text);
|
|
}
|
|
|
|
// Check for [open=Title] text
|
|
$endlessloop = 0;
|
|
while ((str_contains($Text, "[/open]")) && (str_contains($Text, "[open=")) && (++$endlessloop < 20)) {
|
|
$Text = preg_replace_callback("/\[open=(.*?)\](.*?)\[\/open\]/ism", 'bb_opentag', $Text);
|
|
}
|
|
}
|
|
|
|
// Declare the format for [quote] layout
|
|
$QuoteLayout = '<blockquote>$1</blockquote>';
|
|
|
|
|
|
// Check for [quote] text
|
|
// handle nested quotes
|
|
$endlessloop = 0;
|
|
while ((str_contains($Text, "[/quote]")) && (str_contains($Text, "[quote]")) && (++$endlessloop < 20)) {
|
|
$Text = preg_replace("/\[quote\](.*?)\[\/quote\]/ism", "$QuoteLayout", $Text);
|
|
}
|
|
|
|
// Check for [quote=Author] text
|
|
|
|
$t_wrote = t('$1 wrote:');
|
|
|
|
// handle nested quotes
|
|
$endlessloop = 0;
|
|
while ((str_contains($Text, "[/quote]")) && (str_contains($Text, "[quote=")) && (++$endlessloop < 20)) {
|
|
$Text = preg_replace(
|
|
"/\[quote=[\"\']*(.*?)[\"\']*\](.*?)\[\/quote\]/ism",
|
|
"<span class=" . '"bb-quote"' . ">" . $t_wrote . "</span><blockquote>$2</blockquote>",
|
|
$Text
|
|
);
|
|
}
|
|
|
|
if ($plain) {
|
|
$Text = str_replace([ '<blockquote>','</blockquote>' ], [ '“', '”' ], $Text);
|
|
}
|
|
|
|
// Replace naked urls
|
|
$Text = bb_nakedlinks($Text);
|
|
// Images
|
|
|
|
// [img]pathtoimage[/img]
|
|
if (str_contains($Text, '[/img]')) {
|
|
$Text = preg_replace("/\[img\](.*?)\[\/img\]/ism", '<img style="max-width: 100%;" src="$1" alt="' . t('Image/photo') . '" loading="eager" />', $Text);
|
|
}
|
|
if (str_contains($Text, '[/zmg]')) {
|
|
$Text = preg_replace("/\[zmg\](.*?)\[\/zmg\]/ism", '<img class="zrl" style="max-width: 100%;" src="$1" alt="' . t('Image/photo') . '" loading="eager" />', $Text);
|
|
}
|
|
|
|
$Text = preg_replace_callback("/\[([zi])mg([ \=])(.*?)\](.*?)\[\/[zi]mg\]/ism", 'bb_imgoptions', $Text);
|
|
|
|
if (str_contains($Text,'[/qr]')) {
|
|
$Text = preg_replace_callback("/\[qr\](.*?)\[\/qr\]/ism", 'bb_qr', $Text);
|
|
}
|
|
|
|
|
|
if ($censored) {
|
|
// This function in include/misc.php separates images wrapped in links
|
|
// so the links are still accessible when censored (where clicking the img views it).
|
|
// Unfortunately this destroys the formatting of reshares by a censored author.
|
|
// To visit the original links attached to the image, one must turn off safe mode.
|
|
// Leaving commented out in case somebody has a desire to fix it.
|
|
// $Text = separate_img_links($Text);
|
|
$Text = preg_replace_callback("/\<img(.*?)src=\"(.*?)\"(.*?)\>/ism", "bb_colorbox", $Text);
|
|
}
|
|
|
|
// style (sanitized)
|
|
if (str_contains($Text, '[/style]')) {
|
|
$Text = preg_replace_callback("(\[style=(.*?)\](.*?)\[\/style\])ism", "bb_sanitize_style", $Text);
|
|
}
|
|
|
|
// crypt
|
|
if (str_contains($Text, '[/crypt]')) {
|
|
if ($activitypub) {
|
|
$Text = preg_replace_callback("/\[crypt (.*?)\](.*?)\[\/crypt\]/ism", 'bb_parse_b64_crypt', $Text);
|
|
} else {
|
|
$Text = preg_replace_callback("/\[crypt\](.*?)\[\/crypt\]/ism", 'bb_parse_crypt', $Text);
|
|
$Text = preg_replace_callback("/\[crypt (.*?)\](.*?)\[\/crypt\]/ism", 'bb_parse_crypt', $Text);
|
|
}
|
|
}
|
|
|
|
if (str_contains($Text, '[/app]')) {
|
|
if ($activitypub) {
|
|
$Text = preg_replace_callback("/\[app\](.*?)\[\/app\]/ism", 'bb_parse_app_ap', $Text);
|
|
} else {
|
|
$Text = preg_replace_callback("/\[app\](.*?)\[\/app\]/ism", 'bb_parse_app', $Text);
|
|
}
|
|
}
|
|
|
|
if (str_contains($Text, '[/element]')) {
|
|
$Text = preg_replace_callback("/\[element\](.*?)\[\/element\]/ism", 'bb_parse_element', $Text);
|
|
}
|
|
|
|
// html5 video and audio
|
|
if (str_contains($Text, '[/video]')) {
|
|
$Text = preg_replace_callback("/\[video (.*?)\](.*?)\[\/video\]/ism", 'videowithopts', $Text);
|
|
$Text = preg_replace_callback("/\[video\](.*?)\[\/video\]/ism", 'tryzrlvideo', $Text);
|
|
}
|
|
if (str_contains($Text, '[/audio]')) {
|
|
$Text = preg_replace_callback("/\[audio\](.*?)\[\/audio\]/ism", 'tryzrlaudio', $Text);
|
|
}
|
|
if (str_contains($Text, '[/zvideo]')) {
|
|
$Text = preg_replace_callback("/\[zvideo (.*?)\](.*?)\[\/zvideo\]/ism", 'videowithopts', $Text);
|
|
$Text = preg_replace_callback("/\[zvideo\](.*?)\[\/zvideo\]/ism", 'tryzrlvideo', $Text);
|
|
}
|
|
if (str_contains($Text, '[/zaudio]')) {
|
|
$Text = preg_replace_callback("/\[zaudio\](.*?)\[\/zaudio\]/ism", 'tryzrlaudio', $Text);
|
|
}
|
|
|
|
// if video couldn't be embedded, link to it instead.
|
|
if (str_contains($Text, '[/video]')) {
|
|
$Text = preg_replace("/\[video\](.*?)\[\/video\]/", '<a href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
}
|
|
if (str_contains($Text, '[/audio]')) {
|
|
$Text = preg_replace("/\[audio\](.*?)\[\/audio\]/", '<a href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
}
|
|
|
|
if (str_contains($Text, '[/zvideo]')) {
|
|
$Text = preg_replace("/\[zvideo\](.*?)\[\/zvideo\]/", '<a class="zid" href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
}
|
|
if (str_contains($Text, '[/zaudio]')) {
|
|
$Text = preg_replace("/\[zaudio\](.*?)\[\/zaudio\]/", '<a class="zid" href="$1" ' . $target . ' rel="nofollow noopener" >$1</a>', $Text);
|
|
}
|
|
|
|
// SVG stuff
|
|
|
|
if ($activitypub) {
|
|
$Text = preg_replace_callback("/\[svg(.*?)\](.*?)\[\/svg\]/ism", 'bb_svg_export', $Text);
|
|
} else {
|
|
$Text = preg_replace_callback("/\[svg(.*?)\](.*?)\[\/svg\]/ism", 'bb_svg', $Text);
|
|
}
|
|
|
|
// Markdown processing
|
|
|
|
if (!$bbonly) {
|
|
|
|
// the bbcode tag 'nomd' will bypass markdown processing for any given text region
|
|
$Text = preg_replace_callback('#\[nomd\](.*?)\[\/nomd\]#ism', 'md_protect', $Text);
|
|
|
|
$Text = preg_replace_callback("/\[code(.*?)\](.*?)\[\/code\]/ism", 'bb_code_preprotect', $Text);
|
|
|
|
$Text = str_replace('<br>', "\n", $Text);
|
|
// Perform some markdown conversions before translating linefeeds so as to keep the regexes manageable
|
|
// The preceding character check in bold/italic sequences is so we don't mistake underscore/asterisk in the middle of conversational text as an italic trigger.
|
|
|
|
$Text = preg_replace_callback('#(^|\n| )(?<!\\\)([*_]{3})([^\n]+?)\2#', 'md_bolditalic', $Text);
|
|
$Text = preg_replace_callback('#(^|\n| )(?<!\\\)([*_]{2})([^\n]+?)\2#', 'md_bold', $Text);
|
|
$Text = preg_replace_callback('#(^|\n| )(?<!\\\)([*_])([^\n|`]+?)\2#m', 'md_italic', $Text);
|
|
|
|
// strip the backslash from escaped bold/italic markdown sequences
|
|
$Text = preg_replace('#(\\\)([*_])#', '$2', $Text);
|
|
|
|
$Text = preg_replace_callback('{ ^(.+?)[ ]*\n(=+|-+)[ ]*\n+ }mx', 'md_topheader', $Text);
|
|
$Text = preg_replace_callback('#^(\#{1,6})\s+([^\#]+?)\s*\#*$#m', 'md_header', $Text);
|
|
$Text = preg_replace_callback('#(^|\n)([`~]{3,})(?: *\.?([a-zA-Z0-9\-.]+))?\n+([\s\S]+?)\n+\2(\n|$)#', 'md_codeblock', $Text);
|
|
// do not use the "indent by tab or 4 spaces" markdown codeblock trigger - this produces way too many false positives
|
|
// $Text = preg_replace('#^(?:\0(.*?)\0\n)?( {4}|\t)(.*?)$#m','<pre><code>$3</code></pre>',$Text);
|
|
// markdown inline code blocks must be preceded by space or linebreak
|
|
|
|
$Text = preg_replace('#(^|\n| )(?<!\\\)`([^\n`]+?)`#', '$1<code class="inline-code">$2</code>', $Text);
|
|
|
|
$Text = preg_replace('#(\\\)\##', '#', $Text);
|
|
// strip backslash escape for inline code
|
|
$Text = preg_replace('#(\\\)`#', '`', $Text);
|
|
$Text = preg_replace('#<\/code><\/pre>\n<pre><code(>| .*?>)#', '<br>', $Text);
|
|
|
|
// blockquotes
|
|
$Text = preg_replace('#^(>)+ +(.*?)$#m', '<blockquote>$2</blockquote>', $Text);
|
|
$Text = preg_replace('#^(\>)+ +(.*?)$#m', '<blockquote>$2</blockquote>', $Text);
|
|
$Text = preg_replace('#</blockquote>\n<blockquote>#', "\n", $Text);
|
|
|
|
// links
|
|
$Text = preg_replace_callback('#!\[[^\]]*\]\((.*?)(?=\"|\))(\".*\")?\)(?!`)#', 'md_image', $Text);
|
|
$Text = preg_replace('#\[([^\[]+)\]\((?:javascript:)?([^\)]+)\)(?!`)#', '<a href="$2">$1</a>', $Text);
|
|
|
|
// unordered lists
|
|
$matches = [];
|
|
// Ignore if there is only one list element as it could be a false positive.
|
|
if (preg_match_all('#^(?<!\\\)[*\-+] +(.*?)$#m', $Text, $matches, PREG_SET_ORDER) && count($matches) > 1) {
|
|
$Text = preg_replace('#^(?<!\\\)[*\-+] +(.*?)$#m', '<ul><li>$1</li></ul>', $Text);
|
|
// strip the backslash escape if present
|
|
$Text = preg_replace('#^(\\\)([*\-+]) #m', '$2', $Text);
|
|
}
|
|
// order lists
|
|
$Text = preg_replace('#^(\d+[\.\)]) +(.*?)$#m', '<ol><li value="$1">$2</li></ol>', $Text);
|
|
|
|
$Text = preg_replace('/\s*<\/(ol|ul)>\n+<\1>\s*/', '', $Text);
|
|
|
|
$Text = str_replace("\n", '<br>', $Text);
|
|
$Text = bb_code_preunprotect($Text);
|
|
|
|
|
|
}
|
|
|
|
// oembed tag
|
|
|
|
$Text = Oembed::bbcode2html($Text, $export, $target);
|
|
|
|
|
|
|
|
|
|
// Avoid triple linefeeds through oembed
|
|
$Text = str_replace("<br style='clear:left'></span><br><br>", "<br style='clear:left'></span><br>", $Text);
|
|
|
|
// If we found an event earlier, strip out all the event code and replace with a reformatted version.
|
|
// Replace the event-start section with the entire formatted event. The other bbcode is stripped.
|
|
// Summary (e.g. title) is required, earlier revisions only required description (in addition to
|
|
// start which is always required). Allow desc with a missing summary for compatibility.
|
|
|
|
if ((x($ev, 'desc') || x($ev, 'summary')) && x($ev, 'dtstart')) {
|
|
$sub = format_event_html($ev);
|
|
|
|
$sub = str_replace('$', "\0", $sub);
|
|
|
|
$Text = preg_replace("/\[event\-start\](.*?)\[\/event\-start\]/ism", $sub, $Text);
|
|
|
|
$Text = preg_replace("/\[event\](.*?)\[\/event\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[event\-summary\](.*?)\[\/event\-summary\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[event\-description\](.*?)\[\/event\-description\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[event\-finish\](.*?)\[\/event\-finish\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[event\-id\](.*?)\[\/event\-id\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[event\-location\](.*?)\[\/event\-location\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[event\-timezone\](.*?)\[\/event\-timezone\]/ism", '', $Text);
|
|
$Text = preg_replace("/\[event\-adjust\](.*?)\[\/event\-adjust\]/ism", '', $Text);
|
|
|
|
$Text = str_replace("\0", '$', $Text);
|
|
}
|
|
|
|
// Unhide all [noparse] contained bbtags unspacefying them
|
|
// and triming the [noparse] tag.
|
|
if (str_contains($Text, '[noparse]')) {
|
|
$Text = preg_replace_callback("/\[noparse\](.*?)\[\/noparse\]/ism", 'bb_unspacefy_and_trim', $Text);
|
|
}
|
|
if (str_contains($Text, '[nobb]')) {
|
|
$Text = preg_replace_callback("/\[nobb\](.*?)\[\/nobb\]/ism", 'bb_unspacefy_and_trim', $Text);
|
|
}
|
|
if (str_contains($Text, '[pre]')) {
|
|
$Text = preg_replace_callback("/\[pre\](.*?)\[\/pre\]/ism", 'bb_unspacefy_and_trim', $Text);
|
|
}
|
|
|
|
// replace escaped links in code= blocks
|
|
$Text = str_replace('%eY9-!', 'http', $Text);
|
|
$Text = bb_code_unprotect($Text);
|
|
$Text = str_replace('<code><br>', '<code>', $Text);
|
|
// fix any escaped ampersands that may have been converted into links
|
|
|
|
if (str_contains($Text, '&')) {
|
|
$Text = preg_replace("/\<(.*?)(src|href)=(.*?)\&\;(.*?)\>/ism", '<$1$2=$3&$4>', $Text);
|
|
}
|
|
|
|
$Text = bb_replace_images($Text, $saved_images);
|
|
|
|
$args = [ 'text' => $Text, 'options' => $options ];
|
|
Hook::call('bbcode', $args);
|
|
|
|
return $args['text'];
|
|
}
|