package mods.tinker.tconstruct.library;

import ic2.api.item.ICustomElectricItem;
import ic2.api.item.IElectricItem;

import java.util.Iterator;
import java.util.List;
import java.util.Random;

import mods.tinker.common.PiercingEntityDamage;
import net.minecraft.block.Block;
import net.minecraft.enchantment.EnchantmentHelper;
import net.minecraft.enchantment.EnchantmentThorns;
import net.minecraft.entity.Entity;
import net.minecraft.entity.EntityLiving;
import net.minecraft.entity.item.EntityItem;
import net.minecraft.entity.monster.EntityCreeper;
import net.minecraft.entity.monster.EntityGhast;
import net.minecraft.entity.passive.EntityWolf;
import net.minecraft.entity.player.EntityPlayer;
import net.minecraft.item.ItemStack;
import net.minecraft.nbt.NBTTagCompound;
import net.minecraft.potion.Potion;
import net.minecraft.stats.AchievementList;
import net.minecraft.stats.StatList;
import net.minecraft.util.AxisAlignedBB;
import net.minecraft.util.DamageSource;
import net.minecraft.util.MathHelper;
import net.minecraft.world.World;
import net.minecraftforge.common.MinecraftForge;
import net.minecraftforge.event.Event.Result;
import net.minecraftforge.event.entity.player.UseHoeEvent;

public class AbilityHelper
{
    static Random random = new Random();

    /* Normal interactions */
    public static boolean onBlockChanged (ItemStack stack, World world, int bID, int x, int y, int z, EntityLiving player, Random random)
    {
        if (!stack.hasTagCompound())
            return false;

        int durability = 0;
        NBTTagCompound tags = stack.getTagCompound();

        if (tags.getCompoundTag("InfiTool").hasKey("Unbreaking"))
            durability = tags.getCompoundTag("InfiTool").getInteger("Unbreaking");

        if (random.nextInt(10) < 10 - durability)
        {
            damageTool(stack, 1, tags, player, false, true);
        }

        return true;
    }

    public static void onLeftClickEntity (ItemStack stack, EntityPlayer player, Entity entity, ToolCore tool)
    {
        if (entity.canAttackWithItem())
        {
            if (!entity.func_85031_j(player)) // can't attack this entity
            {
                NBTTagCompound tags = stack.getTagCompound();
                NBTTagCompound toolTags = stack.getTagCompound().getCompoundTag("InfiTool");
                int damage = toolTags.getInteger("Attack");
                boolean broken = toolTags.getBoolean("Broken");

                int durability = tags.getCompoundTag("InfiTool").getInteger("Damage");
                float shoddy = tags.getCompoundTag("InfiTool").getFloat("Shoddy");
                float damageModifier = -shoddy * durability / 100f;

                if (player.isPotionActive(Potion.damageBoost))
                {
                    damage += 3 << player.getActivePotionEffect(Potion.damageBoost).getAmplifier();
                }

                if (player.isPotionActive(Potion.weakness))
                {
                    damage -= 2 << player.getActivePotionEffect(Potion.weakness).getAmplifier();
                }

                float knockback = 0;
                int enchantDamage = 0;

                if (entity instanceof EntityLiving)
                {
                    enchantDamage = EnchantmentHelper.getEnchantmentModifierLiving(player, (EntityLiving) entity);
                    knockback += EnchantmentHelper.getKnockbackModifier(player, (EntityLiving) entity);
                }

                damage += damageModifier;

                if (player.isSprinting())
                {
                    knockback++;
                    float lunge = tool.chargeAttack();
                    if (lunge > 1f)
                    {
                        knockback += lunge - 1.0f;
                        damage *= lunge;
                    }
                }

                if (damage > 0 || enchantDamage > 0)
                {
                    boolean criticalHit = player.fallDistance > 0.0F && !player.onGround && !player.isOnLadder() && !player.isInWater() && !player.isPotionActive(Potion.blindness)
                            && player.ridingEntity == null && entity instanceof EntityLiving;

                    if (criticalHit)
                    {
                        damage += random.nextInt(damage / 2 + 2);
                    }

                    damage += enchantDamage;
                    boolean var6 = false;
                    int fireAspect = EnchantmentHelper.getFireAspectModifier(player);

                    if (entity instanceof EntityLiving && fireAspect > 0 && !entity.isBurning())
                    {
                        var6 = true;
                        entity.setFire(1);
                    }

                    if (broken)
                        damage = 1;
                    boolean causedDamage = false;
                    if (tool.pierceArmor() && !broken)
                        causedDamage = entity.attackEntityFrom(causePlayerPiercingDamage(player), damage);
                    else
                        causedDamage = entity.attackEntityFrom(DamageSource.causePlayerDamage(player), damage);

                    if (causedDamage)
                    {
                        damageTool(stack, 1, player, false);
                        int drain = toolTags.getInteger("Necrotic") * 2;
                        if (drain > 0)
                            player.heal(drain);

                        if (knockback > 0)
                        {
                            entity.addVelocity((double) (-MathHelper.sin(player.rotationYaw * (float) Math.PI / 180.0F) * (float) knockback * 0.5F), 0.1D,
                                    (double) (MathHelper.cos(player.rotationYaw * (float) Math.PI / 180.0F) * (float) knockback * 0.5F));
                            player.motionX *= 0.6D;
                            player.motionZ *= 0.6D;
                            player.setSprinting(false);
                        }

                        if (criticalHit)
                        {
                            player.onCriticalHit(entity);
                        }

                        if (enchantDamage > 0)
                        {
                            player.onEnchantmentCritical(entity);
                        }

                        if (damage >= 18)
                        {
                            player.triggerAchievement(AchievementList.overkill);
                        }

                        player.setLastAttackingEntity(entity);

                        if (entity instanceof EntityLiving)
                        {
                            EnchantmentThorns.func_92096_a(player, (EntityLiving) entity, random);
                        }
                    }

                    if (entity instanceof EntityLiving)
                    {
                        stack.hitEntity((EntityLiving) entity, player);
                        if (entity.isEntityAlive())
                        {
                            alertPlayerWolves(player, (EntityLiving) entity, true);
                        }

                        player.addStat(StatList.damageDealtStat, damage);

                        if ((fireAspect > 0 || toolTags.hasKey("Fiery") || toolTags.hasKey("Lava")) && causedDamage)
                        {
                            fireAspect *= 4;
                            if (toolTags.hasKey("Fiery"))
                            {
                                fireAspect += toolTags.getInteger("Fiery") / 5 + 1;
                            }
                            if (toolTags.getBoolean("Lava"))
                            {
                                fireAspect += 3;
                            }
                            entity.setFire(fireAspect);
                        }
                        else if (var6)
                        {
                            entity.extinguish();
                        }
                    }

                    player.addExhaustion(0.3F);
                }
            }
        }
    }

