/*
 *  Copyright 2010 BetaSteward_at_googlemail.com. All rights reserved.
 *
 *  Redistribution and use in source and binary forms, with or without modification, are
 *  permitted provided that the following conditions are met:
 *
 *     1. Redistributions of source code must retain the above copyright notice, this list of
 *        conditions and the following disclaimer.
 *
 *     2. Redistributions in binary form must reproduce the above copyright notice, this list
 *        of conditions and the following disclaimer in the documentation and/or other materials
 *        provided with the distribution.
 *
 *  THIS SOFTWARE IS PROVIDED BY BetaSteward_at_googlemail.com ``AS IS'' AND ANY EXPRESS OR IMPLIED
 *  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
 *  FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL BetaSteward_at_googlemail.com OR
 *  CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 *  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
 *  SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
 *  ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
 *  NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 *  ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 *  The views and conclusions contained in the software and documentation are those of the
 *  authors and should not be interpreted as representing official policies, either expressed
 *  or implied, of BetaSteward_at_googlemail.com.
 */
package mage.sets.scarsofmirrodin;

import mage.Constants;
import mage.Constants.CardType;
import mage.Constants.Rarity;
import mage.ObjectColor;
import mage.abilities.Ability;
import mage.abilities.TriggeredAbilityImpl;
import mage.abilities.common.SimpleStaticAbility;
import mage.abilities.costs.Cost;
import mage.abilities.costs.mana.GenericManaCost;
import mage.abilities.effects.OneShotEffect;
import mage.abilities.effects.common.continious.BoostEquippedEffect;
import mage.abilities.effects.common.continious.GainAbilityAttachedEffect;
import mage.abilities.effects.common.continious.SetCardColorAttachedEffect;
import mage.abilities.effects.common.continious.SetCardSubtypeAttachedEffect;
import mage.abilities.keyword.EquipAbility;
import mage.abilities.keyword.IntimidateAbility;
import mage.cards.Card;
import mage.cards.CardImpl;
import mage.game.Game;
import mage.game.events.GameEvent;
import mage.game.events.ZoneChangeEvent;
import mage.game.permanent.Permanent;
import mage.game.permanent.PermanentToken;
import mage.players.Player;
import mage.target.targetpointer.FixedTarget;

import java.util.UUID;

/**
 *
 * @author nantuko
 */
public class NimDeathmantle extends CardImpl<NimDeathmantle> {

    public NimDeathmantle(UUID ownerId) {
        super(ownerId, 188, "Nim Deathmantle", Rarity.RARE, new CardType[]{CardType.ARTIFACT}, "{2}");
        this.expansionSetCode = "SOM";
        this.subtype.add("Equipment");

		this.addAbility(new EquipAbility(Constants.Outcome.AddAbility, new GenericManaCost(4)));

        // Equipped creature gets +2/+2, has intimidate, and is a black Zombie.
		this.addAbility(new SimpleStaticAbility(Constants.Zone.BATTLEFIELD, new BoostEquippedEffect(2, 2)));
		this.addAbility(new SimpleStaticAbility(Constants.Zone.BATTLEFIELD, new GainAbilityAttachedEffect(IntimidateAbility.getInstance(), Constants.AttachmentType.EQUIPMENT)));
		this.addAbility(new SimpleStaticAbility(Constants.Zone.BATTLEFIELD, new SetCardColorAttachedEffect(ObjectColor.BLACK, Constants.Duration.WhileOnBattlefield, Constants.AttachmentType.EQUIPMENT)));
		this.addAbility(new SimpleStaticAbility(Constants.Zone.BATTLEFIELD, new SetCardSubtypeAttachedEffect("Zombie", Constants.Duration.WhileOnBattlefield, Constants.AttachmentType.EQUIPMENT)));

        // Whenever a nontoken creature is put into your graveyard from the battlefield, you may pay {4}. If you do, return that card to the battlefield and attach Nim Deathmantle to it.
		this.addAbility(new NimDeathmantleTriggeredAbility());
    }

    public NimDeathmantle(final NimDeathmantle card) {
        super(card);
    }

    @Override
    public NimDeathmantle copy() {
        return new NimDeathmantle(this);
    }
}

class NimDeathmantleTriggeredAbility extends TriggeredAbilityImpl<NimDeathmantleTriggeredAbility> {

	NimDeathmantleTriggeredAbility() {
		super(Constants.Zone.BATTLEFIELD, new NimDeathmantleEffect(), true);
	}

	NimDeathmantleTriggeredAbility(NimDeathmantleTriggeredAbility ability) {
		super(ability);
	}

	@Override
	public NimDeathmantleTriggeredAbility copy() {
		return new NimDeathmantleTriggeredAbility(this);
	}

	@Override
	public boolean checkTrigger(GameEvent event, Game game) {
		if (event.getType() == GameEvent.EventType.ZONE_CHANGE) {

			// make sure card is on battlefield
			UUID sourceId = getSourceId();
			if (game.getPermanent(sourceId) == null) {
				// or it is being removed
				if (game.getLastKnownInformation(sourceId, Constants.Zone.BATTLEFIELD) == null) {
					return false;
				}
			}

			ZoneChangeEvent zEvent = (ZoneChangeEvent) event;
			Permanent permanent = zEvent.getTarget();

			if (permanent != null &&
					zEvent.getToZone() == Constants.Zone.GRAVEYARD &&
					zEvent.getFromZone() == Constants.Zone.BATTLEFIELD &&
					!(permanent instanceof PermanentToken) &&
					permanent.getCardType().contains(CardType.CREATURE)) {

				getEffects().get(0).setTargetPointer(new FixedTarget(permanent.getId()));
				return true;
			}
		}
		return false;
	}

	@Override
	public String getRule() {
		return "Whenever a nontoken creature is put into your graveyard from the battlefield, you may pay {4}. If you do, return that card to the battlefield and attach Nim Deathmantle to it.";
	}
}

class NimDeathmantleEffect extends OneShotEffect<NimDeathmantleEffect> {

	private final Cost cost = new GenericManaCost(4);

	public NimDeathmantleEffect() {
		super(Constants.Outcome.Benefit);

	}

	public NimDeathmantleEffect(NimDeathmantleEffect effect) {
		super(effect);
	}

	@Override
	public boolean apply(Game game, Ability source) {
		Player player = game.getPlayer(source.getControllerId());
		Permanent equipment = game.getPermanent(source.getSourceId());
		if (player != null && equipment != null) {
			if (player.chooseUse(Constants.Outcome.Benefit, equipment.getName() + " - Pay " + cost.getText() + "?", game)) {
				cost.clearPaid();
				if (cost.pay(source, game, source.getId(), source.getControllerId(), false)) {
					UUID target = targetPointer.getFirst(source);
					if (target != null && equipment != null) {
						Card card = game.getCard(target);
						// check if it's still in graveyard
						if (card != null && game.getZone(card.getId()).equals(Constants.Zone.GRAVEYARD)) {
							Player owner = game.getPlayer(card.getOwnerId());
							if (card.putOntoBattlefield(game, Constants.Zone.GRAVEYARD, source.getId(), source.getControllerId())) {
								owner.getGraveyard().remove(card);
								Permanent permanent = game.getPermanent(card.getId());
								if (permanent != null) {
									permanent.addAttachment(equipment.getId(), game);
									return true;
								}
							}
						}
					}
				}
			}
		}

		return false;
	}

	@Override
	public NimDeathmantleEffect copy() {
		return new NimDeathmantleEffect(this);
	}

}
