trepanning 0.0.4

data/processor/command/set_subcmd/substitute_subcmd/path.rb

@@ -0,0 +1,55 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../../base/subsubcmd'
+require_relative '../substitute'
+
+class Trepan::SubSubcommand::SetSubstitutePath < Trepan::SubSubcommand
+  unless defined?(HELP)
+    HELP         = 
+'Add a substitution rule replacing FROM into TO in source file names.
+If a substitution rule was previously set for FROM, the old rule
+is replaced by the new one.'
+    MIN_ABBREV   = 'fi'.size  
+    MAX_ARGS     = 2
+    NAME         = File.basename(__FILE__, '.rb')
+    SHORT_HELP   = 'Use PATH in place of an filename'
+    PREFIX       = %w(set substitute path)
+  end
+
+  def run(args)
+    if args.size != 3
+      errmsg "This command needs 2 arguments, got #{args.size-1}."
+      return
+    end
+    from_path = args[1]
+    to_path   = args[2]
+    # FIXME Check from_path name to see if it is loaded
+    if File.exist?(to_path)
+      LineCache::remap_file(from_path, to_path)
+    else
+      errmsg "File #{to_path} doesn't exist"
+    end
+  end
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+  require_relative '../../../subcmd'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, set_cmd = MockDebugger::setup('set')
+  testcmdMgr = Trepan::Subcmd.new(set_cmd)
+  cmd_name   = Trepan::SubSubcommand::SetSubstitutePath::PREFIX.join('')
+  setx_cmd   = Trepan::SubSubcommand::SetSubstitutePath.new(set_cmd.proc, 
+                                                            set_cmd,
+                                                            cmd_name)
+  # require_relative '../../../../lib/trepanning'
+  # dbgr = Trepan.new(:set_restart => true)
+  # dbgr.debugger
+  setx_cmd.run([])
+
+  # name = File.basename(__FILE__, '.rb')
+  # subcommand.summary_help(name)
+end

data/processor/command/set_subcmd/substitute_subcmd/string.rb

@@ -0,0 +1,72 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require 'tempfile'
+require 'linecache'
+require_relative '../../base/subsubcmd'
+require_relative '../substitute'
+
+class Trepan::SubSubcommand::SetSubstituteString < Trepan::SubSubcommand
+  unless defined?(HELP)
+    HELP         = 
+'set substitute string FROM-FILE STRING-VAR
+
+Use the contents of string variable STRING-VAR as the source text for
+FROM-FILE.  If a substitution rule was previously set for FROM-FILE,
+the old rule is replaced by the new one.
+
+If "." is given for FROM_FILE, the current instruction sequence name is used.'
+    MIN_ABBREV   = 'st'.size  
+    MAX_ARGS     = 2
+    NAME         = File.basename(__FILE__, '.rb')
+    SHORT_HELP   = 'Use STRING in place of an filename'
+    PREFIX       = %w(set substitute string)
+  end
+
+  def run(args)
+    if args.size != 3
+      errmsg "This command needs 2 arguments, got #{args.size-1}."
+      return
+    end
+    from_path = 
+      if '.' == args[1]
+        @proc.frame.iseq.source_container[1]
+      else
+        from_path = args[1]
+      end
+    
+    to_str = args[2]
+    val = @proc.debug_eval_no_errmsg(to_str)
+
+    if val
+      tempfile = Tempfile.new(["#{from_path}-#{to_str}-", '.rb'])
+      tempfile.open.puts(val)
+      @proc.remap_container[['string', from_path]] = ['file', tempfile.path]
+      tempfile.close
+      LineCache::cache(tempfile.path)
+    else
+      errmsg "Can't get value for #{to_str}"
+    end
+  end
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '/../../../mock'
+  require_relative '../../../subcmd'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, set_cmd = MockDebugger::setup('set')
+  testcmdMgr = Trepan::Subcmd.new(set_cmd)
+  cmd_name   = Trepan::SubSubcommand::SetSubstituteString::PREFIX.join('')
+  setx_cmd   = Trepan::SubSubcommand::SetSubstituteString.new(set_cmd.proc, 
+                                                              set_cmd,
+                                                              cmd_name)
+  # require_relative '../../../../lib/trepanning'
+  # dbgr = Trepan.new(:set_restart => true)
+  # dbgr.debugger
+  setx_cmd.run([])
+
+  # name = File.basename(__FILE__, '.rb')
+  # subcommand.summary_help(name)
+end

data/processor/command/set_subcmd/timer.rb

