import { MutablePlayer, PlayerInfo, PlayerID, PlayerType, Player, TerraNullius, Cell, Execution, AllianceRequest, MutableAllianceRequest, MutableAlliance, Alliance, Tick, EmojiMessage, AllPlayers, Gold, UnitType, Unit, MutableUnit, Relation, PlayerUpdate, GameUpdateType } from "./Game";
import { ClientID } from "../Schemas";
import { assertNever, closestOceanShoreFromPlayer, distSortUnit, simpleHash, sourceDstOceanShore, within } from "../Util";
import { CellString, GameImpl } from "./GameImpl";
import { UnitImpl } from "./UnitImpl";
import { MessageType } from './Game';
import { renderTroops } from "../../client/Utils";
import { TerraNulliusImpl } from "./TerraNulliusImpl";
import { manhattanDistFN, TileRef } from "./GameMap";

interface Target {
    tick: Tick
    target: Player
}

class Donation {
    constructor(public readonly recipient: Player, public readonly tick: Tick) { }
}

export class PlayerImpl implements MutablePlayer {

    public _lastTileChange: number = 0

    private _gold: Gold
    private _troops: number
    private _workers: number
    private _targetTroopRatio: number = 1

    isTraitor_ = false

    public _borderTiles: Set<TileRef> = new Set();

    public _units: UnitImpl[] = [];
    public _tiles: Set<TileRef> = new Set()

    private _name: string;
    private _displayName: string;

    public pastOutgoingAllianceRequests: AllianceRequest[] = []

    private targets_: Target[] = []

    private outgoingEmojis_: EmojiMessage[] = []

    private sentDonations: Donation[] = []

    private relations = new Map<Player, number>()


    constructor(private mg: GameImpl, private _smallID: number, private readonly playerInfo: PlayerInfo, startPopulation: number) {
        this._name = playerInfo.name;
        this._targetTroopRatio = 1
        this._troops = startPopulation * this._targetTroopRatio;
        this._workers = startPopulation * (1 - this._targetTroopRatio)
        this._gold = 0
        this._displayName = this._name // processName(this._name)

    }

    largestClusterBoundingBox: { min: Cell, max: Cell } | null

    toUpdate(): PlayerUpdate {
        return {
            type: GameUpdateType.Player,
            clientID: this.clientID(),
            name: this.name(),
            displayName: this.displayName(),
            id: this.id(),
            smallID: this.smallID(),
            playerType: this.type(),
            isAlive: this.isAlive(),
            tilesOwned: this.numTilesOwned(),
            allies: this.allies().map(p => p.id()),
            gold: this._gold,
            population: this.population(),
            workers: this.workers(),
            troops: this.troops(),
            targetTroopRatio: this.targetTroopRatio()
        }
    }

    smallID(): number {
        return this._smallID
    }

    name(): string {
        return this._name;
    }
    displayName(): string {
        return this._displayName
    }

    clientID(): ClientID {
        return this.playerInfo.clientID;
    }

    id(): PlayerID {
        return this.playerInfo.id;
    }

    type(): PlayerType {
        return this.playerInfo.playerType;
    }


    units(...types: UnitType[]): UnitImpl[] {
        if (types.length == 0) {
            return this._units
        }
        const ts = new Set(types)
        return this._units.filter(u => ts.has(u.type()));
    }


    sharesBorderWith(other: Player | TerraNullius): boolean {
        for (const border of this._borderTiles) {
            for (const neighbor of this.mg.map().neighbors(border)) {
                if (this.mg.map().ownerID(neighbor) == other.smallID()) {
                    return true;
                }
            }
        }
        return false;
    }
    numTilesOwned(): number {
        return this._tiles.size;
    }

    tiles(): ReadonlySet<TileRef> {
        return new Set(this._tiles.values()) as Set<TileRef>;
    }

    borderTiles(): ReadonlySet<TileRef> {
        return this._borderTiles;
    }

    neighbors(): (MutablePlayer | TerraNullius)[] {
        const ns: Set<(MutablePlayer | TerraNullius)> = new Set();
        for (const border of this.borderTiles()) {
            for (const neighbor of this.mg.map().neighbors(border)) {
                if (this.mg.map().isLake(neighbor)) {
                    const owner = this.mg.map().ownerID(neighbor)
                    if (owner != this.smallID()) {
                        ns.add(this.mg.playerBySmallID(owner) as PlayerImpl | TerraNulliusImpl);
                    }
                }
            }
        }
        return Array.from(ns);
    }

