#![cfg(all(feature = "simd-avx512", target_arch = "x86_64"))]
use core::arch::x86_64::*;
use crate::error::{QuantError, QuantResult};
use crate::simd::avx512::util::{f16_to_f32, hsum_f32_avx512};
use crate::traits::QuantKernel;
use crate::types::QuantTensor;
pub const BLOCK_SIZE: usize = 256;
pub const BLOCK_BYTES: usize = 176;
#[allow(non_camel_case_types)]
pub struct Q5_KAvx512;
fn decode_scales_mins(scales_raw: &[u8]) -> ([u8; 8], [u8; 8]) {
let mut sc = [0u8; 8];
let mut mn = [0u8; 8];
for j in 0..4 {
sc[j] = scales_raw[j] & 0x3F;
mn[j] = scales_raw[j + 4] & 0x3F;
}
for j in 4..8 {
let lo_sc = scales_raw[j + 4] & 0x0F;
let hi_sc = (scales_raw[j - 4] >> 6) & 0x03;
sc[j] = lo_sc | (hi_sc << 4);
let lo_mn = (scales_raw[j + 4] >> 4) & 0x0F;
let hi_mn = (scales_raw[j] >> 6) & 0x03;
mn[j] = lo_mn | (hi_mn << 4);
}
(sc, mn)
}
#[target_feature(enable = "avx512f")]
#[inline]
unsafe fn extract_high_bit(qh_half: __m128i, bit_pos: u32) -> __m128i {
let mask_byte = (1u8 << bit_pos) as i8;
let mask_vec = _mm_set1_epi8(mask_byte);
let masked = _mm_and_si128(qh_half, mask_vec);
let is_zero = _mm_cmpeq_epi8(masked, _mm_setzero_si128());
_mm_andnot_si128(is_zero, _mm_set1_epi8(0x10_u8 as i8))
}
impl QuantKernel for Q5_KAvx512 {
fn dequant_block(&self, block: &[u8], output: &mut [f32]) -> QuantResult<()> {
if block.len() < BLOCK_BYTES {
return Err(QuantError::BufferTooSmall {
needed: BLOCK_BYTES,
available: block.len(),
});
}
if output.len() < BLOCK_SIZE {
return Err(QuantError::BufferTooSmall {
needed: BLOCK_SIZE,
available: output.len(),
});
}
unsafe { dequant_block_avx512(block, output) }
Ok(())
}
fn gemv(
&self,
quant_matrix: &QuantTensor,
input: &[f32],
output: &mut [f32],
) -> QuantResult<()> {
let n_rows = quant_matrix.shape[0];
let n_cols = if quant_matrix.shape.len() > 1 {
quant_matrix.shape[1]
} else {
quant_matrix.n_elements() / n_rows
};
if input.len() < n_cols {
return Err(QuantError::DimensionMismatch {
expected: n_cols,
got: input.len(),
});
}
if output.len() < n_rows {
return Err(QuantError::DimensionMismatch {
expected: n_rows,
got: output.len(),
});
}
let blocks_per_row = n_cols.div_ceil(BLOCK_SIZE);
let row_bytes = blocks_per_row * BLOCK_BYTES;
for (row, out) in output.iter_mut().enumerate().take(n_rows) {
let row_start = row * row_bytes;
*out = unsafe {
gemv_row_avx512(
&quant_matrix.data[row_start..row_start + row_bytes],
input,
blocks_per_row,
n_cols,
)
};
}
Ok(())
}
fn gemm(
&self,
quant_matrix: &QuantTensor,
input: &[f32],
output: &mut [f32],
m: usize,
n: usize,
k: usize,
) -> QuantResult<()> {
for row in 0..m {
let input_row = &input[row * k..(row + 1) * k];
let output_row = &mut output[row * n..(row + 1) * n];
self.gemv(quant_matrix, input_row, output_row)?;
}
Ok(())
}
fn block_size(&self) -> usize {
BLOCK_SIZE
}
fn block_bytes(&self) -> usize {
BLOCK_BYTES
}
fn name(&self) -> &'static str {
"Q5_K"
}
}
#[target_feature(enable = "avx512f")]
unsafe fn dequant_block_avx512(block: &[u8], output: &mut [f32]) {
let d = f16_to_f32(block);
let dmin = f16_to_f32(&block[2..]);
let (sc, mn) = decode_scales_mins(&block[4..16]);
let qh = &block[16..48];
let qs = &block[48..176];
let mask_lo = _mm_set1_epi8(0x0F_u8 as i8);
let qh_0 = _mm_loadu_si128(qh.as_ptr() as *const __m128i); let qh_1 = _mm_loadu_si128(qh.as_ptr().add(16) as *const __m128i);
let mut is = 0usize;
let mut qs_off = 0usize;
let mut out_off = 0usize;
for group in 0..4u32 {
let a_lo = d * sc[is] as f32;
let b_lo = dmin * mn[is] as f32;
let a_hi = d * sc[is + 1] as f32;
let b_hi = dmin * mn[is + 1] as f32;
let va_lo = _mm512_set1_ps(a_lo);
let vb_lo = _mm512_set1_ps(b_lo);
let va_hi = _mm512_set1_ps(a_hi);
let vb_hi = _mm512_set1_ps(b_hi);
let raw_lo = _mm_loadu_si128(qs.as_ptr().add(qs_off) as *const __m128i);
let raw_hi = _mm_loadu_si128(qs.as_ptr().add(qs_off + 16) as *const __m128i);
let lo_nibbles_0 = _mm_and_si128(raw_lo, mask_lo); let lo_nibbles_1 = _mm_and_si128(raw_hi, mask_lo);
let hi_nibbles_0 = _mm_and_si128(_mm_srli_epi16(raw_lo, 4), mask_lo);
let hi_nibbles_1 = _mm_and_si128(_mm_srli_epi16(raw_hi, 4), mask_lo);
let hb_lo_0 = extract_high_bit(qh_0, group); let hb_lo_1 = extract_high_bit(qh_1, group);
let hb_hi_0 = extract_high_bit(qh_0, group + 4); let hb_hi_1 = extract_high_bit(qh_1, group + 4);
let q5_lo_0 = _mm_or_si128(lo_nibbles_0, hb_lo_0); let q5_lo_1 = _mm_or_si128(lo_nibbles_1, hb_lo_1);
let q0_i32 = _mm512_cvtepu8_epi32(q5_lo_0);
let q0_f32 = _mm512_cvtepi32_ps(q0_i32);
let w0 = _mm512_fmsub_ps(va_lo, q0_f32, vb_lo);
let q1_i32 = _mm512_cvtepu8_epi32(q5_lo_1);
let q1_f32 = _mm512_cvtepi32_ps(q1_i32);
let w1 = _mm512_fmsub_ps(va_lo, q1_f32, vb_lo);
let ptr = output.as_mut_ptr().add(out_off);
_mm512_storeu_ps(ptr, w0);
_mm512_storeu_ps(ptr.add(16), w1);
let q5_hi_0 = _mm_or_si128(hi_nibbles_0, hb_hi_0);
let q5_hi_1 = _mm_or_si128(hi_nibbles_1, hb_hi_1);
let q2_i32 = _mm512_cvtepu8_epi32(q5_hi_0);
let q2_f32 = _mm512_cvtepi32_ps(q2_i32);
let w2 = _mm512_fmsub_ps(va_hi, q2_f32, vb_hi);
let q3_i32 = _mm512_cvtepu8_epi32(q5_hi_1);
let q3_f32 = _mm512_cvtepi32_ps(q3_i32);
let w3 = _mm512_fmsub_ps(va_hi, q3_f32, vb_hi);
let ptr2 = output.as_mut_ptr().add(out_off + 32);
_mm512_storeu_ps(ptr2, w2);
_mm512_storeu_ps(ptr2.add(16), w3);
is += 2;
qs_off += 32;
out_off += 64;
}
}
#[target_feature(enable = "avx512f")]
unsafe fn gemv_row_avx512(
row_data: &[u8],
input: &[f32],
blocks_per_row: usize,
n_cols: usize,
) -> f32 {
let mut row_sum = 0.0f32;
for blk in 0..blocks_per_row {
let block_offset = blk * BLOCK_BYTES;
let block = &row_data[block_offset..block_offset + BLOCK_BYTES];
let input_offset = blk * BLOCK_SIZE;
let remaining = n_cols.saturating_sub(input_offset);
let d = f16_to_f32(block);
let dmin = f16_to_f32(&block[2..]);
let (sc, mn) = decode_scales_mins(&block[4..16]);
if remaining >= BLOCK_SIZE {
let qh = &block[16..48];
let qs = &block[48..176];
let mask_lo = _mm_set1_epi8(0x0F_u8 as i8);
let qh_0 = _mm_loadu_si128(qh.as_ptr() as *const __m128i);
let qh_1 = _mm_loadu_si128(qh.as_ptr().add(16) as *const __m128i);
let mut block_acc = _mm512_setzero_ps();
let mut is = 0usize;
let mut qs_off = 0usize;
let mut w_off = input_offset;
for group in 0..4u32 {
let a_lo = d * sc[is] as f32;
let b_lo = dmin * mn[is] as f32;
let a_hi = d * sc[is + 1] as f32;
let b_hi = dmin * mn[is + 1] as f32;
let va_lo = _mm512_set1_ps(a_lo);
let vb_lo = _mm512_set1_ps(b_lo);
let va_hi = _mm512_set1_ps(a_hi);
let vb_hi = _mm512_set1_ps(b_hi);
let raw_lo = _mm_loadu_si128(qs.as_ptr().add(qs_off) as *const __m128i);
let raw_hi = _mm_loadu_si128(qs.as_ptr().add(qs_off + 16) as *const __m128i);
let lo_nibbles_0 = _mm_and_si128(raw_lo, mask_lo);
let lo_nibbles_1 = _mm_and_si128(raw_hi, mask_lo);
let hi_nibbles_0 = _mm_and_si128(_mm_srli_epi16(raw_lo, 4), mask_lo);
let hi_nibbles_1 = _mm_and_si128(_mm_srli_epi16(raw_hi, 4), mask_lo);
let hb_lo_0 = extract_high_bit(qh_0, group);
let hb_lo_1 = extract_high_bit(qh_1, group);
let hb_hi_0 = extract_high_bit(qh_0, group + 4);
let hb_hi_1 = extract_high_bit(qh_1, group + 4);
let inp_lo = input.as_ptr().add(w_off);
let inp_hi = input.as_ptr().add(w_off + 32);
let q5_0 = _mm_or_si128(lo_nibbles_0, hb_lo_0);
let q0 = _mm512_cvtepi32_ps(_mm512_cvtepu8_epi32(q5_0));
let w0 = _mm512_fmsub_ps(va_lo, q0, vb_lo);
block_acc = _mm512_fmadd_ps(w0, _mm512_loadu_ps(inp_lo), block_acc);
let q5_1 = _mm_or_si128(lo_nibbles_1, hb_lo_1);
let q1 = _mm512_cvtepi32_ps(_mm512_cvtepu8_epi32(q5_1));
let w1 = _mm512_fmsub_ps(va_lo, q1, vb_lo);
block_acc = _mm512_fmadd_ps(w1, _mm512_loadu_ps(inp_lo.add(16)), block_acc);
let q5_2 = _mm_or_si128(hi_nibbles_0, hb_hi_0);
let q2 = _mm512_cvtepi32_ps(_mm512_cvtepu8_epi32(q5_2));
let w2 = _mm512_fmsub_ps(va_hi, q2, vb_hi);
block_acc = _mm512_fmadd_ps(w2, _mm512_loadu_ps(inp_hi), block_acc);
let q5_3 = _mm_or_si128(hi_nibbles_1, hb_hi_1);
let q3 = _mm512_cvtepi32_ps(_mm512_cvtepu8_epi32(q5_3));
let w3 = _mm512_fmsub_ps(va_hi, q3, vb_hi);
block_acc = _mm512_fmadd_ps(w3, _mm512_loadu_ps(inp_hi.add(16)), block_acc);
is += 2;
qs_off += 32;
w_off += 64;
}
row_sum += hsum_f32_avx512(block_acc);
} else if remaining > 0 {
let qh = &block[16..48];
let qs = &block[48..176];
let mut partial_sum = 0.0f32;
let mut is = 0usize;
let mut qs_off = 0usize;
let mut w_off = input_offset;
for group in 0..4usize {
let d1 = d * sc[is] as f32;
let m1 = dmin * mn[is] as f32;
let d2 = d * sc[is + 1] as f32;
let m2 = dmin * mn[is + 1] as f32;
for l in 0..32 {
let idx = w_off + l;
if idx < n_cols {
let lo_nib = (*qs.get_unchecked(qs_off + l) & 0x0F) as u32;
let hi_bit = ((*qh.get_unchecked(l) >> group) & 1) as u32;
let q = (lo_nib | (hi_bit << 4)) as f32;
partial_sum += (d1 * q - m1) * input[idx];
}
}
for l in 0..32 {
let idx = w_off + 32 + l;
if idx < n_cols {
let hi_nib = ((*qs.get_unchecked(qs_off + l) >> 4) & 0x0F) as u32;
let hi_bit = ((*qh.get_unchecked(l) >> (group + 4)) & 1) as u32;
let q = (hi_nib | (hi_bit << 4)) as f32;
partial_sum += (d2 * q - m2) * input[idx];
}
}
is += 2;
qs_off += 32;
w_off += 64;
}
row_sum += partial_sum;
}
}
row_sum
}
#[cfg(all(test, target_arch = "x86_64", feature = "simd-avx512"))]
mod tests {
use super::*;
use crate::reference::q5_k::Q5KRef;
fn make_q5k_block(
d: f32,
dmin: f32,
scales: &[u8; 12],
qh: &[u8; 32],
qs: &[u8; 128],
) -> Vec<u8> {
let mut block = Vec::with_capacity(BLOCK_BYTES);
block.extend_from_slice(&half::f16::from_f32(d).to_bits().to_le_bytes());
block.extend_from_slice(&half::f16::from_f32(dmin).to_bits().to_le_bytes());
block.extend_from_slice(scales);
block.extend_from_slice(qh);
block.extend_from_slice(qs);
block
}
fn make_tensor(block: Vec<u8>, n_cols: usize) -> crate::types::QuantTensor {
crate::types::QuantTensor::new(block, vec![1, n_cols], oxillama_gguf::GgufTensorType::Q5K)
}
#[test]
#[cfg_attr(not(target_feature = "avx512f"), ignore)]
fn test_q5k_avx512_dequant_matches_reference_zero_high_bits() {
if !std::arch::is_x86_feature_detected!("avx512f") {
return;
}
let mut scales = [0u8; 12];
scales[..4].fill(1);
scales[8..12].fill(1);
let qh = [0x00u8; 32];
let qs = [0x88u8; 128];
let block = make_q5k_block(1.0, 0.0, &scales, &qh, &qs);
let mut out_avx512 = vec![0.0f32; 256];
let mut out_ref = vec![0.0f32; 256];
Q5_KAvx512
.dequant_block(&block, &mut out_avx512)
.expect("avx512 dequant");
Q5KRef
.dequant_block(&block, &mut out_ref)
.expect("ref dequant");
for (i, (&a, &r)) in out_avx512.iter().zip(out_ref.iter()).enumerate() {
assert!(
(a - r).abs() < 1e-3,
"dequant mismatch [zero-high-bits] at index {i}: avx512={a}, ref={r}"
);
}
}
#[test]
#[cfg_attr(not(target_feature = "avx512f"), ignore)]
fn test_q5k_avx512_dequant_matches_reference_all_high_bits() {
if !std::arch::is_x86_feature_detected!("avx512f") {
return;
}
let mut scales = [0u8; 12];
scales[..4].fill(1);
scales[8..12].fill(1);
let qh = [0xFFu8; 32]; let qs = [0x00u8; 128];
let block = make_q5k_block(1.0, 0.0, &scales, &qh, &qs);
let mut out_avx512 = vec![0.0f32; 256];
let mut out_ref = vec![0.0f32; 256];
Q5_KAvx512
.dequant_block(&block, &mut out_avx512)
.expect("avx512 dequant");
Q5KRef
.dequant_block(&block, &mut out_ref)
.expect("ref dequant");
for (i, (&a, &r)) in out_avx512.iter().zip(out_ref.iter()).enumerate() {
assert!(
(a - r).abs() < 1e-3,
"dequant mismatch [all-high-bits] at index {i}: avx512={a}, ref={r}"
);
}
}
#[test]
#[cfg_attr(not(target_feature = "avx512f"), ignore)]
fn test_q5k_avx512_dequant_matches_reference_varied() {
if !std::arch::is_x86_feature_detected!("avx512f") {
return;
}
let mut scales = [0u8; 12];
for (i, s) in scales.iter_mut().enumerate() {
*s = ((i * 17 + 3) & 0x3F) as u8;
}
let mut qh = [0u8; 32];
for (i, h) in qh.iter_mut().enumerate() {
*h = ((i * 13 + 7) & 0xFF) as u8;
}
let mut qs = [0u8; 128];
for (i, q) in qs.iter_mut().enumerate() {
*q = ((i * 5 + 11) & 0xFF) as u8;
}
let block = make_q5k_block(0.5, 0.25, &scales, &qh, &qs);
let mut out_avx512 = vec![0.0f32; 256];
let mut out_ref = vec![0.0f32; 256];
Q5_KAvx512
.dequant_block(&block, &mut out_avx512)
.expect("avx512 dequant");
Q5KRef
.dequant_block(&block, &mut out_ref)
.expect("ref dequant");
for (i, (&a, &r)) in out_avx512.iter().zip(out_ref.iter()).enumerate() {
assert!(
(a - r).abs() < 1e-3,
"dequant mismatch [varied] at index {i}: avx512={a}, ref={r}"
);
}
}
#[test]
#[cfg_attr(not(target_feature = "avx512f"), ignore)]
fn test_q5k_avx512_gemv_matches_reference() {
if !std::arch::is_x86_feature_detected!("avx512f") {
return;
}
let mut scales = [0u8; 12];
scales[..4].fill(1);
scales[8..12].fill(1);
let qh = [0xAAu8; 32]; let qs = [0x5Au8; 128];
let block = make_q5k_block(0.5, 0.1, &scales, &qh, &qs);
let tensor_avx512 = make_tensor(block.clone(), 256);
let tensor_ref = make_tensor(block, 256);
let input: Vec<f32> = (0..256).map(|i| (i as f32) * 0.01 - 1.28).collect();
let mut out_avx512 = vec![0.0f32; 1];
let mut out_ref = vec![0.0f32; 1];
Q5_KAvx512
.gemv(&tensor_avx512, &input, &mut out_avx512)
.expect("avx512 gemv");
Q5KRef
.gemv(&tensor_ref, &input, &mut out_ref)
.expect("ref gemv");
assert!(
(out_avx512[0] - out_ref[0]).abs() < 1e-2,
"gemv mismatch: avx512={}, ref={}",
out_avx512[0],
out_ref[0]
);
}
#[test]
#[cfg_attr(not(target_feature = "avx512f"), ignore)]
fn test_q5k_avx512_gemv_partial_block() {
if !std::arch::is_x86_feature_detected!("avx512f") {
return;
}
let mut scales = [0u8; 12];
scales[..4].fill(1);
scales[8..12].fill(1);
let qh = [0x55u8; 32];
let qs = [0x11u8; 128];
let block = make_q5k_block(1.0, 0.0, &scales, &qh, &qs);
let tensor_avx512 = make_tensor(block.clone(), 200);
let tensor_ref = make_tensor(block, 200);
let input = vec![1.0f32; 200];
let mut out_avx512 = vec![0.0f32; 1];
let mut out_ref = vec![0.0f32; 1];
Q5_KAvx512
.gemv(&tensor_avx512, &input, &mut out_avx512)
.expect("avx512 gemv partial");
Q5KRef
.gemv(&tensor_ref, &input, &mut out_ref)
.expect("ref gemv partial");
assert!(
(out_avx512[0] - out_ref[0]).abs() < 1e-2,
"partial gemv mismatch: avx512={}, ref={}",
out_avx512[0],
out_ref[0]
);
}
#[test]
#[cfg_attr(not(target_feature = "avx512f"), ignore)]
fn test_q5k_avx512_gemv_varied_data() {
if !std::arch::is_x86_feature_detected!("avx512f") {
return;
}
let mut scales = [0u8; 12];
for (i, s) in scales.iter_mut().enumerate() {
*s = ((i * 17 + 3) & 0x3F) as u8;
}
let mut qh = [0u8; 32];
for (i, h) in qh.iter_mut().enumerate() {
*h = ((i * 13 + 7) & 0xFF) as u8;
}
let mut qs = [0u8; 128];
for (i, q) in qs.iter_mut().enumerate() {
*q = ((i * 5 + 11) & 0xFF) as u8;
}
let block = make_q5k_block(0.5, 0.25, &scales, &qh, &qs);
let tensor_avx512 = make_tensor(block.clone(), 256);
let tensor_ref = make_tensor(block, 256);
let input: Vec<f32> = (0..256).map(|i| (i as f32 * 0.01) - 1.28).collect();
let mut out_avx512 = vec![0.0f32; 1];
let mut out_ref = vec![0.0f32; 1];
Q5_KAvx512
.gemv(&tensor_avx512, &input, &mut out_avx512)
.expect("avx512 gemv varied");
Q5KRef
.gemv(&tensor_ref, &input, &mut out_ref)
.expect("ref gemv varied");
assert!(
(out_avx512[0] - out_ref[0]).abs() < 1e-2,
"varied gemv mismatch: avx512={}, ref={}",
out_avx512[0],
out_ref[0]
);
}
}