submission 332034
macto · python · License unknown
Use it
Vendorable · source mirrored · license unknownView source →
No package. Vendor the mirrored source: 1980 lines, June 9 Researcher Reciprocity License v1.0.
submission.py
curl "https://kernelindex.com/api/v1/implementations/kernelbot-nvfp4-dual-gemm-332034?include=source"interfacepython
Compatibility
measured onNVIDIA B200
declared hardwareNVIDIA B200
architecturessm_100
dtypesfp8_e4m3, nvfp4
Benchmark evidence
1 measurement across 1 GPU, fastest first.
Operation / workload
Hardware
Latency
Rank
Observed
Reported · How evidence levels are derived →
Source and license
sourceavailable
revision digestsha256:dd5f403cf0f446eda201077c531b9f9e1ab9a44d811f2c5dfa674e3825cc39ee
license declaredunknown
license concludedunknown
authorsmacto
imported2026-08-15
Techniques
Extracted from the mirrored source by pattern, never inferred. Each row cites its line.
cluster
__cluster_dims__(2, 1, 1)fused-epilogue
const int epilogue_mbar_addr = mainloop_mbar_addr + 2 * 8;mbarrier
void mbarrier_init(int mbar_addr, int count) {persistent-kernel
void dual_gemm_cta2_persistent_kernel(shared-memory
void tma_3d_gmem2smem_mcast(int dst, const void *tmap_ptr, int x, int y, int z,tcgen05
asm volatile("tcgen05.cp.cta_group::2.32x128b.warpx4 [%0], %1;"tile-k = 256
const int z_ab = iter_k * (BLOCK_K / 256); // == iter_k for BLOCK_K=256tile-n = 64
static_assert(BLOCK_N == 64, "Persistent kernel variant is intended for BLOCK_N=64 only.");tma
"cp.async.bulk.tensor.3d.shared::cluster.global.mbarrier::complete_tx::bytes.cta_group::%6.L2::cache_hint "vector-width = half2
half2 silu_mul_h2(float x0, float x1, float y0, float y1) {Kernel source
submission.py1980 lines
#!POPCORN leaderboard nvfp4_dual_gemm
#!POPCORN gpu NVIDIA
import torch
from task import input_t, output_t
from torch.utils.cpp_extension import load_inline
# ============================================================================
# NVFP4 block-scaled dual GEMM with SiLU: C = silu(A @ B1) * (A @ B2)
#
# Persistent-only 2-SM clustered kernel development file.
# Goal: optimize the cluster-persistent kernel itself (no v6 fallback).
# ============================================================================
CUDA_SOURCE = r"""
#include <cudaTypedefs.h>
#include <cuda_fp16.h>
#include <cuda_fp8.h>
#include <torch/library.h>
#include <ATen/core/Tensor.h>
constexpr int WARP_SIZE = 32;
constexpr int MMA_K = 64;
// L2 Cache Hints (from 1st.py)
constexpr uint64_t EVICT_FIRST = 0x12F0000000000000ULL;
constexpr uint64_t EVICT_LAST = 0x14F0000000000000ULL;
// ============================================================================
// PTX Helper Functions
// ============================================================================
__device__ __forceinline__
constexpr uint64_t desc_encode(uint64_t x) {
return (x & 0x3'FFFFULL) >> 4ULL;
}
__device__ __forceinline__
half2 silu_mul_h2(float x0, float x1, float y0, float y1) {
// SiLU(x) = x / (1 + exp(-x)), computed in FP32 then multiplied by y.
const float s0 = __fdividef(x0, 1.0f + __expf(-x0));
const float s1 = __fdividef(x1, 1.0f + __expf(-x1));
return __float22half2_rn({s0 * y0, s1 * y1});
}
// 32B global store (4x64b) to improve L1TEX sector utilization vs 16B stores.
__device__ __forceinline__
void stg_32b(const void* dst, unsigned long long v0, unsigned long long v1,
unsigned long long v2, unsigned long long v3) {
asm volatile(
"st.global.v4.b64 [%0], {%1, %2, %3, %4};"
:: "l"(dst), "l"(v0), "l"(v1), "l"(v2), "l"(v3)
: "memory"
);
}
__device__ __forceinline__
uint32_t elect_sync() {
uint32_t pred = 0;
asm volatile(
"{\n\t"
".reg .pred %%px;\n\t"
"elect.sync _|%%px, %1;\n\t"
"@%%px mov.s32 %0, 1;\n\t"
"}"
: "+r"(pred)
: "r"(0xFFFFFFFF)
);
return pred;
}
__device__ __forceinline__
void mbarrier_init(int mbar_addr, int count) {
asm volatile("mbarrier.init.shared::cta.b64 [%0], %1;"
:: "r"(mbar_addr), "r"(count));
}
__device__ __forceinline__
void mbarrier_wait(int mbar_addr, int phase) {
uint32_t ticks = 0x989680;
asm volatile(
"{\n\t"
".reg .pred P1;\n\t"
"LAB_WAIT:\n\t"
"mbarrier.try_wait.parity.acquire.cta.shared::cta.b64 P1, [%0], %1, %2;\n\t"
"@P1 bra.uni DONE;\n\t"
"bra.uni LAB_WAIT;\n\t"
"DONE:\n\t"
"}"
:: "r"(mbar_addr), "r"(phase), "r"(ticks)
);
}
// TMA with .cta_group::2 and L2 cache hint
// The .cta_group::2 modifier allows mbar_addr and dst to be in different CTA's smem
template <int CTA_GROUP>
__device__ __forceinline__
void tma_3d_gmem2smem(int dst, const void *tmap_ptr, int x, int y, int z, int mbar_addr, uint64_t cache_policy) {
asm volatile(
"cp.async.bulk.tensor.3d.shared::cluster.global.mbarrier::complete_tx::bytes.cta_group::%6.L2::cache_hint "
"[%0], [%1, {%2, %3, %4}], [%5], %7;"
:: "r"(dst), "l"(tmap_ptr), "r"(x), "r"(y), "r"(z), "r"(mbar_addr), "n"(CTA_GROUP), "l"(cache_policy)
: "memory"
);
}
// Tensor TMA multicast to multiple CTAs in the cluster.
// - Copies to the same dst offset in each destination CTA's shared memory.
// - With cta_group::2 and mbar in CTA0, the completion signal is directed to CTA0 for the CTA-pair.
template <int CTA_GROUP>
__device__ __forceinline__
void tma_3d_gmem2smem_mcast(int dst, const void *tmap_ptr, int x, int y, int z,
int mbar_addr, uint16_t cta_mask, uint64_t cache_policy) {
asm volatile(
"cp.async.bulk.tensor.3d.shared::cluster.global.mbarrier::complete_tx::bytes.multicast::cluster.cta_group::%6.L2::cache_hint "
"[%0], [%1, {%2, %3, %4}], [%5], %7, %8;"
:: "r"(dst), "l"(tmap_ptr), "r"(x), "r"(y), "r"(z),
"r"(mbar_addr), "n"(CTA_GROUP), "h"(cta_mask), "l"(cache_policy)
: "memory"
);
}
// Scale factor copy with cta_group::2
__device__ __forceinline__
void tcgen05_cp_cta2(int taddr, uint64_t s_desc) {
asm volatile("tcgen05.cp.cta_group::2.32x128b.warpx4 [%0], %1;"
:: "r"(taddr), "l"(s_desc));
}
__device__ __forceinline__
void tcgen05_mma_cta2(
int d_tmem,
uint64_t a_desc,
uint64_t b_desc,
uint32_t i_desc,
int scale_A_tmem,
int scale_B_tmem,
int enable_input_d
) {
asm volatile(
"{\n\t"
".reg .pred p;\n\t"
"setp.ne.b32 p, %6, 0;\n\t"
"tcgen05.mma.cta_group::2.kind::mxf4nvf4.block_scale.block16 "
"[%0], %1, %2, %3, [%4], [%5], p;\n\t"
"}"
:: "r"(d_tmem), "l"(a_desc), "l"(b_desc), "r"(i_desc),
"r"(scale_A_tmem), "r"(scale_B_tmem), "r"(enable_input_d)
);
}
__device__ __forceinline__
void tcgen05_ld_32x32bx8(float *tmp, int addr) {
asm volatile(
"tcgen05.ld.sync.aligned.32x32b.x8.b32 "
"{%0, %1, %2, %3, %4, %5, %6, %7}, [%8];"
: "=f"(tmp[0]), "=f"(tmp[1]), "=f"(tmp[2]), "=f"(tmp[3]),
"=f"(tmp[4]), "=f"(tmp[5]), "=f"(tmp[6]), "=f"(tmp[7])
: "r"(addr)
);
}
// Wider TMEM loads for faster epilogue - takes full address (taddr + (row << 16) + col)
__device__ __forceinline__
void tcgen05_ld_32x32bx32_addr(float *tmp, int addr) {
asm volatile(
"tcgen05.ld.sync.aligned.32x32b.x32.b32 "
"{ %0, %1, %2, %3, %4, %5, %6, %7, "
" %8, %9, %10, %11, %12, %13, %14, %15, "
" %16, %17, %18, %19, %20, %21, %22, %23, "
" %24, %25, %26, %27, %28, %29, %30, %31}, [%32];"
: "=f"(tmp[0]), "=f"(tmp[1]), "=f"(tmp[2]), "=f"(tmp[3]),
"=f"(tmp[4]), "=f"(tmp[5]), "=f"(tmp[6]), "=f"(tmp[7]),
"=f"(tmp[8]), "=f"(tmp[9]), "=f"(tmp[10]), "=f"(tmp[11]),
"=f"(tmp[12]), "=f"(tmp[13]), "=f"(tmp[14]), "=f"(tmp[15]),
"=f"(tmp[16]), "=f"(tmp[17]), "=f"(tmp[18]), "=f"(tmp[19]),
"=f"(tmp[20]), "=f"(tmp[21]), "=f"(tmp[22]), "=f"(tmp[23]),
"=f"(tmp[24]), "=f"(tmp[25]), "=f"(tmp[26]), "=f"(tmp[27]),
"=f"(tmp[28]), "=f"(tmp[29]), "=f"(tmp[30]), "=f"(tmp[31])
: "r"(addr)
);
}
__device__ __forceinline__
void tcgen05_ld_32x32bx64_addr(float *tmp, int addr) {
asm volatile(
"tcgen05.ld.sync.aligned.32x32b.x64.b32 "
"{ %0, %1, %2, %3, %4, %5, %6, %7, "
" %8, %9, %10, %11, %12, %13, %14, %15, "
" %16, %17, %18, %19, %20, %21, %22, %23, "
" %24, %25, %26, %27, %28, %29, %30, %31, "
" %32, %33, %34, %35, %36, %37, %38, %39, "
" %40, %41, %42, %43, %44, %45, %46, %47, "
" %48, %49, %50, %51, %52, %53, %54, %55, "
" %56, %57, %58, %59, %60, %61, %62, %63}, [%64];"
: "=f"(tmp[0]), "=f"(tmp[1]), "=f"(tmp[2]), "=f"(tmp[3]),
"=f"(tmp[4]), "=f"(tmp[5]), "=f"(tmp[6]), "=f"(tmp[7]),
"=f"(tmp[8]), "=f"(tmp[9]), "=f"(tmp[10]), "=f"(tmp[11]),
"=f"(tmp[12]), "=f"(tmp[13]), "=f"(tmp[14]), "=f"(tmp[15]),
"=f"(tmp[16]), "=f"(tmp[17]), "=f"(tmp[18]), "=f"(tmp[19]),
"=f"(tmp[20]), "=f"(tmp[21]), "=f"(tmp[22]), "=f"(tmp[23]),
"=f"(tmp[24]), "=f"(tmp[25]), "=f"(tmp[26]), "=f"(tmp[27]),
"=f"(tmp[28]), "=f"(tmp[29]), "=f"(tmp[30]), "=f"(tmp[31]),
"=f"(tmp[32]), "=f"(tmp[33]), "=f"(tmp[34]), "=f"(tmp[35]),
"=f"(tmp[36]), "=f"(tmp[37]), "=f"(tmp[38]), "=f"(tmp[39]),
"=f"(tmp[40]), "=f"(tmp[41]), "=f"(tmp[42]), "=f"(tmp[43]),
"=f"(tmp[44]), "=f"(tmp[45]), "=f"(tmp[46]), "=f"(tmp[47]),
"=f"(tmp[48]), "=f"(tmp[49]), "=f"(tmp[50]), "=f"(tmp[51]),
"=f"(tmp[52]), "=f"(tmp[53]), "=f"(tmp[54]), "=f"(tmp[55]),
"=f"(tmp[56]), "=f"(tmp[57]), "=f"(tmp[58]), "=f"(tmp[59]),
"=f"(tmp[60]), "=f"(tmp[61]), "=f"(tmp[62]), "=f"(tmp[63])
: "r"(addr)
);
}
// ============================================================================
// TensorMap Creation
// ============================================================================
void check_cu(CUresult err) {
if (err == CUDA_SUCCESS) return;
const char *error_msg_ptr;
if (cuGetErrorString(err, &error_msg_ptr) != CUDA_SUCCESS)
error_msg_ptr = "unable to get error string";
TORCH_CHECK(false, "cuTensorMapEncodeTiled error: ", error_msg_ptr);
}
void init_AB_tmap(
CUtensorMap *tmap,
const char *ptr,
uint64_t global_height,
uint64_t global_width,
uint32_t shared_height,
uint32_t shared_width
) {
constexpr uint32_t rank = 3;
uint64_t globalDim[rank] = {256, global_height, global_width / 256};
uint64_t globalStrides[rank-1] = {global_width / 2, 128};
uint32_t boxDim[rank] = {256, shared_height, shared_width / 256};
uint32_t elementStrides[rank] = {1, 1, 1};
auto err = cuTensorMapEncodeTiled(
tmap,
CUtensorMapDataType::CU_TENSOR_MAP_DATA_TYPE_16U4_ALIGN8B,
rank,
(void *)ptr,
globalDim,
globalStrides,
boxDim,
elementStrides,
CUtensorMapInterleave::CU_TENSOR_MAP_INTERLEAVE_NONE,
CUtensorMapSwizzle::CU_TENSOR_MAP_SWIZZLE_128B,
CUtensorMapL2promotion::CU_TENSOR_MAP_L2_PROMOTION_NONE,
CUtensorMapFloatOOBfill::CU_TENSOR_MAP_FLOAT_OOB_FILL_NONE
);
check_cu(err);
}
// Scale-factor TensorMap (UINT16 view) for the permuted SF layout.
// We view SF as a tiled 3D tensor: (512 bytes, mn/128 blocks, K/64 blocks).
// This matches the existing pointer arithmetic:
// block_index = (mn_block * (K/64) + k_block) * 512
// and lets us use tensor TMA (supports cta_group::2) instead of bulk TMA (does not).
void init_SF_tmap(
CUtensorMap *tmap,
const char *ptr,
uint64_t mn,
uint64_t K,
uint32_t block_k // == BLOCK_K
) {
constexpr uint32_t rank = 3;
const uint64_t k_blocks = K / 64; // 64-element SF granularity
const uint64_t mn_blocks = mn / 128; // 128-row/col SF granularity
const uint32_t tile_k_blocks = block_k / 64;
// TensorMap has limits on the X dimension; represent a 512B SF block as 256xUINT16.
constexpr uint64_t SF_BLOCK_BYTES = 512;
constexpr uint64_t X_ELEMS = SF_BLOCK_BYTES / sizeof(uint16_t); // 256
uint64_t globalDim[rank] = {X_ELEMS, mn_blocks, k_blocks};
uint64_t globalStrides[rank-1] = {k_blocks * SF_BLOCK_BYTES, SF_BLOCK_BYTES}; // bytes
uint32_t boxDim[rank] = {(uint32_t)X_ELEMS, 1, tile_k_blocks};
uint32_t elementStrides[rank] = {1, 1, 1};
auto err = cuTensorMapEncodeTiled(
tmap,
CUtensorMapDataType::CU_TENSOR_MAP_DATA_TYPE_UINT16,
rank,
(void *)ptr,
globalDim,
globalStrides,
boxDim,
elementStrides,
CUtensorMapInterleave::CU_TENSOR_MAP_INTERLEAVE_NONE,
CUtensorMapSwizzle::CU_TENSOR_MAP_SWIZZLE_NONE,
CUtensorMapL2promotion::CU_TENSOR_MAP_L2_PROMOTION_NONE,
CUtensorMapFloatOOBfill::CU_TENSOR_MAP_FLOAT_OOB_FILL_NONE
);
check_cu(err);
}
// ============================================================================
// 2-SM MMA Dual GEMM Kernel - Following reference pattern
// ============================================================================
template <int BLOCK_M, int BLOCK_N, int BLOCK_K, int NUM_STAGES>
__global__
__cluster_dims__(2, 1, 1)
__launch_bounds__(BLOCK_M + 2 * WARP_SIZE)
void dual_gemm_cta2_persistent_kernel(
const __grid_constant__ CUtensorMap A_tmap,
const __grid_constant__ CUtensorMap B1_tmap,
const __grid_constant__ CUtensorMap B2_tmap,
const __grid_constant__ CUtensorMap SFA_tmap,
const __grid_constant__ CUtensorMap SFB1_tmap,
const __grid_constant__ CUtensorMap SFB2_tmap,
half *C_ptr,
int M, int N, int K
) {
constexpr int CTA_GROUP = 2;
constexpr int HALF_BLOCK_N = BLOCK_N / CTA_GROUP;
// 1st.py-style: a single TMA warp issues BOTH tensor and SF TMAs.
// 4 epilogue + 1 TMA + 1 MMA = 6 warps (192 threads for BLOCK_M=128).
constexpr int NUM_WARPS = BLOCK_M / WARP_SIZE + 2;
const int tid = threadIdx.x;
const int bid = blockIdx.x;
const int warp_id = tid / WARP_SIZE;
int cta_rank;
asm volatile("mov.b32 %0, %%cluster_ctarank;" : "=r"(cta_rank));
// Persistent cluster id (CTA-pair id) and scheduling stride (in clusters).
const int cluster_pid = bid / CTA_GROUP;
const int num_clusters = gridDim.x / CTA_GROUP;
// Logical output tile grid in cluster-tiles: (M/256) x (N/BLOCK_N)
const int grid_m_clusters = M / (BLOCK_M * 2);
const int grid_n_clusters = N / BLOCK_N;
const int num_tiles = grid_m_clusters * grid_n_clusters;
extern __shared__ __align__(1024) char smem_ptr[];
const int smem = static_cast<int>(__cvta_generic_to_shared(smem_ptr));
// SMEM layout (must be identical across CTAs!)
// In 2-SM MMA, the B operand is split across CTAs (each CTA holds HALF_BLOCK_N columns).
constexpr int A_size = BLOCK_M * BLOCK_K / 2;
constexpr int B1_size = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int B2_size = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int SFA_size = 128 * BLOCK_K / 16;
constexpr int SFB1_size = 128 * BLOCK_K / 16;
constexpr int SFB2_size = 128 * BLOCK_K / 16;
constexpr int STAGE_SIZE = A_size + B1_size + B2_size + SFA_size + SFB1_size + SFB2_size;
// Mbarrier layout:
// - tma_mbar[NUM_STAGES]: count=CTA_GROUP
// - merged TMA warp issues ONE expect_tx for (tensor + SF) bytes (1 arrival per CTA)
// Both report into CTA0's mbar (masked address), using .shared::cluster.
// - mma_mbar[NUM_STAGES]: count=1, CTA0 multicasts to both CTAs (stage reuse)
// - mainloop_mbar[2]: count=1, CTA0 multicasts to both CTAs (signals accumulator stage ready)
// - epilogue_mbar[2]: count=4*CTA_GROUP, epilogue warps report to CTA0 (signals accumulator stage free)
#pragma nv_diag_suppress static_var_with_dynamic_init
__shared__ uint64_t mbars[NUM_STAGES * 2 + 4];
__shared__ int tmem_addr[1];
const int tma_mbar_addr = static_cast<int>(__cvta_generic_to_shared(mbars));
const int mma_mbar_addr = tma_mbar_addr + NUM_STAGES * 8;
const int mainloop_mbar_addr = mma_mbar_addr + NUM_STAGES * 8;
const int epilogue_mbar_addr = mainloop_mbar_addr + 2 * 8;
// TMEM layout for cta_group::2 (persistent + 2-stage accumulator ping-pong).
// Stage 0: [ACC1_0 (BLOCK_N)][ACC2_0 (BLOCK_N)]
// Stage 1: [ACC1_1 (BLOCK_N)][ACC2_1 (BLOCK_N)]
constexpr int ACC_STRIDE = 2 * BLOCK_N; // cols per stage (ACC1+ACC2)
constexpr int ACC_BASE = 0;
constexpr int ACC1_OFF = 0;
constexpr int ACC2_OFF = BLOCK_N;
constexpr int SFA_COLS_PER_K = 8; // 256 rows / 32
constexpr int SFB_COLS_PER_K = 4; // 128 cols / 32
// Place scale factors after the double-buffered accumulators.
constexpr int SFA_tmem = ACC_BASE + 2 * ACC_STRIDE; // 4*BLOCK_N
constexpr int SFB1_tmem = SFA_tmem + SFA_COLS_PER_K * (BLOCK_K / MMA_K);
constexpr int SFB2_tmem = SFB1_tmem + SFB_COLS_PER_K * (BLOCK_K / MMA_K);
// Persistent + accumulator double-buffering requires more TMEM columns.
// For BLOCK_N=64, 512 columns fits: 4*BLOCK_N (acc) + SF (<=64) <= 512.
static_assert(BLOCK_N == 64, "Persistent kernel variant is intended for BLOCK_N=64 only.");
constexpr int TOTAL_TMEM_COLS = 512;
// ========================================================================
// Initialization - following reference exactly
// ========================================================================
if (warp_id == 0 && elect_sync()) {
for (int i = 0; i < NUM_STAGES; i++) {
// 2 arrivals = 2 CTAs x 1 expect_tx each (tensor + SF combined)
mbarrier_init(tma_mbar_addr + i * 8, CTA_GROUP);
mbarrier_init(mma_mbar_addr + i * 8, 1); // CTA0 multicasts to both
}
for (int i = 0; i < 2; i++) {
mbarrier_init(mainloop_mbar_addr + i * 8, 1); // CTA0 multicasts to both
mbarrier_init(epilogue_mbar_addr + i * 8, 4 * CTA_GROUP); // 4 epilogue warps x both CTAs report to CTA0
}
asm volatile("fence.mbarrier_init.release.cluster;");
}
else if (warp_id == 1) {
const int addr = static_cast<int>(__cvta_generic_to_shared(tmem_addr));
asm volatile("tcgen05.alloc.cta_group::2.sync.aligned.shared::cta.b32 [%0], %1;"
:: "r"(addr), "r"(TOTAL_TMEM_COLS));
}
// Cluster barrier - visible to all threads in cluster
asm volatile("barrier.cluster.arrive.release.aligned;");
asm volatile("barrier.cluster.wait.acquire.aligned;");
const int taddr = tmem_addr[0];
// Instruction descriptor for MMA_M=256, MMA_N=BLOCK_N
constexpr uint32_t i_desc = (1U << 7U) | (1U << 10U) | ((uint32_t)BLOCK_N >> 3U << 17U) | (2U << 27U);
constexpr int SBO_AB = 8 * 128;
constexpr int SBO_SF = 8 * 16;
constexpr uint64_t AB_desc_base = (desc_encode(SBO_AB) << 32ULL) | (1ULL << 46ULL) | (2ULL << 61ULL);
constexpr uint64_t SF_desc_base = (desc_encode(SBO_SF) << 32ULL) | (1ULL << 46ULL);
const int num_iters = K / BLOCK_K;
// L2 cache hints (winner pattern):
// If M > N, keep B (evict A first); else keep A (evict B first).
const uint64_t cache_A = (M > N) ? EVICT_FIRST : EVICT_LAST;
const uint64_t cache_B = (M > N) ? EVICT_LAST : EVICT_FIRST;
// ========================================================================
// TMA Warp (warp 4) - Issues BOTH tensor and SF TMA loads (persistent over tiles)
// ========================================================================
if (warp_id == NUM_WARPS - 2 && elect_sync()) {
int tma_stage = 0;
int mma_phase = 1;
int it = 0; // global iteration across tiles for initial pipeline fill
for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {
const int cluster_m = tile / grid_n_clusters;
const int cluster_n = tile % grid_n_clusters;
const int off_m = cluster_m * (BLOCK_M * CTA_GROUP) + cta_rank * BLOCK_M;
const int off_n = cluster_n * BLOCK_N;
const int sf_y_A = off_m / 128;
const int sf_y_B = off_n / 128;
const int B_col_offset = off_n + cta_rank * HALF_BLOCK_N;
for (int iter_k = 0; iter_k < num_iters; iter_k++, it++) {
// Wait for MMA to release this buffer (skip for initial pipeline fill)
if (it >= NUM_STAGES)
mbarrier_wait(mma_mbar_addr + tma_stage * 8, mma_phase);
const int mbar_addr = (tma_mbar_addr + tma_stage * 8) & 0xFEFFFFFF;
const int base_smem = smem + tma_stage * STAGE_SIZE;
// SMEM addresses for tensor
const int A_smem = base_smem;
const int B1_smem = base_smem + A_size;
const int B2_smem = B1_smem + B1_size;
// SMEM addresses for SF
const int SFA_smem = base_smem + A_size + B1_size + B2_size;
const int SFB1_smem = SFA_smem + SFA_size;
const int SFB2_smem = SFB1_smem + SFB1_size;
// Combined tensor+SF arrive.expect_tx for this CTA.
// NOTE: multicast complete_tx byte count scales with popcount(ctaMask) (2x here).
constexpr int TENSOR_TMA_SIZE = A_size + B1_size + B2_size;
const int SF_TMA_SIZE = SFA_size + ((cta_rank == 0) ? (CTA_GROUP * (SFB1_size + SFB2_size)) : 0);
const int TOTAL_TMA_SIZE = TENSOR_TMA_SIZE + SF_TMA_SIZE;
asm volatile("mbarrier.arrive.expect_tx.release.cta.shared::cluster.b64 _, [%0], %1;"
:: "r"(mbar_addr), "r"(TOTAL_TMA_SIZE) : "memory");
const int z_ab = iter_k * (BLOCK_K / 256); // == iter_k for BLOCK_K=256
const int z_sf = iter_k * (BLOCK_K / 64); // == 4*iter_k for BLOCK_K=256
// Issue tensor TMA loads (A is split along M by cta_rank; B1/B2 split along N).
tma_3d_gmem2smem<CTA_GROUP>(A_smem, &A_tmap, 0, off_m, z_ab, mbar_addr, cache_A);
tma_3d_gmem2smem<CTA_GROUP>(B1_smem, &B1_tmap, 0, B_col_offset, z_ab, mbar_addr, cache_B);
tma_3d_gmem2smem<CTA_GROUP>(B2_smem, &B2_tmap, 0, B_col_offset, z_ab, mbar_addr, cache_B);
// Issue SF TMAs (SFB multicast from CTA0).
tma_3d_gmem2smem<CTA_GROUP>(SFA_smem, &SFA_tmap, 0, sf_y_A, z_sf, mbar_addr, cache_A);
if (cta_rank == 0) {
constexpr uint16_t cta_mask = (1u << CTA_GROUP) - 1u; // 0b11
tma_3d_gmem2smem_mcast<CTA_GROUP>(SFB1_smem, &SFB1_tmap, 0, sf_y_B, z_sf, mbar_addr, cta_mask, cache_B);
tma_3d_gmem2smem_mcast<CTA_GROUP>(SFB2_smem, &SFB2_tmap, 0, sf_y_B, z_sf, mbar_addr, cta_mask, cache_B);
}
tma_stage = (tma_stage + 1) % NUM_STAGES;
if (tma_stage == 0) mma_phase ^= 1;
}
}
}
// ========================================================================
// MMA Warp (warp 5, CTA0 ONLY) - Persistent over tiles, double-buffer accumulators
// ========================================================================
else if (cta_rank == 0 && warp_id == NUM_WARPS - 1 && elect_sync()) {
int tma_stage = 0;
int tma_phase = 0;
int mainloop_stage = 0;
int epilogue_phase = 1; // initial stage 0 is available
for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {
// Wait for epilogue to finish with this accumulator stage
mbarrier_wait(epilogue_mbar_addr + mainloop_stage * 8, epilogue_phase);
const int cluster_n = tile % grid_n_clusters;
const int scale_B_base_off = (cluster_n % (128 / BLOCK_N)) * (BLOCK_N / 32);
const int acc_stage_base = ACC_BASE + mainloop_stage * ACC_STRIDE;
for (int iter_k = 0; iter_k < num_iters; iter_k++) {
// Wait for ALL TMAs for this stage (count=2: 1 combined expect_tx per CTA)
mbarrier_wait(tma_mbar_addr + tma_stage * 8, tma_phase);
asm volatile("tcgen05.fence::after_thread_sync;");
// SMEM addresses
const int base_smem = smem + tma_stage * STAGE_SIZE;
const int A_smem = base_smem;
const int B1_smem = base_smem + A_size;
const int B2_smem = base_smem + A_size + B1_size;
const int SFA_smem = base_smem + A_size + B1_size + B2_size;
const int SFB1_smem = SFA_smem + SFA_size;
const int SFB2_smem = SFB1_smem + SFB1_size;
// tcgen05.cp - reads from BOTH CTAs' SMEM, writes to TMEM
const uint64_t SFA_desc = SF_desc_base + ((uint64_t)SFA_smem >> 4ULL);
const uint64_t SFB1_desc = SF_desc_base + ((uint64_t)SFB1_smem >> 4ULL);
const uint64_t SFB2_desc = SF_desc_base + ((uint64_t)SFB2_smem >> 4ULL);
#pragma unroll
for (int k = 0; k < BLOCK_K / MMA_K; k++) {
tcgen05_cp_cta2(SFA_tmem + k * SFA_COLS_PER_K, SFA_desc + (uint64_t)k * 32ULL);
tcgen05_cp_cta2(SFB1_tmem + k * SFB_COLS_PER_K, SFB1_desc + (uint64_t)k * 32ULL);
tcgen05_cp_cta2(SFB2_tmem + k * SFB_COLS_PER_K, SFB2_desc + (uint64_t)k * 32ULL);
}
// Fence to ensure tcgen05.cp completes before tcgen05.mma
asm volatile("tcgen05.fence::before_thread_sync;");
// MMA into the selected accumulator stage
#pragma unroll
for (int k1 = 0; k1 < BLOCK_K / 256; k1++) {
#pragma unroll
for (int k2 = 0; k2 < 256 / MMA_K; k2++) {
const int a_off = k1 * BLOCK_M * 128 + k2 * 32;
const int b_off = k1 * HALF_BLOCK_N * 128 + k2 * 32;
uint64_t a_desc = AB_desc_base + desc_encode(A_smem + a_off);
uint64_t b1_desc = AB_desc_base + desc_encode(B1_smem + b_off);
uint64_t b2_desc = AB_desc_base + desc_encode(B2_smem + b_off);
const int k_sf = k1 * 4 + k2;
const int scale_A = SFA_tmem + k_sf * SFA_COLS_PER_K;
const int scale_B1 = SFB1_tmem + k_sf * SFB_COLS_PER_K + scale_B_base_off;
const int scale_B2 = SFB2_tmem + k_sf * SFB_COLS_PER_K + scale_B_base_off;
const int enable_d = (k1 == 0 && k2 == 0) ? iter_k : 1;
tcgen05_mma_cta2(acc_stage_base + ACC1_OFF, a_desc, b1_desc, i_desc, scale_A, scale_B1, enable_d);
tcgen05_mma_cta2(acc_stage_base + ACC2_OFF, a_desc, b2_desc, i_desc, scale_A, scale_B2, enable_d);
}
}
// Commit MMA stage reuse - multicast to BOTH CTAs
constexpr int16_t cta_mask = (1 << CTA_GROUP) - 1; // 0b11
asm volatile("tcgen05.commit.cta_group::2.mbarrier::arrive::one.shared::cluster.multicast::cluster.b64 [%0], %1;"
:: "r"(mma_mbar_addr + tma_stage * 8), "h"(cta_mask) : "memory");
// Flip phase when cycled through all stages
tma_stage = (tma_stage + 1) % NUM_STAGES;
if (tma_stage == 0) tma_phase ^= 1;
}
// Signal mainloop completion for this accumulator stage - multicast to BOTH CTAs
constexpr int16_t cta_mask = (1 << CTA_GROUP) - 1;
asm volatile("tcgen05.commit.cta_group::2.mbarrier::arrive::one.shared::cluster.multicast::cluster.b64 [%0], %1;"
:: "r"(mainloop_mbar_addr + mainloop_stage * 8), "h"(cta_mask) : "memory");
// Advance accumulator stage
mainloop_stage = (mainloop_stage + 1) % 2;
if (mainloop_stage == 0) epilogue_phase ^= 1;
}
}
// ========================================================================
// Epilogue warps (warps 0..3) - Persistent over tiles, double-buffered acc stages
// ========================================================================
else if (warp_id < 4) {
int mainloop_stage = 0;
int mainloop_phase = 0;
for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {
// Wait for accumulator stage to be ready
mbarrier_wait(mainloop_mbar_addr + mainloop_stage * 8, mainloop_phase);
asm volatile("tcgen05.fence::after_thread_sync;");
const int cluster_m = tile / grid_n_clusters;
const int cluster_n = tile % grid_n_clusters;
const int off_m = cluster_m * (BLOCK_M * CTA_GROUP) + cta_rank * BLOCK_M;
const int off_n = cluster_n * BLOCK_N;
const int acc_stage_base = ACC_BASE + mainloop_stage * ACC_STRIDE;
if (tid < BLOCK_M) {
constexpr int WIDTH = 64;
const int tmem_row = cta_rank * 128 + warp_id * 32;
float acc1[WIDTH], acc2[WIDTH];
const int addr1 = taddr + (tmem_row << 16) + (acc_stage_base + ACC1_OFF);
const int addr2 = taddr + (tmem_row << 16) + (acc_stage_base + ACC2_OFF);
tcgen05_ld_32x32bx64_addr(acc1, addr1);
tcgen05_ld_32x32bx64_addr(acc2, addr2);
asm volatile("tcgen05.wait::ld.sync.aligned;");
half* row_ptr = C_ptr + (off_m + tid) * N + off_n;
#pragma unroll
for (int i = 0; i < WIDTH; i += 16) {
half2 h0 = silu_mul_h2(acc1[i+0], acc1[i+1], acc2[i+0], acc2[i+1]);
half2 h1 = silu_mul_h2(acc1[i+2], acc1[i+3], acc2[i+2], acc2[i+3]);
half2 h2 = silu_mul_h2(acc1[i+4], acc1[i+5], acc2[i+4], acc2[i+5]);
half2 h3 = silu_mul_h2(acc1[i+6], acc1[i+7], acc2[i+6], acc2[i+7]);
half2 h4 = silu_mul_h2(acc1[i+8], acc1[i+9], acc2[i+8], acc2[i+9]);
half2 h5 = silu_mul_h2(acc1[i+10], acc1[i+11], acc2[i+10], acc2[i+11]);
half2 h6 = silu_mul_h2(acc1[i+12], acc1[i+13], acc2[i+12], acc2[i+13]);
half2 h7 = silu_mul_h2(acc1[i+14], acc1[i+15], acc2[i+14], acc2[i+15]);
const uint32_t u0 = *reinterpret_cast<uint32_t*>(&h0);
const uint32_t u1 = *reinterpret_cast<uint32_t*>(&h1);
const uint32_t u2 = *reinterpret_cast<uint32_t*>(&h2);
const uint32_t u3 = *reinterpret_cast<uint32_t*>(&h3);
const uint32_t u4 = *reinterpret_cast<uint32_t*>(&h4);
const uint32_t u5 = *reinterpret_cast<uint32_t*>(&h5);
const uint32_t u6 = *reinterpret_cast<uint32_t*>(&h6);
const uint32_t u7 = *reinterpret_cast<uint32_t*>(&h7);
const unsigned long long q0 = (unsigned long long)u0 | ((unsigned long long)u1 << 32);
const unsigned long long q1 = (unsigned long long)u2 | ((unsigned long long)u3 << 32);
const unsigned long long q2 = (unsigned long long)u4 | ((unsigned long long)u5 << 32);
const unsigned long long q3 = (unsigned long long)u6 | ((unsigned long long)u7 << 32);
stg_32b((const void*)(row_ptr + i), q0, q1, q2, q3);
}
}
// Signal epilogue completion for this stage to CTA0
if (elect_sync()) {
const int mbar_addr = (epilogue_mbar_addr + mainloop_stage * 8) & 0xFEFFFFFF;
asm volatile("mbarrier.arrive.release.cta.shared::cluster.b64 _, [%0];"
:: "r"(mbar_addr) : "memory");
}
// Advance stage
mainloop_stage = (mainloop_stage + 1) % 2;
if (mainloop_stage == 0) mainloop_phase ^= 1;
}
}
// Cluster barrier before deallocation (following reference)
asm volatile("barrier.cluster.arrive.release.aligned;");
asm volatile("barrier.cluster.wait.acquire.aligned;");
if (warp_id == 0) {
asm volatile("tcgen05.dealloc.cta_group::2.sync.aligned.b32 %0, %1;"
:: "r"(taddr), "r"(TOTAL_TMEM_COLS));
}
}
// ============================================================================
// Cluster-persistent kernel variant for BLOCK_N=64 (no accumulator ping-pong).
// - Uses a single accumulator buffer (like v6), but keeps persistent tile scheduling.
// - Merges SF+AB TMA into a single warp like winners/nvfp4_gemm/1st.py.
// ============================================================================
template <int BLOCK_M, int BLOCK_K, int NUM_STAGES>
__global__
__cluster_dims__(2, 1, 1)
__launch_bounds__(BLOCK_M + 2 * WARP_SIZE)
void dual_gemm_cta2_persistent_n64_kernel(
const __grid_constant__ CUtensorMap A_tmap,
const __grid_constant__ CUtensorMap B1_tmap,
const __grid_constant__ CUtensorMap B2_tmap,
const __grid_constant__ CUtensorMap SFA_tmap,
const __grid_constant__ CUtensorMap SFB1_tmap,
const __grid_constant__ CUtensorMap SFB2_tmap,
half *C_ptr,
int M, int N, int K
) {
constexpr int CTA_GROUP = 2;
constexpr int BLOCK_N = 64;
constexpr int HALF_BLOCK_N = BLOCK_N / CTA_GROUP;
constexpr int NUM_WARPS = BLOCK_M / WARP_SIZE + 2; // 4 epilogue + 1 TMA + 1 MMA
const int tid = threadIdx.x;
const int bid = blockIdx.x;
const int warp_id = tid / WARP_SIZE;
int cta_rank;
asm volatile("mov.b32 %0, %%cluster_ctarank;" : "=r"(cta_rank));
const int cluster_pid = bid / CTA_GROUP;
const int num_clusters = gridDim.x / CTA_GROUP;
const int grid_m_clusters = M / (BLOCK_M * 2);
const int grid_n_clusters = N / BLOCK_N;
const int num_tiles = grid_m_clusters * grid_n_clusters;
extern __shared__ __align__(1024) char smem_ptr[];
const int smem = static_cast<int>(__cvta_generic_to_shared(smem_ptr));
constexpr int A_size = BLOCK_M * BLOCK_K / 2;
constexpr int B1_size = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int B2_size = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int SFA_size = 128 * BLOCK_K / 16;
constexpr int SFB1_size = 128 * BLOCK_K / 16;
constexpr int SFB2_size = 128 * BLOCK_K / 16;
constexpr int STAGE_SIZE = A_size + B1_size + B2_size + SFA_size + SFB1_size + SFB2_size;
#pragma nv_diag_suppress static_var_with_dynamic_init
__shared__ uint64_t mbars[NUM_STAGES * 2 + 2];
__shared__ int tmem_addr[1];
const int tma_mbar_addr = static_cast<int>(__cvta_generic_to_shared(mbars));
const int mma_mbar_addr = tma_mbar_addr + NUM_STAGES * 8;
const int mainloop_mbar_addr = mma_mbar_addr + NUM_STAGES * 8;
const int epilogue_mbar_addr = mainloop_mbar_addr + 8;
// TMEM layout (single accumulator stage).
constexpr int ACC_STRIDE = 2 * BLOCK_N;
constexpr int ACC_BASE = 0;
constexpr int ACC1_OFF = 0;
constexpr int ACC2_OFF = BLOCK_N;
constexpr int SFA_COLS_PER_K = 8;
constexpr int SFB_COLS_PER_K = 4;
constexpr int SFA_tmem = ACC_BASE + ACC_STRIDE; // 128
constexpr int SFB1_tmem = SFA_tmem + SFA_COLS_PER_K * (BLOCK_K / MMA_K);
constexpr int SFB2_tmem = SFB1_tmem + SFB_COLS_PER_K * (BLOCK_K / MMA_K);
// Match v6: allocate 256 cols for BLOCK_N=64.
constexpr int TOTAL_TMEM_COLS = 256;
if (warp_id == 0 && elect_sync()) {
for (int i = 0; i < NUM_STAGES; i++) {
mbarrier_init(tma_mbar_addr + i * 8, CTA_GROUP);
mbarrier_init(mma_mbar_addr + i * 8, 1);
}
mbarrier_init(mainloop_mbar_addr, 1);
mbarrier_init(epilogue_mbar_addr, 4 * CTA_GROUP);
asm volatile("fence.mbarrier_init.release.cluster;");
} else if (warp_id == 1) {
const int addr = static_cast<int>(__cvta_generic_to_shared(tmem_addr));
asm volatile("tcgen05.alloc.cta_group::2.sync.aligned.shared::cta.b32 [%0], %1;"
:: "r"(addr), "r"(TOTAL_TMEM_COLS));
}
asm volatile("barrier.cluster.arrive.release.aligned;");
asm volatile("barrier.cluster.wait.acquire.aligned;");
const int taddr = tmem_addr[0];
constexpr uint32_t i_desc = (1U << 7U) | (1U << 10U) | ((uint32_t)BLOCK_N >> 3U << 17U) | (2U << 27U);
constexpr int SBO_AB = 8 * 128;
constexpr int SBO_SF = 8 * 16;
constexpr uint64_t AB_desc_base = (desc_encode(SBO_AB) << 32ULL) | (1ULL << 46ULL) | (2ULL << 61ULL);
constexpr uint64_t SF_desc_base = (desc_encode(SBO_SF) << 32ULL) | (1ULL << 46ULL);
const int num_iters = K / BLOCK_K;
const uint64_t cache_A = (M > N) ? EVICT_FIRST : EVICT_LAST;
const uint64_t cache_B = (M > N) ? EVICT_LAST : EVICT_FIRST;
// TMA warp
if (warp_id == NUM_WARPS - 2 && elect_sync()) {
int tma_stage = 0;
int mma_phase = 1;
int it = 0;
for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {
const int cluster_m = tile / grid_n_clusters;
const int cluster_n = tile % grid_n_clusters;
const int off_m = cluster_m * (BLOCK_M * CTA_GROUP) + cta_rank * BLOCK_M;
const int off_n = cluster_n * BLOCK_N;
const int sf_y_A = off_m / 128;
const int sf_y_B = off_n / 128;
const int B_col_offset = off_n + cta_rank * HALF_BLOCK_N;
for (int iter_k = 0; iter_k < num_iters; iter_k++, it++) {
if (it >= NUM_STAGES)
mbarrier_wait(mma_mbar_addr + tma_stage * 8, mma_phase);
const int mbar_addr = (tma_mbar_addr + tma_stage * 8) & 0xFEFFFFFF;
const int base_smem = smem + tma_stage * STAGE_SIZE;
const int A_smem = base_smem;
const int B1_smem = base_smem + A_size;
const int B2_smem = B1_smem + B1_size;
const int SFA_smem = base_smem + A_size + B1_size + B2_size;
const int SFB1_smem = SFA_smem + SFA_size;
const int SFB2_smem = SFB1_smem + SFB1_size;
constexpr int TENSOR_TMA_SIZE = A_size + B1_size + B2_size;
const int SF_TMA_SIZE = SFA_size + ((cta_rank == 0) ? (CTA_GROUP * (SFB1_size + SFB2_size)) : 0);
const int TOTAL_TMA_SIZE = TENSOR_TMA_SIZE + SF_TMA_SIZE;
asm volatile("mbarrier.arrive.expect_tx.release.cta.shared::cluster.b64 _, [%0], %1;"
:: "r"(mbar_addr), "r"(TOTAL_TMA_SIZE) : "memory");
const int z_ab = iter_k * (BLOCK_K / 256);
const int z_sf = iter_k * (BLOCK_K / 64);
tma_3d_gmem2smem<CTA_GROUP>(A_smem, &A_tmap, 0, off_m, z_ab, mbar_addr, cache_A);
tma_3d_gmem2smem<CTA_GROUP>(B1_smem, &B1_tmap, 0, B_col_offset, z_ab, mbar_addr, cache_B);
tma_3d_gmem2smem<CTA_GROUP>(B2_smem, &B2_tmap, 0, B_col_offset, z_ab, mbar_addr, cache_B);
tma_3d_gmem2smem<CTA_GROUP>(SFA_smem, &SFA_tmap, 0, sf_y_A, z_sf, mbar_addr, cache_A);
if (cta_rank == 0) {
constexpr uint16_t cta_mask = (1u << CTA_GROUP) - 1u;
tma_3d_gmem2smem_mcast<CTA_GROUP>(SFB1_smem, &SFB1_tmap, 0, sf_y_B, z_sf, mbar_addr, cta_mask, cache_B);
tma_3d_gmem2smem_mcast<CTA_GROUP>(SFB2_smem, &SFB2_tmap, 0, sf_y_B, z_sf, mbar_addr, cta_mask, cache_B);
}
tma_stage = (tma_stage + 1) % NUM_STAGES;
if (tma_stage == 0) mma_phase ^= 1;
}
}
}
// MMA warp (CTA0)
else if (cta_rank == 0 && warp_id == NUM_WARPS - 1 && elect_sync()) {
int tma_stage = 0;
int tma_phase = 0;
int epilogue_phase = 1;
constexpr int16_t cta_mask = (1 << CTA_GROUP) - 1;
for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {
mbarrier_wait(epilogue_mbar_addr, epilogue_phase);
const int cluster_n = tile % grid_n_clusters;
const int scale_B_base_off = (cluster_n % (128 / BLOCK_N)) * (BLOCK_N / 32);
for (int iter_k = 0; iter_k < num_iters; iter_k++) {
mbarrier_wait(tma_mbar_addr + tma_stage * 8, tma_phase);
asm volatile("tcgen05.fence::after_thread_sync;");
const int base_smem = smem + tma_stage * STAGE_SIZE;
const int A_smem = base_smem;
const int B1_smem = base_smem + A_size;
const int B2_smem = base_smem + A_size + B1_size;
const int SFA_smem = base_smem + A_size + B1_size + B2_size;
const int SFB1_smem = SFA_smem + SFA_size;
const int SFB2_smem = SFB1_smem + SFB1_size;
const uint64_t SFA_desc = SF_desc_base + ((uint64_t)SFA_smem >> 4ULL);
const uint64_t SFB1_desc = SF_desc_base + ((uint64_t)SFB1_smem >> 4ULL);
const uint64_t SFB2_desc = SF_desc_base + ((uint64_t)SFB2_smem >> 4ULL);
#pragma unroll
for (int k = 0; k < BLOCK_K / MMA_K; k++) {
tcgen05_cp_cta2(SFA_tmem + k * SFA_COLS_PER_K, SFA_desc + (uint64_t)k * 32ULL);
tcgen05_cp_cta2(SFB1_tmem + k * SFB_COLS_PER_K, SFB1_desc + (uint64_t)k * 32ULL);
tcgen05_cp_cta2(SFB2_tmem + k * SFB_COLS_PER_K, SFB2_desc + (uint64_t)k * 32ULL);
}
asm volatile("tcgen05.fence::before_thread_sync;");
#pragma unroll
for (int k1 = 0; k1 < BLOCK_K / 256; k1++) {
#pragma unroll
for (int k2 = 0; k2 < 256 / MMA_K; k2++) {
const int a_off = k1 * BLOCK_M * 128 + k2 * 32;
const int b_off = k1 * HALF_BLOCK_N * 128 + k2 * 32;
uint64_t a_desc = AB_desc_base + desc_encode(A_smem + a_off);
uint64_t b1_desc = AB_desc_base + desc_encode(B1_smem + b_off);
uint64_t b2_desc = AB_desc_base + desc_encode(B2_smem + b_off);
const int k_sf = k1 * 4 + k2;
const int scale_A = SFA_tmem + k_sf * SFA_COLS_PER_K;
const int scale_B1 = SFB1_tmem + k_sf * SFB_COLS_PER_K + scale_B_base_off;
const int scale_B2 = SFB2_tmem + k_sf * SFB_COLS_PER_K + scale_B_base_off;
const int enable_d = (k1 == 0 && k2 == 0) ? iter_k : 1;
tcgen05_mma_cta2(ACC_BASE + ACC1_OFF, a_desc, b1_desc, i_desc, scale_A, scale_B1, enable_d);
tcgen05_mma_cta2(ACC_BASE + ACC2_OFF, a_desc, b2_desc, i_desc, scale_A, scale_B2, enable_d);
}
}
asm volatile("tcgen05.commit.cta_group::2.mbarrier::arrive::one.shared::cluster.multicast::cluster.b64 [%0], %1;"
:: "r"(mma_mbar_addr + tma_stage * 8), "h"(cta_mask) : "memory");
tma_stage = (tma_stage + 1) % NUM_STAGES;
if (tma_stage == 0) tma_phase ^= 1;
}
asm volatile("tcgen05.commit.cta_group::2.mbarrier::arrive::one.shared::cluster.multicast::cluster.b64 [%0], %1;"
:: "r"(mainloop_mbar_addr), "h"(cta_mask) : "memory");
epilogue_phase ^= 1;
}
}
// Epilogue warps
else if (warp_id < 4) {
int mainloop_phase = 0;
for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {
mbarrier_wait(mainloop_mbar_addr, mainloop_phase);
asm volatile("tcgen05.fence::after_thread_sync;");
const int cluster_m = tile / grid_n_clusters;
const int cluster_n = tile % grid_n_clusters;
const int off_m = cluster_m * (BLOCK_M * CTA_GROUP) + cta_rank * BLOCK_M;
const int off_n = cluster_n * BLOCK_N;
if (tid < BLOCK_M) {
constexpr int WIDTH = 64;
const int tmem_row = cta_rank * 128 + warp_id * 32;
float acc1[WIDTH], acc2[WIDTH];
const int addr1 = taddr + (tmem_row << 16) + (ACC_BASE + ACC1_OFF);
const int addr2 = taddr + (tmem_row << 16) + (ACC_BASE + ACC2_OFF);
tcgen05_ld_32x32bx64_addr(acc1, addr1);
tcgen05_ld_32x32bx64_addr(acc2, addr2);
asm volatile("tcgen05.wait::ld.sync.aligned;");
half* row_ptr = C_ptr + (off_m + tid) * N + off_n;
#pragma unroll
for (int i = 0; i < WIDTH; i += 16) {
half2 h0 = silu_mul_h2(acc1[i+0], acc1[i+1], acc2[i+0], acc2[i+1]);
half2 h1 = silu_mul_h2(acc1[i+2], acc1[i+3], acc2[i+2], acc2[i+3]);
half2 h2 = silu_mul_h2(acc1[i+4], acc1[i+5], acc2[i+4], acc2[i+5]);
half2 h3 = silu_mul_h2(acc1[i+6], acc1[i+7], acc2[i+6], acc2[i+7]);
half2 h4 = silu_mul_h2(acc1[i+8], acc1[i+9], acc2[i+8], acc2[i+9]);
half2 h5 = silu_mul_h2(acc1[i+10], acc1[i+11], acc2[i+10], acc2[i+11]);
half2 h6 = silu_mul_h2(acc1[i+12], acc1[i+13], acc2[i+12], acc2[i+13]);
half2 h7 = silu_mul_h2(acc1[i+14], acc1[i+15], acc2[i+14], acc2[i+15]);
const uint32_t u0 = *reinterpret_cast<uint32_t*>(&h0);
const uint32_t u1 = *reinterpret_cast<uint32_t*>(&h1);
const uint32_t u2 = *reinterpret_cast<uint32_t*>(&h2);
const uint32_t u3 = *reinterpret_cast<uint32_t*>(&h3);
const uint32_t u4 = *reinterpret_cast<uint32_t*>(&h4);
const uint32_t u5 = *reinterpret_cast<uint32_t*>(&h5);
const uint32_t u6 = *reinterpret_cast<uint32_t*>(&h6);
const uint32_t u7 = *reinterpret_cast<uint32_t*>(&h7);
const unsigned long long q0 = (unsigned long long)u0 | ((unsigned long long)u1 << 32);
const unsigned long long q1 = (unsigned long long)u2 | ((unsigned long long)u3 << 32);
const unsigned long long q2 = (unsigned long long)u4 | ((unsigned long long)u5 << 32);
const unsigned long long q3 = (unsigned long long)u6 | ((unsigned long long)u7 << 32);
stg_32b((const void*)(row_ptr + i), q0, q1, q2, q3);
}
}
if (elect_sync()) {
const int mbar_addr = epilogue_mbar_addr & 0xFEFFFFFF;
asm volatile("mbarrier.arrive.release.cta.shared::cluster.b64 _, [%0];"
:: "r"(mbar_addr) : "memory");
}
mainloop_phase ^= 1;
}
}
asm volatile("barrier.cluster.arrive.release.aligned;");
asm volatile("barrier.cluster.wait.acquire.aligned;");
if (warp_id == 0) {
asm volatile("tcgen05.dealloc.cta_group::2.sync.aligned.b32 %0, %1;"
:: "r"(taddr), "r"(TOTAL_TMEM_COLS));
}
}
// ============================================================================
// Cluster-persistent kernel variant for BLOCK_N=128 (no accumulator ping-pong).
// - Still persistent over tiles (cluster_pid/num_clusters scheduling).
// - Merges SF+AB TMA into a single warp like winners/nvfp4_gemm/1st.py.
// ============================================================================
template <int BLOCK_M, int BLOCK_K, int NUM_STAGES>
__global__
__cluster_dims__(2, 1, 1)
__launch_bounds__(BLOCK_M + 2 * WARP_SIZE)
void dual_gemm_cta2_persistent_n128_kernel(
const __grid_constant__ CUtensorMap A_tmap,
const __grid_constant__ CUtensorMap B1_tmap,
const __grid_constant__ CUtensorMap B2_tmap,
const __grid_constant__ CUtensorMap SFA_tmap,
const __grid_constant__ CUtensorMap SFB1_tmap,
const __grid_constant__ CUtensorMap SFB2_tmap,
half *C_ptr,
int M, int N, int K
) {
constexpr int CTA_GROUP = 2;
constexpr int BLOCK_N = 128;
constexpr int HALF_BLOCK_N = BLOCK_N / CTA_GROUP;
constexpr int NUM_WARPS = BLOCK_M / WARP_SIZE + 2; // 4 epilogue + 1 TMA + 1 MMA
const int tid = threadIdx.x;
const int bid = blockIdx.x;
const int warp_id = tid / WARP_SIZE;
int cta_rank;
asm volatile("mov.b32 %0, %%cluster_ctarank;" : "=r"(cta_rank));
// Persistent cluster id (CTA-pair id) and scheduling stride (in clusters).
const int cluster_pid = bid / CTA_GROUP;
const int num_clusters = gridDim.x / CTA_GROUP;
// Logical output tile grid in cluster-tiles: (M/256) x (N/BLOCK_N)
const int grid_m_clusters = M / (BLOCK_M * 2);
const int grid_n_clusters = N / BLOCK_N;
const int num_tiles = grid_m_clusters * grid_n_clusters;
extern __shared__ __align__(1024) char smem_ptr[];
const int smem = static_cast<int>(__cvta_generic_to_shared(smem_ptr));
// SMEM layout (identical across CTAs)
constexpr int A_size = BLOCK_M * BLOCK_K / 2;
constexpr int B1_size = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int B2_size = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int SFA_size = 128 * BLOCK_K / 16;
constexpr int SFB1_size = 128 * BLOCK_K / 16;
constexpr int SFB2_size = 128 * BLOCK_K / 16;
constexpr int STAGE_SIZE = A_size + B1_size + B2_size + SFA_size + SFB1_size + SFB2_size;
// Mbarrier layout:
// - tma_mbar[NUM_STAGES]: count=CTA_GROUP (one combined expect_tx per CTA)
// - mma_mbar[NUM_STAGES]: count=1 (CTA0 multicast)
// - mainloop_mbar: count=1 (CTA0 multicast, signals accum ready)
// - epilogue_mbar: count=4*CTA_GROUP (4 epilogue warps x 2 CTAs)
#pragma nv_diag_suppress static_var_with_dynamic_init
__shared__ uint64_t mbars[NUM_STAGES * 2 + 2];
__shared__ int tmem_addr[1];
const int tma_mbar_addr = static_cast<int>(__cvta_generic_to_shared(mbars));
const int mma_mbar_addr = tma_mbar_addr + NUM_STAGES * 8;
const int mainloop_mbar_addr = mma_mbar_addr + NUM_STAGES * 8;
const int epilogue_mbar_addr = mainloop_mbar_addr + 8;
// TMEM layout (single accumulator stage).
constexpr int ACC_STRIDE = 2 * BLOCK_N; // ACC1+ACC2
constexpr int ACC_BASE = 0;
constexpr int ACC1_OFF = 0;
constexpr int ACC2_OFF = BLOCK_N;
constexpr int SFA_COLS_PER_K = 8; // 256 rows / 32
constexpr int SFB_COLS_PER_K = 4; // 128 cols / 32
constexpr int SFA_tmem = ACC_BASE + ACC_STRIDE; // 2*BLOCK_N
constexpr int SFB1_tmem = SFA_tmem + SFA_COLS_PER_K * (BLOCK_K / MMA_K);
constexpr int SFB2_tmem = SFB1_tmem + SFB_COLS_PER_K * (BLOCK_K / MMA_K);
// NOTE: cta_group::2 TMEM allocation for BLOCK_N=128 is most robust with 512 columns.
// (Matches the working v6 kernels' allocation strategy.)
constexpr int TOTAL_TMEM_COLS = 512;
// Init
if (warp_id == 0 && elect_sync()) {
for (int i = 0; i < NUM_STAGES; i++) {
mbarrier_init(tma_mbar_addr + i * 8, CTA_GROUP);
mbarrier_init(mma_mbar_addr + i * 8, 1);
}
mbarrier_init(mainloop_mbar_addr, 1);
mbarrier_init(epilogue_mbar_addr, 4 * CTA_GROUP);
asm volatile("fence.mbarrier_init.release.cluster;");
} else if (warp_id == 1) {
const int addr = static_cast<int>(__cvta_generic_to_shared(tmem_addr));
asm volatile("tcgen05.alloc.cta_group::2.sync.aligned.shared::cta.b32 [%0], %1;"
:: "r"(addr), "r"(TOTAL_TMEM_COLS));
}
asm volatile("barrier.cluster.arrive.release.aligned;");
asm volatile("barrier.cluster.wait.acquire.aligned;");
const int taddr = tmem_addr[0];
// MMA descriptor
constexpr uint32_t i_desc = (1U << 7U) | (1U << 10U) | ((uint32_t)BLOCK_N >> 3U << 17U) | (2U << 27U);
constexpr int SBO_AB = 8 * 128;
constexpr int SBO_SF = 8 * 16;
constexpr uint64_t AB_desc_base = (desc_encode(SBO_AB) << 32ULL) | (1ULL << 46ULL) | (2ULL << 61ULL);
constexpr uint64_t SF_desc_base = (desc_encode(SBO_SF) << 32ULL) | (1ULL << 46ULL);
const int num_iters = K / BLOCK_K;
// Cache hints
const uint64_t cache_A = (M > N) ? EVICT_FIRST : EVICT_LAST;
const uint64_t cache_B = (M > N) ? EVICT_LAST : EVICT_FIRST;
// ========================================================================
// TMA Warp (warp 4) - combined tensor + SF
// ========================================================================
if (warp_id == NUM_WARPS - 2 && elect_sync()) {
int tma_stage = 0;
int mma_phase = 1;
int it = 0;
for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {
const int cluster_m = tile / grid_n_clusters;
const int cluster_n = tile % grid_n_clusters;
const int off_m = cluster_m * (BLOCK_M * CTA_GROUP) + cta_rank * BLOCK_M;
const int off_n = cluster_n * BLOCK_N;
const int sf_y_A = off_m / 128;
const int sf_y_B = off_n / 128; // == cluster_n
const int B_col_offset = off_n + cta_rank * HALF_BLOCK_N;
for (int iter_k = 0; iter_k < num_iters; iter_k++, it++) {
if (it >= NUM_STAGES)
mbarrier_wait(mma_mbar_addr + tma_stage * 8, mma_phase);
const int mbar_addr = (tma_mbar_addr + tma_stage * 8) & 0xFEFFFFFF;
const int base_smem = smem + tma_stage * STAGE_SIZE;
const int A_smem = base_smem;
const int B1_smem = base_smem + A_size;
const int B2_smem = B1_smem + B1_size;
const int SFA_smem = base_smem + A_size + B1_size + B2_size;
const int SFB1_smem = SFA_smem + SFA_size;
const int SFB2_smem = SFB1_smem + SFB1_size;
constexpr int TENSOR_TMA_SIZE = A_size + B1_size + B2_size;
const int SF_TMA_SIZE = SFA_size + ((cta_rank == 0) ? (CTA_GROUP * (SFB1_size + SFB2_size)) : 0);
const int TOTAL_TMA_SIZE = TENSOR_TMA_SIZE + SF_TMA_SIZE;
asm volatile("mbarrier.arrive.expect_tx.release.cta.shared::cluster.b64 _, [%0], %1;"
:: "r"(mbar_addr), "r"(TOTAL_TMA_SIZE) : "memory");
const int z_ab = iter_k * (BLOCK_K / 256);
const int z_sf = iter_k * (BLOCK_K / 64);
tma_3d_gmem2smem<CTA_GROUP>(A_smem, &A_tmap, 0, off_m, z_ab, mbar_addr, cache_A);
tma_3d_gmem2smem<CTA_GROUP>(B1_smem, &B1_tmap, 0, B_col_offset, z_ab, mbar_addr, cache_B);
tma_3d_gmem2smem<CTA_GROUP>(B2_smem, &B2_tmap, 0, B_col_offset, z_ab, mbar_addr, cache_B);
tma_3d_gmem2smem<CTA_GROUP>(SFA_smem, &SFA_tmap, 0, sf_y_A, z_sf, mbar_addr, cache_A);
if (cta_rank == 0) {
constexpr uint16_t cta_mask = (1u << CTA_GROUP) - 1u;
tma_3d_gmem2smem_mcast<CTA_GROUP>(SFB1_smem, &SFB1_tmap, 0, sf_y_B, z_sf, mbar_addr, cta_mask, cache_B);
tma_3d_gmem2smem_mcast<CTA_GROUP>(SFB2_smem, &SFB2_tmap, 0, sf_y_B, z_sf, mbar_addr, cta_mask, cache_B);
}
tma_stage = (tma_stage + 1) % NUM_STAGES;
if (tma_stage == 0) mma_phase ^= 1;
}
}
}
// ========================================================================
// MMA Warp (warp 5, CTA0) - compute + signal epilogue
// ========================================================================
else if (cta_rank == 0 && warp_id == NUM_WARPS - 1 && elect_sync()) {
int tma_stage = 0;
int tma_phase = 0;
int epilogue_phase = 1;
constexpr int16_t cta_mask = (1 << CTA_GROUP) - 1;
for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {
// Wait for epilogue to finish using the accumulator
mbarrier_wait(epilogue_mbar_addr, epilogue_phase);
const int cluster_n = tile % grid_n_clusters;
const int scale_B_base_off = (cluster_n % (128 / BLOCK_N)) * (BLOCK_N / 32); // == 0 for BLOCK_N=128
for (int iter_k = 0; iter_k < num_iters; iter_k++) {
mbarrier_wait(tma_mbar_addr + tma_stage * 8, tma_phase);
asm volatile("tcgen05.fence::after_thread_sync;");
const int base_smem = smem + tma_stage * STAGE_SIZE;
const int A_smem = base_smem;
const int B1_smem = base_smem + A_size;
const int B2_smem = base_smem + A_size + B1_size;
const int SFA_smem = base_smem + A_size + B1_size + B2_size;
const int SFB1_smem = SFA_smem + SFA_size;
const int SFB2_smem = SFB1_smem + SFB1_size;
const uint64_t SFA_desc = SF_desc_base + ((uint64_t)SFA_smem >> 4ULL);
const uint64_t SFB1_desc = SF_desc_base + ((uint64_t)SFB1_smem >> 4ULL);
const uint64_t SFB2_desc = SF_desc_base + ((uint64_t)SFB2_smem >> 4ULL);
#pragma unroll
for (int k = 0; k < BLOCK_K / MMA_K; k++) {
tcgen05_cp_cta2(SFA_tmem + k * SFA_COLS_PER_K, SFA_desc + (uint64_t)k * 32ULL);
tcgen05_cp_cta2(SFB1_tmem + k * SFB_COLS_PER_K, SFB1_desc + (uint64_t)k * 32ULL);
tcgen05_cp_cta2(SFB2_tmem + k * SFB_COLS_PER_K, SFB2_desc + (uint64_t)k * 32ULL);
}
asm volatile("tcgen05.fence::before_thread_sync;");
#pragma unroll
for (int k1 = 0; k1 < BLOCK_K / 256; k1++) {
#pragma unroll
for (int k2 = 0; k2 < 256 / MMA_K; k2++) {
const int a_off = k1 * BLOCK_M * 128 + k2 * 32;
const int b_off = k1 * HALF_BLOCK_N * 128 + k2 * 32;
uint64_t a_desc = AB_desc_base + desc_encode(A_smem + a_off);
uint64_t b1_desc = AB_desc_base + desc_encode(B1_smem + b_off);
uint64_t b2_desc = AB_desc_base + desc_encode(B2_smem + b_off);
const int k_sf = k1 * 4 + k2;
const int scale_A = SFA_tmem + k_sf * SFA_COLS_PER_K;
const int scale_B1 = SFB1_tmem + k_sf * SFB_COLS_PER_K + scale_B_base_off;
const int scale_B2 = SFB2_tmem + k_sf * SFB_COLS_PER_K + scale_B_base_off;
const int enable_d = (k1 == 0 && k2 == 0) ? iter_k : 1;
tcgen05_mma_cta2(ACC_BASE + ACC1_OFF, a_desc, b1_desc, i_desc, scale_A, scale_B1, enable_d);
tcgen05_mma_cta2(ACC_BASE + ACC2_OFF, a_desc, b2_desc, i_desc, scale_A, scale_B2, enable_d);
}
}
asm volatile("tcgen05.commit.cta_group::2.mbarrier::arrive::one.shared::cluster.multicast::cluster.b64 [%0], %1;"
:: "r"(mma_mbar_addr + tma_stage * 8), "h"(cta_mask) : "memory");
tma_stage = (tma_stage + 1) % NUM_STAGES;
if (tma_stage == 0) tma_phase ^= 1;
}
// Signal mainloop done (acc ready) to both CTAs
asm volatile("tcgen05.commit.cta_group::2.mbarrier::arrive::one.shared::cluster.multicast::cluster.b64 [%0], %1;"
:: "r"(mainloop_mbar_addr), "h"(cta_mask) : "memory");
epilogue_phase ^= 1;
}
}
// ========================================================================
// Epilogue warps (warps 0..3)
// ========================================================================
else if (warp_id < 4) {
int mainloop_phase = 0;
for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {
mbarrier_wait(mainloop_mbar_addr, mainloop_phase);
asm volatile("tcgen05.fence::after_thread_sync;");
const int cluster_m = tile / grid_n_clusters;
const int cluster_n = tile % grid_n_clusters;
const int off_m = cluster_m * (BLOCK_M * CTA_GROUP) + cta_rank * BLOCK_M;
const int off_n = cluster_n * BLOCK_N;
if (tid < BLOCK_M) {
// Load+store 128 columns as 2x64 to keep register pressure reasonable.
constexpr int WIDTH = 64;
const int tmem_row = cta_rank * 128 + warp_id * 32;
half* row_ptr = C_ptr + (off_m + tid) * N + off_n;
#pragma unroll 1
for (int seg = 0; seg < 128; seg += 64) {
float acc1[WIDTH], acc2[WIDTH];
const int addr1 = taddr + (tmem_row << 16) + (ACC_BASE + ACC1_OFF + seg);
const int addr2 = taddr + (tmem_row << 16) + (ACC_BASE + ACC2_OFF + seg);
tcgen05_ld_32x32bx64_addr(acc1, addr1);
tcgen05_ld_32x32bx64_addr(acc2, addr2);
asm volatile("tcgen05.wait::ld.sync.aligned;");
#pragma unroll
for (int i = 0; i < WIDTH; i += 16) {
half2 h0 = silu_mul_h2(acc1[i+0], acc1[i+1], acc2[i+0], acc2[i+1]);
half2 h1 = silu_mul_h2(acc1[i+2], acc1[i+3], acc2[i+2], acc2[i+3]);
half2 h2 = silu_mul_h2(acc1[i+4], acc1[i+5], acc2[i+4], acc2[i+5]);
half2 h3 = silu_mul_h2(acc1[i+6], acc1[i+7], acc2[i+6], acc2[i+7]);
half2 h4 = silu_mul_h2(acc1[i+8], acc1[i+9], acc2[i+8], acc2[i+9]);
half2 h5 = silu_mul_h2(acc1[i+10], acc1[i+11], acc2[i+10], acc2[i+11]);
half2 h6 = silu_mul_h2(acc1[i+12], acc1[i+13], acc2[i+12], acc2[i+13]);
half2 h7 = silu_mul_h2(acc1[i+14], acc1[i+15], acc2[i+14], acc2[i+15]);
const uint32_t u0 = *reinterpret_cast<uint32_t*>(&h0);
const uint32_t u1 = *reinterpret_cast<uint32_t*>(&h1);
const uint32_t u2 = *reinterpret_cast<uint32_t*>(&h2);
const uint32_t u3 = *reinterpret_cast<uint32_t*>(&h3);
const uint32_t u4 = *reinterpret_cast<uint32_t*>(&h4);
const uint32_t u5 = *reinterpret_cast<uint32_t*>(&h5);
const uint32_t u6 = *reinterpret_cast<uint32_t*>(&h6);
const uint32_t u7 = *reinterpret_cast<uint32_t*>(&h7);
const unsigned long long q0 = (unsigned long long)u0 | ((unsigned long long)u1 << 32);
const unsigned long long q1 = (unsigned long long)u2 | ((unsigned long long)u3 << 32);
const unsigned long long q2 = (unsigned long long)u4 | ((unsigned long long)u5 << 32);
const unsigned long long q3 = (unsigned long long)u6 | ((unsigned long long)u7 << 32);
stg_32b((const void*)(row_ptr + seg + i), q0, q1, q2, q3);
}
}
}
// Signal epilogue done for this tile
if (elect_sync()) {
const int mbar_addr = epilogue_mbar_addr & 0xFEFFFFFF;
asm volatile("mbarrier.arrive.release.cta.shared::cluster.b64 _, [%0];"
:: "r"(mbar_addr) : "memory");
}
mainloop_phase ^= 1;
}
}
asm volatile("barrier.cluster.arrive.release.aligned;");
asm volatile("barrier.cluster.wait.acquire.aligned;");
if (warp_id == 0) {
asm volatile("tcgen05.dealloc.cta_group::2.sync.aligned.b32 %0, %1;"
:: "r"(taddr), "r"(TOTAL_TMEM_COLS));
}
}
// ============================================================================
// Non-persistent v6 kernel (baseline)
// NOTE: Disabled in this persistent-only optimization file to reduce compile time.
// ============================================================================
#if 0
template <int BLOCK_M, int BLOCK_N, int BLOCK_K, int NUM_STAGES>
__global__
__cluster_dims__(2, 1, 1)
__launch_bounds__(BLOCK_M + 3 * WARP_SIZE)
void dual_gemm_cta2_v6_kernel(
const __grid_constant__ CUtensorMap A_tmap,
const __grid_constant__ CUtensorMap B1_tmap,
const __grid_constant__ CUtensorMap B2_tmap,
const __grid_constant__ CUtensorMap SFA_tmap,
const __grid_constant__ CUtensorMap SFB1_tmap,
const __grid_constant__ CUtensorMap SFB2_tmap,
half *C_ptr,
int M, int N, int K
) {
constexpr int CTA_GROUP = 2;
constexpr int HALF_BLOCK_N = BLOCK_N / CTA_GROUP;
// v6: Add dedicated SF warp (warp 5), so +3 instead of +2
constexpr int NUM_WARPS = BLOCK_M / WARP_SIZE + 3; // 4 epilogue + 1 SF + 1 TMA + 1 MMA = 7
const int tid = threadIdx.x;
const int bid = blockIdx.x;
const int warp_id = tid / WARP_SIZE;
int cta_rank;
asm volatile("mov.b32 %0, %%cluster_ctarank;" : "=r"(cta_rank));
// Grid indexing - M-mode first for cta_group::2
const int cluster_idx = bid / CTA_GROUP;
const int grid_n_clusters = N / BLOCK_N;
const int cluster_m = cluster_idx / grid_n_clusters;
const int cluster_n = cluster_idx % grid_n_clusters;
const int off_m = cluster_m * (BLOCK_M * CTA_GROUP) + cta_rank * BLOCK_M;
const int off_n = cluster_n * BLOCK_N;
extern __shared__ __align__(1024) char smem_ptr[];
const int smem = static_cast<int>(__cvta_generic_to_shared(smem_ptr));
// SMEM layout (must be identical across CTAs!)
// In 2-SM MMA, the B operand is split across CTAs (each CTA holds HALF_BLOCK_N columns).
constexpr int A_size = BLOCK_M * BLOCK_K / 2;
constexpr int B1_size = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int B2_size = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int SFA_size = 128 * BLOCK_K / 16;
constexpr int SFB1_size = 128 * BLOCK_K / 16;
constexpr int SFB2_size = 128 * BLOCK_K / 16;
constexpr int STAGE_SIZE = A_size + B1_size + B2_size + SFA_size + SFB1_size + SFB2_size;
// Mbarrier layout:
// - tma_mbar: count=CTA_GROUP*2
// - tensor warp issues expect_tx for tensor bytes (1 arrival per CTA)
// - sf warp issues expect_tx for SF bytes (1 arrival per CTA)
// Both report into CTA0's mbar (masked address), using .shared::cluster.
// - mma_mbar: count=1, CTA0 multicasts to both CTAs (stage reuse)
// - mainloop_mbar: count=1, CTA0 multicasts to both CTAs (epilogue start)
#pragma nv_diag_suppress static_var_with_dynamic_init
__shared__ uint64_t mbars[NUM_STAGES * 2 + 1];
__shared__ int tmem_addr[1];
const int tma_mbar_addr = static_cast<int>(__cvta_generic_to_shared(mbars));
const int mma_mbar_addr = tma_mbar_addr + NUM_STAGES * 8;
const int mainloop_mbar_addr = mma_mbar_addr + NUM_STAGES * 8;
// TMEM layout for cta_group::2
constexpr int ACC1_tmem = 0;
constexpr int ACC2_tmem = BLOCK_N;
constexpr int SFA_COLS_PER_K = 8; // 256 rows / 32
constexpr int SFB_COLS_PER_K = 4; // 128 cols / 32
constexpr int SFA_tmem = 2 * BLOCK_N;
constexpr int SFB1_tmem = SFA_tmem + SFA_COLS_PER_K * (BLOCK_K / MMA_K);
constexpr int SFB2_tmem = SFB1_tmem + SFB_COLS_PER_K * (BLOCK_K / MMA_K);
// TMEM allocation must be a power-of-2 column count.
// - For BLOCK_N=128 we need 512 cols (ACC1+ACC2 already consumes 256, plus scale factors).
// - For BLOCK_N=64, 256 cols is sufficient and can reduce TMEM pressure.
constexpr int TOTAL_TMEM_COLS = (BLOCK_N <= 64) ? 256 : 512;
// ========================================================================
// Initialization - following reference exactly
// ========================================================================
if (warp_id == 0 && elect_sync()) {
for (int i = 0; i < NUM_STAGES; i++) {
// 4 arrivals = 2 (tensor expect_tx) + 2 (SF expect_tx)
mbarrier_init(tma_mbar_addr + i * 8, CTA_GROUP * 2);
mbarrier_init(mma_mbar_addr + i * 8, 1); // CTA0 multicasts to both
}
mbarrier_init(mainloop_mbar_addr, 1); // CTA0 multicasts to both
asm volatile("fence.mbarrier_init.release.cluster;");
}
else if (warp_id == 1) {
const int addr = static_cast<int>(__cvta_generic_to_shared(tmem_addr));
asm volatile("tcgen05.alloc.cta_group::2.sync.aligned.shared::cta.b32 [%0], %1;"
:: "r"(addr), "r"(TOTAL_TMEM_COLS));
}
// Cluster barrier - visible to all threads in cluster
asm volatile("barrier.cluster.arrive.release.aligned;");
asm volatile("barrier.cluster.wait.acquire.aligned;");
const int taddr = tmem_addr[0];
// Instruction descriptor for MMA_M=256, MMA_N=BLOCK_N
constexpr uint32_t i_desc = (1U << 7U) | (1U << 10U) | ((uint32_t)BLOCK_N >> 3U << 17U) | (2U << 27U);
constexpr int SBO_AB = 8 * 128;
constexpr int SBO_SF = 8 * 16;
constexpr uint64_t AB_desc_base = (desc_encode(SBO_AB) << 32ULL) | (1ULL << 46ULL) | (2ULL << 61ULL);
constexpr uint64_t SF_desc_base = (desc_encode(SBO_SF) << 32ULL) | (1ULL << 46ULL);
const int scale_B_base_off = (cluster_n % (128 / BLOCK_N)) * (BLOCK_N / 32);
const int num_iters = K / BLOCK_K;
// L2 cache hints (winner pattern):
// If M > N, keep B (evict A first); else keep A (evict B first).
const uint64_t cache_A = (M > N) ? EVICT_FIRST : EVICT_LAST;
const uint64_t cache_B = (M > N) ? EVICT_LAST : EVICT_FIRST;
// ========================================================================
// SF Warp (warp 4) - Issues SF TMA loads in parallel with tensor TMA
// ========================================================================
if (warp_id == NUM_WARPS - 3 && elect_sync()) {
int tma_stage = 0;
int mma_phase = 1;
for (int iter_k = 0; iter_k < num_iters; iter_k++) {
// Wait for MMA to release this buffer (skip for initial pipeline fill)
if (iter_k >= NUM_STAGES)
mbarrier_wait(mma_mbar_addr + tma_stage * 8, mma_phase);
const int mbar_addr = (tma_mbar_addr + tma_stage * 8) & 0xFEFFFFFF;
const int off_k = iter_k * BLOCK_K;
// SMEM addresses for SF
const int base_smem = smem + tma_stage * STAGE_SIZE;
const int SFA_smem = base_smem + A_size + B1_size + B2_size;
const int SFB1_smem = SFA_smem + SFA_size;
const int SFB2_smem = SFB1_smem + SFB1_size;
// Scale-factor tensor TMA: report directly into CTA0's stage mbarrier.
// Optimization (borrowed from winner-style kernels):
// SFB1/SFB2 are 128-column granular in the permuted SF layout and are identical across CTAs
// within the 2-CTA cluster for a given (off_n/128, off_k/64). So we only issue SFB loads
// once (CTA0) and multicast them to both CTAs. CTA1 only loads its unique SFA.
// NOTE: For cp.async.bulk.tensor ... .multicast::cluster, the complete_tx byte count is
// the total bytes copied into shared memory across all destinations, i.e. scaled by
// popcount(ctaMask). For our 2-CTA cluster (ctaMask=0b11), that's 2x.
const int SF_TMA_SIZE = SFA_size + ((cta_rank == 0) ? (CTA_GROUP * (SFB1_size + SFB2_size)) : 0);
asm volatile("mbarrier.arrive.expect_tx.release.cta.shared::cluster.b64 _, [%0], %1;"
:: "r"(mbar_addr), "r"(SF_TMA_SIZE) : "memory");
// Scale factors via tensor TMA (supports remote mbarrier through cta_group::2).
const int sf_y_A = off_m / 128;
const int sf_y_B = off_n / 128;
const int sf_z = off_k / 64;
tma_3d_gmem2smem<CTA_GROUP>(SFA_smem, &SFA_tmap, 0, sf_y_A, sf_z, mbar_addr, cache_A);
if (cta_rank == 0) {
constexpr uint16_t cta_mask = (1u << CTA_GROUP) - 1u; // 0b11
tma_3d_gmem2smem_mcast<CTA_GROUP>(SFB1_smem, &SFB1_tmap, 0, sf_y_B, sf_z, mbar_addr, cta_mask, cache_B);
tma_3d_gmem2smem_mcast<CTA_GROUP>(SFB2_smem, &SFB2_tmap, 0, sf_y_B, sf_z, mbar_addr, cta_mask, cache_B);
}
tma_stage = (tma_stage + 1) % NUM_STAGES;
if (tma_stage == 0) mma_phase ^= 1;
}
}
// ========================================================================
// TMA Warp (warp 5) - Issues TENSOR TMA loads only (parallel with SF warp)
// ========================================================================
else if (warp_id == NUM_WARPS - 2 && elect_sync()) {
int tma_stage = 0;
int mma_phase = 1;
for (int iter_k = 0; iter_k < num_iters; iter_k++) {
// Wait for MMA to release this buffer (skip for initial pipeline fill)
if (iter_k >= NUM_STAGES)
mbarrier_wait(mma_mbar_addr + tma_stage * 8, mma_phase);
const int mbar_addr = (tma_mbar_addr + tma_stage * 8) & 0xFEFFFFFF;
const int off_k = iter_k * BLOCK_K;
// SMEM addresses
const int A_smem = smem + tma_stage * STAGE_SIZE;
const int B1_smem = A_smem + A_size;
const int B2_smem = B1_smem + B1_size;
// Arrive.expect_tx for this CTA's tensor TMAs, then issue loads.
constexpr int TENSOR_TMA_SIZE = A_size + B1_size + B2_size;
asm volatile("mbarrier.arrive.expect_tx.release.cta.shared::cluster.b64 _, [%0], %1;"
:: "r"(mbar_addr), "r"(TENSOR_TMA_SIZE) : "memory");
// Issue tensor TMA loads (A is not split; B1/B2 are split along N).
tma_3d_gmem2smem<CTA_GROUP>(A_smem, &A_tmap, 0, off_m, off_k / 256, mbar_addr, cache_A);
const int B_col_offset = off_n + cta_rank * HALF_BLOCK_N;
tma_3d_gmem2smem<CTA_GROUP>(B1_smem, &B1_tmap, 0, B_col_offset, off_k / 256, mbar_addr, cache_B);
tma_3d_gmem2smem<CTA_GROUP>(B2_smem, &B2_tmap, 0, B_col_offset, off_k / 256, mbar_addr, cache_B);
tma_stage = (tma_stage + 1) % NUM_STAGES;
if (tma_stage == 0) mma_phase ^= 1;
}
}
// ========================================================================
// MMA Warp (warp 6, CTA0 ONLY) - Wait for TMA, issue tcgen05.cp and tcgen05.mma
// ========================================================================
else if (cta_rank == 0 && warp_id == NUM_WARPS - 1 && elect_sync()) {
int tma_stage = 0;
int tma_phase = 0;
for (int iter_k = 0; iter_k < num_iters; iter_k++) {
// Wait for ALL TMAs (count=4: 2 tensor expect_tx + 2 SF arrive)
mbarrier_wait(tma_mbar_addr + tma_stage * 8, tma_phase);
asm volatile("tcgen05.fence::after_thread_sync;");
// SMEM addresses
const int base_smem = smem + tma_stage * STAGE_SIZE;
const int A_smem = base_smem;
const int B1_smem = base_smem + A_size;
const int B2_smem = base_smem + A_size + B1_size;
const int SFA_smem = base_smem + A_size + B1_size + B2_size;
const int SFB1_smem = SFA_smem + SFA_size;
const int SFB2_smem = SFB1_smem + SFB1_size;
// tcgen05.cp - reads from BOTH CTAs' SMEM, writes to BOTH TMEMs
const uint64_t SFA_desc = SF_desc_base + ((uint64_t)SFA_smem >> 4ULL);
const uint64_t SFB1_desc = SF_desc_base + ((uint64_t)SFB1_smem >> 4ULL);
const uint64_t SFB2_desc = SF_desc_base + ((uint64_t)SFB2_smem >> 4ULL);
#pragma unroll
for (int k = 0; k < BLOCK_K / MMA_K; k++) {
tcgen05_cp_cta2(SFA_tmem + k * SFA_COLS_PER_K, SFA_desc + (uint64_t)k * 32ULL);
tcgen05_cp_cta2(SFB1_tmem + k * SFB_COLS_PER_K, SFB1_desc + (uint64_t)k * 32ULL);
tcgen05_cp_cta2(SFB2_tmem + k * SFB_COLS_PER_K, SFB2_desc + (uint64_t)k * 32ULL);
}
// Fence to ensure tcgen05.cp completes before tcgen05.mma
asm volatile("tcgen05.fence::before_thread_sync;");
// MMA
#pragma unroll
for (int k1 = 0; k1 < BLOCK_K / 256; k1++) {
#pragma unroll
for (int k2 = 0; k2 < 256 / MMA_K; k2++) {
const int a_off = k1 * BLOCK_M * 128 + k2 * 32;
const int b_off = k1 * HALF_BLOCK_N * 128 + k2 * 32;
uint64_t a_desc = AB_desc_base + desc_encode(A_smem + a_off);
uint64_t b1_desc = AB_desc_base + desc_encode(B1_smem + b_off);
uint64_t b2_desc = AB_desc_base + desc_encode(B2_smem + b_off);
const int k_sf = k1 * 4 + k2;
const int scale_A = SFA_tmem + k_sf * SFA_COLS_PER_K;
const int scale_B1 = SFB1_tmem + k_sf * SFB_COLS_PER_K + scale_B_base_off;
const int scale_B2 = SFB2_tmem + k_sf * SFB_COLS_PER_K + scale_B_base_off;
const int enable_d = (k1 == 0 && k2 == 0) ? iter_k : 1;
tcgen05_mma_cta2(ACC1_tmem, a_desc, b1_desc, i_desc, scale_A, scale_B1, enable_d);
tcgen05_mma_cta2(ACC2_tmem, a_desc, b2_desc, i_desc, scale_A, scale_B2, enable_d);
}
}
// Commit MMA - multicast to BOTH CTAs (following reference)
constexpr int16_t cta_mask = (1 << CTA_GROUP) - 1; // 0b11
asm volatile("tcgen05.commit.cta_group::2.mbarrier::arrive::one.shared::cluster.multicast::cluster.b64 [%0], %1;"
:: "r"(mma_mbar_addr + tma_stage * 8), "h"(cta_mask) : "memory");
// Flip phase when cycled through all stages
tma_stage = (tma_stage + 1) % NUM_STAGES;
if (tma_stage == 0) {
tma_phase ^= 1;
}
}
// Signal mainloop completion - multicast to BOTH CTAs
constexpr int16_t cta_mask = (1 << CTA_GROUP) - 1;
asm volatile("tcgen05.commit.cta_group::2.mbarrier::arrive::one.shared::cluster.multicast::cluster.b64 [%0], %1;"
:: "r"(mainloop_mbar_addr), "h"(cta_mask) : "memory");
}
// ========================================================================
// Epilogue - BOTH CTAs wait for mainloop completion
// Optimized with wider TMEM loads (64 columns at once instead of 8)
// ========================================================================
mbarrier_wait(mainloop_mbar_addr, 0);
asm volatile("tcgen05.fence::after_thread_sync;");
if (tid < BLOCK_M) {
// cta_group::2 MMA produces full BLOCK_N columns per CTA accumulator
constexpr int WIDTH = (BLOCK_N <= 64) ? BLOCK_N : 64;
const int tmem_row = cta_rank * 128 + warp_id * 32;
#pragma unroll 1
for (int n = 0; n < BLOCK_N / WIDTH; n++) {
float acc1[WIDTH], acc2[WIDTH];
// Compute full TMEM address: taddr + (row << 16) + col
const int addr1 = taddr + (tmem_row << 16) + (ACC1_tmem + n * WIDTH);
const int addr2 = taddr + (tmem_row << 16) + (ACC2_tmem + n * WIDTH);
// Load with wider TMEM loads
// - WIDTH==64 for BLOCK_N=128
// - WIDTH==BLOCK_N for BLOCK_N<=64
if constexpr (WIDTH == 64) {
tcgen05_ld_32x32bx64_addr(acc1, addr1);
tcgen05_ld_32x32bx64_addr(acc2, addr2);
} else {
tcgen05_ld_32x32bx32_addr(acc1, addr1);
tcgen05_ld_32x32bx32_addr(acc2, addr2);
}
asm volatile("tcgen05.wait::ld.sync.aligned;");
// Store C as (M, N) row-major (matches reference layout), vectorized per thread.
half* row_ptr = C_ptr + (off_m + tid) * N + off_n + n * WIDTH;
// 32B stores (16 fp16 at a time).
#pragma unroll
for (int i = 0; i < WIDTH; i += 16) {
half2 h0 = silu_mul_h2(acc1[i+0], acc1[i+1], acc2[i+0], acc2[i+1]);
half2 h1 = silu_mul_h2(acc1[i+2], acc1[i+3], acc2[i+2], acc2[i+3]);
half2 h2 = silu_mul_h2(acc1[i+4], acc1[i+5], acc2[i+4], acc2[i+5]);
half2 h3 = silu_mul_h2(acc1[i+6], acc1[i+7], acc2[i+6], acc2[i+7]);
half2 h4 = silu_mul_h2(acc1[i+8], acc1[i+9], acc2[i+8], acc2[i+9]);
half2 h5 = silu_mul_h2(acc1[i+10], acc1[i+11], acc2[i+10], acc2[i+11]);
half2 h6 = silu_mul_h2(acc1[i+12], acc1[i+13], acc2[i+12], acc2[i+13]);
half2 h7 = silu_mul_h2(acc1[i+14], acc1[i+15], acc2[i+14], acc2[i+15]);
const uint32_t u0 = *reinterpret_cast<uint32_t*>(&h0);
const uint32_t u1 = *reinterpret_cast<uint32_t*>(&h1);
const uint32_t u2 = *reinterpret_cast<uint32_t*>(&h2);
const uint32_t u3 = *reinterpret_cast<uint32_t*>(&h3);
const uint32_t u4 = *reinterpret_cast<uint32_t*>(&h4);
const uint32_t u5 = *reinterpret_cast<uint32_t*>(&h5);
const uint32_t u6 = *reinterpret_cast<uint32_t*>(&h6);
const uint32_t u7 = *reinterpret_cast<uint32_t*>(&h7);
const unsigned long long q0 = (unsigned long long)u0 | ((unsigned long long)u1 << 32);
const unsigned long long q1 = (unsigned long long)u2 | ((unsigned long long)u3 << 32);
const unsigned long long q2 = (unsigned long long)u4 | ((unsigned long long)u5 << 32);
const unsigned long long q3 = (unsigned long long)u6 | ((unsigned long long)u7 << 32);
stg_32b((const void*)(row_ptr + i), q0, q1, q2, q3);
}
}
}
// Cluster barrier before deallocation (following reference)
asm volatile("barrier.cluster.arrive.release.aligned;");
asm volatile("barrier.cluster.wait.acquire.aligned;");
if (warp_id == 0) {
asm volatile("tcgen05.dealloc.cta_group::2.sync.aligned.b32 %0, %1;"
:: "r"(taddr), "r"(TOTAL_TMEM_COLS));
}
}
template <int BLOCK_M, int BLOCK_N, int BLOCK_K, int NUM_STAGES>
at::Tensor dual_gemm_cta2_v6_launch(
const at::Tensor& A,
const at::Tensor& B1,
const at::Tensor& B2,
const at::Tensor& SFA,
const at::Tensor& SFB1,
const at::Tensor& SFB2,
at::Tensor& C
) {
constexpr int HALF_BLOCK_N = BLOCK_N / 2;
const int M = A.size(0);
const int N = B1.size(0);
const int K = A.size(1) * 2;
auto A_ptr = reinterpret_cast<const char *>(A.data_ptr());
auto B1_ptr = reinterpret_cast<const char *>(B1.data_ptr());
auto B2_ptr = reinterpret_cast<const char *>(B2.data_ptr());
auto SFA_ptr = reinterpret_cast<const char *>(SFA.data_ptr());
auto SFB1_ptr = reinterpret_cast<const char *>(SFB1.data_ptr());
auto SFB2_ptr = reinterpret_cast<const char *>(SFB2.data_ptr());
auto C_ptr = reinterpret_cast<half *>(C.data_ptr());
CUtensorMap A_tmap, B1_tmap, B2_tmap;
init_AB_tmap(&A_tmap, A_ptr, M, K, BLOCK_M, BLOCK_K);
init_AB_tmap(&B1_tmap, B1_ptr, N, K, HALF_BLOCK_N, BLOCK_K);
init_AB_tmap(&B2_tmap, B2_ptr, N, K, HALF_BLOCK_N, BLOCK_K);
CUtensorMap SFA_tmap, SFB1_tmap, SFB2_tmap;
init_SF_tmap(&SFA_tmap, SFA_ptr, M, K, BLOCK_K);
init_SF_tmap(&SFB1_tmap, SFB1_ptr, N, K, BLOCK_K);
init_SF_tmap(&SFB2_tmap, SFB2_ptr, N, K, BLOCK_K);
const int num_blocks = (M / BLOCK_M) * (N / BLOCK_N);
dim3 grid(num_blocks, 1, 1);
int tb_size = BLOCK_M + 3 * WARP_SIZE; // +3 for SF, TMA, MMA warps
constexpr int A_size_c = BLOCK_M * BLOCK_K / 2;
constexpr int B1_size_c = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int B2_size_c = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int SFA_size_c = 128 * BLOCK_K / 16;
constexpr int SFB1_size_c = 128 * BLOCK_K / 16;
constexpr int SFB2_size_c = 128 * BLOCK_K / 16;
int smem_size = (A_size_c + B1_size_c + B2_size_c + SFA_size_c + SFB1_size_c + SFB2_size_c) * NUM_STAGES;
auto kernel_fn = dual_gemm_cta2_v6_kernel<BLOCK_M, BLOCK_N, BLOCK_K, NUM_STAGES>;
if (smem_size > 48000)
cudaFuncSetAttribute(kernel_fn, cudaFuncAttributeMaxDynamicSharedMemorySize, smem_size);
kernel_fn<<<grid, tb_size, smem_size>>>(
A_tmap, B1_tmap, B2_tmap, SFA_tmap, SFB1_tmap, SFB2_tmap, C_ptr, M, N, K
);
return C;
}
// ============================================================================
// Launch Wrapper
// ============================================================================
#endif
template <int BLOCK_M, int BLOCK_N, int BLOCK_K, int NUM_STAGES>
at::Tensor dual_gemm_cta2_persistent_launch(
const at::Tensor& A,
const at::Tensor& B1,
const at::Tensor& B2,
const at::Tensor& SFA,
const at::Tensor& SFB1,
const at::Tensor& SFB2,
at::Tensor& C,
int K
) {
constexpr int HALF_BLOCK_N = BLOCK_N / 2;
const int M = A.size(0);
const int N = B1.size(0);
auto A_ptr = reinterpret_cast<const char *>(A.data_ptr());
auto B1_ptr = reinterpret_cast<const char *>(B1.data_ptr());
auto B2_ptr = reinterpret_cast<const char *>(B2.data_ptr());
auto SFA_ptr = reinterpret_cast<const char *>(SFA.data_ptr());
auto SFB1_ptr = reinterpret_cast<const char *>(SFB1.data_ptr());
auto SFB2_ptr = reinterpret_cast<const char *>(SFB2.data_ptr());
auto C_ptr = reinterpret_cast<half *>(C.data_ptr());
CUtensorMap A_tmap, B1_tmap, B2_tmap;
init_AB_tmap(&A_tmap, A_ptr, M, K, BLOCK_M, BLOCK_K);
init_AB_tmap(&B1_tmap, B1_ptr, N, K, HALF_BLOCK_N, BLOCK_K);
init_AB_tmap(&B2_tmap, B2_ptr, N, K, HALF_BLOCK_N, BLOCK_K);
CUtensorMap SFA_tmap, SFB1_tmap, SFB2_tmap;
init_SF_tmap(&SFA_tmap, SFA_ptr, M, K, BLOCK_K);
init_SF_tmap(&SFB1_tmap, SFB1_ptr, N, K, BLOCK_K);
init_SF_tmap(&SFB2_tmap, SFB2_ptr, N, K, BLOCK_K);
int tb_size = BLOCK_M + 2 * WARP_SIZE; // +2 for TMA, MMA warps
constexpr int A_size_c = BLOCK_M * BLOCK_K / 2;
constexpr int B1_size_c = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int B2_size_c = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int SFA_size_c = 128 * BLOCK_K / 16;
constexpr int SFB1_size_c = 128 * BLOCK_K / 16;
constexpr int SFB2_size_c = 128 * BLOCK_K / 16;
int smem_size = (A_size_c + B1_size_c + B2_size_c + SFA_size_c + SFB1_size_c + SFB2_size_c) * NUM_STAGES;
auto kernel_fn = dual_gemm_cta2_persistent_kernel<BLOCK_M, BLOCK_N, BLOCK_K, NUM_STAGES>;
if (smem_size > 48000)
cudaFuncSetAttribute(kernel_fn, cudaFuncAttributeMaxDynamicSharedMemorySize, smem_size);
const int grid_m_clusters = M / (BLOCK_M * 2);
const int grid_n_clusters = N / BLOCK_N;
const int num_tiles = grid_m_clusters * grid_n_clusters;
const int max_clusters = 74;
// Persistent scheduling tuning:
// - Prefer max cluster residency (up to 74 clusters on B200) to reduce per-cluster work and
// increase eligible warps, even when grid_n_clusters is small (e.g. M=512 cases).
int clusters = (num_tiles < max_clusters) ? num_tiles : max_clusters;
if (clusters < 1) clusters = 1;
dim3 pgrid(clusters * 2, 1, 1);
kernel_fn<<<pgrid, tb_size, smem_size>>>(
A_tmap, B1_tmap, B2_tmap, SFA_tmap, SFB1_tmap, SFB2_tmap, C_ptr, M, N, K
);
return C;
}
template <int BLOCK_M, int BLOCK_K, int NUM_STAGES>
at::Tensor dual_gemm_cta2_persistent_n64_launch(
const at::Tensor& A,
const at::Tensor& B1,
const at::Tensor& B2,
const at::Tensor& SFA,
const at::Tensor& SFB1,
const at::Tensor& SFB2,
at::Tensor& C,
int K
) {
constexpr int BLOCK_N = 64;
constexpr int HALF_BLOCK_N = BLOCK_N / 2;
const int M = A.size(0);
const int N = B1.size(0);
auto A_ptr = reinterpret_cast<const char *>(A.data_ptr());
auto B1_ptr = reinterpret_cast<const char *>(B1.data_ptr());
auto B2_ptr = reinterpret_cast<const char *>(B2.data_ptr());
auto SFA_ptr = reinterpret_cast<const char *>(SFA.data_ptr());
auto SFB1_ptr = reinterpret_cast<const char *>(SFB1.data_ptr());
auto SFB2_ptr = reinterpret_cast<const char *>(SFB2.data_ptr());
auto C_ptr = reinterpret_cast<half *>(C.data_ptr());
CUtensorMap A_tmap, B1_tmap, B2_tmap;
init_AB_tmap(&A_tmap, A_ptr, M, K, BLOCK_M, BLOCK_K);
init_AB_tmap(&B1_tmap, B1_ptr, N, K, HALF_BLOCK_N, BLOCK_K);
init_AB_tmap(&B2_tmap, B2_ptr, N, K, HALF_BLOCK_N, BLOCK_K);
CUtensorMap SFA_tmap, SFB1_tmap, SFB2_tmap;
init_SF_tmap(&SFA_tmap, SFA_ptr, M, K, BLOCK_K);
init_SF_tmap(&SFB1_tmap, SFB1_ptr, N, K, BLOCK_K);
init_SF_tmap(&SFB2_tmap, SFB2_ptr, N, K, BLOCK_K);
int tb_size = BLOCK_M + 2 * WARP_SIZE; // 4 epilogue + 1 TMA + 1 MMA
constexpr int A_size_c = BLOCK_M * BLOCK_K / 2;
constexpr int B1_size_c = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int B2_size_c = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int SFA_size_c = 128 * BLOCK_K / 16;
constexpr int SFB1_size_c = 128 * BLOCK_K / 16;
constexpr int SFB2_size_c = 128 * BLOCK_K / 16;
int smem_size = (A_size_c + B1_size_c + B2_size_c + SFA_size_c + SFB1_size_c + SFB2_size_c) * NUM_STAGES;
auto kernel_fn = dual_gemm_cta2_persistent_n64_kernel<BLOCK_M, BLOCK_K, NUM_STAGES>;
if (smem_size > 48000)
cudaFuncSetAttribute(kernel_fn, cudaFuncAttributeMaxDynamicSharedMemorySize, smem_size);
const int grid_m_clusters = M / (BLOCK_M * 2);
const int grid_n_clusters = N / BLOCK_N;
const int num_tiles = grid_m_clusters * grid_n_clusters;
const int max_clusters = 74;
int clusters = (num_tiles < max_clusters) ? num_tiles : max_clusters;
if (clusters < 1) clusters = 1;
dim3 pgrid(clusters * 2, 1, 1);
kernel_fn<<<pgrid, tb_size, smem_size>>>(
A_tmap, B1_tmap, B2_tmap, SFA_tmap, SFB1_tmap, SFB2_tmap, C_ptr, M, N, K
);
return C;
}
template <int BLOCK_M, int BLOCK_K, int NUM_STAGES>
at::Tensor dual_gemm_cta2_persistent_n128_launch(
const at::Tensor& A,
const at::Tensor& B1,
const at::Tensor& B2,
const at::Tensor& SFA,
const at::Tensor& SFB1,
const at::Tensor& SFB2,
at::Tensor& C,
int K
) {
constexpr int BLOCK_N = 128;
constexpr int HALF_BLOCK_N = BLOCK_N / 2;
const int M = A.size(0);
const int N = B1.size(0);
auto A_ptr = reinterpret_cast<const char *>(A.data_ptr());
auto B1_ptr = reinterpret_cast<const char *>(B1.data_ptr());
auto B2_ptr = reinterpret_cast<const char *>(B2.data_ptr());
auto SFA_ptr = reinterpret_cast<const char *>(SFA.data_ptr());
auto SFB1_ptr = reinterpret_cast<const char *>(SFB1.data_ptr());
auto SFB2_ptr = reinterpret_cast<const char *>(SFB2.data_ptr());
auto C_ptr = reinterpret_cast<half *>(C.data_ptr());
CUtensorMap A_tmap, B1_tmap, B2_tmap;
init_AB_tmap(&A_tmap, A_ptr, M, K, BLOCK_M, BLOCK_K);
init_AB_tmap(&B1_tmap, B1_ptr, N, K, HALF_BLOCK_N, BLOCK_K);
init_AB_tmap(&B2_tmap, B2_ptr, N, K, HALF_BLOCK_N, BLOCK_K);
CUtensorMap SFA_tmap, SFB1_tmap, SFB2_tmap;
init_SF_tmap(&SFA_tmap, SFA_ptr, M, K, BLOCK_K);
init_SF_tmap(&SFB1_tmap, SFB1_ptr, N, K, BLOCK_K);
init_SF_tmap(&SFB2_tmap, SFB2_ptr, N, K, BLOCK_K);
int tb_size = BLOCK_M + 2 * WARP_SIZE; // 4 epilogue + 1 TMA + 1 MMA
constexpr int A_size_c = BLOCK_M * BLOCK_K / 2;
constexpr int B1_size_c = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int B2_size_c = HALF_BLOCK_N * BLOCK_K / 2;
constexpr int SFA_size_c = 128 * BLOCK_K / 16;
constexpr int SFB1_size_c = 128 * BLOCK_K / 16;
constexpr int SFB2_size_c = 128 * BLOCK_K / 16;
int smem_size = (A_size_c + B1_size_c + B2_size_c + SFA_size_c + SFB1_size_c + SFB2_size_c) * NUM_STAGES;
auto kernel_fn = dual_gemm_cta2_persistent_n128_kernel<BLOCK_M, BLOCK_K, NUM_STAGES>;
if (smem_size > 48000)
cudaFuncSetAttribute(kernel_fn, cudaFuncAttributeMaxDynamicSharedMemorySize, smem_size);
const int grid_m_clusters = M / (BLOCK_M * 2);
const int grid_n_clusters = N / BLOCK_N;
const int num_tiles = grid_m_clusters * grid_n_clusters;
const int max_clusters = 74;
int clusters = (num_tiles < max_clusters) ? num_tiles : max_clusters;
if (clusters < 1) clusters = 1;
dim3 pgrid(clusters * 2, 1, 1);
kernel_fn<<<pgrid, tb_size, smem_size>>>(
A_tmap, B1_tmap, B2_tmap, SFA_tmap, SFB1_tmap, SFB2_tmap, C_ptr, M, N, K
);
return C;
}
at::Tensor dual_gemm(
const at::Tensor& A,
const at::Tensor& B1,
const at::Tensor& B2,
const at::Tensor& SFA,
const at::Tensor& SFB1,
const at::Tensor& SFB2,
at::Tensor& C
) {
const int K = A.size(1) * 2;
const int M = A.size(0);
const int N = B1.size(0);
TORCH_CHECK((K % 256) == 0, "Unsupported K: ", K, " (expected K divisible by 256)");
TORCH_CHECK((M % 256) == 0, "Unsupported M: ", M, " (expected M divisible by 256)");
TORCH_CHECK((N % 64) == 0, "Unsupported N: ", N, " (expected N divisible by 64)");
const int num_iters = K / 256;
if (M == 256) {
// BLOCK_N=64, single-buffer accumulator, up to 7 stages.
const int stages = (num_iters < 7) ? num_iters : 7;
switch (stages) {
case 1: return dual_gemm_cta2_persistent_n64_launch<128, 256, 1>(A, B1, B2, SFA, SFB1, SFB2, C, K);
case 2: return dual_gemm_cta2_persistent_n64_launch<128, 256, 2>(A, B1, B2, SFA, SFB1, SFB2, C, K);
case 3: return dual_gemm_cta2_persistent_n64_launch<128, 256, 3>(A, B1, B2, SFA, SFB1, SFB2, C, K);
case 4: return dual_gemm_cta2_persistent_n64_launch<128, 256, 4>(A, B1, B2, SFA, SFB1, SFB2, C, K);
case 5: return dual_gemm_cta2_persistent_n64_launch<128, 256, 5>(A, B1, B2, SFA, SFB1, SFB2, C, K);
case 6: return dual_gemm_cta2_persistent_n64_launch<128, 256, 6>(A, B1, B2, SFA, SFB1, SFB2, C, K);
default: return dual_gemm_cta2_persistent_n64_launch<128, 256, 7>(A, B1, B2, SFA, SFB1, SFB2, C, K);
}
}
// Default persistent policy for larger M: BLOCK_N=128 (no ping-pong), up to 5 stages.
TORCH_CHECK((N % 128) == 0, "Unsupported N for BLOCK_N=128: ", N, " (expected N divisible by 128)");
const int stages = (num_iters < 5) ? num_iters : 5;
switch (stages) {
case 1: return dual_gemm_cta2_persistent_n128_launch<128, 256, 1>(A, B1, B2, SFA, SFB1, SFB2, C, K);
case 2: return dual_gemm_cta2_persistent_n128_launch<128, 256, 2>(A, B1, B2, SFA, SFB1, SFB2, C, K);
case 3: return dual_gemm_cta2_persistent_n128_launch<128, 256, 3>(A, B1, B2, SFA, SFB1, SFB2, C, K);
case 4: return dual_gemm_cta2_persistent_n128_launch<128, 256, 4>(A, B1, B2, SFA, SFB1, SFB2, C, K);
default: return dual_gemm_cta2_persistent_n128_launch<128, 256, 5>(A, B1, B2, SFA, SFB1, SFB2, C, K);
}
}
TORCH_LIBRARY(dual_gemm_persistent_2sm_module, m) {
m.def("dual_gemm(Tensor A, Tensor B1, Tensor B2, Tensor SFA, Tensor SFB1, Tensor SFB2, Tensor(a!) C) -> Tensor");
m.impl("dual_gemm", &dual_gemm);
}
"""
_compiled_module = None
def _get_module():
global _compiled_module
if _compiled_module is None:
_compiled_module = load_inline(
"dual_gemm_persistent_2sm_cuda",
cpp_sources="",
cuda_sources=CUDA_SOURCE,
verbose=True,
is_python_module=False,
extra_cuda_cflags=[
"-O3",
"-gencode=arch=compute_100a,code=sm_100a",
"--use_fast_math",
"--expt-relaxed-constexpr",
"--relocatable-device-code=false",
"-lineinfo",
],
extra_ldflags=["-lcuda"],
)
return _compiled_module
def custom_kernel(data: input_t) -> output_t:
a, b1, b2, _, _, _, sfa_permuted, sfb1_permuted, sfb2_permuted, c = data
_get_module()
return torch.ops.dual_gemm_persistent_2sm_module.dual_gemm(
a, b1, b2, sfa_permuted, sfb1_permuted, sfb2_permuted, c
)
scrolls · 1980 lines total
Source code from GPU Mode and the KernelBot dataset · June 9 Researcher Reciprocity License v1.0
Changes from previous submission
Against this author's previous submission submission 282812.
⋯ 394 unchanged lines}for (int i = 0; i < 2; i++) {mbarrier_init(mainloop_mbar_addr + i * 8, 1); // CTA0 multicasts to both- // mbarrier_init(epilogue_mbar_addr + i * 8, 4 * CTA_GROUP); // DISABLED (requested)+ mbarrier_init(epilogue_mbar_addr + i * 8, 4 * CTA_GROUP); // 4 epilogue warps x both CTAs report to CTA0}asm volatile("fence.mbarrier_init.release.cluster;");}⋯ 96 unchanged linesfor (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {// Wait for epilogue to finish with this accumulator stage- // mbarrier_wait(epilogue_mbar_addr + mainloop_stage * 8, epilogue_phase); // DISABLED (requested)+ mbarrier_wait(epilogue_mbar_addr + mainloop_stage * 8, epilogue_phase);const int cluster_n = tile % grid_n_clusters;const int scale_B_base_off = (cluster_n % (128 / BLOCK_N)) * (BLOCK_N / 32);⋯ 135 unchanged lines}// Signal epilogue completion for this stage to CTA0- // if (elect_sync()) {- // const int mbar_addr = (epilogue_mbar_addr + mainloop_stage * 8) & 0xFEFFFFFF;- // asm volatile("mbarrier.arrive.release.cta.shared::cluster.b64 _, [%0];"- // :: "r"(mbar_addr) : "memory");- // }+ if (elect_sync()) {+ const int mbar_addr = (epilogue_mbar_addr + mainloop_stage * 8) & 0xFEFFFFFF;+ asm volatile("mbarrier.arrive.release.cta.shared::cluster.b64 _, [%0];"+ :: "r"(mbar_addr) : "memory");+ }// Advance stagemainloop_stage = (mainloop_stage + 1) % 2;⋯ 87 unchanged linesmbarrier_init(mma_mbar_addr + i * 8, 1);}mbarrier_init(mainloop_mbar_addr, 1);- // mbarrier_init(epilogue_mbar_addr, 4 * CTA_GROUP); // DISABLED (requested)+ mbarrier_init(epilogue_mbar_addr, 4 * CTA_GROUP);asm volatile("fence.mbarrier_init.release.cluster;");} else if (warp_id == 1) {const int addr = static_cast<int>(__cvta_generic_to_shared(tmem_addr));⋯ 78 unchanged linesconstexpr int16_t cta_mask = (1 << CTA_GROUP) - 1;for (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {- // mbarrier_wait(epilogue_mbar_addr, epilogue_phase); // DISABLED (requested)+ mbarrier_wait(epilogue_mbar_addr, epilogue_phase);const int cluster_n = tile % grid_n_clusters;const int scale_B_base_off = (cluster_n % (128 / BLOCK_N)) * (BLOCK_N / 32);⋯ 111 unchanged lines}}- // if (elect_sync()) {- // const int mbar_addr = epilogue_mbar_addr & 0xFEFFFFFF;- // asm volatile("mbarrier.arrive.release.cta.shared::cluster.b64 _, [%0];"- // :: "r"(mbar_addr) : "memory");- // }+ if (elect_sync()) {+ const int mbar_addr = epilogue_mbar_addr & 0xFEFFFFFF;+ asm volatile("mbarrier.arrive.release.cta.shared::cluster.b64 _, [%0];"+ :: "r"(mbar_addr) : "memory");+ }mainloop_phase ^= 1;}}⋯ 93 unchanged linesmbarrier_init(mma_mbar_addr + i * 8, 1);}mbarrier_init(mainloop_mbar_addr, 1);- // mbarrier_init(epilogue_mbar_addr, 4 * CTA_GROUP); // DISABLED (requested)+ mbarrier_init(epilogue_mbar_addr, 4 * CTA_GROUP);asm volatile("fence.mbarrier_init.release.cluster;");} else if (warp_id == 1) {const int addr = static_cast<int>(__cvta_generic_to_shared(tmem_addr));⋯ 85 unchanged linesfor (int tile = cluster_pid; tile < num_tiles; tile += num_clusters) {// Wait for epilogue to finish using the accumulator- // mbarrier_wait(epilogue_mbar_addr, epilogue_phase); // DISABLED (requested)+ mbarrier_wait(epilogue_mbar_addr, epilogue_phase);const int cluster_n = tile % grid_n_clusters;const int scale_B_base_off = (cluster_n % (128 / BLOCK_N)) * (BLOCK_N / 32); // == 0 for BLOCK_N=128⋯ 119 unchanged lines}// Signal epilogue done for this tile- // if (elect_sync()) {- // const int mbar_addr = epilogue_mbar_addr & 0xFEFFFFFF;- // asm volatile("mbarrier.arrive.release.cta.shared::cluster.b64 _, [%0];"- // :: "r"(mbar_addr) : "memory");- // }+ if (elect_sync()) {+ const int mbar_addr = epilogue_mbar_addr & 0xFEFFFFFF;+ asm volatile("mbarrier.arrive.release.cta.shared::cluster.b64 _, [%0];"+ :: "r"(mbar_addr) : "memory");+ }mainloop_phase ^= 1;}⋯ 10 unchanged lines// ============================================================================// Non-persistent v6 kernel (baseline)- // NOTE: Enabled so task.yml tests can route to v6 when persistent epilogue mbarrier is disabled.+ // NOTE: Disabled in this persistent-only optimization file to reduce compile time.// ============================================================================- #if 1+ #if 0template <int BLOCK_M, int BLOCK_N, int BLOCK_K, int NUM_STAGES>__global__⋯ 621 unchanged linesconst int num_iters = K / 256;- // Persistent epilogue mbarrier is disabled above (commented out).- // To keep correctness for task.yml tests, route ALL non-benchmark shapes to the v6 kernel.- const bool is_benchmark_shape =- (M == 256 && N == 4096 && K == 7168) ||- (M == 512 && N == 4096 && K == 7168) ||- (M == 256 && N == 3072 && K == 4096) ||- (M == 512 && N == 3072 && K == 7168);-- if (!is_benchmark_shape) {- // v6 default path (covers all task.yml correctness tests).- if (M == 256) {- // BLOCK_N=64, NUM_STAGES=min(7, K/256)- const int stages = (num_iters < 7) ? num_iters : 7;- switch (stages) {- case 1: return dual_gemm_cta2_v6_launch<128, 64, 256, 1>(A, B1, B2, SFA, SFB1, SFB2, C);- case 2: return dual_gemm_cta2_v6_launch<128, 64, 256, 2>(A, B1, B2, SFA, SFB1, SFB2, C);- case 3: return dual_gemm_cta2_v6_launch<128, 64, 256, 3>(A, B1, B2, SFA, SFB1, SFB2, C);- case 4: return dual_gemm_cta2_v6_launch<128, 64, 256, 4>(A, B1, B2, SFA, SFB1, SFB2, C);- case 5: return dual_gemm_cta2_v6_launch<128, 64, 256, 5>(A, B1, B2, SFA, SFB1, SFB2, C);- case 6: return dual_gemm_cta2_v6_launch<128, 64, 256, 6>(A, B1, B2, SFA, SFB1, SFB2, C);- default: return dual_gemm_cta2_v6_launch<128, 64, 256, 7>(A, B1, B2, SFA, SFB1, SFB2, C);- }- } else {- // BLOCK_N=128, NUM_STAGES=min(5, K/256)- TORCH_CHECK((N % 128) == 0, "Unsupported N for v6 BLOCK_N=128: ", N, " (expected N divisible by 128)");- const int stages = (num_iters < 5) ? num_iters : 5;- switch (stages) {- case 1: return dual_gemm_cta2_v6_launch<128, 128, 256, 1>(A, B1, B2, SFA, SFB1, SFB2, C);- case 2: return dual_gemm_cta2_v6_launch<128, 128, 256, 2>(A, B1, B2, SFA, SFB1, SFB2, C);- case 3: return dual_gemm_cta2_v6_launch<128, 128, 256, 3>(A, B1, B2, SFA, SFB1, SFB2, C);- case 4: return dual_gemm_cta2_v6_launch<128, 128, 256, 4>(A, B1, B2, SFA, SFB1, SFB2, C);- default: return dual_gemm_cta2_v6_launch<128, 128, 256, 5>(A, B1, B2, SFA, SFB1, SFB2, C);- }- }- }-- // Benchmark shapes: keep using the persistent kernels (even though epilogue mbarrier is disabled).if (M == 256) {// BLOCK_N=64, single-buffer accumulator, up to 7 stages.const int stages = (num_iters < 7) ? num_iters : 7;⋯ 8 unchanged lines}}- // BLOCK_N=128, up to 5 stages.- TORCH_CHECK((N % 128) == 0, "Unsupported N for persistent BLOCK_N=128: ", N, " (expected N divisible by 128)");+ // Default persistent policy for larger M: BLOCK_N=128 (no ping-pong), up to 5 stages.+ TORCH_CHECK((N % 128) == 0, "Unsupported N for BLOCK_N=128: ", N, " (expected N divisible by 128)");const int stages = (num_iters < 5) ? num_iters : 5;switch (stages) {case 1: return dual_gemm_cta2_persistent_n128_launch<128, 256, 1>(A, B1, B2, SFA, SFB1, SFB2, C, K);
scrolls · 172 diff lines total
Best evidence level for this revision: reported
JSON