// A Picture Scroll (画卷) gain can consume its own target in an immediate three-copy promotion (GitHub #389, PR #390).
import { test } from 'node:test';
import assert from 'node:assert/strict';
import { makeMatch, legalTileFor } from './harness.js';

const OP = 'chess_char_1_06_a'; // 刺玫, the operator of the report
const SCROLL = 'chess_item_6_02_m';
const HAMMER = 'chess_item_1_01_e_a';
const SHIELD = 'chess_item_1_02_e_a';
const FILLER = 'chess_item_2_03_e_b'; // non-mergeable effect-only item: fill storage without exhausting shop stock
const OK = { ok: true };

function prep(t, { copies = 2, golden = false, items = [HAMMER] } = {}) {
  const h = makeMatch({ mode: 'solo', difficulty: 'FUNNY', seed: 8 }).start();
  t.after(() => h.m.dispose());
  h.toPrep(1, { band: 'band_dusk' });
  const m = h.m, ps = h.ps('p_0');
  assert.equal(m.gd.mergeCount(OP), 3);
  const id = golden ? m.gd.goldenIdOf(OP) : OP;
  const target = ps.acquireChess(id);
  const [row, col] = legalTileFor(m, ps, id);
  assert.deepEqual(m.handle('p_0', { t: 'g.move', uid: target.uid, to: { area: 'board', row, col }, dir: 'RIGHT' }), OK);
  for (let i = 1; i < copies; i++) ps.acquireChess(id);
  for (const itemId of items) {
    const item = ps.acquireItem(itemId);
    assert.deepEqual(m.handle('p_0', { t: 'g.equip', itemUid: item.uid, targetUid: target.uid }), OK);
  }
  const art = ps.hand.find((p) => p?.id === SCROLL);
  assert.ok(art, 'Dusk grants the scroll in round 1');
  h.invariants();
  const cast = () => m.handle('p_0', { t: 'g.art', itemUid: art.uid, row, col, dir: 'RIGHT' });
  return { h, m, ps, target, art, row, col, cast };
}

function itemIds(ps) {
  return [...ps.hand, ...ps.temp, ...ps.board.values()].filter(Boolean)
    .flatMap((p) => p.kind === 'item' ? [p.id] : (p.items || []).map((it) => it.id)).sort();
}

test('Picture Scroll: a third normal copy preserves the target equipment through promotion', (t) => {
  const { h, m, ps, target, art, row, col, cast } = prep(t);
  const funds = ps.funds;
  assert.deepEqual(cast(), OK);
  const elite = ps.board.get(`${row},${col}`);
  assert.equal(elite.id, m.gd.goldenIdOf(OP));
  assert.equal(elite.dir, 'RIGHT');
  assert.equal(ps.find(target.uid), null, 'the original target was consumed');
  assert.equal(ps.find(art.uid), null, 'the scroll was consumed');
  assert.deepEqual(itemIds(ps), [m.gd.item(HAMMER).goldenId]);
  assert.ok(ps.hand.some((p) => p?.id === m.gd.item(HAMMER).goldenId), 'the original and copied hammer merge into an advanced hammer in hand');
  assert.deepEqual(elite.items, []);
  assert.equal(ps.stats.merges, 1);
  assert.equal(ps.stats.itemMerges, 1);
  assert.equal(ps.funds, funds);
  h.invariants();
});

for (const advanced of [false, true]) {
  test(`Picture Scroll: promotion copies both ${advanced ? 'advanced' : 'normal'} equipped items, none of them worn by the elite`, (t) => {
    const items = [HAMMER, SHIELD].map((id) => advanced ? id.replace(/_a$/, '_b') : id);
    const { h, m, ps, row, col, cast } = prep(t, { items });
    assert.deepEqual(cast(), OK);
    const elite = ps.board.get(`${row},${col}`);
    const upgraded = items.map((id) => m.gd.item(id).goldenId || id).sort();
    // advanced items do not merge: the returned originals and the copies all wait in the hand ("获得的装备为未装备状态")
    assert.deepEqual(itemIds(ps), advanced ? [...items, ...items].sort() : upgraded);
    assert.deepEqual(elite.items, [], 'the promotion unequips, and the copies are not put back on the elite');
    assert.equal([...ps.hand, ...ps.temp].filter((p) => p?.kind === 'item').length, advanced ? 4 : 2);
    h.invariants();
  });
}

for (const golden of [false, true]) {
  test(`Picture Scroll: one ${golden ? 'elite' : 'normal'} target still copies its equipment without promotion`, (t) => {
    const { h, m, ps, target, cast } = prep(t, { copies: 1, golden });
    assert.deepEqual(cast(), OK);
    assert.equal(ps.find(target.uid)?.piece, target);
    assert.equal(ps.allChess().length, 2);
    assert.equal(ps.allChess().filter((p) => p.id === target.id).length, 2);
    assert.deepEqual(itemIds(ps), [m.gd.item(HAMMER).goldenId]);
    assert.equal(ps.stats.merges, 0);
    h.invariants();
  });
}

