563 lines
		
	
	
		
			18 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			563 lines
		
	
	
		
			18 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| <?php declare(strict_types=1);
 | |
| 
 | |
|  /**
 | |
|  * @global ImageRating[] $_shm_ratings
 | |
|  */
 | |
| global $_shm_ratings;
 | |
| $_shm_ratings = [];
 | |
| 
 | |
| class ImageRating
 | |
| {
 | |
|     /** @var string */
 | |
|     public $name = null;
 | |
| 
 | |
|     /** @var string */
 | |
|     public $code = null;
 | |
| 
 | |
|     /** @var string */
 | |
|     public $search_term = null;
 | |
| 
 | |
|     /** @var int */
 | |
|     public $order = 0;
 | |
| 
 | |
|     public function __construct(string $code, string $name, string $search_term, int $order)
 | |
|     {
 | |
|         assert(strlen($code)==1, "Rating code must be exactly one character");
 | |
| 
 | |
|         $this->name = $name;
 | |
|         $this->code = $code;
 | |
|         $this->search_term = $search_term;
 | |
|         $this->order = $order;
 | |
|     }
 | |
| }
 | |
| 
 | |
| function clear_ratings()
 | |
| {
 | |
|     global $_shm_ratings;
 | |
|     $keys = array_keys($_shm_ratings);
 | |
|     foreach ($keys as $key) {
 | |
|         if ($key != "?") {
 | |
|             unset($_shm_ratings[$key]);
 | |
|         }
 | |
|     }
 | |
| }
 | |
| 
 | |
| function add_rating(ImageRating $rating)
 | |
| {
 | |
|     global $_shm_ratings;
 | |
|     if ($rating->code == "?" && array_key_exists("?", $_shm_ratings)) {
 | |
|         throw new RuntimeException("? is a reserved rating code that cannot be overridden");
 | |
|     }
 | |
|     if ($rating->code != "?" && in_array(strtolower($rating->search_term), Ratings::UNRATED_KEYWORDS)) {
 | |
|         throw new RuntimeException("$rating->search_term is a reserved search term");
 | |
|     }
 | |
|     $_shm_ratings[$rating->code] = $rating;
 | |
| }
 | |
| 
 | |
| add_rating(new ImageRating("?", "Unrated", "unrated", 99999));
 | |
| add_rating(new ImageRating("s", "Safe", "safe", 0));
 | |
| add_rating(new ImageRating("q", "Questionable", "questionable", 500));
 | |
| add_rating(new ImageRating("e", "Explicit", "explicit", 1000));
 | |
| /** @noinspection PhpIncludeInspection */
 | |
| @include_once "data/config/ratings.conf.php";
 | |
| 
 | |
| class RatingSetEvent extends Event
 | |
| {
 | |
|     /** @var Image */
 | |
|     public $image;
 | |
|     /** @var string  */
 | |
|     public $rating;
 | |
| 
 | |
|     public function __construct(Image $image, string $rating)
 | |
|     {
 | |
|         parent::__construct();
 | |
|         global $_shm_ratings;
 | |
| 
 | |
|         assert(in_array($rating, array_keys($_shm_ratings)));
 | |
| 
 | |
|         $this->image = $image;
 | |
|         $this->rating = $rating;
 | |
|     }
 | |
| }
 | |
| 
 | |
| abstract class RatingsConfig
 | |
| {
 | |
|     const VERSION = "ext_ratings2_version";
 | |
|     const USER_DEFAULTS = "ratings_default";
 | |
| }
 | |
| 
 | |
| class Ratings extends Extension
 | |