    static void alertPlayerWolves (EntityPlayer player, EntityLiving living, boolean par2)
    {
        if (!(living instanceof EntityCreeper) && !(living instanceof EntityGhast))
        {
            if (living instanceof EntityWolf)
            {
                EntityWolf var3 = (EntityWolf) living;

                if (var3.isTamed() && player.username.equals(var3.getOwnerName()))
                {
                    return;
                }
            }

            if (!(living instanceof EntityPlayer) || player.func_96122_a((EntityPlayer) living))
            {
                List var6 = player.worldObj.getEntitiesWithinAABB(EntityWolf.class,
                        AxisAlignedBB.getAABBPool().getAABB(player.posX, player.posY, player.posZ, player.posX + 1.0D, player.posY + 1.0D, player.posZ + 1.0D).expand(16.0D, 4.0D, 16.0D));
                Iterator var4 = var6.iterator();

                while (var4.hasNext())
                {
                    EntityWolf var5 = (EntityWolf) var4.next();

                    if (var5.isTamed() && var5.getEntityToAttack() == null && player.username.equals(var5.getOwnerName()) && (!par2 || !var5.isSitting()))
                    {
                        var5.setSitting(false);
                        var5.setTarget(living);
                    }
                }
            }
        }
    }

    /* Tool specific */
    public static void damageTool (ItemStack stack, int dam, EntityLiving entity, boolean ignoreCharge)
    {
        NBTTagCompound tags = stack.getTagCompound();
        damageTool(stack, dam, tags, entity, ignoreCharge, true);
    }

    public static void healTool (ItemStack stack, int dam, EntityLiving entity, boolean ignoreCharge, boolean updateDamageBar)
    {
        NBTTagCompound tags = stack.getTagCompound();
        damageTool(stack, -dam, tags, entity, ignoreCharge, updateDamageBar);
    }

    public static void damageTool (ItemStack stack, int dam, NBTTagCompound tags, EntityLiving entity, boolean ignoreCharge, boolean updateDamageBar)
    {
        if (ignoreCharge || !damageElectricTool(stack, tags, entity))
        {
            int damage = tags.getCompoundTag("InfiTool").getInteger("Damage");
            int damageTrue = damage + dam;
            int maxDamage = tags.getCompoundTag("InfiTool").getInteger("TotalDurability");
            if (damageTrue <= 0)
            {
                tags.getCompoundTag("InfiTool").setInteger("Damage", 0);
                if (updateDamageBar)
                    stack.setItemDamage(0);
            }

            else if (damageTrue > maxDamage)
            {
                breakTool(stack, tags, entity);
                if (updateDamageBar)
                    stack.setItemDamage(0);
            }

            else
            {
                tags.getCompoundTag("InfiTool").setInteger("Damage", damage + dam);
                int toolDamage = (damage * 100 / maxDamage) + 1;
                int stackDamage = stack.getItemDamage();
                if (updateDamageBar && toolDamage != stackDamage)
                {
                    stack.setItemDamage((damage * 100 / maxDamage) + 1);
                }
            }
        }
    }

