2dbc6b977f
Different llvm binaries were used to check build numbers and to compile with. Normalize this, and normalize the variable name used to hold the xcode location. (Calling it "prefix" is confusing, since there are already concepts in Homebrew called "prefx".)
571 lines
14 KiB
Ruby
571 lines
14 KiB
Ruby
FORMULA_META_FILES = %w[README README.md ChangeLog COPYING LICENSE LICENCE COPYRIGHT AUTHORS]
|
|
PLEASE_REPORT_BUG = "#{Tty.white}Please report this bug at #{Tty.em}http://github.com/mxcl/homebrew/issues#{Tty.reset}"
|
|
HOMEBREW_RECOMMENDED_GCC = 5577
|
|
|
|
def check_for_blacklisted_formula names
|
|
return if ARGV.force?
|
|
|
|
names.each do |name|
|
|
case name
|
|
# bazaar don't maintain their PyPi entry properly yet
|
|
# when they do we'll remove our formula and use that
|
|
# when 'bazaar', 'bzr' then abort <<-EOS
|
|
#Bazaar can be installed thusly:
|
|
#
|
|
# brew install pip && pip install bzr==2.0.1
|
|
#
|
|
# EOS
|
|
when 'mercurial', 'hg' then abort <<-EOS
|
|
Mercurial can be install thusly:
|
|
|
|
brew install pip && pip install mercurial
|
|
|
|
EOS
|
|
end
|
|
end
|
|
end
|
|
|
|
def __make url, name
|
|
require 'formula'
|
|
require 'digest'
|
|
|
|
path = Formula.path name
|
|
raise "#{path} already exists" if path.exist?
|
|
|
|
# Check if a formula aliased to this name exists.
|
|
already_aka = Formulary.find_alias name
|
|
if already_aka != nil
|
|
opoo "Formula #{already_aka} is aliased to #{name}."
|
|
puts "Please check if you are creating a duplicate."
|
|
end
|
|
|
|
version = Pathname.new(url).version
|
|
if version == nil
|
|
opoo "Version cannot be determined from URL."
|
|
puts "You'll need to add an explicit 'version' to the formula."
|
|
else
|
|
puts "Version detected as #{version}."
|
|
end
|
|
|
|
md5 = ''
|
|
if ARGV.include? "--cache" and version != nil
|
|
strategy = detect_download_strategy url
|
|
if strategy == CurlDownloadStrategy
|
|
d = strategy.new url, name, version, nil
|
|
the_tarball = d.fetch
|
|
md5 = the_tarball.md5
|
|
puts "MD5 is #{md5}"
|
|
else
|
|
puts "--cache requested, but we can only cache formulas that use Curl."
|
|
end
|
|
end
|
|
|
|
template=<<-EOS
|
|
require 'formula'
|
|
|
|
class #{Formula.class_s name} <Formula
|
|
url '#{url}'
|
|
homepage ''
|
|
md5 '#{md5}'
|
|
|
|
cmake depends_on 'cmake'
|
|
|
|
def install
|
|
autotools system "./configure", "--disable-debug", "--disable-dependency-tracking", "--prefix=\#{prefix}"
|
|
cmake system "cmake . \#{std_cmake_parameters}"
|
|
system "make install"
|
|
end
|
|
end
|
|
EOS
|
|
|
|
mode=nil
|
|
if ARGV.include? '--cmake'
|
|
mode= :cmake
|
|
elsif ARGV.include? '--autotools'
|
|
mode= :autotools
|
|
end
|
|
|
|
f=File.new path, 'w'
|
|
template.each_line do |s|
|
|
if s.strip.empty?
|
|
f.puts
|
|
next
|
|
end
|
|
cmd=s[0..11].strip
|
|
if cmd.empty?
|
|
cmd=nil
|
|
else
|
|
cmd=cmd.to_sym
|
|
end
|
|
out=s[12..-1] || ''
|
|
|
|
if mode.nil?
|
|
# we show both but comment out cmake as it is less common
|
|
# the implication being the pacakger should remove whichever is not needed
|
|
if cmd == :cmake and not out.empty?
|
|
f.print '#'
|
|
out = out[1..-1]
|
|
end
|
|
elsif cmd != mode and not cmd.nil?
|
|
next
|
|
end
|
|
f.puts out
|
|
end
|
|
f.close
|
|
|
|
return path
|
|
end
|
|
|
|
def make url
|
|
path = Pathname.new url
|
|
|
|
/(.*?)[-_.]?#{path.version}/.match path.basename
|
|
|
|
unless $1.to_s.empty?
|
|
name = $1
|
|
else
|
|
print "Formula name [#{path.stem}]: "
|
|
gots = $stdin.gets.chomp
|
|
if gots.empty?
|
|
name = path.stem
|
|
else
|
|
name = gots
|
|
end
|
|
end
|
|
|
|
force_text = "If you really want to make this formula use --force."
|
|
|
|
case name.downcase
|
|
when /libxml/, /libxlst/, /freetype/, /libpng/, /wxwidgets/
|
|
raise <<-EOS
|
|
#{name} is blacklisted for creation
|
|
Apple distributes this library with OS X, you can find it in /usr/X11/lib.
|
|
However not all build scripts look here, so you may need to call ENV.x11 or
|
|
ENV.libxml2 in your formula's install function.
|
|
|
|
#{force_text}
|
|
EOS
|
|
when /rubygem/
|
|
raise "Sorry RubyGems comes with OS X so we don't package it.\n\n#{force_text}"
|
|
when /wxwidgets/
|
|
raise <<-EOS
|
|
#{name} is blacklisted for creation
|
|
An older version of wxWidgets is provided by Apple with OS X, but
|
|
a formula for wxWidgets 2.8.10 is provided:
|
|
|
|
brew install wxmac
|
|
|
|
#{force_text}
|
|
EOS
|
|
end unless ARGV.force?
|
|
|
|
__make url, name
|
|
end
|
|
|
|
def github_info name
|
|
formula_name = Formula.path(name).basename
|
|
user = ''
|
|
branch = ''
|
|
|
|
if system "/usr/bin/which -s git"
|
|
user=`git config --global github.user`.chomp
|
|
all_branches = `git branch 2>/dev/null`
|
|
/^\*\s*(.*)/.match all_branches
|
|
branch = ($1 || '').chomp
|
|
end
|
|
|
|
user = 'mxcl' if user.empty?
|
|
branch = 'master' if user.empty?
|
|
|
|
return "http://github.com/#{user}/homebrew/commits/#{branch}/Library/Formula/#{formula_name}"
|
|
end
|
|
|
|
def info name
|
|
require 'formula'
|
|
|
|
exec 'open', github_info(name) if ARGV.flag? '--github'
|
|
|
|
f=Formula.factory name
|
|
puts "#{f.name} #{f.version}"
|
|
puts f.homepage
|
|
|
|
puts "Depends on: #{f.deps.join(', ')}" unless f.deps.empty?
|
|
|
|
if f.prefix.parent.directory?
|
|
kids=f.prefix.parent.children
|
|
kids.each do |keg|
|
|
print "#{keg} (#{keg.abv})"
|
|
print " *" if f.prefix == keg and kids.length > 1
|
|
puts
|
|
end
|
|
else
|
|
puts "Not installed"
|
|
end
|
|
|
|
if f.caveats
|
|
puts
|
|
puts f.caveats
|
|
puts
|
|
end
|
|
|
|
history = github_info(name)
|
|
puts history if history
|
|
|
|
rescue FormulaUnavailableError
|
|
# check for DIY installation
|
|
d=HOMEBREW_PREFIX+name
|
|
if d.directory?
|
|
ohai "DIY Installation"
|
|
d.children.each {|keg| puts "#{keg} (#{keg.abv})"}
|
|
else
|
|
raise "No such formula or keg"
|
|
end
|
|
end
|
|
|
|
def issues_for_formula name
|
|
# bit basic as depends on the issue at github having the exact name of the
|
|
# formula in it. Which for stuff like objective-caml is unlikely. So we
|
|
# really should search for aliases too.
|
|
|
|
name = f.name if Formula === name
|
|
|
|
require 'open-uri'
|
|
require 'yaml'
|
|
|
|
issues = []
|
|
|
|
open("http://github.com/api/v2/yaml/issues/search/mxcl/homebrew/open/"+name) do |f|
|
|
YAML::load(f.read)['issues'].each do |issue|
|
|
issues << 'http://github.com/mxcl/homebrew/issues/#issue/%s' % issue['number']
|
|
end
|
|
end
|
|
|
|
issues
|
|
rescue
|
|
[]
|
|
end
|
|
|
|
def cleanup name
|
|
require 'formula'
|
|
|
|
f = Formula.factory name
|
|
|
|
if f.installed? and f.prefix.parent.directory?
|
|
kids = f.prefix.parent.children
|
|
kids.each do |keg|
|
|
next if f.prefix == keg
|
|
print "Uninstalling #{keg}..."
|
|
FileUtils.rm_rf keg
|
|
puts
|
|
end
|
|
else
|
|
# we can't tell which one to keep in this circumstance
|
|
opoo "Skipping #{name}: most recent version #{f.version} not installed"
|
|
end
|
|
end
|
|
|
|
def clean f
|
|
Cleaner.new f
|
|
|
|
# Hunt for empty folders and nuke them unless they are
|
|
# protected by f.skip_clean?
|
|
# We want post-order traversal, so put the dirs in a stack
|
|
# and then pop them off later.
|
|
paths = []
|
|
f.prefix.find do |path|
|
|
paths << path if path.directory?
|
|
end
|
|
|
|
until paths.empty? do
|
|
d = paths.pop
|
|
if d.children.empty? and not f.skip_clean? d
|
|
puts "rmdir: #{d} (empty)" if ARGV.verbose?
|
|
d.rmdir
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
def prune
|
|
$n=0
|
|
$d=0
|
|
|
|
dirs=Array.new
|
|
paths=%w[bin sbin etc lib include share].collect {|d| HOMEBREW_PREFIX+d}
|
|
|
|
paths.each do |path|
|
|
path.find do |path|
|
|
path.extend ObserverPathnameExtension
|
|
if path.symlink?
|
|
path.unlink unless path.resolved_path_exists?
|
|
elsif path.directory?
|
|
dirs<<path
|
|
end
|
|
end
|
|
end
|
|
|
|
dirs.sort.reverse_each {|d| d.rmdir_if_possible}
|
|
|
|
if $n == 0 and $d == 0
|
|
puts "Nothing pruned" if ARGV.verbose?
|
|
else
|
|
# always showing symlinks text is deliberate
|
|
print "Pruned #{$n} symbolic links "
|
|
print "and #{$d} directories " if $d > 0
|
|
puts "from #{HOMEBREW_PREFIX}"
|
|
end
|
|
end
|
|
|
|
|
|
def diy
|
|
path=Pathname.getwd
|
|
|
|
if ARGV.include? '--set-version'
|
|
version=ARGV.next
|
|
else
|
|
version=path.version
|
|
raise "Couldn't determine version, try --set-version" if version.to_s.empty?
|
|
end
|
|
|
|
if ARGV.include? '--set-name'
|
|
name=ARGV.next
|
|
else
|
|
path.basename.to_s =~ /(.*?)-?#{version}/
|
|
if $1.nil? or $1.empty?
|
|
name=path.basename
|
|
else
|
|
name=$1
|
|
end
|
|
end
|
|
|
|
prefix=HOMEBREW_CELLAR+name+version
|
|
|
|
if File.file? 'CMakeLists.txt'
|
|
"-DCMAKE_INSTALL_PREFIX=#{prefix}"
|
|
elsif File.file? 'Makefile.am'
|
|
"--prefix=#{prefix}"
|
|
else
|
|
raise "Couldn't determine build system"
|
|
end
|
|
end
|
|
|
|
def macports_or_fink_installed?
|
|
# See these issues for some history:
|
|
# http://github.com/mxcl/homebrew/issues/#issue/13
|
|
# http://github.com/mxcl/homebrew/issues/#issue/41
|
|
# http://github.com/mxcl/homebrew/issues/#issue/48
|
|
|
|
%w[port fink].each do |ponk|
|
|
path = `/usr/bin/which -s #{ponk}`
|
|
return ponk unless path.empty?
|
|
end
|
|
|
|
# we do the above check because macports can be relocated and fink may be
|
|
# able to be relocated in the future. This following check is because if
|
|
# fink and macports are not in the PATH but are still installed it can
|
|
# *still* break the build -- because some build scripts hardcode these paths:
|
|
%w[/sw/bin/fink /opt/local/bin/port].each do |ponk|
|
|
return ponk if File.exist? ponk
|
|
end
|
|
|
|
# finally, sometimes people make their MacPorts or Fink read-only so they
|
|
# can quickly test Homebrew out, but still in theory obey the README's
|
|
# advise to rename the root directory. This doesn't work, many build scripts
|
|
# error out when they try to read from these now unreadable directories.
|
|
%w[/sw /opt/local].each do |path|
|
|
path = Pathname.new(path)
|
|
return path if path.exist? and not path.readable?
|
|
end
|
|
|
|
false
|
|
end
|
|
|
|
def versions_of(keg_name)
|
|
`/bin/ls #{HOMEBREW_CELLAR}/#{keg_name}`.collect { |version| version.strip }.reverse
|
|
end
|
|
|
|
|
|
def outdated_brews
|
|
require 'formula'
|
|
|
|
results = []
|
|
HOMEBREW_CELLAR.subdirs.each do |keg|
|
|
next unless keg.subdirs
|
|
name = keg.basename.to_s
|
|
if (not (f = Formula.factory(name)).installed? rescue nil)
|
|
results << [keg, name, f.version]
|
|
end
|
|
end
|
|
return results
|
|
end
|
|
|
|
########################################################## class PrettyListing
|
|
class PrettyListing
|
|
def initialize path
|
|
Pathname.new(path).children.sort{ |a,b| a.to_s.downcase <=> b.to_s.downcase }.each do |pn|
|
|
case pn.basename.to_s
|
|
when 'bin', 'sbin'
|
|
pn.find { |pnn| puts pnn unless pnn.directory? }
|
|
when 'lib'
|
|
print_dir pn do |pnn|
|
|
# dylibs have multiple symlinks and we don't care about them
|
|
(pnn.extname == '.dylib' or pnn.extname == '.pc') and not pnn.symlink?
|
|
end
|
|
else
|
|
if pn.directory?
|
|
print_dir pn
|
|
elsif not FORMULA_META_FILES.include? pn.basename.to_s
|
|
puts pn
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
private
|
|
def print_dir root
|
|
dirs = []
|
|
remaining_root_files = []
|
|
other = ''
|
|
|
|
root.children.sort.each do |pn|
|
|
if pn.directory?
|
|
dirs << pn
|
|
elsif block_given? and yield pn
|
|
puts pn
|
|
other = 'other '
|
|
else
|
|
remaining_root_files << pn
|
|
end
|
|
end
|
|
|
|
dirs.each do |d|
|
|
files = []
|
|
d.find { |pn| files << pn unless pn.directory? }
|
|
print_remaining_files files, d
|
|
end
|
|
|
|
print_remaining_files remaining_root_files, root, other
|
|
end
|
|
|
|
def print_remaining_files files, root, other = ''
|
|
case files.length
|
|
when 0
|
|
# noop
|
|
when 1
|
|
puts *files
|
|
else
|
|
puts "#{root}/ (#{files.length} #{other}files)"
|
|
end
|
|
end
|
|
end
|
|
|
|
|
|
################################################################ class Cleaner
|
|
class Cleaner
|
|
def initialize f
|
|
@f=f
|
|
|
|
# correct common issues
|
|
share=f.prefix+'share'
|
|
(f.prefix+'man').mv share rescue nil
|
|
|
|
[f.bin, f.sbin, f.lib].each {|d| clean_dir d}
|
|
|
|
# info pages suck
|
|
info = f.share+'info'
|
|
info.rmtree if info.directory? and not f.skip_clean? info
|
|
end
|
|
|
|
private
|
|
def strip path, args=''
|
|
return if @f.skip_clean? path
|
|
puts "strip #{path}" if ARGV.verbose?
|
|
path.chmod 0644 # so we can strip
|
|
unless path.stat.nlink > 1
|
|
system "strip", *(args+path)
|
|
else
|
|
path = path.to_s.gsub ' ', '\\ '
|
|
|
|
# strip unlinks the file and recreates it, thus breaking hard links!
|
|
# is this expected behaviour? patch does it too… still, this fixes it
|
|
tmp = `/usr/bin/mktemp -t homebrew_strip`.chomp
|
|
begin
|
|
`/usr/bin/strip #{args} -o #{tmp} #{path}`
|
|
`/bin/cat #{tmp} > #{path}`
|
|
ensure
|
|
FileUtils.rm tmp
|
|
end
|
|
end
|
|
end
|
|
|
|
def clean_file path
|
|
perms=0444
|
|
case `file -h '#{path}'`
|
|
when /Mach-O dynamically linked shared library/
|
|
# Stripping libraries is causing no end of trouble
|
|
# Lets just give up, and try to do it manually in instances where it
|
|
# makes sense
|
|
#strip path, '-SxX'
|
|
when /Mach-O [^ ]* ?executable/
|
|
strip path
|
|
perms=0555
|
|
when /script text executable/
|
|
perms=0555
|
|
end
|
|
path.chmod perms
|
|
end
|
|
|
|
def clean_dir d
|
|
d.find do |path|
|
|
if path.directory?
|
|
Find.prune if @f.skip_clean? path
|
|
elsif not path.file?
|
|
next
|
|
elsif path.extname == '.la' and not @f.skip_clean? path
|
|
# *.la files are stupid
|
|
path.unlink
|
|
elsif not path.symlink?
|
|
clean_file path
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
def gcc_42_build
|
|
`/usr/bin/gcc-4.2 -v 2>&1` =~ /build (\d{4,})/
|
|
if $1
|
|
$1.to_i
|
|
elsif system "/usr/bin/which gcc"
|
|
# Xcode 3.0 didn't come with gcc-4.2
|
|
# We can't change the above regex to use gcc because the version numbers
|
|
# are different and thus, not useful.
|
|
# FIXME I bet you 20 quid this causes a side effect — magic values tend to
|
|
401
|
|
else
|
|
nil
|
|
end
|
|
end
|
|
alias :gcc_build :gcc_42_build # For compatibility
|
|
|
|
def gcc_40_build
|
|
`/usr/bin/gcc-4.0 -v 2>&1` =~ /build (\d{4,})/
|
|
if $1
|
|
$1.to_i
|
|
else
|
|
nil
|
|
end
|
|
end
|
|
|
|
def llvm_build
|
|
if MACOS_VERSION >= 10.6
|
|
xcode_path = `/usr/bin/xcode-select -print-path`.chomp
|
|
return nil if xcode_path.empty?
|
|
`#{xcode_path}/usr/bin/llvm-gcc -v 2>&1` =~ /LLVM build (\d{4,})/
|
|
$1.to_i
|
|
end
|
|
end
|
|
|
|
def x11_installed?
|
|
Pathname.new('/usr/X11/lib/libpng.dylib').exist?
|
|
end
|