<?php

namespace ManiaControl\Maps;

use FML\Controls\Control;
use FML\Controls\Frame;
use FML\Controls\Gauge;
use FML\Controls\Label;
use FML\Controls\Labels\Label_Button;
use FML\Controls\Labels\Label_Text;
use FML\Controls\Quad;
use FML\Controls\Quads\Quad_BgsPlayerCard;
use FML\Controls\Quads\Quad_Icons64x64_1;
use FML\ManiaLink;
use FML\Script\Script;
use KarmaPlugin;
use ManiaControl\Admin\AuthenticationManager;
use ManiaControl\Callbacks\CallbackListener;
use ManiaControl\Callbacks\CallbackManager;
use ManiaControl\ColorUtil;
use ManiaControl\Formatter;
use ManiaControl\ManiaControl;
use ManiaControl\Manialinks\ManialinkManager;
use ManiaControl\Manialinks\ManialinkPageAnswerListener;
use ManiaControl\Players\Player;
use MXInfoSearcher;

/**
 * MapList Widget Class
 *
 * @author steeffeen & kremsy
 */
class MapList implements ManialinkPageAnswerListener, CallbackListener {
	/**
	 * Constants
	 */
	const ACTION_ADD_MAP = 'MapList.AddMap';
	const ACTION_ERASE_MAP = 'MapList.EraseMap';
	const ACTION_SWITCH_MAP = 'MapList.SwitchMap';
	const ACTION_QUEUED_MAP = 'MapList.QueueMap';
	const MAX_MAPS_PER_PAGE = 15;
	const SHOW_MX_LIST = 1;
	const SHOW_MAP_LIST = 2;
	const DEFAULT_KARMA_PLUGIN = 'KarmaPlugin';
	
	/**
	 * Private Properties
	 */
	private $maniaControl = null;
	private $mapListShown = array();

	/**
	 * Create a new MapList Instance
	 *
	 * @param ManiaControl $maniaControl
	 */
	public function __construct(ManiaControl $maniaControl) {
		$this->maniaControl = $maniaControl;
		
		// Register for Callbacks
		$this->maniaControl->callbackManager->registerCallbackListener(ManialinkManager::CB_MAIN_WINDOW_CLOSED, $this, 'closeWidget');
		$this->maniaControl->callbackManager->registerCallbackListener(CallbackManager::CB_MP_PLAYERMANIALINKPAGEANSWER, $this, 
				'handleManialinkPageAnswer');
		$this->maniaControl->callbackManager->registerCallbackListener(MapQueue::CB_MAPQUEUE_CHANGED, $this, 'updateWidget');
		$this->maniaControl->callbackManager->registerCallbackListener(MapManager::CB_MAPS_UPDATED, $this, 'updateWidget');
		$this->maniaControl->callbackManager->registerCallbackListener(MapManager::CB_KARMA_UPDATED, $this, 'updateWidget');
		$this->maniaControl->callbackManager->registerCallbackListener(CallbackManager::CB_MC_BEGINMAP, $this, 'updateWidget');
		// TODO not working yet
	}

