Mike McQuaid 7f45c63468 fetch: add --retry option to retry fetch once.
Sometimes there may be intermittent failures with hosts that work if
immediately retried. Let's allow a single retry in this case with the
--retry flag. This also behaves nicely with the --force flag.

Signed-off-by: Mike McQuaid <mike@mikemcquaid.com>
2014-03-01 16:45:31 +00:00

72 lines
1.5 KiB
Ruby

require 'formula'
module Homebrew extend self
def fetch
raise FormulaUnspecifiedError if ARGV.named.empty?
if ARGV.include? '--deps'
bucket = []
ARGV.formulae.each do |f|
bucket << f
bucket.concat f.recursive_dependencies.map(&:to_formula)
end
bucket.uniq!
else
bucket = ARGV.formulae
end
puts "Fetching: #{bucket * ', '}" if bucket.size > 1
bucket.each do |f|
fetch_formula(f)
f.resources.each do |r|
fetch_resource(r)
end
end
end
def fetch_resource r
puts "Resource: #{r.name}"
fetch_fetchable r
rescue ChecksumMismatchError => e
retry if retry_fetch? f
opoo "Resource #{r.name} reports different #{e.hash_type}: #{e.expected}"
end
def fetch_formula f
fetch_fetchable f
rescue ChecksumMismatchError => e
retry if retry_fetch? f
opoo "Formula reports different #{e.hash_type}: #{e.expected}"
end
private
def retry_fetch? f
@failed ||= {}
already_failed = @failed.fetch(f.name, false)
if already_failed || !ARGV.include?("--retry")
Homebrew.failed = true
return false
end
f.clear_cache
@failed[f.name] = true
true
end
def fetch_fetchable f
f.clear_cache if ARGV.force?
already_fetched = f.cached_download.exist?
download = f.fetch
return unless download.file?
puts "Downloaded to: #{download}" unless already_fetched
puts Checksum::TYPES.map { |t| "#{t.to_s.upcase}: #{download.send(t)}" }
f.verify_download_integrity(download)
end
end