| {
 | |
|     /** @var RatingsTheme */
 | |
|     protected $theme;
 | |
| 
 | |
|     public const UNRATED_KEYWORDS = ["unknown", "unrated"];
 | |
| 
 | |
|     private $search_regexp;
 | |
| 
 | |
|     public function onInitExt(InitExtEvent $event)
 | |
|     {
 | |
|         global $config, $_shm_user_classes, $_shm_ratings;
 | |
| 
 | |
|         $codes = implode("", array_keys($_shm_ratings));
 | |
|         $search_terms = [];
 | |
|         foreach ($_shm_ratings as $key => $rating) {
 | |
|             array_push($search_terms, $rating->search_term);
 | |
|         }
 | |
|         $this->search_regexp = "/^rating[=|:](?:(\*|[" . $codes . "]+)|(" .
 | |
|             implode("|", $search_terms) . "|".implode("|", self::UNRATED_KEYWORDS)."))$/D";
 | |
| 
 | |
|         foreach (array_keys($_shm_user_classes) as $key) {
 | |
|             if ($key == "base" || $key == "hellbanned") {
 | |
|                 continue;
 | |
|             }
 | |
|             $config->set_default_array("ext_rating_" . $key . "_privs", array_keys($_shm_ratings));
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     private function check_permissions(Image $image): bool
 | |
|     {
 | |
|         global $user;
 | |
| 
 | |
|         $user_view_level = Ratings::get_user_class_privs($user);
 | |
|         if (!in_array($image->rating, $user_view_level)) {
 | |
|             return false;
 | |
|         }
 | |
|         return true;
 | |
|     }
 | |
| 
 | |
|     public function onInitUserConfig(InitUserConfigEvent $event)
 | |
|     {
 | |
|         $event->user_config->set_default_array(RatingsConfig::USER_DEFAULTS, self::get_user_class_privs($event->user));
 | |
|     }
 | |
| 
 | |
|     public function onImageDownloading(ImageDownloadingEvent $event)
 | |
|     {
 | |
|         /**
 | |
|          * Deny images upon insufficient permissions.
 | |
|          **/
 | |
|         if (!$this->check_permissions($event->image)) {
 | |
|             throw new SCoreException("Access denied");
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onUserOptionsBuilding(UserOptionsBuildingEvent $event)
 | |
|     {
 | |
|         global $user, $_shm_ratings;
 | |
| 
 | |
|         $levels = self::get_user_class_privs($user);
 | |
|         $options = [];
 | |
|         foreach ($levels as $level) {
 | |
|             $options[$_shm_ratings[$level]->name] = $level;
 | |
|         }
 | |
| 
 | |
|         $sb = $event->panel->create_new_block("Default Rating Filter");
 | |
|         $sb->start_table();
 | |
|         $sb->add_multichoice_option(RatingsConfig::USER_DEFAULTS, $options, "Output Log Level: ", true);
 | |
|         $sb->end_table();
 | |
|         $sb->add_label("This controls the default rating search results will be filtered by, and nothing else. To override in your search results, add rating:* to your search.");
 | |
|     }
 | |
| 
 | |
|     public function onSetupBuilding(SetupBuildingEvent $event)
 | |
|     {
 | |
|         global $_shm_user_classes;
 | |
| 
 | |
|         $ratings = self::get_sorted_ratings();
 | |
| 
 | |
|         $options = [];
 | |
|         foreach ($ratings as $key => $rating) {
 | |
|             $options[$rating->name] = $rating->code;
 | |
|         }
 | |
| 
 | |
|         $sb = $event->panel->create_new_block("Post Ratings");
 | |
|         $sb->start_table();
 | |
|         foreach (array_keys($_shm_user_classes) as $key) {
 | |
|             if ($key == "base" || $key == "hellbanned") {
 | |
|                 continue;
 | |
|             }
 | |
|             $sb->add_multichoice_option("ext_rating_" . $key . "_privs", $options, $key, true);
 | |
|         }
 | |
|         $sb->end_table();
 | |
|     }
 | |
| 
 | |
|     public function onDisplayingImage(DisplayingImageEvent $event)
 | |
|     {
 | |
|         global $page;
 | |
|         /**
 | |
|          * Deny images upon insufficient permissions.
 | |
|          **/
 | |
|         if (!$this->check_permissions($event->image)) {
 | |
|             $page->set_mode(PageMode::REDIRECT);
 | |
|             $page->set_redirect(make_link("post/list"));
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onBulkExport(BulkExportEvent $event)
 | |
|     {
 | |
|         $event->fields["rating"] = $event->image->rating;
 | |
|     }
 | |
|     public function onBulkImport(BulkImportEvent $event)
 | |
|     {
 | |
|         if (property_exists($event->fields, "rating")
 | |
|             && $event->fields->rating != null
 | |
|             && Ratings::rating_is_valid($event->fields->rating)) {
 | |
|             $this->set_rating($event->image->id, $event->fields->rating, "");
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onRatingSet(RatingSetEvent $event)
 | |
|     {
 | |
|         if (empty($event->image->rating)) {
 | |
|             $old_rating = "";
 | |
|         } else {
 | |
|             $old_rating = $event->image->rating;
 | |
|         }
 | |
|         $this->set_rating($event->image->id, $event->rating, $old_rating);
 | |
|     }
 | |
| 
 | |
|     public function onImageInfoBoxBuilding(ImageInfoBoxBuildingEvent $event)
 | |
|     {
 | |
|         global $user;
 | |
|         $event->add_part(
 | |
|             $this->theme->get_rater_html(
 | |
|                 $event->image->id,
 | |
|                 $event->image->rating,
 | |
|                 $user->can(Permissions::EDIT_IMAGE_RATING)
 | |
|             ),
 | |
|             80
 | |
|         );
 | |
|     }
 | |
| 
 | |
|     public function onImageInfoSet(ImageInfoSetEvent $event)
 | |
|     {
 | |
|         global $user;
 | |
|         if ($user->can(Permissions::EDIT_IMAGE_RATING) && isset($_POST["rating"])) {
 | |
|             $rating = $_POST["rating"];
 | |
|             if (Ratings::rating_is_valid($rating)) {
 | |
|                 send_event(new RatingSetEvent($event->image, $rating));
 | |
|             }
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onParseLinkTemplate(ParseLinkTemplateEvent $event)
 | |
|     {
 | |
|         $event->replace('$rating', $this->rating_to_human($event->image->rating));
 | |
|     }
 | |
| 
 | |
|     public function onHelpPageBuilding(HelpPageBuildingEvent $event)
 | |
|     {
 | |
|         if ($event->key===HelpPages::SEARCH) {
 | |
|             $block = new Block();
 | |
|             $block->header = "Ratings";
 | |
| 
 | |
|             $ratings = self::get_sorted_ratings();
 | |
| 
 | |
|             $block->body = $this->theme->get_help_html($ratings);
 | |
|             $event->add_block($block);
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onSearchTermParse(SearchTermParseEvent $event)
 | |
|     {
 | |
|         global $user;
 | |
| 
 | |
|         $matches = [];
 | |
|         if (is_null($event->term) && $this->no_rating_query($event->context)) {
 | |
|             $set = Ratings::privs_to_sql(Ratings::get_user_default_ratings($user));
 | |
|             $event->add_querylet(new Querylet("rating IN ($set)"));
 | |
|         }
 | |
| 
 | |
|         if (is_null($event->term)) {
 | |
|             return;
 | |
|         }
 | |
| 
 | |
|         if (preg_match($this->search_regexp, strtolower($event->term), $matches)) {
 | |
|             $ratings = $matches[1] ? $matches[1] : $matches[2][0];
 | |
| 
 | |
|             if (count($matches)>2&&in_array($matches[2], self::UNRATED_KEYWORDS)) {
 | |
|                 $ratings = "?";
 | |
|             }
 | |
| 
 | |
|             if ($ratings == '*') {
 | |
|                 $ratings = Ratings::get_user_class_privs($user);
 | |
|             } else {
 | |
|                 $ratings = array_intersect(str_split($ratings), Ratings::get_user_class_privs($user));
 | |
|             }
 | |
| 
 | |
|             $set = "'" . join("', '", $ratings) . "'";
 | |
|             $event->add_querylet(new Querylet("rating IN ($set)"));
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onTagTermCheck(TagTermCheckEvent $event)
 | |
|     {
 | |
|         if (preg_match($this->search_regexp, $event->term)) {
 | |
|             $event->metatag = true;
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onTagTermParse(TagTermParseEvent $event)
 | |
|     {
 | |
|         global $user;
 | |
|         $matches = [];
 | |
| 
 | |
|         if (preg_match($this->search_regexp, strtolower($event->term), $matches)) {
 | |
|             $ratings = $matches[1] ? $matches[1] : $matches[2][0];
 | |
| 
 | |
|             if (count($matches)>2&&in_array($matches[2], self::UNRATED_KEYWORDS)) {
 | |
|                 $ratings = "?";
 | |
|             }
 | |
| 
 | |
|             $ratings = array_intersect(str_split($ratings), Ratings::get_user_class_privs($user));
 | |
|             $rating = $ratings[0];
 | |
|             $image = Image::by_id($event->image_id);
 | |
|             $re = new RatingSetEvent($image, $rating);
 | |
|             send_event($re);
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onAdminBuilding(AdminBuildingEvent $event)
 | |
|     {
 | |
|         global $database, $_shm_ratings;
 | |
| 
 | |
|         $results = $database->get_col("SELECT DISTINCT rating FROM images ORDER BY rating");
 | |
|         $original_values = [];
 | |
|         foreach ($results as $result) {
 | |
|             if (array_key_exists($result, $_shm_ratings)) {
 | |
|                 $original_values[$result] = $_shm_ratings[$result]->name;
 | |
|             } else {
 | |
|                 $original_values[$result] = $result;
 | |
|             }
 | |
|         }
 | |
| 
 | |
|         $this->theme->display_form($original_values, self::get_sorted_ratings());
 | |
|     }
 | |
| 
 | |
|     public function onAdminAction(AdminActionEvent $event)
 | |
|     {
 | |
|         global $database, $user;
 | |
|         $action = $event->action;
 | |
|         switch ($action) {
 | |
|             case "update_ratings":
 | |
|                 $event->redirect = true;
 | |
|                 if (!array_key_exists("rating_old", $_POST) || empty($_POST["rating_old"])) {
 | |
|                     return;
 | |
|                 }
 | |
|                 if (!array_key_exists("rating_new", $_POST) || empty($_POST["rating_new"])) {
 | |
|                     return;
 | |
|                 }
 | |
|                 $old = $_POST["rating_old"];
 | |
|                 $new = $_POST["rating_new"];
 | |
| 
 | |
|                 if ($user->can(Permissions::BULK_EDIT_IMAGE_RATING)) {
 | |
|                     $database->execute("UPDATE images SET rating = :new WHERE rating = :old", ["new"=>$new, "old"=>$old ]);
 | |
|                 }
 | |
| 
 | |
|                 break;
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onBulkActionBlockBuilding(BulkActionBlockBuildingEvent $event)
 | |
|     {
 | |
|         global $user;
 | |
| 
 | |
|         if ($user->can(Permissions::BULK_EDIT_IMAGE_RATING)) {
 | |
|             $event->add_action("bulk_rate", "Set (R)ating", "r", "", $this->theme->get_selection_rater_html(["?"]));
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onBulkAction(BulkActionEvent $event)
 | |
|     {
 | |
|         global $page, $user;
 | |
| 
 | |
|         switch ($event->action) {
 | |
|             case "bulk_rate":
 | |
|                 if (!isset($_POST['rating'])) {
 | |
|                     return;
 | |
|                 }
 | |
|                 if ($user->can(Permissions::BULK_EDIT_IMAGE_RATING)) {
 | |
|                     $rating = $_POST['rating'];
 | |
|                     $total = 0;
 | |
|                     foreach ($event->items as $image) {
 | |
|                         send_event(new RatingSetEvent($image, $rating));
 | |
|                         $total++;
 | |
|                     }
 | |
|                     $page->flash("Rating set for $total items");
 | |
|                 }
 | |
|                 break;
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public function onPageRequest(PageRequestEvent $event)
 | |
|     {
 | |
|         global $user, $page, $user_config;
 | |
| 
 | |
|         if ($event->page_matches("admin/bulk_rate")) {
 | |
|             if (!$user->can(Permissions::BULK_EDIT_IMAGE_RATING)) {
 | |
|                 throw new PermissionDeniedException("Permission denied");
 | |
|             } else {
 | |
|                 $n = 0;
 | |
|                 while (true) {
 | |
|                     $images = Image::find_images($n, 100, Tag::explode($_POST["query"]));
 | |
|                     if (count($images) == 0) {
 | |
|                         break;
 | |
|                     }
 | |
| 
 | |
|                     reset($images); // rewind to first element in array.
 | |
| 
 | |
|                     foreach ($images as $image) {
 | |
|                         send_event(new RatingSetEvent($image, $_POST['rating']));
 | |
|                     }
 | |
|                     $n += 100;
 | |
|                 }
 | |
|                 #$database->execute("
 | |
|                 #	update images set rating=:rating where images.id in (
 | |
|                 #		select image_id from image_tags join tags
 | |
|                 #		on image_tags.tag_id = tags.id where tags.tag = :tag);
 | |
|                 #	", ['rating'=>$_POST["rating"], 'tag'=>$_POST["tag"]]);
 | |
|                 $page->set_mode(PageMode::REDIRECT);
 | |
|                 $page->set_redirect(make_link("post/list"));
 | |
|             }
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     public static function get_sorted_ratings(): array
 | |
|     {
 | |
|         global $_shm_ratings;
 | |
| 
 | |
|         $ratings = array_values($_shm_ratings);
 | |
|         usort($ratings, function ($a, $b) {
 | |
|             return $a->order <=> $b->order;
 | |
|         });
 | |
|         return $ratings;
 | |
|     }
 | |
| 
 | |
|     public static function get_user_class_privs(User $user): array
 | |
|     {
 | |
|         global $config;
 | |
| 
 | |
|         return $config->get_array("ext_rating_".$user->class->name."_privs");
 | |
|     }
 | |
| 
 | |
|     public static function get_user_default_ratings(): array
 | |
|     {
 | |
|         global $user_config, $user;
 | |
| 
 | |
|         $available = self::get_user_class_privs($user);
 | |
|         $selected = $user_config->get_array(RatingsConfig::USER_DEFAULTS);
 | |
| 
 | |
|         return array_intersect($available, $selected);
 | |
|     }
 | |
| 
 | |
|     public static function privs_to_sql(array $privs): string
 | |
|     {
 | |
|         $arr = [];
 | |
|         foreach ($privs as $i) {
 | |
|             $arr[] = "'" . $i . "'";
 | |
|         }
 | |
|         if (sizeof($arr)==0) {
 | |
|             return "' '";
 | |
|         }
 | |
|         return join(', ', $arr);
 | |
|     }
 | |
| 
 | |
|     public static function rating_to_human(string $rating): string
 | |
|     {
 | |
|         global $_shm_ratings;
 | |
| 
 | |
|         if (array_key_exists($rating, $_shm_ratings)) {
 | |
|             return $_shm_ratings[$rating]->name;
 | |
|         }
 | |
|         return "Unknown";
 | |
|     }
 | |
| 
 | |
|     public static function rating_is_valid(string $rating): bool
 | |
|     {
 | |
|         global $_shm_ratings;
 | |
| 
 | |
|         return in_array($rating, array_keys($_shm_ratings));
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * #param string[] $context
 | |
|      */
 | |
|     private function no_rating_query(array $context): bool
 | |
|     {
 | |
|         foreach ($context as $term) {
 | |
|             if (preg_match("/^rating[=|:]/", $term)) {
 | |
|                 return false;
 | |
|             }
 | |
|         }
 | |
|         return true;
 | |
|     }
 | |
| 
 | |
|     public function onDatabaseUpgrade(DatabaseUpgradeEvent $event)
 | |
|     {
 | |
|         global $database, $config;
 | |
| 
 | |
|         if ($this->get_version(RatingsConfig::VERSION) < 1) {
 | |
|             $database->execute("ALTER TABLE images ADD COLUMN rating CHAR(1) NOT NULL DEFAULT '?'");
 | |
|             $database->execute("CREATE INDEX images__rating ON images(rating)");
 | |
|             $this->set_version(RatingsConfig::VERSION, 3);
 | |
|         }
 | |
| 
 | |
|         if ($this->get_version(RatingsConfig::VERSION) < 2) {
 | |
|             $database->execute("CREATE INDEX images__rating ON images(rating)");
 | |
|             $this->set_version(RatingsConfig::VERSION, 2);
 | |
|         }
 | |
| 
 | |
|         if ($this->get_version(RatingsConfig::VERSION) < 3) {
 | |
|             $database->execute("UPDATE images SET rating = 'u' WHERE rating is null");
 | |
|             switch ($database->get_driver_name()) {
 | |
|                 case DatabaseDriver::MYSQL:
 | |
|                     $database->execute("ALTER TABLE images CHANGE rating rating CHAR(1) NOT NULL DEFAULT 'u'");
 | |
|                     break;
 | |
|                 case DatabaseDriver::PGSQL:
 | |
|                     $database->execute("ALTER TABLE images ALTER COLUMN rating SET DEFAULT 'u'");
 | |
|                     $database->execute("ALTER TABLE images ALTER COLUMN rating SET NOT NULL");
 | |
|                     break;
 | |
|             }
 | |
|             $this->set_version(RatingsConfig::VERSION, 3);
 | |
|         }
 | |
| 
 | |
|         if ($this->get_version(RatingsConfig::VERSION) < 4) {
 | |
|             $value = $config->get_string("ext_rating_anon_privs");
 | |
|             if (!empty($value)) {
 | |
|                 $config->set_array("ext_rating_anonymous_privs", str_split($value));
 | |
|             }
 | |
|             $value = $config->get_string("ext_rating_user_privs");
 | |
|             if (!empty($value)) {
 | |
|                 $config->set_array("ext_rating_user_privs", str_split($value));
 | |
|             }
 | |
|             $value = $config->get_string("ext_rating_admin_privs");
 | |
|             if (!empty($value)) {
 | |
|                 $config->set_array("ext_rating_admin_privs", str_split($value));
 | |
|             }
 | |
| 
 | |
|             switch ($database->get_driver_name()) {
 | |
|                 case DatabaseDriver::MYSQL:
 | |
|                     $database->execute("ALTER TABLE images CHANGE rating rating CHAR(1) NOT NULL DEFAULT '?'");
 | |
|                     break;
 | |
|                 case DatabaseDriver::PGSQL:
 | |
|                     $database->execute("ALTER TABLE images ALTER COLUMN rating SET DEFAULT '?'");
 | |
|                     break;
 | |
|             }
 | |
| 
 | |
|             $database->set_timeout(300000); // These updates can take a little bit
 | |
| 
 | |
|             $database->execute("UPDATE images SET rating = :new WHERE rating = :old", ["new"=>'?', "old"=>'u' ]);
 | |
| 
 | |
|             $this->set_version(RatingsConfig::VERSION, 4);
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     private function set_rating(int $image_id, string $rating, string $old_rating)
 | |
|     {
 | |
|         global $database;
 | |
|         if ($old_rating != $rating) {
 | |
|             $database->execute("UPDATE images SET rating=:rating WHERE id=:id", ['rating'=>$rating, 'id'=>$image_id]);
 | |
|             log_info("rating", "Rating for >>{$image_id} set to: ".$this->rating_to_human($rating));
 | |
|         }
 | |
|     }
 | |
| }
 |