	/**
	 * Display the Mania Exchange List
	 *
	 * @param array $chatCallback
	 * @param Player $player
	 */
	public function showManiaExchangeList(array $chatCallback, Player $player) {
		$this->mapListShown[$player->login] = self::SHOW_MX_LIST;
		
		$params = explode(' ', $chatCallback[1][2]);
		
		$serverInfo = $this->maniaControl->server->getSystemInfo();
		$title = strtoupper(substr($serverInfo['TitleId'], 0, 2));
		
		$mapName = '';
		$author = '';
		$environment = '';
		// TODO also get actual environment
		$recent = true;
		
		if (count($params) > 1) {
			foreach ($params as $param) {
				if ($param == '/xlist') {
					continue;
				}
				if (strtolower(substr($param, 0, 5)) == 'auth:') {
					$author = substr($param, 5);
				}
				elseif (strtolower(substr($param, 0, 4)) == 'env:') {
					$environment = substr($param, 4);
				}
				else {
					if ($mapName == '') {
						$mapName = $param;
					}
					else { // concatenate words in name
						$mapName .= '%20' . $param;
					}
				}
			}
			
			$recent = false;
		}
		
		// search for matching maps
		$maps = new MXInfoSearcher($title, $mapName, $author, $environment, $recent);
		
		// check if there are any results
		if (!$maps->valid()) {
			$this->maniaControl->chat->sendError('No maps found, or MX is down!', $player->login);
			if ($maps->error != '') {
				trigger_error($maps->error, E_USER_WARNING);
			}
			return;
		}
		
		$maniaLink = new ManiaLink(ManialinkManager::MAIN_MLID);
		$frame = $this->buildMainFrame();
		$maniaLink->add($frame);
		
		// Create script and features
		$script = new Script();
		$maniaLink->setScript($script);
		
		// Start offsets
		$width = $this->maniaControl->manialinkManager->styleManager->getListWidgetsWidth();
		$height = $this->maniaControl->manialinkManager->styleManager->getListWidgetsHeight();
		$x = -$width / 2;
		$y = $height / 2;
		
		// Headline
		$headFrame = new Frame();
		$frame->add($headFrame);
		$headFrame->setY($y - 5);
		$array = array('Id' => $x + 5, 'Name' => $x + 17, 'Author' => $x + 65, 'Mood' => $x + 100, 'Type' => $x + 115);
		$this->maniaControl->manialinkManager->labelLine($headFrame, $array);
		
		$i = 0;
		$y -= 10;
		foreach ($maps as $map) {
			$mapFrame = new Frame();
			$frame->add($mapFrame);
			$array = array($map->id => $x + 5, $map->name => $x + 17, $map->author => $x + 65, $map->mood => $x + 100, $map->maptype => $x + 115);
			$this->maniaControl->manialinkManager->labelLine($mapFrame, $array);
			$mapFrame->setY($y);
			
			if ($this->maniaControl->authenticationManager->checkRight($player, AuthenticationManager::AUTH_LEVEL_ADMIN)) {
				// TODO: SET as setting who can add maps Add-Map-Button
				$addQuad = new Quad_Icons64x64_1();
				$mapFrame->add($addQuad);
				$addQuad->setX($x + 15);
				$addQuad->setZ(-0.1);
				$addQuad->setSubStyle($addQuad::SUBSTYLE_Add);
				$addQuad->setSize(4, 4);
				$addQuad->setAction(self::ACTION_ADD_MAP . '.' . $map->id);
				
				// Description Label
				$descriptionLabel = new Label();
				$frame->add($descriptionLabel);
				$descriptionLabel->setAlign(Control::LEFT, Control::TOP);
				$descriptionLabel->setPosition($x + 10, -$height / 2 + 5);
				$descriptionLabel->setSize($width * 0.7, 4);
				$descriptionLabel->setTextSize(2);
				$descriptionLabel->setVisible(false);
				$descriptionLabel->setText('Add-Map: $<' . Formatter::stripDirtyCodes($map->name) . '$>');
				$script->addTooltip($addQuad, $descriptionLabel);
			}
			
			$y -= 4;
			$i++;
			if ($i == self::MAX_MAPS_PER_PAGE) {
				break;
			}
		}
		
		// TODO add MX info screen
		
		// render and display xml
		$this->maniaControl->manialinkManager->displayWidget($maniaLink, $player);
	}

	/**
	 * Builds the mainFrame
	 *
	 * @return Frame $frame
	 */
	public function buildMainFrame() {
		$width = $this->maniaControl->manialinkManager->styleManager->getListWidgetsWidth();
		$height = $this->maniaControl->manialinkManager->styleManager->getListWidgetsHeight();
		$quadStyle = $this->maniaControl->manialinkManager->styleManager->getDefaultMainWindowStyle();
		$quadSubstyle = $this->maniaControl->manialinkManager->styleManager->getDefaultMainWindowSubStyle();
		
		// mainframe
		$frame = new Frame();
		$frame->setSize($width, $height);
		$frame->setPosition(0, 0);
		
		// Background Quad
		$backgroundQuad = new Quad();
		$frame->add($backgroundQuad);
		$backgroundQuad->setSize($width, $height);
		$backgroundQuad->setStyles($quadStyle, $quadSubstyle);
		
		// Add Close Quad (X)
		$closeQuad = new Quad_Icons64x64_1();
		$frame->add($closeQuad);
		$closeQuad->setPosition($width * 0.483, $height * 0.467, 3);
		$closeQuad->setSize(6, 6);
		$closeQuad->setSubStyle(Quad_Icons64x64_1::SUBSTYLE_QuitRace);
		$closeQuad->setAction(ManialinkManager::ACTION_CLOSEWIDGET);
		
		return $frame;
	}