    isPlayer(): this is MutablePlayer { return true as const; }
    setTroops(troops: number) { this._troops = Math.floor(troops); }
    conquer(tile: TileRef) { this.mg.conquer(this, tile); }
    relinquish(tile: TileRef) {
        if (this.mg.owner(tile) != this) {
            throw new Error(`Cannot relinquish tile not owned by this player`);
        }
        this.mg.relinquish(tile);
    }
    info(): PlayerInfo { return this.playerInfo; }
    isAlive(): boolean { return this._tiles.size > 0; }
    executions(): Execution[] {
        return this.mg.executions().filter(exec => exec.owner().id() == this.id());
    }

    incomingAllianceRequests(): MutableAllianceRequest[] {
        return this.mg.allianceRequests.filter(ar => ar.recipient() == this)
    }

    outgoingAllianceRequests(): MutableAllianceRequest[] {
        return this.mg.allianceRequests.filter(ar => ar.requestor() == this)
    }

    alliances(): MutableAlliance[] {
        return this.mg.alliances_.filter(a => a.requestor() == this || a.recipient() == this)
    }

    allies(): MutablePlayer[] {
        return this.alliances().map(a => a.other(this))
    }

    isAlliedWith(other: Player): boolean {
        if (other == this) {
            return false
        }
        return this.allianceWith(other) != null
    }

    allianceWith(other: Player): MutableAlliance | null {
        if (other == this) {
            return null
        }
        return this.alliances().find(a => a.recipient() == other || a.requestor() == other)
    }

    recentOrPendingAllianceRequestWith(other: Player): boolean {
        const hasPending = this.incomingAllianceRequests().find(ar => ar.requestor() == other) != null
            || this.outgoingAllianceRequests().find(ar => ar.recipient() == other) != null
        if (hasPending) {
            return true
        }

        const recent = this.pastOutgoingAllianceRequests
            .filter(ar => ar.recipient() == other)
            .sort((a, b) => b.createdAt() - a.createdAt())

        if (recent.length == 0) {
            return false
        }

        const delta = this.mg.ticks() - recent[0].createdAt()

        return delta < this.mg.config().allianceRequestCooldown()
    }

    breakAlliance(alliance: Alliance): void {
        this.mg.breakAlliance(this, alliance)
    }


    isTraitor(): boolean {
        return this.isTraitor_
    }

    createAllianceRequest(recipient: Player): MutableAllianceRequest {
        if (this.isAlliedWith(recipient)) {
            throw new Error(`cannot create alliance request, already allies`)
        }
        return this.mg.createAllianceRequest(this, recipient as MutablePlayer)
    }

    relation(other: Player): Relation {
        if (other == this) {
            throw new Error(`cannot get relation with self: ${this}`)
        }
        if (this.relations.has(other)) {
            return this.relationFromValue(this.relations.get(other))
        }
        return Relation.Neutral
    }

    private relationFromValue(relationValue: number): Relation {
        if (relationValue < -50) {
            return Relation.Hostile
        }
        if (relationValue < 0) {
            return Relation.Distrustful
        }
        if (relationValue < 50) {
            return Relation.Neutral
        }
        return Relation.Friendly
    }

    allRelationsSorted(): { player: Player, relation: Relation }[] {
        return Array.from(this.relations, ([k, v]) => ({ player: k, relation: v }))
            .sort((a, b) => a.relation - b.relation)
            .map(r => ({ player: r.player, relation: this.relationFromValue(r.relation) }))
    }

    updateRelation(other: Player, delta: number): void {
        if (other == this) {
            throw new Error(`cannot update relation with self: ${this}`)
        }
        let relation = 0
        if (this.relations.has(other)) {
            relation = this.relations.get(other)
        }
        const newRelation = within(relation + delta, -100, 100)
        this.relations.set(other, newRelation)
    }

    decayRelations() {
        this.relations.forEach((r: number, p: Player) => {
            const sign = -1 * Math.sign(r)
            const delta = .05
            r += sign * delta
            if (Math.abs(r) < delta * 2) {
                r = 0
            }
            this.relations.set(p, r)
        })
    }

