acquia_toolbelt 2.3.0 → 2.3.1

data/lib/vendor/thor/spec/thor_spec.rb

@@ -0,0 +1,499 @@
+require 'helper'
+
+describe Thor do
+  describe "#method_option" do
+    it "sets options to the next method to be invoked" do
+      args = ["foo", "bar", "--force"]
+      arg, options = MyScript.start(args)
+      expect(options).to eq({ "force" => true })
+    end
+
+    describe ":lazy_default" do
+      it "is absent when option is not specified" do
+        arg, options = MyScript.start(["with_optional"])
+        expect(options).to eq({})
+      end
+
+      it "sets a default that can be overridden for strings" do
+        arg, options = MyScript.start(["with_optional", "--lazy"])
+        expect(options).to eq({ "lazy" => "yes" })
+
+        arg, options = MyScript.start(["with_optional", "--lazy", "yesyes!"])
+        expect(options).to eq({ "lazy" => "yesyes!" })
+      end
+
+      it "sets a default that can be overridden for numerics" do
+        arg, options = MyScript.start(["with_optional", "--lazy-numeric"])
+        expect(options).to eq({ "lazy_numeric" => 42 })
+
+        arg, options = MyScript.start(["with_optional", "--lazy-numeric", 20000])
+        expect(options).to eq({ "lazy_numeric" => 20000 })
+      end
+
+      it "sets a default that can be overridden for arrays" do
+        arg, options = MyScript.start(["with_optional", "--lazy-array"])
+        expect(options).to eq({ "lazy_array" => %w[eat at joes] })
+
+        arg, options = MyScript.start(["with_optional", "--lazy-array", "hello", "there"])
+        expect(options).to eq({ "lazy_array" => %w[hello there] })
+      end
+
+      it "sets a default that can be overridden for hashes" do
+        arg, options = MyScript.start(["with_optional", "--lazy-hash"])
+        expect(options).to eq({ "lazy_hash" => {'swedish' => 'meatballs'} })
+
+        arg, options = MyScript.start(["with_optional", "--lazy-hash", "polish:sausage"])
+        expect(options).to eq({ "lazy_hash" => {'polish' => 'sausage'} })
+      end
+    end
+
+    describe "when :for is supplied" do
+      it "updates an already defined command" do
+        args, options = MyChildScript.start(["animal", "horse", "--other=fish"])
+        expect(options[:other]).to eq("fish")
+      end
+
+      describe "and the target is on the parent class" do
+        it "updates an already defined command" do
+          args = ["example_default_command", "my_param", "--new-option=verified"]
+          options = Scripts::MyScript.start(args)
+          expect(options[:new_option]).to eq("verified")
+        end
+
+        it "adds a command to the command list if the updated command is on the parent class" do
+          expect(Scripts::MyScript.commands["example_default_command"]).to be
+        end
+
+        it "clones the parent command" do
+          expect(Scripts::MyScript.commands["example_default_command"]).not_to eq(MyChildScript.commands["example_default_command"])
+        end
+      end
+    end
+  end
+
+  describe "#default_command" do
+    it "sets a default command" do
+      expect(MyScript.default_command).to eq("example_default_command")
+    end
+
+    it "invokes the default command if no command is specified" do
+      expect(MyScript.start([])).to eq("default command")
+    end
+
+    it "invokes the default command if no command is specified even if switches are given" do
+      expect(MyScript.start(["--with", "option"])).to eq({"with"=>"option"})
+    end
+
+    it "inherits the default command from parent" do
+      expect(MyChildScript.default_command).to eq("example_default_command")
+    end
+  end
+
+  describe "#stop_on_unknown_option!" do
+    my_script = Class.new(Thor) do
+      class_option "verbose",   :type => :boolean
+      class_option "mode",      :type => :string
+
+      stop_on_unknown_option! :exec
+
+      desc "exec", "Run a command"
+      def exec(*args)
+        return options, args
+      end
+
+      desc "boring", "An ordinary command"
+      def boring(*args)
+        return options, args
+      end
+    end
+
+    it "passes remaining args to command when it encounters a non-option" do
+      expect(my_script.start(%w[exec command --verbose])).to eq [{}, ["command", "--verbose"]]
+    end
+
+    it "passes remaining args to command when it encounters an unknown option" do
+      expect(my_script.start(%w[exec --foo command --bar])).to eq [{}, ["--foo", "command", "--bar"]]
+    end
+
+    it "still accepts options that are given before non-options" do
+      expect(my_script.start(%w[exec --verbose command --foo])).to eq [{"verbose" => true}, ["command", "--foo"]]
+    end
+
+    it "still accepts options that require a value" do
+      expect(my_script.start(%w[exec --mode rashly command])).to eq [{"mode" => "rashly"}, ["command"]]
+    end
+
+    it "still passes everything after -- to command" do
+      expect(my_script.start(%w[exec -- --verbose])).to eq [{}, ["--verbose"]]
+    end
+
+    it "does not affect ordinary commands"  do
+      expect(my_script.start(%w[boring command --verbose])).to eq [{"verbose" => true}, ["command"]]
+    end
+
+    context "when provided with multiple command names" do
+      klass = Class.new(Thor) do
+        stop_on_unknown_option! :foo, :bar
+      end
+      it "affects all specified commands" do
+        expect(klass.stop_on_unknown_option?(double(:name => "foo"))).to be_true
+        expect(klass.stop_on_unknown_option?(double(:name => "bar"))).to be_true
+        expect(klass.stop_on_unknown_option?(double(:name => "baz"))).to be_false
+      end
+    end
+
+    context "when invoked several times" do
+      klass = Class.new(Thor) do
+        stop_on_unknown_option! :foo
+        stop_on_unknown_option! :bar
+      end
+      it "affects all specified commands" do
+        expect(klass.stop_on_unknown_option?(double(:name => "foo"))).to be_true
+        expect(klass.stop_on_unknown_option?(double(:name => "bar"))).to be_true
+        expect(klass.stop_on_unknown_option?(double(:name => "baz"))).to be_false
+      end
+    end
+
+    it "doesn't break new" do
+      expect(my_script.new).to be_a(Thor)
+    end
+  end
+
+  describe "#map" do
+    it "calls the alias of a method if one is provided" do
+      expect(MyScript.start(["-T", "fish"])).to eq(["fish"])
+    end
+
+    it "calls the alias of a method if several are provided via #map" do
+      expect(MyScript.start(["-f", "fish"])).to eq(["fish", {}])
+      expect(MyScript.start(["--foo", "fish"])).to eq(["fish", {}])
+    end
+
+    it "inherits all mappings from parent" do
+      expect(MyChildScript.default_command).to eq("example_default_command")
+    end
+  end
+
+  describe "#package_name" do
+    it "provides a proper description for a command when the package_name is assigned" do
+      content = capture(:stdout) { PackageNameScript.start(["help"]) }
+      expect(content).to match(/Baboon commands:/m)
+    end
+
+    # TODO: remove this, might be redundant, just wanted to prove full coverage
+    it "provides a proper description for a command when the package_name is NOT assigned" do
+      content = capture(:stdout) { MyScript.start(["help"]) }
+      expect(content).to match(/Commands:/m)
+    end
+  end
+
+  describe "#desc" do
+    it "provides description for a command" do
+      content = capture(:stdout) { MyScript.start(["help"]) }
+      expect(content).to match(/thor my_script:zoo\s+# zoo around/m)
+    end
+
+    it "provides no namespace if $thor_runner is false" do
+      begin
+        $thor_runner = false
+        content = capture(:stdout) { MyScript.start(["help"]) }
+        expect(content).to match(/thor zoo\s+# zoo around/m)
+      ensure
+        $thor_runner = true
+      end
+    end
+
+    describe "when :for is supplied" do
+      it "overwrites a previous defined command" do
+        expect(capture(:stdout) { MyChildScript.start(["help"]) }).to match(/animal KIND \s+# fish around/m)
+      end
+    end
+
+    describe "when :hide is supplied" do
+      it "does not show the command in help" do
+        expect(capture(:stdout) { MyScript.start(["help"]) }).not_to match(/this is hidden/m)
+      end
+
+      it "but the command is still invokable, does not show the command in help" do
+        expect(MyScript.start(["hidden", "yesyes"])).to eq(["yesyes"])
+      end
+    end
+  end
+
+  describe "#method_options" do
+    it "sets default options if called before an initializer" do
+      options = MyChildScript.class_options
+      expect(options[:force].type).to eq(:boolean)
+      expect(options[:param].type).to eq(:numeric)
+    end
+
+    it "overwrites default options if called on the method scope" do
+      args = ["zoo", "--force", "--param", "feathers"]
+      options = MyChildScript.start(args)
+      expect(options).to eq({ "force" => true, "param" => "feathers" })
+    end
+
+    it "allows default options to be merged with method options" do
+      args = ["animal", "bird", "--force", "--param", "1.0", "--other", "tweets"]
+      arg, options = MyChildScript.start(args)
+      expect(arg).to eq('bird')
+      expect(options).to eq({ "force"=>true, "param"=>1.0, "other"=>"tweets" })
+    end
+  end
+
+  describe "#start" do
+    it "calls a no-param method when no params are passed" do
+      expect(MyScript.start(["zoo"])).to eq(true)
+    end
+
+    it "calls a single-param method when a single param is passed" do
+      expect(MyScript.start(["animal", "fish"])).to eq(["fish"])
+    end
+
+    it "does not set options in attributes" do
+      expect(MyScript.start(["with_optional", "--all"])).to eq([nil, { "all" => true }, []])
+    end
+
+    it "raises an error if the wrong number of params are provided" do
+      arity_asserter = lambda do |args, msg|
+        stderr = capture(:stderr) { Scripts::Arities.start(args) }
+        expect(stderr.strip).to eq(msg)
+      end
+      arity_asserter.call ["zero_args",    "one"         ], %Q'ERROR: "thor zero_args" was called with arguments ["one"]\nUsage: "thor scripts:arities:zero_args"'
+      arity_asserter.call ["one_arg"                     ], %Q'ERROR: "thor one_arg" was called with no arguments\nUsage: "thor scripts:arities:one_arg ARG"'
+      arity_asserter.call ["one_arg",      "one", "two"  ], %Q'ERROR: "thor one_arg" was called with arguments ["one", "two"]\nUsage: "thor scripts:arities:one_arg ARG"'
+      arity_asserter.call ["one_arg",      "one", "two"  ], %Q'ERROR: "thor one_arg" was called with arguments ["one", "two"]\nUsage: "thor scripts:arities:one_arg ARG"'
+      arity_asserter.call ["two_args",     "one"         ], %Q'ERROR: "thor two_args" was called with arguments ["one"]\nUsage: "thor scripts:arities:two_args ARG1 ARG2"'
+      arity_asserter.call ["optional_arg", "one", "two"  ], %Q'ERROR: "thor optional_arg" was called with arguments ["one", "two"]\nUsage: "thor scripts:arities:optional_arg [ARG]"'
+    end
+
+    it "raises an error if the invoked command does not exist" do
+      expect(capture(:stderr) { Amazing.start(["animal"]) }.strip).to eq('Could not find command "animal" in "amazing" namespace.')
+    end
+
+    it "calls method_missing if an unknown method is passed in" do
+      expect(MyScript.start(["unk", "hello"])).to eq([:unk, ["hello"]])
+    end
+
+    it "does not call a private method no matter what" do
+      expect(capture(:stderr) { MyScript.start(["what"]) }.strip).to eq('Could not find command "what" in "my_script" namespace.')
+    end
+
+    it "uses command default options" do
+      options = MyChildScript.start(["animal", "fish"]).last
+      expect(options).to eq({ "other" => "method default" })
+    end
+
+    it "raises when an exception happens within the command call" do
+      expect{ MyScript.start(["call_myself_with_wrong_arity"]) }.to raise_error(ArgumentError)
+    end
+
+    context "when the user enters an unambiguous substring of a command" do
+      it "invokes a command" do
+        expect(MyScript.start(["z"])).to eq(MyScript.start(["zoo"]))
+      end
+
+      it "invokes a command, even when there's an alias it resolves to the same command" do
+        expect(MyScript.start(["hi", "arg"])).to eq(MyScript.start(["hidden", "arg"]))
+      end
+
+      it "invokes an alias" do
+        expect(MyScript.start(["animal_pri"])).to eq(MyScript.start(["zoo"]))
+      end
+    end
+
+    context "when the user enters an ambiguous substring of a command" do
+      it "raises an exception and displays a message that explains the ambiguity" do
+        shell = Thor::Base.shell.new
+        expect(shell).to receive(:error).with('Ambiguous command call matches [call_myself_with_wrong_arity, call_unexistent_method]')
+        MyScript.start(["call"], :shell => shell)
+      end
+
+      it "raises an exception when there is an alias" do
+        shell = Thor::Base.shell.new
+        expect(shell).to receive(:error).with('Ambiguous command f matches [foo, fu]')
+        MyScript.start(["f"], :shell => shell)
+      end
+    end
+
+  end
+
+  describe "#help" do
+    def shell
+      @shell ||= Thor::Base.shell.new
+    end
+
+    describe "on general" do
+      before do
+        @content = capture(:stdout) { MyScript.help(shell) }
+      end
+
+      it "provides useful help info for the help method itself" do
+        expect(@content).to match(/help \[COMMAND\]\s+# Describe available commands/)
+      end
+
+      it "provides useful help info for a method with params" do
+        expect(@content).to match(/animal TYPE\s+# horse around/)
+      end
+
+      it "uses the maximum terminal size to show commands" do
+        expect(@shell).to receive(:terminal_width).and_return(80)
+        content = capture(:stdout) { MyScript.help(shell) }
+        expect(content).to match(/aaa\.\.\.$/)
+      end
+
+      it "provides description for commands from classes in the same namespace" do
+        expect(@content).to match(/baz\s+# do some bazing/)
+      end
+
+      it "shows superclass commands" do
+        content = capture(:stdout) { MyChildScript.help(shell) }
+        expect(content).to match(/foo BAR \s+# do some fooing/)
+      end
+
+      it "shows class options information" do
+        content = capture(:stdout) { MyChildScript.help(shell) }
+        expect(content).to match(/Options\:/)
+        expect(content).to match(/\[\-\-param=N\]/)
+      end
+
+      it "injects class arguments into default usage" do
+        content = capture(:stdout) { Scripts::MyScript.help(shell) }
+        expect(content).to match(/zoo ACCESSOR \-\-param\=PARAM/)
+      end
+    end
+
+    describe "for a specific command" do
+      it "provides full help info when talking about a specific command" do
+        expect(capture(:stdout) { MyScript.command_help(shell, "foo") }).to eq(<<-END)
+Usage:
+  thor my_script:foo BAR
+
+Options:
+  [--force]  # Force to do some fooing
+
+do some fooing
+  This is more info!
+  Everyone likes more info!
+END
+      end
+
+      it "raises an error if the command can't be found" do
+        expect {
+          MyScript.command_help(shell, "unknown")
+        }.to raise_error(Thor::UndefinedCommandError, 'Could not find command "unknown" in "my_script" namespace.')
+      end
+
+      it "normalizes names before claiming they don't exist" do
+        expect(capture(:stdout) { MyScript.command_help(shell, "name-with-dashes") }).to match(/thor my_script:name-with-dashes/)
+      end
+
+      it "uses the long description if it exists" do
+        expect(capture(:stdout) { MyScript.command_help(shell, "long_description") }).to eq(<<-HELP)
+Usage:
+  thor my_script:long_description
+
+Description:
+  This is a really really really long description. Here you go. So very long.
+
+  It even has two paragraphs.
+HELP
+      end
+
+      it "doesn't assign the long description to the next command without one" do
+        expect(capture(:stdout) {
+          MyScript.command_help(shell, "name_with_dashes")
+        }).not_to match(/so very long/i)
+      end
+    end
+
+    describe "instance method" do
+      it "calls the class method" do
+        expect(capture(:stdout) { MyScript.start(["help"]) }).to match(/Commands:/)
+      end
+
+      it "calls the class method" do
+        expect(capture(:stdout) { MyScript.start(["help", "foo"]) }).to match(/Usage:/)
+      end
+    end
+  end
+
+  describe "when creating commands" do
+    it "prints a warning if a public method is created without description or usage" do
+      expect(capture(:stdout) {
+        klass = Class.new(Thor)
+        klass.class_eval "def hello_from_thor; end"
+      }).to match(/\[WARNING\] Attempted to create command "hello_from_thor" without usage or description/)
+    end
+
+    it "does not print if overwriting a previous command" do
+      expect(capture(:stdout) {
+        klass = Class.new(Thor)
+        klass.class_eval "def help; end"
+      }).to be_empty
+    end
+  end
+
+  describe "edge-cases" do
+    it "can handle boolean options followed by arguments" do
+      klass = Class.new(Thor) do
+        method_option :loud, :type => :boolean
+        desc "hi NAME", "say hi to name"
+        def hi(name)
+          name.upcase! if options[:loud]
+          "Hi #{name}"
+        end
+      end
+
+      expect(klass.start(["hi", "jose"])).to eq("Hi jose")
+      expect(klass.start(["hi", "jose", "--loud"])).to eq("Hi JOSE")
+      expect(klass.start(["hi", "--loud", "jose"])).to eq("Hi JOSE")
+    end
+
+    it "passes through unknown options" do
+      klass = Class.new(Thor) do
+        desc "unknown", "passing unknown options"
+        def unknown(*args)
+          args
+        end
+      end
+
+      expect(klass.start(["unknown", "foo", "--bar", "baz", "bat", "--bam"])).to eq(["foo", "--bar", "baz", "bat", "--bam"])
+      expect(klass.start(["unknown", "--bar", "baz"])).to eq(["--bar", "baz"])
+    end
+
+    it "does not pass through unknown options with strict args" do
+      klass = Class.new(Thor) do
+        strict_args_position!
+
+        desc "unknown", "passing unknown options"
+        def unknown(*args)
+          args
+        end
+      end
+
+      expect(klass.start(["unknown", "--bar", "baz"])).to eq([])
+      expect(klass.start(["unknown", "foo", "--bar", "baz"])).to eq(["foo"])
+    end
+
+    it "strict args works in the inheritance chain" do
+      parent = Class.new(Thor) do
+        strict_args_position!
+      end
+
+      klass = Class.new(parent) do
+        desc "unknown", "passing unknown options"
+        def unknown(*args)
+          args
+        end
+      end
+
+      expect(klass.start(["unknown", "--bar", "baz"])).to eq([])
+      expect(klass.start(["unknown", "foo", "--bar", "baz"])).to eq(["foo"])
+    end
+
+    it "send as a command name" do
+      expect(MyScript.start(["send"])).to eq(true)
+    end
+  end
+end

data/lib/vendor/thor/spec/util_spec.rb

@@ -0,0 +1,196 @@
+require 'helper'
+
+module Thor::Util
+  def self.clear_user_home!
+    @@user_home = nil
+  end
+end
+
+describe Thor::Util do
+  describe "#find_by_namespace" do
+    it "returns 'default' if no namespace is given" do
+      expect(Thor::Util.find_by_namespace('')).to eq(Scripts::MyDefaults)
+    end
+
+    it "adds 'default' if namespace starts with :" do
+      expect(Thor::Util.find_by_namespace(':child')).to eq(Scripts::ChildDefault)
+    end
+
+    it "returns nil if the namespace can't be found" do
+      expect(Thor::Util.find_by_namespace('thor:core_ext:ordered_hash')).to be_nil
+    end
+
+    it "returns a class if it matches the namespace" do
+      expect(Thor::Util.find_by_namespace('app:broken:counter')).to eq(BrokenCounter)
+    end
+
+    it "matches classes default namespace" do
+      expect(Thor::Util.find_by_namespace('scripts:my_script')).to eq(Scripts::MyScript)
+    end
+  end
+
+  describe "#namespace_from_thor_class" do
+    it "replaces constant nesting with command namespacing" do
+      expect(Thor::Util.namespace_from_thor_class("Foo::Bar::Baz")).to eq("foo:bar:baz")
+    end
+
+    it "snake-cases component strings" do
+      expect(Thor::Util.namespace_from_thor_class("FooBar::BarBaz::BazBoom")).to eq("foo_bar:bar_baz:baz_boom")
+    end
+
+    it "accepts class and module objects" do
+      expect(Thor::Util.namespace_from_thor_class(Thor::CoreExt::OrderedHash)).to eq("thor:core_ext:ordered_hash")
+      expect(Thor::Util.namespace_from_thor_class(Thor::Util)).to eq("thor:util")
+    end
+
+    it "removes Thor::Sandbox namespace" do
+      expect(Thor::Util.namespace_from_thor_class("Thor::Sandbox::Package")).to eq("package")
+    end
+  end
+
+  describe "#namespaces_in_content" do
+    it "returns an array of names of constants defined in the string" do
+      list = Thor::Util.namespaces_in_content("class Foo; class Bar < Thor; end; end; class Baz; class Bat; end; end")
+      expect(list).to include("foo:bar")
+      expect(list).not_to include("bar:bat")
+    end
+
+    it "doesn't put the newly-defined constants in the enclosing namespace" do
+      Thor::Util.namespaces_in_content("class Blat; end")
+      expect(defined?(Blat)).not_to be
+      expect(defined?(Thor::Sandbox::Blat)).to be
+    end
+  end
+
+  describe "#snake_case" do
+    it "preserves no-cap strings" do
+      expect(Thor::Util.snake_case("foo")).to eq("foo")
+      expect(Thor::Util.snake_case("foo_bar")).to eq("foo_bar")
+    end
+
+    it "downcases all-caps strings" do
+      expect(Thor::Util.snake_case("FOO")).to eq("foo")
+      expect(Thor::Util.snake_case("FOO_BAR")).to eq("foo_bar")
+    end
+
+    it "downcases initial-cap strings" do
+      expect(Thor::Util.snake_case("Foo")).to eq("foo")
+    end
+
+    it "replaces camel-casing with underscores" do
+      expect(Thor::Util.snake_case("FooBarBaz")).to eq("foo_bar_baz")
+      expect(Thor::Util.snake_case("Foo_BarBaz")).to eq("foo_bar_baz")
+    end
+
+    it "places underscores between multiple capitals" do
+      expect(Thor::Util.snake_case("ABClass")).to eq("a_b_class")
+    end
+  end
+
+  describe "#find_class_and_command_by_namespace" do
+    it "returns a Thor::Group class if full namespace matches" do
+      expect(Thor::Util.find_class_and_command_by_namespace("my_counter")).to eq([MyCounter, nil])
+    end
+
+    it "returns a Thor class if full namespace matches" do
+      expect(Thor::Util.find_class_and_command_by_namespace("thor")).to eq([Thor, nil])
+    end
+
+    it "returns a Thor class and the command name" do
+      expect(Thor::Util.find_class_and_command_by_namespace("thor:help")).to eq([Thor, "help"])
+    end
+
+    it "falls back in the namespace:command look up even if a full namespace does not match" do
+      Thor.const_set(:Help, Module.new)
+      expect(Thor::Util.find_class_and_command_by_namespace("thor:help")).to eq([Thor, "help"])
+      Thor.send :remove_const, :Help
+    end
+
+    it "falls back on the default namespace class if nothing else matches" do
+      expect(Thor::Util.find_class_and_command_by_namespace("test")).to eq([Scripts::MyDefaults, "test"])
+    end
+  end
+
+  describe "#thor_classes_in" do
+    it "returns thor classes inside the given class" do
+      expect(Thor::Util.thor_classes_in(MyScript)).to eq([MyScript::AnotherScript])
+      expect(Thor::Util.thor_classes_in(MyScript::AnotherScript)).to be_empty
+    end
+  end
+
+  describe "#user_home" do
+    before do
+      allow(ENV).to receive(:[])
+      Thor::Util.clear_user_home!
+    end
+
+    it "returns the user path if no variable is set on the environment" do
+      expect(Thor::Util.user_home).to eq(File.expand_path("~"))
+    end
+
+    it "returns the *nix system path if file cannot be expanded and separator does not exist" do
+      expect(File).to receive(:expand_path).with("~").and_raise(RuntimeError)
+      previous_value = File::ALT_SEPARATOR
+      capture(:stderr){ File.const_set(:ALT_SEPARATOR, false) }
+      expect(Thor::Util.user_home).to eq("/")
+      capture(:stderr){ File.const_set(:ALT_SEPARATOR, previous_value) }
+    end
+
+    it "returns the windows system path if file cannot be expanded and a separator exists" do
+      expect(File).to receive(:expand_path).with("~").and_raise(RuntimeError)
+      previous_value = File::ALT_SEPARATOR
+      capture(:stderr){ File.const_set(:ALT_SEPARATOR, true) }
+      expect(Thor::Util.user_home).to eq("C:/")
+      capture(:stderr){ File.const_set(:ALT_SEPARATOR, previous_value) }
+    end
+
+    it "returns HOME/.thor if set" do
+      allow(ENV).to receive(:[]).with("HOME").and_return("/home/user/")
+      expect(Thor::Util.user_home).to eq("/home/user/")
+    end
+
+    it "returns path with HOMEDRIVE and HOMEPATH if set" do
+      allow(ENV).to receive(:[]).with("HOMEDRIVE").and_return("D:/")
+      allow(ENV).to receive(:[]).with("HOMEPATH").and_return("Documents and Settings/James")
+      expect(Thor::Util.user_home).to eq("D:/Documents and Settings/James")
+    end
+
+    it "returns APPDATA/.thor if set" do
+      allow(ENV).to receive(:[]).with("APPDATA").and_return("/home/user/")
+      expect(Thor::Util.user_home).to eq("/home/user/")
+    end
+  end
+
+  describe "#thor_root_glob" do
+    before do
+      allow(ENV).to receive(:[])
+      Thor::Util.clear_user_home!
+    end
+
+    it "escapes globs in path" do
+      allow(ENV).to receive(:[]).with("HOME").and_return("/home/user{1}/")
+      expect(Dir).to receive(:[]).with("/home/user\\{1\\}/.thor/*").and_return([])
+      expect(Thor::Util.thor_root_glob).to eq([])
+    end
+  end
+
+  describe "#globs_for" do
+    it "escapes globs in path" do
+      expect(Thor::Util.globs_for("/home/apps{1}")).to eq([
+        "/home/apps\\{1\\}/Thorfile",
+        "/home/apps\\{1\\}/*.thor",
+        "/home/apps\\{1\\}/tasks/*.thor",
+        "/home/apps\\{1\\}/lib/tasks/*.thor"
+      ])
+    end
+  end
+
+  describe "#escape_globs" do
+    it "escapes ? * { } [ ] glob characters" do
+      expect(Thor::Util.escape_globs("apps?")).to eq("apps\\?")
+      expect(Thor::Util.escape_globs("apps*")).to eq("apps\\*")
+      expect(Thor::Util.escape_globs("apps {1}")).to eq("apps \\{1\\}")
+      expect(Thor::Util.escape_globs("apps [1]")).to eq("apps \\[1\\]")
+    end
+  end
+end