lemon 0.8.2 → 0.8.3

data/lib/lemon/model/test_case.rb

@@ -95,7 +95,8 @@ module Lemon
           @testcase, method,
           :function => false,
           :aspect   => aspect,
-          :context => @context,
+          :context  => @context,
+          :caller   => caller,
           &block
         )
         #@testcase.steps << unit
@@ -114,7 +115,8 @@ module Lemon
           @testcase, method,
           :function => true,
           :aspect   => aspect,
-          :context => @context,
+          :context  => @context,
+          :caller   => caller,
           &block
         )
         #@testcase.steps << unit

data/lib/lemon/model/test_unit.rb

@@ -18,6 +18,9 @@ module Lemon
     # Test procedure, in which test assertions should be made.
     attr :procedure
 
+    #
+    attr :caller
+
     # New unit test.
     def initialize(testcase, target, options={}, &procedure)
       @testcase  = testcase
@@ -27,6 +30,7 @@ module Lemon
       @function  = options[:function] || options[:metaclass]
       @context   = options[:context]
       @omit      = options[:omit]
+      @caller    = options[:caller]
 
       @procedure = procedure
 
@@ -87,13 +91,52 @@ module Lemon
     #
     def description
       if meta?
-        "#{testcase} #{instance} .#{target} #{aspect}"
+        #"#{testcase} .#{target} #{aspect}"
+        "#{testcase}.#{target} #{context} #{aspect}".strip
       else
         a  = /^[aeiou]/i =~ testcase.to_s ? 'An' : 'A'
-        "#{a} #{testcase} #{instance} receiving ##{target} #{aspect}"
+        #"#{a} #{testcase} receiving ##{target} #{aspect}"
+        "#{testcase}##{target} #{context} #{aspect}".strip
       end
     end
 
+    # START-COMMIT. 201105190006
+
+    # The file method returns the file name of +caller+ which
+    # was created upon initialization of this object. It is
+    # also the first element of #file_and_line.
+    #
+    # Returns file name of caller.
+    def file
+      file_and_line.first
+    end
+
+    # Returns line number of caller.
+    def line
+      file_and_line.last
+    end
+
+    # The file_and_line method returns the file name and line number of
+    # the caller created upon initialization of this object.
+    #
+    # This method is cached.
+    #
+    # Examples
+    #   file_and_line #=> ['foo_test.rb', 123]
+    #
+    # Returns Array of file name and line number of caller.
+    def file_and_line
+      @file_and_line ||= (
+        line = caller[0]
+        i = line.rindex(':in')
+        line = i ? line[0...i] : line
+        f, l = File.basename(line).split(':')
+        [f, l]
+      )
+    end
+
+    # END-COMMIT.
+
     #
     def match?(match)    
       match == target || match === aspect

data/lib/lemon/view/test_reports/abstract.rb

@@ -128,6 +128,78 @@ module Lemon::TestReports
       pretty
     end
 
