4 * Description: Collapse posts
6 * Author: Michael Vogel <ike@piratenpartei.de>
7 * based upon NSFW from Mike Macgirvin <http://macgirvin.com/profile/mike>
11 function showmore_install() {
12 register_hook('prepare_body', 'addon/showmore/showmore.php', 'showmore_prepare_body');
13 register_hook('plugin_settings', 'addon/showmore/showmore.php', 'showmore_addon_settings');
14 register_hook('plugin_settings_post', 'addon/showmore/showmore.php', 'showmore_addon_settings_post');
17 function showmore_uninstall() {
18 unregister_hook('prepare_body', 'addon/showmore/showmore.php', 'showmore_prepare_body');
19 unregister_hook('plugin_settings', 'addon/showmore/showmore.php', 'showmore_addon_settings');
20 unregister_hook('plugin_settings_post', 'addon/showmore/showmore.php', 'showmore_addon_settings_post');
23 function showmore_addon_settings(&$a,&$s) {
28 /* Add our stylesheet to the page so we can make our settings look nice */
30 $a->page['htmlhead'] .= '<link rel="stylesheet" type="text/css" href="'.$a->get_baseurl().'/addon/showmore/showmore.css'.'" media="all"/>'."\r\n";
32 $enable_checked = (intval(get_pconfig(local_user(),'showmore','disable')) ? '' : ' checked="checked"');
33 $chars = get_pconfig(local_user(),'showmore','chars');
37 $s .= '<div class="settings-block">';
38 $s .= '<h3>' . t('"Show more" Settings').'</h3>';
39 $s .= '<div id="showmore-wrapper">';
41 $s .= '<label id="showmore-enable-label" for="showmore-enable">'.t('Enable Show More').'</label>';
42 $s .= '<input id="showmore-enable" type="checkbox" name="showmore-enable" value="1"'.$enable_checked.' />';
43 $s .= '<div class="clear"></div>';
44 $s .= '<label id="showmore-label" for="showmore-chars">'.t('Cutting posts after how much characters').' </label>';
45 $s .= '<input id="showmore-words" type="text" name="showmore-chars" value="'.$chars.'" />';
46 $s .= '</div><div class="clear"></div>';
48 $s .= '<div class="settings-submit-wrapper" ><input type="submit" id="showmore-submit" name="showmore-submit" class="settings-submit" value="' . t('Submit') . '" /></div>';
49 // $s .= '<div class="showmore-desc">' . t('Use /expression/ to provide regular expressions') . '</div>';
55 function showmore_addon_settings_post(&$a,&$b) {
60 if($_POST['showmore-submit']) {
61 set_pconfig(local_user(),'showmore','chars',trim($_POST['showmore-chars']));
62 $enable = ((x($_POST,'showmore-enable')) ? intval($_POST['showmore-enable']) : 0);
64 set_pconfig(local_user(),'showmore','disable', $disable);
65 info( t('Show More Settings saved.') . EOL);
69 function get_body_length($body) {
70 $string = trim($body);
72 // We need to get rid of hidden tags (display: none)
74 // Get rid of the warning. It would be better to have some valid html as input
75 $dom = @DomDocument::loadHTML($body);
76 $xpath = new DOMXPath($dom);
79 * Checking any possible syntax of the style attribute with xpath is impossible
80 * So we just get any element with a style attribute, and check them with a regexp
82 $xr = $xpath->query('//*[@style]');
83 foreach($xr as $node) {
84 if(preg_match('/.*display: *none *;.*/',$node->getAttribute('style'))) {
85 // Hidden, remove it from its parent
86 $node->parentNode->removeChild($node);
89 // Now we can get the body of our HTML DomDocument, it contains only what is visible
90 $string = $dom->saveHTML();
92 $string = strip_tags($string);
93 return strlen($string);
96 function showmore_prepare_body(&$a,&$b) {
99 if(get_pconfig(local_user(),'showmore','disable'))
102 $chars = (int)get_pconfig(local_user(),'showmore','chars');
106 if (get_body_length($b['html']) > $chars) {
108 $shortened = trim(showmore_cutitem($b['html'], $chars))."...";
112 $rnd = random_string(8);
113 $b['html'] = '<span id="showmore-teaser-'.$rnd.'" style="display: block;">'.$shortened." ".
114 '<span id="showmore-wrap-'.$rnd.'" style="white-space:nowrap;" class="fakelink" onclick="openClose(\'showmore-'.$rnd.'\'); openClose(\'showmore-teaser-'.$rnd.'\');" >'.sprintf(t('show more')).'</span></span>'.
115 '<div id="showmore-'.$rnd.'" style="display: none;">'.$b['html'].'</div>';
119 function showmore_cutitem($text, $limit) {
122 $text = mb_convert_encoding($text, 'HTML-ENTITIES', "UTF-8");
124 $text = substr($text, 0, $limit);
126 $pos1 = strrpos($text, "<");
127 $pos2 = strrpos($text, ">");
128 $pos3 = strrpos($text, "&");
129 $pos4 = strrpos($text, ";");
133 $text = substr($text, 0, $pos1);
136 $text = substr($text, 0, $pos3);
139 $doc = new DOMDocument();
140 $doc->preserveWhiteSpace = false;
142 $doctype = '<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">';
143 @$doc->loadHTML($doctype."<html><body>".$text."</body></html>");
145 $text = $doc->saveHTML();
146 $text = str_replace(array("<html><body>", "</body></html>", $doctype), array("", "", ""), $text);