    public static boolean damageElectricTool (ItemStack stack, NBTTagCompound tags, Entity entity)
    {
        if (!tags.hasKey("charge"))
            return false;

        int charge = tags.getInteger("charge");
        int mineSpeed = tags.getCompoundTag("InfiTool").getInteger("MiningSpeed");
        if (tags.getCompoundTag("InfiTool").hasKey("MiningSpeed2"))
            mineSpeed = (mineSpeed + tags.getCompoundTag("InfiTool").getInteger("MiningSpeed2")) / 2;
        mineSpeed /= 15;

        if (charge < mineSpeed)
        {
            if (charge > 0)
                tags.setInteger("charge", 0);
            return false;
        }
        /*if (entity instanceof EntityPlayer && ElectricItem.use(stack, mineSpeed, (EntityPlayer) entity))
        	return true;*/

        charge -= mineSpeed;
        ToolCore tool = (ToolCore) stack.getItem();
        stack.setItemDamage(1 + (tool.getMaxCharge(stack) - charge) * (stack.getMaxDamage() - 1) / tool.getMaxCharge(stack));
        tags.setInteger("charge", charge);
        if (entity instanceof EntityPlayer)
            chargeFromArmor(stack, (EntityPlayer) entity);
        return true;
    }

    static void chargeFromArmor (ItemStack stack, EntityPlayer player)
    {
        boolean inContainer = false;

        for (int armorIter = 0; armorIter < 4; ++armorIter)
        {
            ItemStack armor = player.inventory.armorInventory[armorIter];

            if (armor != null && armor.getItem() instanceof IElectricItem)
            {
                IElectricItem electricArmor = (IElectricItem) armor.getItem();
                ToolCore tool = (ToolCore) stack.getItem();

                if (electricArmor.canProvideEnergy(stack) && electricArmor.getTier(stack) >= ((IElectricItem) stack.getItem()).getTier(stack))
                {
                    int chargeAmount = tool.charge(stack, Integer.MAX_VALUE, Integer.MAX_VALUE, true, true);
                    chargeAmount = discharge(armor, chargeAmount, Integer.MAX_VALUE, true, false);

                    if (chargeAmount > 0)
                    {
                        tool.charge(stack, chargeAmount, Integer.MAX_VALUE, true, false);
                        inContainer = true;
                    }
                }
            }
        }

        if (inContainer)
        {
            player.openContainer.detectAndSendChanges();
        }
    }

    public static int discharge (ItemStack stack, int amount, int tier, boolean ignoreTransferLimit, boolean simulate)
    {
        IElectricItem ielectricitem = (IElectricItem) stack.getItem();

        if (ielectricitem instanceof ICustomElectricItem)
        {
            return ((ICustomElectricItem) ielectricitem).discharge(stack, amount, tier, ignoreTransferLimit, simulate);
        }
        else if (amount >= 0 && stack.stackSize <= 1 && ielectricitem.getTier(stack) <= tier)
        {
            if (amount > ielectricitem.getTransferLimit(stack) && !ignoreTransferLimit)
            {
                amount = ielectricitem.getTransferLimit(stack);
            }

            NBTTagCompound tags = stack.getTagCompound();
            int charge = tags.getInteger("charge");

            if (amount > charge)
            {
                amount = charge;
            }

            charge -= amount;

            if (!simulate)
            {
                tags.setInteger("charge", charge);
                stack.itemID = charge > 0 ? ielectricitem.getChargedItemId(stack) : ielectricitem.getEmptyItemId(stack);

                if (stack.getItem() instanceof IElectricItem)
                {
                    ielectricitem = (IElectricItem) stack.getItem();

                    if (stack.getMaxDamage() > 2)
                    {
                        stack.setItemDamage(1 + (ielectricitem.getMaxCharge(stack) - charge) * (stack.getMaxDamage() - 2) / ielectricitem.getMaxCharge(stack));
                    }
                    else
                    {
                        stack.setItemDamage(0);
                    }
                }
                else
                {
                    stack.setItemDamage(0);
                }
            }

            return amount;
        }
        else
        {
            return 0;
        }

    }

    public static void breakTool (ItemStack stack, NBTTagCompound tags, Entity player)
    {
        tags.getCompoundTag("InfiTool").setBoolean("Broken", true);
        player.worldObj.playSound(player.posX, player.posY, player.posZ, "random.break", 1f, 1f, true);
    }

    public static void repairTool (ItemStack stack, NBTTagCompound tags)
    {
        tags.getCompoundTag("InfiTool").setBoolean("Broken", false);
        tags.getCompoundTag("InfiTool").setInteger("Damage", 0);
    }

