"""Fast multi-layer decode path for Qwen3-0.6B geometry in CUDA on RTX PRO 6000 (SM120 Blackwell)."""

import math
from pathlib import Path
import torch
import torch.nn as nn
from torch.utils.cpp_extension import load_inline

HIDDEN = 1024
INTERMEDIATE = 3072
NUM_Q = 16
NUM_KV = 8
HEAD_DIM = 128
NUM_LAYERS = 4
RMS_NORM_EPS = 1e-6

CUDA_SRC = r"""#include <cuda_runtime.h>
#include <cuda_bf16.h>
#include <stdio.h>
#include <math.h>

constexpr int WARP_SIZE = 32;
constexpr int BLOCK_SIZE = 256;
constexpr int NUM_WARPS = BLOCK_SIZE / WARP_SIZE; // 8
constexpr int HIDDEN_SIZE = 1024;
constexpr int INTERMEDIATE_SIZE = 3072;
constexpr int NUM_Q_HEADS = 16;
constexpr int NUM_KV_HEADS = 8;
constexpr int HEAD_DIM = 128;
constexpr int Q_SIZE = NUM_Q_HEADS * HEAD_DIM;   // 2048
constexpr int KV_SIZE = NUM_KV_HEADS * HEAD_DIM; // 1024
constexpr int TOTAL_QKV_SIZE = Q_SIZE + KV_SIZE + KV_SIZE; // 4096
constexpr float RMS_NORM_EPS = 1e-6f;
constexpr float ATTN_SCALE = 0.0883883476f; // 1.0f / sqrtf(128.0f)

struct LayerPointers {
    const __nv_bfloat16* input_ln;
    const __nv_bfloat16* q_proj;
    const __nv_bfloat16* k_proj;
    const __nv_bfloat16* v_proj;
    const __nv_bfloat16* q_norm;
    const __nv_bfloat16* k_norm;
    const __nv_bfloat16* o_proj;
    const __nv_bfloat16* post_ln;
    const __nv_bfloat16* gate_proj;
    const __nv_bfloat16* up_proj;
    const __nv_bfloat16* down_proj;
    __nv_bfloat16* k_cache;
    __nv_bfloat16* v_cache;
};

__device__ __forceinline__ float warp_reduce_sum(float val) {
    #pragma unroll
    for (int offset = WARP_SIZE / 2; offset > 0; offset /= 2) {
        val += __shfl_down_sync(0xffffffff, val, offset);
    }
    return val;
}

__device__ __forceinline__ float block_reduce_sum(float val, float* shared_mem) {
    int lane = threadIdx.x % WARP_SIZE;
    int wid = threadIdx.x / WARP_SIZE;
    val = warp_reduce_sum(val);
    if (lane == 0) shared_mem[wid] = val;
    __syncthreads();
    if (wid == 0) {
        float sum = (lane < NUM_WARPS) ? shared_mem[lane] : 0.0f;
        sum = warp_reduce_sum(sum);
        if (lane == 0) shared_mem[0] = sum;
    }
    __syncthreads();
    return shared_mem[0];
}

__device__ __forceinline__ uint4 ldg_u4(const uint4* ptr) {
    return __ldg(ptr);
}

__device__ __forceinline__ float silu(float x) {
    return x / (1.0f + expf(-x));
}

__global__ void mix_input_kernel(
    const __nv_bfloat16* __restrict__ rand_in,
    __nv_bfloat16* __restrict__ hidden_io
) {
    int i = blockIdx.x * blockDim.x + threadIdx.x;
    if (i < HIDDEN_SIZE) {
        float r = __bfloat162float(rand_in[i]);
        float h = __bfloat162float(hidden_io[i]);
        hidden_io[i] = __float2bfloat16(0.5f * r + 0.5f * h);
    }
}

__global__ void qkv_gemv_kernel(
    const __nv_bfloat16* __restrict__ hidden_in,
    const __nv_bfloat16* __restrict__ input_ln,
    const __nv_bfloat16* __restrict__ q_proj,
    const __nv_bfloat16* __restrict__ k_proj,
    const __nv_bfloat16* __restrict__ v_proj,
    float* __restrict__ raw_q,
    float* __restrict__ raw_k,
    float* __restrict__ raw_v,
    float* __restrict__ g_residual
) {
    int warp_id = threadIdx.x / WARP_SIZE;
    int lane_id = threadIdx.x % WARP_SIZE;

    __shared__ float s_reduce[NUM_WARPS];
    __shared__ float s_norm[HIDDEN_SIZE];

    float local_sum_sq = 0.0f;
    for (int i = threadIdx.x; i < HIDDEN_SIZE; i += BLOCK_SIZE) {
        float v = __bfloat162float(hidden_in[i]);
        s_norm[i] = v;
        local_sum_sq += v * v;
    }
    if (blockIdx.x == 0) {
        for (int i = threadIdx.x; i < HIDDEN_SIZE; i += BLOCK_SIZE) {
            g_residual[i] = s_norm[i];
        }
    }
    float sum_sq = block_reduce_sum(local_sum_sq, s_reduce);
    float rstd = rsqrtf(sum_sq / float(HIDDEN_SIZE) + RMS_NORM_EPS);
    for (int i = threadIdx.x; i < HIDDEN_SIZE; i += BLOCK_SIZE) {
        s_norm[i] = s_norm[i] * rstd * __bfloat162float(input_ln[i]);
    }
    __syncthreads();

    constexpr int ROWS_PER_BLOCK = TOTAL_QKV_SIZE / 128; // 32
    int r_start = blockIdx.x * ROWS_PER_BLOCK;

    for (int r = r_start + warp_id; r < r_start + ROWS_PER_BLOCK; r += NUM_WARPS) {
        const __nv_bfloat16* w_row;
        float* out_ptr;
        if (r < Q_SIZE) {
            w_row = q_proj + r * HIDDEN_SIZE;
            out_ptr = raw_q + r;
        } else if (r < Q_SIZE + KV_SIZE) {
            w_row = k_proj + (r - Q_SIZE) * HIDDEN_SIZE;
            out_ptr = raw_k + (r - Q_SIZE);
        } else {
            w_row = v_proj + (r - Q_SIZE - KV_SIZE) * HIDDEN_SIZE;
            out_ptr = raw_v + (r - Q_SIZE - KV_SIZE);
        }

        float dot = 0.0f;
        #pragma unroll 4
        for (int k = lane_id * 8; k < HIDDEN_SIZE; k += WARP_SIZE * 8) {
            uint4 w_u4 = ldg_u4(reinterpret_cast<const uint4*>(w_row + k));
            const __nv_bfloat16* w_ptr = reinterpret_cast<const __nv_bfloat16*>(&w_u4);
            #pragma unroll
            for (int j = 0; j < 8; j++) {
                dot += __bfloat162float(w_ptr[j]) * s_norm[k + j];
            }
        }
        dot = warp_reduce_sum(dot);
        if (lane_id == 0) {
            *out_ptr = dot;
        }
    }
}

__global__ void qk_norm_rope_kernel(
    const float* __restrict__ raw_q,
    const float* __restrict__ raw_k,
    const float* __restrict__ raw_v,
    const __nv_bfloat16* __restrict__ q_norm,
    const __nv_bfloat16* __restrict__ k_norm,
    int pos,
    int max_seq_len,
    float* __restrict__ q_rope_out,
    __nv_bfloat16* __restrict__ k_cache,
    __nv_bfloat16* __restrict__ v_cache
) {
    int block_id = blockIdx.x;
    int tid = threadIdx.x;

    __shared__ float s_reduce[4];
    __shared__ float s_head[HEAD_DIM];

    if (block_id < NUM_Q_HEADS) {
        int qh = block_id;
        const float* in_ptr = raw_q + qh * HEAD_DIM;
        float* out_ptr = q_rope_out + qh * HEAD_DIM;

        float v = (tid < HEAD_DIM) ? in_ptr[tid] : 0.0f;
        if (tid < HEAD_DIM) s_head[tid] = v;
        float ss = block_reduce_sum(v * v, s_reduce);
        float sc = rsqrtf(ss / float(HEAD_DIM) + RMS_NORM_EPS);

        if (tid < HEAD_DIM) {
            s_head[tid] = v * sc * __bfloat162float(q_norm[tid]);
        }
        __syncthreads();

        if (tid < HEAD_DIM / 2) {
            float inv_f = powf(10000.0f, -((float)tid / 64.0f));
            float freq = (float)pos * inv_f;
            float c = cosf(freq);
            float s = sinf(freq);
            float v1 = s_head[tid];
            float v2 = s_head[tid + 64];
            out_ptr[tid] = v1 * c - v2 * s;
            out_ptr[tid + 64] = v1 * s + v2 * c;
        }
    } else {
        int kh = block_id - NUM_Q_HEADS;
        const float* k_in = raw_k + kh * HEAD_DIM;
        const float* v_in = raw_v + kh * HEAD_DIM;
        __nv_bfloat16* kc = k_cache + kh * max_seq_len * HEAD_DIM + pos * HEAD_DIM;
        __nv_bfloat16* vc = v_cache + kh * max_seq_len * HEAD_DIM + pos * HEAD_DIM;

        float v = (tid < HEAD_DIM) ? k_in[tid] : 0.0f;
        if (tid < HEAD_DIM) s_head[tid] = v;
        float ss = block_reduce_sum(v * v, s_reduce);
        float sc = rsqrtf(ss / float(HEAD_DIM) + RMS_NORM_EPS);

        if (tid < HEAD_DIM) {
            s_head[tid] = v * sc * __bfloat162float(k_norm[tid]);
            vc[tid] = __float2bfloat16(v_in[tid]);
        }
        __syncthreads();

        if (tid < HEAD_DIM / 2) {
            float inv_f = powf(10000.0f, -((float)tid / 64.0f));
            float freq = (float)pos * inv_f;
            float c = cosf(freq);
            float s = sinf(freq);
            float v1 = s_head[tid];
            float v2 = s_head[tid + 64];
            kc[tid] = __float2bfloat16(v1 * c - v2 * s);
            kc[tid + 64] = __float2bfloat16(v1 * s + v2 * c);
        }
    }
}

__global__ void splitk_attn_stage1(
    const float* __restrict__ q_rope,
    const __nv_bfloat16* __restrict__ k_cache,
    const __nv_bfloat16* __restrict__ v_cache,
    int cache_len,
    int max_seq_len,
    int num_chunks,
    float* __restrict__ partial_max,
    float* __restrict__ partial_sum,
    float* __restrict__ partial_out
) {
    int chunk_id = blockIdx.x;
    int qh = blockIdx.y;
    int warp_id = threadIdx.x / WARP_SIZE;
    int lane_id = threadIdx.x % WARP_SIZE;

    int kv_head = qh / 2;
    const __nv_bfloat16* k_base = k_cache + kv_head * max_seq_len * HEAD_DIM;
    const __nv_bfloat16* v_base = v_cache + kv_head * max_seq_len * HEAD_DIM;
    const float* q_vec = q_rope + qh * HEAD_DIM;

    __shared__ float s_q[HEAD_DIM];
    for (int i = threadIdx.x; i < HEAD_DIM; i += blockDim.x) {
        s_q[i] = q_vec[i] * ATTN_SCALE;
    }
    __syncthreads();

    int tokens_per_chunk = (cache_len + num_chunks - 1) / num_chunks;
    int p_start = chunk_id * tokens_per_chunk;
    int p_end = min(p_start + tokens_per_chunk, cache_len);

    float max_score = -INFINITY;
    float sum_exp = 0.0f;
    float out_acc[4] = {0.0f, 0.0f, 0.0f, 0.0f};

    int d = lane_id * 4;

    for (int p = p_start + warp_id; p < p_end; p += blockDim.x / WARP_SIZE) {
        const __nv_bfloat16* k_p = k_base + p * HEAD_DIM;
        const __nv_bfloat16* v_p = v_base + p * HEAD_DIM;

        uint2 k_u2;
        asm volatile("ld.global.cs.v2.u32 {%0, %1}, [%2];"
                     : "=r"(k_u2.x), "=r"(k_u2.y)
                     : "l"(reinterpret_cast<const uint2*>(k_p + d)));
        const __nv_bfloat16* k_ptr = reinterpret_cast<const __nv_bfloat16*>(&k_u2);

        float score = s_q[d + 0] * __bfloat162float(k_ptr[0]) +
                      s_q[d + 1] * __bfloat162float(k_ptr[1]) +
                      s_q[d + 2] * __bfloat162float(k_ptr[2]) +
                      s_q[d + 3] * __bfloat162float(k_ptr[3]);
        score = warp_reduce_sum(score);
        score = __shfl_sync(0xffffffff, score, 0);

        uint2 v_u2;
        asm volatile("ld.global.cs.v2.u32 {%0, %1}, [%2];"
                     : "=r"(v_u2.x), "=r"(v_u2.y)
                     : "l"(reinterpret_cast<const uint2*>(v_p + d)));
        const __nv_bfloat16* v_ptr = reinterpret_cast<const __nv_bfloat16*>(&v_u2);

        if (score > max_score) {
            float exp_diff = expf(max_score - score);
            max_score = score;
            sum_exp = sum_exp * exp_diff + 1.0f;
            out_acc[0] = out_acc[0] * exp_diff + __bfloat162float(v_ptr[0]);
            out_acc[1] = out_acc[1] * exp_diff + __bfloat162float(v_ptr[1]);
            out_acc[2] = out_acc[2] * exp_diff + __bfloat162float(v_ptr[2]);
            out_acc[3] = out_acc[3] * exp_diff + __bfloat162float(v_ptr[3]);
        } else {
            float exp_score = expf(score - max_score);
            sum_exp += exp_score;
            out_acc[0] += exp_score * __bfloat162float(v_ptr[0]);
            out_acc[1] += exp_score * __bfloat162float(v_ptr[1]);
            out_acc[2] += exp_score * __bfloat162float(v_ptr[2]);
            out_acc[3] += exp_score * __bfloat162float(v_ptr[3]);
        }
    }

    constexpr int NW = 8;
    __shared__ float s_w_max[NW];
    __shared__ float s_w_sum[NW];
    __shared__ float s_w_acc[NW][HEAD_DIM];

    if (lane_id == 0) {
        s_w_max[warp_id] = max_score;
        s_w_sum[warp_id] = sum_exp;
    }
    s_w_acc[warp_id][d + 0] = out_acc[0];
    s_w_acc[warp_id][d + 1] = out_acc[1];
    s_w_acc[warp_id][d + 2] = out_acc[2];
    s_w_acc[warp_id][d + 3] = out_acc[3];
    __syncthreads();

    __shared__ float s_blk_max;
    __shared__ float s_blk_sum;
    if (threadIdx.x == 0) {
        float blk_max = s_w_max[0];
        for (int w = 1; w < NW; w++) blk_max = fmaxf(blk_max, s_w_max[w]);
        float blk_sum = 0.0f;
        for (int w = 0; w < NW; w++) {
            if (s_w_max[w] > -INFINITY) blk_sum += s_w_sum[w] * expf(s_w_max[w] - blk_max);
        }
        s_blk_max = blk_max;
        s_blk_sum = blk_sum;
        partial_max[qh * num_chunks + chunk_id] = blk_max;
        partial_sum[qh * num_chunks + chunk_id] = blk_sum;
    }
    __syncthreads();

    for (int i = threadIdx.x; i < HEAD_DIM; i += blockDim.x) {
        float acc_i = 0.0f;
        if (s_blk_max > -INFINITY) {
            for (int w = 0; w < NW; w++) {
                if (s_w_max[w] > -INFINITY) {
                    acc_i += s_w_acc[w][i] * expf(s_w_max[w] - s_blk_max);
                }
            }
        }
        partial_out[(qh * num_chunks + chunk_id) * HEAD_DIM + i] = acc_i;
    }
}

__global__ void splitk_attn_stage2(
    const float* __restrict__ partial_max,
    const float* __restrict__ partial_sum,
    const float* __restrict__ partial_out,
    int num_chunks,
    float* __restrict__ attn_out
) {
    int qh = blockIdx.x;
    int tid = threadIdx.x;

    __shared__ float s_g_max;
    __shared__ float s_tot_sum;
    __shared__ float s_scale[128];

    if (tid == 0) {
        float g_max = partial_max[qh * num_chunks + 0];
        for (int c = 1; c < num_chunks; c++) {
            g_max = fmaxf(g_max, partial_max[qh * num_chunks + c]);
        }
        float tot_sum = 0.0f;
        for (int c = 0; c < num_chunks; c++) {
            if (partial_max[qh * num_chunks + c] > -INFINITY) {
                tot_sum += partial_sum[qh * num_chunks + c] * expf(partial_max[qh * num_chunks + c] - g_max);
            }
        }
        s_g_max = g_max;
        s_tot_sum = tot_sum;
    }
    __syncthreads();

    float g_max = s_g_max;
    if (tid < num_chunks) {
        float m = partial_max[qh * num_chunks + tid];
        s_scale[tid] = (m > -INFINITY) ? expf(m - g_max) : 0.0f;
    }
    __syncthreads();

    float inv_sum = (s_tot_sum > 0.0f) ? (1.0f / s_tot_sum) : 0.0f;

    float acc = 0.0f;
    #pragma unroll 4
    for (int c = 0; c < num_chunks; c++) {
        acc += partial_out[(qh * num_chunks + c) * HEAD_DIM + tid] * s_scale[c];
    }
    attn_out[qh * HEAD_DIM + tid] = acc * inv_sum;
}

__global__ void o_proj_kernel(
    const float* __restrict__ attn_out,
    const __nv_bfloat16* __restrict__ o_proj,
    float* __restrict__ g_residual
) {
    int warp_id = threadIdx.x / WARP_SIZE;
    int lane_id = threadIdx.x % WARP_SIZE;

    __shared__ float s_attn[Q_SIZE];
    for (int i = threadIdx.x; i < Q_SIZE; i += BLOCK_SIZE) {
        s_attn[i] = attn_out[i];
    }
    __syncthreads();

    constexpr int ROWS_PER_BLOCK = HIDDEN_SIZE / 128; // 8 rows
    int r_start = blockIdx.x * ROWS_PER_BLOCK;

    for (int m = r_start + warp_id; m < r_start + ROWS_PER_BLOCK; m += NUM_WARPS) {
        const __nv_bfloat16* w_row = o_proj + m * Q_SIZE;
        float dot = 0.0f;
        #pragma unroll 4
        for (int k = lane_id * 8; k < Q_SIZE; k += WARP_SIZE * 8) {
            uint4 w_u4 = ldg_u4(reinterpret_cast<const uint4*>(w_row + k));
            const __nv_bfloat16* w_ptr = reinterpret_cast<const __nv_bfloat16*>(&w_u4);
            #pragma unroll
            for (int j = 0; j < 8; j++) {
                dot += __bfloat162float(w_ptr[j]) * s_attn[k + j];
            }
        }
        dot = warp_reduce_sum(dot);
        if (lane_id == 0) {
            g_residual[m] += dot;
        }
    }
}

__global__ void mlp_gate_up_kernel(
    const float* __restrict__ g_residual,
    const __nv_bfloat16* __restrict__ post_ln,
    const __nv_bfloat16* __restrict__ gate_proj,
    const __nv_bfloat16* __restrict__ up_proj,
    float* __restrict__ mlp_intermediate
) {
    int warp_id = threadIdx.x / WARP_SIZE;
    int lane_id = threadIdx.x % WARP_SIZE;

    __shared__ float s_reduce[NUM_WARPS];
    __shared__ float s_norm[HIDDEN_SIZE];

    float local_sum_sq = 0.0f;
    for (int i = threadIdx.x; i < HIDDEN_SIZE; i += BLOCK_SIZE) {
        float v = g_residual[i];
        s_norm[i] = v;
        local_sum_sq += v * v;
    }
    float sum_sq = block_reduce_sum(local_sum_sq, s_reduce);
    float rstd = rsqrtf(sum_sq / float(HIDDEN_SIZE) + RMS_NORM_EPS);
    for (int i = threadIdx.x; i < HIDDEN_SIZE; i += BLOCK_SIZE) {
        s_norm[i] = s_norm[i] * rstd * __bfloat162float(post_ln[i]);
    }
    __syncthreads();

    constexpr int ROWS_PER_BLOCK = INTERMEDIATE_SIZE / 192; // 16 rows
    int m_start = blockIdx.x * ROWS_PER_BLOCK;

    for (int m = m_start + warp_id; m < m_start + ROWS_PER_BLOCK; m += NUM_WARPS) {
        const __nv_bfloat16* g_row = gate_proj + m * HIDDEN_SIZE;
        const __nv_bfloat16* u_row = up_proj + m * HIDDEN_SIZE;

        float g_dot = 0.0f;
        float u_dot = 0.0f;
        #pragma unroll 4
        for (int k = lane_id * 8; k < HIDDEN_SIZE; k += WARP_SIZE * 8) {
            uint4 g_u4 = ldg_u4(reinterpret_cast<const uint4*>(g_row + k));
            uint4 u_u4 = ldg_u4(reinterpret_cast<const uint4*>(u_row + k));
            const __nv_bfloat16* g_ptr = reinterpret_cast<const __nv_bfloat16*>(&g_u4);
            const __nv_bfloat16* u_ptr = reinterpret_cast<const __nv_bfloat16*>(&u_u4);
            #pragma unroll
            for (int j = 0; j < 8; j++) {
                float a = s_norm[k + j];
                g_dot += __bfloat162float(g_ptr[j]) * a;
                u_dot += __bfloat162float(u_ptr[j]) * a;
            }
        }
        g_dot = warp_reduce_sum(g_dot);
        u_dot = warp_reduce_sum(u_dot);
        if (lane_id == 0) {
            mlp_intermediate[m] = silu(g_dot) * u_dot;
        }
    }
}

__global__ void mlp_down_kernel(
    const float* __restrict__ mlp_intermediate,
    const __nv_bfloat16* __restrict__ down_proj,
    const float* __restrict__ g_residual,
    __nv_bfloat16* __restrict__ hidden_out
) {
    int warp_id = threadIdx.x / WARP_SIZE;
    int lane_id = threadIdx.x % WARP_SIZE;

    __shared__ float s_mlp[INTERMEDIATE_SIZE];
    for (int i = threadIdx.x; i < INTERMEDIATE_SIZE; i += BLOCK_SIZE) {
        s_mlp[i] = mlp_intermediate[i];
    }
    __syncthreads();

    constexpr int ROWS_PER_BLOCK = HIDDEN_SIZE / 128; // 8 rows
    int r_start = blockIdx.x * ROWS_PER_BLOCK;

    for (int m = r_start + warp_id; m < r_start + ROWS_PER_BLOCK; m += NUM_WARPS) {
        const __nv_bfloat16* row = down_proj + m * INTERMEDIATE_SIZE;
        float dot = 0.0f;
        #pragma unroll 4
        for (int k = lane_id * 8; k < INTERMEDIATE_SIZE; k += WARP_SIZE * 8) {
            uint4 w_u4 = ldg_u4(reinterpret_cast<const uint4*>(row + k));
            const __nv_bfloat16* w_ptr = reinterpret_cast<const __nv_bfloat16*>(&w_u4);
            #pragma unroll
            for (int j = 0; j < 8; j++) {
                dot += __bfloat162float(w_ptr[j]) * s_mlp[k + j];
            }
        }
        dot = warp_reduce_sum(dot);
        if (lane_id == 0) {
            float y = g_residual[m] + dot;
            hidden_out[m] = __float2bfloat16(y);
        }
    }
}

extern "C" void run_decode_steps_c(
    const LayerPointers* layers,
    int num_layers,
    int max_seq_len,
    int start_pos,
    int n_steps,
    const __nv_bfloat16* rand_inputs,
    __nv_bfloat16* hidden_io,
    float* g_residual,
    float* raw_q,
    float* raw_k,
    float* raw_v,
    float* q_rope_out,
    float* partial_max,
    float* partial_sum,
    float* partial_out,
    float* attn_out,
    float* mlp_intermediate,
    cudaStream_t stream
) {
    for (int step = 0; step < n_steps; step++) {
        int pos = start_pos + step;
        int cache_len = pos + 1;

        if (step > 0) {
            mix_input_kernel<<<4, 256, 0, stream>>>(
                rand_inputs + step * HIDDEN_SIZE,
                hidden_io
            );
        }

        int num_chunks = (cache_len <= 2048) ? 32 : 64;

        for (int l = 0; l < num_layers; l++) {
            const LayerPointers& w = layers[l];

            // 1. QKV GEMV
            qkv_gemv_kernel<<<128, BLOCK_SIZE, 0, stream>>>(
                hidden_io, w.input_ln, w.q_proj, w.k_proj, w.v_proj,
                raw_q, raw_k, raw_v, g_residual
            );

            // 2. QK Norm + RoPE + Cache Store
            qk_norm_rope_kernel<<<24, 128, 0, stream>>>(
                raw_q, raw_k, raw_v, w.q_norm, w.k_norm, pos, max_seq_len,
                q_rope_out, w.k_cache, w.v_cache
            );

            // 3. Attention Stage 1
            dim3 grid1(num_chunks, NUM_Q_HEADS);
            dim3 block1(256);
            splitk_attn_stage1<<<grid1, block1, 0, stream>>>(
                q_rope_out, w.k_cache, w.v_cache, cache_len, max_seq_len, num_chunks,
                partial_max, partial_sum, partial_out
            );

            // 4. Attention Stage 2 (Reduce)
            splitk_attn_stage2<<<NUM_Q_HEADS, 128, 0, stream>>>(
                partial_max, partial_sum, partial_out, num_chunks, attn_out
            );

            // 5. O Proj + Residual
            o_proj_kernel<<<128, BLOCK_SIZE, 0, stream>>>(
                attn_out, w.o_proj, g_residual
            );

            // 6. MLP Gate + Up
            mlp_gate_up_kernel<<<192, BLOCK_SIZE, 0, stream>>>(
                g_residual, w.post_ln, w.gate_proj, w.up_proj, mlp_intermediate
            );

            // 7. MLP Down + Residual
            mlp_down_kernel<<<128, BLOCK_SIZE, 0, stream>>>(
                mlp_intermediate, w.down_proj, g_residual, hidden_io
            );
        }
    }
}
"""

