package com.planet_ink.coffee_mud.Commands;
import com.planet_ink.coffee_mud.core.interfaces.*;
import com.planet_ink.coffee_mud.core.*;
import com.planet_ink.coffee_mud.core.CMSecurity.SecFlag;
import com.planet_ink.coffee_mud.core.collections.*;
import com.planet_ink.coffee_mud.Abilities.interfaces.*;
import com.planet_ink.coffee_mud.Areas.interfaces.*;
import com.planet_ink.coffee_mud.Behaviors.interfaces.*;
import com.planet_ink.coffee_mud.CharClasses.interfaces.*;
import com.planet_ink.coffee_mud.Commands.interfaces.*;
import com.planet_ink.coffee_mud.Common.interfaces.*;
import com.planet_ink.coffee_mud.Exits.interfaces.*;
import com.planet_ink.coffee_mud.Items.interfaces.*;
import com.planet_ink.coffee_mud.Libraries.interfaces.*;
import com.planet_ink.coffee_mud.Locales.interfaces.*;
import com.planet_ink.coffee_mud.MOBS.interfaces.*;
import com.planet_ink.coffee_mud.Races.interfaces.*;

import java.util.*;

/*
   Copyright 2004-2022 Bo Zimmerman

   Licensed under the Apache License, Version 2.0 (the "License");
   you may not use this file except in compliance with the License.
   You may obtain a copy of the License at

	   http://www.apache.org/licenses/LICENSE-2.0

   Unless required by applicable law or agreed to in writing, software
   distributed under the License is distributed on an "AS IS" BASIS,
   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
   See the License for the specific language governing permissions and
   limitations under the License.
*/
public class Give extends StdCommand
{
	public Give()
	{
	}

	private final String[]	access	= I(new String[] { "GIVE", "GI" });

	@Override
	public String[] getAccessWords()
	{
		return access;
	}

	private final static Class<?>[][] internalParameters=new Class<?>[][]
	{
		{
			Item.class,MOB.class,Boolean.class
		}
	};

