mirror of
https://github.com/odin-lang/Odin.git
synced 2026-06-01 00:11:13 +00:00
150 lines
6.7 KiB
Odin
150 lines
6.7 KiB
Odin
#+build i386, amd64
|
|
package simd_x86
|
|
|
|
import "core:simd"
|
|
|
|
_SIDD_UBYTE_OPS :: 0b0000_0000
|
|
_SIDD_UWORD_OPS :: 0b0000_0001
|
|
_SIDD_SBYTE_OPS :: 0b0000_0010
|
|
_SIDD_SWORD_OPS :: 0b0000_0011
|
|
|
|
_SIDD_CMP_EQUAL_ANY :: 0b0000_0000
|
|
_SIDD_CMP_RANGES :: 0b0000_0100
|
|
_SIDD_CMP_EQUAL_EACH :: 0b0000_1000
|
|
_SIDD_CMP_EQUAL_ORDERED :: 0b0000_1100
|
|
|
|
_SIDD_POSITIVE_POLARITY :: 0b0000_0000
|
|
_SIDD_NEGATIVE_POLARITY :: 0b0001_0000
|
|
_SIDD_MASKED_POSITIVE_POLARITY :: 0b0010_0000
|
|
_SIDD_MASKED_NEGATIVE_POLARITY :: 0b0011_0000
|
|
|
|
_SIDD_LEAST_SIGNIFICANT :: 0b0000_0000
|
|
_SIDD_MOST_SIGNIFICANT :: 0b0100_0000
|
|
|
|
_SIDD_BIT_MASK :: 0b0000_0000
|
|
_SIDD_UNIT_MASK :: 0b0100_0000
|
|
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpistrm :: #force_inline proc "c" (a: __m128i, b: __m128i, $IMM8: i8) -> __m128i {
|
|
return transmute(__m128i)pcmpistrm128(transmute(i8x16)a, transmute(i8x16)b, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpistri :: #force_inline proc "c" (a: __m128i, b: __m128i, $IMM8: i8) -> i32 {
|
|
return pcmpistri128(transmute(i8x16)a, transmute(i8x16)b, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpistrz :: #force_inline proc "c" (a: __m128i, b: __m128i, $IMM8: i8) -> i32 {
|
|
return pcmpistriz128(transmute(i8x16)a, transmute(i8x16)b, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpistrc :: #force_inline proc "c" (a: __m128i, b: __m128i, $IMM8: i8) -> i32 {
|
|
return pcmpistric128(transmute(i8x16)a, transmute(i8x16)b, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpistrs :: #force_inline proc "c" (a: __m128i, b: __m128i, $IMM8: i8) -> i32 {
|
|
return pcmpistris128(transmute(i8x16)a, transmute(i8x16)b, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpistro :: #force_inline proc "c" (a: __m128i, b: __m128i, $IMM8: i8) -> i32 {
|
|
return pcmpistrio128(transmute(i8x16)a, transmute(i8x16)b, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpistra :: #force_inline proc "c" (a: __m128i, b: __m128i, $IMM8: i8) -> i32 {
|
|
return pcmpistria128(transmute(i8x16)a, transmute(i8x16)b, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpestrm :: #force_inline proc "c" (a: __m128i, la: i32, b: __m128i, lb: i32, $IMM8: i8) -> __m128i {
|
|
return transmute(__m128i)pcmpestrm128(transmute(i8x16)a, la, transmute(i8x16)b, lb, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpestri :: #force_inline proc "c" (a: __m128i, la: i32, b: __m128i, lb: i32, $IMM8: i8) -> i32 {
|
|
return pcmpestri128(transmute(i8x16)a, la, transmute(i8x16)b, lb, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpestrz :: #force_inline proc "c" (a: __m128i, la: i32, b: __m128i, lb: i32, $IMM8: i8) -> i32 {
|
|
return pcmpestriz128(transmute(i8x16)a, la, transmute(i8x16)b, lb, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpestrc :: #force_inline proc "c" (a: __m128i, la: i32, b: __m128i, lb: i32, $IMM8: i8) -> i32 {
|
|
return pcmpestric128(transmute(i8x16)a, la, transmute(i8x16)b, lb, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpestrs :: #force_inline proc "c" (a: __m128i, la: i32, b: __m128i, lb: i32, $IMM8: i8) -> i32 {
|
|
return pcmpestris128(transmute(i8x16)a, la, transmute(i8x16)b, lb, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpestro :: #force_inline proc "c" (a: __m128i, la: i32, b: __m128i, lb: i32, $IMM8: i8) -> i32 {
|
|
return pcmpestrio128(transmute(i8x16)a, la, transmute(i8x16)b, lb, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpestra :: #force_inline proc "c" (a: __m128i, la: i32, b: __m128i, lb: i32, $IMM8: i8) -> i32 {
|
|
return pcmpestria128(transmute(i8x16)a, la, transmute(i8x16)b, lb, IMM8)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_crc32_u8 :: #force_inline proc "c" (crc: u32, v: u8) -> u32 {
|
|
return crc32_32_8(crc, v)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_crc32_u16 :: #force_inline proc "c" (crc: u32, v: u16) -> u32 {
|
|
return crc32_32_16(crc, v)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_crc32_u32 :: #force_inline proc "c" (crc: u32, v: u32) -> u32 {
|
|
return crc32_32_32(crc, v)
|
|
}
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_cmpgt_epi64 :: #force_inline proc "c" (a: __m128i, b: __m128i) -> __m128i {
|
|
return transmute(__m128i)simd.lanes_gt(a, b)
|
|
}
|
|
|
|
when ODIN_ARCH == .amd64 {
|
|
@(require_results, enable_target_feature="sse4.2")
|
|
_mm_crc32_u64 :: #force_inline proc "c" (crc: u64, v: u64) -> u64 {
|
|
return crc32_64_64(crc, v)
|
|
}
|
|
}
|
|
|
|
@(private, default_calling_convention="none")
|
|
foreign _ {
|
|
// SSE 4.2 string and text comparison ops
|
|
@(link_name="llvm.x86.sse42.pcmpestrm128")
|
|
pcmpestrm128 :: proc(a: i8x16, la: i32, b: i8x16, lb: i32, #const imm8: i8) -> u8x16 ---
|
|
@(link_name="llvm.x86.sse42.pcmpestri128")
|
|
pcmpestri128 :: proc(a: i8x16, la: i32, b: i8x16, lb: i32, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpestriz128")
|
|
pcmpestriz128 :: proc(a: i8x16, la: i32, b: i8x16, lb: i32, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpestric128")
|
|
pcmpestric128 :: proc(a: i8x16, la: i32, b: i8x16, lb: i32, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpestris128")
|
|
pcmpestris128 :: proc(a: i8x16, la: i32, b: i8x16, lb: i32, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpestrio128")
|
|
pcmpestrio128 :: proc(a: i8x16, la: i32, b: i8x16, lb: i32, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpestria128")
|
|
pcmpestria128 :: proc(a: i8x16, la: i32, b: i8x16, lb: i32, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpistrm128")
|
|
pcmpistrm128 :: proc(a, b: i8x16, #const imm8: i8) -> i8x16 ---
|
|
@(link_name="llvm.x86.sse42.pcmpistri128")
|
|
pcmpistri128 :: proc(a, b: i8x16, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpistriz128")
|
|
pcmpistriz128 :: proc(a, b: i8x16, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpistric128")
|
|
pcmpistric128 :: proc(a, b: i8x16, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpistris128")
|
|
pcmpistris128 :: proc(a, b: i8x16, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpistrio128")
|
|
pcmpistrio128 :: proc(a, b: i8x16, #const imm8: i8) -> i32 ---
|
|
@(link_name="llvm.x86.sse42.pcmpistria128")
|
|
pcmpistria128 :: proc(a, b: i8x16, #const imm8: i8) -> i32 ---
|
|
// SSE 4.2 CRC instructions
|
|
@(link_name="llvm.x86.sse42.crc32.32.8")
|
|
crc32_32_8 :: proc(crc: u32, v: u8) -> u32 ---
|
|
@(link_name="llvm.x86.sse42.crc32.32.16")
|
|
crc32_32_16 :: proc(crc: u32, v: u16) -> u32 ---
|
|
@(link_name="llvm.x86.sse42.crc32.32.32")
|
|
crc32_32_32 :: proc(crc: u32, v: u32) -> u32 ---
|
|
|
|
// AMD64 Only
|
|
@(link_name="llvm.x86.sse42.crc32.64.64")
|
|
crc32_64_64 :: proc(crc: u64, v: u64) -> u64 ---
|
|
}
|