75 lines
1.9 KiB
PHP
75 lines
1.9 KiB
PHP
<?php
|
|
|
|
require_once('include/bbcode.php');
|
|
require_once('library/markdown.php');
|
|
require_once('include/bb2diaspora.php');
|
|
require_once('include/html2bbcode.php');
|
|
|
|
function visible_lf($s) {
|
|
return str_replace("\n",'<br />', $s);
|
|
}
|
|
|
|
function babel_content(&$a) {
|
|
|
|
$o .= '<h3>Babel Diagnostic</h3>';
|
|
|
|
$o .= '<form action="babel" method="post">';
|
|
$o .= t('Source (bbcode) text:') . EOL . '<textarea name="text" >' . htmlspecialchars($_REQUEST['text']) .'</textarea>' . EOL;
|
|
$o .= '<input type="submit" name="submit" value="Submit" /></form>';
|
|
|
|
$o .= '<br /><br />';
|
|
|
|
$o .= '<form action="babel" method="post">';
|
|
$o .= t('Source (Diaspora) text to convert to BBcode:') . EOL . '<textarea name="d2bbtext" >' . 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 .= t("Source input: ") . EOL. EOL;
|
|
$o .= visible_lf($text) . EOL. EOL;
|
|
|
|
$html = bbcode($text);
|
|
$o .= t("bb2html: ") . EOL. EOL;
|
|
$o .= $html. EOL. EOL;
|
|
|
|
$bbcode = html2bbcode($html);
|
|
$o .= t("bb2html2bb: ") . EOL. EOL;
|
|
$o .= visible_lf($bbcode) . EOL. EOL;
|
|
|
|
$diaspora = bb2diaspora($text);
|
|
$o .= t("bb2md: ") . EOL. EOL;
|
|
$o .= visible_lf($diaspora) . EOL. EOL;
|
|
|
|
$html = Markdown($diaspora);
|
|
$o .= t("bb2md2html: ") . EOL. EOL;
|
|
$o .= $html. EOL. EOL;
|
|
|
|
$bbcode = diaspora2bb($diaspora);
|
|
$o .= t("bb2dia2bb: ") . EOL. EOL;
|
|
$o .= visible_lf($bbcode) . EOL. EOL;
|
|
|
|
$bbcode = html2bbcode($html);
|
|
$o .= t("bb2md2html2bb: ") . EOL. EOL;
|
|
$o .= visible_lf($bbcode) . EOL. EOL;
|
|
|
|
|
|
|
|
}
|
|
|
|
if(x($_REQUEST,'d2bbtext')) {
|
|
|
|
$d2bbtext = trim($_REQUEST['d2bbtext']);
|
|
$o .= t("Source input (Diaspora format): ") . EOL. EOL;
|
|
$o .= visible_lf($d2bbtext) . EOL. EOL;
|
|
|
|
|
|
$bb = diaspora2bb($d2bbtext);
|
|
$o .= t("diaspora2bb: ") . EOL. EOL;
|
|
$o .= visible_lf($bb) . EOL. EOL;
|
|
}
|
|
|
|
return $o;
|
|
}
|