package com.gtnewhorizon.structurelib;

import com.google.common.collect.BiMap;
import com.google.common.collect.HashBiMap;
import com.gtnewhorizon.structurelib.entity.fx.EntityFXBlockHint;
import cpw.mods.fml.common.event.FMLPreInitializationEvent;
import cpw.mods.fml.common.eventhandler.SubscribeEvent;
import java.util.ArrayList;
import java.util.Iterator;
import java.util.LinkedList;
import java.util.List;
import net.minecraft.block.Block;
import net.minecraft.client.Minecraft;
import net.minecraft.client.gui.GuiNewChat;
import net.minecraft.entity.player.EntityPlayer;
import net.minecraft.entity.player.EntityPlayerMP;
import net.minecraft.util.ChatComponentText;
import net.minecraft.util.IIcon;
import net.minecraft.world.World;
import net.minecraftforge.common.MinecraftForge;
import net.minecraftforge.event.world.WorldEvent;

public class ClientProxy extends CommonProxy {

    private static final short[] NO_TINT = {255, 255, 255, 0};

    @Override
    public void hintParticleTinted(World w, int x, int y, int z, IIcon[] icons, short[] RGBa) {
        EntityFXBlockHint hint = new EntityFXBlockHint(w, x, y, z, icons).withColorTint(RGBa);
        Minecraft.getMinecraft().effectRenderer.addEffect(hint);
        ensureHinting();
        if (ConfigurationHandler.INSTANCE.isRemoveCollidingHologram()) {
            HintParticleInfo info = new HintParticleInfo(x, y, z, currentHints);
            EntityFXBlockHint dupe = allHints.inverse().get(info);
            if (dupe != null) {
                List<EntityFXBlockHint> owner = allHints.get(dupe).owner;
                // in case someone forget to call endHinting
                if (owner != currentHints) {
                    hintOwners.remove(owner);
                    owner.forEach(EntityFXBlockHint::setDead);
                    owner.clear();
                }
            }
            allHints.forcePut(hint, info);
        }
        currentHints.add(hint);
    }

    @Override
    public void hintParticleTinted(World w, int x, int y, int z, Block block, int meta, short[] RGBa) {
        hintParticleTinted(w, x, y, z, createIIconFromBlock(block, meta), RGBa);
    }

    @Override
    public void hintParticle(World w, int x, int y, int z, IIcon[] icons) {
        hintParticleTinted(w, x, y, z, icons, NO_TINT);
    }

    @Override
    public void hintParticle(World w, int x, int y, int z, Block block, int meta) {
        hintParticleTinted(w, x, y, z, createIIconFromBlock(block, meta), NO_TINT);
    }

    @Override
    public boolean updateHintParticleTint(EntityPlayer player, World w, int x, int y, int z, short[] rgBa) {
        if (player instanceof EntityPlayerMP) return super.updateHintParticleTint(player, w, x, y, z, rgBa);
        if (player != getCurrentPlayer()) return false; // how?
        HintParticleInfo info = new HintParticleInfo(x, y, z, null);
        EntityFXBlockHint existing = allHints.inverse().get(info);
        if (existing != null) {
            existing.withColorTint(rgBa);
            return true;
        }
        return false;
    }

    private static IIcon[] createIIconFromBlock(Block block, int meta) {
        IIcon[] ret = new IIcon[6];
        for (int i = 0; i < 6; i++) {
            ret[i] = block.getIcon(i, meta);
        }
        return ret;
    }

    @Override
    public void addClientSideChatMessages(String... messages) {
        GuiNewChat chat = Minecraft.getMinecraft().ingameGUI.getChatGUI();
        for (String s : messages) {
            chat.printChatMessage(new ChatComponentText(s));
        }
    }

    @Override
    public EntityPlayer getCurrentPlayer() {
        return Minecraft.getMinecraft().thePlayer;
    }

    @Override
    public boolean isCurrentPlayer(EntityPlayer player) {
        return player == Minecraft.getMinecraft().thePlayer;
    }

    private static final BiMap<EntityFXBlockHint, HintParticleInfo> allHints = HashBiMap.create();
    private static final List<List<EntityFXBlockHint>> hintOwners = new ArrayList<>();
    private static List<EntityFXBlockHint> currentHints;

    public static void onHintDead(EntityFXBlockHint fx) {
        if (ConfigurationHandler.INSTANCE.isRemoveCollidingHologram()) allHints.remove(fx);
        for (Iterator<List<EntityFXBlockHint>> iterator = hintOwners.iterator(); iterator.hasNext(); ) {
            List<EntityFXBlockHint> list = iterator.next();
            if (list.remove(fx)) {
                if (list.isEmpty()) iterator.remove();
                break;
            }
        }
    }

    @Override
    public void startHinting(World w) {
        if (!w.isRemote) return;
        if (currentHints != null) hintOwners.add(currentHints);
        currentHints = new LinkedList<>();
    }

    private void ensureHinting() {
        if (currentHints == null) currentHints = new LinkedList<>();
    }

    @Override
    public void endHinting(World w) {
        if (!w.isRemote) return;
        while (!hintOwners.isEmpty() && hintOwners.size() >= ConfigurationHandler.INSTANCE.getMaxCoexistingHologram()) {
            List<EntityFXBlockHint> list = hintOwners.remove(0);
            list.forEach(EntityFXBlockHint::setDead);
            list.clear();
        }
        if (!currentHints.isEmpty()) hintOwners.add(currentHints);
        currentHints = null;
    }

    @Override
    public void preInit(FMLPreInitializationEvent e) {
        MinecraftForge.EVENT_BUS.register(new ForgeEventHandler());
    }

    @Override
    public long getOverworldTime() {
        // there is no overworld, better just hope current world time is ok...
        return Minecraft.getMinecraft().theWorld.getTotalWorldTime();
    }

    private static class HintParticleInfo {
        private final int x, y, z;
        private final List<EntityFXBlockHint> owner;

        public HintParticleInfo(int x, int y, int z, List<EntityFXBlockHint> owner) {
            this.x = x;
            this.y = y;
            this.z = z;
            this.owner = owner;
        }

        @Override
        public boolean equals(Object o) {
            if (this == o) return true;
            if (o == null || getClass() != o.getClass()) return false;

            HintParticleInfo that = (HintParticleInfo) o;

            if (x != that.x) return false;
            if (y != that.y) return false;
            return z == that.z;
        }

        @Override
        public int hashCode() {
            int result = x;
            result = 31 * result + y;
            result = 31 * result + z;
            return result;
        }
    }

    public static class ForgeEventHandler {
        @SubscribeEvent
        public void onWorldLoad(WorldEvent.Load e) {
            if (e.world.isRemote) {
                allHints.clear();
                hintOwners.clear();
            }
        }
    }
}