1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
|
require 'formula'
require 'bottles'
require 'tab'
require 'keg'
class BottleMerger < Formula
# This provides a URL and Version which are the only needed properties of
# a Formula. This object is used to access the Formula bottle DSL to merge
# multiple outputs of `brew bottle`.
url '1'
end
module Homebrew extend self
def keg_contains string, keg
quiet_system 'fgrep', '--recursive', '--quiet', '--max-count=1', string, keg
end
def bottle_output bottle
puts "bottle do"
prefix = bottle.prefix.to_s
puts " prefix '#{prefix}'" if prefix != '/usr/local'
cellar = bottle.cellar.to_s
cellar = ":#{bottle.cellar}" if bottle.cellar.is_a? Symbol
puts " cellar '#{cellar}'" if bottle.cellar.to_s != '/usr/local/Cellar'
puts " revision #{bottle.revision}" if bottle.revision > 0
Checksum::TYPES.each do |checksum_type|
checksum_cat = bottle.send checksum_type
next unless checksum_cat
checksum_cat.each do |cat, checksum|
puts " #{checksum_type} '#{checksum}' => :#{cat}"
end
end
puts "end"
end
def bottle_formula f
unless f.installed?
return ofail "Formula not installed: #{f.name}"
end
unless built_as_bottle? f
return ofail "Formula not installed with '--build-bottle': #{f.name}"
end
bottle_revision = bottle_new_revision f
filename = bottle_filename f, bottle_revision
bottle_path = Pathname.pwd/filename
sha1 = nil
prefix = HOMEBREW_PREFIX.to_s
tmp_prefix = '/tmp'
cellar = HOMEBREW_CELLAR.to_s
tmp_cellar = '/tmp/Cellar'
HOMEBREW_CELLAR.cd do
ohai "Bottling #{f.name} #{f.version}..."
# Use gzip, faster to compress than bzip2, faster to uncompress than bzip2
# or an uncompressed tarball (and more bandwidth friendly).
safe_system 'tar', 'czf', bottle_path, "#{f.name}/#{f.version}"
sha1 = bottle_path.sha1
relocatable = false
keg = Keg.new f.prefix
keg.lock do
# Relocate bottle library references before testing for built-in
# references to the Cellar e.g. Qt's QMake annoyingly does this.
keg.relocate_install_names prefix, tmp_prefix, cellar, tmp_cellar
relocatable = !keg_contains(HOMEBREW_PREFIX, keg)
relocatable = !keg_contains(HOMEBREW_CELLAR, keg) if relocatable
# And do the same thing in reverse to change the library references
# back to how they were.
keg.relocate_install_names tmp_prefix, prefix, tmp_cellar, cellar
end
bottle = Bottle.new
bottle.prefix HOMEBREW_PREFIX
bottle.cellar relocatable ? :any : HOMEBREW_CELLAR
bottle.revision bottle_revision
bottle.sha1 sha1 => bottle_tag
puts "./#{filename}"
bottle_output bottle
end
end
def bottle
if ARGV.include? '--merge'
ARGV.named.each do |argument|
bottle_block = IO.read(argument)
BottleMerger.class_eval bottle_block
end
bottle = BottleMerger.new.bottle
bottle_output bottle if bottle
exit 0
end
ARGV.formulae.each do |f|
bottle_formula Formula.factory f
end
end
end
|
