brew/Library/Homebrew/formula_pin.rb

require "keg"

class FormulaPin
  PINDIR = Pathname.new("#{HOMEBREW_LIBRARY}/PinnedKegs")

  def initialize(f)
    @f = f
  end

  def path
    Pathname.new("#{PINDIR}/#{@f.name}")
  end

  def pin_at(version)
    PINDIR.mkpath
    version_path = @f.rack.join(version)
    path.make_relative_symlink(version_path) unless pinned? || !version_path.exist?
  end

  def pin
    pin_at(@f.rack.subdirs.map { |d| Keg.new(d).version }.first)
  end

  def unpin
    path.unlink if pinned?
  end

  def pinned?
    path.symlink?
  end

  def pinnable?
    @f.rack.exist? && @f.rack.subdirs.length > 0
  end
end