libgems 0.0.1

data/lib/libgems/exceptions.rb

@@ -0,0 +1,91 @@
+##
+# Base exception class for #{LibGems::NAME}.  All exception raised by SlimGems are a
+# subclass of this one.
+class LibGems::Exception < RuntimeError; end
+
+class LibGems::CommandLineError < LibGems::Exception; end
+
+class LibGems::DependencyError < LibGems::Exception; end
+
+class LibGems::DependencyRemovalException < LibGems::Exception; end
+
+##
+# Raised when attempting to uninstall a gem that isn't in GEM_HOME.
+
+class LibGems::GemNotInHomeException < LibGems::Exception
+  attr_accessor :spec
+end
+
+class LibGems::DocumentError < LibGems::Exception; end
+
+##
+# Potentially raised when a specification is validated.
+class LibGems::EndOfYAMLException < LibGems::Exception; end
+
+##
+# Signals that a file permission error is preventing the user from
+# installing in the requested directories.
+class LibGems::FilePermissionError < LibGems::Exception
+  def initialize(path)
+    super("You don't have write permissions into the #{path} directory.")
+  end
+end
+
+##
+# Used to raise parsing and loading errors
+class LibGems::FormatException < LibGems::Exception
+  attr_accessor :file_path
+end
+
+class LibGems::GemNotFoundException < LibGems::Exception
+  def initialize(msg, name=nil, version=nil, errors=nil)
+    super msg
+    @name = name
+    @version = version
+    @errors = errors
+  end
+
+  attr_reader :name, :version, :errors
+end
+
+class LibGems::InstallError < LibGems::Exception; end
+
+##
+# Potentially raised when a specification is validated.
+class LibGems::InvalidSpecificationException < LibGems::Exception; end
+
+class LibGems::OperationNotSupportedError < LibGems::Exception; end
+
+##
+# Signals that a remote operation cannot be conducted, probably due to not
+# being connected (or just not finding host).
+#--
+# TODO: create a method that tests connection to the preferred gems server.
+# All code dealing with remote operations will want this.  Failure in that
+# method should raise this error.
+class LibGems::RemoteError < LibGems::Exception; end
+
+class LibGems::RemoteInstallationCancelled < LibGems::Exception; end
+
+class LibGems::RemoteInstallationSkipped < LibGems::Exception; end
+
+##
+# Represents an error communicating via HTTP.
+class LibGems::RemoteSourceException < LibGems::Exception; end
+
+class LibGems::VerificationError < LibGems::Exception; end
+
+##
+# Raised to indicate that a system exit should occur with the specified
+# exit_code
+
+class LibGems::SystemExitException < SystemExit
+  attr_accessor :exit_code
+
+  def initialize(exit_code)
+    @exit_code = exit_code
+
+    super "Exiting #{LibGems::NAME} with exit_code #{exit_code}"
+  end
+
+end

data/lib/libgems/ext.rb

@@ -0,0 +1,18 @@
+#--
+# Copyright 2006 by Chad Fowler, Rich Kilmer, Jim Weirich and others.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+require 'libgems'
+
+##
+# Classes for building C extensions live here.
+
+module LibGems::Ext; end
+
+require 'libgems/ext/builder'
+require 'libgems/ext/configure_builder'
+require 'libgems/ext/ext_conf_builder'
+require 'libgems/ext/rake_builder'
+

data/lib/libgems/ext/builder.rb

