X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=mod%2Fbabel.php;h=cafd06556b8adde32498fe28dd39c9e120e2849f;hb=07954f7bcf477807d3fb517a7fa43ac59f8050ac;hp=0e38dc5750ab41e5ae456418e3f0fa46ca2531c2;hpb=20043914e6111ba53df85e1efd3389c99d37302f;p=friendica.git

diff --git a/mod/babel.php b/mod/babel.php
index 0e38dc5750..cafd06556b 100644
--- a/mod/babel.php
+++ b/mod/babel.php
@@ -1,76 +1,116 @@
 <?php
+/**
+ * @file mod/babel.php
+ */
 
-use Friendica\App;
+use Friendica\Content\Text;
+use Friendica\Core\L10n;
 
-require_once 'include/bbcode.php';
-require_once 'library/markdown.php';
-require_once 'include/bb2diaspora.php';
-require_once 'include/html2bbcode.php';
-
-function visible_lf($s) {
+function visible_lf($s)
+{
 	return str_replace("\n", '<br />', $s);
 }
 
-function babel_content(App $a) {
-	$o .= '<h1>Babel Diagnostic</h1>';
-
-	$o .= '<form action="babel" method="post">';
-	$o .= t('Source (bbcode) 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 .= t('Source (Diaspora) 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>' . t('Source input: ') . '</h2>' . EOL. EOL;
-		$o .= visible_lf($text) . EOL. EOL;
-
-		$html = bbcode($text);
-		$o .= '<h2>' . t('bb2html (raw HTML): ') . '</h2>' . EOL. EOL;
-		$o .= htmlspecialchars($html). EOL. EOL;
-
-		//$html = bbcode($text);
-		$o .= '<h2>' . t('bb2html: ') . '</h2>' . EOL. EOL;
-		$o .= $html. EOL. EOL;
-
-		$bbcode = html2bbcode($html);
-		$o .= '<h2>' . t('bb2html2bb: ') . '</h2>' . EOL. EOL;
-		$o .= visible_lf($bbcode) . EOL. EOL;
-
-		$diaspora = bb2diaspora($text);
-		$o .= '<h2>' . t('bb2md: ') . '</h2>' . EOL. EOL;
-		$o .= visible_lf($diaspora) . EOL. EOL;
-
-		$html = Markdown($diaspora);
-		$o .= '<h2>' . t('bb2md2html: ') . '</h2>' . EOL. EOL;
-		$o .= $html. EOL. EOL;
-
-		$bbcode = diaspora2bb($diaspora);
-		$o .= '<h2>' . t('bb2dia2bb: ') . '</h2>' . EOL. EOL;
-		$o .= visible_lf($bbcode) . EOL. EOL;
-
-		$bbcode = html2bbcode($html);
-		$o .= '<h2>' . t('bb2md2html2bb: ') . '</h2>' . EOL. EOL;
-		$o .= visible_lf($bbcode) . EOL. EOL;
+function babel_content()
+{
+	$results = [];
+	if (!empty($_REQUEST['text'])) {
+		switch (defaults($_REQUEST, 'type', 'bbcode')) {
+			case 'bbcode':
+				$bbcode = trim($_REQUEST['text']);
+				$results[] = [
+					'title' => L10n::t('Source input'),
+					'content' => visible_lf($bbcode)
+				];
+
+				$html = Text\BBCode::convert($bbcode);
+				$results[] = [
+					'title' => L10n::t("BBCode::convert \x28raw HTML\x29"),
+					'content' => htmlspecialchars($html)
+				];
+
+				$results[] = [
+					'title' => L10n::t('BBCode::convert'),
+					'content' => $html
+				];
+
+				$bbcode2 = Text\HTML::toBBCode($html);
+				$results[] = [
+					'title' => L10n::t('BBCode::convert => HTML::toBBCode'),
+					'content' => visible_lf($bbcode2)
+				];
+
+				$markdown = Text\BBCode::toMarkdown($bbcode);
+				$results[] = [
+					'title' => L10n::t('BBCode::toMarkdown'),
+					'content' => visible_lf($markdown)
+				];
+
+				$html2 = Text\Markdown::convert($markdown);
+				$results[] = [
+					'title' => L10n::t('BBCode::toMarkdown => Markdown::convert'),
+					'content' => $html2
+				];
+
+				$bbcode3 = Text\Markdown::toBBCode($markdown);
+				$results[] = [
+					'title' => L10n::t('BBCode::toMarkdown => Markdown::toBBCode'),
+					'content' => visible_lf($bbcode3)
+				];
+
+				$bbcode4 = Text\HTML::toBBCode($html2);
+				$results[] = [
+					'title' => L10n::t('BBCode::toMarkdown =>  Markdown::convert => HTML::toBBCode'),
+					'content' => visible_lf($bbcode4)
+				];
+				break;
+			case 'markdown':
+				$markdown = trim($_REQUEST['text']);
+				$results[] = [
+					'title' => L10n::t('Source input \x28Diaspora format\x29'),
+					'content' => '<pre>' . $markdown . '</pre>'
+				];
+
+				$bbcode = Text\Markdown::toBBCode($markdown);
+				$results[] = [
+					'title' => L10n::t('Markdown::toBBCode'),
+					'content' => '<pre>' . $bbcode . '</pre>'
+				];
+				break;
+			case 'html' :
+				$html = trim($_REQUEST['text']);
+				$results[] = [
+					'title' => L10n::t("Raw HTML input"),
+					'content' => htmlspecialchars($html)
+				];
+
+				$results[] = [
+					'title' => L10n::t('HTML Input'),
+					'content' => $html
+				];
+
+				$bbcode = Text\HTML::toBBCode($html);
+				$results[] = [
+					'title' => L10n::t('HTML::toBBCode'),
+					'content' => visible_lf($bbcode)
+				];
+
+				$text = Text\HTML::toPlaintext($html);
+				$results[] = [
+					'title' => L10n::t('HTML::toPlaintext'),
+					'content' => '<pre>' . $text . '</pre>'
+				];
+		}
 	}
 
-	if (x($_REQUEST, 'd2bbtext')) {
-		$d2bbtext = trim($_REQUEST['d2bbtext']);
-		$o .= '<h2>' . t('Source input (Diaspora format): ') . '</h2>' . EOL. EOL;
-		$o .= '<pre>' . $d2bbtext . '</pre>' . EOL. EOL;
-
-		$bb = diaspora2bb($d2bbtext);
-		$o .= '<h2>' . t('diaspora2bb: ') . '</h2>' . EOL. EOL;
-		$o .= '<pre>' . $bb . '</pre>' . EOL. EOL;
-	}
+	$tpl = get_markup_template('babel.tpl');
+	$o = replace_macros($tpl, [
+		'$text'          => ['text', L10n::t('Source text'), defaults($_REQUEST, 'text', ''), ''],
+		'$type_bbcode'   => ['type', L10n::t('BBCode'), 'bbcode', '', defaults($_REQUEST, 'type', 'bbcode') == 'bbcode'],
+		'$type_markdown' => ['type', L10n::t('Markdown'), 'markdown', '', defaults($_REQUEST, 'type', 'bbcode') == 'markdown'],
+		'$type_html'     => ['type', L10n::t('HTML'), 'html', '', defaults($_REQUEST, 'type', 'bbcode') == 'html'],
+		'$results'       => $results
+	]);
 
 	return $o;
 }