rbx-trepanning 0.0.5-universal-rubinius-1.2.1

data/interface/server.rb

@@ -0,0 +1,143 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2011 Rocky Bernstein <rockyb@rubyforge.net>
+
+# Our local modules
+require 'rubygems'; require 'require_relative'
+require_relative 'base_intf'
+require_relative 'comcodes'
+require_relative '../io/input'
+require_relative '../io/tcpserver'
+
+# Mfifoserver = import_relative('fifoserver', '..io', 'pydbgr')
+
+# Interface for debugging a program but having user control
+# reside outside of the debugged process, possibly on another
+# computer
+class Trepan::ServerInterface < Trepan::Interface
+
+  include Trepanning::RemoteCommunication
+
+  DEFAULT_INIT_CONNECTION_OPTS = {
+    :io => 'TCP'
+  } unless defined?(DEFAULT_INIT_CONNECTION_OPTS)
+
+  def initialize(inout=nil, out=nil, connection_opts={})
+
+    @connection_opts = DEFAULT_INIT_CONNECTION_OPTS.merge(connection_opts)
+
+    at_exit { finalize }
+    @inout = 
+      if inout
+        inout
+      else
+        server_type = @connection_opts[:io]
+        # FIXME: complete this.
+        # if 'FIFO' == server_type
+        #     FIFOServer.new
+        # else
+        Trepan::TCPDbgServer.new(@connection_opts)
+        # end
+      end
+    # For Compatability 
+    @output = @inout
+    @input  = @inout
+    @interactive = true # Or at least so we think initially
+  end
+  
+  # Closes both input and output
+  def close
+    if @inout && @inout.connected?
+      @inout.write(QUIT + 'bye')
+      @inout.close 
+    end
+  end
+  
+  # Called when a dangerous action is about to be done to make sure
+  # it's okay. `prompt' is printed; user response is returned.
+  # FIXME: make common routine for this and user.rb
+  def confirm(prompt, default)
+    while true
+      begin
+        write_confirm(prompt, default)
+        reply = readline(nil).strip.downcase
+      rescue EOFError
+        return default
+      end
+      if YES.member?(reply)
+        return true
+      elsif NO.member?(reply)
+        return false
+      else
+        msg "Please answer 'yes' or 'no'. Try again."
+      end
+    end
+    return default
+  end
+  
+  # Return true if we are connected
+  def connected?
+    :connected == @inout.state
+  end
+    
+  # print exit annotation
+  def finalize(last_wishes=QUIT)
+    @inout.writeline(last_wishes) if connected?
+    close
+  end
+  
+  def input_eof?
+    false
+  end
+
+  # used to write to a debugger that is connected to this
+  # server; `str' written will have a newline added to it
+  def msg(msg)
+    @inout.writeline(PRINT + msg)
+  end
+
+  # used to write to a debugger that is connected to this
+  # server; `str' written will not have a newline added to it
+  def msg_nocr(msg)
+    @inout.write(PRINT +  msg)
+  end
+  
+  def read_command(prompt)
+    readline(prompt)
+  end
+  
+  def read_data
+    @inout.read_dat
+  end
+  
+  def readline(prompt, add_to_history=true)
+    if prompt
+      write_prompt(prompt)
+    end
+    coded_line = @inout.read_msg()
+    @read_ctrl = coded_line[0..0]
+    coded_line[1..-1]
+  end
+  
+  # Return connected
+  def state
+    @inout.state
+  end
+  
+  def write_prompt(prompt)
+    @inout.write(PROMPT + prompt)
+  end
+  
+  def write_confirm(prompt, default)
+    if default
+      code = CONFIRM_TRUE
+    else
+      code = CONFIRM_FALSE
+    end
+    @inout.write(code + prompt)
+  end
+end
+    
+# Demo
+if __FILE__ == $0
+  intf = Trepan::ServerInterface.new(nil, nil, :open => false)
+end

data/interface/server.rbc

