alloy-microgem 0.1

data/lib/microgem/specification_emitter.rb

@@ -0,0 +1,75 @@
+module Gem
+  module Micro
+    class SpecificationEmitter
+      SPECIAL_INSTANCE_VARIABLES = [
+        'name',
+        'mocha',
+        'source',
+        'version',
+        'dependencies',
+        'new_platform',
+        'specification_version',
+        'required_rubygems_version'
+      ]
+      
+      def initialize(gem_spec)
+        @gem_spec = gem_spec
+      end
+      
+      # Returns a list of all instance variables sorted by their keys.
+      #
+      #   gem_spec.gem_spec_variables # => [["author", ["Eloy Duran"]], ["version", "0.5.2"] …]
+      def gem_spec_variables
+        @gem_spec.instance_variables.sort.map do |ivar|
+          key = ivar[1..-1]
+          next if SPECIAL_INSTANCE_VARIABLES.include?(key)
+          value = format(ivar_get(key))
+          [key, value]
+        end.compact
+      end
+      
+      # Properly formats objects so they can be written to a Ruby `.gemspec' file.
+      def format(obj)
+        case obj
+        when Time
+          obj.strftime("%Y-%m-%d")
+        when Date, Gem::Version, Gem::Requirement
+          obj.to_s
+        else
+          obj
+        end
+      end
+      
+      # Returns a Ruby syntax representation of the Specification which is used
+      # to generate the gemspec files that RubyGems uses to check for gems.
+      # 
+      # TODO: We are still missing the following values, but it might not be a
+      # real problem. So we need to figure out if they are important to RubyGems
+      # and if so where it gets these values from.
+      #
+      # * files
+      # * extra_rdoc_files
+      # * rdoc_options
+      # * test_files
+      def to_ruby
+%{Gem::Specification.new do |s|
+  s.name = "#{@gem_spec.name}"
+  s.version = "#{@gem_spec.version}"
+
+  s.specification_version = #{ ivar_get(:specification_version) || 2 } if s.respond_to? :specification_version=
+  s.required_rubygems_version = Gem::Requirement.new("#{ivar_get(:required_rubygems_version) || '>= 0'}") if s.respond_to? :required_rubygems_version=
+
+#{gem_spec_variables.map { |k,v| "  s.#{k} = #{v.inspect}" }.join("\n") }
+
+#{@gem_spec.dependencies.map { |dep| "  s.add_dependency(\"#{dep.name}\", [\"#{dep.version_requirements.to_s}\"])" }.join("\n") }
+end}
+      end
+      
+      private
+      
+      def ivar_get(name)
+        @gem_spec.instance_variable_get("@#{name}")
+      end
+    end
+  end
+end

data/lib/microgem/unpacker.rb

@@ -0,0 +1,55 @@
+module Gem
+  module Micro
+    class Unpacker
+      class UnpackError < StandardError; end
+      
+      extend Utils
+      
+      # Unpacks a tar +archive+ to +extract_to+ using the +tar+ commandline
+      # utility. If +gzip+ is +true+ the archive is expected to be a gzip
+      # archive and will be decompressed.
+      #
+      # Raises a Gem::Micro::Unpacker::UnpackError if it fails.
+      def self.tar(archive, extract_to, gzip = false)
+        log(:debug, "Unpacking `#{archive}' to `#{extract_to}'")
+        ensure_dir(extract_to)
+        unless system("/usr/bin/tar --directory='#{extract_to}' -#{ 'z' if gzip }xf '#{archive}' > /dev/null 2>&1")
+          raise UnpackError, "Failed to unpack `#{archive}' with `tar'"
+        end
+      end
+      
+      # Unpacks a gzip +archive+ _in_ place using the +gunzip+ commandline
+      # utility.
+      #
+      # Raises a Gem::Micro::Unpacker::UnpackError if it fails.
+      #
+      # TODO: Make it work _not_ in place.
+      def self.gzip(archive)
+        unless system("/usr/bin/gunzip --quiet --force --decompress '#{archive}' > /dev/null 2>&1")
+          raise UnpackError, "Failed to unpack `#{archive}' with `gunzip'"
+        end
+      end
+      
+      def self.inflate(archive, out_file)
+        if Config.simple_unpacker?
+          inflate_with_zinflate(archive, out_file)
+        else
+          inflate_with_zlib(archive, out_file)
+        end
+      end
+      
+      def self.inflate_with_zlib(archive, out_file)
+        require "zlib"
+        out = Zlib::Inflate.inflate(File.read(archive))
+        File.open(out_file, 'w') { |f| f << out }
+      end
+      
+      ZINFLATE_BIN = File.expand_path('../../../bin/zinflate', __FILE__)
+      def self.inflate_with_zinflate(archive, out_file)
+        unless system("ruby '#{ZINFLATE_BIN}' '#{archive}' '#{out_file}' > /dev/null 2>&1")
+          raise UnpackError, "Failed to unpack `#{archive}' with `zinflate'"
+        end
+      end
+    end
+  end
+end

