lookout 2.3.0 → 3.0.0

data/lib/lookout/recorder/not.rb

@@ -1,11 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Recorder::Not < Lookout::Aphonic
-  def initialize(subject)
-    @subject = subject
-  end
-
-  def to
-    @subject.to.not
-  end
-end

data/lib/lookout/recorder/tape.rb

@@ -1,21 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Recorder::Tape
-  Method = Struct.new(:name, :args)
-
-  def initialize
-    @methods = []
-  end
-
-  def empty?
-    @methods.empty?
-  end
-
-  def record(method, args)
-    @methods << Method.new(method, args)
-  end
-
-  def play_for(subject)
-    @methods.inject(subject){ |result, method| result.send(method.name, *method.args) }
-  end
-end

data/lib/lookout/recorders.rb

@@ -1,6 +0,0 @@
-# -*- coding: utf-8 -*-
-
-module Lookout::Recorders
-  autoload :Reception, 'lookout/recorders/reception'
-  autoload :State, 'lookout/recorders/state'
-end

data/lib/lookout/recorders/reception.rb

@@ -1,47 +0,0 @@
-# -*- coding: utf-8 -*-
-
-module Lookout::Recorders::Reception
-  def subject!(mocks, stubs)
-    @mock = @method._lookout_define(mocks)
-    methods.play_for @mock
-    subject
-  end
-
-  def verify
-    @mock.verify
-  end
-
-private
-
-  def receive!
-    @method = Method.new(self, @negated)
-  end
-
-  def methods
-    @methods ||= Lookout::Recorder::Tape.new
-  end
-
-  def method_missing(method, *args, &block)
-    super unless defined? @method
-    methods.record method, args
-    self
-  end
-
-  class Method < Lookout::Aphonic
-    undef extend
-    undef is_a?
-
-    def initialize(recorder, negated)
-      @recorder, @negated = recorder, negated
-    end
-
-    def method_missing(method, *args, &body)
-      @method, @args, @body = method, args, body
-      @recorder
-    end
-
-    def _lookout_define(mocks)
-      mocks.define(@recorder.subject, @method, *@args, &@body).tap{ |m| m.never if @negated }
-    end
-  end
-end

data/lib/lookout/recorders/state.rb

@@ -1,35 +0,0 @@
-# -*- coding: utf-8 -*-
-
-module Lookout::Recorders::State
-  Error = Class.new(StandardError)
-
-  def verify
-    !!methods.play_for(subject) ^ @negated or
-      raise Error,
-        case [@negated, @verb]
-        when [true, :be]    then 'expected %p not to be %s'
-        when [true, :have]  then 'expected %p not to have %s'
-        when [true, nil]    then 'expected %p not to %s'
-        when [false, :be]   then 'expected %p to be %s'
-        when [false, :have] then 'expected %p to have %s'
-        when [false, nil]   then 'expected %p to %s'
-        end % [subject, description.join(' ')]
-  end
-
-private
-
-  def methods
-    @methods ||= Lookout::Recorder::Tape.new
-  end
-
-  def description
-    @description ||= []
-  end
-
-  def method_missing(method, *args)
-    description << method.to_s
-    args.each{ |arg| description << arg.inspect }
-    methods.record method, args
-    self
-  end
-end

data/lib/lookout/result.rb

@@ -1,13 +0,0 @@
-# -*- coding: utf-8 -*-
-
-module Lookout::Result
-  def initialize(file, line)
-    @file, @line = file, line
-  end
-
-  attr_reader :file, :line
-
-  def to_s
-    '%s:%d' % [file, line]
-  end
-end

data/lib/lookout/results.rb

@@ -1,25 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Results
-  autoload :Error, 'lookout/results/error'
-  autoload :Failure, 'lookout/results/failure'
-  autoload :Failures, 'lookout/results/failures'
-  autoload :Fulfilled, 'lookout/results/fulfilled'
-  autoload :Unsuccessful, 'lookout/results/unsuccessful'
-
-  def initialize
-    @listeners = []
-  end
-
-  def on_new(&block)
-    @listeners << block
-    self
-  end
-
-  def <<(result)
-    @listeners.each do |listener|
-      listener.call result
-    end
-    self
-  end
-end

