--------------050509020908030703000904
Content-Type: text/plain; charset=us-ascii; format=flowed
Content-Transfer-Encoding: 7bit
Moin!
Breakpoint.rb is a small library that lets you set breakpoints by
calling a method. When executed, a breakpoint causes an interactive ruby
session to be spawned with the current context. This makes it especially
useful for debugging because Ruby has powerful built-in capabilities for
exploring object environments. (Kernel#caller, Object#inspect,
Object#respond_to?, Kernel#local_variables, Object#instance_variables
and so on.)
There's also support for overriding return values and for an assert()
method that automatically sets a breakpoint in case an unexpected
situation occurs.
---
This new version includes support for remote debugging via DRb. Using
this you can now also debug your CGI and Rails applications (and other
applications where you can't pollute STDIN/STDOUT by running irb
directly). To start the DRb breakpoint service you will have to call
Breakpoint.activate_drb -- after that you can interact with that service
by running breakpoint_client.rb.
This is a pre-release of the next version of the code already included
in the Ruby dev-utils project (http://dev-utils.rubyforge.org/) meaning
that I'm not sure if it is 100% bug-free (I refactored quite a lot) --
if this works out well the dev-utils version can be updated.
If you have any suggestions or if you find any problems with this please
mention them now so that I can fix them as soon as possible. Thanks!
Kind regards,
Florian Gross
--------------050509020908030703000904
Content-Type: text/plain;
name inding_of_caller.rb"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
filename inding_of_caller.rb"
begin
require 'simplecc'
rescue LoadError
def Continuation.create(*args, &block)
cc il; result allcc {|c| cc ; block.call(cc) if block and args.empty?}
result || rgs
return *[cc, *result]
end
end
# This method returns the binding of the method that called your
# method. It will raise an Exception when you're not inside a method.
#
# It's used like this:
# def inc_counter(amount )
# Binding.of_caller do |binding|
# # Create a lambda that will increase the variable 'counter'
# # in the caller of this method when called.
# inc val("lambda { |arg| counter + rg }", binding)
# # We can refer to amount from inside this block safely.
# inc.call(amount)
# end
# # No other statements can go here. Put them inside the block.
# end
# counter
# 2.times { inc_counter }
# counter # 2
#
# Binding.of_caller must be the last statement in the method.
# This means that you will have to put everything you want to
# do after the call to Binding.of_caller into the block of it.
# This should be no problem however, because Ruby has closures.
# If you don't do this an Exception will be raised. Because of
# the way that Binding.of_caller is implemented it has to be
# done this way.
def Binding.of_caller(&block)
old_critical hread.critical
Thread.critical rue
count
cc, result, error, extra_data ontinuation.create(nil, nil)
error.call if error
tracer ambda do |*args|
type, context, extra_data rgs[0], args[4], args
if type "return"
count +
# First this method and then calling one will return --
# the trace event of the second event gets the context
# of the method which called the method that called this
# method.
if count 2
# It would be nice if we could restore the trace_func
# that was set before we swapped in our own one, but
# this is impossible without overloading set_trace_func
# in current Ruby.
set_trace_func(nil)
cc.call(eval("binding", context), nil, extra_data)
end
elsif type ! line"
set_trace_func(nil)
error_msg Binding.of_caller used in non-method context or " +
"trailing statements of method using it aren't in the block."
cc.call(nil, lambda { raise(ArgumentError, error_msg) }, nil)
end
end
unless result
set_trace_func(tracer)
return nil
else
Thread.critical ld_critical
case block.arity
when 1 then yield(result)
else yield(result, extra_data)
end
end
end
--------------050509020908030703000904
Content-Type: text/plain;
name reakpoint.rb"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
filename reakpoint.rb"
require 'irb'
require 'binding_of_caller'
require 'drb'
module Breakpoint
extend self
# This will pop up an interactive ruby session at a
# pre-defined break point in a Ruby application. In
# this session you can examine the environment of
# the break point.
#
# You can get a list of variables in the context using
# local_variables via +local_variables+. You can then
# examine their values by typing their names.
#
# You can have a look at the call stack via +caller+.
#
# breakpoints can also return a value. They will execute
# a supplied block for getting a default return value.
# A custom value can be returned from the session by doing
# +throw(:debug_return, value)+.
#
# You can also give names to break points which will be
# used in the message that is displayed upon execution
# of them.
#
# Here's a sample of how breakpoints should be placed:
#
# class Person
# def initialize(name, age)
# @name, @age ame, age
# breakpoint("Person#initialize")
# end
#
# attr_reader :age
# def name
# breakpoint("Person#name") { @name }
# end
# end
#
# person erson.new("Random Person", 23)
# puts "Name: #{person.name}"
#
# And here is a sample debug session:
#
# Executing break point "Person#initialize" at file.rb:4 in `initialize'
# irb(#<Person:0x292fbe8>):001:0> local_variables
# ["name", "age", "_", "__"]
# irb(#<Person:0x292fbe8>):002:0> [name, age]
# ["Random Person", 23]
# irb(#<Person:0x292fbe8>):003:0> [@name, @age]
# ["Random Person", 23]
# irb(#<Person:0x292fbe8>):004:0> self
# #<Person:0x292fbe8 @age#, @name andom Person">
# irb(#<Person:0x292fbe8>):005:0> @age + ; self
# #<Person:0x292fbe8 @age$, @name andom Person">
# irb(#<Person:0x292fbe8>):006:0> exit
# Executing break point "Person#name" at file.rb:9 in `name'
# irb(#<Person:0x292fbe8>):001:0> throw(:debug_return, "Overriden name")
# Name: Overriden name
def breakpoint(id il, context il, &block)
callstack aller
callstack.slice!(0, 3) if callstack.first["breakpoint"]
file, line, method callstack.first.match(/^(.+?):(\d+)(?::in `(.*?)')?/).captures
message Executing break point " + (id ? "#{id.inspect} " : "") +
"at #{file}:#{line}" + (method ? " in `#{method}'" : "")
if context then
return handle_breakpoint(context, message, &block)
end
Binding.of_caller do |binding_context|
handle_breakpoint(binding_context, message, &block)
end
end
def handle_breakpoint(context, message, &block) # :nodoc:
catch(:debug_return) do |value|
if not use_drb? then
puts message
IRB.start(nil, IRB::WorkSpace.new(context))
else
@drb_service.add_breakpoint(context, message)
end
block.call if block
end
end
private :handle_breakpoint
# This asserts that the block evaluates to true.
# If it doesn't evaluate to true a breakpoint will
# automatically be created at that execution point.
#
# You can disable assert checking by setting
# Breakpoint.optimize_asserts to true before
# loading the breakpoint.rb library. (It will still
# be enabled when Ruby is run via the -d argument.)
#
# Example:
# person_name Foobar"
# assert { not person_name.nil? }
def assert(context il, &condition)
return if Breakpoint.optimize_asserts and not $DEBUG
return if yield
callstack aller
callstack.slice!(0, 3) if callstack.first["assert"]
file, line, method callstack.first.match(/^(.+?):(\d+)(?::in `(.*?)')?/).captures
message Assert failed at #{file}:#{line}#{" in `#{method}'" if method}. " +
"Executing implicit breakpoint."
if context then
return handle_breakpoint(context, message)
end
Binding.of_caller do |context|
handle_breakpoint(context, message)
end
end
# Whether asserts should be ignored if not in debug mode.
# Debug mode can be enabled by running ruby with the -d
# switch or by setting $DEBUG to true.
attr_accessor :optimize_asserts
self.optimize_asserts alse
class DRbService
class FinishedException < Exception; end
include DRbUndumped
def initialize
@breakpoint result il
@has_breakpoint is_done alse
end
def add_breakpoint(context, message)
workspace RB::WorkSpace.new(context)
workspace.extend(DRbUndumped)
@breakpoint workspace, message]
@has_breakpoint rue
until @is_done; end
@is_done alse
end
def handle_breakpoint(&block)
until @has_breakpoint; end
@has_breakpoint alse
#begin
yield(@breakpoint)
#rescue FinishedException
#end
@is_done rue
end
end
# Will run Breakpoint in DRb mode. This will spawn a server
# that can be attached to via the [ TODO: command ] command
# whenever a breakpoint is executed. This is useful when you
# are debugging CGI applications or other applications where
# you can't access debug sessions via the standard input and
# output of your application.
#
# You can specify an URI where the DRb server will run at.
# This way you can specify the port the server runs on. The
# default URI is druby://localhost:42531.
#
# Please note that breakpoints will be skipped silently in
# case the DRb server can not spawned. (This can happen if
# the port is already used by another instance of your
# application on CGI or another application.)
def activate_drb(uri druby://localhost:42531')
@use_drb rue
@drb_service RbService.new
DRb.start_service(uri, @drb_service)
end
def use_drb?
@use_drb true
end
end
module IRB
def IRB.start(ap_path il, main_context il, workspace il)
$0 ile::basename(ap_path, ".rb") if ap_path
# suppress some warnings about redefined constants
old_verbose, $VERBOSE VERBOSE, nil
IRB.setup(ap_path)
$VERBOSE ld_verbose
if @CONF[:SCRIPT] then
irb rb.new(main_context, @CONF[:SCRIPT])
else
irb rb.new(main_context)
end
if workspace then
irb.context.workspace orkspace
end
@CONF[:IRB_RC].call(irb.context) if @CONF[:IRB_RC]
@CONF[:MAIN_CONTEXT] rb.context
trap("SIGINT") do
irb.signal_handle
end
catch(:IRB_EXIT) do
irb.eval_input
end
end
class << self; alias :old_CurrentContext :CurrentContext; end
def IRB.CurrentContext
if old_CurrentContext.nil? and Breakpoint.use_drb? then
result bject.new
def result.last_value; end
return result
else
old_CurrentContext
end
end
class Context
alias :old_evaluate :evaluate
def evaluate(line, line_no)
if line.chomp "exit" then
exit
else
old_evaluate(line, line_no)
end
end
end
class WorkSpace
alias :old_evaluate :evaluate
def evaluate(*args)
if Breakpoint.use_drb? then
result ld_evaluate(*args)
result.extend(DRbUndumped) rescue nil
return result
else
old_evaluate(*args)
end
end
end
end
class DRb::DRbObject
undef :inspect
end
def breakpoint(id il, &block)
Binding.of_caller do |context|
Breakpoint.breakpoint(id, context, &block)
end
end
def assert(&block)
Binding.of_caller do |context|
Breakpoint.assert(context, &block)
end
end
--------------050509020908030703000904
Content-Type: text/plain;
name reakpoint_client.rb"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
filename reakpoint_client.rb"
require 'breakpoint'
if ARGV[0] "--help" then
puts "This tool lets you connect to a breakpoint service ",
"which was started via Breakpoint.activate_drb.",
"",
"Usage: ruby #{$0} [drb uri]",
"",
"The drb uri defaults to druby://localhost:42531"
exit
end
uri RGV[0] || 'druby://localhost:42531'
DRb.start_service
begin
service RbObject.new(nil, uri)
loop do
begin
service.handle_breakpoint do |(workspace, message)|
puts message
IRB.start(nil, nil, workspace)
end
rescue Breakpoint::DRbService::FinishedException
end
end
rescue Exception error
puts "No connection to breakpoint service at #{uri}:",
" (#{error})",
" Reconnecting in 10 seconds..."
sleep 10
retry
end
--------------050509020908030703000904--