/*
 * This file is part of Araknemu.
 *
 * Araknemu 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.
 *
 * Araknemu 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 Araknemu.  If not, see <https://www.gnu.org/licenses/>.
 *
 * Copyright (c) 2017-2019 Vincent Quatrevieux
 */

package fr.quatrevieux.araknemu.game.fight.castable.effect;

import fr.quatrevieux.araknemu.game.fight.Fight;
import fr.quatrevieux.araknemu.game.fight.FightBaseCase;
import fr.quatrevieux.araknemu.game.fight.castable.CastScope;
import fr.quatrevieux.araknemu.game.fight.castable.FightCastScope;
import fr.quatrevieux.araknemu.game.fight.castable.effect.buff.FightBuff;
import fr.quatrevieux.araknemu.game.fight.castable.effect.buff.BuffHook;
import fr.quatrevieux.araknemu.game.fight.castable.effect.handler.EffectHandler;
import fr.quatrevieux.araknemu.game.fight.castable.effect.handler.damage.DamageHandler;
import fr.quatrevieux.araknemu.game.fight.castable.effect.hook.EffectHookHandler;
import fr.quatrevieux.araknemu.game.fight.fighter.player.PlayerFighter;
import fr.quatrevieux.araknemu.game.fight.module.CommonEffectsModule;
import fr.quatrevieux.araknemu.game.fight.turn.FightTurn;
import fr.quatrevieux.araknemu.game.spell.Spell;
import fr.quatrevieux.araknemu.game.spell.SpellConstraints;
import fr.quatrevieux.araknemu.game.spell.SpellService;
import fr.quatrevieux.araknemu.game.spell.effect.SpellEffect;
import fr.quatrevieux.araknemu.game.spell.effect.area.CellArea;
import fr.quatrevieux.araknemu.game.spell.effect.target.SpellEffectTarget;
import fr.quatrevieux.araknemu.network.game.out.fight.AddBuff;
import fr.quatrevieux.araknemu.network.game.out.fight.action.ActionEffect;
import org.apache.logging.log4j.Logger;
import org.junit.jupiter.api.BeforeEach;
import org.junit.jupiter.api.Test;
import org.mockito.Mockito;

import java.sql.SQLException;
import java.time.Duration;
import java.util.Collections;
import java.util.Optional;

import static org.junit.jupiter.api.Assertions.assertEquals;
import static org.junit.jupiter.api.Assertions.assertFalse;
import static org.junit.jupiter.api.Assertions.assertNull;
import static org.junit.jupiter.api.Assertions.assertTrue;

class EffectsHandlerTest extends FightBaseCase {
    private Fight fight;
    private EffectsHandler handler;
    private Logger logger;

    @Override
    @BeforeEach
    public void setUp() throws Exception {
        super.setUp();

        fight = createFight();
        fight.nextState();
        handler = new EffectsHandler(fight, logger = Mockito.mock(Logger.class));

        new CommonEffectsModule(fight).effects(handler);

        requestStack.clear();
    }

