/*
 * This file is part of Applied Energistics 2.
 * Copyright (c) 2013 - 2014, AlgorithmX2, All rights reserved.
 *
 * Applied Energistics 2 is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Lesser General Public License as published by
 * the Free Software Foundation, either version 3 of the License, or
 * (at your option) any later version.
 *
 * Applied Energistics 2 is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public License
 * along with Applied Energistics 2.  If not, see <http://www.gnu.org/licenses/lgpl>.
 */

package appeng.tile.spatial;


import javax.annotation.Nonnull;

import net.minecraft.item.ItemStack;
import net.minecraft.nbt.NBTTagCompound;
import net.minecraft.util.EnumFacing;
import net.minecraft.world.World;
import net.minecraftforge.items.IItemHandler;

import appeng.api.config.Actionable;
import appeng.api.config.PowerMultiplier;
import appeng.api.config.YesNo;
import appeng.api.implementations.TransitionResult;
import appeng.api.implementations.items.ISpatialStorageCell;
import appeng.api.networking.GridFlags;
import appeng.api.networking.IGrid;
import appeng.api.networking.energy.IEnergyGrid;
import appeng.api.networking.events.MENetworkEvent;
import appeng.api.networking.events.MENetworkSpatialEvent;
import appeng.api.networking.spatial.ISpatialCache;
import appeng.api.util.AECableType;
import appeng.api.util.AEPartLocation;
import appeng.api.util.DimensionalCoord;
import appeng.hooks.TickHandler;
import appeng.me.cache.SpatialPylonCache;
import appeng.tile.grid.AENetworkInvTile;
import appeng.tile.inventory.AppEngInternalInventory;
import appeng.util.IWorldCallable;
import appeng.util.Platform;
import appeng.util.inv.InvOperation;
import appeng.util.inv.WrapperFilteredItemHandler;
import appeng.util.inv.filter.IAEItemFilter;


public class TileSpatialIOPort extends AENetworkInvTile implements IWorldCallable<Void>
{

	private final AppEngInternalInventory inv = new AppEngInternalInventory( this, 2 );
	private final IItemHandler invExt = new WrapperFilteredItemHandler( this.inv, new SpatialIOFilter() );
	private YesNo lastRedstoneState = YesNo.UNDECIDED;

	public TileSpatialIOPort()
	{
		this.getProxy().setFlags( GridFlags.REQUIRE_CHANNEL );
	}

	@Override
	public NBTTagCompound writeToNBT( final NBTTagCompound data )
	{
		super.writeToNBT( data );
		data.setInteger( "lastRedstoneState", this.lastRedstoneState.ordinal() );
		return data;
	}

	@Override
	public void readFromNBT( final NBTTagCompound data )
	{
		super.readFromNBT( data );
		if( data.hasKey( "lastRedstoneState" ) )
		{
			this.lastRedstoneState = YesNo.values()[data.getInteger( "lastRedstoneState" )];
		}
	}

	public boolean getRedstoneState()
	{
		if( this.lastRedstoneState == YesNo.UNDECIDED )
		{
			this.updateRedstoneState();
		}

		return this.lastRedstoneState == YesNo.YES;
	}

	public void updateRedstoneState()
	{
		final YesNo currentState = this.world.isBlockIndirectlyGettingPowered( this.pos ) != 0 ? YesNo.YES : YesNo.NO;
		if( this.lastRedstoneState != currentState )
		{
			this.lastRedstoneState = currentState;
			if( this.lastRedstoneState == YesNo.YES )
			{
				this.triggerTransition();
			}
		}
	}

	private void triggerTransition()
	{
		if( Platform.isServer() )
		{
			final ItemStack cell = this.inv.getStackInSlot( 0 );
			if( this.isSpatialCell( cell ) )
			{
				TickHandler.INSTANCE.addCallable( null, this );// this needs to be cross world synced.
			}
		}
	}

	private boolean isSpatialCell( final ItemStack cell )
	{
		if( !cell.isEmpty() && cell.getItem() instanceof ISpatialStorageCell )
		{
			final ISpatialStorageCell sc = (ISpatialStorageCell) cell.getItem();
			return sc != null && sc.isSpatialStorage( cell );
		}
		return false;
	}

	@Override
	public Void call( final World world ) throws Exception
	{
		final ItemStack cell = this.inv.getStackInSlot( 0 );
		if( this.isSpatialCell( cell ) && this.inv.getStackInSlot( 1 ).isEmpty() )
		{
			final IGrid gi = this.getProxy().getGrid();
			final IEnergyGrid energy = this.getProxy().getEnergy();

			final ISpatialStorageCell sc = (ISpatialStorageCell) cell.getItem();

			final SpatialPylonCache spc = gi.getCache( ISpatialCache.class );
			if( spc.hasRegion() && spc.isValidRegion() )
			{
				final double req = spc.requiredPower();
				final double pr = energy.extractAEPower( req, Actionable.SIMULATE, PowerMultiplier.CONFIG );
				if( Math.abs( pr - req ) < req * 0.001 )
				{
					final MENetworkEvent res = gi.postEvent( new MENetworkSpatialEvent( this, req ) );
					if( !res.isCanceled() )
					{
						int playerId = -1;
						if( this.getProxy().getSecurity().isAvailable() )
						{
							playerId = this.getProxy().getSecurity().getOwner();
						}

						final TransitionResult tr = sc.doSpatialTransition( cell, this.world, spc.getMin(), spc.getMax(), playerId );
						if( tr.success )
						{
							energy.extractAEPower( req, Actionable.MODULATE, PowerMultiplier.CONFIG );
							this.inv.setStackInSlot( 0, ItemStack.EMPTY );
							this.inv.setStackInSlot( 1, cell );
						}
					}
				}
			}
		}

		return null;
	}

	@Override
	public AECableType getCableConnectionType( final AEPartLocation dir )
	{
		return AECableType.SMART;
	}

	@Override
	public DimensionalCoord getLocation()
	{
		return new DimensionalCoord( this );
	}

	@Override
	protected @Nonnull IItemHandler getItemHandlerForSide( @Nonnull EnumFacing side )
	{
		return this.invExt;
	}

	@Override
	public IItemHandler getInternalInventory()
	{
		return this.inv;
	}

	@Override
	public void onChangeInventory( final IItemHandler inv, final int slot, final InvOperation mc, final ItemStack removed, final ItemStack added )
	{

	}

	private class SpatialIOFilter implements IAEItemFilter
	{
		@Override
		public boolean allowExtract( IItemHandler inv, int slot, int amount )
		{
			return slot == 1;
		}

		@Override
		public boolean allowInsert( IItemHandler inv, int slot, ItemStack stack )
		{
			return( slot == 0 && TileSpatialIOPort.this.isSpatialCell( stack ) );
		}

	}
}