rtinspect 0.0.1

data/test/test.rb

@@ -0,0 +1,162 @@
+require 'timeout'
+require 'expect'
+require 'test/unit'
+
+require 'rtinspect'
+
+class TestRuntimeInspectionThread < Test::Unit::TestCase
+
+    class Tracker
+        def self.assert_equal( &block )
+            @@assert_equal = block
+        end
+
+        def initialize( &assert_block )
+            $expect_verbose = $DEBUG
+            @sock = TCPSocket.new( 'localhost', 56789 )
+            @cmd_count = 1
+            @block_count = 0
+            @at_prompt = false
+        end
+
+        def assert( cmd=nil, *expected )
+            unless @at_prompt
+                @@assert_equal.call( ["\n"+prompt], @sock.expect(prompt) )
+            end
+            return unless cmd
+
+            if cmd.kind_of? Array
+                cmds = cmd
+            else
+                cmds = [cmd]
+            end
+
+            out = ''
+            cmds.each do |cmd|
+                puts( cmd )
+                $stdout.puts "expect: #{prompt}" if $DEBUG
+                timeout( 5 ) do
+                    out += @sock.expect( prompt ).first
+                end
+                out.sub!( /test:\d+:\d> $/, '' )
+            end
+
+            if @block_count > 0
+                puts( '' )
+                @block_count += 1
+                $stdout.puts "expect: #{prompt}" if $DEBUG
+                timeout( 5 ) do
+                    out += @sock.expect( prompt ).first
+                end
+                out.sub!( /test:\d+:\d> $/, '' )
+            end
+
+            @at_prompt = true
+
+            out.chomp!
+            @@assert_equal.call( expected.join("\n") + "\n", out )
+        end
+
+        def puts( msg )
+            $stdout.puts( "<- #{msg}" ) if $DEBUG
+            @sock.puts( msg )
+            @cmd_count += 1
+        end
+
+        def use_blocks=( enabled )
+            if( !enabled and @block_count > 0 )
+                # turn it off
+                assert( "rti.state.block_count = 0\n\n", '0' )
+                @block_count = 0
+            elsif( enabled and @block_count < 1 )
+                # turn it on
+                puts( 'rti.state.block_count = 1' )
+                @block_count = 1
+                timeout( 5 ) do
+                    @sock.expect( prompt ).first
+                end
+                @at_prompt = true
+            end
+        end
+
+        def close
+            @sock.close
+        end
+
+        private
+
+        def prompt
+            "test:#{'%03d'%@cmd_count}:#{@block_count}> "
+        end
+    end
+
+    def setup
+        Tracker.assert_equal do |a1, a2|
+            assert_equal( a1, a2 )
+        end
+    end
+
+    def test_prompt
+        threads = Thread.list.dup
+        r = RuntimeInspectionThread.new
+        assert_not_equal( threads, Thread.list )
+        t = Tracker.new
+        t.assert
+        r.kill
+        r.join
+        assert_raise( Errno::EPIPE ) do
+            t.puts( 'foo' )
+        end
+        t.close
+        assert_equal( threads, Thread.list )
+    end
+
+    def test_locals
+        r = RuntimeInspectionThread.new
+        t = Tracker.new
+
+        t.assert( 'rti.state.use_yaml = true', "=> --- true" )
+
+        t.assert( 'local_variables',
+                  '=> --- ',
+                  '- rti' )
+
+        r.kill
+    end
+
+    def test_list
+        r = RuntimeInspectionThread.new
+        t = Tracker.new
+
+        t.assert( 'rti.list',
+                  '=> ["bp_add", "bp_continue", "bp_del", "bp_fin", "bp_list", ' +
+                  '"bp_next", "bp_start", "bp_step", "bp_stop", "get_object", ' +
+                  '"initialize", "list", "name2class", "start_world", "state", ' +
+                  '"stop_world"]' )
+
+        r.kill
+    end
+
+    def test_lookup
+        r = RuntimeInspectionThread.new
+        t = Tracker.new
+
+        Struct.new( 'Foo', :one, :two, :three )
+        foo = Struct::Foo.new( 1, 2, 3 )
+
+        t.use_blocks = true
+        t.assert( [ "foo = rti.get_object 'Foo'",
+                    "foo.one = 11",
+                    "foo.two = 22",
+                    "p foo" ],
+                  '#<struct Struct::Foo one=11, two=22, three=3>',
+                  '=> nil' )
+
+        assert_equal( 11, foo.one )
+        assert_equal( 22, foo.two )
+        assert_equal( 3, foo.three )
+
+        r.kill
+    end
+
+end

metadata

@@ -0,0 +1,54 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.9.0
+specification_version: 1
+name: rtinspect
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+date: 2007-01-01 00:00:00 -08:00
+summary: A thread that will enable remote access capabilities  in a running Ruby process for debugging and inspection.
+require_paths: 
+- lib
+email: bradrf@gigglewax.com
+homepage: http://rtinspect.rubyforge.org/
+rubyforge_project: 
+description: This is a class that will enable remote access  capabilities in a running Ruby process, exposing the ability to  enable breakpoints, walk code (e.g. step/next/continue), inspect  variables, modify codepaths, and many other debugging actions.
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: false
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+post_install_message: 
+authors: 
+- Brad Robel-Forrest
+files: 
+- lib/rtinspect.rb
+- test/test.rb
+- README
+- LICENSE
+- COPYING
+- TODO
+test_files: 
+- test/test.rb
+rdoc_options: []
+
+extra_rdoc_files: 
+- README
+- LICENSE
+- COPYING
+- TODO
+executables: []
+
+extensions: []
+
+requirements: []
+
+dependencies: []
+