From d71a8880b4d6765294468e94834aeabdf72af6bf Mon Sep 17 00:00:00 2001
From: kosaki <kosaki@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Sun, 10 Mar 2013 05:12:09 +0000
Subject: * tool/gen_ruby_tapset.rb: add tapset generator.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@39692 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 tool/gen_ruby_tapset.rb | 105 ++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 105 insertions(+)
 create mode 100755 tool/gen_ruby_tapset.rb

(limited to 'tool/gen_ruby_tapset.rb')

diff --git a/tool/gen_ruby_tapset.rb b/tool/gen_ruby_tapset.rb
new file mode 100755
index 0000000000..c34fb88611
--- /dev/null
+++ b/tool/gen_ruby_tapset.rb
@@ -0,0 +1,105 @@
+#!/usr/bin/ruby
+# -*- coding: us-ascii -*-
+# usage: ./ruby gen_ruby_tapset.rb --ruby-path=/path/to/ruby probes.d > output
+
+require "optparse"
+
+def set_argument (argname, nth)
+  # remove C style type info
+  argname.gsub!(/.+ (.+)/, '\1') # e.g. char *hoge -> *hoge
+  argname.gsub!(/^\*/, '')       # e.g. *filename -> filename
+
+  "#{argname} = $arg#{nth}"
+end
+
+ruby_path = "/usr/local/ruby"
+
+opts = OptionParser.new
+opts.on("--ruby-path=PATH"){|v| ruby_path = v}
+opts.parse!(ARGV)
+
+text = ARGF.read
+
+# remove preprocessor directives
+text.gsub!(/^#.*$/, '')
+
+# remove provider name
+text.gsub!(/^provider ruby \{/, "")
+text.gsub!(/^\};/, "")
+
+# probename()
+text.gsub!(/probe (.+)\( *\);/) {
+  probe_name = $1
+  probe = <<-End
+    probe #{probe_name} = process("ruby").provider("ruby").mark("#{probe_name}")
+    {
+    }
+  End
+}
+
+# probename(arg1)
+text.gsub!(/ *probe (.+)\(([^,)]+)\);/) {
+  probe_name = $1
+  arg1 = $2
+
+  probe = <<-End
+    probe #{probe_name} = process("ruby").provider("ruby").mark("#{probe_name}")
+    {
+      #{set_argument(arg1, 1)}
+    }
+  End
+}
+
+# probename(arg1, arg2)
+text.gsub!(/ *probe (.+)\(([^,)]+),([^,)]+)\);/) {
+  probe_name = $1
+  arg1 = $2
+  arg2 = $3
+
+  probe = <<-End
+    probe #{probe_name} = process("#{ruby_path}").provider("ruby").mark("#{probe_name}")
+    {
+      #{set_argument(arg1, 1)}
+      #{set_argument(arg2, 2)}
+    }
+  End
+}
+
+# probename(arg1, arg2, arg3)
+text.gsub!(/ *probe (.+)\(([^,)]+),([^,)]+),([^,)]+)\);/) {
+  probe_name = $1
+  arg1 = $2
+  arg2 = $3
+  arg3 = $4
+
+  probe = <<-End
+    probe #{probe_name} = process("#{ruby_path}").provider("ruby").mark("#{probe_name}")
+    {
+      #{set_argument(arg1, 1)}
+      #{set_argument(arg2, 2)}
+      #{set_argument(arg3, 3)}
+    }
+  End
+}
+
+# probename(arg1, arg2, arg3, arg4)
+text.gsub!(/ *probe (.+)\(([^,)]+),([^,)]+),([^,)]+),([^,)]+)\);/) {
+  probe_name = $1
+  arg1 = $2
+  arg2 = $3
+  arg3 = $4
+  arg4 = $5
+
+  probe = <<-End
+    probe #{probe_name} = process("#{ruby_path}").provider("ruby").mark("#{probe_name}")
+    {
+      #{set_argument(arg1, 1)}
+      #{set_argument(arg2, 2)}
+      #{set_argument(arg3, 3)}
+      #{set_argument(arg4, 4)}
+    }
+  End
+}
+
+print text
+
-- 
cgit v1.2.3