2015-12-16 08:07:31 +03:00
|
|
|
# frozen_string_literal: false
|
2010-02-02 16:58:56 +03:00
|
|
|
require_relative 'test_optparse'
|
2003-11-05 13:09:58 +03:00
|
|
|
|
|
|
|
module TestOptionParser::NoArg
|
2016-10-14 11:20:26 +03:00
|
|
|
def setup
|
|
|
|
super
|
|
|
|
@opt.def_option "--with_underscore" do |x| @flag = x end
|
|
|
|
@opt.def_option "--with-hyphen" do |x| @flag = x end
|
|
|
|
end
|
|
|
|
|
2003-11-05 13:09:58 +03:00
|
|
|
class Def1 < TestOptionParser
|
|
|
|
include NoArg
|
|
|
|
def setup
|
|
|
|
super
|
|
|
|
@opt.def_option("-x") {|x| @flag = x}
|
|
|
|
@opt.def_option("--option") {|x| @flag = x}
|
|
|
|
end
|
|
|
|
end
|
|
|
|
class Def2 < TestOptionParser
|
|
|
|
include NoArg
|
|
|
|
def setup
|
|
|
|
super
|
|
|
|
@opt.def_option("-x", "--option") {|x| @flag = x}
|
|
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_short
|
2008-09-24 21:44:39 +04:00
|
|
|
assert_raise(OptionParser::InvalidOption) {@opt.parse!(%w"-xq")}
|
2003-11-05 13:09:58 +03:00
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"-x")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
@flag = nil
|
|
|
|
assert_equal(%w"foo", no_error {@opt.parse!(%w"-x foo")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_abbrev
|
2008-09-24 21:44:39 +04:00
|
|
|
assert_raise(OptionParser::InvalidOption) {@opt.parse!(%w"-oq")}
|
2003-11-05 13:09:58 +03:00
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"-o")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
@flag = nil
|
2008-09-24 21:44:39 +04:00
|
|
|
assert_raise(OptionParser::InvalidOption) {@opt.parse!(%w"-O")}
|
2004-12-05 13:39:58 +03:00
|
|
|
assert_nil(@flag)
|
2003-11-05 13:09:58 +03:00
|
|
|
@flag = nil
|
|
|
|
assert_equal(%w"foo", no_error {@opt.parse!(%w"-o foo")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_long
|
2008-09-24 21:44:39 +04:00
|
|
|
assert_raise(OptionParser::NeedlessArgument) {@opt.parse!(%w"--option=x")}
|
2003-11-05 13:09:58 +03:00
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"--opt")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
@flag = nil
|
|
|
|
assert_equal(%w"foo", no_error {@opt.parse!(%w"--opt foo")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
end
|
|
|
|
|
|
|
|
def test_ambiguous
|
|
|
|
@opt.def_option("--open") {|x|}
|
2008-09-24 21:44:39 +04:00
|
|
|
assert_raise(OptionParser::AmbiguousOption) {@opt.parse!(%w"--op")}
|
|
|
|
assert_raise(OptionParser::AmbiguousOption) {@opt.parse!(%w"-o")}
|
2003-11-05 13:09:58 +03:00
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"--opt")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
end
|
2016-10-14 11:20:26 +03:00
|
|
|
|
|
|
|
def test_hyphenize
|
|
|
|
@flag = nil
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"--with_underscore")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
@flag = nil
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"--with-underscore")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
@flag = nil
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"--with-hyphen")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
@flag = nil
|
|
|
|
assert_equal(%w"", no_error {@opt.parse!(%w"--with_hyphen")})
|
|
|
|
assert_equal(true, @flag)
|
|
|
|
end
|
2003-11-05 13:09:58 +03:00
|
|
|
end
|