Add external template to mod/babel

- Add HTML methods diagnostic

diff --git a/mod/babel.php b/mod/babel.php
index a2d197599c16a370c601ca24d1a3b9b5a03a9b4c..442941ab8a1fc7ae1258db38030d1bdb3e159f43 100644 (file)
--- a/mod/babel.php
+++ b/mod/babel.php
@@ -13,64 +13,105 @@ function visible_lf($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 = Text\BBCode::convert($text);
-               $o .= '<h2>' . L10n::t("BBCode::convert \x28raw HTML\x28: ") . '</h2>' . EOL . EOL;
-               $o .= htmlspecialchars($html) . EOL . EOL;
-
-               $o .= '<h2>' . L10n::t('BBCode::convert: ') . '</h2>' . EOL . EOL;
-               $o .= $html . EOL . EOL;
-
-               $bbcode = Text\HTML::toBBCode($html);
-               $o .= '<h2>' . L10n::t('BBCode::convert => HTML::toBBCode: ') . '</h2>' . EOL . EOL;
-               $o .= visible_lf($bbcode) . EOL . EOL;
-
-               $diaspora = Text\BBCode::toMarkdown($text);
-               $o .= '<h2>' . L10n::t('BBCode::toMarkdown: ') . '</h2>' . EOL . EOL;
-               $o .= visible_lf($diaspora) . EOL . EOL;
-
-               $html = Text\Markdown::convert($diaspora);
-               $o .= '<h2>' . L10n::t('BBCode::toMarkdown =>  Markdown::convert: ') . '</h2>' . EOL . EOL;
-               $o .= $html . EOL . EOL;
-
-               $bbcode = Text\Markdown::toBBCode($diaspora);
-               $o .= '<h2>' . L10n::t('BBCode::toMarkdown => Markdown::toBBCode: ') . '</h2>' . EOL . EOL;
-               $o .= visible_lf($bbcode) . EOL . EOL;
-
-               $bbcode = Text\HTML::toBBCode($html);
-               $o .= '<h2>' . L10n::t('BBCode::toMarkdown =>  Markdown::convert => HTML::toBBCode: ') . '</h2>' . EOL . EOL;
-               $o .= visible_lf($bbcode) . EOL . EOL;
+       $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\x28"),
+                                       '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>' . L10n::t("Source input \x28Diaspora format\x29: ") . '</h2>' . EOL . EOL;
-               $o .= '<pre>' . $d2bbtext . '</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'],
 
-               $bb = Text\Markdown::toBBCode($d2bbtext);
-               $o .= '<h2>' . L10n::t('Markdown::toBBCode: ') . '</h2>' . EOL . EOL;
-               $o .= '<pre>' . $bb . '</pre>' . EOL . EOL;
-       }
+               '$results' => $results
+       ]);
 
        return $o;
 }

diff --git a/view/templates/babel.tpl b/view/templates/babel.tpl
new file mode 100644 (file)
index 0000000..659864a
--- /dev/null
+++ b/view/templates/babel.tpl
@@ -0,0 +1,29 @@
+<h2>Babel Diagnostic</h2>
+<form action="babel" method="post" class="panel panel-default">
+       <div class="panel-body">
+               <div class="form-group">
+                       {{include file="field_textarea.tpl" field=$text}}
+               </div>
+               <div class="form-group">
+                       {{include file="field_radio.tpl" field=$type_bbcode}}
+                       {{include file="field_radio.tpl" field=$type_markdown}}
+                       {{include file="field_radio.tpl" field=$type_html}}
+               </div>
+               <p><button type="submit" class="btn btn-primary">Submit</button></p>
+       </div>
+</form>
+
+{{if $results}}
+<div class="babel-results">
+       {{foreach $results as $result}}
+       <div class="panel panel-default">
+               <div class="panel-heading">
+                       <h3 class="panel-title">{{$result.title}}</h3>
+               </div>
+               <div class="panel-body">
+                       {{$result.content}}
+               </div>
+       </div>
+       {{/foreach}}
+</div>
+{{/if}}
\ No newline at end of file