@@ -0,0 +1,56 @@
+#--
+# Copyright 2006 by Chad Fowler, Rich Kilmer, Jim Weirich and others.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+class LibGems::Ext::Builder
+
+  def self.class_name
+    name =~ /Ext::(.*)Builder/
+    $1.downcase
+  end
+
+  def self.make(dest_path, results)
+    unless File.exist? 'Makefile' then
+      raise LibGems::InstallError, "Makefile not found:\n\n#{results.join "\n"}" 
+    end
+
+    mf = File.read('Makefile')
+    mf = mf.gsub(/^RUBYARCHDIR\s*=\s*\$[^$]*/, "RUBYARCHDIR = #{dest_path}")
+    mf = mf.gsub(/^RUBYLIBDIR\s*=\s*\$[^$]*/, "RUBYLIBDIR = #{dest_path}")
+
+    File.open('Makefile', 'wb') {|f| f.print mf}
+
+    # try to find make program from Ruby configue arguments first
+    RbConfig::CONFIG['configure_args'] =~ /with-make-prog\=(\w+)/
+    make_program = $1 || ENV['make']
+    unless make_program then
+      make_program = (/mswin/ =~ RUBY_PLATFORM) ? 'nmake' : 'make'
+    end
+
+    ['', ' install'].each do |target|
+      cmd = "#{make_program}#{target}"
+      results << cmd
+      results << `#{cmd} #{redirector}`
+
+      raise LibGems::InstallError, "make#{target} failed:\n\n#{results}" unless
+        $?.success?
+    end
+  end
+
+  def self.redirector
+    '2>&1'
+  end
+
+  def self.run(command, results)
+    results << command
+    results << `#{command} #{redirector}`
+
+    unless $?.success? then
+      raise LibGems::InstallError, "#{class_name} failed:\n\n#{results.join "\n"}"
+    end
+  end
+
+end
+

data/lib/libgems/ext/configure_builder.rb

@@ -0,0 +1,25 @@
+#--
+# Copyright 2006 by Chad Fowler, Rich Kilmer, Jim Weirich and others.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+require 'libgems/ext/builder'
+
+class LibGems::Ext::ConfigureBuilder < LibGems::Ext::Builder
+
+  def self.build(extension, directory, dest_path, results)
+    unless File.exist?('Makefile') then
+      cmd = "sh ./configure --prefix=#{dest_path}"
+      cmd << " #{LibGems::Command.build_args.join ' '}" unless LibGems::Command.build_args.empty?
+
+      run cmd, results
+    end
+
+    make dest_path, results
+
+    results
+  end
+
+end
+

data/lib/libgems/ext/ext_conf_builder.rb

@@ -0,0 +1,24 @@
+#--
+# Copyright 2006 by Chad Fowler, Rich Kilmer, Jim Weirich and others.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+require 'libgems/ext/builder'
+require 'libgems/command'
+
+class LibGems::Ext::ExtConfBuilder < LibGems::Ext::Builder
+
+  def self.build(extension, directory, dest_path, results)
+    cmd = "#{LibGems.ruby} #{File.basename extension}"
+    cmd << " #{LibGems::Command.build_args.join ' '}" unless LibGems::Command.build_args.empty?
+
+    run cmd, results
+
+    make dest_path, results
+
+    results
+  end
+
+end
+

data/lib/libgems/ext/rake_builder.rb

@@ -0,0 +1,39 @@
+#--
+# Copyright 2006 by Chad Fowler, Rich Kilmer, Jim Weirich and others.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+require 'libgems/ext/builder'
+require 'libgems/command'
+
+class LibGems::Ext::RakeBuilder < LibGems::Ext::Builder
+
+  def self.build(extension, directory, dest_path, results)
+    if File.basename(extension) =~ /mkrf_conf/i then
+      cmd = "#{LibGems.ruby} #{File.basename extension}"
+      cmd << " #{LibGems::Command.build_args.join " "}" unless LibGems::Command.build_args.empty?
+      run cmd, results
+    end
+
+    # Deal with possible spaces in the path, e.g. C:/Program Files
+    dest_path = '"' + dest_path + '"' if dest_path.include?(' ')
+
+    rake = ENV['rake']
+
+    rake ||= begin
+               "\"#{LibGems.ruby}\" -rubygems #{LibGems.bin_path('rake')}"
+             rescue LibGems::Exception
+             end
+
+    rake ||= LibGems.default_exec_format % 'rake'
+
+    cmd = "#{rake} RUBYARCHDIR=#{dest_path} RUBYLIBDIR=#{dest_path}" # ENV is frozen
+
+    run cmd, results
+
+    results
+  end
+
+end
+

data/lib/libgems/format.rb