    canTarget(other: Player): boolean {
        if (this.isAlliedWith(other)) {
            return false
        }
        for (const t of this.targets_) {
            if (this.mg.ticks() - t.tick < this.mg.config().targetCooldown()) {
                return false
            }
        }
        return true
    }

    target(other: Player): void {
        this.targets_.push({ tick: this.mg.ticks(), target: other })
        this.mg.target(this, other)
    }

    targets(): PlayerImpl[] {
        return this.targets_
            .filter(t => this.mg.ticks() - t.tick < this.mg.config().targetDuration())
            .map(t => t.target as PlayerImpl)
    }

    transitiveTargets(): MutablePlayer[] {
        const ts = this.alliances().map(a => a.other(this)).flatMap(ally => ally.targets())
        ts.push(...this.targets())
        return [...new Set(ts)] as MutablePlayer[]
    }

    sendEmoji(recipient: Player | typeof AllPlayers, emoji: string): void {
        if (recipient == this) {
            throw Error(`Cannot send emoji to oneself: ${this}`)
        }
        const msg = new EmojiMessage(this, recipient, emoji, this.mg.ticks())
        this.outgoingEmojis_.push(msg)
        this.mg.sendEmojiUpdate(this, recipient, emoji)
    }

    outgoingEmojis(): EmojiMessage[] {
        return this.outgoingEmojis_
            .filter(e => this.mg.ticks() - e.createdAt < this.mg.config().emojiMessageDuration())
            .sort((a, b) => b.createdAt - a.createdAt)
    }

    canSendEmoji(recipient: Player | typeof AllPlayers): boolean {
        const prevMsgs = this.outgoingEmojis_.filter(msg => msg.recipient == recipient)
        for (const msg of prevMsgs) {
            if (this.mg.ticks() - msg.createdAt < this.mg.config().emojiMessageCooldown()) {
                return false
            }
        }
        return true
    }

    canDonate(recipient: Player): boolean {
        if (!this.isAlliedWith(recipient)) {
            return false
        }
        for (const donation of this.sentDonations) {
            if (donation.recipient == recipient) {
                if (this.mg.ticks() - donation.tick < this.mg.config().donateCooldown()) {
                    return false
                }
            }
        }
        return true
    }

    donate(recipient: MutablePlayer, troops: number): void {
        this.sentDonations.push(new Donation(recipient, this.mg.ticks()))
        recipient.addTroops(this.removeTroops(troops))
        this.mg.displayMessage(`Sent ${renderTroops(troops)} troops to ${recipient.name()}`, MessageType.INFO, this.id())
        this.mg.displayMessage(`Recieved ${renderTroops(troops)} troops from ${this.name()}`, MessageType.SUCCESS, recipient.id())
    }

    gold(): Gold {
        return this._gold
    }

    addGold(toAdd: Gold): void {
        this._gold += toAdd
    }

    removeGold(toRemove: Gold): void {
        if (toRemove > this._gold) {
            throw Error(`Player ${this} does not enough gold (${toRemove} vs ${this._gold}))`)
        }
        this._gold -= toRemove
    }

    population(): number {
        return this._troops + this._workers
    }
    workers(): number {
        return Math.max(1, this._workers)
    }
    addWorkers(toAdd: number): void {
        this._workers += toAdd
    }
    removeWorkers(toRemove: number): void {
        this._workers = Math.max(1, this._workers - toRemove)
    }

    targetTroopRatio(): number {
        return this._targetTroopRatio
    }

    setTargetTroopRatio(target: number): void {
        if (target < 0 || target > 1) {
            throw new Error(`invalid targetTroopRatio ${target} set on player ${PlayerImpl}`)
        }
        this._targetTroopRatio = target
    }

    troops(): number { return this._troops; }

    addTroops(troops: number): void {
        if (troops < 0) {
            this.removeTroops(-1 * troops)
            return
        }
        this._troops += Math.floor(troops);
    }
    removeTroops(troops: number): number {
        if (troops <= 1) {
            return 0
        }
        const toRemove = Math.floor(Math.min(this._troops - 1, troops))
        this._troops -= toRemove;
        return toRemove
    }