@@ -0,0 +1,2213 @@
+!RBIX
+0
+x
+M
+1
+n
+n
+x
+10
+__script__
+i
+171
+5
+7
+0
+64
+47
+49
+1
+1
+15
+5
+7
+2
+64
+47
+49
+1
+1
+15
+5
+7
+3
+64
+47
+49
+4
+1
+15
+5
+7
+5
+64
+47
+49
+4
+1
+15
+5
+7
+6
+64
+47
+49
+4
+1
+15
+5
+7
+7
+64
+47
+49
+4
+1
+15
+99
+7
+8
+45
+9
+10
+43
+11
+45
+9
+12
+49
+13
+3
+13
+99
+12
+7
+14
+12
+7
+15
+12
+65
+12
+49
+16
+4
+15
+49
+14
+0
+15
+65
+49
+17
+0
+99
+43
+18
+7
+19
+49
+20
+1
+83
+21
+9
+167
+45
+9
+22
+43
+8
+13
+71
+23
+47
+9
+143
+47
+49
+24
+0
+13
+1
+1
+44
+43
+25
+79
+49
+26
+1
+13
+7
+27
+3
+49
+28
+2
+15
+47
+49
+29
+3
+15
+8
+163
+1
+1
+44
+43
+25
+79
+49
+26
+1
+13
+7
+27
+3
+49
+28
+2
+15
+49
+23
+3
+19
+0
+8
+168
+1
+15
+2
+11
+I
+9
+I
+1
+I
+0
+I
+0
+n
+p
+30
+s
+8
+rubygems
+x
+7
+require
+s
+16
+require_relative
+s
+9
+base_intf
+x
+16
+require_relative
+s
+8
+comcodes
+s
+11
+../io/input
+s
+15
+../io/tcpserver
+x
+15
+ServerInterface
+x
+6
+Trepan
+n
+x
+9
+Interface
+n
+x
+16
+open_class_under
+x
+14
+__class_init__
+M
+1
+n
+n
+x
+15
+ServerInterface
+i
+265
+5
+66
+5
+45
+0
+1
+43
+2
+47
+49
+3
+1
+15
+26
+93
+0
+15
+29
+28
+0
+7
+4
+98
+5
+1
+30
+8
+34
+25
+92
+0
+27
+8
+39
+15
+7
+6
+8
+40
+1
+9
+45
+1
+8
+68
+65
+7
+4
+44
+43
+7
+79
+49
+8
+1
+13
+7
+9
+7
+10
+64
+49
+11
+2
+15
+49
+12
+2
+15
+99
+7
+13
+7
+14
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+17
+7
+18
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+19
+7
+20
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+21
+7
+22
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+23
+7
+24
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+25
+7
+26
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+27
+7
+28
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+29
+7
+30
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+31
+7
+32
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+33
+7
+34
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+35
+7
+36
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+37
+7
+38
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+39
+7
+40
+65
+67
+49
+15
+0
+49
+16
+4
+15
+99
+7
+41
+7
+42
+65
+67
+49
+15
+0
+49
+16
+4
+11
+I
+7
+I
+0
+I
+0
+I
+0
+n
+p
+43
+x
+10
+Trepanning
+n
+x
+19
+RemoteCommunication
+x
+7
+include
+x
+28
+DEFAULT_INIT_CONNECTION_OPTS
+x
+16
+vm_const_defined
+s
+8
+constant
+x
+4
+Hash
+x
+16
+new_from_literal
+x
+2
+io
+s
+3
+TCP
+x
+3
+[]=
+x
+9
+const_set
+x
+10
+initialize
+M
+1
+n
+n
+x
+10
+initialize
+i
+114
+23
+0
+10
+8
+1
+19
+0
+15
+23
+1
+10
+16
+1
+19
+1
+15
+23
+2
+10
+30
+44
+43
+0
+78
+49
+1
+1
+19
+2
+15
+45
+2
+3
+20
+2
+49
+4
+1
+38
+5
+15
+5
+56
+6
+47
+50
+7
+0
+15
+20
+0
+9
+57
+20
+0
+8
+97
+39
+5
+7
+8
+49
+9
+1
+19
+3
+15
+45
+10
+11
+43
+12
+13
+71
+13
+47
+9
+92
+47
+49
+14
+0
+13
+39
+5
+47
+49
+15
+1
+15
+8
+97
+39
+5
+49
+13
+1
+38
+16
+15
+39
+16
+38
+17
+15
+39
+16
+38
+18
+15
+2
+38
+19
+11
+I
+7
+I
+4
+I
+0
+I
+3
+n
+p
+20
+x
+4
+Hash
+x
+16
+new_from_literal
+x
+28
+DEFAULT_INIT_CONNECTION_OPTS
+n
+x
+5
+merge
+x
+16
+@connection_opts
+M
+1
+p
+2
+x
+9
+for_block
+t
+n
+x
+10
+initialize
+i
+4
+5
+48
+0
+11
+I
+2
+I
+0
+I
+0
+I
+0
+I
+-2
+p
+1
+x
+8
+finalize
+p
+3
+I
+0
+I
+1c
+I
+4
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+0
+x
+7
+at_exit
+x
+2
+io
+x
+2
+[]
+x
+6
+Trepan
+n
+x
+12
+TCPDbgServer
+x
+3
+new
+x
+8
+allocate
+x
+10
+initialize
+x
+6
+@inout
+x
+7
+@output
+x
+6
+@input
+x
+12
+@interactive
+p
+23
+I
+-1
+I
+18
+I
+1e
+I
+1a
+I
+29
+I
+1c
+I
+31
+I
+1e
+I
+35
+I
+1f
+I
+39
+I
+21
+I
+43
+I
+26
+I
+61
+I
+1d
+I
+64
+I
+2a
+I
+69
+I
+2b
+I
+6e
+I
+2c
+I
+72
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+4
+x
+5
+inout
+x
+3
+out
+x
+15
+connection_opts
+x
+11
+server_type
+x
+17
+method_visibility
+x
+15
+add_defn_method
+x
+5
+close
+M
+1
+n
+n
+x
+5
+close
+i
+36
+39
+0
+13
+9
+11
+15
+39
+0
+49
+1
+0
+9
+34
+39
+0
+45
+2
+3
+7
+4
+64
+81
+5
+49
+6
+1
+15
+39
+0
+49
+7
+0
+8
+35
+1
+11
+I
+3
+I
+0
+I
+0
+I
+0
+n
+p
+8
+x
+6
+@inout
+x
+10
+connected?
+x
+4
+QUIT
+n
+s
+3
+bye
+x
+1
++
+x
+5
+write
+x
+5
+close
+p
+11
+I
+-1
+I
+30
+I
+0
+I
+31
+I
+d
+I
+32
+I
+1b
+I
+33
+I
+22
+I
+31
+I
+24
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+0
+x
+7
+confirm
+M
+1
+n
+n
+x
+7
+confirm
+i
+119
+2
+9
+113
+26
+93
+0
+15
+29
+37
+0
+5
+20
+0
+20
+1
+47
+49
+0
+2
+15
+5
+1
+47
+49
+1
+1
+49
+2
+0
+49
+3
+0
+19
+2
+30
+8
+69
+26
+93
+1
+15
+24
+13
+45
+4
+5
+12
+49
+6
+1
+10
+54
+8
+64
+15
+20
+1
+92
+0
+27
+11
+25
+8
+69
+15
+92
+1
+27
+34
+92
+0
+27
+15
+45
+7
+8
+20
+2
+49
+9
+1
+9
+87
+2
+11
+8
+109
+45
+10
+11
+20
+2
+49
+9
+1
+9
+101
+3
+11
+8
+109
+5
+7
+12
+64
+47
+49
+13
+1
+15
+68
+8
+0
+1
+15
+20
+1
+11
+11
+I
+8
+I
+3
+I
+2
+I
+2
+n
+p
+14
+x
+13
+write_confirm
+x
+8
+readline
+x
+5
+strip
+x
+8
+downcase
+x
+8
+EOFError
+n
+x
+3
+===
+x
+3
+YES
+n
+x
+7
+member?
+x
+2
+NO
+n
+s
+39
+Please answer 'yes' or 'no'. Try again.
+x
+3
+msg
+p
+25
+I
+-1
+I
+3a
+I
+0
+I
+3b
+I
+3
+I
+3d
+I
+14
+I
+3e
+I
+2a
+I
+3f
+I
+37
+I
+40
+I
+49
+I
+42
+I
+53
+I
+43
+I
+57
+I
+44
+I
+61
+I
+45
+I
+65
+I
+47
+I
+73
+I
+4a
+I
+77
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+3
+x
+6
+prompt
+x
+7
+default
+x
+5
+reply
+x
+10
+connected?
+M
+1
+n
+n
+x
+10
+connected?
+i
+10
+7
+0
+39
+1
+49
+2
+0
+83
+3
+11
+I
+2
+I
+0
+I
+0
+I
+0
+n
+p
+4
+x
+9
+connected
+x
+6
+@inout
+x
+5
+state
+x
+2
+==
+p
+5
+I
+-1
+I
+4e
+I
+0
+I
+4f
+I
+a
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+0
+x
+8
+finalize
+M
+1
+n
+n
+x
+8
+finalize
+i
+32
+23
+0
+10
+10
+45
+0
+1
+19
+0
+15
+5
+47
+49
+2
+0
+9
+26
+39
+3
+20
+0
+49
+4
+1
+8
+27
+1
+15
+5
+48
+5
+11
+I
+3
+I
+1
+I
+0
+I
+1
+n
+p
+6
+x
+4
+QUIT
+n
+x
+10
+connected?
+x
+6
+@inout
+x
+9
+writeline
+x
+5
+close
+p
+7
+I
+-1
+I
+53
+I
+a
+I
+54
+I
+1c
+I
+55
+I
+20
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+1
+x
+11
+last_wishes
+x
+10
+input_eof?
+M
+1
+n
+n
+x
+10
+input_eof?
+i
+2
+3
+11
+I
+1
+I
+0
+I
+0
+I
+0
+n
+p
+0
+p
+5
+I
+-1
+I
+58
+I
+0
+I
+59
+I
+2
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+0
+x
+3
+msg
+M
+1
+n
+n
+x
+3
+msg
+i
+13
+39
+0
+45
+1
+2
+20
+0
+81
+3
+49
+4
+1
+11
+I
+4
+I
+1
+I
+1
+I
+1
+n
+p
+5
+x
+6
+@inout
+x
+5
+PRINT
+n
+x
+1
++
+x
+9
+writeline
+p
+5
+I
+-1
+I
+5e
+I
+0
+I
+5f
+I
+d
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+1
+x
+3
+msg
+x
+8
+msg_nocr
+M
+1
+n
+n
+x
+8
+msg_nocr
+i
+13
+39
+0
+45
+1
+2
+20
+0
+81
+3
+49
+4
+1
+11
+I
+4
+I
+1
+I
+1
+I
+1
+n
+p
+5
+x
+6
+@inout
+x
+5
+PRINT
+n
+x
+1
++
+x
+5
+write
+p
+5
+I
+-1
+I
+64
+I
+0
+I
+65
+I
+d
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+1
+x
+3
+msg
+x
+12
+read_command
+M
+1
+n
+n
+x
+12
+read_command
+i
+8
+5
+20
+0
+47
+49
+0
+1
+11
+I
+3
+I
+1
+I
+1
+I
+1
+n
+p
+1
+x
+8
+readline
+p
+5
+I
+-1
+I
+68
+I
+0
+I
+69
+I
+8
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+1
+x
+6
+prompt
+x
+9
+read_data
+M
+1
+n
+n
+x
+9
+read_data
+i
+6
+39
+0
+49
+1
+0
+11
+I
+1
+I
+0
+I
+0
+I
+0
+n
+p
+2
+x
+6
+@inout
+x
+8
+read_dat
+p
+5
+I
+-1
+I
+6c
+I
+0
+I
+6d
+I
+6
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+0
+x
+8
+readline
+M
+1
+n
+n
+x
+8
+readline
+i
+61
+23
+1
+10
+8
+2
+19
+1
+15
+20
+0
+9
+21
+5
+20
+0
+47
+49
+0
+1
+8
+22
+1
+15
+39
+1
+49
+2
+0
+19
+2
+15
+20
+2
+44
+43
+3
+78
+78
+49
+4
+2
+49
+5
+1
+38
+6
+15
+20
+2
+44
+43
+3
+79
+77
+49
+4
+2
+49
+5
+1
+11
+I
+7
+I
+3
+I
+1
+I
+2
+n
+p
+7
+x
+12
+write_prompt
+x
+6
+@inout
+x
+8
+read_msg
+x
+5
+Range
+x
+3
+new
+x
+2
+[]
+x
+10
+@read_ctrl
+p
+15
+I
+-1
+I
+70
+I
+8
+I
+71
+I
+c
+I
+72
+I
+15
+I
+71
+I
+17
+I
+74
+I
+1f
+I
+75
+I
+2f
+I
+76
+I
+3d
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+3
+x
+6
+prompt
+x
+14
+add_to_history
+x
+10
+coded_line
+x
+5
+state
+M
+1
+n
+n
+x
+5
+state
+i
+6
+39
+0
+49
+1
+0
+11
+I
+1
+I
+0
+I
+0
+I
+0
+n
+p
+2
+x
+6
+@inout
+x
+5
+state
+p
+5
+I
+-1
+I
+7a
+I
+0
+I
+7b
+I
+6
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+0
+x
+12
+write_prompt
+M
+1
+n
+n
+x
+12
+write_prompt
+i
+13
+39
+0
+45
+1
+2
+20
+0
+81
+3
+49
+4
+1
+11
+I
+4
+I
+1
+I
+1
+I
+1
+n
+p
+5
+x
+6
+@inout
+x
+6
+PROMPT
+n
+x
+1
++
+x
+5
+write
+p
+5
+I
+-1
+I
+7e
+I
+0
+I
+7f
+I
+d
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+1
+x
+6
+prompt
+x
+13
+write_confirm
+M
+1
+n
+n
+x
+13
+write_confirm
+i
+29
+20
+1
+9
+11
+45
+0
+1
+19
+2
+8
+16
+45
+2
+3
+19
+2
+15
+39
+4
+20
+2
+20
+0
+81
+5
+49
+6
+1
+11
+I
+6
+I
+3
+I
+2
+I
+2
+n
+p
+7
+x
+12
+CONFIRM_TRUE
+n
+x
+13
+CONFIRM_FALSE
+n
+x
+6
+@inout
+x
+1
++
+x
+5
+write
+p
+11
+I
+-1
+I
+82
+I
+0
+I
+83
+I
+4
+I
+84
+I
+b
+I
+86
+I
+11
+I
+88
+I
+1d
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+3
+x
+6
+prompt
+x
+7
+default
+x
+4
+code
+p
+39
+I
+2
+I
+12
+I
+d
+I
+16
+I
+2d
+I
+14
+I
+30
+I
+16
+I
+38
+I
+15
+I
+45
+I
+18
+I
+53
+I
+30
+I
+61
+I
+3a
+I
+6f
+I
+4e
+I
+7d
+I
+53
+I
+8b
+I
+58
+I
+99
+I
+5e
+I
+a7
+I
+64
+I
+b5
+I
+68
+I
+c3
+I
+6c
+I
+d1
+I
+70
+I
+df
+I
+7a
+I
+ed
+I
+7e
+I
+fb
+I
+82
+I
+109
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+0
+x
+13
+attach_method
+x
+11
+active_path
+x
+7
+Globals
+x
+2
+$0
+x
+2
+[]
+x
+2
+==
+n
+x
+3
+new
+x
+8
+allocate
+x
+4
+Hash
+x
+16
+new_from_literal
+x
+4
+open
+x
+3
+[]=
+x
+10
+initialize
+p
+19
+I
+0
+I
+5
+I
+12
+I
+6
+I
+1b
+I
+7
+I
+24
+I
+8
+I
+2d
+I
+9
+I
+36
+I
+10
+I
+57
+I
+8d
+I
+67
+I
+8e
+I
+a7
+I
+8d
+I
+ab
+x
+59
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/server.rb
+p
+1
+x
+4
+intf