1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
ruby--ruby/test/ruby/test_rubyoptions.rb
kazu f76ee72013 * test/ruby/test_rubyoptions.rb: add a test of RUBY_DESCRIPTION.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@16709 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
2008-05-30 14:56:56 +00:00

457 lines
11 KiB
Ruby

require 'test/unit'
require 'tmpdir'
require 'tempfile'
require_relative 'envutil'
class TestRubyOptions < Test::Unit::TestCase
def ruby(*r, &b)
EnvUtil.rubyexec(*r, &b)
end
def test_source_file
ruby('') do |w, r, e|
w.close
assert_equal('', e.read)
assert_equal('', r.read)
end
end
def test_usage
ruby('-h') do |w, r, e|
w.close
assert(r.readlines.size <= 24)
end
ruby('--help') do |w, r, e|
w.close
assert(r.readlines.size <= 24)
end
end
def test_option_variables
ruby('-e', 'p [$-p, $-l, $-a]') do |w, r, e|
assert_equal('[false, false, false]', r.read.chomp)
end
ruby('-p', '-l', '-a', '-e', 'p [$-p, $-l, $-a]') do |w, r, e|
w.puts 'foo'
w.puts 'bar'
w.puts 'baz'
w.close_write
r = r.readlines.map {|l| l.chomp }
assert_equal(
[ '[true, true, true]', 'foo',
'[true, true, true]', 'bar',
'[true, true, true]', 'baz' ], r)
end
end
def test_warning
ruby('-W0', '-e', 'p $-W') do |w, r, e|
assert_equal('0', r.read.chomp)
end
ruby('-W1', '-e', 'p $-W') do |w, r, e|
assert_equal('1', r.read.chomp)
end
ruby('-Wx', '-e', 'p $-W') do |w, r, e|
assert_equal('1', r.read.chomp)
end
ruby('-W', '-e', 'p $-W') do |w, r, e|
assert_equal('2', r.read.chomp)
end
end
def test_safe_level
ruby('-T', '-e', '') do |w, r, e|
assert_match(/no -e allowed in tainted mode \(SecurityError\)/, e.read)
end
ruby('-T4', '-S', 'foo.rb') do |w, r, e|
assert_match(/no -S allowed in tainted mode \(SecurityError\)/, e.read)
end
end
def test_debug
ruby('-de', 'p $DEBUG') do |w, r, e|
assert_equal('true', r.read.chomp)
end
ruby('--debug', '-e', 'p $DEBUG') do |w, r, e|
assert_equal('true', r.read.chomp)
end
end
def test_verbose
ruby('-vve', '') do |w, r, e|
description = r.read
assert_match(/^ruby #{RUBY_VERSION} .*? \[#{RUBY_PLATFORM}\]$/, description)
assert_equal RUBY_DESCRIPTION, description.chomp
end
ruby('--verbose', '-e', 'p $VERBOSE') do |w, r, e|
assert_equal('true', r.read.chomp)
end
ruby('--verbose') do |w, r, e|
assert_equal('', e.read)
assert_equal('', r.read)
end
end
def test_copyright
ruby('--copyright') do |w, r, e|
assert_match(/^ruby - Copyright \(C\) 1993-\d+ Yukihiro Matsumoto$/, r.read)
end
ruby('--verbose', '-e', 'p $VERBOSE') do |w, r, e|
assert_equal('true', r.read.chomp)
end
end
def test_enable
ruby('--enable', 'all', '-e', '') do |w, r, e|
assert_equal('', e.read)
assert_equal('', r.read)
end
ruby('--enable-all', '-e', '') do |w, r, e|
assert_equal('', e.read)
assert_equal('', r.read)
end
ruby('--enable=all', '-e', '') do |w, r, e|
assert_equal('', e.read)
assert_equal('', r.read)
end
ruby('--enable', 'foobarbazqux', '-e', '') do |w, r, e|
assert_match(/unknown argument for --enable: `foobarbazqux'/, e.read)
end
ruby('--enable') do |w, r, e|
assert_match(/missing argument for --enable/, e.read)
end
end
def test_disable
ruby('--disable', 'all', '-e', '') do |w, r, e|
assert_equal('', e.read)
assert_equal('', r.read)
end
ruby('--disable-all', '-e', '') do |w, r, e|
assert_equal('', e.read)
assert_equal('', r.read)
end
ruby('--disable=all', '-e', '') do |w, r, e|
assert_equal('', e.read)
assert_equal('', r.read)
end
ruby('--disable', 'foobarbazqux', '-e', '') do |w, r, e|
assert_match(/unknown argument for --disable: `foobarbazqux'/, e.read)
end
ruby('--disable') do |w, r, e|
assert_match(/missing argument for --disable/, e.read)
end
end
def test_kanji
ruby('-KU') do |w, r, e|
w.puts "p '\u3042'"
w.close
assert_equal("\"\u3042\"", r.read.chomp.force_encoding(Encoding.find('utf-8')))
end
ruby('-KE', '-e', '') do |w, r, e|
assert_equal("", r.read)
assert_equal("", e.read)
end
ruby('-KS', '-e', '') do |w, r, e|
assert_equal("", r.read)
assert_equal("", e.read)
end
ruby('-KN', '-e', '') do |w, r, e|
assert_equal("", r.read)
assert_equal("", e.read)
end
end
def test_version
ruby('--version') do |w, r, e|
assert_match(/^ruby #{RUBY_VERSION} .*? \[#{RUBY_PLATFORM}\]$/, r.read)
end
end
def test_eval
ruby('-e') do |w, r, e|
assert_match(/no code specified for -e \(RuntimeError\)/, e.read)
end
end
def test_require
ruby('-r', 'pp', '-e', 'pp 1') do |w, r, e|
assert_equal('1', r.read.chomp)
end
ruby('-rpp', '-e', 'pp 1') do |w, r, e|
w.close
assert_equal('1', r.read.chomp)
end
end
def test_include
d = Dir.tmpdir
ruby('-I' + d, '-e', '') do |w, r, e|
assert_equal('', e.read.chomp)
assert_equal('', r.read.chomp)
end
d = Dir.tmpdir
ruby('-I', d, '-e', '') do |w, r, e|
assert_equal('', e.read.chomp)
assert_equal('', r.read.chomp)
end
end
def test_separator
ruby('-000', '-e', 'print gets') do |w, r, e|
w.write "foo\nbar\0baz"
w.close
assert_equal('', e.read)
assert_equal("foo\nbar\0baz", r.read)
end
ruby('-0141', '-e', 'print gets') do |w, r, e|
w.write "foo\nbar\0baz"
w.close
assert_equal('', e.read)
assert_equal("foo\nba", r.read)
end
ruby('-0e', 'print gets') do |w, r, e|
w.write "foo\nbar\0baz"
w.close
assert_equal('', e.read)
assert_equal("foo\nbar\0", r.read)
end
end
def test_autosplit
ruby('-an', '-F:', '-e', 'p $F') do |w, r, e|
w.puts "foo:bar:baz"
w.puts "qux:quux:quuux"
w.close
r = r.readlines.map {|l| l.chomp }
assert_equal(['["foo", "bar", "baz\n"]', '["qux", "quux", "quuux\n"]'], r)
end
end
def test_chdir
ruby('-C') do |w, r, e|
assert_match(/Can't chdir/, e.read)
end
ruby('-C', 'test_ruby_test_rubyoptions_foobarbazqux') do |w, r, e|
assert_match(/Can't chdir/, e.read)
end
d = Dir.tmpdir
ruby('-C', d, '-e', 'puts Dir.pwd') do |w, r, e|
assert_equal('', e.read)
assert(File.identical?(r.read.chomp, d))
end
end
def test_yydebug
ruby('-ye', '') do |w, r, e|
assert_equal("", r.read)
assert_nothing_raised { e.read }
end
ruby('--yydebug', '-e', '') do |w, r, e|
assert_equal("", r.read)
assert_nothing_raised { e.read }
end
end
def test_encoding
ruby('-Eutf-8') do |w, r, e|
w.puts "p '\u3042'"
w.close
assert_match(/invalid multibyte char/, e.read)
end
ruby('--encoding') do |w, r, e|
assert_match(/missing argument for --encoding/, e.read)
end
ruby('--encoding', 'test_ruby_test_rubyoptions_foobarbazqux') do |w, r, e|
assert_match(/unknown encoding name - test_ruby_test_rubyoptions_foobarbazqux \(RuntimeError\)/, e.read)
end
ruby('--encoding', 'utf-8') do |w, r, e|
w.puts "p '\u3042'"
w.close
assert_match(/invalid multibyte char/, e.read)
end
end
def test_syntax_check
ruby('-c', '-e', '1+1') do |w, r, e|
assert_equal('Syntax OK', r.read.chomp)
end
end
def test_invalid_option
ruby('--foobarbazqux') do |w, r, e|
assert_match(/invalid option --foobarbazqux/, e.read)
end
ruby("-\r", '-e', '') do |w, r, e|
assert_equal('', e.read)
assert_equal('', r.read)
end
ruby("-\rx") do |w, r, e|
assert_match(/invalid option -\\x0D \(-h will show valid options\) \(RuntimeError\)/, e.read)
end
ruby("-\x01") do |w, r, e|
assert_match(/invalid option -\\x01 \(-h will show valid options\) \(RuntimeError\)/, e.read)
end
ruby('-Z') do |w, r, e|
assert_match(/invalid option -Z \(-h will show valid options\) \(RuntimeError\)/, e.read)
end
end
def test_rubyopt
rubyopt_orig = ENV['RUBYOPT']
ENV['RUBYOPT'] = ' - -'
ruby do |w, r, e|
w.close
assert_equal('', e.read)
assert_equal('', r.read)
end
ENV['RUBYOPT'] = '-e "p 1"'
ruby do |w, r, e|
assert_match(/invalid switch in RUBYOPT: -e \(RuntimeError\)/, e.read)
end
ENV['RUBYOPT'] = '-T1'
ruby do |w, r, e|
assert_match(/no program input from stdin allowed in tainted mode \(SecurityError\)/, e.read)
end
ENV['RUBYOPT'] = '-T4'
ruby do |w, r, e|
end
ENV['RUBYOPT'] = '-KN -Eus-ascii'
ruby('-KU', '-Eutf-8') do |w, r, e|
w.puts "p '\u3042'"
w.close
assert_equal("\"\u3042\"", r.read.chomp.force_encoding(Encoding.find('utf-8')))
end
ensure
if rubyopt_orig
ENV['RUBYOPT'] = rubyopt_orig
else
ENV.delete('RUBYOPT')
end
end
def test_search
rubypath_orig = ENV['RUBYPATH']
path_orig = ENV['PATH']
t = Tempfile.new(["test_ruby_test_rubyoption", ".rb"])
t.puts "p 1"
t.close
@verbose = $VERBOSE
$VERBOSE = nil
ENV['PATH'] = File.dirname(t.path)
ruby('-S', File.basename(t.path)) do |w, r, e|
assert_equal('', e.read)
assert_equal('1', r.read.chomp)
end
ENV['RUBYPATH'] = File.dirname(t.path)
ruby('-S', File.basename(t.path)) do |w, r, e|
assert_equal('', e.read)
assert_equal('1', r.read.chomp)
end
ensure
if rubypath_orig
ENV['RUBYPATH'] = rubypath_orig
else
ENV.delete('RUBYPATH')
end
if path_orig
ENV['PATH'] = path_orig
else
ENV.delete('PATH')
end
t.close(true) if t
$VERBOSE = @verbose
end
def test_shebang
ruby do |w, r, e|
w.print "#! /test_r_u_b_y_test_r_u_b_y_options_foobarbazqux\r\np 1\r\n"
w.close
assert_match(/Can't exec \/test_r_u_b_y_test_r_u_b_y_options_foobarbazqux \(fatal\)/, e.read)
assert_equal('', r.read.chomp)
end
ruby do |w, r, e|
w.print "#! /test_r_u_b_y_test_r_u_b_y_options_foobarbazqux -foo -bar\r\np 1\r\n"
w.close
assert_match(/Can't exec \/test_r_u_b_y_test_r_u_b_y_options_foobarbazqux \(fatal\)/, e.read)
assert_equal('', r.read.chomp)
end
ruby do |w, r, e|
w.print "#!ruby -KU -Eutf-8\r\np \"\u3042\"\r\n"
w.close
assert_equal('', e.read.chomp)
assert_equal("\"\u3042\"", r.read.chomp.force_encoding(Encoding.find('utf-8')))
end
end
def test_sflag
ruby('-', '-abc', '-def=foo', '-ghi-jkl', '--', '-xyz') do |w, r, e|
w.print "#!ruby -s\np [$abc, $def, $ghi_jkl, $xyz]\n"
w.close
assert_equal('', e.read)
assert_equal('[true, "foo", true, nil]', r.read.chomp)
end
ruby('-', '-#') do |w, r, e|
w.print "#!ruby -s\n"
w.close
assert_match(/invalid name for global variable - -# \(NameError\)/, e.read)
assert_equal('', r.read.chomp)
end
ruby('-', '-#=foo') do |w, r, e|
w.print "#!ruby -s\n"
w.close
assert_match(/invalid name for global variable - -# \(NameError\)/, e.read)
assert_equal('', r.read.chomp)
end
end
end