// Try some complex intrinsics (SSE2)
// Doesn't test any values (since intrisics are unimplemented)
// Converted from https://github.com/klauspost/rawspeed/blob/develop/RawSpeed/RawImageDataU16.cpp#L152
func TestComplex(t *testing.T) {
full_scale_fp := 1000
half_scale_fp := 500
mDitherScale := true
var sub_mul [4]x86.M128i
var rand_mul x86.M128i
sseround := sse2.SetEpi32(512, 512, 512, 512)
ssesub2 := sse2.SetEpi32(32768, 32768, 32768, 32768)
ssesign := sse2.SetEpi32(0x80008000, 0x80008000, 0x80008000, 0x80008000)
sse_full_scale_fp := sse2.Set1Epi32(full_scale_fp | (full_scale_fp << 16))
sse_half_scale_fp := sse2.Set1Epi32(half_scale_fp >> 4)
if mDitherScale {
rand_mul = sse2.Set1Epi32(0x4d9f1d32)
} else {
rand_mul = sse2.SetzeroSi128()
}
rand_mask := sse2.Set1Epi32(0x00ff00ff) // 8 random bits
width := 1024
height := 1024
// Emulate 1024 x 1024 x 16bpp
input := make([]byte, 1024*1024*2)
for y := 0; y < height; y++ {
// Convert current line to []M128i
line := x86.BytesToM128i(input[y*width*2 : y*width*2+width*2])
var sserandom x86.M128i
if mDitherScale {
sserandom = sse2.SetEpi32(width*1676+y*18000, width*2342+y*34311, width*4272+y*12123, width*1234+y*23464)
} else {
sserandom = sse2.SetzeroSi128()
}
var ssescale, ssesub x86.M128i
if (y & 1) == 0 {
ssesub = sub_mul[0]
ssescale = sub_mul[1]
} else {
ssesub = sub_mul[2]
ssescale = sub_mul[3]
}
for x, pix_low := range line {
// Subtract black
pix_low = sse2.SubsEpu16(pix_low, ssesub)
// Multiply the two unsigned shorts and combine it to 32 bit result
pix_high := sse2.MulhiEpu16(pix_low, ssescale)
temp := sse2.MulloEpi16(pix_low, ssescale)
pix_low = sse2.UnpackloEpi16(temp, pix_high)
pix_high = sse2.UnpackhiEpi16(temp, pix_high)
// Add rounder
pix_low = sse2.AddEpi32(pix_low, sseround)
pix_high = sse2.AddEpi32(pix_high, sseround)
sserandom = sse2.XorSi128(sse2.MulhiEpi16(sserandom, rand_mul), sse2.MulloEpi16(sserandom, rand_mul))
rand_masked := sse2.AndSi128(sserandom, rand_mask) // Get 8 random bits
rand_masked = sse2.MulloEpi16(rand_masked, sse_full_scale_fp)
zero := sse2.SetzeroSi128()
rand_lo := sse2.SubEpi32(sse_half_scale_fp, sse2.UnpackloEpi16(rand_masked, zero))
rand_hi := sse2.SubEpi32(sse_half_scale_fp, sse2.UnpackhiEpi16(rand_masked, zero))
pix_low = sse2.AddEpi32(pix_low, rand_lo)
pix_high = sse2.AddEpi32(pix_high, rand_hi)
// Shift down
pix_low = sse2.SraiEpi32(pix_low, 10)
pix_high = sse2.SraiEpi32(pix_high, 10)
// Subtract to avoid clipping
pix_low = sse2.SubEpi32(pix_low, ssesub2)
pix_high = sse2.SubEpi32(pix_high, ssesub2)
// Pack
pix_low = sse2.PacksEpi32(pix_low, pix_high)
// Shift sign off
pix_low = sse2.XorSi128(pix_low, ssesign)
line[x] = pix_low
}
}
}
// Mixed sse+sse2
// Applies a 3x3 matrix and sRGB gamma corrects input
// and writes it to output.
// https://github.com/rawstudio/rawstudio/blob/master/plugins/colorspace-transform/colorspace_transform_sse2.c#L205
func Transform8sRGB() {
w := 1048
h := 1024
var matrix [3][3]float32
// Input is a w * h * 4 components 16 bit per component image
var input = make([]byte, w*h*8)
// Output is 4 byte/pixel, RGBA image
var output = make([]byte, w*h*4)
// The matrix with values splatted to all registers
var matPs = make([]x86.M128, 3*3)
// Fill with values
matPs[0] = sse.Set1Ps(matrix[0][0])
matPs[1] = sse.Set1Ps(matrix[0][1])
matPs[2] = sse.Set1Ps(matrix[0][2])
matPs[3] = sse.Set1Ps(matrix[1][0])
matPs[4] = sse.Set1Ps(matrix[1][1])
matPs[5] = sse.Set1Ps(matrix[1][2])
matPs[6] = sse.Set1Ps(matrix[2][0])
matPs[7] = sse.Set1Ps(matrix[2][1])
matPs[8] = sse.Set1Ps(matrix[2][2])
for y := 0; y < h; y++ {
i := x86.BytesToM128i(input[y*w*8 : y*w*8+w*8])
o := x86.BytesToM128i(output[y*w*4 : y*w*4+w*4])
// Converts 4 pixels per loop
for x := 0; x < w/4; x++ {
/* Load and convert to float */
zero := sse2.SetzeroSi128()
in := i[x*2] // Load two pixels
in2 := i[x*2+1] // Load two pixels
p1 := sse2.UnpackloEpi16(in, zero)
p2 := sse2.UnpackhiEpi16(in, zero)
p3 := sse2.UnpackloEpi16(in2, zero)
p4 := sse2.UnpackhiEpi16(in2, zero)
p1f := sse2.Cvtepi32Ps(p1)
p2f := sse2.Cvtepi32Ps(p2)
p3f := sse2.Cvtepi32Ps(p3)
p4f := sse2.Cvtepi32Ps(p4)
/* Convert to planar */
g1g0r1r0 := sse.UnpackloPs(p1f, p2f)
b1b0 := sse.UnpackhiPs(p1f, p2f)
g3g2r3r2 := sse.UnpackloPs(p3f, p4f)
b3b2 := sse.UnpackhiPs(p3f, p4f)
r := sse.MovelhPs(g1g0r1r0, g3g2r3r2)
g := sse.MovehlPs(g3g2r3r2, g1g0r1r0)
b := sse.MovelhPs(b1b0, b3b2)
/* Apply matrix to convert to sRGB */
r = sseMatrix3Mul(matPs[0:3], r, g, b)
g = sseMatrix3Mul(matPs[3:6], r, g, b)
b = sseMatrix3Mul(matPs[6:9], r, g, b)
/* Normalize to 0->1 and clamp */
normalize := sse.Set1Ps(1.0 / 65535.0)
max_val := sse.Set1Ps(1.0)
min_val := sse.SetzeroPs()
r = sse.MinPs(max_val, sse.MaxPs(min_val, sse.MulPs(normalize, r)))
g = sse.MinPs(max_val, sse.MaxPs(min_val, sse.MulPs(normalize, g)))
b = sse.MinPs(max_val, sse.MaxPs(min_val, sse.MulPs(normalize, b)))
/* Apply Gamma */
/* Calculate values to be used if larger than junction point */
mul_over := sse.Set1Ps(1.055)
sub_over := sse.Set1Ps(0.055)
pow_over := sse.Set1Ps(1.0 / 2.4)
r_gam := sse.SubPs(sse.MulPs(mul_over, FastPowPs(r, pow_over)), sub_over)
g_gam := sse.SubPs(sse.MulPs(mul_over, FastPowPs(g, pow_over)), sub_over)
b_gam := sse.SubPs(sse.MulPs(mul_over, FastPowPs(b, pow_over)), sub_over)
/* Create mask for values smaller than junction point */
junction := sse.Set1Ps(0.0031308)
mask_r := sse.CmpltPs(r, junction)
mask_g := sse.CmpltPs(g, junction)
mask_b := sse.CmpltPs(b, junction)
/* Calculate value to be used if under junction */
mul_under := sse.Set1Ps(12.92)
r_mul := sse.AndPs(mask_r, sse.MulPs(mul_under, r))
g_mul := sse.AndPs(mask_g, sse.MulPs(mul_under, g))
b_mul := sse.AndPs(mask_b, sse.MulPs(mul_under, b))
/* Select the value to be used based on the junction mask and scale to 8 bit */
upscale := sse.Set1Ps(255.5)
r = sse.MulPs(upscale, sse.OrPs(r_mul, sse.AndnotPs(mask_r, r_gam)))
g = sse.MulPs(upscale, sse.OrPs(g_mul, sse.AndnotPs(mask_g, g_gam)))
b = sse.MulPs(upscale, sse.OrPs(b_mul, sse.AndnotPs(mask_b, b_gam)))
/* Convert to 8 bit unsigned and interleave*/
r_i := sse2.CvtpsEpi32(r)
g_i := sse2.CvtpsEpi32(g)
b_i := sse2.CvtpsEpi32(b)
r_i = sse2.PacksEpi32(r_i, r_i)
g_i = sse2.PacksEpi32(g_i, g_i)
b_i = sse2.PacksEpi32(b_i, b_i)
/* Set alpha value to 255 and store */
alpha_mask := sse2.Set1Epi32(0xff000000)
rg_i := sse2.UnpackloEpi16(r_i, g_i)
bb_i := sse2.UnpackloEpi16(b_i, b_i)
p1 = sse2.UnpackloEpi32(rg_i, bb_i)
p2 = sse2.UnpackhiEpi32(rg_i, bb_i)
p1 = sse2.OrSi128(alpha_mask, sse2.PackusEpi16(p1, p2))
o[x] = p1
}
}
}