test('Picture Scroll: a third copy without equipment still promotes normally', (t) => {
  const { h, m, ps, row, col, cast } = prep(t, { items: [] });
  assert.deepEqual(cast(), OK);
  assert.equal(ps.board.get(`${row},${col}`).id, m.gd.goldenIdOf(OP));
  assert.deepEqual(itemIds(ps), []);
  h.invariants();
});

test('Picture Scroll: a promotion at full hand and temp still copies the hammer', (t) => {
  const { h, m, ps, cast } = prep(t);
  while (ps.hand.some((p) => p == null) || ps.temp.some((p) => p == null)) assert.ok(ps.acquireItem(FILLER));
  h.invariants();
  assert.deepEqual(cast(), OK);
  assert.deepEqual(itemIds(ps).filter((id) => id !== FILLER), [m.gd.item(HAMMER).goldenId]);
  assert.equal(itemIds(ps).filter((id) => id === FILLER).length, 13);
  h.invariants();
});

test('Picture Scroll: a full hand and temp without promotion keeps the refused scroll and target equipment', (t) => {
  const { h, ps, target, art, cast } = prep(t, { copies: 1 });
  while (ps.hand.some((p) => p == null) || ps.temp.some((p) => p == null)) assert.ok(ps.acquireItem(FILLER));
  const before = ps.privateView();
  assert.equal(cast().error, 'HAND_FULL');
  assert.ok(ps.find(art.uid));
  assert.deepEqual(target.items.map((p) => p.id), [HAMMER]);
  assert.deepEqual(ps.privateView(), before);
  h.invariants();
});

// PRTS 画卷 备注 「使用后销毁，获得的装备为未装备状态」: without a promotion too, the copied items are gained like any item —
// the hand, overflow temp — and never put on the copy (until 0.2.2 a copy that did not merge was equipped onto it)
const ADV = [HAMMER, SHIELD].map((id) => id.replace(/_a$/, '_b'));
const looseItems = (ps) => [...ps.hand, ...ps.temp].filter((p) => p?.kind === 'item').map((p) => p.id).sort();
for (const golden of [false, true]) {
  test(`Picture Scroll: one ${golden ? 'elite' : 'normal'} target — the copied (advanced) items arrive unequipped in the hand`, (t) => {
    const { h, m, ps, target, cast } = prep(t, { copies: 1, golden, items: ADV });
    assert.deepEqual(cast(), OK);
    const copy = ps.allChess().find((p) => p.id === target.id && p !== target);
    assert.ok(copy, 'the copy was gained');
    assert.deepEqual(copy.items, [], 'the copy wears nothing');
    assert.deepEqual(target.items.map((p) => p.id).sort(), [...ADV].sort(), 'the target keeps its own');
    assert.deepEqual(looseItems(ps), [...ADV].sort(), 'the copied items wait in the hand');
    assert.equal(m.gd.chess(copy.id).isGolden, golden);
    h.invariants();
  });
}

test('Picture Scroll: a full hand — the copy and its items overflow into temp; an item with no slot left is destroyed like any gained item', (t) => {
  for (const free of [3, 2]) {
    const { h, ps, target, cast } = prep(t, { copies: 1, items: ADV });
    while (ps.hand.some((p) => p == null)) assert.ok(ps.acquireItem(FILLER));
    while (ps.temp.filter((p) => p == null).length > free) assert.ok(ps.acquireItem(FILLER));
    const toasts = () => h.allTo('p_0', 'm.toast').map((x) => JSON.stringify(x));
    const before = toasts().length;
    assert.deepEqual(cast(), OK);
    const copy = ps.allChess().find((p) => p.id === target.id && p !== target);
    const where = copy ? ps.find(copy.uid)?.area : null;
    assert.ok(where === 'temp' || where === 'hand', `free ${free}: the copy was gained into temp (the hand fills from temp once the scroll left)`);
    assert.deepEqual(copy.items, [], `free ${free}: the copy wears nothing`);
    assert.deepEqual(target.items.map((p) => p.id).sort(), [...ADV].sort());
    const got = looseItems(ps).filter((id) => id !== FILLER);
    if (free === 3) assert.deepEqual(got, [...ADV].sort(), 'room for the copy and both items');
    else {
      assert.equal(got.length, 1, 'room for the copy and one item: the other is destroyed');
      assert.ok(toasts().slice(before).some((s) => s.includes('整备区已满，获得的装备已销毁')), 'with the usual toast');
    }
    h.invariants();
  }
});