summaryrefslogtreecommitdiff
path: root/tool/gen_dummy_probes.rb
diff options
context:
space:
mode:
authornaruse <naruse@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2012-11-13 06:13:39 +0000
committernaruse <naruse@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2012-11-13 06:13:39 +0000
commitf82d652f35b594c63358cf06bdd242f3cb30b534 (patch)
treef59403032c3733ba9a25c1a5879f6b0c06bdae49 /tool/gen_dummy_probes.rb
parent8e72bb717ab8613e25ac0c2e68cdff23fd905f04 (diff)
Fix dtrace commit r37631, it is [Feature #2565]
* configure.in: disable dtrace because it doesn't work on FreeBSD. * common.mk (clean-local): rm probes.h. * common.mk (parse.o): depend $(PROBES_H_INCLUDES). * common.mk (.d.h): moved from Makefile.in and use BASERUBY. * tool/gen_dummy_probes.rb: reimplemented with ruby because sed is not available on Windows Microsoft VC++ environment. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@37636 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'tool/gen_dummy_probes.rb')
-rw-r--r--tool/gen_dummy_probes.rb24
1 files changed, 24 insertions, 0 deletions
diff --git a/tool/gen_dummy_probes.rb b/tool/gen_dummy_probes.rb
new file mode 100644
index 0000000000..88ad2ca5bf
--- /dev/null
+++ b/tool/gen_dummy_probes.rb
@@ -0,0 +1,24 @@
+#!/usr/bin/ruby
+
+text = ARGF.read
+text.upcase!
+
+# remove the pragma declarations
+text.gsub!(/^#PRAGMA.*$/, '')
+
+# replace the provider section with the start of the header file
+text.gsub!(/PROVIDER RUBY \{/, "#ifndef\t_PROBES_H\n#define\t_PROBES_H")
+
+# finish up the #ifndef sandwich
+text.gsub!(/\};/, "#endif\t/* _PROBES_H */")
+
+text.gsub!(/__/, '_')
+
+text.gsub!(/\([^,)]+\)/, '(arg0)')
+text.gsub!(/\([^,)]+,[^,)]+\)/, '(arg0, arg1)')
+text.gsub!(/\([^,)]+,[^,)]+,[^,)]+\)/, '(arg0, arg1, arg2)')
+text.gsub!(/\([^,)]+,[^,)]+,[^,)]+,[^,)]+\)/, '(arg0, arg1, arg2, arg3)')
+text.gsub!(/\([^,)]+,[^,)]+,[^,)]+,[^,)]+,[^,)]+\)/, '(arg0, arg1, arg2, arg3, arg4)')
+
+text.gsub!(/ *PROBE ([^\(]*)(\([^\)]*\));/, "#define RUBY_DTRACE_\\1_ENABLED() 0\n#define RUBY_DTRACE_\\1\\2\ do \{ \} while\(0\)")
+print text