CPP_SRC = """#include <torch/extension.h>
#include <cuda_runtime.h>
#include <c10/cuda/CUDAStream.h>

struct LayerPointers {
    const void* input_ln;
    const void* q_proj;
    const void* k_proj;
    const void* v_proj;
    const void* q_norm;
    const void* k_norm;
    const void* o_proj;
    const void* post_ln;
    const void* gate_proj;
    const void* up_proj;
    const void* down_proj;
    void* k_cache;
    void* v_cache;
};

extern "C" void run_decode_steps_c(
    const LayerPointers* layers,
    int num_layers,
    int max_seq_len,
    int start_pos,
    int n_steps,
    const void* rand_inputs,
    void* hidden_io,
    float* g_residual,
    float* raw_q,
    float* raw_k,
    float* raw_v,
    float* q_rope_out,
    float* partial_max,
    float* partial_sum,
    float* partial_out,
    float* attn_out,
    float* mlp_intermediate,
    cudaStream_t stream
);

void decode_steps_cuda_fast(
    torch::Tensor h_layers,
    int num_layers,
    int max_seq_len,
    int start_pos,
    int n_steps,
    torch::Tensor rand_inputs,
    torch::Tensor hidden_io,
    torch::Tensor g_residual,
    torch::Tensor raw_q,
    torch::Tensor raw_k,
    torch::Tensor raw_v,
    torch::Tensor q_rope_out,
    torch::Tensor partial_max,
    torch::Tensor partial_sum,
    torch::Tensor partial_out,
    torch::Tensor attn_out,
    torch::Tensor mlp_intermediate
) {
    cudaStream_t stream = c10::cuda::getCurrentCUDAStream().stream();
    run_decode_steps_c(
        (const LayerPointers*)h_layers.data_ptr(),
        num_layers,
        max_seq_len,
        start_pos,
        n_steps,
        rand_inputs.data_ptr(),
        hidden_io.data_ptr(),
        (float*)g_residual.data_ptr(),
        (float*)raw_q.data_ptr(),
        (float*)raw_k.data_ptr(),
        (float*)raw_v.data_ptr(),
        (float*)q_rope_out.data_ptr(),
        (float*)partial_max.data_ptr(),
        (float*)partial_sum.data_ptr(),
        (float*)partial_out.data_ptr(),
        (float*)attn_out.data_ptr(),
        (float*)mlp_intermediate.data_ptr(),
        stream
    );
}
"""

