chrisa-ruby-dtrace 0.2.0

data/test/test_dtrace_provider.rb

@@ -0,0 +1,153 @@
+#
+# Ruby-Dtrace
+# (c) 2008 Chris Andrews <chris@nodnol.org>
+#
+
+require 'dtrace'
+require 'dtrace/provider'
+require 'test/unit'
+
+class TestDtraceProvider < Test::Unit::TestCase
+  
+  def test_provider_with_module
+    Dtrace::Provider.create :test0, { :module => 'test1module' } do |p|
+      p.probe :test
+    end
+
+    t = Dtrace.new
+    matches = 0
+    t.each_probe do |p|
+      if p.to_s == "test0#{$$}:test1module:test_provider_with_module:test"
+        matches += 1
+      end
+    end
+    assert_equal 1, matches
+  end
+
+  def test_probe_with_function_no_args
+    Dtrace::Provider.create :test10 do |p|
+      p.probe :test, { :function => :foo }
+    end
+
+    t = Dtrace.new
+    matches = 0
+    t.each_probe do |p|
+      if p.to_s == "test10#{$$}:ruby:foo:test"
+        matches += 1
+      end
+    end
+    assert_equal 1, matches
+  end
+
+  def test_probe_with_function_and_args
+    Dtrace::Provider.create :test11 do |p|
+      p.probe :test, { :function => :foo }, :integer, :integer
+    end
+
+    t = Dtrace.new
+    matches = 0
+    t.each_probe do |p|
+      if p.to_s == "test11#{$$}:ruby:foo:test"
+        matches += 1
+      end
+    end
+    assert_equal 1, matches
+  end
+
+  def test_probe_no_args
+    Dtrace::Provider.create :test1 do |p|
+      p.probe :test
+    end
+
+    t = Dtrace.new
+    matches = 0
+    t.each_probe do |p|
+      if p.to_s == "test1#{$$}:ruby:test_probe_no_args:test"
+        matches += 1
+      end
+    end
+    assert_equal 1, matches
+  end
+
+  def test_probe_with_char_arg
+    Dtrace::Provider.create :test2 do |p|
+      p.probe :test, :string
+    end
+
+    t = Dtrace.new
+    matches = 0
+    t.each_probe do |p|
+      if p.to_s == "test2#{$$}:ruby:test_probe_with_char_arg:test"
+        matches += 1
+      end
+    end
+    assert_equal 1, matches
+  end
+
+  def test_probe_with_int_arg
+    Dtrace::Provider.create :test3 do |p|
+      p.probe :test, :integer
+    end
+
+    t = Dtrace.new
+    matches = 0
+    t.each_probe do |p|
+      if p.to_s == "test3#{$$}:ruby:test_probe_with_int_arg:test"
+        matches += 1
+      end
+    end
+    assert_equal 1, matches
+  end
+
+  def test_probe_with_two_args
+    Dtrace::Provider.create :test4 do |p|
+      p.probe :test, :integer, :integer
+    end
+
+    t = Dtrace.new
+    matches = 0
+    t.each_probe do |p|
+      if p.to_s == "test4#{$$}:ruby:test_probe_with_two_args:test"
+        matches += 1
+      end
+    end
+    assert_equal 1, matches
+  end
+
+  def test_multiple_probes_with_two_args
+    Dtrace::Provider.create :test5 do |p|
+      p.probe :test1, :integer, :integer
+      p.probe :test2, :integer, :integer
+    end
+
+    t = Dtrace.new
+    matches = 0
+    t.each_probe do |p|
+      if p.to_s =~ /^test5#{$$}:ruby:test_multiple_probes_with_two_args:test/
+        matches += 1
+      end
+    end
+    assert_equal 2, matches
+  end
+
+  def test_multiple_probes
+    Dtrace::Provider.create :test6 do |p|
+      p.probe :test1, :integer
+      p.probe :test2, :integer
+      p.probe :test3, :integer
+      p.probe :test4, :integer
+      p.probe :test5, :integer
+    end
+
+    t = Dtrace.new
+    matches = 0
+    t.each_probe do |p|
+      if p.to_s =~ /^test6#{$$}:ruby:test_multiple_probes:test/
+        matches += 1
+      end
+    end
+    assert_equal 5, matches
+  end
+
+end
+

