about summary refs log tree commit diff stats
path: root/056trace.subx
diff options
context:
space:
mode:
Diffstat (limited to '056trace.subx')
0 files changed, 0 insertions, 0 deletions
 

generated by cgit-pink 1.4.1-2-gfad0 (git 2.36.2.497.gbbea4dcf42) at 2024-11-27 00:12:42 +0000


 


54a4ef24a19366ea8a619'>951c3f4c ^

f16f5690 ^





951c3f4c ^


f16f5690 ^


951c3f4c ^


f16f5690 ^





951c3f4c ^


f16f5690 ^



















1
2
3
4
5

6

7

8

9
10
11
12
13

14
15

16
17

18
19

20
21
22
23
24

25
26

27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43







               
                                    
             
                       




                                                       

                                        

 

                                        




                                                         

                                          
















                                                             
type timespec {
  tv_sec: int
  tv_nsec: int
}

# return time in seconds since epoch
# TODO: y2038
fn time -> _/eax: int {
  var t: timespec
  var clock/ebx: int <- copy 0  # CLOCK_MONOTONIC
  var t-addr/ecx: (addr timespec) <- address t
  syscall_clock_gettime
  var t-secs-addr/ecx: (addr int) <- get t-addr, tv_sec
  var secs/eax: int <- copy *t-secs-addr
  return secs
}

# return time in nanoseconds since epoch
fn ntime -> _/eax: int {
  var t: timespec
  var clock/ebx: int <- copy 0  # CLOCK_MONOTONIC
  var t-addr/ecx: (addr timespec) <- address t
  syscall_clock_gettime
  var t-nsecs-addr/ecx: (addr int) <- get t-addr, tv_nsec
  var nsecs/eax: int <- copy *t-nsecs-addr
  return nsecs
}

# nsecs must be less than 999999999 or 0x3b9ac9ff nanoseconds
fn sleep secs: int, nsecs: int {
  var t: timespec
  # initialize t
  var tmp/eax: (addr int) <- get t, tv_sec
  var tmp2/ecx: int <- copy secs
  copy-to *tmp, tmp2
  tmp <- get t, tv_nsec
  tmp2 <- copy nsecs
  copy-to *tmp, tmp2
  # perform the syscall
  var t-addr/ebx: (addr timespec) <- address t
  var rem-addr/ecx: (addr timespec) <- copy 0
  syscall_nanosleep
}