@@ -0,0 +1,68 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../base/subsubcmd'
+
+class Trepan::Subcommand::SetTimer < Trepan::SetBoolSubcommand
+  unless defined?(HELP)
+    HELP = "set timer [on|off|0|1]
+
+Tracks and shows elapsed time between debugger events.
+
+Since debugger overhead can be large depending on what you are doing,
+there are many ways to customize the debugger to take less time (and
+do less).
+
+Stepping is slow, running to a breakpoint without stepping is
+relatively fast compared to previous versions of the debugger and
+compared to stepping. 
+
+Stopping at fewer events can also speed things up. Trace event
+buffering slows things down.
+
+Buy turning this setting on, you may be able to get a feel for what
+how expensive the various settings.
+
+See also: 'set events', 'set trace buffer', 'step', and 'break'.
+"
+
+    MIN_ABBREV = 'ti'.size
+    NAME       = File.basename(__FILE__, '.rb')
+    PREFIX     = %w(set timer)
+    SHORT_HELP = "Set to show elapsed time between debugger events"
+  end
+
+  def run(args)
+    super
+    if @proc.settings[:timer]
+      @proc.cmdloop_posthooks.insert_if_new(-1, 'timer', @proc.timer_hook[1])
+      @proc.cmdloop_prehooks.insert_if_new(-1, 'timer', @proc.timer_hook[1])
+    else
+      @proc.cmdloop_posthooks.delete_by_name('timer')
+      @proc.cmdloop_prehooks.delete_by_name('timer')
+    end
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../mock'
+  require_relative '../../subcmd'
+  require_relative '../../hook'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, set_cmd = MockDebugger::setup('set')
+  subcommand    = Trepan::Subcommand::SetTimer.new(set_cmd)
+  testcmdMgr = Trepan::Subcmd.new(subcommand)
+
+  subcommand.run_show_bool
+  subcommand.summary_help(name)
+
+  # require 'trepanning'
+  # Trepan.debug(:set_restart => true)
+  subcommand.run(['set', name])
+  subcommand.run(['set', name, 'off'])
+  subcommand.run(['set', name, 'on'])
+
+end

data/processor/command/set_subcmd/trace.rb

@@ -0,0 +1,43 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../base/subsubcmd'
+require_relative '../base/subsubmgr'
+
+class Trepan::SubSubcommand::SetTrace < Trepan::SubSubcommandMgr 
+  unless defined?(HELP)
+    HELP = "Set tracing of various sorts.
+
+The types of tracing include global variables, events from the trace
+buffer, or printing those events.
+
+See 'help set trace *' or a list of subcommands or 'help set trace
+<name>' for help on a particular trace subcommand."
+
+    IN_LIST    = true
+    MIN_ABBREV = 'tr'.size
+    NAME       = File.basename(__FILE__, '.rb')
+    PREFIX     = %w(set trace)
+    SHORT_HELP = 'Set tracing of various sorts.'
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../mock'
+  require_relative '../../subcmd'
+  require_relative '../../hook'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, set_cmd = MockDebugger::setup('set')
+  command = Trepan::SubSubcommand::SetTrace.new(dbgr.core.processor,
+                                                  set_cmd)
+  name = File.basename(__FILE__, '.rb')
+  cmd_args = ['set', name]
+  set_cmd.instance_variable_set('@last_args', cmd_args)
+  # require_relative '../../../lib/trepanning'
+  # Trepan.debug(:set_restart => true)
+  command.run(cmd_args)
+  command.run(['set', name, '*'])
+end

data/processor/command/set_subcmd/trace_subcmd/buffer.rb

@@ -0,0 +1,56 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../../base/subsubcmd'
+require_relative '../trace'
+class Trepan::SubSubcommand::SetTraceBuffer < Trepan::SetBoolSubSubcommand
+  unless defined?(HELP)
+    HELP         = 
+"set trace buffer [on|off|1|0]
+
+Set saving trace events in a buffer
+"
+    MIN_ABBREV   = 'b'.size  
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(set trace buffer)
+    SHORT_HELP   = 'Set saving trace events in a buffer'
+  end
+
+  def run(args)
+    super
+    if settings[:tracebuffer]
+      # @proc.start_capture
+      @proc.unconditional_prehooks.insert_if_new(-1, *@proc.tracebuf_hook)
+    else
+      @proc.unconditional_prehooks.delete_by_name('tracebuffer')
+      # @proc.stop_capture
+    end
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+  require_relative '../../../subcmd'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, set_cmd = MockDebugger::setup('set')
+  trace_cmd     = Trepan::SubSubcommand::SetTrace.new(dbgr.core.processor, 
+                                                      set_cmd)
+
+  # FIXME: remove the 'join' below
+  cmd_name      = Trepan::SubSubcommand::SetTraceBuffer::PREFIX.join('')
+  subcmd        = Trepan::SubSubcommand::SetTraceBuffer.new(set_cmd.proc, 
+                                                            trace_cmd,
+                                                            cmd_name)
+  # require_relative '../../../../lib/trepanning'
+  # dbgr = Trepan.new(:set_restart => true)
+  # dbgr.debugger
+
+  subcmd.run([cmd_name])
+  %w(off on 1 0).each { |arg| subcmd.run([cmd_name, arg]) }
+  puts subcmd.save_command()
+
+end
+