data/test/test_dtrace_repeat.rb

@@ -0,0 +1,51 @@
+#
+# Ruby-Dtrace
+# (c) 2007 Chris Andrews <chris@nodnol.org>
+#
+
+require 'dtrace'
+require 'test/unit'
+
+# Test repeatedly using DTrace in the same process.  Show that we can
+# reopen the DTrace handle multiple times, without explictly closing
+# it (that happens in GC, so in this script that's probably right at
+# the end).
+
+class TestDtraceRepeat < Test::Unit::TestCase
+  
+  def test_repeats
+    (0..9).each do |i|
+      t = Dtrace.new 
+      t.setopt("bufsize", "4m")
+      t.setopt("aggsize", "4m")
+
+      progtext = 'syscall:::entry { trace("foo"); }'
+      
+      prog = t.compile progtext
+      prog.execute
+      t.go
+      
+      # Let some activity happen.
+      sleep 1
+
+      c = Dtrace::Consumer.new(t)
+      assert c
+
+      i = 0
+      c.consume do |d|
+        assert d
+        assert_not_nil d.cpu
+        assert_equal 'syscall', d.probe.provider
+        assert_not_nil d.probe.func
+        assert_equal 'entry', d.probe.name
+
+        d.data.each do |r|
+          assert_equal 'foo', r.value
+        end
+        c.finish
+        i = i + 1
+      end
+      assert i > 0
+    end
+  end
+end

data/test/test_dtrace_rubyprobe.rb

@@ -0,0 +1,52 @@
+#
+# Ruby-Dtrace
+# (c) 2007 Chris Andrews <chris@nodnol.org>
+#
+
+require 'dtrace'
+require 'test/unit'
+
+class TestDtrace < Test::Unit::TestCase
+  def test_rubyprobe
+    t = Dtrace.new 
+    t.setopt("bufsize", "4m")
+
+    progtext = <<EOD
+ruby*:::ruby-probe
+{
+  trace(copyinstr(arg0));
+  trace(copyinstr(arg1));
+}
+EOD
+    
+    prog = t.compile progtext
+    prog.execute
+    t.go
+
+    c = Dtrace::Consumer.new(t)
+
+    # Leopard's ruby-probe is DTracer, Solaris's is Tracer.
+    begin
+      trace_module = DTracer
+    rescue NameError
+      trace_module = Tracer
+    end
+
+    (0..9).each do |i|
+      trace_module.fire("foo", i.to_s)
+    end
+
+    data = []
+    c.consume_once do |d|
+      data << d
+    end
+    
+    (0..9).each do |i|
+      d = data.shift
+      assert_equal("foo", d.data[0].value)
+      assert_equal(i.to_s, d.data[1].value)
+    end
+
+  end
+    
+end

data/test/test_dtrace_typefilter.rb