data/lib/microgem/utils.rb

@@ -0,0 +1,51 @@
+require 'fileutils'
+require 'tmpdir'
+
+module Gem
+  module Micro
+    module Utils
+      extend self
+      
+      # Returns the Config.
+      def config
+        Config
+      end
+      
+      # Prints a +message+ to +stdout+ with the specified log +level+.
+      #
+      # TODO: Add proper Logger.
+      def log(level, message)
+        unless level == :debug && config.log_level != :debug
+          puts "[#{level}] #{message}"
+        end
+      end
+      
+      # Creates a directory if it does not yet exist and it.
+      def ensure_dir(dir)
+        unless File.exist?(dir)
+          log(:debug, "Creating directory `#{dir}'")
+          FileUtils.mkdir_p(dir)
+        end
+        dir
+      end
+      
+      # Removes +new_path+, if it exists, before moving +old_path+ to +to+.
+      def replace(old_path, new_path)
+        log(:debug, "Moving `#{old_path}' to `#{new_path}'")
+        FileUtils.rm_rf(new_path) if File.exist?(new_path)
+        FileUtils.mv(old_path, new_path)
+      end
+      
+      # Returns a temporary directory and ensures it exists.
+      #
+      #   File.exist?('/path/to/tmp/microgem') # => false
+      #   tmpdir # => '/path/to/tmp/microgem'
+      #   File.exist?('/path/to/tmp/microgem') # => true
+      def tmpdir
+        tmpdir = File.join(Dir.tmpdir, 'microgem')
+        ensure_dir(tmpdir)
+        tmpdir
+      end
+    end
+  end
+end

data/lib/microgem/version.rb

@@ -0,0 +1,35 @@
+module Gem
+  class Version < Micro::YAMLable
+    class Requirement < Micro::YAMLable
+    end
+    
+    # Returns a Gem::Version from a string:
+    #
+    #   Gem::Version.from_gem_dirname('rake-0.8.1').version # => "0.8.1"
+    def self.from_gem_dirname(dirname)
+      if dirname =~ /-([\d\.]+)$/
+        self[:version => $1]
+      end
+    end
+    
+    attr_reader :version
+    alias_method :to_s, :version
+    
+    include Comparable
+    
+    # Compare two Version instances.
+    def <=>(other)
+      version <=> other.version
+    end
+    
+    # Returns whether or not any version will do.
+    def any?
+      version == 0 || version == '0'
+    end
+    
+    # TODO: really test this method, added for utils test
+    def marshal_load(version)
+      @version = version.first
+    end
+  end
+end

data/lib/microgem/yamlable.rb

@@ -0,0 +1,32 @@
+require 'yaml'
+
+module Gem
+  module Micro
+    # Mainly a MacRuby workaround, because yaml transfer is broken.
+    class YAMLable
+      class << self
+        def inherited(subklass) #:nodoc:
+          super
+          
+          subklass.class_eval do
+            yaml_as "tag:ruby.yaml.org,2002:object:#{name}"
+            
+            def self.yaml_new(klass, tag, values)
+              self[values]
+            end
+          end
+        end
+        
+        # Initializes an instance and assigns the hash of +values+ as its
+        # instance variables.
+        #
+        #   YAMLable[:foo => 'foo'] # => <#Gem::Micro::YAMLable:0x320154 @foo="foo">
+        def [](values)
+          object = new
+          values.each { |k,v| object.send(:instance_variable_set, "@#{k}", v) }
+          object
+        end
+      end
+    end
+  end
+end