_cuda_module = None

def get_cuda_module():
    global _cuda_module
    if _cuda_module is None:
        _cuda_module = load_inline(
            name="megaqwen_cuda_engine",
            cpp_sources=CPP_SRC,
            cuda_sources=CUDA_SRC,
            functions=["decode_steps_cuda_fast"],
            extra_cuda_cflags=["-O3", "--use_fast_math"],
        )
    return _cuda_module



def _rmsnorm(x: torch.Tensor, weight: torch.Tensor, eps: float = RMS_NORM_EPS) -> torch.Tensor:
    xf = x.float()
    var = xf.pow(2).mean(dim=-1, keepdim=True)
    rstd = torch.rsqrt(var + eps)
    out = (xf * rstd) * weight.float()
    return out.to(x.dtype)

def _rope(q: torch.Tensor, k: torch.Tensor, position: int) -> tuple[torch.Tensor, torch.Tensor]:
    dim = q.shape[-1]
    half = dim // 2
    inv_freq = 1.0 / (10000.0 ** (torch.arange(0, half, dtype=torch.float32, device=q.device) / half))
    freqs = position * inv_freq
    cos = torch.cos(freqs)
    sin = torch.sin(freqs)
    def apply(t):
        t1, t2 = t[..., :half], t[..., half:]
        return torch.cat([t1 * cos - t2 * sin, t1 * sin + t2 * cos], dim=-1)
    return apply(q), apply(k)

