rbx-trepanning 0.0.5-universal-rubinius-1.2.1

data/interface/comcodes.rb

@@ -0,0 +1,20 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2011 Rocky Bernstein <rockyb@rubyforge.net>
+
+# Communication status codes
+module Trepanning
+  # Most of these go from debugged process to front-end
+  # client interface. COMMAND goes the other way.
+  module RemoteCommunication
+    unless defined?(PRINT)
+      PRINT         = '.'
+      COMMAND       = 'C'
+      CONFIRM_TRUE  = 'Y'
+      CONFIRM_FALSE = 'N'
+      CONFIRM_REPLY = '?'
+      QUIT          = 'q'
+      PROMPT        = 'p'
+      RESTART       = 'r'
+    end
+  end
+end

data/interface/comcodes.rbc

@@ -0,0 +1,385 @@
+!RBIX
+0
+x
+M
+1
+n
+n
+x
+10
+__script__
+i
+28
+99
+7
+0
+65
+49
+1
+2
+13
+99
+12
+7
+2
+12
+7
+3
+12
+65
+12
+49
+4
+4
+15
+49
+2
+0
+15
+2
+11
+I
+6
+I
+0
+I
+0
+I
+0
+n
+p
+5
+x
+10
+Trepanning
+x
+11
+open_module
+x
+15
+__module_init__
+M
+1
+n
+n
+x
+10
+Trepanning
+i
+28
+5
+66
+99
+7
+0
+65
+49
+1
+2
+13
+99
+12
+7
+2
+12
+7
+3
+12
+65
+12
+49
+4
+4
+15
+49
+2
+0
+11
+I
+6
+I
+0
+I
+0
+I
+0
+n
+p
+5
+x
+19
+RemoteCommunication
+x
+11
+open_module
+x
+15
+__module_init__
+M
+1
+n
+n
+x
+19
+RemoteCommunication
+i
+114
+5
+66
+26
+93
+0
+15
+29
+17
+0
+7
+0
+98
+1
+1
+30
+8
+23
+25
+92
+0
+27
+8
+28
+15
+7
+2
+8
+29
+1
+9
+34
+1
+8
+113
+65
+7
+0
+7
+3
+64
+49
+4
+2
+15
+65
+7
+5
+7
+6
+64
+49
+4
+2
+15
+65
+7
+7
+7
+8
+64
+49
+4
+2
+15
+65
+7
+9
+7
+10
+64
+49
+4
+2
+15
+65
+7
+11
+7
+12
+64
+49
+4
+2
+15
+65
+7
+13
+7
+14
+64
+49
+4
+2
+15
+65
+7
+15
+7
+16
+64
+49
+4
+2
+15
+65
+7
+17
+7
+18
+64
+49
+4
+2
+11
+I
+4
+I
+0
+I
+0
+I
+0
+n
+p
+19
+x
+5
+PRINT
+x
+16
+vm_const_defined
+s
+8
+constant
+s
+1
+.
+x
+9
+const_set
+x
+7
+COMMAND
+s
+1
+C
+x
+12
+CONFIRM_TRUE
+s
+1
+Y
+x
+13
+CONFIRM_FALSE
+s
+1
+N
+x
+13
+CONFIRM_REPLY
+s
+1
+?
+x
+4
+QUIT
+s
+1
+q
+x
+6
+PROMPT
+s
+1
+p
+x
+7
+RESTART
+s
+1
+r
+p
+19
+I
+2
+I
+9
+I
+22
+I
+a
+I
+2c
+I
+b
+I
+36
+I
+c
+I
+40
+I
+d
+I
+4a
+I
+e
+I
+54
+I
+f
+I
+5e
+I
+10
+I
+68
+I
+11
+I
+72
+x
+61
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/comcodes.rb
+p
+0
+x
+13
+attach_method
+p
+3
+I
+2
+I
+8
+I
+1c
+x
+61
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/comcodes.rb
+p
+0
+x
+13
+attach_method
+p
+3
+I
+0
+I
+5
+I
+1c
+x
+61
+/home/rocky-rvm/.rvm/src/rbx-trepanning/interface/comcodes.rb
+p
+0

data/interface/script.rb

@@ -0,0 +1,104 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+
+# Module for reading debugger scripts
+
+# Our local modules
+require 'rubygems'; require 'require_relative'
+require_relative 'base_intf'
+require_relative '../io/input'
+require_relative '../io/string_array'
+
+# Interface when reading debugger scripts
+class Trepan::ScriptInterface < Trepan::Interface
+
+  DEFAULT_OPTS = {
+    :abort_on_error => true,
+    :confirm_val    => false,
+    :verbose        => false
+  } unless defined?(DEFAULT_OPTS)
+  
+  def initialize(script_name, out=nil, opts={})
+
+    @opts = DEFAULT_OPTS.merge(opts)
+
+    at_exit { finalize }
+    @script_name     = script_name
+    @input_lineno    = 0
+    @input           = opts[:input] || 
+      Trepan::UserInput.open(script_name, :line_edit => false)
+    @buffer_output   = []
+    unless opts[:verbose] or out
+      out = Trepan::StringArrayOutput.open(@buffer_output)
+    end
+    super(@input, out, @opts)
+  end
+
+  # Closes input only.
+  def close
+    @input.close
+  end
+
+  # Called when a dangerous action is about to be done, to make
+  # sure it's okay.
+  #
+  # Could look also look for interactive input and
+  # use that. For now, though we'll simplify.
+  def confirm(prompt, default)
+    @opts[:default_confirm]
+  end
+
+  # Common routine for reporting debugger error messages.
+  # 
+  def errmsg(msg, prefix="*** ")
+    #  self.verbose shows lines so we don't have to duplicate info
+    #  here. Perhaps there should be a 'terse' mode to never show
+    #  position info.
+    mess = if not @opts[:verbose]
+             location = ("%s:%s: Error in source command file" %
+                         [@script_name, @input_lineno])
+             "%s%s:\n%s%s" % [prefix, location, prefix, msg]
+           else
+             "%s%s" % [prefix, msg]
+           end
+    msg(mess)
+    # FIXME: should we just set a flag and report eof? to be more
+    # consistent with File and IO?
+    raise IOError if @opts[:abort_on_error]
+  end
+
+  def interactive? ; false end
+    
+  # Script interface to read a command. `prompt' is a parameter for 
+  # compatibilty and is ignored.
+  def read_command(prompt='')
+    @input_lineno += 1
+    line = readline
+    if @opts[:verbose]
+      location = "%s line %s" % [@script_name, @input_lineno]
+      msg('+ %s: %s' % [location, line])
+    end
+    # Do something with history?
+    return line
+  end
+
+  # Script interface to read a line. `prompt' is a parameter for 
+  # compatibilty and is ignored.
+  #
+  # Could decide make this look for interactive input?
+  def readline(prompt='')
+    begin 
+      return input.readline().chomp
+    rescue EOFError
+      @eof = true
+      raise EOFError
+    end
+  end
+end
+
+# Demo
+if __FILE__ == $0
+  intf = Trepan::ScriptInterface.new(__FILE__)
+  line = intf.readline()
+  print "Line read: ", line
+end