//! Filmstrip headless de **animaciones implícitas**, tres filas:
//!
//! - **Fila 1** — `View::animated`: el mismo nodo cuyo `fill` cambia de rojo a
//!   azul, reconciliado a 6 instantes crecientes — crossfade rojo→púrpura→azul.
//! - **Fila 2** — `View::animated_enter`: el fade-in de ENTRADA de un nodo, de
//!   opacidad 0 a opaco, a los mismos 6 progresos.
//! - **Fila 3** — `View::animated_exit`: el fade-out de SALIDA de un nodo
//!   (capturado mientras vivía, reproducido como fantasma), de opaco a 0.
//!
//! Prueba el camino completo View.animated[_enter|_exit] → AnimRegistry →
//! paint/paint_range/replay_ghosts → píxeles.
//!
//! `cargo run -p llimphi-compositor --example anim_demo -- [out.png]`

use std::fs::File;
use std::io::BufWriter;
use std::time::{Duration, Instant};

use llimphi_compositor::{mount, paint, paint_range, AnimRegistry, View};
use llimphi_hal::{wgpu, Hal};
use llimphi_layout::taffy::prelude::{length, FlexDirection, Size, Style};
use llimphi_layout::taffy::{AlignItems, JustifyContent};
use llimphi_layout::LayoutTree;
use llimphi_raster::peniko::Color;
use llimphi_raster::{vello, Renderer};
use llimphi_text::{Alignment, Typesetter};
use vello::kurbo::Affine;

const W: u32 = 1180;
const H: u32 = 580;
/// Y de la fila de crossfade, de fade-in de entrada y de fade-out de salida.
const ROW_FADE_Y: f64 = 40.0;
const ROW_ENTER_Y: f64 = 220.0;
const ROW_EXIT_Y: f64 = 400.0;
const FMT: wgpu::TextureFormat = wgpu::TextureFormat::Rgba8Unorm;
const FRAMES: usize = 6;
const DUR: Duration = Duration::from_millis(500);

fn rgb(r: u8, g: u8, b: u8) -> Color {
    Color::from_rgba8(r, g, b, 255)
}

/// Una tarjeta animada (key=1) con `fill`, transladada (vía `transform`) a su
/// columna `i` y con el `fill` que la `view` "quiere" este frame.
fn card_shell(col: usize, row_y: f64, label: &str, fg: Color) -> View<()> {
    View::<()>::new(Style {
        size: Size { width: length(170.0), height: length(140.0) },
        align_items: Some(AlignItems::Center),
        justify_content: Some(JustifyContent::Center),
        flex_direction: FlexDirection::Column,
        ..Default::default()
    })
    .transform(Affine::translate((20.0 + col as f64 * 190.0, row_y)))
    .radius(18.0)
    .children(vec![View::<()>::new(Style {
        size: Size { width: length(150.0), height: length(20.0) },
        ..Default::default()
    })
    .text_aligned(label.to_string(), 13.0, fg, Alignment::Center)])
}

fn card(fill: Color, col: usize, label: &str, fg: Color) -> View<()> {
    card_shell(col, ROW_FADE_Y, label, fg).fill(fill).animated(1, DUR)
}

/// Tarjeta con animación de ENTRADA: su primera aparición sube de opacidad 0
/// a opaco. La key se varía por columna (key=10+col) para que cada registro la
/// trate como una entrada nueva e independiente.
fn card_enter(col: usize, label: &str, fg: Color) -> View<()> {
    card_shell(col, ROW_ENTER_Y, label, fg)
        .fill(rgb(60, 90, 220))
        .animated_enter(10 + col as u64, DUR)
}

/// Tarjeta con animación de SALIDA: cuando desaparece, el runtime reproduce su
/// subescena capturada con opacidad decreciente. Verde para distinguir la fila.
fn card_exit(col: usize, label: &str, fg: Color) -> View<()> {
    card_shell(col, ROW_EXIT_Y, label, fg)
        .fill(rgb(40, 160, 90))
        .animated_exit(20 + col as u64, DUR)
}

