AlkantarClanX12
Current Path : /opt/alt/ruby33/share/rubygems/rubygems/commands/ |
Current File : //opt/alt/ruby33/share/rubygems/rubygems/commands/check_command.rb |
# frozen_string_literal: true require_relative "../command" require_relative "../version_option" require_relative "../validator" require_relative "../doctor" class Gem::Commands::CheckCommand < Gem::Command include Gem::VersionOption def initialize super "check", "Check a gem repository for added or missing files", alien: true, doctor: false, dry_run: false, gems: true add_option("-a", "--[no-]alien", 'Report "unmanaged" or rogue files in the', "gem repository") do |value, options| options[:alien] = value end add_option("--[no-]doctor", "Clean up uninstalled gems and broken", "specifications") do |value, options| options[:doctor] = value end add_option("--[no-]dry-run", "Do not remove files, only report what", "would be removed") do |value, options| options[:dry_run] = value end add_option("--[no-]gems", "Check installed gems for problems") do |value, options| options[:gems] = value end add_version_option "check" end def check_gems say "Checking gems..." say gems = begin get_all_gem_names rescue StandardError [] end Gem::Validator.new.alien(gems).sort.each do |key, val| if val.empty? say "#{key} is error-free" if Gem.configuration.verbose else say "#{key} has #{val.size} problems" val.each do |error_entry| say " #{error_entry.path}:" say " #{error_entry.problem}" end end say end end def doctor say "Checking for files from uninstalled gems..." say Gem.path.each do |gem_repo| doctor = Gem::Doctor.new gem_repo, options[:dry_run] doctor.doctor end end def execute check_gems if options[:gems] doctor if options[:doctor] end def arguments # :nodoc: "GEMNAME name of gem to check" end def defaults_str # :nodoc: "--gems --alien" end def description # :nodoc: <<-EOF The check command can list and repair problems with installed gems and specifications and will clean up gems that have been partially uninstalled. EOF end def usage # :nodoc: "#{program_name} [OPTIONS] [GEMNAME ...]" end end