/projects/jruby-1.7.3/test/externals/ruby1.9/ruby/test_rubyoptions.rb
Ruby | 556 lines | 474 code | 81 blank | 1 comment | 18 complexity | d29c6a01bbc2560e321493e93c8037a8 MD5 | raw file
- require 'test/unit'
- require 'tmpdir'
- require 'tempfile'
- require 'pathname'
- require_relative 'envutil'
- class TestRubyOptions < Test::Unit::TestCase
- def write_file(filename, content)
- File.open(filename, "w") {|f|
- f << content
- }
- end
- def with_tmpchdir
- Dir.mktmpdir {|d|
- d = Pathname.new(d).realpath.to_s
- Dir.chdir(d) {
- yield d
- }
- }
- end
- def test_source_file
- assert_in_out_err([], "", [], [])
- end
- def test_usage
- assert_in_out_err(%w(-h)) do |r, e|
- assert_operator(r.size, :<=, 24)
- assert_equal([], e)
- end
- assert_in_out_err(%w(--help)) do |r, e|
- assert_operator(r.size, :<=, 24)
- assert_equal([], e)
- end
- end
- def test_option_variables
- assert_in_out_err(["-e", 'p [$-p, $-l, $-a]']) do |r, e|
- assert_equal(["[false, false, false]"], r)
- assert_equal([], e)
- end
- assert_in_out_err(%w(-p -l -a -e) + ['p [$-p, $-l, $-a]'],
- "foo\nbar\nbaz\n") do |r, e|
- assert_equal(
- [ '[true, true, true]', 'foo',
- '[true, true, true]', 'bar',
- '[true, true, true]', 'baz' ], r)
- assert_equal([], e)
- end
- end
- def test_warning
- save_rubyopt = ENV['RUBYOPT']
- ENV['RUBYOPT'] = nil
- assert_in_out_err(%w(-W0 -e) + ['p $-W'], "", %w(0), [])
- assert_in_out_err(%w(-W1 -e) + ['p $-W'], "", %w(1), [])
- assert_in_out_err(%w(-Wx -e) + ['p $-W'], "", %w(1), [])
- assert_in_out_err(%w(-W -e) + ['p $-W'], "", %w(2), [])
- ensure
- ENV['RUBYOPT'] = save_rubyopt
- end
- def test_safe_level
- assert_in_out_err(%w(-T -e) + [""], "", [],
- /no -e allowed in tainted mode \(SecurityError\)/)
- assert_in_out_err(%w(-T4 -S foo.rb), "", [],
- /no -S allowed in tainted mode \(SecurityError\)/)
- end
- def test_debug
- assert_in_out_err(["--disable-gems", "-de", "p $DEBUG"], "", %w(true), [])
- assert_in_out_err(["--disable-gems", "--debug", "-e", "p $DEBUG"],
- "", %w(true), [])
- end
- def test_verbose
- assert_in_out_err(["-vve", ""]) do |r, e|
- assert_match(/^ruby #{RUBY_VERSION}(?:[p ]|dev).*? \[#{RUBY_PLATFORM}\]$/, r.join)
- assert_equal RUBY_DESCRIPTION, r.join.chomp
- assert_equal([], e)
- end
- assert_in_out_err(%w(--verbose -e) + ["p $VERBOSE"], "", %w(true), [])
- assert_in_out_err(%w(--verbose), "", [], [])
- end
- def test_copyright
- assert_in_out_err(%w(--copyright), "",
- /^ruby - Copyright \(C\) 1993-\d+ Yukihiro Matsumoto$/, [])
- assert_in_out_err(%w(--verbose -e) + ["p $VERBOSE"], "", %w(true), [])
- end
- def test_enable
- assert_in_out_err(%w(--enable all -e) + [""], "", [], [])
- assert_in_out_err(%w(--enable-all -e) + [""], "", [], [])
- assert_in_out_err(%w(--enable=all -e) + [""], "", [], [])
- assert_in_out_err(%w(--enable foobarbazqux -e) + [""], "", [],
- /unknown argument for --enable: `foobarbazqux'/)
- assert_in_out_err(%w(--enable), "", [], /missing argument for --enable/)
- end
- def test_disable
- assert_in_out_err(%w(--disable all -e) + [""], "", [], [])
- assert_in_out_err(%w(--disable-all -e) + [""], "", [], [])
- assert_in_out_err(%w(--disable=all -e) + [""], "", [], [])
- assert_in_out_err(%w(--disable foobarbazqux -e) + [""], "", [],
- /unknown argument for --disable: `foobarbazqux'/)
- assert_in_out_err(%w(--disable), "", [], /missing argument for --disable/)
- end
- def test_kanji
- assert_in_out_err(%w(-KU), "p '\u3042'") do |r, e|
- assert_equal("\"\u3042\"", r.join.force_encoding(Encoding::UTF_8))
- end
- assert_in_out_err(%w(-KE -e) + [""], "", [], [])
- assert_in_out_err(%w(-KS -e) + [""], "", [], [])
- assert_in_out_err(%w(-KN -e) + [""], "", [], [])
- end
- def test_version
- assert_in_out_err(%w(--version)) do |r, e|
- assert_match(/^ruby #{RUBY_VERSION}(?:[p ]|dev).*? \[#{RUBY_PLATFORM}\]$/, r.join)
- assert_equal RUBY_DESCRIPTION, r.join.chomp
- assert_equal([], e)
- end
- end
- def test_eval
- assert_in_out_err(%w(-e), "", [], /no code specified for -e \(RuntimeError\)/)
- end
- def test_require
- require "pp"
- assert_in_out_err(%w(-r pp -e) + ["pp 1"], "", %w(1), [])
- assert_in_out_err(%w(-rpp -e) + ["pp 1"], "", %w(1), [])
- assert_in_out_err(%w(-ep\ 1 -r), "", %w(1), [])
- assert_in_out_err(%w(-r), "", [], [])
- rescue LoadError
- end
- def test_include
- d = Dir.tmpdir
- assert_in_out_err(["-I" + d, "-e", ""], "", [], [])
- assert_in_out_err(["-I", d, "-e", ""], "", [], [])
- end
- def test_separator
- assert_in_out_err(%w(-000 -e) + ["print gets"], "foo\nbar\0baz", %W(foo bar\0baz), [])
- assert_in_out_err(%w(-0141 -e) + ["print gets"], "foo\nbar\0baz", %w(foo ba), [])
- assert_in_out_err(%w(-0e) + ["print gets"], "foo\nbar\0baz", %W(foo bar\0), [])
- end
- def test_autosplit
- assert_in_out_err(%w(-an -F: -e) + ["p $F"], "foo:bar:baz\nqux:quux:quuux\n",
- ['["foo", "bar", "baz\n"]', '["qux", "quux", "quuux\n"]'], [])
- end
- def test_chdir
- assert_in_out_err(%w(-C), "", [], /Can't chdir/)
- assert_in_out_err(%w(-C test_ruby_test_rubyoptions_foobarbazqux), "", [], /Can't chdir/)
- d = Dir.tmpdir
- assert_in_out_err(["-C", d, "-e", "puts Dir.pwd"]) do |r, e|
- assert(File.identical?(r.join, d))
- assert_equal([], e)
- end
- end
- def test_yydebug
- assert_in_out_err(["-ye", ""]) do |r, e|
- assert_equal([], r)
- assert_not_equal([], e)
- end
- assert_in_out_err(%w(--yydebug -e) + [""]) do |r, e|
- assert_equal([], r)
- assert_not_equal([], e)
- end
- end
- def test_encoding
- assert_in_out_err(%w(-Eutf-8), "p '\u3042'", [], /invalid multibyte char/)
- assert_in_out_err(%w(--encoding), "", [], /missing argument for --encoding/)
- assert_in_out_err(%w(--encoding test_ruby_test_rubyoptions_foobarbazqux), "", [],
- /unknown encoding name - test_ruby_test_rubyoptions_foobarbazqux \(RuntimeError\)/)
- assert_in_out_err(%w(--encoding utf-8), "p '\u3042'", [], /invalid multibyte char/)
- end
- def test_syntax_check
- assert_in_out_err(%w(-c -e a=1+1 -e !a), "", ["Syntax OK"], [])
- end
- def test_invalid_option
- assert_in_out_err(%w(--foobarbazqux), "", [], /invalid option --foobarbazqux/)
- assert_in_out_err(%W(-\r -e) + [""], "", [], [])
- assert_in_out_err(%W(-\rx), "", [], /invalid option -\\x0D \(-h will show valid options\) \(RuntimeError\)/)
- assert_in_out_err(%W(-\x01), "", [], /invalid option -\\x01 \(-h will show valid options\) \(RuntimeError\)/)
- assert_in_out_err(%w(-Z), "", [], /invalid option -Z \(-h will show valid options\) \(RuntimeError\)/)
- end
- def test_rubyopt
- rubyopt_orig = ENV['RUBYOPT']
- ENV['RUBYOPT'] = ' - -'
- assert_in_out_err([], "", [], [])
- ENV['RUBYOPT'] = '-e "p 1"'
- assert_in_out_err([], "", [], /invalid switch in RUBYOPT: -e \(RuntimeError\)/)
- ENV['RUBYOPT'] = '-T1'
- assert_in_out_err(["--disable-gems"], "", [], /no program input from stdin allowed in tainted mode \(SecurityError\)/)
- ENV['RUBYOPT'] = '-T4'
- assert_in_out_err(["--disable-gems"], "", [], /no program input from stdin allowed in tainted mode \(SecurityError\)/)
- ENV['RUBYOPT'] = '-Eus-ascii -KN'
- assert_in_out_err(%w(-Eutf-8 -KU), "p '\u3042'") do |r, e|
- assert_equal("\"\u3042\"", r.join.force_encoding(Encoding::UTF_8))
- assert_equal([], e)
- 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)
- assert_in_out_err(%w(-S) + [File.basename(t.path)], "", %w(1), [])
- ENV['RUBYPATH'] = File.dirname(t.path)
- assert_in_out_err(%w(-S) + [File.basename(t.path)], "", %w(1), [])
- 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
- assert_in_out_err([], "#! /test_r_u_b_y_test_r_u_b_y_options_foobarbazqux\r\np 1\r\n",
- [], /: no Ruby script found in input/)
- assert_in_out_err([], "#! /test_r_u_b_y_test_r_u_b_y_options_foobarbazqux -foo -bar\r\np 1\r\n",
- [], /: no Ruby script found in input/)
- assert_in_out_err([], "#!ruby -KU -Eutf-8\r\np \"\u3042\"\r\n") do |r, e|
- assert_equal("\"\u3042\"", r.join.force_encoding(Encoding::UTF_8))
- assert_equal([], e)
- end
- bug4118 = '[ruby-dev:42680]'
- assert_in_out_err(%w[], "#!/bin/sh\n""#!shebang\n""#!ruby\n""puts __LINE__\n",
- %w[4], [], bug4118)
- assert_in_out_err(%w[-x], "#!/bin/sh\n""#!shebang\n""#!ruby\n""puts __LINE__\n",
- %w[4], [], bug4118)
- end
- def test_sflag
- assert_in_out_err(%w(- -abc -def=foo -ghi-jkl -- -xyz),
- "#!ruby -s\np [$abc, $def, $ghi_jkl, defined?($xyz)]\n",
- ['[true, "foo", true, nil]'], [])
- assert_in_out_err(%w(- -#), "#!ruby -s\n", [],
- /invalid name for global variable - -# \(NameError\)/)
- assert_in_out_err(%w(- -#=foo), "#!ruby -s\n", [],
- /invalid name for global variable - -# \(NameError\)/)
- end
- def test_assignment_in_conditional
- t = Tempfile.new(["test_ruby_test_rubyoption", ".rb"])
- t.puts "if a = 1"
- t.puts "end"
- t.puts "0.times do"
- t.puts " if b = 2"
- t.puts " a += b"
- t.puts " end"
- t.puts "end"
- t.close
- err = ["#{t.path}:1: warning: found = in conditional, should be ==",
- "#{t.path}:4: warning: found = in conditional, should be =="]
- err = /\A(#{Regexp.quote(t.path)}):1(: warning: found = in conditional, should be ==)\n\1:4\2\Z/
- bug2136 = '[ruby-dev:39363]'
- assert_in_out_err(["-w", t.path], "", [], err, bug2136)
- assert_in_out_err(["-wr", t.path, "-e", ""], "", [], err, bug2136)
- ensure
- t.close(true) if t
- end
- def test_indentation_check
- t = Tempfile.new(["test_ruby_test_rubyoption", ".rb"])
- t.puts "begin"
- t.puts " end"
- t.close
- err = ["#{t.path}:2: warning: mismatched indentations at 'end' with 'begin' at 1"]
- assert_in_out_err(["-w", t.path], "", [], err)
- assert_in_out_err(["-wr", t.path, "-e", ""], "", [], err)
- t.open
- t.puts "# -*- warn-indent: false -*-"
- t.puts "begin"
- t.puts " end"
- t.close
- assert_in_out_err(["-w", t.path], "", [], [], '[ruby-core:25442]')
- err = ["#{t.path}:4: warning: mismatched indentations at 'end' with 'begin' at 3"]
- t.open
- t.puts "# -*- warn-indent: false -*-"
- t.puts "# -*- warn-indent: true -*-"
- t.puts "begin"
- t.puts " end"
- t.close
- assert_in_out_err(["-w", t.path], "", [], err, '[ruby-core:25442]')
- err = ["#{t.path}:4: warning: mismatched indentations at 'end' with 'begin' at 2"]
- t.open
- t.puts "# -*- warn-indent: true -*-"
- t.puts "begin"
- t.puts "# -*- warn-indent: false -*-"
- t.puts " end"
- t.close
- assert_in_out_err(["-w", t.path], "", [], [], '[ruby-core:25442]')
- ensure
- t.close(true) if t
- end
- def test_notfound
- notexist = "./notexist.rb"
- rubybin = Regexp.quote(EnvUtil.rubybin)
- pat = Regexp.quote(notexist)
- bug1573 = '[ruby-core:23717]'
- assert_equal(false, File.exist?(notexist))
- assert_in_out_err(["-r", notexist, "-ep"], "", [], /.* -- #{pat} \(LoadError\)/, bug1573)
- assert_in_out_err([notexist], "", [], /#{rubybin}:.* -- #{pat} \(LoadError\)/, bug1573)
- end
- def test_program_name
- ruby = EnvUtil.rubybin
- IO.popen([ruby, '-e', 'print $0']) {|f|
- assert_equal('-e', f.read)
- }
- IO.popen([ruby, '-'], 'r+') {|f|
- f << 'print $0'
- f.close_write
- assert_equal('-', f.read)
- }
- Dir.mktmpdir {|d|
- n1 = File.join(d, 't1')
- open(n1, 'w') {|f| f << 'print $0' }
- IO.popen([ruby, n1]) {|f|
- assert_equal(n1, f.read)
- }
- if File.respond_to? :symlink
- n2 = File.join(d, 't2')
- File.symlink(n1, n2)
- IO.popen([ruby, n2]) {|f|
- assert_equal(n2, f.read)
- }
- end
- Dir.chdir(d) {
- n3 = '-e'
- open(n3, 'w') {|f| f << 'print $0' }
- IO.popen([ruby, '--', n3]) {|f|
- assert_equal(n3, f.read)
- }
- n4 = '-'
- IO.popen([ruby, '--', n4], 'r+') {|f|
- f << 'print $0'
- f.close_write
- assert_equal(n4, f.read)
- }
- }
- }
- end
- def test_set_program_name
- skip "platform dependent feature" if /linux|freebsd|netbsd|openbsd|darwin/ !~ RUBY_PLATFORM
- with_tmpchdir do
- write_file("test-script", "$0 = 'hello world'; sleep 60")
- pid = spawn(EnvUtil.rubybin, "test-script")
- sleep 0.1
- ps = `ps -p #{pid} -o command`
- assert_match(/hello world/, ps)
- Process.kill :KILL, pid
- end
- end
- def test_segv_test
- opts = {}
- if /mswin|mingw/ =~ RUBY_PLATFORM
- additional = '[\s\w\.\']*'
- else
- opts[:rlimit_core] = 0
- additional = ""
- end
- assert_in_out_err(["-e", "Process.kill :SEGV, $$"], "", [],
- %r(\A
- -e:(?:1:)?\s\[BUG\]\sSegmentation\sfault\n
- #{ Regexp.quote(RUBY_DESCRIPTION) }\n\n
- --\sControl\sframe\sinformation\s-+\n
- (?:c:.*\n)*
- (?:
- --\sRuby\slevel\sbacktrace\sinformation\s----------------------------------------\n
- -e:1:in\s\`<main>\'\n
- -e:1:in\s\`kill\'\n
- )?
- \n
- (?:
- --\sC\slevel\sbacktrace\sinformation\s-------------------------------------------\n
- (?:(?:.*\s)?\[0x\h+\]\n)*\n
- )?
- (?m:.*)
- \[NOTE\]\n
- You\smay\shave\sencountered\sa\sbug\sin\sthe\sRuby\sinterpreter\sor\sextension\slibraries.\n
- Bug\sreports\sare\swelcome.\n
- For\sdetails:\shttp:\/\/www.ruby-lang.org/bugreport.html\n
- \n
- (?:#{additional})
- \z
- )x,
- nil,
- opts)
- end
- def test_DATA
- t = Tempfile.new(["test_ruby_test_rubyoption", ".rb"])
- t.puts "puts DATA.read.inspect"
- t.puts "__END__"
- t.puts "foo"
- t.puts "bar"
- t.puts "baz"
- t.close
- assert_in_out_err([t.path], "", %w("foo\\nbar\\nbaz\\n"), [])
- ensure
- t.close(true) if t
- end
- def test_unused_variable
- feature3446 = '[ruby-dev:41620]'
- assert_in_out_err(["-we", "a=1"], "", [], [], feature3446)
- assert_in_out_err(["-we", "def foo\n a=1\nend"], "", [], ["-e:2: warning: assigned but unused variable - a"], feature3446)
- assert_in_out_err(["-we", "def foo\n eval('a=1')\nend"], "", [], [], feature3446)
- assert_in_out_err(["-we", "1.times do\n a=1\nend"], "", [], [], feature3446)
- assert_in_out_err(["-we", "def foo\n 1.times do\n a=1\n end\nend"], "", [], ["-e:3: warning: assigned but unused variable - a"], feature3446)
- assert_in_out_err(["-we", "def foo\n"" 1.times do |a| end\n""end"], "", [], [])
- end
- def test_shadowing_variable
- bug4130 = '[ruby-dev:42718]'
- assert_in_out_err(["-we", "def foo\n"" a=1\n"" 1.times do |a| end\n"" a\n""end"],
- "", [], ["-e:3: warning: shadowing outer local variable - a"], bug4130)
- assert_in_out_err(["-we", "def foo\n"" a=1\n"" 1.times do |a| end\n""end"],
- "", [],
- ["-e:3: warning: shadowing outer local variable - a",
- "-e:2: warning: assigned but unused variable - a",
- ], bug4130)
- end
- def test_script_from_stdin
- begin
- require 'pty'
- require 'io/console'
- rescue LoadError
- return
- end
- require 'timeout'
- result = nil
- IO.pipe {|r, w|
- begin
- PTY.open {|m, s|
- s.echo = false
- m.print("\C-d")
- pid = spawn(EnvUtil.rubybin, :in => s, :out => w)
- w.close
- assert_nothing_raised('[ruby-dev:37798]') do
- result = Timeout.timeout(3) {r.read}
- end
- Process.wait pid
- }
- rescue RuntimeError
- skip $!
- end
- }
- assert_equal("", result, '[ruby-dev:37798]')
- IO.pipe {|r, w|
- PTY.open {|m, s|
- s.echo = false
- pid = spawn(EnvUtil.rubybin, :in => s, :out => w)
- w.close
- m.print("$stdin.read; p $stdin.gets\n\C-d")
- m.print("abc\n\C-d")
- m.print("zzz\n")
- result = r.read
- Process.wait pid
- }
- }
- assert_equal("\"zzz\\n\"\n", result, '[ruby-core:30910]')
- end
- def test_unmatching_glob
- bug3851 = '[ruby-core:32478]'
- a = "a[foo"
- Dir.mktmpdir do |dir|
- open(File.join(dir, a), "w") {|f| f.puts("p 42")}
- assert_in_out_err(["-C", dir, a], "", ["42"], [], bug3851)
- File.unlink(File.join(dir, a))
- assert_in_out_err(["-C", dir, a], "", [], /LoadError/, bug3851)
- end
- end
- end