@@ -0,0 +1,108 @@
+#
+# Ruby-Dtrace
+# (c) 2007 Chris Andrews <chris@nodnol.org>
+#
+
+require 'dtrace'
+require 'test/unit'
+
+# Tests for the feature allowing you to filter DtraceData types
+
+class TestDtraceTypefilter < Test::Unit::TestCase
+  def test_filter
+    t = Dtrace.new 
+    t.setopt("bufsize", "4m")
+    t.setopt("aggsize", "4m")
+
+    progtext =<<EOD
+profile-1000
+{ 
+  @a[execname] = count();
+  @b[execname] = count();
+}
+
+profile-10
+{
+  trace("foo");
+  printa(@a);
+  printf("bar");
+  printa(@b);
+}
+EOD
+    
+    prog = t.compile progtext
+    prog.execute
+    t.go
+
+    sleep 1
+
+    c = Dtrace::Consumer.new(t)
+    assert c
+
+    data = []
+    c.consume_once(Dtrace::AggregateSet) do |d|
+      data << d
+    end
+    
+    assert data.length > 0
+    data.each do |d|
+      assert d
+      assert_equal Dtrace::Data, d.class
+      d.data.each do |agg|
+        assert_equal Dtrace::AggregateSet, agg.class
+      end
+    end
+
+  end
+
+  def test_filter_two_classes
+    t = Dtrace.new 
+    t.setopt("bufsize", "4m")
+    t.setopt("aggsize", "4m")
+
+    progtext =<<EOD
+profile-1000
+{ 
+  @a[execname] = count();
+  @b[execname] = count();
+}
+
+profile-10
+{
+  trace("foo");
+  printa(@a);
+  printf("bar");
+  printa(@b);
+}
+EOD
+    
+    prog = t.compile progtext
+    prog.execute
+    t.go
+
+    sleep 1
+
+    c = Dtrace::Consumer.new(t)
+    assert c
+
+    data = []
+    c.consume_once(Dtrace::AggregateSet, Dtrace::PrintfRecord) do |d|
+      data << d
+    end
+    
+    assert data.length > 0
+    data.each do |d|
+      assert d
+      assert_equal Dtrace::Data, d.class
+      d.data.each do |r|
+        if r.respond_to?(:add_aggregate)
+          assert_equal Dtrace::AggregateSet, r.class
+        else
+          assert_equal Dtrace::PrintfRecord, r.class
+        end
+      end
+    end
+
+  end
+
+end

data/test/test_legacy_consumer.rb

@@ -0,0 +1,56 @@
+#
+# Ruby-Dtrace
+# (c) 2007 Chris Andrews <chris@nodnol.org>
+#
+
+require 'dtrace'
+require 'test/unit'
+
+# Tests using the DTrace profile provider.
+
+class TestLegacyConsumer < Test::Unit::TestCase
+  def test_aggregate_group
+    t = Dtrace.new 
+    t.setopt("bufsize", "4m")
+    t.setopt("aggsize", "4m")
+
+    progtext =<<EOD
+profile-1000
+{ 
+  @a[execname] = count();
+  @b[execname] = count();
+}
+
+profile-1
+{
+  printa(@a);
+  printa(@b);
+}
+EOD
+    
+    prog = t.compile progtext
+    prog.execute
+    t.go
+
+    sleep 3
+
+    c = DtraceConsumer.new(t)
+    assert c
+
+    data = []
+    c.consume_once do |d|
+      data << d
+    end
+    
+    assert data.length > 0
+    data.each do |d|
+      assert d
+      assert_equal Dtrace::Data, d.class
+      d.data.each do |agg|
+        assert_equal Dtrace::AggregateSet, agg.class
+      end
+    end
+
+  end
+
+end

metadata

