def stat_mode(path)
  in_current_dir do
    ('%o' % [File::Stat.new(path).mode])[-4, 4]
  end
end

Given /^a remote directory named "([^"]+)"$/ do |path|
  create_dir path
end

Given /^a remote file named "([^"]+)"$/ do |file_name|
  write_file file_name, ''
end

Given /^a remote file named "([^"]+)" with "([^"]+)"$/ do |file_name, content|
  write_file file_name, content
end

Then /^the remote directory "([^"]+)" must exist$/ do |path|
  check_directory_presence [path], true
end

Then /^the remote file "([^"]+)" must contain "([^"]+)"$/ do |path, content|
  check_file_content path, content, true
end

Then /^the remote file "([^"]+)" must contain exactly "([^"]+)"$/ do |path, content|
  check_file_content path, content
end

Then /^the remote file "([^"]+)" must match \/([^\/]+)\/$/ do |path, pattern|
  check_file_content path, /#{pattern}/, true
end

Then /^the remote file "([^"]+)" must have (\d+) mode$/ do |path, mode|
  expect(stat_mode path).to eq mode
end

Then /^the remote directory "([^"]+)" must have (\d+) mode$/ do |path, mode|
  expect(stat_mode path).to eq mode
end