data/lib/lookout/results/error.rb

@@ -1,18 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Results::Error
-  include Lookout::Result
-
-  autoload :Exception, 'lookout/results/error/exception'
-
-  def initialize(file, line, message, exception)
-    super file, line
-    @message, @exception = message, Exception.new(exception)
-  end
-
-  attr_reader :message, :exception
-
-  def to_s
-    [super, message, exception].compact.join(': ')
-  end
-end

data/lib/lookout/results/error/exception.rb

@@ -1,34 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Results::Error::Exception
-  autoload :Backtrace, 'lookout/results/error/exception/backtrace'
-
-  def initialize(exception)
-    @exception = exception
-  end
-
-  def message
-    # Chomping off a \n here isn’t 100 percent compatible with how Ruby 1.9
-    # does it, but it simplifies the code and also makes the output better if
-    # the message is a lone \n.
-    message = @exception.message.to_str.chomp("\n")
-    if @exception.class == RuntimeError and message.empty?
-      'unhandled exception'
-    elsif message.empty?
-      @exception.class.name
-    elsif @exception.class.name.empty? or @exception.class.name =~ /^#/
-      message
-    else
-      before, newline, after = message.partition("\n")
-      '%s (%s)%s%s' % [before, @exception.class.name, newline, after]
-    end
-  end
-
-  def backtrace
-    @backtrace ||= Backtrace.new(@exception.backtrace, SystemStackError === @exception)
-  end
-
-  def to_s
-    "%s\n%s" % [message, backtrace]
-  end
-end

data/lib/lookout/results/error/exception/backtrace.rb

@@ -1,50 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Results::Error::Exception::Backtrace
-  def initialize(backtrace, trim, filter = ENV['LOOKOUT_DO_NOT_FILTER_BACKTRACE'].nil?)
-    @backtrace = case backtrace
-                 when nil then []
-                 when String then [backtrace]
-                 when Array then backtrace.select{ |l| String === l }
-                 end
-    @trim, @filter = trim, filter
-  end
-
-  def to_s
-    trim(backtrace.map{ |location| "\tfrom %s" % location }).join("\n")
-  end
-
-private
-
-  def backtrace
-    return @backtrace unless @filter
-    before or outside or @backtrace
-  end
-
-  def before
-    nilify(@backtrace.take_while{ |location| not reject? location })
-  end
-
-  def outside
-    nilify(@backtrace.reject{ |location| reject? location })
-  end
-
-  def nilify(backtrace)
-    backtrace.empty? ? nil : backtrace
-  end
-
-  def reject?(location)
-    location.start_with? Root
-  end
-
-  def trim(locations)
-    return locations unless @trim and locations.length > Head + Tail + 5
-    locations[0...Head] +
-      ["\t ... %d levels ..." % (locations.length - Head - Tail)] +
-      locations[-Tail..-1]
-  end
-
-  Root = 4.times.reduce(__FILE__){ |path, _| File.dirname(path) }
-  Head = 8
-  Tail = 5
-end

data/lib/lookout/results/failure.rb

@@ -1,16 +0,0 @@
-# -*- coding: utf-8 -*-
-
-module Lookout::Results::Failure
-  include Lookout::Result
-
-  def initialize(file, line, message)
-    super file, line
-    @message = message
-  end
-
-  attr_reader :message
-
-  def to_s
-    [super, message].compact.join(': ')
-  end
-end

data/lib/lookout/results/failures.rb

@@ -1,6 +0,0 @@
-# -*- coding: utf-8 -*-
-
-module Lookout::Results::Failures
-  autoload :Behavior, 'lookout/results/failures/behavior'
-  autoload :State, 'lookout/results/failures/state'
-end