data/test/bare_specification_test.rb

@@ -0,0 +1,43 @@
+##!/usr/bin/env macruby
+
+require File.expand_path('../test_helper', __FILE__)
+
+describe "Gem::Micro::BareSpecification" do
+  include Gem::Micro::Utils
+  
+  def setup
+    @source = Gem::Micro::Source.new('gems.rubyforge.org', @dir)
+    @spec = Gem::Micro::BareSpecification.new(@source, 'rake', Gem::Version[:version => '0.8.1'])
+  end
+  
+  def teardown
+    remove_microgem_tmpdir!
+  end
+  
+  it "should return the url to a gemspec" do
+    @spec.gem_spec_url.should ==
+      "http://gems.rubyforge.org/quick/Marshal.4.8/rake-0.8.1.gemspec.rz"
+  end
+  
+  it "should return the path to the work gemspec file" do
+    @spec.gem_spec_work_file.should ==
+      File.join(tmpdir, 'rake-0.8.1.gemspec')
+  end
+  
+  it "should return the path to the work archive of the gemspec file" do
+    @spec.gem_spec_work_archive_file.should ==
+      File.join(tmpdir, 'rake-0.8.1.gemspec.rz')
+  end
+  
+  it "should return its gem spec and know from which source it came" do
+    Gem::Micro::Downloader.expects(:get).with(@spec.gem_spec_url, @spec.gem_spec_work_archive_file)
+    FileUtils.cp(fixture('rake-0.8.1.gemspec.rz'), tmpdir)
+    
+    gem_spec = @spec.gem_spec
+    gem_spec.should.be.instance_of Gem::Specification
+    gem_spec.name.should == 'rake'
+    gem_spec.version.should == Gem::Version[:version => '0.8.1']
+    gem_spec.source.should == @source
+  end
+  
+end

data/test/bin_wrapper_emitter_test.rb

@@ -0,0 +1,57 @@
+##!/usr/bin/env macruby
+
+require File.expand_path('../test_helper', __FILE__)
+
+describe "Gem::Micro::BinWrapperEmitter, in general" do
+  def setup
+    @emitter = Gem::Micro::BinWrapperEmitter.new('rake', 'rake')
+  end
+  
+  def teardown
+    remove_microgem_tmpdir!
+  end
+  
+  it "should return the path to where the bin wrapper should be created" do
+    @emitter.bin_wrapper_file.should == File.join(Gem::Micro::Config.bin_dir, 'rake')
+  end
+  
+  it "should return the path to where the bin wrapper should be created if there's a program prefix" do
+    def @emitter.rbconfig(name)
+      { 'ruby_install_name' => 'macruby' }[name]
+    end
+    
+    @emitter.bin_wrapper_file.should == File.join(Gem::Micro::Config.bin_dir, 'macrake')
+  end
+  
+  it "should return the path to where the bin wrapper should be created if there's a program suffix" do
+    def @emitter.rbconfig(name)
+      { 'ruby_install_name' => 'ruby19' }[name]
+    end
+    
+    @emitter.bin_wrapper_file.should == File.join(Gem::Micro::Config.bin_dir, 'rake19')
+  end
+  
+  it "should create an executable bin wrapper" do
+    bin_file = File.join(Gem::Micro::Utils.tmpdir, 'rake')
+    @emitter.stubs(:bin_wrapper_file).returns(bin_file)
+    
+    @emitter.create_bin_wrapper!
+    File.read(bin_file).should == @emitter.to_ruby
+    File.should.be.executable bin_file
+  end
+end
+
+describe "Gem::Micro::BinWrapperEmitter, when emitting a wrapper" do
+  def setup
+    @emitter = Gem::Micro::BinWrapperEmitter.new('rake', 'raketest')
+  end
+  
+  it "should have a shebang pointing to the current Ruby being used" do
+    @emitter.to_ruby.split("\n").first.should ==
+      "#!#{ File.join(Config::CONFIG['bindir'], Config::CONFIG['ruby_install_name']) }"
+  end
+  
+  it "should load the correct gem and bin file" do
+    @emitter.to_ruby.should.match /\ngem 'rake', version\nload 'raketest'/
+  end
+end

data/test/config_test.rb

