mutant 0.8.10 → 0.8.11

data/lib/mutant/mutator/node/literal/regex.rb

@@ -8,7 +8,7 @@ module Mutant
           handle(:regexp)
 
           # No input can ever be matched with this
-          NULL_REGEXP_SOURCE = 'a\A'.freeze
+          NULL_REGEXP_SOURCE = 'nomatch\A'.freeze
 
         private
 
@@ -19,11 +19,12 @@ module Mutant
             children.last
           end
 
-          # Emit mutants
+          # Emit mutations
           #
           # @return [undefined]
           def dispatch
-            emit_singletons unless parent_node && n_match_current_line?(parent_node)
+            mutate_body
+            emit_singletons unless parent_node
             children.each_with_index do |child, index|
               mutate_child(index) unless n_str?(child)
             end
@@ -31,6 +32,45 @@ module Mutant
             emit_type(s(:str, NULL_REGEXP_SOURCE), options)
           end
 
+          # Mutate regexp body
+          #
+          # @note will only mutate parts of regexp body if the
+          # body is composed of only strings. Regular expressions
+          # with interpolation are skipped
+          #
+          # @return [undefined]
+          def mutate_body
+            return unless body.all?(&method(:n_str?))
+            return unless AST::Regexp.supported?(body_expression)
+
+            Mutator.mutate(body_ast).each do |mutation|
+              source = AST::Regexp.to_expression(mutation).to_s
+              emit_type(s(:str, source), options)
+            end
+          end
+
+          # AST representation of regexp body
+          #
+          # @return [Parser::AST::Node]
+          def body_ast
+            AST::Regexp.to_ast(body_expression)
+          end
+
+          # Expression representation of regexp body
+          #
+          # @return [Regexp::Expression]
+          def body_expression
+            AST::Regexp.parse(body.map(&:children).join)
+          end
+          memoize :body_expression
+
+          # Children of regexp node which compose regular expression source
+          #
+          # @return [Array<Parser::AST::Node>]
+          def body
+            children.slice(0...-1)
+          end
+
         end # Regex
       end # Literal
     end # Node

data/lib/mutant/mutator/node/literal/string.rb

@@ -9,7 +9,7 @@ module Mutant
 
         private
 
-          # Emit mutants
+          # Emit mutations
           #
           # @return [undefined]
           def dispatch

data/lib/mutant/mutator/node/literal/symbol.rb

@@ -13,14 +13,12 @@ module Mutant
 
         private
 
-          # Emit mutants
+          # Emit mutations
           #
           # @return [undefined]
           def dispatch
             emit_singletons
-            Mutator::Util::Symbol.each(value, self) do |value|
-              emit_type(value)
-            end
+            Util::Symbol.call(value).each(&method(:emit_type))
           end
 
         end # Symbol

data/lib/mutant/mutator/node/masgn.rb

@@ -11,7 +11,7 @@ module Mutant
 
       private
 
-        # Perform dispatch
+        # Emit mutations
         #
         # @return [undefined]
         def dispatch

data/lib/mutant/mutator/node/match_current_line.rb

@@ -10,7 +10,7 @@ module Mutant
 
       private
 
-        # Emit mutants
+        # Emit mutations
         #
         # @return [undefined]
         def dispatch

data/lib/mutant/mutator/node/mlhs.rb

@@ -12,9 +12,8 @@ module Mutant
         #
         # @return [undefined]
         def dispatch
-          children.each_index do |index|
-            mutate_child(index)
-            delete_child(index) unless children.one?
+          mutate_single_child do |_child, index|
+            delete_child(index)
           end
         end
 

data/lib/mutant/mutator/node/named_value/access.rb

@@ -33,7 +33,7 @@ module Mutant
               super()
             end
 
-            private
+          private
 
             # Emit instance variable as attribute send
             #
@@ -48,7 +48,7 @@ module Mutant
             def attribute_name
               name.slice(NAME_RANGE).to_sym
             end
-          end
+          end # Ivar
 
         end # Access
       end # NamedValue

data/lib/mutant/mutator/node/named_value/constant_assignment.rb

@@ -12,12 +12,13 @@ module Mutant
 
         private
 
-          # Perform dispatch
+          # Emit mutations
           #
           # @return [undefined]
           def dispatch
             mutate_name
-            emit_value_mutations if value
+            return unless value # op asgn
+            emit_value_mutations
             emit_remove_const
           end
 
@@ -32,7 +33,7 @@ module Mutant
           #
           # @return [undefined]
           def mutate_name