+=begin
+    #
+    def code_snippet_hash(exception, bredth=3)
+      backtrace = filtered_backtrace(exception)
+
+      backtrace.first =~ /(.+?):(\d+(?=:|\z))/ or return ""
+      source_file, source_line = $1, $2.to_i
+
+      source = source(source_file)
+      
+      radius = bredth # number of surrounding lines to show
+      region = [source_line - radius, 1].max ..
+               [source_line + radius, source.length].min
+
+      # ensure proper alignment by zero-padding line numbers
+      format = " %2s %0#{region.last.to_s.length}d %s"
+
+      hash = {}
+      region.each do |n|
+        hash[n] = source[n-1].chomp
+      end
+      hash
+    end
+=end
+
+    #
+    def code_snippet_array(exception, bredth=3)
+      backtrace = filtered_backtrace(exception)
+      backtrace.first =~ /(.+?):(\d+(?=:|\z))/ or return ""
+      source_file, source_line = $1, $2.to_i
+    
+      source = source(source_file)
+      
+      radius = bredth # number of surrounding lines to show
+      region = [source_line - radius, 1].max ..
+               [source_line + radius, source.length].min
+    
+      # ensure proper alignment by zero-padding line numbers
+      #format = " %2s %0#{region.last.to_s.length}d %s"
+    
+      region.map do |n|
+        source[n-1].chomp
+      end
+    end
+
+    #
+    def code_snippet_omap(exception, bredth=3)
+      backtrace = filtered_backtrace(exception)
+      backtrace.first =~ /(.+?):(\d+(?=:|\z))/ or return ""
+      source_file, source_line = $1, $2.to_i
+
+      source = source(source_file)
+      
+      radius = bredth # number of surrounding lines to show
+      region = [source_line - radius, 1].max ..
+               [source_line + radius, source.length].min
+
+      # ensure proper alignment by zero-padding line numbers
+      #format = " %2s %0#{region.last.to_s.length}d %s"
+
+      a = []
+      region.each do |n|
+        a << {n=> source[n-1].chomp}
+      end
+      a
+    end
+
+    # TODO: improve
+    def code_line(exception)
+      code_snippet_array(exception, 0).first.strip
+    end
+
     #
     def source(file)
       @source[file] ||= (
@@ -144,6 +216,41 @@ module Lemon::TestReports
       File.basename(line)
     end
 
+    #
+    def file_and_line_array(exception)
+      case exception
+      when Exception
+        line = exception.backtrace[0]
+      else
+        line = exception[0] # backtrace
+      end
+      return ["", 0] unless line
+      i = line.rindex(':in')
+      line = i ? line[0...i] : line
+      f, l = File.basename(line).split(':')
+      return [f, l.to_i]
+    end
+   
+
+    def file(exception)
+      file_and_line_array(exception).first
+    end
+
+    def line(exception)
+      file_and_line_array(exception).last
+    end
+
+    #
+    def filtered_backtrace(exception)
+      case exception
+      when Exception
+        backtrace = exception.backtrace
+      else
+        backtrace = exception
+      end
+      backtrace.reject{ |bt| bt =~ INTERNALS }
+    end
+
   end
 
 end

data/lib/lemon/view/test_reports/tapj.rb

@@ -0,0 +1,130 @@
+require 'lemon/view/test_reports/abstract'
+
+module Lemon::TestReports
+
+  # TAP-J Reporter
+  #
+  # TODO: Lemon needs some improvements in order to supply all the
+  # information TAP-J supports. In particular, `file` and `line` information.
+  class Tapj < Abstract
+
+    #
+    def start_suite(suite)
+      require 'json'
+
+      @start = Time.now
+      @i = 0
+      @n = suite.testcases.inject(0){ |c, tc| c = c + tc.size; c }
+      h = {
+        'type'  => "header",
+        'count' => @n,
+        'range' => "1..#{@n}"
+      }
+      puts h.to_json
+    end
+
+    #
+    def start_case(tcase)
+      h = {
+        'type' => 'case',
+        'description' => "#{tcase.to_s} #{tcase.aspect}".strip
+      }
+      puts h.to_json
+    end
+
+    #
+    def start_unit(unit)
+      @i += 1
+    end
+
+    #
+    def pass(unit)
+      h = {
+        'type'        => 'test',
+        'status'      => 'pass',
+        'file'        => unit.file,
+        'line'        => unit.line,
+        'description' => unit.description,
+        #'returned'    => '',
+        #'expected'    => '',
+        'source'      => code_line(unit.caller),
+        'snippet'     => code_snippet_omap(unit.caller, 3),
+        'message'     => unit.to_s,
+        'time'        => Time.now - @start
+      }
+      puts h.to_json
+    end
+
+    #
+    def fail(unit, exception)
+      h = {
+        'type'        => 'test',
+        'status'      => 'fail',
+        'file'        => file(exception),
+        'line'        => line(exception),
+        'description' => unit.description,
+        #'returned'    => '',
+        #'expected'    => '',
+        'source'      => code_line(exception),
+        'snippet'     => code_snippet_omap(exception, 3),
+        'message'     => exception.message,
+        'time'        => Time.now - @start
+        #'backtrace'   => exception.backtrace
+      }
+      puts h.to_json
+    end
+
+    #
+    def error(unit, exception)
+      h = {
+        'type'        => 'test',
+        'status'      => 'error',
+        'file'        => file(exception),
+        'line'        => line(exception),
+        'description' => unit.description,
+        'source'      => code_line(exception),
+        'snippet'     => code_snippet_omap(exception, 3),
+        'message'     => exception.message,
+        'trace'       => exception.backtrace,
+        'time'        => Time.now - @start
+      }
+      puts h.to_json
+    end
+
+    # TODO: why was this using expception.backtrace[1] and now [0].
+    def pending(unit, exception)
+      h = {
+        'type'        => 'test',
+        'status'      => 'pending',
+        'file'        => file(exception),
+        'line'        => line(exception),
+        'description' => unit.description,
+        'source'      => code_line(exception),
+        'snippet'     => code_snippet_omap(exception, 3),
+        'message'     => exception.message,
+        'time'        => Time.now - @start
+        #'backtrace'   => exception.backtrace
+      }
+      puts h.to_json
+    end
+
+    #
+    def finish_suite(suite)
+      h = {
+        'type'  => 'footer',
+        'time'  => Time.now - @start,
+        'count' => @n, #total
+        'tally' => {
+          'pass'    => record[:pass].size,
+          'fail'    => record[:fail].size,
+          'error'   => record[:error].size,
+          'omit'    => record[:omit].size,
+          'pending' => record[:pending].size # TODO: rename to `hold`?
+        }
+      }
+      puts h.to_json
+    end
+  end
+
+end
+

data/lib/lemon/view/test_reports/tapy.rb

@@ -0,0 +1,141 @@
+require 'lemon/view/test_reports/abstract'
+
+module Lemon::TestReports
+
+  #--
+  #returned: true
+  #expected: true
+  #source: ok 1, 2
+  #snippet:
+  #  44: ok 0,0
+  #  45: ok 1,2
+  #  46: ok 2,4
+  #++
+
+  # TAP-Y Reporter
+  #
+  # TODO: Lemon needs some improvements in order to supply all the
+  # information TAP-Y supports. In particular, `file` and `line` information.
+  class Tapy < Abstract
+
+    #
+    def start_suite(suite)
+      require 'yaml'
+
+      @start = Time.now
+      @i = 0
+      @n = suite.testcases.inject(0){ |c, tc| c = c + tc.size; c }
+      h = {
+        'type'  => "header",
+        'count' => @n,
+        'range' => "1..#{@n}"
+      }
+      puts h.to_yaml
+    end
+
+    #
+    def start_case(tcase)
+      h = {
+        'type' => 'case',
+        'description' => "#{tcase.to_s} #{tcase.aspect}".strip
+      }
+      puts h.to_yaml
+    end
+
+    #
+    def start_unit(unit)
+      @i += 1
+    end
+
+    #
+    def pass(unit) #, backtrace=nil)
+      h = {
+        'type'        => 'test',
+        'status'      => 'pass',
+        'file'        => unit.file,
+        'line'        => unit.line,
+        'description' => unit.description,
+        #'returned'    => '',
+        #'expected'    => '',
+        'source'      => code_line(unit.caller),
+        'snippet'     => code_snippet_omap(unit.caller, 3),
+        'message'     => unit.to_s,
+        'time'        => Time.now - @start
+      }
+      puts h.to_yaml
+    end
+
+    #
+    def fail(unit, exception)
+      h = {
+        'type'        => 'test',
+        'status'      => 'fail',
+        'file'        => file(exception),
+        'line'        => line(exception),
+        'description' => unit.description,
+        #'returned'    => '',
+        #'expected'    => '',
+        'source'      => code_line(exception),
+        'snippet'     => code_snippet_omap(exception, 3),
+        'message'     => exception.message,
+        'time'        => Time.now - @start
+        #'backtrace'   => exception.backtrace
+      }
+      puts h.to_yaml
+    end
+
+    #
+    def error(unit, exception)
+      h = {
+        'type'        => 'test',
+        'status'      => 'error',
+        'file'        => file(exception),
+        'line'        => line(exception),
+        'description' => unit.description,
+        'source'      => code_line(exception),
+        'snippet'     => code_snippet_omap(exception, 3),
+        'message'     => exception.message,
+        'backtrace'   => exception.backtrace,
+        'time'        => Time.now - @start
+      }
+      puts h.to_yaml
+    end
+
+    #
+    def pending(unit, exception)
+      h = {
+        'type'        => 'test',
+        'status'      => 'pending',
+        'file'        => file(exception),
+        'line'        => line(exception),
+        'description' => unit.description,
+        'source'      => code_line(exception),
+        'snippet'     => code_snippet_omap(exception, 3),
+        'message'     => exception.message,
+        'time'        => Time.now - @start
+        #'backtrace'   => exception.backtrace
+      }
+      puts h.to_yaml
+    end
+
+    #
+    def finish_suite(suite)
+      h = {
+        'type'  => 'footer',
+        'time'  => Time.now - @start,
+        'count' => @n, #total
+        'tally' => {
+          'pass'    => record[:pass].size,
+          'fail'    => record[:fail].size,
+          'error'   => record[:error].size,
+          'omit'    => record[:omit].size,
+          'pending' => record[:pending].size # TODO: rename to `hold`?
+        }
+      }
+      puts h.to_yaml
+      puts "..."
+    end
+  end
+
+end
+