	/**
	 * Displayes a MapList on the screen
	 *
	 * @param Player $player
	 */
	public function showMapList(Player $player) {
		$width = $this->maniaControl->manialinkManager->styleManager->getListWidgetsWidth();
		$height = $this->maniaControl->manialinkManager->styleManager->getListWidgetsHeight();
		
		// Get Maplist
		$mapList = $this->maniaControl->mapManager->getMaps();
		
		$this->mapListShown[$player->login] = self::SHOW_MAP_LIST;
		
		$maniaLink = new ManiaLink(ManialinkManager::MAIN_MLID);
		$frame = $this->buildMainFrame();
		$maniaLink->add($frame);
		
		// Create script and features
		$script = new Script();
		$maniaLink->setScript($script);
		
		// Pagers
		
		// Config
		$pagerSize = 6.;
		$pagesId = 'MapListPages';
		
		if (count($mapList) > self::MAX_MAPS_PER_PAGE) {
			$pagerPrev = new Quad_Icons64x64_1();
			$frame->add($pagerPrev);
			$pagerPrev->setPosition($width * 0.42, $height * -0.44, 2);
			$pagerPrev->setSize($pagerSize, $pagerSize);
			$pagerPrev->setSubStyle(Quad_Icons64x64_1::SUBSTYLE_ArrowPrev);
			
			$pagerNext = new Quad_Icons64x64_1();
			$frame->add($pagerNext);
			$pagerNext->setPosition($width * 0.45, $height * -0.44, 2);
			$pagerNext->setSize($pagerSize, $pagerSize);
			$pagerNext->setSubStyle(Quad_Icons64x64_1::SUBSTYLE_ArrowNext);
			
			$script->addPager($pagerPrev, -1, $pagesId);
			$script->addPager($pagerNext, 1, $pagesId);
			
			$pageCountLabel = new Label_Text();
			$frame->add($pageCountLabel);
			$pageCountLabel->setHAlign(Control::RIGHT);
			$pageCountLabel->setPosition($width * 0.40, $height * -0.44, 1);
			$pageCountLabel->setStyle($pageCountLabel::STYLE_TextTitle1);
			$pageCountLabel->setTextSize(1.3);
			$script->addPageLabel($pageCountLabel, $pagesId);
		}
		
		// Headline
		$headFrame = new Frame();
		$frame->add($headFrame);
		$headFrame->setY($height / 2 - 5);
		$x = -$width / 2;
		$array = array('Id' => $x + 5, 'Mx Id' => $x + 10, 'Map Name' => $x + 20, 'Author' => $x + 68, 'Karma' => $x + 115, 
			'Actions' => $width / 2 - 15);
		$this->maniaControl->manialinkManager->labelLine($headFrame, $array);
		
		// Predefine Description Label
		$preDefinedDescriptionLabel = new Label();
		$preDefinedDescriptionLabel->setAlign(Control::LEFT, Control::TOP);
		$preDefinedDescriptionLabel->setPosition($x + 10, -$height / 2 + 5);
		$preDefinedDescriptionLabel->setSize($width * 0.7, 4);
		$preDefinedDescriptionLabel->setTextSize(2);
		$preDefinedDescriptionLabel->setVisible(false);
		
		$queuedMaps = $this->maniaControl->mapManager->mapQueue->getQueuedMapsRanking();
		/**
		 *
		 * @var KarmaPlugin $karmaPlugin
		 */
		$karmaPlugin = $this->maniaControl->pluginManager->getPlugin(self::DEFAULT_KARMA_PLUGIN);
		
		$id = 1;
		$y = $height / 2 - 10;
		$pageFrames = array();
		/**
		 *
		 * @var Map $map
		 */
		foreach ($mapList as $map) {
			
			if (!isset($pageFrame)) {
				$pageFrame = new Frame();
				$frame->add($pageFrame);
				if (!empty($pageFrames)) {
					$pageFrame->setVisible(false);
				}
				array_push($pageFrames, $pageFrame);
				$y = $height / 2 - 10;
				$script->addPage($pageFrame, count($pageFrames), $pagesId);
			}
			
			// Map Frame
			$mapFrame = new Frame();
			$pageFrame->add($mapFrame);
			$mapFrame->setZ(0.1);
			$mapFrame->setY($y);
			
			if ($id % 2 != 0) {
				$lineQuad = new Quad_BgsPlayerCard();
				$mapFrame->add($lineQuad);
				$lineQuad->setSize($width, 4);
				$lineQuad->setSubStyle($lineQuad::SUBSTYLE_BgPlayerCardBig);
				$lineQuad->setZ(0.001);
			}
			
			if ($this->maniaControl->mapManager->getCurrentMap() === $map) {
				$currentQuad = new Quad_Icons64x64_1();
				$mapFrame->add($currentQuad);
				$currentQuad->setX($x + 3.5);
				$currentQuad->setZ(0.2);
				$currentQuad->setSize(4, 4);
				$currentQuad->setSubStyle($currentQuad::SUBSTYLE_ArrowBlue);
			}
			
			$mxId = '-';
			if (isset($map->mx->id)) {
				$mxId = $map->mx->id;
			}
			
			// Display Maps
			$array = array($id => $x + 5, $mxId => $x + 10, Formatter::stripDirtyCodes($map->name) => $x + 20, $map->authorNick => $x + 68);
			$this->maniaControl->manialinkManager->labelLine($mapFrame, $array);
			// TODO detailed mx info page with link to mxo
			// TODO action detailed map info
			
			// MapQueue Description Label
			$descriptionLabel = clone $preDefinedDescriptionLabel;
			$frame->add($descriptionLabel);
			
			// Map-Queue-Map-Label
			if (isset($queuedMaps[$map->uid])) {
				$label = new Label_Text();
				$mapFrame->add($label);
				$label->setX($width / 2 - 15);
				$label->setAlign(Control::CENTER, Control::CENTER);
				$label->setZ(0.2);
				$label->setTextSize(1.5);
				$label->setText($queuedMaps[$map->uid]);
				$label->setTextColor('fff');
				$descriptionLabel->setText('$<' . $map->name . '$> is on Map-Queue Position: ' . $queuedMaps[$map->uid]);
			}
			else {
				// Map-Queue-Map-Button
				$queueLabel = new Label_Button();
				$mapFrame->add($queueLabel);
				$queueLabel->setX($width / 2 - 15);
				$queueLabel->setZ(0.2);
				$queueLabel->setSize(3, 3);
				$queueLabel->setAction(self::ACTION_QUEUED_MAP . '.' . $map->uid);
				$queueLabel->setText('+');
				$queueLabel->setTextColor('09f');
				
				$descriptionLabel->setText('Add Map to the Map Queue: $<' . $map->name . '$>');
				$script->addTooltip($queueLabel, $descriptionLabel);
			}
			
			if ($this->maniaControl->authenticationManager->checkRight($player, AuthenticationManager::AUTH_LEVEL_ADMIN)) {
				// TODO SET as setting who can add maps
				// erase map quad
				$eraseLabel = new Label_Button();
				$mapFrame->add($eraseLabel);
				$eraseLabel->setX($width / 2 - 5);
				$eraseLabel->setZ(0.2);
				$eraseLabel->setSize(3, 3);
				$eraseLabel->setTextSize(1);
				$eraseLabel->setText('x');
				$eraseLabel->setTextColor('a00');
				
				$confirmFrame = $this->buildConfirmFrame($maniaLink, $y, $id, $map->uid);
				//$script->addToggle($eraseLabel, $confirmFrame); //TODO
				$script->addTooltip($eraseLabel, $confirmFrame, Script::OPTION_TOOLTIP_STAYONCLICK);
				
				// Description Label
				$descriptionLabel = clone $preDefinedDescriptionLabel;
				$frame->add($descriptionLabel);
				$descriptionLabel->setText('Remove Map: $<' . $map->name . '$>');
				$script->addTooltip($eraseLabel, $descriptionLabel);
			}
			
			if ($this->maniaControl->authenticationManager->checkRight($player, AuthenticationManager::AUTH_LEVEL_MODERATOR)) {
				// TODO SET as setting who can add maps
				// Switch to map
				$switchLabel = new Label_Button();
				$mapFrame->add($switchLabel);
				$switchLabel->setX($width / 2 - 10);
				$switchLabel->setZ(0.2);
				$switchLabel->setSize(3, 3);
				$switchLabel->setTextSize(2);
				$switchLabel->setText('»');
				$switchLabel->setTextColor('0f0');
				
				$confirmFrame = $this->buildConfirmFrame($maniaLink, $y, $id);
				$script->addTooltip($switchLabel, $confirmFrame, Script::OPTION_TOOLTIP_STAYONCLICK); //TODO
				//$script->addToggle($switchLabel, $confirmFrame);
				
				$descriptionLabel = clone $preDefinedDescriptionLabel;
				$frame->add($descriptionLabel);
				$descriptionLabel->setText('Switch Directly to Map: $<' . $map->name . '$>');
				$script->addTooltip($switchLabel, $descriptionLabel);
			}
			
			// Display Karma bar
			if ($karmaPlugin) {
				$karma = $karmaPlugin->getMapKarma($map);
				$votes = $karmaPlugin->getMapVotes($map);
				if (is_numeric($karma)) {
					$karmaGauge = new Gauge();
					$mapFrame->add($karmaGauge);
					$karmaGauge->setZ(2);
					$karmaGauge->setX($x + 120);
					$karmaGauge->setSize(20, 9);
					$karmaGauge->setDrawBg(false);
					$karma = floatval($karma);
					$karmaGauge->setRatio($karma + 0.15 - $karma * 0.15);
					$karmaColor = ColorUtil::floatToStatusColor($karma);
					$karmaGauge->setColor($karmaColor . '9');
					
					$karmaLabel = new Label();
					$mapFrame->add($karmaLabel);
					$karmaLabel->setZ(2);
					$karmaLabel->setX($x + 120);
					$karmaLabel->setSize(20 * 0.9, 5);
					$karmaLabel->setTextSize(0.9);
					$karmaLabel->setTextColor('000');
					$karmaLabel->setAlign(Control::CENTER, Control::CENTER);
					$karmaLabel->setText('  ' . round($karma * 100.) . '% (' . $votes['count'] . ')');
				}
			}
			
			$y -= 4;
			if ($id % self::MAX_MAPS_PER_PAGE == 0) {
				unset($pageFrame);
			}
			$id++;
		}
		// TODO page 0 bug?
		$this->maniaControl->manialinkManager->displayWidget($maniaLink, $player);
	}

