trepanning 1.93.35 → 2.15.33

data/processor/command/info_subcmd/variables_subcmd/constants.rb

@@ -0,0 +1,77 @@
+# -*- coding: utf-8 -*-
+# Copyright (C) 2010-2011, 2015 Rocky Bernstein <rockyb@rubyforge.net>
+require_relative '../../base/subsubcmd'
+require_relative '../../../../app/util'
+
+class Trepan::Subcommand::InfoVariablesConstants < Trepan::SubSubcommand
+  Trepan::Util.suppress_warnings {
+    Trepanning::Subcommand.set_name_prefix(__FILE__, self)
+    HELP         = <<-EOH
+#{CMD}
+#{CMD}
+
+Show class constants of the current stack frame.
+Normally for each which show both the name and value. If you just
+want a list of names add parameter 'names'.
+EOH
+    SHORT_HELP   = 'Show class constants via the current stack frame'
+    MIN_ABBREV   = 'co'.size
+    MIN_ARGS     = 0
+    MAX_ARGS     = 1
+    NEED_STACK   = true
+  }
+
+    def names
+        # FIXME: do less guess work. Decide based on other properties.
+        values = @proc.debug_eval_no_errmsg('self.class.constants')
+        if values.empty?
+            values = @proc.debug_eval_no_errmsg('self.constants')
+        end
+        return values ? values.sort.map{|c| c.to_s} || [] : []
+    end
+
+    def run_for_constant(args, klass=nil)
+        suffix = klass ? " for #{klass.to_s}" : '' rescue ''
+        if args.size == 2
+            last_arg = args[-1]
+            if names.member?(last_arg)
+                var_class =
+                    @proc.safe_rep(@proc.debug_eval_no_errmsg(last_arg+'.class').inspect)
+                var_value =
+                    @proc.safe_rep(@proc.debug_eval_no_errmsg(last_arg).inspect)
+                msg("#{last_arg} class: %s" % var_class)
+                msg("#{last_arg} value: %s" % var_value)
+            else
+                errmsg "No constant variable #{last_arg} defined#{suffix}."
+            end
+        elsif args.size == 1
+            if names.empty?
+                msg "No constant variables defined#{suffix}."
+            else
+                section "Constant variable names#{suffix}:"
+                width = settings[:maxwidth]
+                mess = Columnize::columnize(names,
+                                            @proc.settings[:maxwidth], '  ',
+                                            false, true, ' ' * 2).chomp
+                msg mess
+            end
+        else
+            errmsg("Wrong number of arguments #{args.size}")
+        end
+    end
+
+    def run(args)
+        run_for_constant(args, @proc.debug_eval('self'))
+    end
+end
+
+# Demo it.
+if __FILE__ == $0
+    require_relative '../../../mock'
+    require_relative '../variables'
+    # cmd =
+    #     MockDebugger::subsub_setup(Trepan::Subcommand::InfoVariables,
+    #                                Trepan::Subcommand::InfoVariablesConstants)
+    # cmd.run(cmd.prefix)
+    # cmd.run(cmd.prefix + ['name'])
+end

data/processor/command/info_subcmd/variables_subcmd/globals.rb

@@ -8,7 +8,7 @@ class Trepan::Subcommand::InfoVariablesGlobals <
     Trepanning::Subcommand.set_name_prefix(__FILE__, self)
     HELP         = <<-EOH
 #{CMD}
-#{CMD} [names]
+#{CMD} [--names]
 
 Show global variables.
 Normally for each which show both the name and value. If you just
@@ -20,7 +20,7 @@ EOH
     NEED_STACK   = true
   }
 
-  def get_names
+  def names
     global_variables
   end
 
@@ -33,7 +33,7 @@ EOH
         else
           section "Global variable names:"
           width = settings[:maxwidth]