	@Override
	public boolean execute(final MOB mob, final List<String> commands, final int metaFlags)
		throws java.io.IOException
	{
		final Vector<String> origCmds=new XVector<String>(commands);
		if(commands.size()<2)
		{
			CMLib.commands().postCommandFail(mob,origCmds,L("Give what to whom?"));
			return false;
		}
		commands.remove(0);
		if(commands.size()<2)
		{
			CMLib.commands().postCommandFail(mob,origCmds,L("To whom should I give that?"));
			return false;
		}

		final MOB recipient=mob.location().fetchInhabitant(commands.get(commands.size()-1));
		if((recipient==null)||(!CMLib.flags().canBeSeenBy(recipient,mob)))
		{
			CMLib.commands().postCommandFail(mob,origCmds,L("I don't see anyone called @x1 here.",commands.get(commands.size()-1)));
			return false;
		}
		commands.remove(commands.size()-1);
		if((commands.size()>0)&&(commands.get(commands.size()-1).equalsIgnoreCase("to")))
			commands.remove(commands.size()-1);

		final int maxToGive=CMLib.english().parseMaxToGive(mob,commands,true,mob,false);
		if(maxToGive<0)
			return false;

		String thingToGive=CMParms.combine(commands,0);
		int addendum=1;
		String addendumStr="";
		final List<Item> itemsV = new ArrayList<Item>();
		boolean allFlag = (commands.size() > 0) ? commands.get(0).equalsIgnoreCase("all") : false;
		if (thingToGive.toUpperCase().startsWith("ALL."))
		{
			allFlag = true;
			thingToGive = "ALL " + thingToGive.substring(4);
		}
		if (thingToGive.toUpperCase().endsWith(".ALL"))
		{
			allFlag = true;
			thingToGive = "ALL " + thingToGive.substring(0, thingToGive.length() - 4);
		}

		final boolean onlyGoldFlag = mob.hasOnlyGoldInInventory();
		Item giveThis=CMLib.english().parseBestPossibleGold(mob,null,thingToGive);
		if(giveThis!=null)
		{
			if((CMath.bset(metaFlags, MUDCmdProcessor.METAFLAG_ORDER)||CMath.bset(metaFlags, MUDCmdProcessor.METAFLAG_FORCED))
			&&(CMLib.law().getPropertyRecord(giveThis)!=null)
			&&(!CMSecurity.isAllowed(mob, mob.location(), CMSecurity.SecFlag.ORDER)))
			{
				mob.tell(L("Yea, you don't want to do that."));
				return false;
			}
			if(((Coins)giveThis).getNumberOfCoins()<CMLib.english().parseNumPossibleGold(mob,thingToGive))
				return false;
			if(CMLib.flags().canBeSeenBy(giveThis,mob))
				itemsV.add(giveThis);
		}
		boolean doBugFix = true;
		if(itemsV.size()==0)
		{
			while(doBugFix || ((allFlag)&&(addendum<=maxToGive)))
			{
				doBugFix=false;
				giveThis=mob.fetchItem(null,Wearable.FILTER_UNWORNONLY,thingToGive+addendumStr);
				if((giveThis==null)
				&&(itemsV.size()==0)
				&&(addendumStr.length()==0)
				&&(!allFlag))
				{
					giveThis=mob.fetchItem(null,Wearable.FILTER_WORNONLY,thingToGive);
					if(giveThis!=null)
					{
						if((!(giveThis).amWearingAt(Wearable.WORN_HELD))&&(!(giveThis).amWearingAt(Wearable.WORN_WIELD)))
						{
							CMLib.commands().postCommandFail(mob,origCmds,L("You must remove that first."));
							return false;
						}
						final CMMsg newMsg=CMClass.getMsg(mob,giveThis,null,CMMsg.MSG_REMOVE,null);
						if(mob.location().okMessage(mob,newMsg))
							mob.location().send(mob,newMsg);
						else
							return false;
					}
				}
				if((allFlag)
				&&(!onlyGoldFlag)
				&&(giveThis instanceof Coins)
				&&(thingToGive.equalsIgnoreCase("all")))
					giveThis=null;
				else
				{
					if(giveThis==null)
						break;
					if(CMLib.flags().canBeSeenBy(giveThis,mob))
					{
						if((CMath.bset(metaFlags, MUDCmdProcessor.METAFLAG_ORDER)||CMath.bset(metaFlags, MUDCmdProcessor.METAFLAG_FORCED))
						&&(CMLib.law().getPropertyRecord(giveThis)!=null)
						&&(!CMSecurity.isAllowed(mob, mob.location(), CMSecurity.SecFlag.ORDER)))
						{
							mob.tell(L("Yea, you don't want to give over @x1.",giveThis.Name()));
							giveThis=null;
						}
						else
							itemsV.add(giveThis);
					}
				}
				addendumStr="."+(++addendum);
			}
		}

		if(itemsV.size()==0)
			CMLib.commands().postCommandFail(mob,origCmds,L("You don't seem to be carrying that."));
		else
		for(int i=0;i<itemsV.size();i++)
		{
			giveThis=itemsV.get(i);
			give(mob, recipient, giveThis, false);
		}
		return false;
	}

	protected boolean give(final MOB mob, final MOB recipient, final Item giveThis, final boolean quiet)
	{
		final CMMsg newMsg=CMClass.getMsg(mob,recipient,giveThis,CMMsg.MSG_GIVE,quiet?"":L("<S-NAME> give(s) <O-NAME> to <T-NAMESELF>."));
		boolean success=false;
		if(mob.location().okMessage(mob,newMsg))
		{
			mob.location().send(mob,newMsg);
			success=true;
		}
		if(giveThis instanceof Coins)
			((Coins)giveThis).putCoinsBack();
		if(giveThis instanceof RawMaterial)
			((RawMaterial)giveThis).rebundle();
		return success;
	}

	@Override
	public double combatActionsCost(final MOB mob, final List<String> cmds)
	{
		return CMProps.getCommandCombatActionCost(ID());
	}

	@Override
	public double actionsCost(final MOB mob, final List<String> cmds)
	{
		return CMProps.getCommandActionCost(ID());
	}

	@Override
	public boolean canBeOrdered()
	{
		return true;
	}

	@Override
	public Object executeInternal(final MOB mob, final int metaFlags, final Object... args) throws java.io.IOException
	{
		if(!super.checkArguments(internalParameters, args))
			return Boolean.FALSE;
		if(args[0] instanceof Item)
		{
			final Item I=(Item)args[0];
			final MOB targetMOB=(MOB)args[1];
			final boolean quiet = ((Boolean)args[2]).booleanValue();
			give(mob,targetMOB,I,quiet);
		}
		return Boolean.FALSE;
	}
}
