<?php /** * Name: Show More * Description: Collapse posts * Version: 1.0 * Author: Michael Vogel <ike@piratenpartei.de> * based upon NSFW from Mike Macgirvin <http://macgirvin.com/profile/mike> * */ use Friendica\App; use Friendica\Core\Hook; use Friendica\Core\Renderer; use Friendica\DI; use Friendica\Util\Strings; function showmore_install() { Hook::register('prepare_body', 'addon/showmore/showmore.php', 'showmore_prepare_body'); Hook::register('addon_settings', 'addon/showmore/showmore.php', 'showmore_addon_settings'); Hook::register('addon_settings_post', 'addon/showmore/showmore.php', 'showmore_addon_settings_post'); } function showmore_addon_settings(App &$a, array &$data) { if (!local_user()) { return; } DI::page()->registerStylesheet(__DIR__ . '/showmore.css', 'all'); $enabled = !DI::pConfig()->get(local_user(), 'showmore', 'disable'); $chars = DI::pConfig()->get(local_user(), 'showmore', 'chars', 1100); $t = Renderer::getMarkupTemplate('settings.tpl', 'addon/showmore/'); $html = Renderer::replaceMacros($t, [ '$enabled' => ['showmore-enable', DI::l10n()->t('Enable Show More'), $enabled], '$chars' => ['showmore-chars', DI::l10n()->t('Cutting posts after how many characters'), $chars], ]); $data = [ 'addon' => 'showmore', 'title' => DI::l10n()->t('"Show more" Settings'), 'html' => $html, ]; } function showmore_addon_settings_post(&$a, &$b) { if (!local_user()) { return; } if (!empty($_POST['showmore-submit'])) { DI::pConfig()->set(local_user(), 'showmore', 'chars', trim($_POST['showmore-chars'])); $enable = (!empty($_POST['showmore-enable']) ? intval($_POST['showmore-enable']) : 0); $disable = 1-$enable; DI::pConfig()->set(local_user(), 'showmore', 'disable', $disable); } } function get_body_length($body) { $string = trim($body); // DomDocument doesn't like empty strings if (!strlen($string)) { return 0; } // We need to get rid of hidden tags (display: none) // Get rid of the warning. It would be better to have some valid html as input $doc = new DOMDocument(); @$doc->loadHTML($body); $xpath = new DOMXPath($doc); /* * Checking any possible syntax of the style attribute with xpath is impossible * So we just get any element with a style attribute, and check them with a regexp */ $xr = $xpath->query('//*[@style]'); foreach ($xr as $node) { if (preg_match('/.*display: *none *;.*/',$node->getAttribute('style'))) { // Hidden, remove it from its parent $node->parentNode->removeChild($node); } } // Now we can get the body of our HTML DomDocument, it contains only what is visible $string = $doc->saveHTML(); $string = strip_tags($string); return strlen($string); } function showmore_prepare_body(App $a, &$hook_data) { // No combination with content filters if (!empty($hook_data['filter_reasons'])) { return; } if (DI::pConfig()->get(local_user(), 'showmore', 'disable')) { return; } $chars = (int) DI::pConfig()->get(local_user(), 'showmore', 'chars', 1100); if (get_body_length($hook_data['html']) > $chars) { $found = true; $shortened = trim(showmore_cutitem($hook_data['html'], $chars)) . "..."; } else { $found = false; } if ($found) { $rnd = Strings::getRandomHex(8); $hook_data['html'] = '<span id="showmore-teaser-' . $rnd . '" class="showmore-teaser" style="display: block;" aria-hidden="true" dir="auto">' . $shortened . " " . '<span id="showmore-wrap-' . $rnd . '" style="white-space:nowrap;" class="showmore-wrap fakelink" onclick="openClose(\'showmore-' . $rnd . '\'); openClose(\'showmore-teaser-' . $rnd . '\');">' . DI::l10n()->t('show more') . '</span></span>' . '<div id="showmore-' . $rnd . '" class="showmore-content" style="display: none;" aria-hidden="false" dir="auto">' . $hook_data['html'] . '</div>'; } } function showmore_cutitem($text, $limit) { $text = trim($text); $text = mb_convert_encoding($text, 'HTML-ENTITIES', "UTF-8"); $text = substr($text, 0, $limit); $pos1 = strrpos($text, "<"); $pos2 = strrpos($text, ">"); $pos3 = strrpos($text, "&"); $pos4 = strrpos($text, ";"); if ($pos1 > $pos3) { if ($pos1 > $pos2) $text = substr($text, 0, $pos1); } else { if ($pos3 > $pos4) $text = substr($text, 0, $pos3); } $doc = new DOMDocument(); $doc->preserveWhiteSpace = false; $doctype = '<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">'; @$doc->loadHTML($doctype."<html><body>".$text."</body></html>"); $text = $doc->saveHTML(); $text = str_replace(["<html><body>", "</body></html>", $doctype], ["", "", ""], $text); return $text; }