data/processor/command/set_subcmd/trace_subcmd/print.rb

@@ -0,0 +1,54 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../../base/subsubcmd'
+require_relative '../trace'
+class Trepan::SubSubcommand::SetTracePrint < Trepan::SetBoolSubSubcommand
+  unless defined?(HELP)
+    HELP         = 
+"set trace print [on|off|1|0]
+
+Set printing trace events."
+
+    MIN_ABBREV   = 'p'.size  
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(set trace print)
+    SHORT_HELP   = 'Set print trace events'
+  end
+
+  def run(args)
+    super
+    if settings[:traceprint]
+      @proc.unconditional_prehooks.insert_if_new(-1, *@proc.trace_hook)
+    else
+      @proc.unconditional_prehooks.delete_by_name('trace')
+    end
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+  require_relative '../../../subcmd'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, set_cmd = MockTrepan::setup('set')
+  trace_cmd     = Trepan::SubSubcommand::SetTrace.new(dbgr.core.processor, 
+                                                        set_cmd)
+
+  # FIXME: remove the 'join' below
+  cmd_name      = Trepan::SubSubcommand::SetTracePrint::PREFIX.join('')
+  subcmd        = Trepan::SubSubcommand::SetTracePrint.new(set_cmd.proc, 
+                                                           trace_cmd,
+                                                           cmd_name)
+  # require_relative '../../../../lib/trepanning'
+  # dbgr = Trepan.new(:set_restart => true)
+  # dbgr.debugger
+
+  subcmd.run([cmd_name])
+  %w(off on 1 0).each { |arg| subcmd.run([cmd_name, arg]) }
+  puts subcmd.save_command()
+
+end
+

data/processor/command/set_subcmd/trace_subcmd/var.rb

@@ -0,0 +1,61 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../../base/subsubcmd'
+require_relative '../trace'
+class Trepan::SubSubcommand::SetTraceVar < Trepan::SubSubcommand
+  unless defined?(HELP)
+    HELP         = 
+"set trace var GLOBAL_VARIABLE
+
+The debugger calls 'trace_var' to trace changes to the value of
+GLOBAL_VARIABLE.  Note in contrast to other events, stopping for
+variable tracing occurs *after* the event, not before.
+
+See also 'set events'."
+
+    MIN_ABBREV   = 'v'.size  
+    NAME         = File.basename(__FILE__, '.rb')
+    SHORT_HELP   = "Set to display trace a global variable."
+    PREFIX       = %w(set trace var)
+  end
+
+  def run(args)
+    if args.size == 2
+      traced_var = args[1]
+      unless traced_var[0] == '$'
+        errmsg "Expecting a global variable to trace, got: #{traced_var}"
+        return
+      end
+      trace_var(traced_var, @proc.core.method(:trace_var_processor))
+      msg("Tracing variable #{traced_var}.")
+      return
+    else
+      errmsg "Expecting two arguments, got #{args.size}"
+    end
+  end
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+  require_relative '../../../subcmd'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, set_cmd = MockDebugger::setup('set')
+  set_cmd.proc.send('frame_initialize')
+  testcmdMgr = Trepan::Subcmd.new(set_cmd)
+  cmd_name   = Trepan::SubSubcommand::SetTraceVar::PREFIX.join('')
+  setx_cmd   = Trepan::SubSubcommand::SetTraceVar.new(set_cmd.proc, 
+                                                      set_cmd,
+                                                      cmd_name)
+  setx_cmd.run([])
+  # require_relative '../../../../lib/bdbgr'
+  # dbgr = Trepan.new(:set_restart => true)
+  # dbgr.debugger
+  eval('set_cmd.proc.frame_setup(RubyVM::ThreadFrame::current); setx_cmd.run([])')
+
+  # name = File.basename(__FILE__, '.rb')
+  # subcommand.summary_help(name)
+end
+