    public static DamageSource causePiercingDamage (EntityLiving mob)
    {
        return new PiercingEntityDamage("mob", mob);
    }

    public static DamageSource causePlayerPiercingDamage (EntityPlayer player)
    {
        return new PiercingEntityDamage("player", player);
    }

    public static void knockbackEntity (EntityLiving living, double boost)
    {
        living.motionX *= boost;
        //living.motionY *= boost/2;
        living.motionZ *= boost;
    }

    public static boolean hoeGround (ItemStack stack, EntityPlayer player, World world, int x, int y, int z, int side, Random random)
    {
        if (!player.canPlayerEdit(x, y, z, side, stack))
        {
            return false;
        }
        else
        {
            UseHoeEvent event = new UseHoeEvent(player, stack, world, x, y, z);
            if (MinecraftForge.EVENT_BUS.post(event))
            {
                return false;
            }

            if (event.getResult() == Result.ALLOW)
            {
                onBlockChanged(stack, world, 0, x, y, z, player, random);
                return true;
            }

            int bID = world.getBlockId(x, y, z);
            int bIDabove = world.getBlockId(x, y + 1, z);

            if ((side == 0 || bIDabove != 0 || bID != Block.grass.blockID) && bID != Block.dirt.blockID)
            {
                return false;
            }
            else
            {
                Block block = Block.tilledField;
                world.playSoundEffect((double) ((float) x + 0.5F), (double) ((float) y + 0.5F), (double) ((float) z + 0.5F), block.stepSound.getStepSound(),
                        (block.stepSound.getVolume() + 1.0F) / 2.0F, block.stepSound.getPitch() * 0.8F);

                if (world.isRemote)
                {
                    return true;
                }
                else
                {
                    world.setBlock(x, y, z, block.blockID);
                    onBlockChanged(stack, world, 0, x, y, z, player, random);
                    return true;
                }
            }
        }
    }

    public static void spawnItemAtPlayer (EntityPlayer player, ItemStack stack)
    {
        if (!player.worldObj.isRemote)
        {
            EntityItem entityitem = new EntityItem(player.worldObj, player.posX + 0.5D, player.posY + 0.5D, player.posZ + 0.5D, stack);
            player.worldObj.spawnEntityInWorld(entityitem);
            entityitem.onCollideWithPlayer(player);
        }
    }

    /* Ranged weapons */

    public static void forceAddToInv (EntityPlayer entityplayer, ItemStack itemstack, int i, boolean flag)
    {
        ItemStack itemstack1 = entityplayer.inventory.getStackInSlot(i);
        entityplayer.inventory.setInventorySlotContents(i, itemstack);
        if (itemstack1 != null)
        {
            addToInv(entityplayer, itemstack1, flag);
        }
    }

    public static boolean addToInv (EntityPlayer entityplayer, ItemStack itemstack, boolean flag)
    {
        return addToInv(entityplayer, itemstack, entityplayer.inventory.currentItem, flag);
    }

    public static boolean addToInv (EntityPlayer entityplayer, ItemStack itemstack, int i, boolean flag)
    {
        ItemStack itemstack1 = entityplayer.inventory.getStackInSlot(i);
        boolean flag1;
        if (itemstack1 == null)
        {
            entityplayer.inventory.setInventorySlotContents(i, itemstack);
            flag1 = true;
        }
        else
        {
            flag1 = entityplayer.inventory.addItemStackToInventory(itemstack);
        }
        if (flag && !flag1)
        {
            addItemStackToWorld(entityplayer.worldObj, (float) Math.floor(entityplayer.posX), (float) Math.floor(entityplayer.posY), (float) Math.floor(entityplayer.posZ), itemstack);
            return true;
        }
        else
        {
            return flag1;
        }
    }

    public static EntityItem addItemStackToWorld (World world, float f, float f1, float f2, ItemStack itemstack)
    {
        return addItemStackToWorld(world, f, f1, f2, itemstack, false);
    }

    public static EntityItem addItemStackToWorld (World world, float f, float f1, float f2, ItemStack itemstack, boolean flag)
    {
        EntityItem entityitem;
        if (flag)
        {
            entityitem = new EntityItem(world, f, f1, f2, itemstack);
        }
        else
        {
            float f3 = 0.7F;
            float f4 = random.nextFloat() * f3 + (1.0F - f3) * 0.5F;
            float f5 = 1.2F;
            float f6 = random.nextFloat() * f3 + (1.0F - f3) * 0.5F;
            entityitem = new EntityItem(world, f + f4, f1 + f5, f2 + f6, itemstack);
        }
        entityitem.delayBeforeCanPickup = 10;
        world.spawnEntityInWorld(entityitem);
        return entityitem;
    }
}