Gecko [ primetaxinc.net ]

Name	Size	Permission
commands	[ DIR ]	drwxr-xr-x
ext	[ DIR ]	drwxr-xr-x
package	[ DIR ]	drwxr-xr-x
ssl_certs	[ DIR ]	drwxr-xr-x
builder.rb	2.21 KB	-rw-r--r--
command.rb	12.46 KB	-rw-r--r--
command_manager.rb	4.67 KB	-rw-r--r--
config_file.rb	9.69 KB	-rw-r--r--
custom_require.rb	1.83 KB	-rw-r--r--
defaults.rb	2.65 KB	-rw-r--r--
dependency.rb	6.43 KB	-rw-r--r--
dependency_installer.rb	9.94 KB	-rw-r--r--
dependency_list.rb	5.58 KB	-rw-r--r--
deprecate.rb	1.81 KB	-rw-r--r--
doc_manager.rb	5.55 KB	-rw-r--r--
errors.rb	793 B	-rw-r--r--
exceptions.rb	2.34 KB	-rw-r--r--
ext.rb	379 B	-rw-r--r--
format.rb	1.96 KB	-rw-r--r--
gem_openssl.rb	2.24 KB	-rw-r--r--
gem_path_searcher.rb	4.57 KB	-rw-r--r--
gem_runner.rb	2.38 KB	-rw-r--r--
gemcutter_utilities.rb	1.86 KB	-rw-r--r--
indexer.rb	16.93 KB	-rw-r--r--
install_update_options.rb	3.87 KB	-rw-r--r--
installer.rb	17.02 KB	-rw-r--r--
installer_test_case.rb	3.1 KB	-rw-r--r--
local_remote_options.rb	3.36 KB	-rw-r--r--
mock_gem_ui.rb	1.05 KB	-rw-r--r--
old_format.rb	3.69 KB	-rw-r--r--
package.rb	2.15 KB	-rw-r--r--
package_task.rb	3.79 KB	-rw-r--r--
path_support.rb	1.5 KB	-rw-r--r--
platform.rb	5.55 KB	-rw-r--r--
psych_additions.rb	249 B	-rw-r--r--
psych_tree.rb	687 B	-rw-r--r--
remote_fetcher.rb	13.78 KB	-rw-r--r--
require_paths_builder.rb	577 B	-rw-r--r--
requirement.rb	5.01 KB	-rw-r--r--
security.rb	28.83 KB	-rw-r--r--
server.rb	21.93 KB	-rw-r--r--
source_index.rb	11 KB	-rw-r--r--
spec_fetcher.rb	7.17 KB	-rw-r--r--
specification.rb	54.83 KB	-rw-r--r--
syck_hack.rb	2.02 KB	-rw-r--r--
test_case.rb	23.22 KB	-rw-r--r--
test_utilities.rb	3.47 KB	-rw-r--r--
text.rb	1.23 KB	-rw-r--r--
uninstaller.rb	6.77 KB	-rw-r--r--
user_interaction.rb	11.22 KB	-rw-r--r--
validator.rb	4.65 KB	-rw-r--r--
version.rb	10.19 KB	-rw-r--r--
version_option.rb	1.59 KB	-rw-r--r--

Code Editor : validator.rb

#--
# Copyright 2006 by Chad Fowler, Rich Kilmer, Jim Weirich and others.
# All rights reserved.
# See LICENSE.txt for permissions.
#++

require 'rubygems/format'
require 'rubygems/installer'

##
# Validator performs various gem file and gem database validation

class Gem::Validator

include Gem::UserInteraction

def initialize
    require 'find'
    require 'digest'
  end

##
  # Given a gem file's contents, validates against its own MD5 checksum
  # gem_data:: [String] Contents of the gem file

def verify_gem(gem_data)
    raise Gem::VerificationError, 'empty gem file' if gem_data.size == 0

unless gem_data =~ /MD5SUM/ then
      return # Don't worry about it...this sucks.  Need to fix MD5 stuff for
      # new format
      # FIXME
    end

