package admincommands;

import java.awt.Color;
import java.util.Comparator;
import java.util.LinkedHashMap;
import java.util.List;
import java.util.Map;
import java.util.stream.Collectors;

import org.apache.commons.lang3.math.NumberUtils;
import org.apache.commons.lang3.text.WordUtils;

import com.aionemu.gameserver.model.animations.TeleportAnimation;
import com.aionemu.gameserver.model.gameobjects.Npc;
import com.aionemu.gameserver.model.gameobjects.VisibleObject;
import com.aionemu.gameserver.model.gameobjects.player.Player;
import com.aionemu.gameserver.model.house.House;
import com.aionemu.gameserver.model.templates.housing.HouseType;
import com.aionemu.gameserver.network.aion.serverpackets.SM_SYSTEM_MESSAGE;
import com.aionemu.gameserver.services.HousingService;
import com.aionemu.gameserver.services.player.PlayerService;
import com.aionemu.gameserver.services.teleport.TeleportService;
import com.aionemu.gameserver.utils.ChatUtil;
import com.aionemu.gameserver.utils.PacketSendUtility;
import com.aionemu.gameserver.utils.chathandlers.AdminCommand;
import com.aionemu.gameserver.world.WorldMapType;

/**
 * @author Rolandas
 */
public class HouseCommand extends AdminCommand {

	public HouseCommand() {
		super("house", "House teleport and ownership management.");

		// @formatter:off
		setSyntaxInfo(
			"list - Shows all maps with houses.",
			"list <map> - Shows all house addresses for the given map.",
			"tp <address> - Teleports you to the house with the given address.",
			"own <address> - Gives ownership of given house to your target.",
			"revoke <address> - Revokes ownership of given house.",
			"reloadscripts <address> - Reloads all scripts for the given house."
		);
		// @formatter:on
	}

	@Override
	public void execute(Player admin, String... params) {
		if (params.length == 0) {
			sendInfo(admin);
			return;
		}

		House house = null;
		if (params.length >= 2) {
			int address = NumberUtils.toInt(params[1]);
			house = HousingService.getInstance().getHouseByAddress(address);
		}
		if (house == null && !"list".equalsIgnoreCase(params[0])) {
			sendInfo(admin, "Invalid address.");
			return;
		}
		if ("list".equalsIgnoreCase(params[0])) {
			if (params.length == 1)
				listMapsWithHouses(admin);
			else
				listHouses(admin, WorldMapType.of(params[1]));
		} else if ("own".equalsIgnoreCase(params[0])) {
			acquireHouse(admin, house);
		} else if ("revoke".equalsIgnoreCase(params[0])) {
			revokeOwnership(admin, house);
		} else if ("tp".equalsIgnoreCase(params[0])) {
			TeleportService.teleportTo(admin, house.getPosition().getWorldMapInstance(), house.getX(), house.getY(), house.getZ(),
				house.getTeleportHeading(), TeleportAnimation.NONE);
		} else if ("reloadscripts".equalsIgnoreCase(params[0])) {
			reloadPlayerScripts(admin, house);
		} else {
			sendInfo(admin);
		}
	}

	private void listMapsWithHouses(Player admin) {
		String maps = HousingService.getInstance().getCustomHouses().stream().map(house -> WorldMapType.getWorld(house.getAddress().getMapId()))
			.distinct().sorted().map(worldMapType -> ChatUtil.color(WordUtils.capitalizeFully(String.valueOf(worldMapType)), Color.WHITE))
			.collect(Collectors.joining("\n\t"));
		sendInfo(admin, "Maps with houses:\n\t" + maps + "\nType " + ChatUtil.color(getAliasWithPrefix() + " list mapname", Color.WHITE)
			+ " to show all houses for that map.");
	}

	private void listHouses(Player admin, WorldMapType worldMapType) {
		if (worldMapType == null) {
			sendInfo(admin, "Invalid map name.");
			return;
		}
		Map<HouseType, List<House>> housesByType = getHousesByType(worldMapType.getId());
		if (housesByType.isEmpty()) {
			sendInfo(admin, "There are no houses in " + WordUtils.capitalizeFully(worldMapType.toString()));
			return;
		}
		sendInfo(admin, "Houses in " + WordUtils.capitalizeFully(worldMapType.toString()) + ":");
		housesByType.forEach((houseType, houses) -> sendInfo(admin, WordUtils.capitalizeFully(houseType.toString()) + ":\n\t" + formatAddresses(houses)));
	}

	private String formatAddresses(List<House> houses) {
		boolean dash = false;
		int lastAddress = houses.get(0).getAddress().getId();
		String addresses = ChatUtil.color(lastAddress + "", Color.WHITE);
		for (int i = 1; i < houses.size(); i++) {
			House house = houses.get(i);
			int currentAddress = house.getAddress().getId();
			if (lastAddress + 1 != currentAddress || i + 1 == houses.size() || currentAddress + 1 != houses.get(i + 1).getAddress().getId()) {
				if (!addresses.isEmpty() && !dash)
					addresses += ", ";
				addresses += ChatUtil.color(currentAddress + "", Color.WHITE);
				dash = false;
			} else if (!dash) {
				addresses += "-";
				dash = true;
			}
			lastAddress = house.getAddress().getId();
		}
		return addresses;
	}

	private Map<HouseType, List<House>> getHousesByType(int mapId) {
		Comparator<House> comparator = Comparator.comparing(house -> house.getHouseType().getId());
		comparator = comparator.reversed().thenComparing(house -> house.getAddress().getId());
		return HousingService.getInstance().getCustomHouses().stream().filter(house -> house.getAddress().getMapId() == mapId).sorted(comparator)
			.collect(Collectors.groupingBy(House::getHouseType, LinkedHashMap::new, Collectors.toList()));
	}

	private void acquireHouse(Player admin, House house) {
		VisibleObject creature = admin.getTarget();
		if (!(creature instanceof Player target)) {
			PacketSendUtility.sendPacket(admin, SM_SYSTEM_MESSAGE.STR_INVALID_TARGET());
			return;
		}

		if (house.getOwnerId() == target.getObjectId()) {
			sendInfo(admin, target.getName() + " already owns that house.");
			return;
		}
		if (target.getHouses().size() >= 2) {
			sendInfo(admin, target.getName() + " must sell his old house which is currently in grace time first!");
			return;
		}
		House studio = HousingService.getInstance().getPlayerStudio(target.getObjectId());
		if (studio != null)
			HousingService.getInstance().changeOwner(studio, 0);
		HousingService.getInstance().changeOwner(house, target.getObjectId());
		sendInfo(admin, "House " + house.getName() + " is now owned by " + target.getName());
	}

	private void revokeOwnership(Player admin, House house) {
		int ownerId = house.getOwnerId();
		if (ownerId == 0) {
			sendInfo(admin, "House has no owner.");
			return;
		}
		HousingService.getInstance().changeOwner(house, 0);
		sendInfo(admin, "Ownership of house " + house.getAddress().getId() + " was revoked from " + PlayerService.getPlayerName(ownerId));
	}

	private void reloadPlayerScripts(Player admin, House house) {
		Npc butler = house.getButler();
		if (butler == null) {
			sendInfo(admin, "No butler was found for house with address " + house.getAddress().getId());
			return;
		}
		house.reloadPlayerScripts();
		butler.getKnownList().forEachPlayer(house::sendScripts);
		sendInfo(admin, "Script reload successful");
	}

}