	/**
	 * Builds the confirmation frame
	 *
	 * @param ManiaLink $maniaLink
	 * @param $y
	 * @param $id
	 * @param bool $mapUid
	 * @return Frame
	 */
	public function buildConfirmFrame(Manialink $maniaLink, $y, $id, $mapUid = false) {
		$width = $this->maniaControl->manialinkManager->styleManager->getListWidgetsWidth();
		$quadStyle = $this->maniaControl->manialinkManager->styleManager->getDefaultMainWindowStyle();
		$quadSubstyle = $this->maniaControl->manialinkManager->styleManager->getDefaultMainWindowSubStyle();
		
		$confirmFrame = new Frame();
		$maniaLink->add($confirmFrame);
		$confirmFrame->setPosition($width / 2 + 6, $y);
		
		$quad = new Quad();
		$confirmFrame->add($quad);
		$quad->setStyles($quadStyle, $quadSubstyle);
		$quad->setSize(12, 4);
		
		$quad = new Quad_BgsPlayerCard();
		$confirmFrame->add($quad);
		$quad->setSubStyle($quad::SUBSTYLE_BgCardSystem);
		$quad->setSize(11, 3.5);
		
		$label = new Label_Button();
		$confirmFrame->add($label);
		$label->setAlign(Control::CENTER, Control::CENTER);
		$label->setText('Sure?');
		$label->setTextSize(1);
		$label->setScale(0.90);
		$label->setX(-1.3);
		
		$buttLabel = new Label_Button();
		$confirmFrame->add($buttLabel);
		$buttLabel->setPosition(3.2, 0.4, 0.2);
		$buttLabel->setSize(3, 3);
		// $buttLabel->setTextSize(1);
		$buttLabel->setAlign(Control::CENTER, Control::CENTER);
		
		if (!$mapUid) {
			$quad->setAction(self::ACTION_SWITCH_MAP . '.' . ($id - 1));
			$buttLabel->setText('»');
			$buttLabel->setTextColor('0f0');
			$buttLabel->setTextSize(2);
		}
		else {
			$buttLabel->setTextSize(1);
			$buttLabel->setText('x');
			$buttLabel->setTextColor('a00');
			$quad->setAction(self::ACTION_ERASE_MAP . '.' . ($id - 1) . '.' . $mapUid);
		}
		return $confirmFrame;
	}