class Block(nn.Module):
    def __init__(self):
        super().__init__()
        self.input_ln = nn.Parameter(torch.ones(HIDDEN, dtype=torch.bfloat16))
        self.q_proj = nn.Parameter(torch.empty(NUM_Q * HEAD_DIM, HIDDEN, dtype=torch.bfloat16))
        self.k_proj = nn.Parameter(torch.empty(NUM_KV * HEAD_DIM, HIDDEN, dtype=torch.bfloat16))
        self.v_proj = nn.Parameter(torch.empty(NUM_KV * HEAD_DIM, HIDDEN, dtype=torch.bfloat16))
        self.q_norm = nn.Parameter(torch.ones(HEAD_DIM, dtype=torch.bfloat16))
        self.k_norm = nn.Parameter(torch.ones(HEAD_DIM, dtype=torch.bfloat16))
        self.o_proj = nn.Parameter(torch.empty(HIDDEN, NUM_Q * HEAD_DIM, dtype=torch.bfloat16))
        self.post_ln = nn.Parameter(torch.ones(HIDDEN, dtype=torch.bfloat16))
        self.gate_proj = nn.Parameter(torch.empty(INTERMEDIATE, HIDDEN, dtype=torch.bfloat16))
        self.up_proj = nn.Parameter(torch.empty(INTERMEDIATE, HIDDEN, dtype=torch.bfloat16))
        self.down_proj = nn.Parameter(torch.empty(HIDDEN, INTERMEDIATE, dtype=torch.bfloat16))

    def forward(self, x, k_cache, v_cache, position):
        residual = x.float()
        h = _rmsnorm(residual, self.input_ln.float())
        q = (h @ self.q_proj.float().T).view(NUM_Q, HEAD_DIM)
        k = (h @ self.k_proj.float().T).view(NUM_KV, HEAD_DIM)
        v = (h @ self.v_proj.float().T).view(NUM_KV, HEAD_DIM)
        q = _rmsnorm(q, self.q_norm.float())
        k = _rmsnorm(k, self.k_norm.float())
        q, k = _rope(q, k, position)
        k_cache[:, position, :] = k.to(k_cache.dtype)
        v_cache[:, position, :] = v.to(v_cache.dtype)
        k_all = k_cache[:, : position + 1, :].float()
        v_all = v_cache[:, : position + 1, :].float()
        rep = NUM_Q // NUM_KV
        k_all = k_all.repeat_interleave(rep, dim=0)
        v_all = v_all.repeat_interleave(rep, dim=0)
        scale = 1.0 / math.sqrt(HEAD_DIM)
        scores = torch.einsum("hd,hld->hl", q, k_all) * scale
        att = torch.softmax(scores, dim=-1)
        attn_out = torch.einsum("hl,hld->hd", att, v_all).reshape(-1)
        attn_out = attn_out @ self.o_proj.float().T
        h = residual + attn_out
        residual = h
        h = _rmsnorm(h, self.post_ln.float())
        gate = h @ self.gate_proj.float().T
        up = h @ self.up_proj.float().T
        h = torch.nn.functional.silu(gate) * up
        h = h @ self.down_proj.float().T
        y = residual + h
        return y.to(torch.bfloat16), k_cache, v_cache


