r5_geminabox 0.0.1

data/lib/geminabox/gem_store_error.rb

@@ -0,0 +1,13 @@
+require 'nesty'
+module Geminabox
+  class GemStoreError < StandardError
+    attr_reader :code, :reason
+
+    include Nesty::NestedError
+
+    def initialize(code, reason)
+      @code = code.to_s
+      @reason = reason
+    end
+  end
+end

data/lib/geminabox/gem_version.rb

@@ -0,0 +1,40 @@
+module Geminabox
+
+  class GemVersion
+    attr_accessor :name, :number, :platform
+
+    def initialize(name, number, platform)
+      @name = name
+      @number = number
+      @platform = platform
+    end
+
+    def ruby?
+      !!(platform =~ /ruby/i)
+    end
+
+    def version
+      Gem::Version.create(number)
+    end
+
+    def <=>(other)
+      sort = other.name <=> name
+      sort = version <=>  other.version       if sort.zero?
+      sort = (other.ruby? && !ruby?) ? 1 : -1 if sort.zero? && ruby? != other.ruby?
+      sort = other.platform <=> platform      if sort.zero?
+
+      sort
+    end
+
+    def ==(other)
+      return false unless other.class == self.class
+      [name, number, platform] == [other.name, other.number, other.platform]
+    end
+
+    def gemfile_name
+      included_platform = ruby? ? nil : platform
+      [name, number, included_platform].compact.join('-')
+    end
+  end
+
+end

data/lib/geminabox/gem_version_collection.rb

@@ -0,0 +1,65 @@
+module Geminabox
+
+  # This class represents a sorted collection of Geminabox::GemVersion objects.
+  # It it used widely throughout the system for displaying and filtering gems.
+  class GemVersionCollection
+    include Enumerable
+
+    # Array of Geminabox::GemVersion objects, or an array of [name, version,
+    # platform] triples.
+    def initialize(initial_gems=[])
+      @gems = initial_gems.map{|object|
+        coerce_to_gem_version(object)
+      }.sort
+    end
+
+    # FIXME: Terminology makes no sense when the version are not all of the same
+    # name
+    def oldest
+      @gems.first
+    end
+
+    # FIXME: Terminology makes no sense when the version are not all of the same
+    # name
+    def newest
+      @gems.last
+    end
+
+    def size
+      @gems.size
+    end
+
+    def each(&block)
+      @gems.each(&block)
+    end
+
+    # The collection can contain gems of different names, this method groups them
+    # by name, and then sorts the different version of each name by version and
+    # platform.
+    #
+    # yields 'foo_gem', version_collection
+    def by_name(&block)
+      @grouped ||= @gems.group_by(&:name).map{|name, collection|
+        [name, Geminabox::GemVersionCollection.new(collection)]
+      }.sort_by{|name, collection|
+        name.downcase
+      }
+
+      if block_given?
+        @grouped.each(&block)
+      else
+        @grouped
+      end
+    end
+
+  private
+    def coerce_to_gem_version(object)
+      if object.is_a?(Geminabox::GemVersion)
+        object
+      else
+        Geminabox::GemVersion.new(*object)
+      end
+    end
+  end
+  
+end

data/lib/geminabox/hostess.rb