-          mess = Columnize::columnize(global_variables.sort, 
+          mess = Columnize::columnize(global_variables.sort,
                                       @proc.settings[:maxwidth], '  ',
                                       false, true, ' ' * 2).chomp
           msg mess
@@ -42,12 +42,12 @@ EOH
         errmsg("unrecognized argument: #{args[-1]}")
       end
     elsif args.size == 1
-      names = get_names
+      names = names
       if names.empty?
         msg "No global variables defined."
       else
         section "Global variables:"
-        names.sort.each do |var_name| 
+        names.sort.each do |var_name|
           s = @proc.debug_eval(var_name.to_s)
           msg("#{var_name} = #{s.inspect}", :code=>true)
         end
@@ -61,8 +61,8 @@ end
 if __FILE__ == $0
   # Demo it.
   require_relative '../../../mock'
-  cmd = MockDebugger::subsub_setup(Trepan::Subcommand::InfoVariablesGlobals, 
+  cmd = MockDebugger::subsub_setup(Trepan::Subcommand::InfoVariablesGlobals,
                                    false)
   cmd.run(cmd.prefix)
-  cmd.run(cmd.prefix + ['name'])
+  cmd.run(cmd.prefix + ['--name'])
 end

data/processor/command/info_subcmd/variables_subcmd/instance.rb

@@ -1,14 +1,15 @@
 # -*- coding: utf-8 -*-
-# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
-require_relative 'locals'
+# Copyright (C) 2010-2011, 2015 Rocky Bernstein <rockyb@rubyforge.net>
 
-class Trepan::Subcommand::InfoVariablesInstance < 
-    Trepan::Subcommand::InfoVariablesLocals
-  Trepan::Util.suppress_warnings {
-    Trepanning::Subcommand.set_name_prefix(__FILE__, self)
-    HELP         = <<-EOH
+require_relative '../../base/subsubcmd'
+require_relative '../../../../app/util'
+
+class Trepan::Subcommand::InfoVariablesInstance < Trepan::SubSubcommand
+    Trepan::Util.suppress_warnings {
+        Trepanning::Subcommand.set_name_prefix(__FILE__, self)
+        HELP         = <<-EOH
 #{CMD}
-#{CMD} [names]
+#{CMD} [--names]
 
 Show instance variables of the current stack frame.
 Normally for each which show both the name and value. If you just
@@ -17,25 +18,70 @@ EOH
     SHORT_HELP   = 'Show instance variables of the current stack frame'
     MIN_ARGS     = 0
     MAX_ARGS     = 1
-    MIN_ABBREV   = 'iv'.size 
+    MIN_ABBREV   = 'iv'.size
     NEED_STACK   = true
   }
 
-  def get_names
-    @proc.debug_eval('self.instance_variables')
-  end
+    def names
+        @proc.debug_eval('self.instance_variables.sort').map{|n| n.to_s}
+    end
+
+    def run_for_type(args, type, klass=nil)
+        suffix = klass ? " for #{klass.to_s}" : '' rescue ''
+        if args.size == 2
+            last_arg = args[-1]
+            if 0 == '--names'.index(last_arg)
+                if names.empty?
+                    msg "No #{type} variables defined."
+                else
+                    section "#{type.capitalize} variable names#{suffix}:"
+                    width = settings[:maxwidth]
+                    mess = Columnize::columnize(names,
+                                                @proc.settings[:maxwidth], '  ',
+                                                false, true, ' ' * 2).chomp
+                    msg mess
+                end
+            elsif 'CFUNC' == @proc.frame.type
+                msg "Can't show #{type} names in a C call"
+                return
+            else
+                p last_arg
+                if names.member?(last_arg)
+                    var_value =
+                        @proc.safe_rep(@proc.debug_eval_no_errmsg(last_arg).inspect)
+                    msg("#{last_arg} = #{var_value}", :code => true)
+                else
+                    errmsg "No #{type} variable #{last_arg} defined#{suffix}."
+                end
+            end
+        elsif args.size == 1
+            if names.empty?
+                msg "No #{type} variables defined#{suffix}."
+            else
+                section "#{type.capitalize} variables#{suffix}:"
+                names.each do |var_name|
+                    var_value =
+                        @proc.safe_rep(@proc.debug_eval_no_errmsg(var_name).inspect)
+                    msg("#{var_name} = #{var_value}", :code => true)
+                end
+            end
+        else
+            errmsg("Wrong number of arguments #{args.size}")
+        end
+    end
 
-  def run(args)
-    run_for_type(args, 'instance', @proc.debug_eval('self'))
-  end
+    def run(args)
+        run_for_type(args, 'instance', @proc.debug_eval('self'))
+    end
 end
 
+# Demo it.
 if __FILE__ == $0
-  # Demo it.
-  require_relative '../../mock'
-  cmd = 
-    MockDebugger::subsub_setup(Trepan::Subcommand::InfoVariables,
-                               Trepan::Subcommand::InfoVariablesInstance)
-  cmd.run(cmd.prefix)
-  cmd.run(cmd.prefix + ['name'])
+    require_relative '../../../mock'
+    require_relative '../variables'
+    # cmd =
+    #     MockDebugger::subsub_setup(Trepan::Subcommand::InfoVariables,
+    #                                Trepan::Subcommand::InfoVariablesInstance)
+    # cmd.run(cmd.prefix)
+    # cmd.run(cmd.prefix + ['name'])
 end

data/processor/command/info_subcmd/variables_subcmd/locals.rb

@@ -1,5 +1,5 @@
 # -*- coding: utf-8 -*-
-# Copyright (C) 2010, 2011 Rocky Bernstein <rockyb@rubyforge.net>
+# Copyright (C) 2010-2011, 2015 Rocky Bernstein <rockyb@rubyforge.net>
 require 'columnize'
 require_relative '../../base/subsubcmd'
 require_relative '../../../../app/frame'
@@ -9,91 +9,172 @@ class Trepan::Subcommand::InfoVariablesLocals < Trepan::SubSubcommand
   Trepan::Util.suppress_warnings {
     Trepanning::Subcommand.set_name_prefix(__FILE__, self)
     HELP         = <<-EOH
-#{CMD}
-#{CMD} [names]
+**#{CMD}** [ **--names** | *local-number* ]
 
 Show local variables including parameters of the current stack frame.
-Normally for each which show both the name and value. If you just
-want a list of names add parameter 'names'.
+Normally for each we show both the name and value. If you just
+want a list of names add parameter `--names`. C functions don't
+store parameter names, just the parameter positions starting from 0.
+
+If you just want the value for a particular local number (and its name
+if not in a C function), give that number.  This is basically running
+the VM command "getlocal *num*".
+
+Examples:
+---------
+
+    info variables local
+    info variables local 0
+    info variables local --names
+
+See Also:
+---------
+
+`info variables`, `info globals`, `info variables constants`,
+and `info variables class`
+
 EOH
     SHORT_HELP   = 'Show local variables of the current stack frame'
     MIN_ARGS     = 0
     MAX_ARGS     = 1
-    MIN_ABBREV   = 'lo'.size 
+    MIN_ABBREV   = 'lo'.size
     NEED_STACK   = true
   }
 
-  def complete(prefix)
-    ['name']
-  end
+    def complete(prefix)
+        if @proc && @proc.frame
+            argc =
+                if 'CFUNC' == @proc.frame.type
+                    @proc.frame.argc
+                else
+                    iseq = @proc.frame.iseq
+                    iseq.local_size - 2
+                end
+            ary = (0..argc).map{|i| i.to_s}
+            ['--names'] + ary
+        else
+            []
+        end
+    end
 
-  def get_names
-    iseq = @proc.frame.iseq
-    0.upto(iseq.local_size-2).map do
-      |i|
-      iseq.local_name(i)
+    def names
+        iseq = @proc.frame.iseq
+        0.upto(iseq.local_size-2).map { |i| iseq.local_name(i) }
     end
-  end
 
-  def run_for_type(args, type, klass=nil)
-    suffix = klass ? " for #{klass.to_s}" : '' rescue ''
-    if args.size == 2
-      if 0 == 'names'.index(args[-1].downcase)
-        if 'CFUNC' == @proc.frame.type
-          errmsg("info #{type} names not supported for C frames")
-        else
-          if names.empty?
-            msg "No #{type} variables defined."
-          else
-            section "#{type.capitalize} variable names#{suffix}:"
-            width = settings[:maxwidth]
-            mess = Columnize::columnize(names, 
-                                        @proc.settings[:maxwidth], '  ',
-                                        false, true, ' ' * 2).chomp
-            msg mess
-          end
-        end
-      else
-        errmsg("unrecognized argument: #{args[-1]}")
-      end
-    elsif args.size == 1
-      if 'CFUNC' == @proc.frame.type
-        argc = @proc.frame.argc
-        if argc > 0 
-          1.upto(argc).each do |i| 
-            msg "#{i}: #{@proc.frame.sp(argc-i+3).inspect}"
-          end
-        else
-          msg("No parameters in C call; showing other C locals is not supported.")
-        end
-      else
-        if names.empty?
-          msg "No #{type} variables defined#{suffix}."
+    def run_for_locals(args)
+        suffix = klass ? " for #{klass.to_s}" : '' rescue ''
+        frame = @proc.frame
+        suffix =
+            if frame.klass
+                " for #{Trepan::Frame::format_stack_call(frame,{})}"
+            else
+                ''
+            end
+        iseq = frame.iseq
+        c_frame = 'CFUNC' == frame.type
+        if args.size == 2
+            last_arg = args[-1]
+            argc =
+                if c_frame
+                    frame.argc
+                else
+                    iseq.local_size - 2
+                end
+            if 0 == '--names'.index(last_arg)
+                if c_frame
+                    msg("Can't show parameter names in a C call")
+                    return
+                end
+                if names.empty?
+                    msg "No local variables defined."
+                else
+                    section "Local variable names#{suffix}:"
+                    width = settings[:maxwidth]
+                    mess = Columnize::columnize(names,
+                                                @proc.settings[:maxwidth], '  ',
+                                                false, true, ' ' * 2).chomp
+                    msg mess
+                end
+            else
+                if c_frame
+                    num = @proc.get_an_int(last_arg,
+                                           :max_value => argc,
+                                           :min_value => 0,
+                                           )
+                    return unless num
+                    val = frame.getlocal(num)
+                    msg("%d: %s (%s)" % [num, val.inspect, val.class],
+                         :code => true)
+                    return
+                elsif names.member?(last_arg)
+                    val =
+                        @proc.safe_rep(@proc.debug_eval_no_errmsg(last_arg))
+                    msg("%s = %s (%s)" %
+                        [last_arg, val.inspect, val.class], :code => true)
+                    return
+                else
+                    num = @proc.get_an_int(last_arg,
+                                           :max_value => iseq.local_size,
+                                           :min_value => 0,
+                                           )
+                    return unless num
+                    val = frame.getlocal(num)
+                    if num >= 2
+                        var_name = iseq.local_name(iseq.local_size-num)
+                        mess = "%d: %s = %s (%s)" % [num, var_name,
+                                                     val.inspect, val.class]
+                    else
+                        mess = "%d: %s (%s)" % [num, val.inspect, val.class]
+                    end
+
+                    msg(mess, :code => true)
+                    return
+                end
+            end
+        elsif args.size == 1
+            if c_frame
+                argc = frame.argc
+                if argc > 0
+                    1.upto(argc).each do |i|
+                        msg "#{i}: #{@proc.frame.sp(argc-i+3).inspect}"
+                    end
+                else
+                    msg("No parameters in C call")
+                end
+                return
+            else
+                if names.empty?
+                    msg "No local variables defined#{suffix}."
+                else
+                    section "Local variables#{suffix}:"
+                    last = iseq.local_size
+                    2.upto(iseq.local_size) do |i|
+                        name = iseq.local_name(last-i)
+                        val = frame.getlocal(i)
+                        msg("%d: %s = %s (%s)" %
+                            [i, name, val.inspect, val.class],
+                            :code => true)
+                    end
+                end
+            end
         else
-          section "#{type.capitalize} variables#{suffix}:"
-          names.each do |var_name| 
-            var_value = 
-              @proc.safe_rep(@proc.debug_eval_no_errmsg(var_name).inspect)
-            msg("#{var_name} = #{var_value}", :code => true)
-          end
+            errmsg("Wrong number of arguments #{args.size}")
         end
-      end
-    else
-      errmsg("Wrong number of arguments #{args.size}")
     end
-  end
-  def run(args)
-    run_for_type(args, 'local', @proc.debug_eval('self'))
-  end
+
+    def run(args)
+        run_for_locals(args)
+    end
 end
 
 if __FILE__ == $0
   # Demo it.
   require_relative '../../../mock'
   require_relative '../variables'
-  cmd = MockDebugger::subsub_setup(Trepan::SubSubcommand::InfoVariables,
-                                   Trepan::SubSubcommand::InfoVariablesLocals
-                                   )
-  cmd.run([])
-  cmd.run(['name'])
+  # cmd = MockDebugger::subsub_setup(Trepan::SubSubcommand::InfoVariables,
+  #                                  Trepan::SubSubcommand::InfoVariablesLocals
+  #                                  )
+  # cmd.run([])
+  # cmd.run(['name'])
 end