"""E2 stage A (item 21): dense short-CoT supervision through the carry
whiteboard on GSM8K.

train_carry.py skeleton, one change that matters: CE targets are the
model's own VERIFIED terse scratchpad + answer (gsm_cot_data.json,
~30-60 tokens) instead of the ~3-token bare answer — the dense-output
ingredient the latent GSM arms structurally lacked.
Control: --feedforward = same supervision, adapter(e,e), no recurrence.
"""

import argparse
import json
import os
import math
import random
import sys
import time
from pathlib import Path

import torch
import torch.nn.functional as F

from carry_common import PAUSE_ID, carry_logits
from loop_common import BandLooper, MergeAdapter, chat_prompt, DIRECT_SUFFIX

sys.path.insert(0, str(Path(__file__).resolve().parent.parent))
from jlens.core import load_model  # noqa: E402

OUT = Path(os.environ.get("LOOP_OUT",
    Path(__file__).resolve().parent.parent / "results-loop"))
STEPS = 600
BATCH = 4
LR = 1e-3
WARMUP = 20
K_PREFILL = 2
P_BY_LABEL = {"easy": 2, "hard": 6}

ap = argparse.ArgumentParser()
ap.add_argument("--feedforward", action="store_true")
ap.add_argument("--seed", type=int, default=0)
ARGS = ap.parse_args()
TAG = ("carrycot_ff" if ARGS.feedforward else "carrycot") + (
    f"_s{ARGS.seed}" if ARGS.seed else "")


def lr_at(step):
    if step < WARMUP:
        return LR * (step + 1) / WARMUP
    t = (step - WARMUP) / max(1, STEPS - WARMUP)
    return 1e-4 + 0.5 * (LR - 1e-4) * (1 + math.cos(math.pi * t))


def build_batch(tok, items, p, device="cuda"):
    seqs, labs, plens = [], [], []
    for it in items:
        pr = tok(chat_prompt(tok, it["question"], DIRECT_SUFFIX),
                 add_special_tokens=False)["input_ids"]
        a = tok(it["cot"] + "<end_of_turn>",
                add_special_tokens=False)["input_ids"]
        seqs.append(pr + [PAUSE_ID] * p + a)
        labs.append([-100] * (len(pr) + p) + a)
        plens.append(len(pr))
    T = max(len(s) for s in seqs)
    pad = tok.pad_token_id or 0
    ids = torch.full((len(seqs), T), pad, dtype=torch.long)
    lab = torch.full((len(seqs), T), -100, dtype=torch.long)
    msk = torch.zeros((len(seqs), T), dtype=torch.long)
    for i, (s, l) in enumerate(zip(seqs, labs)):
        ids[i, : len(s)] = torch.tensor(s)
        lab[i, : len(s)] = torch.tensor(l)
        msk[i, : len(s)] = 1
    return (ids.to(device), msk.to(device), lab.to(device),
            torch.tensor(plens, device=device))


@torch.no_grad()
def val_loss(looper, adapter, tok, items, p):
    tot, n = 0.0, 0
    for i in range(0, len(items), BATCH):
        ids, msk, lab, plens = build_batch(tok, items[i : i + BATCH], p)
        logits = carry_logits(looper, adapter, ids, msk, plens, K_PREFILL,
                              feedforward=ARGS.feedforward)
        loss = F.cross_entropy(logits[:, :-1].flatten(0, 1).float(),
                               lab[:, 1:].flatten(), ignore_index=-100)
        tot += loss.item() * len(ids)
        n += len(ids)
    return tot / n


def main():
    rng = random.Random(ARGS.seed)
    torch.manual_seed(ARGS.seed)
    star = {it["idx"]: it for it in json.load(open(OUT / "star_data.json"))
            if it["split"] == "train"}
    cots = json.load(open(OUT / "gsm_cot_data.json"))
    data = []
    for r in cots:
        it = star.get(r["idx"])
        if it is None:
            continue
        data.append({"question": it["question"], "label": r["label"],
                     "cot": r["cot"]})

    model, tok = load_model(dtype=torch.bfloat16)
    for pp in model.parameters():
        pp.requires_grad_(False)
    looper = BandLooper(model)
    adapter = MergeAdapter(
        d=model.config.get_text_config().hidden_size).cuda()
    opt = torch.optim.AdamW(adapter.parameters(), lr=LR, weight_decay=0.01)

    keep = [it for it in data
            if len(tok(it["question"])["input_ids"])
            + len(tok(it["cot"])["input_ids"]) + 16 <= 460]
    rng.shuffle(keep)
    pool = {l: [it for it in keep if it["label"] == l]
            for l in ("easy", "hard")}
    val = {l: pool[l][:12] for l in pool}
    pool = {l: pool[l][12:] for l in pool}
    print(f"pool: easy={len(pool['easy'])} hard={len(pool['hard'])}",
          flush=True)
    if min(len(v) for v in pool.values()) < BATCH:
        print("INSUFFICIENT POOL — aborting", flush=True)
        return

    log = []
    t0 = time.time()
    for step in range(STEPS):
        lbl = ("easy", "hard")[step % 2]
        batch = rng.sample(pool[lbl], BATCH)
        p = P_BY_LABEL[lbl]
        ids, msk, lab, plens = build_batch(tok, batch, p)
        for g in opt.param_groups:
            g["lr"] = lr_at(step)
        logits = carry_logits(looper, adapter, ids, msk, plens, K_PREFILL,
                              use_checkpoint=True,
                              feedforward=ARGS.feedforward)
        loss = F.cross_entropy(logits[:, :-1].flatten(0, 1).float(),
                               lab[:, 1:].flatten(), ignore_index=-100)
        opt.zero_grad(set_to_none=True)
        loss.backward()
        torch.nn.utils.clip_grad_norm_(adapter.parameters(), 1.0)
        opt.step()
        log.append({"step": step, "loss": loss.item()})
        if step % 10 == 0:
            print(f"step {step:4d}  {lbl:4s} loss={loss.item():.4f}  "
                  f"({(time.time()-t0)/(step+1):.1f}s/step)", flush=True)
        if step % 200 == 199 or step == STEPS - 1:
            for l in ("easy", "hard"):
                v = val_loss(looper, adapter, tok, val[l], P_BY_LABEL[l])
                print(f"  val@{step}: {l}={v:.3f}", flush=True)
            torch.save(adapter.state_dict(),
                       OUT / f"adapter_{TAG}_e{step+1}.pt")
            json.dump(log, open(OUT / f"train_{TAG}_log.json", "w"))
    print("done", flush=True)


if __name__ == "__main__":
    main()