mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
393ed5c950
* vm_eval.c (eval_under): singletons other than special constants don't need cref-scope hack. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@36663 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
456 lines
13 KiB
Ruby
456 lines
13 KiB
Ruby
require 'test/unit'
|
|
require_relative 'envutil'
|
|
|
|
class TestEval < Test::Unit::TestCase
|
|
|
|
@ivar = 12
|
|
@@cvar = 13
|
|
$gvar__eval = 14
|
|
Const = 15
|
|
|
|
def ruby(*args)
|
|
args = ['-e', '$>.write($<.read)'] if args.empty?
|
|
ruby = EnvUtil.rubybin
|
|
f = IO.popen([ruby] + args, 'r+')
|
|
yield(f)
|
|
ensure
|
|
f.close unless !f || f.closed?
|
|
end
|
|
|
|
def test_eval_basic
|
|
assert_equal nil, eval("nil")
|
|
assert_equal true, eval("true")
|
|
assert_equal false, eval("false")
|
|
assert_equal self, eval("self")
|
|
assert_equal 1, eval("1")
|
|
assert_equal :sym, eval(":sym")
|
|
|
|
assert_equal 11, eval("11")
|
|
@ivar = 12
|
|
assert_equal 12, eval("@ivar")
|
|
assert_equal 13, eval("@@cvar")
|
|
assert_equal 14, eval("$gvar__eval")
|
|
assert_equal 15, eval("Const")
|
|
|
|
assert_equal 16, eval("7 + 9")
|
|
assert_equal 17, eval("17.to_i")
|
|
assert_equal "18", eval(%q("18"))
|
|
assert_equal "19", eval(%q("1#{9}"))
|
|
|
|
1.times {
|
|
assert_equal 12, eval("@ivar")
|
|
assert_equal 13, eval("@@cvar")
|
|
assert_equal 14, eval("$gvar__eval")
|
|
assert_equal 15, eval("Const")
|
|
}
|
|
end
|
|
|
|
def test_eval_binding_basic
|
|
assert_equal nil, eval("nil", binding())
|
|
assert_equal true, eval("true", binding())
|
|
assert_equal false, eval("false", binding())
|
|
assert_equal self, eval("self", binding())
|
|
assert_equal 1, eval("1", binding())
|
|
assert_equal :sym, eval(":sym", binding())
|
|
|
|
assert_equal 11, eval("11", binding())
|
|
@ivar = 12
|
|
assert_equal 12, eval("@ivar", binding())
|
|
assert_equal 13, eval("@@cvar", binding())
|
|
assert_equal 14, eval("$gvar__eval", binding())
|
|
assert_equal 15, eval("Const", binding())
|
|
|
|
assert_equal 16, eval("7 + 9", binding())
|
|
assert_equal 17, eval("17.to_i", binding())
|
|
assert_equal "18", eval(%q("18"), binding())
|
|
assert_equal "19", eval(%q("1#{9}"), binding())
|
|
|
|
1.times {
|
|
assert_equal 12, eval("@ivar")
|
|
assert_equal 13, eval("@@cvar")
|
|
assert_equal 14, eval("$gvar__eval")
|
|
assert_equal 15, eval("Const")
|
|
}
|
|
end
|
|
|
|
def test_module_eval_string_basic
|
|
c = self.class
|
|
assert_equal nil, c.module_eval("nil")
|
|
assert_equal true, c.module_eval("true")
|
|
assert_equal false, c.module_eval("false")
|
|
assert_equal c, c.module_eval("self")
|
|
assert_equal :sym, c.module_eval(":sym")
|
|
assert_equal 11, c.module_eval("11")
|
|
@ivar = 12
|
|
assert_equal 12, c.module_eval("@ivar")
|
|
assert_equal 13, c.module_eval("@@cvar")
|
|
assert_equal 14, c.module_eval("$gvar__eval")
|
|
assert_equal 15, c.module_eval("Const")
|
|
assert_equal 16, c.module_eval("7 + 9")
|
|
assert_equal 17, c.module_eval("17.to_i")
|
|
assert_equal "18", c.module_eval(%q("18"))
|
|
assert_equal "19", c.module_eval(%q("1#{9}"))
|
|
|
|
@ivar = 12
|
|
1.times {
|
|
assert_equal 12, c.module_eval("@ivar")
|
|
assert_equal 13, c.module_eval("@@cvar")
|
|
assert_equal 14, c.module_eval("$gvar__eval")
|
|
assert_equal 15, c.module_eval("Const")
|
|
}
|
|
end
|
|
|
|
def test_module_eval_block_basic
|
|
c = self.class
|
|
assert_equal nil, c.module_eval { nil }
|
|
assert_equal true, c.module_eval { true }
|
|
assert_equal false, c.module_eval { false }
|
|
assert_equal c, c.module_eval { self }
|
|
assert_equal :sym, c.module_eval { :sym }
|
|
assert_equal 11, c.module_eval { 11 }
|
|
@ivar = 12
|
|
assert_equal 12, c.module_eval { @ivar }
|
|
assert_equal 13, c.module_eval { @@cvar }
|
|
assert_equal 14, c.module_eval { $gvar__eval }
|
|
assert_equal 15, c.module_eval { Const }
|
|
assert_equal 16, c.module_eval { 7 + 9 }
|
|
assert_equal 17, c.module_eval { "17".to_i }
|
|
assert_equal "18", c.module_eval { "18" }
|
|
assert_equal "19", c.module_eval { "1#{9}" }
|
|
|
|
@ivar = 12
|
|
1.times {
|
|
assert_equal 12, c.module_eval { @ivar }
|
|
assert_equal 13, c.module_eval { @@cvar }
|
|
assert_equal 14, c.module_eval { $gvar__eval }
|
|
assert_equal 15, c.module_eval { Const }
|
|
}
|
|
end
|
|
|
|
def forall_TYPE
|
|
objects = [Object.new, [], nil, true, false, 77, :sym] # TODO: check
|
|
objects.each do |obj|
|
|
obj.instance_variable_set :@ivar, 12
|
|
yield obj
|
|
end
|
|
end
|
|
|
|
def test_instance_eval_string_basic
|
|
forall_TYPE do |o|
|
|
assert_equal nil, o.instance_eval("nil")
|
|
assert_equal true, o.instance_eval("true")
|
|
assert_equal false, o.instance_eval("false")
|
|
assert_equal o, o.instance_eval("self")
|
|
assert_equal 1, o.instance_eval("1")
|
|
assert_equal :sym, o.instance_eval(":sym")
|
|
|
|
assert_equal 11, o.instance_eval("11")
|
|
assert_equal 12, o.instance_eval("@ivar")
|
|
assert_equal 13, o.instance_eval("@@cvar")
|
|
assert_equal 14, o.instance_eval("$gvar__eval")
|
|
assert_equal 15, o.instance_eval("Const")
|
|
assert_equal 16, o.instance_eval("7 + 9")
|
|
assert_equal 17, o.instance_eval("17.to_i")
|
|
assert_equal "18", o.instance_eval(%q("18"))
|
|
assert_equal "19", o.instance_eval(%q("1#{9}"))
|
|
|
|
1.times {
|
|
assert_equal 12, o.instance_eval("@ivar")
|
|
assert_equal 13, o.instance_eval("@@cvar")
|
|
assert_equal 14, o.instance_eval("$gvar__eval")
|
|
assert_equal 15, o.instance_eval("Const")
|
|
}
|
|
end
|
|
end
|
|
|
|
def test_instance_eval_block_basic
|
|
forall_TYPE do |o|
|
|
assert_equal nil, o.instance_eval { nil }
|
|
assert_equal true, o.instance_eval { true }
|
|
assert_equal false, o.instance_eval { false }
|
|
assert_equal o, o.instance_eval { self }
|
|
assert_equal 1, o.instance_eval { 1 }
|
|
assert_equal :sym, o.instance_eval { :sym }
|
|
|
|
assert_equal 11, o.instance_eval { 11 }
|
|
assert_equal 12, o.instance_eval { @ivar }
|
|
assert_equal 13, o.instance_eval { @@cvar }
|
|
assert_equal 14, o.instance_eval { $gvar__eval }
|
|
assert_equal 15, o.instance_eval { Const }
|
|
assert_equal 16, o.instance_eval { 7 + 9 }
|
|
assert_equal 17, o.instance_eval { 17.to_i }
|
|
assert_equal "18", o.instance_eval { "18" }
|
|
assert_equal "19", o.instance_eval { "1#{9}" }
|
|
|
|
1.times {
|
|
assert_equal 12, o.instance_eval { @ivar }
|
|
assert_equal 13, o.instance_eval { @@cvar }
|
|
assert_equal 14, o.instance_eval { $gvar__eval }
|
|
assert_equal 15, o.instance_eval { Const }
|
|
}
|
|
end
|
|
end
|
|
|
|
def test_instance_eval_cvar
|
|
[Object.new, [], 7, :sym, true, false, nil].each do |obj|
|
|
assert_equal(13, obj.instance_eval("@@cvar"))
|
|
assert_equal(13, obj.instance_eval{@@cvar})
|
|
# assert_raise(NameError){obj.instance_eval("@@cvar")}
|
|
# assert_raise(NameError){obj.instance_eval{@@cvar}}
|
|
end
|
|
end
|
|
|
|
def test_instance_eval_method
|
|
bug2788 = '[ruby-core:28324]'
|
|
[Object.new, [], nil, true, false].each do |o|
|
|
assert_nothing_raised(TypeError, "#{bug2788} (#{o.inspect})") do
|
|
o.instance_eval {
|
|
def defd_using_instance_eval() :ok end
|
|
}
|
|
end
|
|
assert_equal(:ok, o.defd_using_instance_eval)
|
|
class << o
|
|
remove_method :defd_using_instance_eval
|
|
end
|
|
end
|
|
end
|
|
|
|
class Foo
|
|
Bar = 2
|
|
end
|
|
|
|
def test_instance_eval_const
|
|
bar = nil
|
|
assert_nothing_raised(NameError) do
|
|
bar = Foo.new.instance_eval("Bar")
|
|
end
|
|
assert_equal(2, bar)
|
|
end
|
|
|
|
#
|
|
# From ruby/test/ruby/test_eval.rb
|
|
#
|
|
|
|
def test_ev
|
|
local1 = "local1"
|
|
lambda {
|
|
local2 = "local2"
|
|
return binding
|
|
}.call
|
|
end
|
|
|
|
def test_eval_orig
|
|
assert_nil(eval(""))
|
|
bad=false
|
|
eval 'while false; bad = true; print "foo\n" end'
|
|
assert(!bad)
|
|
|
|
assert(eval('TRUE'))
|
|
assert(eval('true'))
|
|
assert(!eval('NIL'))
|
|
assert(!eval('nil'))
|
|
assert(!eval('FALSE'))
|
|
assert(!eval('false'))
|
|
|
|
$foo = 'assert(true)'
|
|
begin
|
|
eval $foo
|
|
rescue
|
|
assert(false)
|
|
end
|
|
|
|
assert_equal('assert(true)', eval("$foo"))
|
|
assert_equal(true, eval("true"))
|
|
i = 5
|
|
assert(eval("i == 5"))
|
|
assert_equal(5, eval("i"))
|
|
assert(eval("defined? i"))
|
|
|
|
x = test_ev
|
|
assert_equal("local1", eval("local1", x)) # normal local var
|
|
assert_equal("local2", eval("local2", x)) # nested local var
|
|
bad = true
|
|
begin
|
|
p eval("local1")
|
|
rescue NameError # must raise error
|
|
bad = false
|
|
end
|
|
assert(!bad)
|
|
|
|
# !! use class_eval to avoid nested definition
|
|
x = self.class.class_eval %q(
|
|
module EvTest
|
|
EVTEST1 = 25
|
|
evtest2 = 125
|
|
binding
|
|
end
|
|
)
|
|
assert_equal(25, eval("EVTEST1", x)) # constant in module
|
|
assert_equal(125, eval("evtest2", x)) # local var in module
|
|
bad = true
|
|
begin
|
|
eval("EVTEST1")
|
|
rescue NameError # must raise error
|
|
bad = false
|
|
end
|
|
assert(!bad)
|
|
|
|
if false
|
|
# Ruby 2.0 doesn't see Proc as Binding
|
|
x = proc{}
|
|
eval "i4 = 1", x
|
|
assert_equal(1, eval("i4", x))
|
|
x = proc{proc{}}.call
|
|
eval "i4 = 22", x
|
|
assert_equal(22, eval("i4", x))
|
|
t = []
|
|
x = proc{proc{}}.call
|
|
eval "(0..9).each{|i5| t[i5] = proc{i5*2}}", x
|
|
assert_equal(8, t[4].call)
|
|
end
|
|
|
|
x = binding
|
|
eval "i = 1", x
|
|
assert_equal(1, eval("i", x))
|
|
x = proc{binding}.call
|
|
eval "i = 22", x
|
|
assert_equal(22, eval("i", x))
|
|
t = []
|
|
x = proc{binding}.call
|
|
eval "(0..9).each{|i5| t[i5] = proc{i5*2}}", x
|
|
assert_equal(8, t[4].call)
|
|
x = proc{binding}.call
|
|
eval "for i6 in 1..1; j6=i6; end", x
|
|
assert(eval("defined? i6", x))
|
|
assert(eval("defined? j6", x))
|
|
|
|
proc {
|
|
p = binding
|
|
eval "foo11 = 1", p
|
|
foo22 = 5
|
|
proc{foo11=22}.call
|
|
proc{foo22=55}.call
|
|
# assert_equal(eval("foo11"), eval("foo11", p))
|
|
# assert_equal(1, eval("foo11"))
|
|
assert_equal(eval("foo22"), eval("foo22", p))
|
|
assert_equal(55, eval("foo22"))
|
|
}.call
|
|
|
|
if false
|
|
# Ruby 2.0 doesn't see Proc as Binding
|
|
p1 = proc{i7 = 0; proc{i7}}.call
|
|
assert_equal(0, p1.call)
|
|
eval "i7=5", p1
|
|
assert_equal(5, p1.call)
|
|
assert(!defined?(i7))
|
|
end
|
|
|
|
if false
|
|
# Ruby 2.0 doesn't see Proc as Binding
|
|
p1 = proc{i7 = 0; proc{i7}}.call
|
|
i7 = nil
|
|
assert_equal(0, p1.call)
|
|
eval "i7=1", p1
|
|
assert_equal(1, p1.call)
|
|
eval "i7=5", p1
|
|
assert_equal(5, p1.call)
|
|
assert_nil(i7)
|
|
end
|
|
end
|
|
|
|
def test_nil_instance_eval_cvar
|
|
def nil.test_binding
|
|
binding
|
|
end
|
|
bb = eval("nil.instance_eval \"binding\"", nil.test_binding)
|
|
assert_raise(NameError, "[ruby-dev:24103]") { eval("@@a", bb) }
|
|
class << nil
|
|
remove_method :test_binding
|
|
end
|
|
end
|
|
|
|
def test_fixnum_instance_eval_cvar
|
|
assert_raise(NameError, "[ruby-dev:24213]") { 1.instance_eval "@@a" }
|
|
end
|
|
|
|
def test_cvar_scope_with_instance_eval
|
|
# TODO: check
|
|
Fixnum.class_eval "@@test_cvar_scope_with_instance_eval = 1" # depends on [ruby-dev:24229]
|
|
@@test_cvar_scope_with_instance_eval = 4
|
|
assert_equal(4, 1.instance_eval("@@test_cvar_scope_with_instance_eval"), "[ruby-dev:24223]")
|
|
Fixnum.__send__(:remove_class_variable, :@@test_cvar_scope_with_instance_eval)
|
|
end
|
|
|
|
def test_eval_and_define_method
|
|
assert_nothing_raised("[ruby-dev:24228]") {
|
|
def temporally_method_for_test_eval_and_define_method(&block)
|
|
lambda {
|
|
class << Object.new; self end.send(:define_method, :zzz, &block)
|
|
}
|
|
end
|
|
v = eval("temporally_method_for_test_eval_and_define_method {}")
|
|
{}[0] = {}
|
|
v.call
|
|
}
|
|
end
|
|
|
|
def test_define_method_block
|
|
cc = Class.new do
|
|
define_method(:foo) {|&block|
|
|
block.call if block
|
|
}
|
|
end
|
|
|
|
c = cc.new
|
|
x = "ng"
|
|
c.foo() {x = "ok"}
|
|
assert_equal("ok", x)
|
|
end
|
|
|
|
def test_eval_using_integer_as_binding
|
|
assert_raise(TypeError) { eval("", 1) }
|
|
end
|
|
|
|
def test_eval_raise
|
|
assert_raise(RuntimeError) { eval("raise ''") }
|
|
end
|
|
|
|
def test_eval_using_untainted_binding_under_safe4
|
|
assert_raise(SecurityError) do
|
|
Thread.new do
|
|
b = binding
|
|
$SAFE = 4
|
|
eval("", b)
|
|
end.join
|
|
end
|
|
end
|
|
|
|
def test_eval_with_toplevel_binding # [ruby-dev:37142]
|
|
ruby("-e", "x = 0; eval('p x', TOPLEVEL_BINDING)") do |f|
|
|
f.close_write
|
|
assert_equal("0", f.read.chomp)
|
|
end
|
|
end
|
|
|
|
def test_eval_ascii_incompatible
|
|
assert_raise(ArgumentError) {eval("__ENCODING__".encode("utf-16be"))}
|
|
assert_raise(ArgumentError) {eval("__ENCODING__".encode("utf-16le"))}
|
|
assert_raise(ArgumentError) {eval("__ENCODING__".encode("utf-32be"))}
|
|
assert_raise(ArgumentError) {eval("__ENCODING__".encode("utf-32le"))}
|
|
end
|
|
|
|
def test_instance_eval_method_proc
|
|
bug3860 = Class.new do
|
|
def initialize(a);
|
|
@a=a
|
|
end
|
|
def get(*args)
|
|
@a
|
|
end
|
|
end
|
|
foo = bug3860.new 1
|
|
foo_pr = foo.method(:get).to_proc
|
|
result = foo.instance_eval(&foo_pr)
|
|
assert_equal(1, result, 'Bug #3786, Bug #3860, [ruby-core:32501]')
|
|
end
|
|
end
|