package mage.abilities.common;

import mage.abilities.Ability;
import mage.abilities.Mode;
import mage.abilities.TriggeredAbility;
import mage.abilities.TriggeredAbilityImpl;
import mage.abilities.effects.Effect;
import mage.abilities.effects.Effects;
import mage.abilities.effects.OneShotEffect;
import mage.cards.Card;
import mage.constants.Outcome;
import mage.constants.SagaChapter;
import mage.constants.Zone;
import mage.counters.CounterType;
import mage.game.Game;
import mage.game.events.GameEvent;
import mage.game.permanent.Permanent;
import mage.game.stack.StackAbility;
import mage.game.stack.StackObject;
import mage.players.Player;
import mage.target.Target;
import mage.target.Targets;
import mage.util.CardUtil;

import java.util.Arrays;

/**
 * @author LevelX2
 */
public class SagaAbility extends SimpleStaticAbility {

    private final SagaChapter maxChapter;
    private final boolean showSacText;
    private final boolean readAhead;

    public SagaAbility(Card card) {
        this(card, SagaChapter.CHAPTER_III);
    }

    public SagaAbility(Card card, boolean showSacText) {
        this(card, showSacText, SagaChapter.CHAPTER_III);
    }

    public SagaAbility(Card card, SagaChapter maxChapter) {
        this(card, card.getSecondCardFace() == null, maxChapter);
    }

    public SagaAbility(Card card, boolean showSacText, SagaChapter maxChapter) {
        this(card, maxChapter, false, showSacText);
    }

    public SagaAbility(Card card, SagaChapter maxChapter, boolean readAhead) {
        this(card, maxChapter, readAhead, card.getSecondCardFace() == null);
    }

    public SagaAbility(Card card, SagaChapter maxChapter, boolean readAhead, boolean showSacText) {
        super(Zone.ALL, null);
        this.maxChapter = maxChapter;
        this.showSacText = showSacText;
        this.readAhead = readAhead;
        this.setRuleVisible(true);
        this.setRuleAtTheTop(true);
        Ability ability = new EntersBattlefieldAbility(new SagaLoreCountersEffect(readAhead, maxChapter));
        ability.setRuleVisible(false);
        card.addAbility(ability);
    }

    public SagaAbility(final SagaAbility ability) {
        super(ability);
        this.maxChapter = ability.maxChapter;
        this.showSacText = ability.showSacText;
        this.readAhead = ability.readAhead;
    }

    public void addChapterEffect(Card card, SagaChapter chapter, Effect... effects) {
        addChapterEffect(card, chapter, chapter, new Effects(effects));
    }

    public void addChapterEffect(Card card, SagaChapter fromChapter, SagaChapter toChapter, Effect effect) {
        addChapterEffect(card, fromChapter, toChapter, new Effects(effect), (Target) null);
    }

    public void addChapterEffect(Card card, SagaChapter fromChapter, SagaChapter toChapter, Effects effects) {
        addChapterEffect(card, fromChapter, toChapter, effects, (Target) null);
    }

    public void addChapterEffect(Card card, SagaChapter fromChapter, SagaChapter toChapter, Effect effect, Target target) {
        addChapterEffect(card, fromChapter, toChapter, effect, target, false);
    }

    public void addChapterEffect(Card card, SagaChapter fromChapter, SagaChapter toChapter, Effect effect, Target target, boolean optional) {
        addChapterEffect(card, fromChapter, toChapter, new Effects(effect), new Targets(target), optional);
    }

    public void addChapterEffect(Card card, SagaChapter fromChapter, SagaChapter toChapter, Effects effects, Target target) {
        addChapterEffect(card, fromChapter, toChapter, effects, new Targets(target));
    }

    public void addChapterEffect(Card card, SagaChapter fromChapter, SagaChapter toChapter, Effects effects, Targets targets) {
        addChapterEffect(card, fromChapter, toChapter, effects, targets, false);
    }

    public void addChapterEffect(Card card, SagaChapter fromChapter, SagaChapter toChapter, Effects effects, Targets targets, boolean optional, Mode... modes) {
        for (int i = fromChapter.getNumber(); i <= toChapter.getNumber(); i++) {
            ChapterTriggeredAbility ability = new ChapterTriggeredAbility(null, SagaChapter.getChapter(i), toChapter, optional, readAhead);
            for (Effect effect : effects) {
                if (effect != null) {
                    ability.addEffect(effect.copy());
                }
            }
            for (Target target : targets) {
                if (target != null) {
                    ability.addTarget(target.copy());
                }
            }
            for (Mode mode : modes) {
                ability.addMode(mode.copy());
            }
            if (i > fromChapter.getNumber()) {
                ability.setRuleVisible(false);
            }
            card.addAbility(ability);
        }
    }