sum_data = gem_data.gsub(/MD5SUM = "([a-z0-9]+)"/,
                             "MD5SUM = \"#{"F" * 32}\"")

unless Digest::MD5.hexdigest(sum_data) == $1.to_s then
      raise Gem::VerificationError, 'invalid checksum for gem file'
    end
  end

##
  # Given the path to a gem file, validates against its own MD5 checksum
  #
  # gem_path:: [String] Path to gem file

def verify_gem_file(gem_path)
    open gem_path, Gem.binary_mode do |file|
      gem_data = file.read
      verify_gem gem_data
    end
  rescue Errno::ENOENT, Errno::EINVAL
    raise Gem::VerificationError, "missing gem file #{gem_path}"
  end

private

def find_files_for_gem(gem_directory)
    installed_files = []
    Find.find gem_directory do |file_name|
      fn = file_name[gem_directory.size..file_name.size-1].sub(/^\//, "")
      installed_files << fn unless
        fn =~ /CVS/ || fn.empty? || File.directory?(file_name)
    end
    installed_files
  end

public

ErrorData = Struct.new :path, :problem

##
  # Checks the gem directory for the following potential
  # inconsistencies/problems:
  #
  # * Checksum gem itself
  # * For each file in each gem, check consistency of installed versions
  # * Check for files that aren't part of the gem but are in the gems directory
  # * 1 cache - 1 spec - 1 directory.
  #
  # returns a hash of ErrorData objects, keyed on the problem gem's name.

def alien(gems=[])
    errors = Hash.new { |h,k| h[k] = {} }

Gem::SourceIndex.from_installed_gems.each do |gem_name, gem_spec|
      next unless gems.include? gem_spec.name unless gems.empty?

install_dir = gem_spec.installation_path
      gem_path = Gem.cache_gem(gem_spec.file_name, install_dir)
      spec_path = File.join install_dir, "specifications", gem_spec.spec_name
      gem_directory = gem_spec.full_gem_path

unless File.directory? gem_directory then
        errors[gem_name][gem_spec.full_name] =
          "Gem registered but doesn't exist at #{gem_directory}"
        next
      end

unless File.exist? spec_path then
        errors[gem_name][spec_path] = "Spec file missing for installed gem"
      end

begin
        verify_gem_file(gem_path)

good, gone, unreadable = nil, nil, nil, nil

open gem_path, Gem.binary_mode do |file|
          format = Gem::Format.from_file_by_path(gem_path)

good, gone = format.file_entries.partition { |entry, _|
            File.exist? File.join(gem_directory, entry['path'])
          }

gone.map! { |entry, _| entry['path'] }
          gone.sort.each do |path|
            errors[gem_name][path] = "Missing file"
          end

good, unreadable = good.partition { |entry, _|
            File.readable? File.join(gem_directory, entry['path'])
          }

unreadable.map! { |entry, _| entry['path'] }
          unreadable.sort.each do |path|
            errors[gem_name][path] = "Unreadable file"
          end

good.each do |entry, data|
            begin
              next unless data # HACK `gem check -a mkrf`

open File.join(gem_directory, entry['path']), Gem.binary_mode do |f|
                unless Digest::MD5.hexdigest(f.read).to_s ==
                    Digest::MD5.hexdigest(data).to_s then
                  errors[gem_name][entry['path']] = "Modified from original"
                end
              end
            end
          end
        end

installed_files = find_files_for_gem(gem_directory)
        good.map! { |entry, _| entry['path'] }
        extras = installed_files - good - unreadable

extras.each do |extra|
          errors[gem_name][extra] = "Extra file"
        end
      rescue Gem::VerificationError => e
        errors[gem_name][gem_path] = e.message
      end
    end

errors.each do |name, subhash|
      errors[name] = subhash.map { |path, msg| ErrorData.new(path, msg) }
    end

errors
  end

def remove_leading_dot_dir(path)
    path.sub(/^\.\//, "")
  end

end

${this.title}

Code Editor : validator.rb