bc5ee7c482
* Preference is for commands to take instantiated formulae as parameters rather than formula names, so alias resolution can be centralized.
634 lines
16 KiB
Ruby
634 lines
16 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}"
|
|
|
|
def check_for_blacklisted_formula names
|
|
return if ARGV.force?
|
|
|
|
names.each do |name|
|
|
case name
|
|
when 'tex', 'tex-live', 'texlive' then abort <<-EOS.undent
|
|
Installing TeX from source is weird and gross, requires a lot of patches,
|
|
and only builds 32-bit (and thus can't use Homebrew deps on Snow Leopard.)
|
|
|
|
We recommend using a MacTeX distribution:
|
|
http://www.tug.org/mactex/
|
|
EOS
|
|
|
|
when 'mercurial', 'hg' then abort <<-EOS.undent
|
|
Mercurial can be install thusly:
|
|
brew install pip && pip install mercurial
|
|
EOS
|
|
|
|
when 'setuptools' then abort <<-EOS.undent
|
|
When working with a Homebrew-built Python, distribute is preferred
|
|
over setuptools, and can be used as the prequisite for pip.
|
|
|
|
Install distribute using:
|
|
brew install distribute
|
|
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/
|
|
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 branch.empty?
|
|
|
|
return "http://github.com/#{user}/homebrew/commits/#{branch}/Library/Formula/#{formula_name}"
|
|
end
|
|
|
|
def info f
|
|
exec 'open', github_info(name) if ARGV.flag? '--github'
|
|
|
|
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(f.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|
|
|
# Skip kegs with no versions installed
|
|
next unless keg.subdirs
|
|
|
|
# Skip HEAD formulae, consider them "evergreen"
|
|
next if keg.subdirs.collect{|p|p.basename.to_s}.include? "HEAD"
|
|
|
|
name = keg.basename.to_s
|
|
if (not (f = Formula.factory(name)).installed? rescue nil)
|
|
results << [keg, name, f.version]
|
|
end
|
|
end
|
|
return results
|
|
end
|
|
|
|
def search_brews text
|
|
require "formula"
|
|
formulae = Formulary.names with_aliases=true
|
|
if text =~ /^\/(.*)\/$/
|
|
results = formulae.grep(Regexp.new($1))
|
|
else
|
|
search_term = Regexp.escape(text || "")
|
|
results = formulae.grep(/.*#{search_term}.*/)
|
|
end
|
|
|
|
# Filter out aliases when the full name was also found
|
|
aliases = Formulary.get_aliases
|
|
return results.select do |r|
|
|
aliases[r] == nil or not (results.include? aliases[r])
|
|
end
|
|
end
|
|
|
|
def brew_install
|
|
require 'formula_installer'
|
|
require 'hardware'
|
|
|
|
############################################################ sanity checks
|
|
case Hardware.cpu_type when :ppc, :dunno
|
|
abort "Sorry, Homebrew does not support your computer's CPU architecture.\n"+
|
|
"For PPC support, see: http://github.com/sceaga/homebrew/tree/powerpc"
|
|
end
|
|
|
|
raise "Cannot write to #{HOMEBREW_CELLAR}" if HOMEBREW_CELLAR.exist? and not HOMEBREW_CELLAR.writable?
|
|
raise "Cannot write to #{HOMEBREW_PREFIX}" unless HOMEBREW_PREFIX.writable?
|
|
|
|
################################################################# warnings
|
|
begin
|
|
if MACOS_VERSION >= 10.6
|
|
opoo "You should upgrade to Xcode 3.2.1" if llvm_build < RECOMMENDED_LLVM
|
|
else
|
|
opoo "You should upgrade to Xcode 3.1.4" if (gcc_40_build < RECOMMENDED_GCC_40) or (gcc_42_build < RECOMMENDED_GCC_42)
|
|
end
|
|
rescue
|
|
# the reason we don't abort is some formula don't require Xcode
|
|
# TODO allow formula to declare themselves as "not needing Xcode"
|
|
opoo "Xcode is not installed! Builds may fail!"
|
|
end
|
|
|
|
if macports_or_fink_installed?
|
|
opoo "It appears you have Macports or Fink installed"
|
|
puts "Although, unlikely, this can break builds or cause obscure runtime issues."
|
|
puts "If you experience problems try uninstalling these tools."
|
|
end
|
|
|
|
################################################################# install!
|
|
installer = FormulaInstaller.new
|
|
installer.install_deps = !ARGV.include?('--ignore-dependencies')
|
|
|
|
ARGV.formulae.each do |f|
|
|
if not f.installed? or ARGV.force?
|
|
installer.install f
|
|
else
|
|
puts "Formula already installed: #{f.prefix}"
|
|
end
|
|
end
|
|
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
|
|
[f.bin, f.sbin, f.lib].select{|d|d.exist?}.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
|