X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=nsfw%2Fnsfw.php;h=9f81b29d8333557f669a26dc735a9a23c711616b;hb=4e208f8f12424608a83682b2c1ae39011f840b9a;hp=776df194837c3e18cf125c1d62a8ab7311e1c360;hpb=ce7b6d6bb268ccfe712e115c09c8c59502952ea2;p=friendica-addons.git

diff --git a/nsfw/nsfw.php b/nsfw/nsfw.php
index 776df194..9f81b29d 100644
--- a/nsfw/nsfw.php
+++ b/nsfw/nsfw.php
@@ -1,26 +1,170 @@
 <?php
 
-
 /**
  * Name: NSFW
  * Description: Collapse posts with inappropriate content
  * Version: 1.0
  * Author: Mike Macgirvin <http://macgirvin.com/profile/mike>
- * 
+ *
  */
+use Friendica\Core\Hook;
+use Friendica\DI;
+
+function nsfw_install()
+{
+	Hook::register('prepare_body_content_filter', 'addon/nsfw/nsfw.php', 'nsfw_prepare_body_content_filter', 10);
+	Hook::register('addon_settings', 'addon/nsfw/nsfw.php', 'nsfw_addon_settings');
+	Hook::register('addon_settings_post', 'addon/nsfw/nsfw.php', 'nsfw_addon_settings_post');
+}
+
+// This function isn't perfect and isn't trying to preserve the html structure - it's just a
+// quick and dirty filter to pull out embedded photo blobs because 'nsfw' seems to come up
+// inside them quite often. We don't need anything fancy, just pull out the data blob so we can
+// check against the rest of the body.
+
+function nsfw_extract_photos($body)
+{
+	$new_body = '';
+
+	$img_start = strpos($body, 'src="data:');
+	$img_end = (($img_start !== false) ? strpos(substr($body, $img_start), '>') : false);
+
+	$cnt = 0;
+
+	while ($img_end !== false) {
+		$img_end += $img_start;
+		$new_body = $new_body . substr($body, 0, $img_start);
+
+		$cnt ++;
+		$body = substr($body, 0, $img_end);
+
+		$img_start = strpos($body, 'src="data:');
+		$img_end = (($img_start !== false) ? strpos(substr($body, $img_start), '>') : false);
+	}
+
+	if (!$cnt) {
+		return $body;
+	}
+	return $new_body;
+}
+
+function nsfw_addon_settings(&$a, &$s)
+{
+	if (!local_user()) {
+		return;
+	}
+
+	/* Add our stylesheet to the page so we can make our settings look nice */
+
+	DI::page()['htmlhead'] .= '<link rel="stylesheet"  type="text/css" href="' . DI::baseUrl()->get() . '/addon/nsfw/nsfw.css' . '" media="all" />' . "\r\n";
+
+	$enable_checked = (intval(DI::pConfig()->get(local_user(), 'nsfw', 'disable')) ? '' : ' checked="checked" ');
+	$words = DI::pConfig()->get(local_user(), 'nsfw', 'words');
+	if (!$words) {
+		$words = 'nsfw,';
+	}
 
-function nsfw_install() {
-	register_hook('prepare_body', 'addon/nsfw/nsfw.php', 'nsfw_prepare_body');
+	$s .= '<span id="settings_nsfw_inflated" class="settings-block fakelink" style="display: block;" onclick="openClose(\'settings_nsfw_expanded\'); openClose(\'settings_nsfw_inflated\');">';
+	$s .= '<h3>' . DI::l10n()->t('Content Filter (NSFW and more)') . '</h3>';
+	$s .= '</span>';
+	$s .= '<div id="settings_nsfw_expanded" class="settings-block" style="display: none;">';
+	$s .= '<span class="fakelink" onclick="openClose(\'settings_nsfw_expanded\'); openClose(\'settings_nsfw_inflated\');">';
+	$s .= '<h3>' . DI::l10n()->t('Content Filter (NSFW and more)') . '</h3>';
+	$s .= '</span>';
+
+	$s .= '<div id="nsfw-wrapper">';
+	$s .= '<p>' . DI::l10n()->t('This addon searches for specified words/text in posts and collapses them. It can be used to filter content tagged with for instance #NSFW that may be deemed inappropriate at certain times or places, such as being at work. It is also useful for hiding irrelevant or annoying content from direct view.') . '</p>';
+	$s .= '<label id="nsfw-enable-label" for="nsfw-enable">' . DI::l10n()->t('Enable Content filter') . ' </label>';
+	$s .= '<input id="nsfw-enable" type="checkbox" name="nsfw-enable" value="1"' . $enable_checked . ' />';
+	$s .= '<div class="clear"></div>';
+	$s .= '<label id="nsfw-label" for="nsfw-words">' . DI::l10n()->t('Comma separated list of keywords to hide') . ' </label>';
+	$s .= '<textarea id="nsfw-words" type="text" name="nsfw-words">' . $words . '</textarea>';
+	$s .= '</div><div class="clear"></div>';
+
+	$s .= '<div class="settings-submit-wrapper" ><input type="submit" id="nsfw-submit" name="nsfw-submit" class="settings-submit" value="' . DI::l10n()->t('Save Settings') . '" /></div>';
+	$s .= '<div class="nsfw-desc">' . DI::l10n()->t('Use /expression/ to provide regular expressions') . '</div></div>';
+	return;
+}
+
+function nsfw_addon_settings_post(&$a, &$b)
+{
+	if (!local_user()) {
+		return;
+	}
+
+	if (!empty($_POST['nsfw-submit'])) {
+		DI::pConfig()->set(local_user(), 'nsfw', 'words', trim($_POST['nsfw-words']));
+		$enable = (!empty($_POST['nsfw-enable']) ? intval($_POST['nsfw-enable']) : 0);
+		$disable = 1 - $enable;
+		DI::pConfig()->set(local_user(), 'nsfw', 'disable', $disable);
+	}
 }
 
+function nsfw_prepare_body_content_filter(\Friendica\App $a, &$hook_data)
+{
+	$words = null;
+	if (DI::pConfig()->get(local_user(), 'nsfw', 'disable')) {
+		return;
+	}
+
+	if (local_user()) {
+		$words = DI::pConfig()->get(local_user(), 'nsfw', 'words');
+	}
+
+	if ($words) {
+		$word_list = explode(',', $words);
+	} else {
+		$word_list = ['nsfw'];
+	}
+
+	$found = false;
+	if (count($word_list)) {
+		$body = $hook_data['item']['title'] . "\n" . nsfw_extract_photos($hook_data['item']['body']);
+
+		foreach ($word_list as $word) {
+			$word = trim($word);
+			if (!strlen($word)) {
+				continue;
+			}
+
+			$tag_search = false;
+			switch ($word[0]) {
+				case '/'; // Regular expression
+					$found = preg_match($word, $body);
+					break;
+				case '#': // Hashtag-only search
+					$tag_search = true;
+					$found = nsfw_find_word_in_item_tags($hook_data['item']['hashtags'], substr($word, 1));
+					break;
+				default:
+					$found = stripos($body, $word) !== false || nsfw_find_word_in_item_tags($hook_data['item']['tags'], $word);
+					break;
+			}
 
-function nsfw_uninstall() {
-	unregister_hook('prepare_body', 'addon/nsfw/nsfw.php', 'nsfw_prepare_body');
+			if ($found) {
+				break;
+			}
+		}
+	}
+
+	if ($found) {
+		if ($tag_search) {
+			$hook_data['filter_reasons'][] = DI::l10n()->t('Filtered tag: %s', $word);
+		} else {
+			$hook_data['filter_reasons'][] = DI::l10n()->t('Filtered word: %s', $word);
+		}
+	}
 }
 
-function nsfw_prepare_body(&$a,&$b) {
-	if(stristr($b,'nsfw')) {
-		$rnd = random_string(8);
-		$b = '<div id="nsfw-wrap-' . $rnd . '" class="fakelink" onclick=openClose(\'nsfw-' . $rnd . '\'); >' . t('NSFW - Click to open/close') . '</div><div id="nsfw-' . $rnd . '" style="display: none; " >' . $b . '</div>';  
+function nsfw_find_word_in_item_tags($item_tags, $word)
+{
+	if (is_array($item_tags)) {
+		foreach ($item_tags as $tag) {
+			if (stripos($tag, '>' . $word . '<') !== false) {
+				return true;
+			}
+		}
 	}
-}
\ No newline at end of file
+
+	return false;
+}