-            Mutator::Util::Symbol.each(name, self) do |name|
+            Util::Symbol.call(name).each do |name|
               emit_name(name.upcase)
             end
           end

data/lib/mutant/mutator/node/named_value/variable_assignment.rb

@@ -16,20 +16,20 @@ module Mutant
           }
 
           MAP = IceNine.deep_freeze(
-            Hash[map.map { |type, prefix| [type, [prefix, /^#{Regexp.escape(prefix)}/]] }]
+            Hash[map.map { |type, prefix| [type, [prefix, /^#{::Regexp.escape(prefix)}/]] }]
           )
 
           handle(*MAP.keys)
 
         private
 
-          # Perform dispatch
+          # Emit mutations
           #
           # @return [undefined]
           def dispatch
             emit_singletons
             mutate_name
-            emit_value_mutations if value # mlhs!
+            emit_value_mutations if value # op asgn!
           end
 
           # Emit name mutations
@@ -38,7 +38,7 @@ module Mutant
           def mutate_name
             prefix, regexp = MAP.fetch(node.type)
             stripped = name.to_s.sub(regexp, EMPTY_STRING)
-            Mutator::Util::Symbol.each(stripped, self) do |name|
+            Util::Symbol.call(stripped).each do |name|
               emit_name(:"#{prefix}#{name}")
             end
           end

data/lib/mutant/mutator/node/next.rb

@@ -13,7 +13,7 @@ module Mutant
         #
         # @return [undefined]
         def dispatch
-          super
+          super()
           emit_singletons
           children.each_index(&method(:delete_child))
           emit(s(:break, *children))

data/lib/mutant/mutator/node/nthref.rb

@@ -10,7 +10,7 @@ module Mutant
 
       private
 
-        # Perform dispatch
+        # Emit mutations
         #
         # @return [undefined]
         def dispatch

data/lib/mutant/mutator/node/or_asgn.rb

@@ -2,7 +2,7 @@ module Mutant
   class Mutator
     class Node
 
-      # OpAsgn mutator
+      # OrAsgn mutator
       class OrAsgn < self
 
         handle(:or_asgn)

data/lib/mutant/mutator/node/regexp.rb

@@ -0,0 +1,44 @@
+module Mutant
+  class Mutator
+    class Node
+      module Regexp
+        # Generic regexp mutator
+        class Generic < Node
+          handle(*(AST::Types::REGEXP - %i[regexp_root_expression regexp_bol_anchor]))
+
+          # Noop dispatch
+          #
+          # @return [undefined]
+          def dispatch
+          end
+        end # Generic
+
+        # Mutator for root expression regexp wrapper
+        class RootExpression < Node
+          handle(:regexp_root_expression)
+
+          # Emit mutations for children of root node
+          #
+          # @return [undefined]
+          def dispatch
+            children.each_index(&method(:mutate_child))
+          end
+        end # RootExpression
+
+        # Mutator for beginning of line anchor `^`
+        class BeginningOfLineAnchor < Node
+          handle(:regexp_bol_anchor)
+
+          # Emit mutations
+          #
+          # Replace `^` with `\A`
+          #
+          # @return [undefined]
+          def dispatch
+            emit(s(:regexp_bos_anchor))
+          end
+        end # BeginningOfLineAnchor
+      end # Regexp
+    end # Node
+  end # Mutator
+end # Mutant

data/lib/mutant/mutator/node/regopt.rb

@@ -0,0 +1,31 @@
+module Mutant
+  class Mutator
+    class Node
+
+      # Regular expression options mutation
+      class Regopt < self
+
+        MUTATED_FLAGS = IceNine.deep_freeze(%i[i])
+
+        handle(:regopt)
+
+      private
+
+        # Emit mutations
+        #
+        # @return [undefined]
+        def dispatch
+          emit_type(*mutated_flags)
+        end
+
+        # Altered flags array excluding case insensitive flag
+        #
+        # @return [Array<Symbol>]
+        def mutated_flags
+          (children - MUTATED_FLAGS)
+        end
+
+      end # Regopt
+    end # Node
+  end # Mutator
+end # Mutant

data/lib/mutant/mutator/node/resbody.rb

@@ -24,7 +24,7 @@ module Mutant
         # @return [undefined]
         def mutate_captures
           return unless captures
-          Util::Array::Element.each(captures.children, self) do |matchers|
+          Util::Array::Element.call(captures.children).each do |matchers|
             next if matchers.any?(&method(:n_nil?))
             emit_captures(s(:array, *matchers))
           end

data/lib/mutant/mutator/node/rescue.rb

@@ -28,10 +28,8 @@ module Mutant
         # @return [undefined]
         def mutate_rescue_bodies
           children_indices(RESCUE_INDICES).each do |index|
-            rescue_body = children.at(index)
-            next unless rescue_body
             mutate_child(index)
-            resbody_body = AST::Meta::Resbody.new(rescue_body).body
+            resbody_body = AST::Meta::Resbody.new(children.fetch(index)).body
             emit_concat(resbody_body) if resbody_body
           end
         end

data/lib/mutant/mutator/node/return.rb

@@ -10,7 +10,7 @@ module Mutant
 
       private
 
-        # Emit mutants
+        # Emit mutations
         #
         # @return [undefined]
         def dispatch

data/lib/mutant/mutator/node/send.rb

@@ -18,13 +18,19 @@ module Mutant
           reverse_each:  %i[each],
           reverse_merge: %i[merge],
           map:           %i[each],
+          sample:        %i[first last],
+          pop:           %i[last],
+          shift:         %i[first],
+          first:         %i[last],
+          last:          %i[first],
           send:          %i[public_send __send__],
           __send__:      %i[public_send],
+          method:        %i[public_method],
           gsub:          %i[sub],
           eql?:          %i[equal?],
           to_s:          %i[to_str],
           to_i:          %i[to_int],
-          to_a:          %i[to_ary],
+          to_a:          %i[to_ary to_set],
           to_h:          %i[to_hash],
           at:            %i[fetch key?],
           fetch:         %i[key?],
@@ -45,7 +51,7 @@ module Mutant
 
       private
 
-        # Perform dispatch
+        # Emit mutations
         #
         # @return [undefined]
         def dispatch
@@ -82,6 +88,7 @@ module Mutant
         #
         # @return [Enumerable<Parser::AST::Node>]
         alias_method :arguments, :remaining_children
+        private :arguments
 
         # Perform normal, non special case dispatch
         #
@@ -102,6 +109,8 @@ module Mutant
         def emit_selector_specific_mutations
           emit_const_get_mutation
           emit_integer_mutation
+          emit_dig_mutation
+          emit_drop_mutation
         end
 
         # Emit selector mutations specific to top level constants
@@ -116,6 +125,37 @@ module Mutant
             .each(&method(:emit_selector))
         end
 
+        # Emit mutation for `#dig`
+        #
+        # - Mutates `foo.dig(a, b)` to `foo.fetch(a).dig(b)`
+        # - Mutates `foo.dig(a)` to `foo.fetch(a)`
+        #
+        # @return [undefined]
+        def emit_dig_mutation
+          return if !selector.equal?(:dig) || arguments.none?
+
+          head, *tail = arguments
+
+          fetch_mutation = s(:send, receiver, :fetch, head)
+
+          return emit(fetch_mutation) if tail.empty?
+
+          emit(s(:send, fetch_mutation, :dig, *tail))
+        end
+
+        # Emit mutation `foo[n..-1]` -> `foo.drop(n)`
+        #
+        # @return [undefined]
+        def emit_drop_mutation
+          return if !selector.equal?(:[]) || !arguments.one? || !n_irange?(arguments.first)
+
+          start, ending = *arguments.first
+
+          return unless ending.eql?(s(:int, -1))
+
+          emit(s(:send, receiver, :drop, start))
+        end
+
         # Emit mutation from `to_i` to `Integer(...)`
         #
         # @return [undefined]
@@ -145,7 +185,7 @@ module Mutant
         #
         # @return [undefined]
         def emit_naked_receiver
-          emit(receiver) if receiver && !NOT_ASSIGNABLE.include?(receiver.type)
+          emit(receiver) if receiver
         end
 
         # Mutate arguments

data/lib/mutant/mutator/node/send/attribute_assignment.rb

@@ -5,6 +5,9 @@ module Mutant
         # Mutator for attribute assignments
         class AttributeAssignment < self
 
+          ATTRIBUTE_RANGE = (0..-2).freeze
+          private_constant(*constants(false))
+
         private
 
           # Emit mutations
@@ -28,7 +31,7 @@ module Mutant
           #
           # @return [undefined]
           def emit_attribute_read
-            emit_type(receiver, selector.to_s[0..-2].to_sym)
+            emit_type(receiver, selector[ATTRIBUTE_RANGE].to_sym)
           end
 
         end # AttributeAssignment