@@ -0,0 +1,165 @@
+--- !ruby/object:Gem::Specification 
+name: chrisa-ruby-dtrace
+version: !ruby/object:Gem::Version 
+  version: 0.2.0
+platform: ruby
+authors: 
+- Chris Andrews
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-06-13 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: 
+email: chris@nodnol.org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- examples/scsi.rb
+- ext/dof
+- ext/dof/constants.c
+- ext/dof/dof.h
+- ext/dof/dof_api.c
+- ext/dof/dof_helper.c
+- ext/dof/extconf.rb
+- ext/dof/file.c
+- ext/dof/generator.c
+- ext/dof/header.c
+- ext/dof/Makefile
+- ext/dof/mkmf.log
+- ext/dof/parser.c
+- ext/dof/parser.h
+- ext/dof/section.c
+- ext/dtrace_aggdata.c
+- ext/dtrace_api.c
+- ext/dtrace_api.h
+- ext/dtrace_bufdata.c
+- ext/dtrace_dropdata.c
+- ext/dtrace_errdata.c
+- ext/dtrace_hdl.c
+- ext/dtrace_probe.c
+- ext/dtrace_probedata.c
+- ext/dtrace_probedesc.c
+- ext/dtrace_process.c
+- ext/dtrace_program.c
+- ext/dtrace_programinfo.c
+- ext/dtrace_recdesc.c
+- ext/dtrace_util.c
+- ext/extconf.rb
+- ext/i386-solaris2.11
+- ext/i386-solaris2.11/dtrace_probe.c
+- ext/i686-darwin8.10.1
+- ext/i686-darwin8.10.1/dtrace_probe.c
+- ext/sparc-solaris2.10
+- ext/sparc-solaris2.10/dtrace_probe.c
+- ext/stubs.txt
+- lib/dtrace
+- lib/dtrace/aggregate.rb
+- lib/dtrace/aggregateset.rb
+- lib/dtrace/consumer.rb
+- lib/dtrace/data.rb
+- lib/dtrace/dof
+- lib/dtrace/dof/file.rb
+- lib/dtrace/dof/section
+- lib/dtrace/dof/section/strtab.rb
+- lib/dtrace/dof/section.rb
+- lib/dtrace/dof.rb
+- lib/dtrace/printfrecord.rb
+- lib/dtrace/probe.rb
+- lib/dtrace/probedata.rb
+- lib/dtrace/probedesc.rb
+- lib/dtrace/provider
+- lib/dtrace/provider/probedef.rb
+- lib/dtrace/provider.rb
+- lib/dtrace/record.rb
+- lib/dtrace/stackrecord.rb
+- lib/dtrace/tracer.rb
+- lib/dtrace/version.rb
+- lib/dtrace/version.rb~
+- lib/dtrace.rb
+- lib/dtraceconsumer.rb
+- plugin/dtrace
+- plugin/dtrace/bin
+- plugin/dtrace/bin/dtracer.rb
+- plugin/dtrace/init.rb
+- plugin/dtrace/lib
+- plugin/dtrace/lib/dtrace_helper.rb
+- plugin/dtrace/lib/dtrace_report.rb
+- plugin/dtrace/lib/dtracer.rb
+- plugin/dtrace/lib/dtracer_client.rb
+- plugin/dtrace/public
+- plugin/dtrace/public/stylesheets
+- plugin/dtrace/public/stylesheets/dtrace.css
+- plugin/dtrace/Rakefile
+- plugin/dtrace/README
+- plugin/dtrace/scripts
+- plugin/dtrace/scripts/default.d
+- plugin/dtrace/scripts/rails_mysql.d
+- plugin/dtrace/tasks
+- plugin/dtrace/tasks/dtrace.rake
+- plugin/dtrace/test
+- plugin/dtrace/test/dtrace_test.rb
+- plugin/dtrace/views
+- plugin/dtrace/views/dtrace
+- plugin/dtrace/views/dtrace/_report.rhtml
+- test/apple-dof
+- test/disabled_probe_effect.txt
+- test/dof
+- test/dof2
+- test/test_disabled_probe_effect.rb
+- test/test_dof_generator.rb
+- test/test_dof_helper.rb
+- test/test_dof_parser.rb
+- test/test_dof_providers.rb
+- test/test_dof_strtabs.rb
+- test/test_dtrace.rb
+- test/test_dtrace_aggregates.rb
+- test/test_dtrace_drops_errors.rb
+- test/test_dtrace_probe.rb
+- test/test_dtrace_probes.rb
+- test/test_dtrace_processes.rb
+- test/test_dtrace_profile.rb
+- test/test_dtrace_provider.rb
+- test/test_dtrace_repeat.rb
+- test/test_dtrace_rubyprobe.rb
+- test/test_dtrace_typefilter.rb
+- test/test_legacy_consumer.rb
+- README.txt
+- History.txt
+- Manifest.txt
+- Rakefile
+has_rdoc: true
+homepage: http://ruby-dtrace.rubyforge.org
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: ruby-dtrace
+rubygems_version: 1.0.1
+signing_key: 
+specification_version: 2
+summary: ruby-dtrace is Ruby bindings for Dtrace, which lets you write D-based programs in Ruby, and add probes to your Ruby programs.
+test_files: []
+