X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=src%2FModule%2FDebug%2FBabel.php;h=649c12cecdf5b6da8f65481933982154abd77048;hb=7921766c59c1050737ff7fed7c242257e866d149;hp=19e3ec2131282248455f0676c5d7ae2b8bfb1f3c;hpb=f1e7d97b8cae93e1c77f5a5085880409b01fcdbe;p=friendica.git
diff --git a/src/Module/Debug/Babel.php b/src/Module/Debug/Babel.php
index 19e3ec2131..649c12cecd 100644
--- a/src/Module/Debug/Babel.php
+++ b/src/Module/Debug/Babel.php
@@ -1,12 +1,33 @@
.
+ *
+ */
namespace Friendica\Module\Debug;
use Friendica\BaseModule;
+use Friendica\Content\PageInfo;
use Friendica\Content\Text;
-use Friendica\Core\L10n;
use Friendica\Core\Renderer;
+use Friendica\DI;
use Friendica\Model\Item;
+use Friendica\Protocol\Activity;
use Friendica\Util\XML;
/**
@@ -14,173 +35,282 @@ use Friendica\Util\XML;
*/
class Babel extends BaseModule
{
- public static function content()
+ protected function content(array $request = []): string
{
function visible_whitespace($s)
{
- $s = str_replace(' ', ' ', $s);
-
- return str_replace(["\r\n", "\n", "\r"], '
', $s);
+ return '
' . htmlspecialchars($s) . ''; } $results = []; if (!empty($_REQUEST['text'])) { - switch (defaults($_REQUEST, 'type', 'bbcode')) { + switch (($_REQUEST['type'] ?? '') ?: 'bbcode') { case 'bbcode': - $bbcode = trim($_REQUEST['text']); + $bbcode = $_REQUEST['text']; $results[] = [ - 'title' => L10n::t('Source input'), + 'title' => DI::l10n()->t('Source input'), 'content' => visible_whitespace($bbcode) ]; $plain = Text\BBCode::toPlaintext($bbcode, false); $results[] = [ - 'title' => L10n::t('BBCode::toPlaintext'), + 'title' => DI::l10n()->t('BBCode::toPlaintext'), 'content' => visible_whitespace($plain) ]; $html = Text\BBCode::convert($bbcode); $results[] = [ - 'title' => L10n::t('BBCode::convert (raw HTML)'), - 'content' => visible_whitespace(htmlspecialchars($html)) + 'title' => DI::l10n()->t('BBCode::convert (raw HTML)'), + 'content' => visible_whitespace($html) + ]; + + $results[] = [ + 'title' => DI::l10n()->t('BBCode::convert (hex)'), + 'content' => visible_whitespace(bin2hex($html)), ]; $results[] = [ - 'title' => L10n::t('BBCode::convert'), + 'title' => DI::l10n()->t('BBCode::convert'), 'content' => $html ]; $bbcode2 = Text\HTML::toBBCode($html); $results[] = [ - 'title' => L10n::t('BBCode::convert => HTML::toBBCode'), + 'title' => DI::l10n()->t('BBCode::convert => HTML::toBBCode'), 'content' => visible_whitespace($bbcode2) ]; $markdown = Text\BBCode::toMarkdown($bbcode); $results[] = [ - 'title' => L10n::t('BBCode::toMarkdown'), + 'title' => DI::l10n()->t('BBCode::toMarkdown'), 'content' => visible_whitespace($markdown) ]; $html2 = Text\Markdown::convert($markdown); $results[] = [ - 'title' => L10n::t('BBCode::toMarkdown => Markdown::convert'), + 'title' => DI::l10n()->t('BBCode::toMarkdown => Markdown::convert (raw HTML)'), + 'content' => visible_whitespace($html2) + ]; + $results[] = [ + 'title' => DI::l10n()->t('BBCode::toMarkdown => Markdown::convert'), 'content' => $html2 ]; $bbcode3 = Text\Markdown::toBBCode($markdown); $results[] = [ - 'title' => L10n::t('BBCode::toMarkdown => Markdown::toBBCode'), + 'title' => DI::l10n()->t('BBCode::toMarkdown => Markdown::toBBCode'), 'content' => visible_whitespace($bbcode3) ]; $bbcode4 = Text\HTML::toBBCode($html2); $results[] = [ - 'title' => L10n::t('BBCode::toMarkdown => Markdown::convert => HTML::toBBCode'), + 'title' => DI::l10n()->t('BBCode::toMarkdown => Markdown::convert => HTML::toBBCode'), 'content' => visible_whitespace($bbcode4) ]; - $item = [ - 'body' => $bbcode, - 'tag' => '', + $tags = Text\BBCode::getTags($bbcode); + + $body = Item::setHashtags($bbcode); + $results[] = [ + 'title' => DI::l10n()->t('Item Body'), + 'content' => visible_whitespace($body) + ]; + $results[] = [ + 'title' => DI::l10n()->t('Item Tags'), + 'content' => visible_whitespace(var_export($tags, true)), ]; - Item::setHashtags($item); + $body2 = PageInfo::searchAndAppendToBody($bbcode, true); + $results[] = [ + 'title' => DI::l10n()->t('PageInfo::appendToBody'), + 'content' => visible_whitespace($body2) + ]; + $html3 = Text\BBCode::convert($body2); $results[] = [ - 'title' => L10n::t('Item Body'), - 'content' => visible_whitespace($item['body']) + 'title' => DI::l10n()->t('PageInfo::appendToBody => BBCode::convert (raw HTML)'), + 'content' => visible_whitespace($html3) ]; $results[] = [ - 'title' => L10n::t('Item Tags'), - 'content' => $item['tag'] + 'title' => DI::l10n()->t('PageInfo::appendToBody => BBCode::convert'), + 'content' => $html3 ]; break; + case 'diaspora': + $diaspora = trim($_REQUEST['text']); + $results[] = [ + 'title' => DI::l10n()->t('Source input (Diaspora format)'), + 'content' => visible_whitespace($diaspora), + ]; + + $markdown = XML::unescape($diaspora); case 'markdown': - $markdown = trim($_REQUEST['text']); + $markdown = $markdown ?? trim($_REQUEST['text']); + $results[] = [ - 'title' => L10n::t('Source input (Diaspora format)'), - 'content' => '
' . htmlspecialchars($markdown) . '' + 'title' => DI::l10n()->t('Source input (Markdown)'), + 'content' => visible_whitespace($markdown), ]; - $html = Text\Markdown::convert(html_entity_decode($markdown,ENT_COMPAT, 'UTF-8')); + $html = Text\Markdown::convert($markdown); $results[] = [ - 'title' => L10n::t('Markdown::convert (raw HTML)'), - 'content' => visible_whitespace(htmlspecialchars($html)) + 'title' => DI::l10n()->t('Markdown::convert (raw HTML)'), + 'content' => visible_whitespace($html), ]; $results[] = [ - 'title' => L10n::t('Markdown::convert'), + 'title' => DI::l10n()->t('Markdown::convert'), 'content' => $html ]; - $bbcode = Text\Markdown::toBBCode(XML::unescape($markdown)); + $bbcode = Text\Markdown::toBBCode($markdown); $results[] = [ - 'title' => L10n::t('Markdown::toBBCode'), - 'content' => '
' . $bbcode . '' + 'title' => DI::l10n()->t('Markdown::toBBCode'), + 'content' => visible_whitespace($bbcode), ]; break; case 'html' : $html = trim($_REQUEST['text']); $results[] = [ - 'title' => L10n::t('Raw HTML input'), - 'content' => htmlspecialchars($html) + 'title' => DI::l10n()->t('Raw HTML input'), + 'content' => visible_whitespace($html), ]; $results[] = [ - 'title' => L10n::t('HTML Input'), + 'title' => DI::l10n()->t('HTML Input'), 'content' => $html ]; + $purified = Text\HTML::purify($html); + + $results[] = [ + 'title' => DI::l10n()->t('HTML Purified (raw)'), + 'content' => visible_whitespace($purified), + ]; + + $results[] = [ + 'title' => DI::l10n()->t('HTML Purified (hex)'), + 'content' => visible_whitespace(bin2hex($purified)), + ]; + + $results[] = [ + 'title' => DI::l10n()->t('HTML Purified'), + 'content' => $purified, + ]; + $bbcode = Text\HTML::toBBCode($html); $results[] = [ - 'title' => L10n::t('HTML::toBBCode'), + 'title' => DI::l10n()->t('HTML::toBBCode'), 'content' => visible_whitespace($bbcode) ]; $html2 = Text\BBCode::convert($bbcode); $results[] = [ - 'title' => L10n::t('HTML::toBBCode => BBCode::convert'), + 'title' => DI::l10n()->t('HTML::toBBCode => BBCode::convert'), 'content' => $html2 ]; $results[] = [ - 'title' => L10n::t('HTML::toBBCode => BBCode::convert (raw HTML)'), + 'title' => DI::l10n()->t('HTML::toBBCode => BBCode::convert (raw HTML)'), 'content' => htmlspecialchars($html2) ]; $bbcode2plain = Text\BBCode::toPlaintext($bbcode); $results[] = [ - 'title' => L10n::t('HTML::toBBCode => BBCode::toPlaintext'), - 'content' => '
' . $bbcode2plain . '' + 'title' => DI::l10n()->t('HTML::toBBCode => BBCode::toPlaintext'), + 'content' => visible_whitespace($bbcode2plain), ]; $markdown = Text\HTML::toMarkdown($html); $results[] = [ - 'title' => L10n::t('HTML::toMarkdown'), + 'title' => DI::l10n()->t('HTML::toMarkdown'), 'content' => visible_whitespace($markdown) ]; $text = Text\HTML::toPlaintext($html, 0); $results[] = [ - 'title' => L10n::t('HTML::toPlaintext'), - 'content' => '
' . $text . '' + 'title' => DI::l10n()->t('HTML::toPlaintext'), + 'content' => visible_whitespace($text), ]; $text = Text\HTML::toPlaintext($html, 0, true); $results[] = [ - 'title' => L10n::t('HTML::toPlaintext (compact)'), - 'content' => '
' . $text . '' + 'title' => DI::l10n()->t('HTML::toPlaintext (compact)'), + 'content' => visible_whitespace($text), ]; + break; + case 'twitter': + $json = trim($_REQUEST['text']); + + if (file_exists('addon/twitter/twitter.php')) { + require_once 'addon/twitter/twitter.php'; + + if (parse_url($json) !== false) { + preg_match('#^https?://(?:mobile\.|www\.)?twitter.com/[^/]+/status/(\d+).*#', $json, $matches); + $status = twitter_statuses_show($matches[1]); + } else { + $status = json_decode($json); + } + + $results[] = [ + 'title' => DI::l10n()->t('Decoded post'), + 'content' => visible_whitespace(var_export($status, true)), + ]; + + $postarray = []; + $postarray['object-type'] = Activity\ObjectType::NOTE; + + if (!empty($status->full_text)) { + $postarray['body'] = $status->full_text; + } else { + $postarray['body'] = $status->text; + } + + // When the post contains links then use the correct object type + if (count($status->entities->urls) > 0) { + $postarray['object-type'] = Activity\ObjectType::BOOKMARK; + } + + $picture = \twitter_media_entities($status, $postarray); + + $results[] = [ + 'title' => DI::l10n()->t('Post array before expand entities'), + 'content' => visible_whitespace(var_export($postarray, true)), + ]; + + $converted = \twitter_expand_entities($postarray['body'], $status, $picture); + + $results[] = [ + 'title' => DI::l10n()->t('Post converted'), + 'content' => visible_whitespace(var_export($converted, true)), + ]; + + $results[] = [ + 'title' => DI::l10n()->t('Converted body'), + 'content' => visible_whitespace($converted['body']), + ]; + } else { + $results[] = [ + 'title' => DI::l10n()->t('Error'), + 'content' => DI::l10n()->t('Twitter addon is absent from the addon/ folder.'), + ]; + } + + break; } } $tpl = Renderer::getMarkupTemplate('babel.tpl'); $o = Renderer::replaceMacros($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 + '$title' => DI::l10n()->t('Babel Diagnostic'), + '$text' => ['text', DI::l10n()->t('Source text'), $_REQUEST['text'] ?? '', ''], + '$type_bbcode' => ['type', DI::l10n()->t('BBCode'), 'bbcode', '', (($_REQUEST['type'] ?? '') ?: 'bbcode') == 'bbcode'], + '$type_diaspora' => ['type', DI::l10n()->t('Diaspora'), 'diaspora', '', (($_REQUEST['type'] ?? '') ?: 'bbcode') == 'diaspora'], + '$type_markdown' => ['type', DI::l10n()->t('Markdown'), 'markdown', '', (($_REQUEST['type'] ?? '') ?: 'bbcode') == 'markdown'], + '$type_html' => ['type', DI::l10n()->t('HTML'), 'html', '', (($_REQUEST['type'] ?? '') ?: 'bbcode') == 'html'], + '$flag_twitter' => file_exists('addon/twitter/twitter.php'), + '$type_twitter' => ['type', DI::l10n()->t('Twitter Source / Tweet URL (requires API key)'), 'twitter', '', (($_REQUEST['type'] ?? '') ?: 'bbcode') == 'twitter'], + '$results' => $results, + '$submit' => DI::l10n()->t('Submit'), ]); return $o;