<?php
/*
 * Copyright (c) 2010-2018 Tim Düsterhus.
 *
 * Use of this software is governed by the Business Source License
 * included in the LICENSE file.
 *
 * Change Date: 2022-08-16
 *
 * On the date above, in accordance with the Business Source
 * License, use of this software will be governed by version 2
 * or later of the General Public License.
 */

namespace chat\page;

use \chat\data\message\MessageList;
use \wcf\system\exception\IllegalLinkException;
use \wcf\system\exception\PermissionDeniedException;
use \wcf\system\page\PageLocationManager;
use \wcf\system\WCF;

/**
 * Shows the log of a specific chat room.
 */
class LogPage extends \wcf\page\AbstractPage {
	use TConfiguredPage;

	/**
	 * @inheritDoc
	 */
	public $loginRequired = true;

	/**
	 * The requested chat room ID.
	 * @var int
	 */
	public $roomID = 0;

	/**
	 * The requested chat room.
	 * @var \chat\data\room\Room
	 */
	public $room = null;

	/**
	 * The requested message ID.
	 * @var int
	 */
	public $messageID = 0;
	
	/**
	 * The requested message.
	 * @var \chat\data\message\Message
	 */
	public $message = null;

	/**
	 * The requested time.
	 * @var int
	 */
	public $datetime = 0;

	/**
	 * @inheritDoc
	 */
	public function readParameters() {
		parent::readParameters();

		if (isset($_GET['id'])) $this->roomID = intval($_GET['id']);
		$this->room = \chat\data\room\RoomCache::getInstance()->getRoom($this->roomID);

		if ($this->room === null) throw new IllegalLinkException();
		if (!$this->room->canSee($user = null, $reason)) throw $reason;
		if (!$this->room->canSeeLog($user = null, $reason)) throw $reason;

		if (isset($_GET['messageid'])) $this->messageID = intval($_GET['messageid']);
		if ($this->messageID) {
			$this->message = new \chat\data\message\Message($this->messageID);
			if (!$this->message->getMessageType()->getProcessor()->canSeeInLog($this->message, $this->room)) {
				throw new PermissionDeniedException();
			}
		}

		if (isset($_REQUEST['datetime'])) $this->datetime = strtotime($_REQUEST['datetime']);
	}

	/**
	 * @inheritDoc
	 */
	public function readData() {
		parent::readData();

		if ($this->datetime) {
			// Determine message types supporting fast select
			$objectTypes = \wcf\data\object\type\ObjectTypeCache::getInstance()->getObjectTypes('be.bastelstu.chat.messageType');
			$fastSelect = array_map(function ($item) {
				return $item->objectTypeID;
			}, array_filter($objectTypes, function ($item) {
				// TODO: Consider a method couldAppearInLog(): bool
				return $item->getProcessor()->supportsFastSelect();
			}));

			$minimum = 0;
			$loops = 0;
			do {
				// Build fast select filter
				$condition = new \wcf\system\database\util\PreparedStatementConditionBuilder();
				$condition->add('((roomID = ? AND objectTypeID IN (?)) OR objectTypeID NOT IN (?))', [ $this->room->roomID, $fastSelect, $fastSelect ]);
				$condition->add('time >= ?', [ $this->datetime ]);
				if ($minimum) {
					$condition->add('messageID > ?', [ $minimum ]);
				}

				$sql = "SELECT   messageID
					FROM     chat".WCF_N."_message
					".$condition."
					ORDER BY messageID ASC";
				$statement = WCF::getDB()->prepareStatement($sql, 20);
				$statement->execute($condition->getParameters());
				$messageIDs = $statement->fetchAll(\PDO::FETCH_COLUMN);

				$objectList = new MessageList();
				$objectList->setObjectIDs($messageIDs);
				$objectList->readObjects();
				$objects = $objectList->getObjects();
				if (empty($objects)) {
					// TODO: UserInputException?
					throw new IllegalLinkException();
				}

				foreach ($objects as $message) {
					if ($message->getMessageType()->getProcessor()->canSeeInLog($message, $this->room)) {
						$parameters = [ 'application' => 'chat'
						              , 'messageid'   => $message->messageID
						              , 'object'      => $this->room
						              ];
						\wcf\util\HeaderUtil::redirect(\wcf\system\request\LinkHandler::getInstance()->getLink('Log', $parameters));
						exit;
					}
					$minimum = $message->messageID;
				}
			}
			while (++$loops <= 3);

			// Do a best guess redirect to an ID that is as near as possible
			$parameters = [ 'application' => 'chat'
			              , 'messageid'   => $minimum
			              , 'object'      => $this->room
			              ];
			\wcf\util\HeaderUtil::redirect(\wcf\system\request\LinkHandler::getInstance()->getLink('Log', $parameters));
			exit;
		}
	}

	/**
	 * @inheritDoc
	 */
	public function assignVariables() {
		parent::assignVariables();

		PageLocationManager::getInstance()->addParentLocation('be.bastelstu.chat.Room', $this->room->roomID, $this->room);
		WCF::getTPL()->assign([ 'room'      => $this->room
		                      , 'roomList'  => \chat\data\room\RoomCache::getInstance()->getRooms()
		                      , 'messageID' => $this->messageID
		                      , 'message'   => $this->message
		                      , 'config'    => $this->getConfig()
		                      ]);
	}
}