//! Certificación visual del **humanoide voxel redondeado** ([`humanoide_voxel`]): el ser
//! estilizado que aprovecha el bisel/isosuperficie sub-voxel para un look vinyl-toy/chibi
//! CON carácter (no cajas Minecraft, no busto fotográfico = no valle). Rinde varios
//! arquetipos/edades/gestos a PNG y certifica por stats de cobertura.
//!
//! Diseño anclado en literatura (Kindchenschema, canon de cabezas, shape language) — ver
//! el módulo `humano`. Es el caso que amerita render (Regla 8): un visual NUEVO que no se
//! certifica de otra forma.
//!
//! `cargo run -p llimphi-voxel --example ser_estilizado --release`

use std::fs::File;
use std::io::BufWriter;

use llimphi_3d::glam::Vec3;
use llimphi_3d::{Camera3d, VoxelGrid, VoxelRenderer};
use llimphi_hal::{wgpu, Hal};
use llimphi_raster::peniko::Color;
use llimphi_raster::{vello, Renderer};
use llimphi_voxel::{humanoide_voxel, Clip, Colores, EstiloSer, Pose};

const W: u32 = 640;
const H: u32 = 720;
const FMT: wgpu::TextureFormat = wgpu::TextureFormat::Rgba8Unorm;
const BG: [u8; 3] = [22, 26, 36];

fn env_f(k: &str, d: f32) -> f32 {
    std::env::var(k).ok().and_then(|s| s.parse().ok()).unwrap_or(d)
}

fn main() {
    let hal = pollster::block_on(Hal::new(None)).expect("hal");
    let mut renderer = Renderer::new(&hal).expect("renderer");
    let dir = std::env::var("CLAUDE_JOB_DIR").map(|d| format!("{d}/tmp")).unwrap_or("/tmp".into());

    // Piel/ropa de muestra (lo que la foto regularía).
    let col = Colores::nuevos([0.90, 0.72, 0.58], [0.22, 0.60, 0.72], [0.20, 0.24, 0.36]);

    // Batería: (etiqueta, estilo, pose). Idle expresivo, gestos, arquetipos, edades.
    let idle = Pose::default();
    let saludo = Clip::Wave.pose(1.2);
    let festejo = Clip::Cheer.pose(1.0);
    let casos: [(&str, EstiloSer, Pose); 6] = [
        ("chibi_amable", EstiloSer::amable(), idle),
        ("chibi_saludo", EstiloSer::amable(), saludo),
        ("chibi_festejo", EstiloSer::amable(), festejo),
        ("robusto", EstiloSer::robusto(), idle),
        ("agil", EstiloSer::agil(), saludo),
        ("bebe", EstiloSer::por_edad(llimphi_voxel::Age::Baby), idle),
    ];

    let altura = env_f("ALT", 72.0) as u32; // igual que el preview del studio (nivel Seres)
    println!("ser_estilizado — humanoide voxel redondeado (bisel + silueta por voxel) ALT={altura}");
    for (nombre, estilo, pose) in &casos {
        let g = humanoide_voxel(estilo, pose, altura, col);
        let dim = g.dim();
        let solids = count_solids(&g);
        let px = render_ser(&hal, &mut renderer, &g, dim);
        let cov = coverage(&px);
        let out = format!("{dir}/ser_{nombre}.png");
        write_png(&px, &out);
        println!(
            "  {nombre:14} cabezas={:.1} dim={dim:?} voxels={solids} → {cov} px cubiertos → {out}",
            estilo.cabezas
        );
        assert!(solids > 1500, "{nombre}: el ser tiene volumen");
        assert!(cov > 4000, "{nombre}: se renderizó ({cov} px)");
    }
    println!("✓ certificado: seres redondeados con gramática sub-voxel (sin cajas, sin valle).");
}

fn count_solids(g: &VoxelGrid) -> usize {
    let [w, h, d] = g.dim();
    let mut n = 0;
    for x in 0..w {
        for y in 0..h {
            for z in 0..d {
                if g.is_solid(x as i32, y as i32, z as i32) {
                    n += 1;
                }
            }
        }
    }
    n
}

/// Renderiza el ser de frente-3/4, con bisel global alto (enciende el trazado de
/// isosuperficie) + silueta por voxel (el bisel del ser redondea el CONTORNO) + rugosidad
/// leve (grano de piel). Cámara 3/4 (anti-twinning: el 3/4 evita el aplanado frontal).
fn render_ser(hal: &Hal, renderer: &mut Renderer, grid: &VoxelGrid, dim: [u32; 3]) -> Vec<u8> {
    let mut vr = VoxelRenderer::new(&hal.device, &hal.queue, FMT, grid);
    vr.bisel = env_f("BIS", 0.9); // global: enciende trace_smooth (la silueta por voxel lo necesita)
    // Mismos valores que el studio (nivel Seres): rugosidad GLOBAL 0 — el ser sólo lleva su grano
    // horneado por voxel (0.06 de `EstiloSer::detalle`). Con RUG global alto se veía como escamas.
    vr.rugosidad_amp = env_f("RUG", 0.0);
    vr.rugosidad_freq = 1.7;
    vr.silueta_por_voxel = env_f("SIL", 1.0) > 0.5;
    vr.ao_amount = env_f("AO", 0.28); // seres redondeados: poca AO (la axial anilla la esfera)
    vr.sun_dir = normalize([0.4, 0.6, 0.7]);

    let alto = dim[1] as f32;
    // Mirar al centro del cuerpo (~55% de la altura: torso/cara, no los pies).
    let look = Vec3::new(0.0, alto * 0.05, 0.0);
    let camera = Camera3d::orbit(look, 28_f32.to_radians(), 10_f32.to_radians(), alto * 2.0);

    let inter = hal.device.create_texture(&wgpu::TextureDescriptor {
        label: Some("inter"),
        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::TEXTURE_BINDING
            | wgpu::TextureUsages::RENDER_ATTACHMENT
            | wgpu::TextureUsages::COPY_SRC,
        view_formats: &[],
    });
    let view = inter.create_view(&wgpu::TextureViewDescriptor::default());
    let base = vello::Scene::new();
    renderer
        .render_to_view(hal, &base, &view, W, H, Color::from_rgba8(BG[0], BG[1], BG[2], 255))
        .expect("base");
    let mut enc = hal.device.create_command_encoder(&wgpu::CommandEncoderDescriptor { label: None });
    vr.render(&hal.device, &hal.queue, &mut enc, &view, (W, H), &camera);
    hal.queue.submit(std::iter::once(enc.finish()));
    let _ = hal.device.poll(wgpu::PollType::wait_indefinitely());
    readback(hal, &inter)
}

fn normalize(v: [f32; 3]) -> [f32; 3] {
    let l = (v[0] * v[0] + v[1] * v[1] + v[2] * v[2]).sqrt().max(1e-6);
    [v[0] / l, v[1] / l, v[2] / l]
}

fn coverage(px: &[u8]) -> usize {
    (0..(W * H) as usize)
        .filter(|&i| {
            let o = i * 4;
            (px[o] as i32 - BG[0] as i32).abs()
                + (px[o + 1] as i32 - BG[1] as i32).abs()
                + (px[o + 2] as i32 - BG[2] as i32).abs()
                > 12
        })
        .count()
}

fn readback(hal: &Hal, target: &wgpu::Texture) -> Vec<u8> {
    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);
    });
    let _ = 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();
    pixels
}

fn write_png(pixels: &[u8], path: &str) {
    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();
}