data/lib/lookout/results/failures/behavior.rb

@@ -1,5 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Results::Failures::Behavior
-  include Lookout::Results::Failure
-end

data/lib/lookout/results/failures/state.rb

@@ -1,5 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Results::Failures::State
-  include Lookout::Results::Failure
-end

data/lib/lookout/results/fulfilled.rb

@@ -1,5 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Results::Fulfilled
-  include Lookout::Result
-end

data/lib/lookout/results/unsuccessful.rb

@@ -1,31 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Results::Unsuccessful < Lookout::Results
-  include Enumerable
-
-  def initialize
-    super
-    @unsuccessful = []
-  end
-
-  def <<(result)
-    @unsuccessful << result unless Lookout::Results::Fulfilled === result
-    super
-    self
-  end
-
-  def each
-    @unsuccessful.each do |result|
-      yield result
-    end
-    self
-  end
-
-  def errors
-    select{ |result| Lookout::Results::Error === result }
-  end
-
-  def failures
-    select{ |result| Lookout::Results::Failure === result }
-  end
-end

data/lib/lookout/runners.rb

@@ -1,6 +0,0 @@
-# -*- coding: utf-8 -*-
-
-module Lookout::Runners
-  autoload :Console, 'lookout/runners/console'
-  autoload :Trackers, 'lookout/runners/trackers'
-end

data/lib/lookout/runners/console.rb

@@ -1,49 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Runners::Console
-  def initialize(results = Lookout::Results.new,
-                 expectations = Lookout::Expectations.new(results),
-                 ui = Lookout::UI::Console.new(results))
-    @results, @expectations, @ui = results, expectations, ui
-    @ui.start
-    @failed = Lookout::Runners::Trackers::Failure.new(@results)
-  end
-
-  def install
-    Kernel.module_exec(self) do |runner|
-      define_method :Expectations do |&block|
-        runner.expectations_eval(&block)
-      end
-    end
-    self
-  end
-
-  def load(file)
-    expectations_eval do
-      begin
-        load file
-      rescue SyntaxError => e
-        raise unless matches = %r{\A(.*?:\d+): (.*)}m.match(e.message)
-        raise SyntaxError, matches[2], [matches[1]]
-      end
-    end
-  end
-
-  def exit
-    @expectations.flush
-    @ui.flush
-    super 1 if @failed.failed?
-    self
-  end
-
-  def expectations_eval(&block)
-    @expectations.instance_eval(&block)
-  rescue Interrupt, NoMemoryError, SignalException, SystemExit
-    raise
-  rescue Exception => e
-    raise unless location = Array(e.backtrace).first
-    file, line = Lookout.location(location)
-    raise unless file and line
-    @results << Lookout::Results::Error.new(file, line, nil, e)
-  end
-end

data/lib/lookout/runners/trackers.rb

@@ -1,5 +0,0 @@
-# -*- coding: utf-8 -*-
-
-module Lookout::Runners::Trackers
-  autoload :Failure, 'lookout/runners/trackers/failure'
-end

data/lib/lookout/runners/trackers/failure.rb

@@ -1,14 +0,0 @@
-# -*- coding: utf-8 -*-
-
-class Lookout::Runners::Trackers::Failure
-  def initialize(results)
-    @failed = false
-    results.on_new do |result|
-      @failed = !(Lookout::Results::Fulfilled === result) unless @failed
-    end
-  end
-
-  def failed?
-    @failed
-  end
-end

data/lib/lookout/stub.rb

@@ -1,18 +0,0 @@
-# -*- coding: utf-8 -*-
-
-module Lookout::Stub
-  autoload :Method, 'lookout/stub/method'
-  autoload :Methods, 'lookout/stub/methods'
-  autoload :Object, 'lookout/stub/object'
-
-  class << self
-    def methods
-      methods = Methods.new
-      begin
-        yield methods
-      ensure
-        methods.undefine
-      end
-    end
-  end
-end