fn main() {
    let out = std::env::args().nth(1).unwrap_or_else(|| "anim.png".to_string());
    let red = rgb(220, 60, 60);
    let blue = rgb(60, 90, 220);
    let white = rgb(245, 245, 250);

    // Un registro por columna: cada uno se asienta en rojo y arranca el tween
    // a azul en t0, pero se OBSERVA a un instante distinto (i * paso). Así el
    // filmstrip muestra la misma transición a 6 progresos.
    let t0 = Instant::now();
    let step = DUR / (FRAMES as u32 - 1);

    let mut cards = Vec::new();
    for i in 0..FRAMES {
        let mut reg = AnimRegistry::new();
        // Frame de asentamiento (rojo) en t0.
        {
            let mut layout = LayoutTree::new();
            let mut m = mount(&mut layout, card(red, i, "", white));
            reg.reconcile(&mut m, t0);
        }
        // Frame de detección del cambio a azul (arranca el reloj en t0).
        {
            let mut layout = LayoutTree::new();
            let mut m = mount(&mut layout, card(blue, i, "", white));
            reg.reconcile(&mut m, t0);
        }
        // Frame de observación: el nodo `card` se reconcilia a t0 + i*paso y su
        // `fill` queda con el valor interpolado. Lo dejamos para pintar.
        let now = t0 + step * i as u32;
        let pct = (i as f32 / (FRAMES as f32 - 1.0) * 100.0).round() as i32;
        let mut layout = LayoutTree::new();
        let mut m = mount(&mut layout, card(blue, i, &format!("{pct}%"), white));
        let computed = layout.compute(m.root, (W as f32, H as f32)).expect("layout");
        reg.reconcile(&mut m, now);
        cards.push((m, computed));

        // Fila de entrada: la PRIMERA aparición ARRANCA el tween (en t0), así
        // que el frame de observación a `now` ve el progreso correcto. Si se
        // reconciliara una sola vez en `now`, el tween arrancaría y se
        // observaría en el mismo instante → siempre t=0 (invisible).
        let mut reg_enter = AnimRegistry::new();
        {
            let mut layout = LayoutTree::new();
            let mut me = mount(&mut layout, card_enter(i, "", white));
            reg_enter.reconcile(&mut me, t0);
        }
        let mut layout = LayoutTree::new();
        let mut me = mount(&mut layout, card_enter(i, &format!("{pct}%"), white));
        let computed = layout.compute(me.root, (W as f32, H as f32)).expect("layout");
        reg_enter.reconcile(&mut me, now);
        cards.push((me, computed));
    }

    // Fila de SALIDA: cada columna corre el ciclo real captura→fantasma→replay.
    // (1) frame VIVO en t0: se reconcilia y se captura su subescena con
    // `paint_range`. (2) frame AUSENTE en t0: la key desaparece → se promueve a
    // fantasma (start=t0). (3) `replay_ghosts` a t0+paso·i lo pinta con la
    // opacidad decreciente sobre `ghost_scene`, que luego se compone.
    let mut ts_exit = Typesetter::new();
    let mut ghost_scene = vello::Scene::new();
    for i in 0..FRAMES {
        let mut reg = AnimRegistry::new();
        // (1) Vivo: reconcilia y captura su subárbol (root = idx 0).
        {
            let mut layout = LayoutTree::new();
            let mut mv = mount(&mut layout, card_exit(i, "", white));
            let computed = layout.compute(mv.root, (W as f32, H as f32)).expect("layout");
            reg.reconcile(&mut mv, t0);
            let n = mv.nodes.len();
            let mut sub = vello::Scene::new();
            paint_range(&mut sub, &mv, &computed, &mut ts_exit, None, None, 0, n, Affine::IDENTITY);
            reg.store_live_exit(20 + i as u64, sub, DUR, llimphi_compositor::ease_out_cubic);
        }
        // (2) Ausente: la key se va → fantasma con start=t0.
        {
            let mut layout = LayoutTree::new();
            let mut empty = mount(&mut layout, card_shell(i, ROW_EXIT_Y, "", white));
            layout.compute(empty.root, (W as f32, H as f32)).expect("layout");
            reg.reconcile(&mut empty, t0);
        }
        // (3) Observación: el fantasma se reproduce al progreso `now`.
        let now = t0 + step * i as u32;
        let pct = (i as f32 / (FRAMES as f32 - 1.0) * 100.0).round() as i32;
        reg.replay_ghosts(&mut ghost_scene, now, W as f32, H as f32);
        // Rótulo del progreso sobre la tarjeta (fuera del fantasma, siempre nítido).
        let mut layout = LayoutTree::new();
        let mut lbl = mount(&mut layout, card_shell(i, ROW_EXIT_Y, &format!("{pct}%"), rgb(40, 50, 60)));
        let lc = layout.compute(lbl.root, (W as f32, H as f32)).expect("layout");
        // Sólo el texto (sin fill): reusa la tarjeta vacía como portador del label.
        lbl.nodes[0].fill = None;
        cards.push((lbl, lc));
    }

    // Pinta las columnas (cada una su árbol ya reconciliado) en una escena, y
    // por debajo de los rótulos compone los fantasmas de la fila de salida.
    let mut ts = Typesetter::new();
    let mut scene = vello::Scene::new();
    scene.append(&ghost_scene, None);
    for (m, computed) in &cards {
        paint(&mut scene, m, computed, &mut ts, None, None);
    }

    // Volcado a PNG.
    let hal = pollster::block_on(Hal::new(None)).expect("hal");
    let mut renderer = Renderer::new(&hal).expect("renderer");
    let target = hal.device.create_texture(&wgpu::TextureDescriptor {
        label: Some("dump-anim"),
        size: wgpu::Extent3d { width: W, height: H, depth_or_array_layers: 1 },
        mip_level_count: 1,
        sample_count: 1,
        dimension: wgpu::TextureDimension::D2,
        format: FMT,
        usage: wgpu::TextureUsages::STORAGE_BINDING
            | wgpu::TextureUsages::RENDER_ATTACHMENT
            | wgpu::TextureUsages::COPY_SRC,
        view_formats: &[],
    });
    let view = target.create_view(&wgpu::TextureViewDescriptor::default());
    let bg = rgb(244, 245, 248);
    renderer.render_to_view(&hal, &scene, &view, W, H, bg).expect("render_to_view");
    write_png(&hal, &target, &out);
    eprintln!(
        "anim_demo: escrito {out} ({W}x{H}) — fila 1: crossfade rojo→azul · \
         fila 2: fade-in de entrada · fila 3: fade-out de salida · {FRAMES} pasos"
    );
}