@@ -0,0 +1,131 @@
+##!/usr/bin/env macruby
+
+require File.expand_path('../test_helper', __FILE__)
+
+describe "Gem::Micro::Config" do
+  include Gem::Micro::Utils
+  
+  def setup
+    config.instance_variable_set(:@gem_home, nil)
+    config.instance_variable_set(:@bin_dir, nil)
+    ENV.delete('PRODUCTION')
+  end
+  
+  def teardown
+    config.merge! :log_level => :info, :force => false, :simple_downloader => false, :simple_unpacker => false
+  end
+  
+  it "should return the path to the development gem_home in development mode" do
+    path = File.expand_path("../../tmp/gem_home", __FILE__)
+    
+    config.expects(:ensure_dir).with(path).returns(path)
+    config.gem_home.should == path
+  end
+  
+  it "should return the path to the real rubygems gem_home in production mode" do
+    ENV['PRODUCTION'] = 'true'
+    path = rubygems_gem_paths.first
+    
+    config.expects(:ensure_dir).with(path).returns(path)
+    config.gem_home.should == path
+  end
+  
+  it "should return the path to the bin dir in development mode" do
+    path = File.expand_path("../../tmp/bin", __FILE__)
+    
+    config.expects(:ensure_dir).with(path).returns(path)
+    config.bin_dir.should == path
+  end
+  
+  it "should return the path to the bin dir in production mode on a regular Ruby install" do
+    ENV['PRODUCTION'] = 'true'
+    
+    config.stubs(:macruby?).returns(false)
+    config.stubs(:osx_default_ruby?).returns(false)
+    
+    path = Config::CONFIG['bindir']
+    
+    config.expects(:ensure_dir).never
+    config.bin_dir.should == path
+  end
+  
+  it "should return the path to the bin dir in production mode on a default Apple Ruby install" do
+    ENV['PRODUCTION'] = 'true'
+    
+    config.stubs(:macruby?).returns(false)
+    config.stubs(:osx_default_ruby?).returns(true)
+    
+    path = "/usr/bin"
+    
+    config.expects(:ensure_dir).never
+    config.bin_dir.should == path
+  end
+  
+  it "should return the path to the bin dir in production mode on MacRuby install" do
+    ENV['PRODUCTION'] = 'true'
+    
+    config.stubs(:macruby?).returns(true)
+    config.stubs(:osx_default_ruby?).returns(true)
+    
+    path = "/usr/local/bin"
+    
+    config.expects(:ensure_dir).never
+    config.bin_dir.should == path
+  end
+  
+  it "should return a list of the available sources" do
+    config.sources.should == %w{ gems.rubyforge.org gems.github.com }
+  end
+  
+  it "should return the path to the gems path" do
+    path = File.join(config.gem_home, 'gems')
+    
+    config.expects(:ensure_dir).with(path).returns(path)
+    config.gems_path.should == path
+  end
+  
+  it "should return the path to the specifications path" do
+    path = File.join(config.gem_home, 'specifications')
+    
+    config.expects(:ensure_dir).with(path).returns(path)
+    config.specifications_path.should == path
+  end
+  
+  it "should return the path to the gem cache path" do
+    path = File.join(config.gem_home, 'cache')
+    
+    config.expects(:ensure_dir).with(path).returns(path)
+    config.cache_path.should == path
+  end
+  
+  it "should return the log_level" do
+    config.log_level.should == :info
+  end
+  
+  it "should return whether or not to force actions" do
+    assert !config.force?
+  end
+  
+  it "should return whether or not to use the simple (external) downloader" do
+    assert !config.simple_downloader?
+  end
+  
+  it "should return whether or not to use the simple (external) unpacker" do
+    assert !config.simple_unpacker?
+  end
+  
+  it "should merge a hash of config values" do
+    config.merge! :log_level => :debug, :force => true, :simple_downloader => true, :simple_unpacker => true
+    
+    config.log_level.should == :debug
+    assert config.force?
+    assert config.simple_downloader?
+    assert config.simple_unpacker?
+  end
+  
+  private
+  
+  def rubygems_gem_paths
+    YAML.load(`gem env`)["RubyGems Environment"].find { |h| h.has_key? 'GEM PATHS' }['GEM PATHS']
+  end
+end