<?php /** * @file mod/babel.php */ use Friendica\Content\Text\Markdown; use Friendica\Core\L10n; require_once 'include/bbcode.php'; require_once 'include/bb2diaspora.php'; require_once 'include/html2bbcode.php'; function visible_lf($s) { return str_replace("\n", '<br />', $s); } function babel_content() { $o = '<h1>Babel Diagnostic</h1>'; $o .= '<form action="babel" method="post">'; $o .= L10n::t("Source \x28bbcode\x29 text:") . EOL; $o .= '<textarea name="text" cols="80" rows="10">' . htmlspecialchars($_REQUEST['text']) . '</textarea>' . EOL; $o .= '<input type="submit" name="submit" value="Submit" /></form>'; $o .= '<br /><br />'; $o .= '<form action="babel" method="post">'; $o .= L10n::t("Source \x28Diaspora\x29 text to convert to BBcode:") . EOL; $o .= '<textarea name="d2bbtext" cols="80" rows="10">' . htmlspecialchars($_REQUEST['d2bbtext']) . '</textarea>' . EOL; $o .= '<input type="submit" name="submit" value="Submit" /></form>'; $o .= '<br /><br />'; if (x($_REQUEST, 'text')) { $text = trim($_REQUEST['text']); $o .= '<h2>' . L10n::t('Source input: ') . '</h2>' . EOL . EOL; $o .= visible_lf($text) . EOL . EOL; $html = bbcode($text); $o .= '<h2>' . L10n::t("bbcode \x28raw HTML\x28: ") . '</h2>' . EOL . EOL; $o .= htmlspecialchars($html) . EOL . EOL; //$html = bbcode($text); $o .= '<h2>' . L10n::t('bbcode: ') . '</h2>' . EOL . EOL; $o .= $html . EOL . EOL; $bbcode = html2bbcode($html); $o .= '<h2>' . L10n::t('bbcode => html2bbcode: ') . '</h2>' . EOL . EOL; $o .= visible_lf($bbcode) . EOL . EOL; $diaspora = bb2diaspora($text); $o .= '<h2>' . L10n::t('bb2diaspora: ') . '</h2>' . EOL . EOL; $o .= visible_lf($diaspora) . EOL . EOL; $html = Markdown::convert($diaspora); $o .= '<h2>' . L10n::t('bb2diaspora => Markdown: ') . '</h2>' . EOL . EOL; $o .= $html . EOL . EOL; $bbcode = diaspora2bb($diaspora); $o .= '<h2>' . L10n::t('bb2diaspora => diaspora2bb: ') . '</h2>' . EOL . EOL; $o .= visible_lf($bbcode) . EOL . EOL; $bbcode = html2bbcode($html); $o .= '<h2>' . L10n::t('bbcode => html2bbcode: ') . '</h2>' . EOL . EOL; $o .= visible_lf($bbcode) . EOL . EOL; } if (x($_REQUEST, 'd2bbtext')) { $d2bbtext = trim($_REQUEST['d2bbtext']); $o .= '<h2>' . L10n::t("Source input \x28Diaspora format\x29: ") . '</h2>' . EOL . EOL; $o .= '<pre>' . $d2bbtext . '</pre>' . EOL . EOL; $bb = diaspora2bb($d2bbtext); $o .= '<h2>' . L10n::t('diaspora2bb: ') . '</h2>' . EOL . EOL; $o .= '<pre>' . $bb . '</pre>' . EOL . EOL; } return $o; }