import torch
import torch.nn as nn


class Model(nn.Module):
    """
    Scalar-gated delta-rule linear attention recurrence.

    A recurrent state matrix is decayed by a scalar gate per head, updated by a
    rank-1 key/value outer product, then read out by a query vector.
    """

    def __init__(self):
        super().__init__()

    def forward(
        self,
        q: torch.Tensor,
        k: torch.Tensor,
        v: torch.Tensor,
        gate: torch.Tensor,
        beta: torch.Tensor,
    ) -> torch.Tensor:
        batch_size, seq_len, num_heads, head_dim = q.shape
        state = torch.zeros(batch_size, num_heads, head_dim, head_dim, dtype=q.dtype, device=q.device)
        outputs = []

        for t in range(seq_len):
            gate_t = gate[:, t].unsqueeze(-1).unsqueeze(-1)
            beta_t = beta[:, t].unsqueeze(-1).unsqueeze(-1)
            kv_outer = k[:, t].unsqueeze(-1) * v[:, t].unsqueeze(-2)
            state = gate_t * state + beta_t * kv_outer
            y_t = (q[:, t].unsqueeze(-1) * state).sum(dim=-2)
            outputs.append(y_t)

        return torch.stack(outputs, dim=1)


batch_size = 2
seq_len = 128
num_heads = 4
head_dim = 24


def get_inputs():
    p = popcorn_pri
    q = torch.randn(p.jitter_int(batch_size), p.jitter_int(seq_len), p.jitter_int(num_heads), p.jitter_int(head_dim, align=8), dtype=torch.float32)
    k = torch.randn(p.jitter_int(batch_size), p.jitter_int(seq_len), p.jitter_int(num_heads), p.jitter_int(head_dim, align=8), dtype=torch.float32)
    v = torch.randn(p.jitter_int(batch_size), p.jitter_int(seq_len), p.jitter_int(num_heads), p.jitter_int(head_dim, align=8), dtype=torch.float32)
    gate = torch.sigmoid(torch.randn(p.jitter_int(batch_size), p.jitter_int(seq_len), p.jitter_int(num_heads), dtype=torch.float32))
    beta = torch.sigmoid(torch.randn(p.jitter_int(batch_size), p.jitter_int(seq_len), p.jitter_int(num_heads), dtype=torch.float32))
    return [q, k, v, gate, beta]


def get_init_inputs():
    return []

import torch
import torch.nn as nn
from torch.utils.cpp_extension import load_inline

cuda_source = r'''
#include <torch/extension.h>
#include <cuda_runtime.h>

__global__ void delta_rule_kernel(
    const float* __restrict__ q,
    const float* __restrict__ k,
    const float* __restrict__ v,
    const float* __restrict__ gate,
    const float* __restrict__ beta,
    float* __restrict__ output,
    int B, int S, int H, int D
) {
    extern __shared__ float state[];
    int bh = blockIdx.x;
    int b = bh / H;
    int h = bh % H;
    if (b >= B) return;

    for (int i = threadIdx.x; i < D*D; i += blockDim.x) {
        state[i] = 0.0f;
    }
    __syncthreads();

    for (int t = 0; t < S; t++) {
        float g = gate[((b * S + t) * H + h)];
        float be = beta[((b * S + t) * H + h)];

        // outer = k[t] outer v[t]
        // state = g * state + be * outer
        for (int i = threadIdx.x; i < D*D; i += blockDim.x) {
            int row = i / D;
            int col = i % D;
            float kval = k[((b * S + t) * H + h) * D + row];
            float vval = v[((b * S + t) * H + h) * D + col];
            float outer = kval * vval;
            state[i] = g * state[i] + be * outer;
        }
        __syncthreads();

        // y = q[t] @ state   (q row vector * matrix)
        for (int col = threadIdx.x; col < D; col += blockDim.x) {
            float sum = 0.0f;
            for (int r = 0; r < D; r++) {
                float qval = q[((b * S + t) * H + h) * D + r];
                sum += qval * state[r * D + col];
            }
            output[((b * S + t) * H + h) * D + col] = sum;
        }
        __syncthreads();
    }
}

at::Tensor delta_rule_cuda(torch::Tensor q, torch::Tensor k, torch::Tensor v, torch::Tensor gate, torch::Tensor beta) {
    auto B = q.size(0);
    auto S = q.size(1);
    auto H = q.size(2);
    auto D = q.size(3);
    auto output = torch::zeros({B, S, H, D}, q.options());
    dim3 blocks(B * H);
    int threads = 256;
    size_t smem = D * D * sizeof(float);
    delta_rule_kernel<<<blocks, threads, smem>>>(
        q.data_ptr<float>(), k.data_ptr<float>(), v.data_ptr<float>(),
        gate.data_ptr<float>(), beta.data_ptr<float>(),
        output.data_ptr<float>(), B, S, H, D);
    cudaDeviceSynchronize();
    return output;
}
'''

cpp_source = '''
at::Tensor delta_rule_cuda(torch::Tensor q, torch::Tensor k, torch::Tensor v, torch::Tensor gate, torch::Tensor beta);
'''

module = load_inline(
    name='delta_rule',
    cpp_sources=[cpp_source],
    cuda_sources=[cuda_source],
    functions=['delta_rule_cuda'],
    verbose=False
)

class ModelNew(nn.Module):
    def __init__(self):
        super().__init__()
        self.module = module

    def forward(self, q, k, v, gate, beta):
        return self.module.delta_rule_cuda(q, k, v, gate, beta)