Charlie Sharpsteen 783be64cf1 Add new external command: unpack
`brew-unpack` is inspired by the `unpack` command of Haskell's Cabal.
`brew unpack <formulae ...>` will fetch the source code archives of one or more
formula and extract them into subfolders of the current working directory. An
alternate root directory may be specified by invoking the `--destdir` flag.

This provides some nice advantages for inspecting source code compared to
`brew install -i -f <formula>`:

  - The extracted source code won't be deleted when the Ruby process
    terminates---which allows for long-term experimentation.

  - The user has control over which directory the code is extracted into.

  - No install process is initiated, so accidentally typing the equivalent of
    `exit 0` will not cause `brew` to mess with an existing installation.

  - Several formulae may be unpacked at once.

Signed-off-by: Adam Vandenberg <flangy@gmail.com>
2011-05-19 08:03:08 -07:00

54 lines
1.4 KiB
Ruby
Executable File

require 'formula'
module Homebrew extend self
def unpack
unpack_usage = <<-EOS
Usage: brew unpack [--destdir=path/to/extract/in] <formulae ...>
Unpack formulae source code for inspection.
Formulae archives will be extracted to subfolders inside the current working
directory or a directory specified by `--destdir`.
EOS
if ARGV.empty?
puts unpack_usage
exit 0
end
formulae = ARGV.named
raise FormulaUnspecifiedError if formulae.empty?
unpack_dir = ARGV.options_only.select {|o| o.start_with? "--destdir="}
if unpack_dir.empty?
unpack_dir = Pathname.new Dir.getwd
else
unpack_dir = Pathname.new(unpack_dir.first.split('=')[1]).realpath
unpack_dir.mkpath unless unpack_dir.exist?
end
raise "Cannot write to #{unpack_dir}" unless unpack_dir.writable?
formulae.each do |f|
f = Formula.factory(f)
unless f.downloader.kind_of? CurlDownloadStrategy
stage_dir = unpack_dir + [f.name, f.version].join('-')
stage_dir.mkpath unless stage_dir.exist?
else
stage_dir = unpack_dir
end
# Can't use a do block here without DownloadStrategy do blocks throwing:
# warning: conflicting chdir during another chdir block
Dir.chdir stage_dir
f.downloader.fetch
f.downloader.stage
Dir.chdir unpack_dir
end
end
end
# Here is the actual code that gets run when `brew` loads this external
# command.
Homebrew.unpack