    @Test
    void applyUndefinedEffect() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.effect()).thenReturn(-1);
        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(SpellEffectTarget.DEFAULT);
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        handler.apply(makeCastScope(player.fighter(), spell, effect, fight.map().get(123)));

        requestStack.assertEmpty();
        Mockito.verify(logger).warn(
            "No handler found for effect {} when casting {}. Ignoring...",
            -1,
            spell
        );
    }

    @Test
    void applyUndefinedHook() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.effect()).thenReturn(100);
        Mockito.when(effect.min()).thenReturn(10);
        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(new SpellEffectTarget(25856)); // hook 404
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        handler.apply(makeCastScope(player.fighter(), spell, effect, other.fighter().cell()));

        requestStack.assertLast(ActionEffect.alterLifePoints(player.fighter(), other.fighter(), -15));
        Mockito.verify(logger).warn(
            "Hook {} not found when casting {}. Ignoring...",
            404,
            spell
        );
    }

    @Test
    void applyDamage() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.effect()).thenReturn(100);
        Mockito.when(effect.min()).thenReturn(10);
        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(SpellEffectTarget.DEFAULT);
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        handler.apply(makeCastScope(player.fighter(), spell, effect, other.fighter().cell()));

        requestStack.assertLast(ActionEffect.alterLifePoints(player.fighter(), other.fighter(), -15));
    }

    @Test
    void applyDamageBuff() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.effect()).thenReturn(100);
        Mockito.when(effect.min()).thenReturn(10);
        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(SpellEffectTarget.DEFAULT);
        Mockito.when(effect.duration()).thenReturn(5);
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        handler.apply(makeCastScope(player.fighter(), spell, effect, other.fighter().cell()));
        Optional<FightBuff> found = other.fighter().buffs().stream().filter(buff -> buff.effect().effect() == 100).findFirst();

        assertTrue(found.isPresent());
        assertEquals(player.fighter(), found.get().caster());
        assertEquals(other.fighter(), found.get().target());
        assertEquals(effect, found.get().effect());
        assertEquals(spell, found.get().action());
        assertInstanceOf(DamageHandler.class, found.get().hook());
        assertEquals(5, found.get().remainingTurns());
        requestStack.assertLast(new AddBuff(found.get()));
    }

    @Test
    void applyInfiniteDurationEffect() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.effect()).thenReturn(100);
        Mockito.when(effect.min()).thenReturn(10);
        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(SpellEffectTarget.DEFAULT);
        Mockito.when(effect.duration()).thenReturn(-1);
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        handler.apply(makeCastScope(player.fighter(), spell, effect, other.fighter().cell()));
        Optional<FightBuff> found = other.fighter().buffs().stream().filter(buff -> buff.effect().effect() == 100).findFirst();

        assertTrue(found.isPresent());
        assertEquals(player.fighter(), found.get().caster());
        assertEquals(other.fighter(), found.get().target());
        assertEquals(effect, found.get().effect());
        assertEquals(spell, found.get().action());
        assertInstanceOf(DamageHandler.class, found.get().hook());
        assertEquals(-1, found.get().remainingTurns());
        requestStack.assertLast(new AddBuff(found.get()));
    }

    @Test
    void applyStealLife() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.effect()).thenReturn(95);
        Mockito.when(effect.min()).thenReturn(10);
        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(SpellEffectTarget.DEFAULT);
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        player.fighter().life().damage(player.fighter(), 20);
        requestStack.clear();

        handler.apply(makeCastScope(player.fighter(), spell, effect, other.fighter().cell()));

        requestStack.assertAll(
            ActionEffect.alterLifePoints(player.fighter(), other.fighter(), -15),
            ActionEffect.alterLifePoints(player.fighter(), player.fighter(), 7)
        );
    }

    @Test
    void applyTeleport() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.effect()).thenReturn(4);
        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(SpellEffectTarget.DEFAULT);
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(true);
        requestStack.clear();

        handler.apply(makeCastScope(player.fighter(), spell, effect, fight.map().get(123)));

        requestStack.assertLast(ActionEffect.teleport(player.fighter(), player.fighter(), fight.map().get(123)));
        assertEquals(123, player.fighter().cell().id());
    }

    @Test
    void applyShouldStopWhenFightEnd() throws SQLException {
        dataSet.pushFunctionalSpells();
        Spell spell = container.get(SpellService.class).get(447).level(5);

        player.fighter().move(fight.map().get(166));
        other.fighter().move(fight.map().get(152));
        other.fighter().life().damage(other.fighter(), 45);
        requestStack.clear();

        handler.apply(FightCastScope.simple(
            spell,
            player.fighter(),
            other.fighter().cell(),
            spell.effects()
        ));

        requestStack.assertAll(
            ActionEffect.alterLifePoints(player.fighter(), other.fighter(), -5),
            ActionEffect.fighterDie(player.fighter(), other.fighter())
        );

        assertEquals(0, player.fighter().buffs().stream().count());
    }

    @Test
    void applyWillCallBuffOnCastTarget() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(SpellEffectTarget.DEFAULT);
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        BuffHook hook = Mockito.mock(BuffHook.class);
        FightBuff buff = new FightBuff(effect, spell, player.fighter(), player.fighter(), hook);
        other.fighter().buffs().add(buff);

        FightCastScope cast = makeCastScope(player.fighter(), spell, effect, other.fighter().cell());

        handler.apply(cast);

        Mockito.verify(hook).onCastTarget(buff, cast);
    }

    @Test
    void applyWillCallBuffOnCaster() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(SpellEffectTarget.DEFAULT);
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        BuffHook hook = Mockito.mock(BuffHook.class);
        FightBuff buff = new FightBuff(effect, spell, player.fighter(), player.fighter(), hook);
        player.fighter().buffs().add(buff);

        FightCastScope cast = makeCastScope(player.fighter(), spell, effect, other.fighter().cell());

        handler.apply(cast);

        Mockito.verify(hook).onCast(buff, cast);
    }

    @Test
    void applyWithCastTargetChangedShouldCallOnCastTargetOnNewTarget() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(SpellEffectTarget.DEFAULT);
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        BuffHook hook = Mockito.mock(BuffHook.class);
        FightBuff buff = new FightBuff(effect, spell, player.fighter(), other.fighter(), hook);
        other.fighter().buffs().add(buff);

        BuffHook hook2 = Mockito.mock(BuffHook.class);
        FightBuff buff2 = new FightBuff(effect, spell, player.fighter(), player.fighter(), hook2);
        player.fighter().buffs().add(buff2);

        FightCastScope cast = makeCastScope(player.fighter(), spell, effect, other.fighter().cell());

        Mockito.when(hook.onCastTarget(buff, cast)).then((params) -> {
            params.getArgument(1, CastScope.class).replaceTarget(other.fighter(), player.fighter());
            return false;
        });

        handler.apply(cast);

        Mockito.verify(hook).onCastTarget(buff, cast);
        Mockito.verify(hook2).onCastTarget(buff2, cast);
    }

    @Test
    void applyDamageThroughHook() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);

        Mockito.when(effect.effect()).thenReturn(100);
        Mockito.when(effect.min()).thenReturn(10);
        Mockito.when(effect.duration()).thenReturn(10);
        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(new SpellEffectTarget(64)); // hook 1 ApplyOnHeal
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);

        handler.apply(makeCastScope(player.fighter(), spell, effect, other.fighter().cell()));

        Optional<FightBuff> buff = other.fighter().buffs().stream().filter(b -> b.effect().effect() == 100).findFirst();
        assertTrue(buff.isPresent());

        requestStack.assertLast(new AddBuff(buff.get()));
        assertTrue(other.fighter().life().isFull());

        other.fighter().life().damage(player.fighter(), 1);
        requestStack.clear();
        other.fighter().life().heal(player.fighter(), 1); // Trigger hook

        assertEquals(15, other.fighter().life().max() - other.fighter().life().current());
        requestStack.assertLast(ActionEffect.alterLifePoints(player.fighter(), other.fighter(), -15));
    }

    @Test
    void applyWithHookReturningTrueShouldApplyBaseEffect() {
        SpellEffect effect = Mockito.mock(SpellEffect.class);
        Spell spell = Mockito.mock(Spell.class);
        SpellConstraints constraints = Mockito.mock(SpellConstraints.class);
        EffectHookHandler hook = Mockito.mock(EffectHookHandler.class);

        handler.registerHook(42, hook);

        Mockito.when(effect.effect()).thenReturn(100);
        Mockito.when(effect.min()).thenReturn(10);
        Mockito.when(effect.area()).thenReturn(new CellArea());
        Mockito.when(effect.target()).thenReturn(new SpellEffectTarget(2688)); // hook 42
        Mockito.when(spell.constraints()).thenReturn(constraints);
        Mockito.when(constraints.freeCell()).thenReturn(false);
        Mockito.when(hook.apply(Mockito.any(), Mockito.any(), Mockito.any())).thenReturn(true);

        handler.apply(makeCastScope(player.fighter(), spell, effect, other.fighter().cell()));

        assertEquals(15, other.fighter().life().max() - other.fighter().life().current());
        requestStack.assertLast(ActionEffect.alterLifePoints(player.fighter(), other.fighter(), -15));
    }

    @Test
    void checkSuccess() {
        EffectHandler handler = Mockito.mock(EffectHandler.class);
        PlayerFighter fighter = player.fighter();
        FightTurn turn = new FightTurn(fighter, fight, Duration.ofSeconds(30));
        turn.start();

        this.handler.register(1000, handler);

        Mockito.when(handler.check(Mockito.any(), Mockito.any(), Mockito.any())).thenReturn(true);
        Mockito.when(handler.validate(Mockito.any(), Mockito.any(), Mockito.any())).thenReturn(null);

        Spell spell = Mockito.mock(Spell.class);
        SpellEffect effect = Mockito.mock(SpellEffect.class);

        Mockito.when(spell.effects()).thenReturn(Collections.singletonList(effect));
        Mockito.when(effect.effect()).thenReturn(1000);

        assertTrue(this.handler.check(turn, spell, fighter.cell()));
        assertNull(this.handler.validate(turn, spell, fighter.cell()));

        Mockito.verify(handler).check(turn, spell, fighter.cell());
        Mockito.verify(handler).validate(turn, spell, fighter.cell());
    }

    @Test
    void checkFailed() {
        EffectHandler handler = Mockito.mock(EffectHandler.class);
        PlayerFighter fighter = player.fighter();
        FightTurn turn = new FightTurn(fighter, fight, Duration.ofSeconds(30));
        turn.start();

        this.handler.register(1000, handler);

        Mockito.when(handler.check(Mockito.any(), Mockito.any(), Mockito.any())).thenReturn(false);
        Mockito.when(handler.validate(Mockito.any(), Mockito.any(), Mockito.any())).thenReturn("My error");

        Spell spell = Mockito.mock(Spell.class);
        SpellEffect effect = Mockito.mock(SpellEffect.class);

        Mockito.when(spell.effects()).thenReturn(Collections.singletonList(effect));
        Mockito.when(effect.effect()).thenReturn(1000);

        assertFalse(this.handler.check(turn, spell, fighter.cell()));
        assertEquals("My error", handler.validate(turn, spell, fighter.cell()));

        Mockito.verify(handler).check(turn, spell, fighter.cell());
        Mockito.verify(handler).validate(turn, spell, fighter.cell());
    }
}