@@ -0,0 +1,81 @@
+#--
+# Copyright 2006 by Chad Fowler, Rich Kilmer, Jim Weirich and others.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+require 'fileutils'
+
+require 'libgems/package'
+
+##
+# LibGems::Format knows the guts of the RubyGem .gem file format and provides the
+# capability to read gem files
+
+class LibGems::Format
+
+  attr_accessor :spec
+  attr_accessor :file_entries
+  attr_accessor :gem_path
+
+  extend LibGems::UserInteraction
+
+  ##
+  # Constructs a Format representing the gem's data which came from +gem_path+
+
+  def initialize(gem_path)
+    @gem_path = gem_path
+  end
+
+  ##
+  # Reads the gem +file_path+ using +security_policy+ and returns a Format
+  # representing the data in the gem
+
+  def self.from_file_by_path(file_path, security_policy = nil)
+    unless File.exist?(file_path)
+      raise LibGems::Exception, "Cannot load gem at [#{file_path}] in #{Dir.pwd}"
+    end
+
+    start = File.read file_path, 20
+
+    if start.nil? or start.length < 20 then
+      nil
+    elsif start.include?("MD5SUM =") # old version gems
+      require 'libgems/old_format'
+
+      LibGems::OldFormat.from_file_by_path file_path
+    else
+      open file_path, LibGems.binary_mode do |io|
+        from_io io, file_path, security_policy
+      end
+    end
+  end
+
+  ##
+  # Reads a gem from +io+ at +gem_path+ using +security_policy+ and returns a
+  # Format representing the data from the gem
+
+  def self.from_io(io, gem_path="(io)", security_policy = nil)
+    format = new gem_path
+
+    LibGems::Package.open io, 'r', security_policy do |pkg|
+      format.spec = pkg.metadata
+      format.file_entries = []
+
+      pkg.each do |entry|
+        size = entry.header.size
+        mode = entry.header.mode
+
+        format.file_entries << [{
+            "size" => size, "mode" => mode, "path" => entry.full_name,
+          },
+          entry.read
+        ]
+      end
+    end
+
+    format
+  end
+
+end
+

data/lib/libgems/gem_openssl.rb

@@ -0,0 +1,92 @@
+#--
+# Copyright 2006 by Chad Fowler, Rich Kilmer, Jim Weirich and others.
+# All rights reserved.
+# See LICENSE.txt for permissions.
+#++
+
+#--
+# Some system might not have OpenSSL installed, therefore the core
+# library file openssl might not be available.  We localize testing
+# for the presence of OpenSSL in this file.
+#++
+
+module LibGems
+  class << self
+    ##
+    # Is SSL (used by the signing commands) available on this
+    # platform?
+
+    def ssl_available?
+      @ssl_available
+    end
+
+    ##
+    # Is SSL available?
+
+    attr_writer :ssl_available
+
+    ##
+    # Ensure that SSL is available.  Throw an exception if it is not.
+
+    def ensure_ssl_available
+      unless ssl_available?
+        raise LibGems::Exception, "SSL is not installed on this system"
+      end
+    end
+  end
+end
+
+begin
+  require 'openssl'
+
+  # Reference a constant defined in the .rb portion of ssl (just to
+  # make sure that part is loaded too).
+
+  LibGems.ssl_available = !!OpenSSL::Digest::SHA1
+
+  class OpenSSL::X509::Certificate # :nodoc:
+    # Check the validity of this certificate.
+    def check_validity(issuer_cert = nil, time = Time.now)
+      ret = if @not_before && @not_before > time
+              [false, :expired, "not valid before '#@not_before'"]
+            elsif @not_after && @not_after < time
+              [false, :expired, "not valid after '#@not_after'"]
+            elsif issuer_cert && !verify(issuer_cert.public_key)
+              [false, :issuer, "#{issuer_cert.subject} is not issuer"]
+            else
+              [true, :ok, 'Valid certificate']
+            end
+
+      # return hash
+      { :is_valid => ret[0], :error => ret[1], :desc => ret[2] }
+    end
+  end
+
+rescue LoadError, StandardError
+  LibGems.ssl_available = false
+end
+
+# :stopdoc:
+
+module LibGems::SSL
+
+  # We make our own versions of the constants here.  This allows us
+  # to reference the constants, even though some systems might not
+  # have SSL installed in the Ruby core package.
+  #
+  # These constants are only used during load time.  At runtime, any
+  # method that makes a direct reference to SSL software must be
+  # protected with a LibGems.ensure_ssl_available call.
+
+  if LibGems.ssl_available? then
+    PKEY_RSA = OpenSSL::PKey::RSA
+    DIGEST_SHA1 = OpenSSL::Digest::SHA1
+  else
+    PKEY_RSA = :rsa
+    DIGEST_SHA1 = :sha1
+  end
+
+end
+
+# :startdoc:
+