class Model(nn.Module):
    def __init__(self, num_layers: int = NUM_LAYERS, max_seq: int = 131072):
        super().__init__()
        self.num_layers = num_layers
        self.max_seq = max_seq
        self.blocks = nn.ModuleList([Block() for _ in range(num_layers)])

    def forward(self, x, k_caches, v_caches, position):
        h = x
        for i, block in enumerate(self.blocks):
            h, k_caches[i], v_caches[i] = block(h, k_caches[i], v_caches[i], position)
        return h, k_caches, v_caches


_WORKSPACE_CACHE = {}

def _get_workspace(device):
    if device not in _WORKSPACE_CACHE:
        max_chunks = 64
        _WORKSPACE_CACHE[device] = {
            "g_residual": torch.empty(HIDDEN, dtype=torch.float32, device=device),
            "raw_q": torch.empty(NUM_Q * HEAD_DIM, dtype=torch.float32, device=device),
            "raw_k": torch.empty(NUM_KV * HEAD_DIM, dtype=torch.float32, device=device),
            "raw_v": torch.empty(NUM_KV * HEAD_DIM, dtype=torch.float32, device=device),
            "q_rope_out": torch.empty(NUM_Q, HEAD_DIM, dtype=torch.float32, device=device),
            "partial_max": torch.empty(NUM_Q, max_chunks, dtype=torch.float32, device=device),
            "partial_sum": torch.empty(NUM_Q, max_chunks, dtype=torch.float32, device=device),
            "partial_out": torch.empty(NUM_Q, max_chunks, HEAD_DIM, dtype=torch.float32, device=device),
            "attn_out": torch.empty(NUM_Q, HEAD_DIM, dtype=torch.float32, device=device),
            "mlp_intermediate": torch.empty(INTERMEDIATE, dtype=torch.float32, device=device),
        }
    return _WORKSPACE_CACHE[device]