data/processor/command/show.rb

@@ -0,0 +1,27 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative 'base/submgr'
+
+class Trepan::Command::ShowCommand < Trepan::SubcommandMgr
+  unless defined?(HELP)
+    HELP =
+'Generic command for showing things about the debugger.  You can
+give unique prefix of the name of a subcommand to get information
+about just that subcommand.
+
+Type "show" for a list of "show" subcommands and what they do.
+Type "help show *" for just a list of "show" subcommands.'
+
+    CATEGORY      = 'status'
+    NAME          = File.basename(__FILE__, '.rb')
+    NEED_STACK    = false
+    SHORT_HELP    = 'Show parts of the debugger environment'
+  end
+end
+
+if __FILE__ == $0
+  require_relative '../mock'
+  name = File.basename(__FILE__, '.rb')
+  dbgr, cmd = MockDebugger::setup(name)
+  cmd.run([name])
+end

data/processor/command/show_subcmd/alias.rb

@@ -0,0 +1,50 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../base/subcmd'
+
+class Trepan::Subcommand::ShowAlias < Trepan::Subcommand
+  unless defined?(HELP)
+    HELP = "show alias [NAME1 NAME2 ...] 
+
+If aliases names are given, show their definition. If left blank, show
+all alias names"
+
+    MIN_ABBREV = 'al'.size
+    NAME       = File.basename(__FILE__, '.rb')
+    PREFIX     = %w(show alias)
+    SHORT_HELP = "Show defined aliases"
+  end
+
+  def run(args)
+    if args.size > 2
+      args[2..-1].each do |alias_name|
+        if @proc.aliases.member?(alias_name)
+          msg "%s: %s" % [alias_name, @proc.aliases[alias_name]]
+        else
+          msg "%s is not a defined alias" % alias_name
+        end
+      end
+    elsif @proc.aliases.empty?
+      msg "No aliases defined."
+    else
+      msg "List of aliases names currently defined:"
+      msg columnize_commands(@proc.aliases.keys.sort)
+    end
+  end
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../mock'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, cmd = MockDebugger::setup('show')
+  subcommand = Trepan::Subcommand::ShowAlias.new(cmd)
+
+  name = File.basename(__FILE__, '.rb')
+  subcommand.summary_help(name)
+  puts 
+  subcommand.run(%w(show alias))
+  subcommand.run(%w(show alias u foo))
+end

data/processor/command/show_subcmd/args.rb

@@ -0,0 +1,50 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../base/subcmd'
+
+class Trepan::Subcommand::ShowArgs < Trepan::Subcommand
+  unless defined?(HELP)
+    HELP = 'Show argument list to give program when it is restarted'
+    MIN_ABBREV   = 'ar'.size
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(show args)
+  end
+
+  def run(args)
+    dbgr = @proc.dbgr
+    argv = dbgr.restart_argv
+    msg("Restart directory: #{dbgr.initial_dir}") if dbgr.initial_dir
+    msg("Restart args:\n\t#{argv.inspect}")
+  end
+    
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../mock'
+  require_relative '../../subcmd'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, cmd = MockDebugger::setup('show')
+  subcommand = Trepan::Subcommand::ShowArgs.new(cmd)
+  testcmdMgr = Trepan::Subcmd.new(subcommand)
+
+  def subcommand.msg(message)
+    puts message
+  end
+  def subcommand.msg_nocr(message)
+    print message
+  end
+  def subcommand.errmsg(message)
+    puts message
+  end
+  subcommand.run([])
+  name = File.basename(__FILE__, '.rb')
+  subcommand.summary_help(name)
+  puts
+  dbgr.instance_variable_set('@initial_dir', Dir.pwd)
+  dbgr.restart_argv = ARGV
+  subcommand.run([])
+  
+end

data/processor/command/show_subcmd/auto.rb

@@ -0,0 +1,27 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../base/subsubcmd'
+require_relative '../base/subsubmgr'
+
+class Trepan::SubSubcommand::ShowAuto < Trepan::SubSubcommandMgr
+  unless defined?(HELP)
+    HELP   = 'Show settings which some sort of "automatic" default behavior'
+    NAME   = File.basename(__FILE__, '.rb')
+    PREFIX = %w(show auto)
+  end
+end
+
+if __FILE__ == $0
+  require_relative '../../mock'
+  dbgr = MockDebugger::MockDebugger.new
+  cmds = dbgr.core.processor.commands
+  show_cmd = cmds['show']
+  command = Trepan::SubSubcommand::ShowAuto.new(dbgr.core.processor, 
+                                                  show_cmd)
+  name = File.basename(__FILE__, '.rb')
+  cmd_args = ['show', name]
+  show_cmd.instance_variable_set('@last_args', cmd_args)
+  # require_relative '../../../lib/trepanning'
+  # Trepan.debug(:set_restart => true)
+  command.run(cmd_args)
+end

