rbx-trepanning 0.0.1-universal-rubinius

data/bin/trepanx

@@ -0,0 +1,63 @@
+#!/usr/bin/env ruby
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+# Invoke debugger from the command line. 
+require 'rubygems'; require 'require_relative'
+require_relative '../app/run'
+require_relative '../app/options'
+require_relative '../lib/trepanning'
+
+# FIXME: the figure out how to run via gem installation.
+if File.basename(__FILE__) == File.basename($0)
+  include Trepanning
+
+  # One way to get local variables is to create a block which is run
+  # once.  
+  # 
+  # Note however that since there are constants below, we can't
+  # wrap all of this in a procedure as that would be defining
+  # constants dynamically.
+  1.times do 
+    trepan_path = program_to_debug = nil
+
+    # options = DEFAULT_CMDLINE_SETTINGS.merge({}) seems to change up
+    # DEFAULT_CMDLINE_SETTINGS when options[:key] is changed. The
+    # below is the simplest thing I can come up with so far.
+    options = copy_default_options
+    opts    = setup_options(options)
+    Trepan::ARGV = ARGV.clone
+    rest = opts.parse! ARGV
+
+    trepan_path = File.expand_path($0)
+    if RUBY_PLATFORM =~ /mswin/
+      trepan_path += '.cmd' unless trepan_path =~ /\.cmd$/i
+    end
+
+    # FIXME: do we need to test defined? 
+    # FIXME: Should (some of) these be instance variables?
+    Trepan::RUBY_PATH    = ruby_path
+    Trepan::TREPAN_PATH  = trepan_path
+    Trepan::RBDBGR_FILE  = __FILE__
+
+    if ARGV.empty?
+      if options[:version] || options[:help]
+        exit 100
+      else
+        STDERR.puts 'Sorry - for now you must specify a Ruby script to debug.'
+        exit(1)
+      end
+    end
+
+    program_to_debug = ARGV.shift
+    program_to_debug = whence_file(program_to_debug) unless 
+      File.exist?(program_to_debug)
+    Trepan::PROG_SCRIPT = program_to_debug
+
+    # Set global so others may use this debugger.
+    $trepan = Trepan.new(:cmdfiles    => options[:cmdfiles],
+                         :initial_dir => options[:chdir],
+                         :nx          => options[:nx]
+                         )
+    debug_program($trepan, Trepan::RUBY_PATH, 
+                  File.expand_path(program_to_debug))
+  end
+end