block all x86 tsc functions in when block

This commit is contained in:
Colin Davidson
2023-02-21 06:28:55 -08:00
parent 7322b63991
commit 1fc3a25f47
3 changed files with 50 additions and 44 deletions
+2
View File
@@ -9,6 +9,7 @@ foreign libc {
@(link_name="sysctlbyname") _sysctlbyname :: proc(path: cstring, oldp: rawptr, oldlenp: rawptr, newp: rawptr, newlen: int) -> c.int --- @(link_name="sysctlbyname") _sysctlbyname :: proc(path: cstring, oldp: rawptr, oldlenp: rawptr, newp: rawptr, newlen: int) -> c.int ---
} }
when ODIN_ARCH == .amd64 {
_x86_get_tsc_frequency :: proc "contextless" () -> (u64, bool) { _x86_get_tsc_frequency :: proc "contextless" () -> (u64, bool) {
tmp_freq : u64 = 0 tmp_freq : u64 = 0
tmp_size : i64 = size_of(tmp_freq) tmp_size : i64 = size_of(tmp_freq)
@@ -19,3 +20,4 @@ _x86_get_tsc_frequency :: proc "contextless" () -> (u64, bool) {
return tmp_freq, true return tmp_freq, true
} }
}
+2
View File
@@ -5,6 +5,7 @@ package time
import "core:intrinsics" import "core:intrinsics"
import "core:sys/unix" import "core:sys/unix"
when ODIN_ARCH == .amd64 {
_x86_get_tsc_frequency :: proc "contextless" () -> (u64, bool) { _x86_get_tsc_frequency :: proc "contextless" () -> (u64, bool) {
perf_attr := unix.Perf_Event_Attr{} perf_attr := unix.Perf_Event_Attr{}
perf_attr.type = u32(unix.Perf_Type_Id.Hardware) perf_attr.type = u32(unix.Perf_Type_Id.Hardware)
@@ -33,3 +34,4 @@ _x86_get_tsc_frequency :: proc "contextless" () -> (u64, bool) {
frequency := u64((u128(1_000_000_000) << u128(event_page.time_shift)) / u128(event_page.time_mult)) frequency := u64((u128(1_000_000_000) << u128(event_page.time_shift)) / u128(event_page.time_mult))
return frequency, true return frequency, true
} }
}
+2
View File
@@ -5,6 +5,7 @@ package time
import "core:intrinsics" import "core:intrinsics"
import win32 "core:sys/windows" import win32 "core:sys/windows"
when ODIN_ARCH == .amd64 {
_x86_get_tsc_frequency :: proc "contextless" () -> (u64, bool) { _x86_get_tsc_frequency :: proc "contextless" () -> (u64, bool) {
qpc_begin: win32.LARGE_INTEGER qpc_begin: win32.LARGE_INTEGER
win32.QueryPerformanceCounter(&qpc_begin) win32.QueryPerformanceCounter(&qpc_begin)
@@ -22,3 +23,4 @@ _x86_get_tsc_frequency :: proc "contextless" () -> (u64, bool) {
frequency = u64((u128(tsc_end - tsc_begin) * u128(qpc_frequency)) / u128(qpc_end - qpc_begin)) frequency = u64((u128(tsc_end - tsc_begin) * u128(qpc_frequency)) / u128(qpc_end - qpc_begin))
return frequency, true return frequency, true
} }
}