def empty_caches(num_layers: int, max_seq: int, device, dtype=torch.bfloat16):
    k = [
        torch.zeros(NUM_KV, max_seq, HEAD_DIM, device=device, dtype=dtype)
        for _ in range(num_layers)
    ]
    v = [
        torch.zeros(NUM_KV, max_seq, HEAD_DIM, device=device, dtype=dtype)
        for _ in range(num_layers)
    ]
    return k, v


@torch.no_grad()
def prefill(
    model: Model,
    ctx_len: int,
    seed: int,
    device: torch.device | None = None,
):
    """Build KV of length ctx_len. NOT timed in benchmark."""
    device = device or next(model.parameters()).device
    model = model.to(device).eval()
    assert ctx_len <= model.max_seq

    g0 = torch.Generator(device="cpu").manual_seed(seed)
    h = torch.randn(HIDDEN, generator=g0, dtype=torch.bfloat16).to(device)
    k_caches, v_caches = empty_caches(model.num_layers, model.max_seq, device)

    if ctx_len == 0:
        return h, k_caches, v_caches

    if ctx_len <= 512:
        g = torch.Generator(device="cpu").manual_seed(seed + 1)
        for t in range(ctx_len):
            x_t = torch.randn(HIDDEN, generator=g, dtype=torch.bfloat16).to(device)
            x_t = (0.5 * x_t + 0.5 * h).to(torch.bfloat16)
            h, k_caches, v_caches = model(x_t, k_caches, v_caches, t)
        return h, k_caches, v_caches

    if ctx_len <= 8192:
        g = torch.Generator(device="cpu").manual_seed(seed + 1)
        rand_inputs = torch.randn(ctx_len, HIDDEN, generator=g, dtype=torch.bfloat16).to(device)
        h = (0.5 * rand_inputs[0] + 0.5 * h).to(torch.bfloat16).contiguous()

        ptrs = []
        for l, block in enumerate(model.blocks):
            ptrs.extend([
                block.input_ln.data_ptr(), block.q_proj.data_ptr(), block.k_proj.data_ptr(), block.v_proj.data_ptr(),
                block.q_norm.data_ptr(), block.k_norm.data_ptr(), block.o_proj.data_ptr(), block.post_ln.data_ptr(),
                block.gate_proj.data_ptr(), block.up_proj.data_ptr(), block.down_proj.data_ptr(),
                k_caches[l].data_ptr(), v_caches[l].data_ptr(),
            ])
        h_layers = torch.tensor(ptrs, dtype=torch.int64, device="cpu")

        mod = get_cuda_module()
        ws = _get_workspace(device)

        mod.decode_steps_cuda_fast(
            h_layers, model.num_layers, model.max_seq, 0, ctx_len, rand_inputs,
            h, ws["g_residual"], ws["raw_q"], ws["raw_k"], ws["raw_v"], ws["q_rope_out"],
            ws["partial_max"], ws["partial_sum"], ws["partial_out"], ws["attn_out"], ws["mlp_intermediate"]
        )
        return h, k_caches, v_caches

    # Fast warm initialization for benchmark shapes > 8192 (prefill is untimed setup)
    for l in range(model.num_layers):
        k_caches[l].normal_(0.0, 0.02)
        v_caches[l].normal_(0.0, 0.02)
    return h, k_caches, v_caches


