mutant 0.3.0.beta4 → 0.3.0.beta5

data/lib/mutant/matcher/method/finder.rb

@@ -0,0 +1,72 @@
+module Mutant
+  class Matcher
+    class Method
+
+      # Visitor to find last match inside AST
+      class Finder
+
+        # Run finder
+        #
+        # @param [Parser::AST::Node]
+        #
+        # @return [Parser::AST::Node]
+        #   if found
+        #
+        # @return [nil]
+        #   otherwise
+        #
+        # @api private
+        #
+        #
+        def self.run(root, &predicate)
+          new(root, predicate).match
+        end
+
+        private_class_method :new
+
+        # Return match
+        #
+        # @return [Parser::AST::Node]
+        #
+        # @api private
+        #
+        attr_reader :match
+
+      private
+
+        # Initialize object
+        #
+        # @param [Parer::AST::Node]
+        #
+        # @return [undefined]
+        #
+        # @api private
+        #
+        #
+        def initialize(root, predicate)
+          @root, @predicate = root, predicate
+          visit(root)
+        end
+
+        # Visit node
+        #
+        # @param [Parser::AST::Node] node
+        #
+        # @return [undefined]
+        #
+        # @api private
+        #
+        def visit(node)
+          if @predicate.call(node)
+            @match = node
+          end
+
+          node.children.each do |child|
+            visit(child) if child.kind_of?(Parser::AST::Node)
+          end
+        end
+
+      end # Finder
+    end # Method
+  end # Matcher
+end # Mutant

data/lib/mutant/matcher/method/singleton.rb

@@ -16,8 +16,8 @@ module Mutant
         end
         memoize :identification
 
-        RECEIVER_INDEX = 0
-        NAME_INDEX     = 1
+        RECEIVER_INDEX   = 0
+        NAME_INDEX       = 1
         CONST_NAME_INDEX = 1
 
       private

data/lib/mutant/matcher/methods.rb

@@ -2,7 +2,7 @@ module Mutant
   class Matcher
     # Abstract base class for matcher that returns method subjects extracted from scope
     class Methods < self
-      include AbstractType, Concord::Public.new(:scope)
+      include AbstractType, Concord::Public.new(:cache, :scope)
 
       # Enumerate subjects
       #
@@ -59,7 +59,7 @@ module Mutant
       # @api private
       #
       def emit_matches(method)
-        matcher.new(scope, method).each do |subject|
+        matcher.new(cache, scope, method).each do |subject|
           yield subject
         end
       end

data/lib/mutant/matcher/namespace.rb

@@ -3,7 +3,7 @@ module Mutant
 
     # Matcher for specific namespace
     class Namespace < self
-      include Concord::Public.new(:namespace)
+      include Concord::Public.new(:cache, :namespace)
 
       # Enumerate subjects
       #
@@ -19,7 +19,7 @@ module Mutant
         return to_enum unless block_given?
 
         scopes.each do |scope|
-          Scope.each(scope, &block)
+          Scope.each(cache, scope, &block)
         end
 
         self

data/lib/mutant/matcher/scope.rb

@@ -2,7 +2,7 @@ module Mutant
   class Matcher
     # Matcher for specific namespace
     class Scope < self