data/lib/libgems/gem_path_searcher.rb

@@ -0,0 +1,100 @@
+##
+# LibGemsPathSearcher has the capability to find loadable files inside
+# gems.  It generates data up front to speed up searches later.
+
+class LibGems::GemPathSearcher
+
+  ##
+  # Initialise the data we need to make searches later.
+
+  def initialize
+    # We want a record of all the installed gemspecs, in the order we wish to
+    # examine them.
+    @gemspecs = init_gemspecs
+
+    # Map gem spec to glob of full require_path directories.  Preparing this
+    # information may speed up searches later.
+    @lib_dirs = {}
+
+    @gemspecs.each do |spec|
+      @lib_dirs[spec.object_id] = lib_dirs_for spec
+    end
+  end
+
+  ##
+  # Look in all the installed gems until a matching _path_ is found.
+  # Return the _gemspec_ of the gem where it was found.  If no match
+  # is found, return nil.
+  #
+  # The gems are searched in alphabetical order, and in reverse
+  # version order.
+  #
+  # For example:
+  #
+  #   find('log4r')              # -> (log4r-1.1 spec)
+  #   find('log4r.rb')           # -> (log4r-1.1 spec)
+  #   find('rake/rdoctask')      # -> (rake-0.4.12 spec)
+  #   find('foobarbaz')          # -> nil
+  #
+  # Matching paths can have various suffixes ('.rb', '.so', and
+  # others), which may or may not already be attached to _file_.
+  # This method doesn't care about the full filename that matches;
+  # only that there is a match.
+
+  def find(path)
+    @gemspecs.find do |spec| matching_file? spec, path end
+  end
+
+  ##
+  # Works like #find, but finds all gemspecs matching +path+.
+
+  def find_all(path)
+    @gemspecs.select do |spec|
+      matching_file? spec, path
+    end
+  end
+
+  ##
+  # Attempts to find a matching path using the require_paths of the given
+  # +spec+.
+
+  def matching_file?(spec, path)
+    !matching_files(spec, path).empty?
+  end
+
+  ##
+  # Returns files matching +path+ in +spec+.
+  #--
+  # Some of the intermediate results are cached in @lib_dirs for speed.
+
+  def matching_files(spec, path)
+    return [] unless @lib_dirs[spec.object_id] # case no paths
+    glob = File.join @lib_dirs[spec.object_id], "#{path}#{LibGems.suffix_pattern}"
+    Dir[glob].select { |f| File.file? f.untaint }
+  end
+
+  ##
+  # Return a list of all installed gemspecs, sorted by alphabetical order and
+  # in reverse version order.  (bar-2, bar-1, foo-2)
+
+  def init_gemspecs
+    specs = LibGems.source_index.map { |_, spec| spec }
+
+    specs.sort { |a, b|
+      names = a.name <=> b.name
+      next names if names.nonzero?
+      b.version <=> a.version
+    }
+  end
+
+  ##
+  # Returns library directories glob for a gemspec.  For example,
+  #   '/usr/local/lib/ruby/gems/1.8/gems/foobar-1.0/{lib,ext}'
+
+  def lib_dirs_for(spec)
+    "#{spec.full_gem_path}/{#{spec.require_paths.join(',')}}" if
+      spec.require_paths
+  end
+
+end
+