data/processor/command/show_subcmd/auto_subcmd/eval.rb

@@ -0,0 +1,38 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../../base/subsubcmd'
+
+class Trepan::SubSubcommand::ShowAutoEval < Trepan::ShowBoolSubSubcommand
+  unless defined?(HELP)
+    HELP = "set auto eval [ON|OFF]
+
+Set this on if you want things that don't look like debugger command to be eval'd
+as a string."
+
+    MIN_ABBREV   = 'ev'.size
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(show auto eval)
+    SHORT_HELP = "Show evaluation of unrecognized debugger commands"
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+
+  # FIXME: DRY the below code
+  dbgr, show_cmd = MockDebugger::setup('show')
+  testcmdMgr     = Trepan::Subcmd.new(show_cmd)
+  auto_cmd       = Trepan::SubSubcommand::ShowAuto.new(dbgr.core.processor, 
+                                                       show_cmd)
+  # FIXME: remove the 'join' below
+  cmd_name       = Trepan::SubSubcommand::ShowAutoEval::PREFIX.join('')
+  autox_cmd      = Trepan::SubSubcommand::ShowAutoEval.new(show_cmd.proc, auto_cmd,
+                                                           cmd_name)
+  # require_relative '../../../../lib/trepanning'
+  # dbgr = Trepan.new(:set_restart => true)
+  # dbgr.debugger
+  autox_cmd.run([])
+
+end

data/processor/command/show_subcmd/auto_subcmd/irb.rb

@@ -0,0 +1,34 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../../base/subsubcmd'
+require_relative '../auto'
+
+class Trepan::SubSubcommand::ShowAutoIrb < Trepan::ShowBoolSubSubcommand
+  unless defined?(HELP)
+    HELP = "Show if IRB is invoked on debugger stops"
+    MIN_ABBREV = 'ir'.size
+    NAME       = File.basename(__FILE__, '.rb')
+    PREFIX     = %w(show auto irb)
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+  require_relative '../../../subcmd'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, show_cmd = MockDebugger::setup('show')
+  testcmdMgr     = Trepan::Subcmd.new(show_cmd)
+  auto_cmd       = Trepan::SubSubcommand::ShowAuto.new(dbgr.core.processor, 
+                                                       show_cmd)
+
+  cmd_name       = Trepan::SubSubcommand::ShowAutoIrb::PREFIX.join('')
+  autox_cmd      = Trepan::SubSubcommand::ShowAutoIrb.new(show_cmd.proc, auto_cmd,
+                                                          cmd_name)
+  autox_cmd.run([])
+  # name = File.basename(__FILE__, '.rb')
+  # autox_cmd.summary_help(name)
+end

data/processor/command/show_subcmd/auto_subcmd/list.rb

@@ -0,0 +1,36 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../../base/subsubcmd'
+
+class Trepan::SubSubcommand::ShowAutoList < Trepan::ShowBoolSubSubcommand
+  unless defined?(HELP)
+    HELP = "Show running a 'list' command each time we enter the debugger"
+    MIN_ABBREV   = 'l'.size
+    NAME         = File.basename(__FILE__, '.rb')
+    PREFIX       = %w(show auto list)
+  end
+
+end
+
+if __FILE__ == $0
+  # Demo it.
+  require_relative '../../../mock'
+  require_relative '../../../subcmd'
+  name = File.basename(__FILE__, '.rb')
+
+  # FIXME: DRY the below code
+  dbgr, show_cmd = MockDebugger::setup('show')
+  testcmdMgr     = Trepan::Subcmd.new(show_cmd)
+  auto_cmd       = Trepan::SubSubcommand::ShowAuto.new(dbgr.core.processor, 
+                                                       show_cmd)
+
+  # FIXME: remove the 'join' below
+  cmd_name       = Trepan::SubSubcommand::ShowAutoList::PREFIX.join('')
+  autox_cmd      = Trepan::SubSubcommand::ShowAutoList.new(show_cmd.proc, auto_cmd,
+                                                           cmd_name)
+  # require_relative '../../../../lib/trepanning'
+  # dbgr = Trepan.new(:set_restart => true)
+  # dbgr.debugger
+  autox_cmd.run([])
+
+end