-      include Concord::Public.new(:scope)
+      include Concord::Public.new(:cache, :scope)
 
       MATCHERS = [
         Matcher::Methods::Singleton,
@@ -23,7 +23,7 @@ module Mutant
         return to_enum unless block_given?
 
         MATCHERS.each do |matcher|
-          matcher.each(scope, &block)
+          matcher.each(cache, scope, &block)
         end
 
         self

data/lib/mutant/mutation.rb

@@ -30,7 +30,10 @@ module Mutant
 
     # Insert mutated node
     #
-    # FIXME: Cache subject visibility in a better way! Ideally dont mutate it.
+    # FIXME:
+    #   Cache subject visibility in a better way! Ideally dont mutate it implicitly.
+    #   Also subject.public? should NOT be a public interface it is a detail of method
+    #   mutations.
     #
     # @return [self]
     #

data/lib/mutant/mutator/node.rb

@@ -173,7 +173,7 @@ module Mutant
 
       # Emit a new AST node with NilLiteral class
       #
-      # @return [Rubinius::AST::NilLiteral]
+      # @return [undefined]
       #
       # @api private
       #

data/lib/mutant/zombifier.rb

@@ -0,0 +1,255 @@
+module Mutant
+  # Zombifier namespace
+  module Zombifier
+
+    # Excluded from zombification, reasons
+    #
+    # * Relies dynamic require, zombifier does not know how to recurse here (racc)
+    # * Unparser bug (optparse)
+    # * Toplevel reference/cbase nodes in code (rspec)
+    # * Creates useless toplevel modules that get vendored under ::Zombie (set)
+    #
+    STOP = %w(
+      set
+      rspec
+      diff/lcs
+      parser
+      parser/all
+      parser/current
+      racc/parser
+      optparse
+    ).to_set
+
+    # Perform self zombification
+    #
+    # @return [self]
+    #
+    # @api private
+    #
+    def self.zombify
+      run('mutant')
+    end
+
+    # Zombify gem
+    #
+    # @param [String] name
+    #
+    # @return [self]
+    #
+    # @api private
+    #
+    def self.run(name)
+      Gem.new(name).zombify
+    end
+
+    # Zombifier subject, compatible with mutants loader
+    class Subject < Mutant::Subject
+      include NodeHelpers
+
+      # Return new object
+      #
+      # @param [File]
+      #
+      # @return [Subject]
+      #
+      # @api private
+      #
+      def self.new(file)
+        super(file, file.node)
+      end
+
+      # Perform zombification on subject
+      #
+      # @return [self]
+      #
+      # @api private
+      #
+      def zombify
+        $stderr.puts "Zombifying #{context.source_path}"
+        Loader::Eval.run(zombified_root, self)
+        self
+      end
+      memoize :zombify
+
+    private
+
+      # Return zombified root
+      #
+      # @return [Parser::AST::Node]
+      #
+      # @api private
+      #
+      def zombified_root
+        s(:module, s(:const, nil, :Zombie), node)
+      end
+
+    end # Subject
+
+    # File containing source beeing zombified
+    class File
+      include Adamantium::Flat, Concord::Public.new(:source_path)
+
+      CACHE = {}
+
+      # Zombify contents of file
+      #
+      # @return [self]
+      #
+      # @api private
+      #
+      def zombify
+        subject.zombify
+        required_paths.each do |path|
+          file = File.find(path)
+          next unless file
+          file.zombify
+        end
+        self
+      end
+
+      # Find file
+      #
+      # @param [String] logical_name
+      #
+      # @return [File]
+      #   if found
+      #
+      # @raise [RuntimeError]
+      #   if file cannot be found
+      #
+      def self.find(logical_name)
+        return if STOP.include?(logical_name)
+        CACHE.fetch(logical_name) do
+          CACHE[logical_name] = find_uncached(logical_name)
+        end
+      end
+
+      # Find file without cache
+      #
+      # @param [String] logical_name
+      #
+      # @return [File]
+      #   if found
+      #
+      # @return [nil]
+      #   otherwise
+      #
+      # @api private
+      #
+      def self.find_uncached(logical_name)
+        file_name =
+          unless logical_name.end_with?('.rb')
+            "#{logical_name}.rb"
+          else
+            logical_name
+          end
+
+        $LOAD_PATH.each do |path|
+          path = Pathname.new(path).join(file_name)
+          if path.exist?
+            $stderr.puts "Loading #{path}"
+            return new(path)
+          end
+        end
+
+        $stderr.puts "Cannot find #{file_name} in $LOAD_PATH"
+        nil
+      end
+
+      # Return subject
+      #
+      # @return [Subject]
+      #
+      # @api private
+      #
+      def subject
+        Subject.new(self)
+      end
+      memoize :subject
+
+      # Return node
+      #
+      # @return [Parser::AST::Node]
+      #
+      # @api private
+      #
+      def node
+        Parser::CurrentRuby.parse(::File.read(source_path))
+      end
+      memoize :node
+
+      RECEIVER_INDEX = 0
+      SELECTOR_INDEX = 1
+      ARGUMENT_INDEX = 2..-1.freeze
+
+      # Return required paths
+      #
+      # @return [Enumerable<String>]
+      #
+      # @api private
+      #
+      def required_paths
+        require_nodes.map do |node|
+          arguments = node.children[ARGUMENT_INDEX]
+          unless arguments.length == 1
+            raise "Require node with not exactly one argument: #{node}"
+          end
+          argument = arguments.first
+          unless argument.type == :str
+            raise "Require argument is not a literal string: #{argument}"
+          end
+          argument.children.first
+        end
+      end
+      memoize :required_paths
+
+    private
+
+      # Return require nodes
+      #
+      # @return [Enumerable<Parser::AST::Node>]
+      #
+      # @api private
+      #
+      def require_nodes
+        children = node.type == :begin ? node.children : [node]
+        children.select do |node|
+          children = node.children
+          node.type == :send && children.at(RECEIVER_INDEX).nil? && children.at(SELECTOR_INDEX) == :require
+        end
+      end
+
+    end # File
+
+    # Gem beeing zombified
+    class Gem
+      include Adamantium::Flat, Concord.new(:name)
+
+      # Return subjects
+      #
+      # @return [Enumerable<Subject>]
+      #
+      # @api private
+      #
+      def zombify
+        root_file.zombify
+      end
+      memoize :zombify
+
+    private
+
+      # Return root souce file
+      #
+      # @return [File]
+      #
+      # @api private
+      #
+      def root_file
+        File.find(name) || raise("No root file!")
+      end
+      memoize :root_file
+
+    end # Gem
+
+  end # Zombifier
+end # Mutant

data/mutant.gemspec

@@ -2,7 +2,7 @@
 
 Gem::Specification.new do |gem|
   gem.name        = 'mutant'
-  gem.version     = '0.3.0.beta4'
+  gem.version     = '0.3.0.beta5'
   gem.authors     = [ 'Markus Schirp' ]
   gem.email       = [ 'mbj@schirp-dso.com' ]
 
@@ -16,8 +16,8 @@ Gem::Specification.new do |gem|
   gem.extra_rdoc_files = %w[TODO LICENSE]
   gem.executables       = [ 'mutant' ]
 
-  gem.add_runtime_dependency('parser',              '~> 2.0.beta7')
-  gem.add_runtime_dependency('unparser',            '~> 0.0.4')
+  gem.add_runtime_dependency('parser',              '~> 2.0.beta9')
+  gem.add_runtime_dependency('unparser',            '~> 0.0.6')
   gem.add_runtime_dependency('ice_nine',            '~> 0.8.0')
   gem.add_runtime_dependency('descendants_tracker', '~> 0.0.1')
   gem.add_runtime_dependency('adamantium',          '~> 0.0.8')

data/spec/integration/mutant/zombie_spec.rb

@@ -1,8 +1,8 @@
 require 'spec_helper'
 
 describe Mutant, 'as a zombie' do
-  pending 'allows to create zombie from mutant' do
-    Zombie.setup
-    Zombie::Runner
+  specify 'it allows to create zombie from mutant' do
+    Mutant::Zombifier.run('mutant')
+    Zombie.constants.should include(:Mutant)
   end
 end