Add simple tracer

Author: udzura

Gemfile.lock

@@ -25,16 +25,6 @@ GEM
     csv (3.3.0)
     drb (2.2.1)
     ffi (1.17.1)
-    ffi (1.17.1-aarch64-linux-gnu)
-    ffi (1.17.1-aarch64-linux-musl)
-    ffi (1.17.1-arm-linux-gnu)
-    ffi (1.17.1-arm-linux-musl)
-    ffi (1.17.1-arm64-darwin)
-    ffi (1.17.1-x86-linux-gnu)
-    ffi (1.17.1-x86-linux-musl)
-    ffi (1.17.1-x86_64-darwin)
-    ffi (1.17.1-x86_64-linux-gnu)
-    ffi (1.17.1-x86_64-linux-musl)
     fileutils (1.7.2)
     i18n (1.14.6)
       concurrent-ruby (~> 1.0)

lib/wardite.rb

@@ -362,9 +362,19 @@ def invoke_internal(wasm_function)
       return nil
     end
 
+    $GLOBAL_EXTERNAL_ELAP = 0.0 #: Float
+    $GLOBAL_EXTERNAL_TIMES = 0  #: Integer
+    END {
+      if ENV["WARDITE_TRACE"] == "1"
+        $stderr.puts "external call count: #{$GLOBAL_EXTERNAL_TIMES}"
+        $stderr.puts "external call elapsed: #{$GLOBAL_EXTERNAL_ELAP}(s)"
+      end
+    }
+
     # @rbs external_function: ExternalFunction
     # @rbs return: wasmValue|nil
     def invoke_external(external_function)
+      start = Time.now.to_f
       $stderr.puts "[trace] call external function: #{external_function.name}" if ENV["WARDITE_TRACE"]
       local_start = stack.size - external_function.callsig.size
       args = stack[local_start..]
@@ -399,6 +409,9 @@ def invoke_external(external_function)
       end
 
       raise "invalid type of value returned in proc. val: #{val.inspect}"
+    ensure
+      $GLOBAL_EXTERNAL_TIMES += 1
+      $GLOBAL_EXTERNAL_ELAP += (Time.now.to_f - start)
     end
 
     # @rbs return: void

lib/wardite/load.rb

@@ -254,6 +254,7 @@ module BinaryLoader
     # @rbs enable_wasi: boolish
     # @rbs return: Instance
     def self.load_from_buffer(buf, import_object: {}, enable_wasi: true)
+      start = Time.now.to_f #: Float
       @buf = buf
 
       version = preamble
@@ -273,6 +274,8 @@ def self.load_from_buffer(buf, import_object: {}, enable_wasi: true)
           i.wasi = wasi_env
         end
       end
+    ensure
+      $stderr.puts "load_from_buffer: #{Time.now.to_f - start}" if ENV['WARITE_TRACE']
     end
 
     # @rbs return: Integer