Contents

# -*- coding: utf-8 -*-
# Copyright (C) 2010 Rocky Bernstein <[e-mail]>
require_relative '../../base/subsubcmd'
require_relative 'helper'

class Trepan::Subcommand::InfoRegistersSp < Trepan::SubSubcommand
  unless defined?(HELP)
    NAME = File.basename(__FILE__, '.rb')
    HELP = <<EOH
usage: 
   info register #{NAME} [NUMBER NUMBER ...|size]

With no arguments, all SP values for the current frame of the debugged
program are shown.  If a number is given, then the entry at that
location is shown. If "size" is given, then we show the number items
in the stack of the current frame.

The VM uses a stack to store temporary values in computations. For
example to compute "a + b", the values of "a" and "b" are pushed onto
a stack pointed to by SP. Just before the addition is perofrmed, sp(1)
will have the value "a" contians and sp(2) will contain the value of
"b"

See also "info register LFP"
EOH

    MIN_ABBREV   = 'sp'.size
    NEED_STACK   = true
    PREFIX       = %W(info registers #{NAME})
  end

  include Registers
  def run(args)
    if args.size == 0
      1.upto(@proc.frame.sp_size-1) do |i|
        msg "%s%d: %s" % [' ' * 2, i, @proc.frame.sp(i).inspect]
      end if @proc.frame.sp_size
    elsif args.size == 1 and 'size' == args[0] 
      msg "Number of stack items in frame is #{@proc.frame.sp_size}."
    else
      args.each do |arg|
        register_array_index(PREFIX[-1], arg, @proc.frame.sp_size)
      end
    end
  end
end

if __FILE__ == $0
  # Demo it.
  require_relative '../../../mock'
  require_relative '../registers'
  cmd = MockDebugger::subsub_setup(Trepan::SubSubcommand::InfoRegisters,
                                   Trepan::SubSubcommand::InfoRegistersSp,
                                   false)
  # require_relative '../../../../lib/trepanning'
  # dbgr = Trepan.new
  # dbgr.debugger
  cmd.run([])
  puts
  %w(0 1 10).each do |val|
    cmd.run([val])
    puts '-' * 40
  end
  cmd.run(['size'])
end

Version data entries

5 entries across 5 versions & 1 rubygems

Version	Path
trepanning-0.1.2	processor/command/info_subcmd/registers_subcmd/sp.rb
trepanning-0.1.1	processor/command/info_subcmd/registers_subcmd/sp.rb
trepanning-0.1.0	processor/command/info_subcmd/registers_subcmd/sp.rb
trepanning-0.0.9	processor/command/info_subcmd/registers_subcmd/sp.rb
trepanning-0.0.8	processor/command/info_subcmd/registers_subcmd/sp.rb