dc84789e34
Nothing changes for the default class: the pinned packs are byte-identical (tests/packs.rs), the v2 draw stream is untouched.
LoadClass {mix, load_slots, scratch}: fixed widths w16, w64, w64x4 (4 loads of 64 B), era mixes 50/35/15 and 25/50/25 drawn per load with one extra below(100) roll, and the scratch variant scr0/2/4/8 (persistent warps, 1 MiB per warp, tagged lazy fill, measurement only). A wide load reads the W-aligned address and folds every word: x = dst ^ w0; x = (rotl(x, 11) * 0x9e3779b1) ^ w[j]. Program ids carry the class. proto-opencl/host.c taken from opencl-rdna4 23810df (--memprobe, select read-back).
Co-Authored-By: Claude Fable 5.1 <noreply@anthropic.com>
111 lines
5.1 KiB
Metal
111 lines
5.1 KiB
Metal
#include <metal_stdlib>
|
|
using namespace metal;
|
|
|
|
#define MASK 0x0fffffffu
|
|
constant uint SEEDW[8] = { 0x67a9a7beu, 0x1a155b25u, 0xfddfb732u, 0x4b5af2e8u, 0xc55caf33u, 0xa27c13b7u, 0x06628a48u, 0x03852469u };
|
|
|
|
inline uint splitmix32(uint x) {
|
|
x ^= x >> 16; x *= 0x7feb352du;
|
|
x ^= x >> 15; x *= 0x846ca68bu;
|
|
x ^= x >> 16;
|
|
return x;
|
|
}
|
|
inline uint rotl_imm(uint x, uint n) { return (x << n) | (x >> (32u - n)); } // n in 1..31
|
|
inline uint rotr_var(uint x, uint n) { n &= 31u; return (x >> n) | (x << ((32u - n) & 31u)); }
|
|
inline uint ds_elem(uint i, uint d0, uint d1) {
|
|
uint x = i ^ d0;
|
|
x *= 0x9E3779B1u; x ^= x >> 15;
|
|
x += d1;
|
|
x *= 0x85EBCA77u; x ^= x >> 13;
|
|
x *= 0xC2B2AE3Du; x ^= x >> 16;
|
|
return x;
|
|
}
|
|
|
|
// Header-bound variant: the init words come from buffer 3 (bind.rs), not from SEEDW.
|
|
kernel void igneum_hash_bound(device const uint* dataset [[buffer(0)]],
|
|
device ulong* out [[buffer(1)]],
|
|
constant uint& baseNonce [[buffer(2)]],
|
|
constant uint* initw [[buffer(3)]],
|
|
uint gid [[thread_position_in_grid]]) {
|
|
uint nonce = baseNonce + gid;
|
|
uint r0, r1, r2, r3, r4, r5, r6, r7;
|
|
{ uint x = nonce ^ initw[0]; x += 0x9e3779b9u * 1u; x = splitmix32(x); r0 = x ^ initw[1]; }
|
|
{ uint x = nonce ^ initw[1]; x += 0x9e3779b9u * 2u; x = splitmix32(x); r1 = x ^ initw[2]; }
|
|
{ uint x = nonce ^ initw[2]; x += 0x9e3779b9u * 3u; x = splitmix32(x); r2 = x ^ initw[3]; }
|
|
{ uint x = nonce ^ initw[3]; x += 0x9e3779b9u * 4u; x = splitmix32(x); r3 = x ^ initw[4]; }
|
|
{ uint x = nonce ^ initw[4]; x += 0x9e3779b9u * 5u; x = splitmix32(x); r4 = x ^ initw[5]; }
|
|
{ uint x = nonce ^ initw[5]; x += 0x9e3779b9u * 6u; x = splitmix32(x); r5 = x ^ initw[6]; }
|
|
{ uint x = nonce ^ initw[6]; x += 0x9e3779b9u * 7u; x = splitmix32(x); r6 = x ^ initw[7]; }
|
|
{ uint x = nonce ^ initw[7]; x += 0x9e3779b9u * 8u; x = splitmix32(x); r7 = x ^ initw[0]; }
|
|
|
|
for (uint it = 0u; it < 8u; ++it) {
|
|
uint sel = r0;
|
|
r2 = r3 * r4 + r2; // 0
|
|
r2 = r1 * r1 + r2; // 1
|
|
r2 = r3 * r2 + r2; // 2
|
|
r3 = r3 ^ r5; // 3
|
|
r7 = r7 ^ dataset[r2 & MASK]; // 4
|
|
r5 = r5 ^ dataset[r7 & MASK]; // 5
|
|
r1 = r1 ^ simd_shuffle_xor(r4, (ushort)8); // 6
|
|
r7 = r7 ^ simd_shuffle_xor(r3, (ushort)8); // 7
|
|
r1 = mulhi(r1, r5); // 8
|
|
r6 = rotr_var(r6, r3); // 9
|
|
r3 = r3 | r4; // 10
|
|
r4 = r4 ^ dataset[r3 & MASK]; // 11
|
|
r0 = mulhi(r0, r4); // 12
|
|
r5 = r5 + r1 + select(0xc7934706u, 0xd3177981u, ((sel >> 30u) & 1u) != 0u); // 13
|
|
r0 = r0 ^ dataset[r4 & MASK]; // 14
|
|
r2 = r2 - r4; // 15
|
|
r2 = r2 ^ dataset[r0 & MASK]; // 16
|
|
r7 = r7 ^ dataset[r2 & MASK]; // 17
|
|
r7 = r7 ^ simd_shuffle_xor(r3, (ushort)4); // 18
|
|
r5 = r5 * r0; // 19
|
|
r3 = r3 ^ simd_shuffle_xor(r4, (ushort)2); // 20
|
|
r2 = r2 ^ simd_shuffle_xor(r4, (ushort)16); // 21
|
|
r6 = mulhi(r6, r2); // 22
|
|
r6 = r6 ^ dataset[r1 & MASK]; // 23
|
|
r5 = r5 * r0; // 24
|
|
r5 = rotl_imm(r5, 19u); // 25
|
|
r7 = r7 ^ simd_shuffle_xor(r6, (ushort)2); // 26
|
|
r0 = r0 ^ r5; // 27
|
|
r0 = r0 ^ r4; // 28
|
|
r3 = r3 - r0; // 29
|
|
r5 = r5 * r1; // 30
|
|
r7 = r7 ^ dataset[r2 & MASK]; // 31
|
|
r1 = r1 ^ dataset[r0 & MASK]; // 32
|
|
r5 = r5 ^ r6; // 33
|
|
r5 = r5 ^ dataset[r1 & MASK]; // 34
|
|
r0 = mulhi(r0, r5); // 35
|
|
r5 = r5 ^ simd_shuffle_xor(r2, (ushort)4); // 36
|
|
r7 = r7 ^ dataset[r0 & MASK]; // 37
|
|
r3 = r3 + r1 + select(0x75ba2fadu, 0x230c005cu, ((sel >> 27u) & 1u) != 0u); // 38
|
|
r1 = r1 ^ simd_shuffle_xor(r5, (ushort)4); // 39
|
|
r2 = r2 ^ r5; // 40
|
|
r3 = r6 * r3 + r3; // 41
|
|
r6 = r6 - r7; // 42
|
|
r7 = r7 ^ r0; // 43
|
|
r1 = r1 ^ dataset[r7 & MASK]; // 44
|
|
r2 = r2 * r3; // 45
|
|
r1 = mulhi(r1, r5); // 46
|
|
r4 = r4 - r3; // 47
|
|
r2 = rotr_var(r2, r6); // 48
|
|
r3 = r3 ^ dataset[r5 & MASK]; // 49
|
|
r1 = r1 + r5 + select(0x81b8bc2cu, 0x1907970cu, ((sel >> 7u) & 1u) != 0u); // 50
|
|
r0 = r0 * r2; // 51
|
|
r0 = r0 + r2 + select(0x4f92b968u, 0x699fd448u, ((sel >> 6u) & 1u) != 0u); // 52
|
|
r1 = r1 + r0 + select(0x2bb965afu, 0x77b1520du, ((sel >> 12u) & 1u) != 0u); // 53
|
|
r7 = rotl_imm(r7, 14u); // 54
|
|
r3 = r3 + r7 + select(0x7b0fe07au, 0xa54c55a0u, ((sel >> 1u) & 1u) != 0u); // 55
|
|
r6 = r6 ^ dataset[r7 & MASK]; // 56
|
|
r1 = rotr_var(r1, r5); // 57
|
|
r5 = r5 ^ dataset[r4 & MASK]; // 58
|
|
r6 = r6 ^ dataset[r2 & MASK]; // 59
|
|
r3 = r5 * r0 + r3; // 60
|
|
r5 = r5 + r7 + select(0xaf9dd72du, 0xad7493e7u, ((sel >> 31u) & 1u) != 0u); // 61
|
|
r4 = r4 + r6 + select(0x89841d87u, 0x1e07c3d9u, ((sel >> 27u) & 1u) != 0u); // 62
|
|
r5 = rotl_imm(r5, 19u); // 63
|
|
}
|
|
uint lo = r0 ^ rotl_imm(r1, 7u) ^ rotl_imm(r2, 14u) ^ rotl_imm(r3, 21u);
|
|
uint hi = r4 ^ rotl_imm(r5, 9u) ^ rotl_imm(r6, 18u) ^ rotl_imm(r7, 27u);
|
|
out[gid] = ((ulong)hi << 32) | (ulong)lo;
|
|
}
|