    public SagaChapter getMaxChapter() {
        return maxChapter;
    }

    @Override
    public String getRule() {
        return (readAhead
                ? "Read ahead <i>(Choose a chapter and start with that many lore counters. " +
                "Add one after your draw step. Skipped chapters don't trigger."
                : "<i>(As this Saga enters and after your draw step, add a lore counter.")
                + (showSacText ? " Sacrifice after " + maxChapter.toString() + '.' : "") + ")</i> ";
    }

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

    public static boolean isChapterAbility(StackObject stackObject) {
        if (stackObject instanceof StackAbility) {
            return stackObject.getStackAbility() instanceof ChapterTriggeredAbility;
        }
        return false;
    }

    public static boolean isChapterAbility(TriggeredAbility ability) {
        return ability instanceof ChapterTriggeredAbility;
    }

    public static boolean isFinalAbility(Ability ability, int maxChapter) {
        return ability instanceof ChapterTriggeredAbility
                && ((ChapterTriggeredAbility) ability).getChapterFrom().getNumber() == maxChapter;
    }
}

class SagaLoreCountersEffect extends OneShotEffect {

    private final boolean readAhead;
    private final SagaChapter maxChapter;

    SagaLoreCountersEffect(boolean readAhead, SagaChapter maxChapter) {
        super(Outcome.Benefit);
        this.readAhead = readAhead;
        this.maxChapter = maxChapter;
    }

    private SagaLoreCountersEffect(final SagaLoreCountersEffect effect) {
        super(effect);
        this.readAhead = effect.readAhead;
        this.maxChapter = effect.maxChapter;
    }

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

    @Override
    public boolean apply(Game game, Ability source) {
        Permanent permanent = game.getPermanentEntering(source.getSourceId());
        if (permanent == null) {
            return false;
        }
        if (!readAhead) {
            return permanent.addCounters(CounterType.LORE.createInstance(), source, game);
        }
        Player player = game.getPlayer(source.getControllerId());
        if (player == null) {
            return false;
        }
        int counters = player.getAmount(
                1, maxChapter.getNumber(),
                "Choose the number of lore counters to enter with", game
        );
        return permanent.addCounters(CounterType.LORE.createInstance(counters), source, game);
    }
}

class ChapterTriggeredAbility extends TriggeredAbilityImpl {

    private final SagaChapter chapterFrom, chapterTo;
    private final boolean readAhead;

    public ChapterTriggeredAbility(Effect effect, SagaChapter chapterFrom, SagaChapter chapterTo, boolean optional, boolean readAhead) {
        super(Zone.ALL, effect, optional);
        this.chapterFrom = chapterFrom;
        this.chapterTo = chapterTo;
        this.readAhead = readAhead;
    }

    public ChapterTriggeredAbility(final ChapterTriggeredAbility ability) {
        super(ability);
        this.chapterFrom = ability.chapterFrom;
        this.chapterTo = ability.chapterTo;
        this.readAhead = ability.readAhead;
    }

    @Override
    public boolean checkEventType(GameEvent event, Game game) {
        return event.getType() == GameEvent.EventType.COUNTERS_ADDED;
    }

    @Override
    public boolean checkTrigger(GameEvent event, Game game) {
        if (!event.getTargetId().equals(getSourceId())
                || !event.getData().equals(CounterType.LORE.getName())) {
            return false;
        }
        Permanent permanent = getSourcePermanentIfItStillExists(game);
        if (permanent == null) {
            return false;
        }
        int loreCounters = permanent.getCounters(game).getCount(CounterType.LORE);
        if (readAhead && permanent.getTurnsOnBattlefield() == 0) {
            return chapterFrom.getNumber() == loreCounters;
        }
        return loreCounters - event.getAmount() < chapterFrom.getNumber()
                && chapterFrom.getNumber() <= loreCounters;
    }

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

    public String getChapterRule() {
        String rule = super.getRule();
        return Character.toUpperCase(rule.charAt(0)) + rule.substring(1);
    }

    public SagaChapter getChapterFrom() {
        return chapterFrom;
    }

    public SagaChapter getChapterTo() {
        return chapterTo;
    }

    @Override
    public String getRule() {
        return Arrays
                .stream(SagaChapter.values())
                .filter(chapter -> chapterFrom.getNumber() <= chapter.getNumber())
                .filter(chapter -> chapter.getNumber() <= chapterTo.getNumber())
                .map(SagaChapter::toString)
                .reduce((a, b) -> a + ", " + b)
                .orElse("")
                + " - " + CardUtil.getTextWithFirstCharUpperCase(super.getRule());
    }
}