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
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
;; RUN: wasm-split %s --instrument -S -o - | filecheck %s
;; Check that the output round trips and validates as well
;; RUN: wasm-split %s --instrument -g -o %t
;; RUN: wasm-opt %t --print | filecheck %s
(module
(import "env" "foo" (func $foo))
(export "bar" (func $bar))
(func $bar
(call $foo)
)
(func $baz (param i32) (result i32)
(local.get 0)
)
)
;; Check that a memory has been added
;; CHECK: (memory $0 1 1)
;; Check that the counter and timestamps have been added
;; CHECK: (global $monotonic_counter (mut i32) (i32.const 0))
;; CHECK: (global $bar_timestamp (mut i32) (i32.const 0))
;; CHECK: (global $baz_timestamp (mut i32) (i32.const 0))
;; And the profiling function exported
;; CHECK: (export "__write_profile" (func $__write_profile))
;; Check that the function instrumentation is correct
;; CHECK: (func $baz (param $0 i32) (result i32)
;; CHECK-NEXT: (if
;; CHECK-NEXT: (i32.eqz
;; CHECK-NEXT: (global.get $baz_timestamp)
;; CHECK-NEXT: )
;; CHECK-NEXT: (block
;; CHECK-NEXT: (global.set $monotonic_counter
;; CHECK-NEXT: (i32.add
;; CHECK-NEXT: (global.get $monotonic_counter)
;; CHECK-NEXT: (i32.const 1)
;; CHECK-NEXT: )
;; CHECK-NEXT: )
;; CHECK-NEXT: (global.set $baz_timestamp
;; CHECK-NEXT: (global.get $monotonic_counter)
;; CHECK-NEXT: )
;; CHECK-NEXT: )
;; CHECK-NEXT: )
;; CHECK-NEXT: (local.get $0)
;; CHECK-NEXT: )
;; Check that the profiling function is correct.
;; CHECK: (func $__write_profile (param $addr i32) (param $size i32) (result i32)
;; CHECK-NEXT: (if
;; CHECK-NEXT: (i32.ge_u
;; CHECK-NEXT: (local.get $size)
;; CHECK-NEXT: (i32.const 16)
;; CHECK-NEXT: )
;; CHECK-NEXT: (block
;; CHECK-NEXT: (i64.store align=1
;; CHECK-NEXT: (local.get $addr)
;; CHECK-NEXT: (i64.const {{.*}})
;; CHECK-NEXT: )
;; CHECK-NEXT: (i32.store offset=8 align=1
;; CHECK-NEXT: (local.get $addr)
;; CHECK-NEXT: (global.get $bar_timestamp)
;; CHECK-NEXT: )
;; CHECK-NEXT: (i32.store offset=12 align=1
;; CHECK-NEXT: (local.get $addr)
;; CHECK-NEXT: (global.get $baz_timestamp)
;; CHECK-NEXT: )
;; CHECK-NEXT: )
;; CHECK-NEXT: )
;; CHECK-NEXT: (i32.const 16)
;; CHECK-NEXT: )
|