    captureUnit(unit: MutableUnit): void {
        if (unit.owner() == this) {
            throw new Error(`Cannot capture unit, ${this} already owns ${unit}`)
        }
        const prev = unit.owner();
        (prev as PlayerImpl)._units = (prev as PlayerImpl)._units.filter(u => u != unit);
        (unit as UnitImpl)._owner = this
        this._units.push(unit as UnitImpl)
        this.mg.fireUnitUpdateEvent(unit)
        this.mg.displayMessage(`${unit.type()} captured by ${this.displayName()}`, MessageType.ERROR, prev.id())
        this.mg.displayMessage(`Captured ${unit.type()} from ${prev.displayName()}`, MessageType.SUCCESS, this.id())
    }

    buildUnit(type: UnitType, troops: number, spawnTile: TileRef): UnitImpl {
        const cost = this.mg.unitInfo(type).cost(this)
        const b = new UnitImpl(type, this.mg, spawnTile, troops, this.mg.nextUnitID(), this);
        this._units.push(b);
        this.removeGold(cost)
        this.removeTroops(troops)
        this.mg.fireUnitUpdateEvent(b);
        return b;
    }


    canBuild(unitType: UnitType, targetTile: TileRef): TileRef | false {
        const cost = this.mg.unitInfo(unitType).cost(this)
        if (!this.isAlive() || this.gold() < cost) {
            return false
        }
        switch (unitType) {
            case UnitType.AtomBomb:
            case UnitType.HydrogenBomb:
                return this.nukeSpawn(targetTile)
            case UnitType.Port:
                return this.portSpawn(targetTile)
            case UnitType.Destroyer:
            case UnitType.Battleship:
                return this.warshipSpawn(targetTile)
            case UnitType.Shell:
                return targetTile
            case UnitType.MissileSilo:
                return this.landBasedStructureSpawn(targetTile)
            case UnitType.DefensePost:
                return this.landBasedStructureSpawn(targetTile)
            case UnitType.TransportShip:
                return this.transportShipSpawn(targetTile)
            case UnitType.TradeShip:
                return this.tradeShipSpawn(targetTile)
            case UnitType.City:
                return this.landBasedStructureSpawn(targetTile)
            default:
                assertNever(unitType)
        }
    }

    nukeSpawn(tile: TileRef): TileRef | false {
        const spawns = this.units(UnitType.MissileSilo).map(u => u as Unit).sort(distSortUnit(this.mg, tile))
        if (spawns.length == 0) {
            return false
        }
        return spawns[0].tile()
    }

    portSpawn(tile: TileRef): TileRef | false {
        const spawns = Array.from(this.mg.bfs(tile, manhattanDistFN(tile, 20)))
            .filter(t => this.mg.owner(t) == this && this.mg.isOceanShore(t))
            .sort((a, b) => this.mg.manhattanDist(a, tile) - this.mg.manhattanDist(b, tile))
        if (spawns.length == 0) {
            return false
        }
        return spawns[0]
    }

    warshipSpawn(tile: TileRef): TileRef | false {
        if (!this.mg.isOcean(tile)) {
            return false
        }
        const spawns = this.units(UnitType.Port)
            .filter(u => this.mg.manhattanDist(u.tile(), tile) < this.mg.config().boatMaxDistance())
            .sort((a, b) => this.mg.manhattanDist(a.tile(), tile) - this.mg.manhattanDist(b.tile(), tile))
        if (spawns.length == 0) {
            return false
        }
        return spawns[0].tile()
    }

    landBasedStructureSpawn(tile: TileRef): TileRef | false {
        if (this.mg.owner(tile) != this) {
            return false
        }
        return tile
    }

    transportShipSpawn(targetTile: TileRef): TileRef | false {
        if (!this.mg.isOceanShore(targetTile)) {
            return false
        }
        const spawn = closestOceanShoreFromPlayer(this.mg, this, targetTile)
        if (spawn == null) {
            return false
        }
        return spawn
    }

    tradeShipSpawn(targetTile: TileRef): TileRef | false {
        const spawns = this.units(UnitType.Port).filter(u => u.tile() == targetTile)
        if (spawns.length == 0) {
            return false
        }
        return spawns[0].tile()
    }
    lastTileChange(): Tick {
        return this._lastTileChange
    }

    hash(): number {
        return simpleHash(this.id()) * (this.population() + this.numTilesOwned()) + this._units.reduce((acc, unit) => acc + unit.hash(), 0)
    }
    toString(): string {
        return `Player:{name:${this.info().name},clientID:${this.info().clientID},isAlive:${this.isAlive()},troops:${this._troops},numTileOwned:${this.numTilesOwned()}}]`;
    }
}