package gregtech.common.blocks;

import gregtech.api.GregTech_API;
import gregtech.api.enums.GT_Values;
import gregtech.api.enums.Materials;
import gregtech.api.enums.OrePrefixes;
import gregtech.api.enums.Textures;
import gregtech.api.enums.Textures.BlockIcons;
import gregtech.api.interfaces.ITexture;
import gregtech.api.interfaces.tileentity.ITexturedTileEntity;
import gregtech.api.net.IGT_NetworkHandler;
import gregtech.api.objects.GT_CopiedBlockTexture;
import gregtech.api.objects.GT_RenderedTexture;
import gregtech.api.util.GT_OreDictUnificator;
import gregtech.api.util.GT_Utility;

import java.util.ArrayList;
import java.util.Random;

import net.minecraft.block.Block;
import net.minecraft.init.Blocks;
import net.minecraft.item.ItemStack;
import net.minecraft.nbt.NBTTagCompound;
import net.minecraft.network.Packet;
import net.minecraft.tileentity.TileEntity;
import net.minecraft.world.World;

public class GT_TileEntity_Ores
  extends TileEntity
  implements ITexturedTileEntity
{
  private static final ITexture[] mStoneTextures = { new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.netherrack, 0, 0), new GT_CopiedBlockTexture(Blocks.end_stone, 0, 0), new GT_RenderedTexture(Textures.BlockIcons.GRANITE_BLACK_STONE), new GT_RenderedTexture(Textures.BlockIcons.GRANITE_RED_STONE), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0), new GT_CopiedBlockTexture(Blocks.stone, 0, 0) };
  public short mMetaData = 0;
  public boolean mNatural = false;
  public boolean mBlocked = true;
  
  public void readFromNBT(NBTTagCompound aNBT)
  {
    super.readFromNBT(aNBT);
    this.mMetaData = aNBT.getShort("m");
    this.mNatural = aNBT.getBoolean("n");
  }
  
  public void writeToNBT(NBTTagCompound aNBT)
  {
    super.writeToNBT(aNBT);
    aNBT.setShort("m", this.mMetaData);
    aNBT.setBoolean("n", this.mNatural);
  }
  
  public void onUpdated()
  {
    if ((!this.worldObj.isRemote) && (this.mBlocked))
    {
      this.mBlocked = false;
      GT_Values.NW.sendPacketToAllPlayersInRange(this.worldObj, new GT_Packet_Ores(this.xCoord, (short)this.yCoord, this.zCoord, this.mMetaData), this.xCoord, this.zCoord);
    }
  }
  
  public Packet getDescriptionPacket()
  {
    if (!this.worldObj.isRemote) {
    	if ((this.mBlocked == (GT_Utility.isOpaqueBlock(this.worldObj, this.xCoord + 1, this.yCoord, this.zCoord)) && (GT_Utility.isOpaqueBlock(this.worldObj, this.xCoord - 1, this.yCoord, this.zCoord)) && (GT_Utility.isOpaqueBlock(this.worldObj, this.xCoord, this.yCoord + 1, this.zCoord)) && (GT_Utility.isOpaqueBlock(this.worldObj, this.xCoord, this.yCoord - 1, this.zCoord)) && (GT_Utility.isOpaqueBlock(this.worldObj, this.xCoord, this.yCoord, this.zCoord + 1)) && (GT_Utility.isOpaqueBlock(this.worldObj, this.xCoord, this.yCoord, this.zCoord - 1)) ? 1 : 0) == 0) {
        GT_Values.NW.sendPacketToAllPlayersInRange(this.worldObj, new GT_Packet_Ores(this.xCoord, (short)this.yCoord, this.zCoord, this.mMetaData), this.xCoord, this.zCoord);
      }
    }
    return null;
  }
  
  public static byte getHarvestData(short aMetaData)
  {
    Materials aMaterial = GregTech_API.sGeneratedMaterials[(aMetaData % 1000)];
    return aMaterial == null ? 0 : (byte)Math.max((aMetaData % 16000 / 1000 == 3) || (aMetaData % 16000 / 1000 == 4) ? 3 : 0, Math.min(7, aMaterial.mToolQuality - (aMetaData < 16000 ? 0 : 1)));
  }
  
  public void overrideOreBlockMaterial(Block aOverridingStoneBlock, byte aOverridingStoneMeta)
  {
    this.mMetaData = ((short)(int)(this.mMetaData % 1000L + this.mMetaData / 16000L * 16000L));
    if (aOverridingStoneBlock.isReplaceableOreGen(this.worldObj, this.xCoord, this.yCoord, this.zCoord, Blocks.netherrack)) {
      this.mMetaData = ((short)(this.mMetaData + 1000));
    } else if (aOverridingStoneBlock.isReplaceableOreGen(this.worldObj, this.xCoord, this.yCoord, this.zCoord, Blocks.end_stone)) {
      this.mMetaData = ((short)(this.mMetaData + 2000));
    } else if (aOverridingStoneBlock.isReplaceableOreGen(this.worldObj, this.xCoord, this.yCoord, this.zCoord, GregTech_API.sBlockGranites)) {
      if (aOverridingStoneBlock == GregTech_API.sBlockGranites)
      {
        if (aOverridingStoneMeta < 8) {
          this.mMetaData = ((short)(this.mMetaData + 3000));
        } else {
          this.mMetaData = ((short)(this.mMetaData + 4000));
        }
      }
      else {
        this.mMetaData = ((short)(this.mMetaData + 3000));
      }
    }
    this.worldObj.setBlockMetadataWithNotify(this.xCoord, this.yCoord, this.zCoord, getHarvestData(this.mMetaData), 0);
  }
  
  public static boolean setOreBlock(World aWorld, int aX, int aY, int aZ, int aMetaData)
  {return setOreBlock(aWorld, aX, aY, aZ, aMetaData, false);
  }
  
  public static boolean setOreBlock(World aWorld, int aX, int aY, int aZ, int aMetaData, boolean air)
  {
	  if (!air) {
			aY = Math.min(aWorld.getActualHeight(), Math.max(aY, 1));
		}
    Block tBlock = aWorld.getBlock(aX, aY, aZ);
    if ((aMetaData > 0) && ((tBlock != Blocks.air)|| air))
    {
      if (tBlock.isReplaceableOreGen(aWorld, aX, aY, aZ, Blocks.netherrack)) {
        aMetaData += 1000;
      } else if (tBlock.isReplaceableOreGen(aWorld, aX, aY, aZ, Blocks.end_stone)) {
        aMetaData += 2000;
      } else if (tBlock.isReplaceableOreGen(aWorld, aX, aY, aZ, GregTech_API.sBlockGranites))
      {
        if (tBlock == GregTech_API.sBlockGranites)
        {
          if (aWorld.getBlockMetadata(aX, aY, aZ) < 8) {
            aMetaData += 3000;
          } else {
            aMetaData += 4000;
          }
        }
        else {
          aMetaData += 3000;
        }
      }
      else if (!tBlock.isReplaceableOreGen(aWorld, aX, aY, aZ, Blocks.stone)) {
        return false;
      }
      aWorld.setBlock(aX, aY, aZ, GregTech_API.sBlockOres1, getHarvestData((short)aMetaData), 0);
      TileEntity tTileEntity = aWorld.getTileEntity(aX, aY, aZ);
      if ((tTileEntity instanceof GT_TileEntity_Ores))
      {
        ((GT_TileEntity_Ores)tTileEntity).mMetaData = ((short)aMetaData);
        ((GT_TileEntity_Ores)tTileEntity).mNatural = true;
      }
      return true;
    }
    return false;
  }
  
  public short getMetaData()
  {
    return this.mMetaData;
  }
  
  public boolean canUpdate()
  {
    return false;
  }
  
  public ArrayList<ItemStack> getDrops(int aFortune)
  {
    ArrayList<ItemStack> rList = new ArrayList();
    if (this.mMetaData <= 0)
    {
      rList.add(new ItemStack(Blocks.cobblestone, 1, 0));
      return rList;
    }
    if (this.mMetaData < 16000)
    {
      rList.add(new ItemStack(GregTech_API.sBlockOres1, 1, this.mMetaData));
      return rList;
    }
    Materials aMaterial = GregTech_API.sGeneratedMaterials[(this.mMetaData % 1000)];
    if (!this.mNatural) {
      aFortune = 0;
    }
    if (aMaterial != null)
    {
      Random tRandom = new Random(this.xCoord ^ this.yCoord ^ this.zCoord);
      ArrayList<ItemStack> tSelector = new ArrayList();
      

      ItemStack tStack = GT_OreDictUnificator.get(OrePrefixes.gemExquisite, aMaterial, GT_OreDictUnificator.get(OrePrefixes.gem, aMaterial, 1L), 1L);
      if (tStack != null) {
        for (int i = 0; i < 1; i++) {
          tSelector.add(tStack);
        }
      }
      tStack = GT_OreDictUnificator.get(OrePrefixes.gemFlawless, aMaterial, GT_OreDictUnificator.get(OrePrefixes.gem, aMaterial, 1L), 1L);
      if (tStack != null) {
        for (int i = 0; i < 2; i++) {
          tSelector.add(tStack);
        }
      }
      tStack = GT_OreDictUnificator.get(OrePrefixes.gem, aMaterial, 1L);
      if (tStack != null) {
        for (int i = 0; i < 12; i++) {
          tSelector.add(tStack);
        }
      }
      tStack = GT_OreDictUnificator.get(OrePrefixes.gemFlawed, aMaterial, GT_OreDictUnificator.get(OrePrefixes.crushed, aMaterial, 1L), 1L);
      if (tStack != null) {
        for (int i = 0; i < 5; i++) {
          tSelector.add(tStack);
        }
      }
      tStack = GT_OreDictUnificator.get(OrePrefixes.crushed, aMaterial, 1L);
      if (tStack != null) {
        for (int i = 0; i < 10; i++) {
          tSelector.add(tStack);
        }
      }
      tStack = GT_OreDictUnificator.get(OrePrefixes.gemChipped, aMaterial, GT_OreDictUnificator.get(OrePrefixes.dustImpure, aMaterial, 1L), 1L);
      if (tStack != null) {
        for (int i = 0; i < 5; i++) {
          tSelector.add(tStack);
        }
      }
      tStack = GT_OreDictUnificator.get(OrePrefixes.dustImpure, aMaterial, 1L);
      if (tStack != null) {
        for (int i = 0; i < 10; i++) {
          tSelector.add(tStack);
        }
      }
      if (tSelector.size() > 0)
      {
        int i = 0;
        for (int j = Math.max(1, aMaterial.mOreMultiplier + (aFortune > 0 ? tRandom.nextInt(1 + aFortune * aMaterial.mOreMultiplier) : 0) / 2); i < j; i++) {
          rList.add(GT_Utility.copyAmount(1L, new Object[] { tSelector.get(tRandom.nextInt(tSelector.size())) }));
        }
      }
      if (tRandom.nextInt(3 + aFortune) > 1) {
        switch (this.mMetaData / 1000 % 16)
        {
        case 0: 
          rList.add(GT_OreDictUnificator.get(tRandom.nextInt(3) > 0 ? OrePrefixes.dustImpure : OrePrefixes.dust, Materials.Stone, 1L)); break;
        case 1: 
          rList.add(GT_OreDictUnificator.get(tRandom.nextInt(3) > 0 ? OrePrefixes.dustImpure : OrePrefixes.dust, Materials.Netherrack, 1L)); break;
        case 2: 
          rList.add(GT_OreDictUnificator.get(tRandom.nextInt(3) > 0 ? OrePrefixes.dustImpure : OrePrefixes.dust, Materials.Endstone, 1L)); break;
        case 3: 
          rList.add(GT_OreDictUnificator.get(tRandom.nextInt(3) > 0 ? OrePrefixes.dustImpure : OrePrefixes.dust, Materials.GraniteBlack, 1L)); break;
        case 4: 
          rList.add(GT_OreDictUnificator.get(tRandom.nextInt(3) > 0 ? OrePrefixes.dustImpure : OrePrefixes.dust, Materials.GraniteRed, 1L));
        }
      }
    }
    return rList;
  }
  
  public ITexture[] getTexture(byte aSide)
  {
    Materials aMaterial = GregTech_API.sGeneratedMaterials[(this.mMetaData % 1000)];
    if ((aMaterial != null) && (this.mMetaData < 32000)) {
      return new ITexture[] { mStoneTextures[(this.mMetaData / 1000 % 16)], new GT_RenderedTexture(aMaterial.mIconSet.mTextures[this.mMetaData/16000 ==0 ? OrePrefixes.ore.mTextureIndex:OrePrefixes.oreSmall.mTextureIndex], aMaterial.mRGBa) };
    }
    return new ITexture[] { mStoneTextures[0], new GT_RenderedTexture(gregtech.api.enums.TextureSet.SET_NONE.mTextures[OrePrefixes.ore.mTextureIndex]) };
  }
}