Gecko [ vacationseastafrica.com ]

Name	Size	Permission	Date
build_command.rb	2.58 KB	-rw-r--r--	2026-04-24 16:08
cert_command.rb	9.13 KB	-rw-r--r--	2026-04-24 16:08
check_command.rb	2.29 KB	-rw-r--r--	2026-04-24 16:08
cleanup_command.rb	4.27 KB	-rw-r--r--	2026-04-24 16:08
contents_command.rb	4.31 KB	-rw-r--r--	2026-04-24 16:08
dependency_command.rb	5.08 KB	-rw-r--r--	2026-04-24 16:08
environment_command.rb	5.45 KB	-rw-r--r--	2026-04-24 16:08
exec_command.rb	6.95 KB	-rw-r--r--	2026-04-24 16:08
fetch_command.rb	2.65 KB	-rw-r--r--	2026-04-24 16:08
generate_index_command.rb	1.73 KB	-rw-r--r--	2026-04-24 16:08
help_command.rb	10.16 KB	-rw-r--r--	2026-04-24 16:08
info_command.rb	834 B	-rw-r--r--	2026-04-24 16:08
install_command.rb	7.18 KB	-rw-r--r--	2026-04-24 16:08
list_command.rb	997 B	-rw-r--r--	2026-04-24 16:08
lock_command.rb	2.69 KB	-rw-r--r--	2026-04-24 16:08
mirror_command.rb	627 B	-rw-r--r--	2026-04-24 16:08
open_command.rb	1.9 KB	-rw-r--r--	2026-04-24 16:08
outdated_command.rb	864 B	-rw-r--r--	2026-04-24 16:08
owner_command.rb	3.36 KB	-rw-r--r--	2026-04-24 16:08
pristine_command.rb	6.85 KB	-rw-r--r--	2026-04-24 16:08
push_command.rb	3.24 KB	-rw-r--r--	2026-04-24 16:08
rdoc_command.rb	2.2 KB	-rw-r--r--	2026-04-24 16:08
rebuild_command.rb	7.27 KB	-rw-r--r--	2026-04-24 16:08
search_command.rb	962 B	-rw-r--r--	2026-04-24 16:08
server_command.rb	649 B	-rw-r--r--	2026-04-24 16:08
setup_command.rb	18 KB	-rw-r--r--	2026-04-24 16:08
signin_command.rb	896 B	-rw-r--r--	2026-04-24 16:08
signout_command.rb	898 B	-rw-r--r--	2026-04-24 16:08
sources_command.rb	8.96 KB	-rw-r--r--	2026-04-24 16:08
specification_command.rb	3.46 KB	-rw-r--r--	2026-04-24 16:08
stale_command.rb	965 B	-rw-r--r--	2026-04-24 16:08
uninstall_command.rb	5.86 KB	-rw-r--r--	2026-04-24 16:08
unpack_command.rb	4.14 KB	-rw-r--r--	2026-04-24 16:08
update_command.rb	8.3 KB	-rw-r--r--	2026-04-24 16:08
which_command.rb	2.09 KB	-rw-r--r--	2026-04-24 16:08
yank_command.rb	2.35 KB	-rw-r--r--	2026-04-24 16:08

Rename

# frozen_string_literal: true

require_relative "../command"
require_relative "../dependency_list"
require_relative "../uninstaller"

class Gem::Commands::CleanupCommand < Gem::Command
  def initialize
    super "cleanup",
          "Clean up old versions of installed gems",
          force: false, install_dir: Gem.dir,
          check_dev: true

add_option("-n", "-d", "--dry-run",
               "Do not uninstall gems") do |_value, options|
      options[:dryrun] = true
    end

add_option(:Deprecated, "--dryrun",
               "Do not uninstall gems") do |_value, options|
      options[:dryrun] = true
    end
    deprecate_option("--dryrun", extra_msg: "Use --dry-run instead")

add_option("-D", "--[no-]check-development",
               "Check development dependencies while uninstalling",
               "(default: true)") do |value, options|
      options[:check_dev] = value
    end

add_option("--[no-]user-install",
               "Cleanup in user's home directory instead",
               "of GEM_HOME.") do |value, options|
      options[:user_install] = value
    end

@candidate_gems  = nil
    @default_gems    = []
    @full            = nil
    @gems_to_cleanup = nil
    @primary_gems    = nil
  end

def arguments # :nodoc:
    "GEMNAME       name of gem to cleanup"
  end

def defaults_str # :nodoc:
    "--no-dry-run"
  end

def description # :nodoc:
    <<-EOF
The cleanup command removes old versions of gems from GEM_HOME that are not
required to meet a dependency.  If a gem is installed elsewhere in GEM_PATH
the cleanup command won't delete it.

If no gems are named all gems in GEM_HOME are cleaned.
    EOF
  end

def usage # :nodoc:
    "#{program_name} [GEMNAME ...]"
  end

def execute
    say "Cleaning up installed gems..."

if options[:args].empty?
      done     = false
      last_set = nil

until done do
        clean_gems

this_set = @gems_to_cleanup.map(&:full_name).sort

done = this_set.empty? || last_set == this_set

last_set = this_set
      end
    else
      clean_gems
    end

say "Clean up complete"

verbose do
      skipped = @default_gems.map(&:full_name)

"Skipped default gems: #{skipped.join ", "}"
    end
  end

def clean_gems
    get_primary_gems
    get_candidate_gems
    get_gems_to_cleanup

@full = Gem::DependencyList.from_specs

deplist = Gem::DependencyList.new
    @gems_to_cleanup.each {|spec| deplist.add spec }

deps = deplist.strongly_connected_components.flatten

deps.reverse_each do |spec|
      uninstall_dep spec
    end
  end

def get_candidate_gems
    @candidate_gems = if options[:args].empty?
      Gem::Specification.to_a
    else
      options[:args].flat_map do |gem_name|
        Gem::Specification.find_all_by_name gem_name
      end
    end
  end

def get_gems_to_cleanup
    gems_to_cleanup = @candidate_gems.select do |spec|
      @primary_gems[spec.name].version != spec.version
    end

default_gems, gems_to_cleanup = gems_to_cleanup.partition(&:default_gem?)

uninstall_from = options[:user_install] ? Gem.user_dir : Gem.dir

gems_to_cleanup = gems_to_cleanup.select do |spec|
      spec.base_dir == uninstall_from
    end

@default_gems += default_gems
    @default_gems.uniq!
    @gems_to_cleanup = gems_to_cleanup.uniq
  end

def get_primary_gems
    @primary_gems = {}

Gem::Specification.each do |spec|
      if @primary_gems[spec.name].nil? ||
         @primary_gems[spec.name].version < spec.version
        @primary_gems[spec.name] = spec
      end
    end
  end

def uninstall_dep(spec)
    return unless @full.ok_to_remove?(spec.full_name, options[:check_dev])

if options[:dryrun]
      say "Dry Run Mode: Would uninstall #{spec.full_name}"
      return
    end

say "Attempting to uninstall #{spec.full_name}"

uninstall_options = {
      executables: false,
      version: "= #{spec.version}",
    }

uninstall_options[:user_install] = Gem.user_dir == spec.base_dir

uninstaller = Gem::Uninstaller.new spec.name, uninstall_options

begin
      uninstaller.uninstall
    rescue Gem::DependencyRemovalException, Gem::InstallError,
           Gem::GemNotInHomeException, Gem::FilePermissionError => e
      say "Unable to uninstall #{spec.full_name}:"
      say "\t#{e.class}: #{e.message}"
    end
  end
end