fn write_png(hal: &Hal, target: &wgpu::Texture, path: &str) {
    let unpadded = (W * 4) as usize;
    let align = wgpu::COPY_BYTES_PER_ROW_ALIGNMENT as usize;
    let padded = unpadded.div_ceil(align) * align;
    let buf = hal.device.create_buffer(&wgpu::BufferDescriptor {
        label: Some("readback"),
        size: (padded * H as usize) as u64,
        usage: wgpu::BufferUsages::MAP_READ | wgpu::BufferUsages::COPY_DST,
        mapped_at_creation: false,
    });
    let mut enc = hal
        .device
        .create_command_encoder(&wgpu::CommandEncoderDescriptor { label: None });
    enc.copy_texture_to_buffer(
        wgpu::TexelCopyTextureInfo {
            texture: target,
            mip_level: 0,
            origin: wgpu::Origin3d::ZERO,
            aspect: wgpu::TextureAspect::All,
        },
        wgpu::TexelCopyBufferInfo {
            buffer: &buf,
            layout: wgpu::TexelCopyBufferLayout {
                offset: 0,
                bytes_per_row: Some(padded as u32),
                rows_per_image: Some(H),
            },
        },
        wgpu::Extent3d { width: W, height: H, depth_or_array_layers: 1 },
    );
    hal.queue.submit(std::iter::once(enc.finish()));
    let slice = buf.slice(..);
    let (tx, rx) = std::sync::mpsc::channel();
    slice.map_async(wgpu::MapMode::Read, move |r| {
        let _ = tx.send(r);
    });
    hal.device.poll(wgpu::PollType::wait_indefinitely());
    rx.recv().unwrap().unwrap();
    let data = slice.get_mapped_range();
    let mut pixels = Vec::with_capacity((W * H * 4) as usize);
    for row in 0..H as usize {
        let s = row * padded;
        pixels.extend_from_slice(&data[s..s + unpadded]);
    }
    drop(data);
    buf.unmap();
    let file = File::create(path).expect("png");
    let mut enc = png::Encoder::new(BufWriter::new(file), W, H);
    enc.set_color(png::ColorType::Rgba);
    enc.set_depth(png::BitDepth::Eight);
    let mut w = enc.write_header().unwrap();
    w.write_image_data(&pixels).unwrap();
}