Convert Accessibility test to spec.

This commit is contained in:
Markus Reiter 2017-02-08 08:54:20 +01:00
parent fe2829a5d2
commit af8b91746c
2 changed files with 82 additions and 77 deletions

View File

@ -0,0 +1,82 @@
require "spec_helper"
# TODO: this test should be named after the corresponding class, once
# that class is abstracted from installer.rb.
describe "Accessibility Access" do
let(:cask) { Hbc::CaskLoader.load_from_file(TEST_FIXTURE_DIR/"cask/Casks/with-accessibility-access.rb") }
let(:fake_system_command) { class_double(Hbc::SystemCommand) }
let(:installer) { Hbc::Installer.new(cask, command: fake_system_command) }
before(:each) do
allow(MacOS).to receive(:version).and_return(MacOS::Version.new(macos_version))
allow(installer).to receive(:bundle_identifier).and_return("com.example.BasicCask")
end
context "on MacOS 10.8 and below" do
let(:macos_version) { "10.8" }
it "can enable accessibility access in macOS releases prior to Mavericks" do
expect(fake_system_command).to receive(:run!).with(
"/usr/bin/touch",
args: [Hbc.pre_mavericks_accessibility_dotfile],
sudo: true
)
shutup do
installer.enable_accessibility_access
end
end
it "warns about disabling accessibility access on old macOS releases" do
expect {
installer.disable_accessibility_access
}.to output(/Warning: Accessibility access cannot be disabled automatically on this version of macOS\./).to_stderr
end
end
context "on MacOS 10.9" do
let(:macos_version) { "10.9" }
it "can enable accessibility access" do
expect(fake_system_command).to receive(:run!).with(
"/usr/bin/sqlite3",
args: [Hbc.tcc_db, "INSERT OR REPLACE INTO access VALUES('kTCCServiceAccessibility','com.example.BasicCask',0,1,1,NULL);"],
sudo: true
)
shutup do
installer.enable_accessibility_access
end
end
it "can disable accessibility access" do
expect(fake_system_command).to receive(:run!).with(
"/usr/bin/sqlite3",
args: [Hbc.tcc_db, "DELETE FROM access WHERE client='com.example.BasicCask';"],
sudo: true
)
shutup do
installer.disable_accessibility_access
end
end
end
context "on MacOS 10.12 and above" do
let(:macos_version) { "10.12" }
it "warns about enabling accessibility access on new macOS releases" do
expect {
expect {
installer.enable_accessibility_access
}.to output.to_stdout
}.to output(/Warning: Accessibility access cannot be enabled automatically on this version of macOS\./).to_stderr
end
it "warns about disabling accessibility access on new macOS releases" do
expect {
installer.disable_accessibility_access
}.to output(/Warning: Accessibility access cannot be disabled automatically on this version of macOS\./).to_stderr
end
end
end

View File

@ -1,77 +0,0 @@
require "test_helper"
# TODO: this test should be named after the corresponding class, once
# that class is abstracted from installer.rb.
describe "Accessibility Access" do
let(:cask) { Hbc::CaskLoader.load_from_file(TEST_FIXTURE_DIR/"cask/Casks/with-accessibility-access.rb") }
let(:with_fake_command) { { command: Hbc::FakeSystemCommand } }
let(:installer) { Hbc::Installer.new(cask, with_fake_command) }
describe "install" do
it "can enable accessibility access" do
MacOS.stub :version, MacOS::Version.new("10.9") do
installer.stub :bundle_identifier, "com.example.BasicCask" do
Hbc::FakeSystemCommand.expects_command(
["/usr/bin/sudo", "-E", "--", "/usr/bin/sqlite3", Hbc.tcc_db, "INSERT OR REPLACE INTO access VALUES('kTCCServiceAccessibility','com.example.BasicCask',0,1,1,NULL);"]
)
shutup do
installer.enable_accessibility_access
end
end
end
end
it "can enable accessibility access in macOS releases prior to Mavericks" do
MacOS.stub :version, MacOS::Version.new("10.8") do
Hbc::FakeSystemCommand.expects_command(
["/usr/bin/sudo", "-E", "--", "/usr/bin/touch", Hbc.pre_mavericks_accessibility_dotfile]
)
shutup do
installer.enable_accessibility_access
end
end
end
it "warns about enabling accessibility access on new macOS releases" do
MacOS.stub :version, MacOS::Version.new("10.12") do
installer.stub :bundle_identifier, "com.example.BasicCask" do
capture_io { installer.enable_accessibility_access }[1]
.must_match("Warning: Accessibility access cannot be enabled automatically on this version of macOS.")
end
end
end
end
describe "uninstall" do
it "can disable accessibility access" do
MacOS.stub :version, MacOS::Version.new("10.9") do
installer.stub :bundle_identifier, "com.example.BasicCask" do
Hbc::FakeSystemCommand.expects_command(
["/usr/bin/sudo", "-E", "--", "/usr/bin/sqlite3", Hbc.tcc_db, "DELETE FROM access WHERE client='com.example.BasicCask';"]
)
shutup do
installer.disable_accessibility_access
end
end
end
end
it "warns about disabling accessibility access on old macOS releases" do
MacOS.stub :version, MacOS::Version.new("10.8") do
installer.stub :bundle_identifier, "com.example.BasicCask" do
capture_io { installer.disable_accessibility_access }[1]
.must_match("Warning: Accessibility access cannot be disabled automatically on this version of macOS.")
end
end
end
it "warns about disabling accessibility access on new macOS releases" do
MacOS.stub :version, MacOS::Version.new("10.12") do
installer.stub :bundle_identifier, "com.example.BasicCask" do
capture_io { installer.disable_accessibility_access }[1]
.must_match("Warning: Accessibility access cannot be disabled automatically on this version of macOS.")
end
end
end
end
end