	/**
	 * Closes the widget
	 *
	 * @param array $callback
	 */
	public function closeWidget(array $callback) {
		$player = $callback[1];
		unset($this->mapListShown[$player->login]);
	}

	/**
	 * Closes the widget
	 *
	 * @param Player $player
	 */
	public function playerCloseWidget(Player $player) {
		unset($this->mapListShown[$player->login]);
		$this->maniaControl->manialinkManager->closeWidget($player);
	}

	/**
	 * Handle ManialinkPageAnswer Callback
	 *
	 * @param array $callback
	 */
	public function handleManialinkPageAnswer(array $callback) {
		$actionId = $callback[1][2];
		$actionArray = explode('.', $actionId);
		if (count($actionArray) <= 2) return;
		
		$action = $actionArray[0] . '.' . $actionArray[1];
		$login = $callback[1][1];
		$player = $this->maniaControl->playerManager->getPlayer($login);
		$mapId = (int) $actionArray[2];
		
		switch ($action) {
			case self::ACTION_ADD_MAP:
				$this->maniaControl->mapManager->addMapFromMx($mapId, $player->login);
				break;
			case self::ACTION_ERASE_MAP:
				$this->maniaControl->mapManager->eraseMap($mapId, $actionArray[3]);
				$this->showMapList($player);
				break;
			case self::ACTION_SWITCH_MAP:
				$this->maniaControl->client->query('JumpToMapIndex', $mapId);
				$mapList = $this->maniaControl->mapManager->getMapList();
				$map = $mapList[$mapId];
				
				$message = '$<' . $player->nickname . '$> skipped to Map $z$<' . $map->name . '$>!';
				$this->maniaControl->chat->sendSuccess($message);
				$this->maniaControl->log($message, true);
				
				$this->playerCloseWidget($player);
				break;
			case self::ACTION_QUEUED_MAP:
				$this->maniaControl->mapManager->mapQueue->addMapToMapQueue($callback[1][1], $actionArray[2]);
				break;
		}
	}

	/**
	 * Reopen the widget on Map Begin, MapListChanged, etc.
	 *
	 * @param array $callback
	 */
	public function updateWidget(array $callback) {
		foreach ($this->mapListShown as $login => $shown) {
			if ($shown) {
				$player = $this->maniaControl->playerManager->getPlayer($login);
				if ($player != null) {
					if ($shown == self::SHOW_MX_LIST) {
						// TODO
					}
					else if ($shown == self::SHOW_MAP_LIST) {
						$this->showMapList($player);
					}
				}
				else {
					unset($this->mapListShown[$login]);
				}
			}
		}
	}
}