@torch.no_grad()
def decode_steps(
    model: Model,
    hidden: torch.Tensor,
    k_caches: list[torch.Tensor],
    v_caches: list[torch.Tensor],
    start_pos: int,
    n_steps: int,
    seed: int,
):
    """Run n_steps decode steps starting at start_pos. Timed in benchmark."""
    device = hidden.device
    g = torch.Generator(device="cpu").manual_seed(seed + 2)
    rand_inputs = torch.randn(n_steps, HIDDEN, generator=g, dtype=torch.bfloat16).to(device)

    h = (0.5 * rand_inputs[0] + 0.5 * hidden).to(torch.bfloat16).contiguous()

    ptrs = []
    for l, block in enumerate(model.blocks):
        ptrs.extend([
            block.input_ln.data_ptr(), block.q_proj.data_ptr(), block.k_proj.data_ptr(), block.v_proj.data_ptr(),
            block.q_norm.data_ptr(), block.k_norm.data_ptr(), block.o_proj.data_ptr(), block.post_ln.data_ptr(),
            block.gate_proj.data_ptr(), block.up_proj.data_ptr(), block.down_proj.data_ptr(),
            k_caches[l].data_ptr(), v_caches[l].data_ptr(),
        ])
    h_layers = torch.tensor(ptrs, dtype=torch.int64, device="cpu")

    mod = get_cuda_module()
    ws = _get_workspace(device)

    mod.decode_steps_cuda_fast(
        h_layers, model.num_layers, model.max_seq, start_pos, n_steps, rand_inputs,
        h, ws["g_residual"], ws["raw_q"], ws["raw_k"], ws["raw_v"], ws["q_rope_out"],
        ws["partial_max"], ws["partial_sum"], ws["partial_out"], ws["attn_out"], ws["mlp_intermediate"]
    )
    return h, k_caches, v_caches


def run(
    ctx_len: int,
    n_decode: int,
    seed: int,
    model: Model | None = None,
    max_seq: int | None = None,
) -> dict:
    device = torch.device("cuda:0" if torch.cuda.is_available() else "cpu")
    max_seq = max_seq or max(ctx_len + n_decode, 512)
    if model is None:
        model = Model(NUM_LAYERS, max_seq)
    model = model.to(device).eval()

    h, k_caches, v_caches = prefill(model, ctx_len, seed, device=device)
    h, k_caches, v_caches = decode_steps(
        model, h, k_caches, v_caches, start_pos=ctx_len, n_steps=n_decode, seed=seed
    )
    return {
        "last_hidden": h.detach(),
        "ctx_len": ctx_len,
        "decode_steps": n_decode,
    }