free_mutant/lib/mutant/cli/classifier.rb
Markus Schirp 1d981afae8 Move more literals to constants
As constans the literals get frozen. This improves sharpness of API use.
2013-07-21 22:19:41 +02:00

125 lines
2.7 KiB
Ruby

module Mutant
class CLI
# A classifier for input strings
class Classifier < Matcher
include AbstractType, Adamantium::Flat, Concord.new(:cache, :match)
include Equalizer.new(:identifier)
SCOPE_NAME_PATTERN = /[A-Za-z][A-Za-z_0-9]*/.freeze
OPERATOR_PATTERN = Regexp.union(*OPERATOR_METHODS.map(&:to_s)).freeze
METHOD_NAME_PATTERN = /([_A-Za-z][A-Za-z0-9_]*[!?=]?|#{OPERATOR_PATTERN})/.freeze
SCOPE_PATTERN = /(?:::)?#{SCOPE_NAME_PATTERN}(?:::#{SCOPE_NAME_PATTERN})*/.freeze
CBASE_PATTERN = /\A::/.freeze
SCOPE_OPERATOR = '::'.freeze
SINGLETON_PATTERN = %r(\A(#{SCOPE_PATTERN})\z).freeze
REGISTRY = []
# Register classifier
#
# @return [undefined]
#
# @api private
#
def self.register
REGISTRY << self
end
private_class_method :register
# Return constant
#
# @param [String] location
#
# @return [Class|Module]
#
# @api private
#
def self.constant_lookup(location)
location.gsub(CBASE_PATTERN, EMPTY_STRING).split(SCOPE_OPERATOR).inject(Object) do |parent, name|
parent.const_get(name)
end
end
# Return matchers for input
#
# @return [Classifier]
# if a classifier handles the input
#
# @return [nil]
# otherwise
#
# @api private
#
def self.build(*arguments)
classifiers = REGISTRY.map do |descendant|
descendant.run(*arguments)
end.compact
raise if classifiers.length > 1
classifiers.first
end
# Run classifier
#
# @param [Cache] cache
#
# @param [String] input
#
# @return [Classifier]
# if input is handled by classifier
#
# @return [nil]
# otherwise
#
# @api private
#
def self.run(cache, input)
match = self::REGEXP.match(input)
return unless match
new(cache, match)
end
# No protected_class_method in ruby :(
class << self; protected :run; end
# Enumerate subjects
#
# @return [self]
# if block given
#
# @return [Enumerator<Subject>]
# otherwise
#
# @api private
#
def each(&block)
return to_enum unless block_given?
matcher.each(&block)
self
end
# Return identifier
#
# @return [String]
#
# @api private
#
def identifier
match.to_s
end
memoize :identifier
# Return matcher
#
# @return [Matcher]
#
# @api private
#
abstract_method :matcher
end # Classifier
end # CLI
end # Mutant