@@ -0,0 +1,46 @@
+require 'sinatra/base'
+
+module Geminabox
+
+  class Hostess < Sinatra::Base
+    def serve
+      send_file(File.expand_path(File.join(Server.data, *request.path_info)), :type => response['Content-Type'])
+    end
+
+    %w[/specs.4.8.gz
+       /latest_specs.4.8.gz
+       /prerelease_specs.4.8.gz
+    ].each do |index|
+      get index do
+        content_type 'application/x-gzip'
+        serve
+      end
+    end
+
+    %w[/quick/Marshal.4.8/*.gemspec.rz
+       /yaml.Z
+       /Marshal.4.8.Z
+    ].each do |deflated_index|
+      get deflated_index do
+        content_type('application/x-deflate')
+        serve
+      end
+    end
+
+    %w[/yaml
+       /Marshal.4.8
+       /specs.4.8
+       /latest_specs.4.8
+       /prerelease_specs.4.8
+    ].each do |old_index|
+      get old_index do
+        serve
+      end
+    end
+
+    get "/gems/*.gem" do
+      serve
+    end
+
+  end
+end

data/lib/geminabox/http_adapter.rb

@@ -0,0 +1,27 @@
+require_relative 'http_adapter_config_error'
+
+module Geminabox
+  class HttpAdapter
+
+    def get_content(*args)
+      raise HttpAdapterConfigError.new(:get_content, 'the response body')
+    end
+
+    def get(*args)
+      raise HttpAdapterConfigError.new(:get, 'a response object')
+    end
+
+    def post(*args)
+      raise HttpAdapterConfigError.new(:post, 'a response object')
+    end
+
+    def set_auth(*args)
+      raise HttpAdapterConfigError.new(:set_auth, 'true')
+    end
+
+  end
+end
+
+Dir[File.expand_path('http_adapter/*.rb', File.dirname(__FILE__))].each do |file|
+  require file
+end

data/lib/geminabox/http_adapter/http_client_adapter.rb

@@ -0,0 +1,32 @@
+require 'httpclient'
+
+module Geminabox
+
+  class HttpClientAdapter < HttpAdapter
+
+    def get(*args)
+      http_client.get(*args)
+    end
+
+    def get_content(*args)
+      http_client.get_content(*args)
+    end
+
+    def post(*args)
+      http_client.post(*args)
+    end
+
+    def set_auth(url, username = nil, password = nil)
+      http_client.set_auth(url, username, password) if username or password
+      http_client.www_auth.basic_auth.challenge(url) # Workaround: https://github.com/nahi/httpclient/issues/63
+      http_client.ssl_config.verify_mode = OpenSSL::SSL::VERIFY_NONE
+      http_client.send_timeout = 0
+      http_client.receive_timeout = 0
+    end
+
+    def http_client
+      @http_client ||= HTTPClient.new(ENV['http_proxy'])
+    end
+
+  end
+end

data/lib/geminabox/http_adapter/template_faraday_adapter.rb

@@ -0,0 +1,51 @@
+require 'faraday'
+
+module Geminabox
+
+  class TemplateFaradayAdapter < HttpAdapter
+
+    def get(*args)
+      adapter.get(*args)
+    end
+
+    def get_content(*args)
+      response = adapter.get(*args)
+      response.body
+    end
+
+    def post(*args)
+      adapter.post(*args)
+    end
+
+    # Note that this configuration turns SSL certificate verification off.
+    # To set up the adapter for your environment see:
+    # https://github.com/lostisland/faraday/wiki/Setting-up-SSL-certificates
+    def set_auth(uri, username = nil, password = nil)
+      connection = Faraday.new url: uri, ssl: {verify: false} do |faraday|
+        faraday.adapter http_engine
+        faraday.proxy(ENV['http_proxy']) if ENV['http_proxy']
+      end
+      connection.basic_auth username, password if username
+      connection
+    end
+
+    def adapter
+      @adapter ||= Faraday.new do |faraday|
+        faraday.adapter http_engine
+        faraday.proxy(ENV['http_proxy']) if ENV['http_proxy']
+      end
+    end
+
+    def http_engine
+      :net_http  # make requests with Net::HTTP
+    end
+
+    def options
+      lambda {|faraday|
+        faraday.adapter http_engine
+        faraday.proxy(ENV['http_proxy']) if ENV['http_proxy']
+      }
+    end
+
+  end
+end

data/lib/geminabox/http_adapter_config_error.rb

@@ -0,0 +1,7 @@
+module Geminabox
+  class HttpAdapterConfigError < StandardError
+    def initialize(method_name, returns)
+      super("#{method_name} must be defined, and return #{returns}")
+    end
+  end
+end

data/lib/geminabox/incoming_gem.rb

@@ -0,0 +1,70 @@
+module Geminabox
+
+  class IncomingGem
+    def initialize(gem_data, root_path = Geminabox.data)
+      unless gem_data.respond_to? :read
+        raise ArgumentError, "Expected an instance of IO"
+      end
+
+      digest = Digest::SHA1.new
+      if RbConfig::CONFIG["MAJOR"].to_i <= 1 and RbConfig::CONFIG["MINOR"].to_i <= 8
+        @tempfile = Tempfile.new("gem")
+      else
+        @tempfile = Tempfile.new("gem", :encoding => 'binary', :binmode => true)
+      end
+
+      while data = gem_data.read(1024**2)
+        @tempfile.write data
+        digest << data
+      end
+
+      @tempfile.close
+      @sha1 = digest.hexdigest
+
+      @root_path = root_path
+    end
+
+    def gem_data
+      File.open(@tempfile.path, "rb")
+    end
+
+    def valid?
+      spec && spec.name && spec.version
+    rescue Gem::Package::Error
+      false
+    end
+
+    def spec
+      @spec ||= extract_spec
+    end
+
+    def extract_spec
+      if Gem::Package.respond_to? :open
+        Gem::Package.open(gem_data, "r", nil) do |pkg|
+          return pkg.metadata
+        end
+      else
+        Gem::Package.new(@tempfile.path).spec
+      end
+    end
+
+    def name
+      @name ||= get_name
+    end
+
+    def get_name
+      filename = %W[#{spec.name} #{spec.version}]
+      filename.push(spec.platform) if spec.platform && spec.platform != "ruby"
+      filename.join("-") + ".gem"
+    end
+
+    def dest_filename
+      File.join(@root_path, "gems", name)
+    end
+
+    def hexdigest
+      @sha1
+    end
+  end
+
+end

data/lib/geminabox/indexer.rb

@@ -0,0 +1,46 @@
+
+# This module addresses Geminabox issue
+# https://github.com/cwninja/geminabox/issues/70
+#
+# The underlying problem is rubygems issue
+# https://github.com/rubygems/rubygems/issues/232, fixed by
+# https://github.com/rubygems/rubygems/pull/364
+#
+# This library (and its call) should be deleted once that pull request is resolved.
+
+require 'geminabox'
+require 'rubygems/indexer'
+
+module Geminabox::Indexer
+  def self.germane?
+    gem_version = Gem::Version.new(Gem::VERSION)
+    v1_8        = Gem::Version.new('1.8')
+    v1_8_25     = Gem::Version.new('1.8.25')
+
+    (gem_version >= v1_8) && (gem_version < v1_8_25)
+  end
+
+  def self.updated_gemspecs(indexer)
+    specs_mtime = File.stat(indexer.dest_specs_index).mtime
+    newest_mtime = Time.at 0
+
+    updated_gems = indexer.gem_file_list.select do |gem|
+      gem_mtime = File.stat(gem).mtime
+      newest_mtime = gem_mtime if gem_mtime > newest_mtime
+      gem_mtime >= specs_mtime
+    end
+
+    indexer.map_gems_to_specs updated_gems
+  end
+
+  def self.patch_rubygems_update_index_pre_1_8_25(indexer)
+    if germane?
+      specs = updated_gemspecs(indexer)
+
+      unless specs.empty?
+        Gem::Specification.dirs = []
+        Gem::Specification.add_specs(*specs)
+      end
+    end
+  end
+end

data/lib/geminabox/proxy.rb

@@ -0,0 +1,13 @@
+
+module Geminabox
+  module Proxy
+    def self.proxy_path(file)
+      File.join File.dirname(__FILE__), 'proxy', file
+    end
+
+    autoload :Hostess,      proxy_path('hostess')
+    autoload :FileHandler,  proxy_path('file_handler')
+    autoload :Splicer,      proxy_path('splicer')
+    autoload :Copier,       proxy_path('copier')
+  end
+end

data/lib/geminabox/proxy/copier.rb

@@ -0,0 +1,29 @@
+
+
+module Geminabox
+  module Proxy
+    class Copier < FileHandler
+
+      def self.copy(file_name)
+        copier = new(file_name)
+        copier.get_file
+        copier
+      end
+
+      def get_file
+        return true if proxy_file_exists?
+        return copy_local if local_file_exists?
+        get_remote
+      end
+
+      def copy_local
+        FileUtils.cp local_path, proxy_path
+      end
+
+      def get_remote
+        File.open(proxy_path, 'w'){|f| f.write(remote_content)}
+      end
+
+    end
+  end
+end