1 files changed, 75 insertions, 0 deletions
diff --git a/Library/Homebrew/test/cask/cli/fetch_spec.rb b/Library/Homebrew/test/cask/cli/fetch_spec.rb
new file mode 100644
index 000000000..1571c2a70
--- /dev/null
+++ b/Library/Homebrew/test/cask/cli/fetch_spec.rb
@@ -0,0 +1,75 @@
+describe Hbc::CLI::Fetch, :cask do
+  let(:local_transmission) {
+    Hbc::CaskLoader.load_from_file(TEST_FIXTURE_DIR/"cask/Casks/local-transmission.rb")
+  }
+
+  let(:local_caffeine) {
+    Hbc::CaskLoader.load_from_file(TEST_FIXTURE_DIR/"cask/Casks/local-caffeine.rb")
+  }
+
+  it "allows download the installer of a Cask" do
+    shutup do
+      Hbc::CLI::Fetch.run("local-transmission", "local-caffeine")
+    end
+    expect(Hbc::CurlDownloadStrategy.new(local_transmission).cached_location).to exist
+    expect(Hbc::CurlDownloadStrategy.new(local_caffeine).cached_location).to exist
+  end
+
+  it "prevents double fetch (without nuking existing installation)" do
+    download_stategy = Hbc::CurlDownloadStrategy.new(local_transmission)
+
+    shutup do
+      Hbc::Download.new(local_transmission).perform
+    end
+    old_ctime = File.stat(download_stategy.cached_location).ctime
+
+    shutup do
+      Hbc::CLI::Fetch.run("local-transmission")
+    end
+    new_ctime = File.stat(download_stategy.cached_location).ctime
+
+    expect(old_ctime.to_i).to eq(new_ctime.to_i)
+  end
+
+  it "allows double fetch with --force" do
+    shutup do
+      Hbc::Download.new(local_transmission).perform
+    end
+
+    download_stategy = Hbc::CurlDownloadStrategy.new(local_transmission)
+    old_ctime = File.stat(download_stategy.cached_location).ctime
+    sleep(1)
+
+    shutup do
+      Hbc::CLI::Fetch.run("local-transmission", "--force")
+    end
+    download_stategy = Hbc::CurlDownloadStrategy.new(local_transmission)
+    new_ctime = File.stat(download_stategy.cached_location).ctime
+
+    expect(new_ctime.to_i).to be > old_ctime.to_i
+  end
+
+  it "properly handles Casks that are not present" do
+    expect {
+      shutup do
+        Hbc::CLI::Fetch.run("notacask")
+      end
+    }.to raise_error(Hbc::CaskUnavailableError)
+  end
+
+  describe "when no Cask is specified" do
+    it "raises an exception" do
+      expect {
+        Hbc::CLI::Fetch.run
+      }.to raise_error(Hbc::CaskUnspecifiedError)
+    end
+  end
+
+  describe "when no Cask is specified, but an invalid option" do
+    it "raises an exception" do
+      expect {
+        Hbc::CLI::Fetch.run("--notavalidoption")
+      }.to raise_error(Hbc::CaskUnspecifiedError)
+    end
+  end
+end