ZenTest 3.4.3 → 3.5.1

data/lib/autotest/autoupdate.rb

@@ -0,0 +1,26 @@
+module Autotest::AutoUpdate
+  @@sleep_time, @@update_cmd, @@updater = 60, "svn up", nil
+
+  def self.sleep_time= o
+    @@sleep_time = o
+  end
+
+  def self.update_cmd= o
+    @@update_cmd = o
+  end
+
+  Autotest.add_hook :run_command do  |at|
+    @@updater.kill if @@updater
+  end
+
+  Autotest.add_hook :ran_command do  |at|
+    @@updater = Thread.start do
+      loop do
+        puts "# Waiting for #{@@sleep_time} seconds before updating"
+        sleep @@sleep_time
+        puts "# Running #{@@update_cmd}"
+        system @@update_cmd
+      end
+    end
+  end
+end

data/lib/autotest/emacs.rb

@@ -0,0 +1,29 @@
+#
+# Get autotest.el from http://www.emacswiki.org/cgi-bin/wiki/RyanDavis
+#
+
+module Autotest::Emacs
+  def self.emacs_autotest status
+    `emacsclient -e \"(autotest-update '#{status})\"`
+  end
+
+  Autotest.add_hook :run_command do  |at|
+    emacs_autotest :running
+  end
+
+  Autotest.add_hook :green do  |at|
+    emacs_autotest :passed
+  end
+
+  Autotest.add_hook :all_good do  |at|
+    emacs_autotest :passed
+  end
+
+  Autotest.add_hook :red do  |at|
+    emacs_autotest :failed
+  end
+
+  Autotest.add_hook :quit do  |at|
+    emacs_autotest :quit
+  end
+end

data/lib/autotest/fixtures.rb

@@ -0,0 +1,12 @@
+# -*- ruby -*-
+
+# This is an example of how to change the mappings of file that
+# changed to tests to run for a project.
+
+module Autotest::Fixtures
+  Autotest.add_hook :initialize do  |at|
+    at.test_mappings['^test/fixtures/(.*)s.yml'] = proc { |filename, matches|
+      at.files_matching /test\/\w+\/#{matches[1]}(_\w+)?.*_test.rb$/
+    }
+  end
+end

data/lib/autotest/growl.rb

@@ -1,12 +1,14 @@
-# -*- mode -*-
+# -*- ruby -*-
 
 module Autotest::Growl
   def self.growl title, msg, pri=0
+    title += " in #{Dir.pwd}"
+    msg += " at #{Time.now}"
     system "growlnotify -n autotest --image /Applications/Mail.app/Contents/Resources/Caution.tiff -p #{pri} -m #{msg.inspect} #{title}"
   end
 
   Autotest.add_hook :run do  |at|
-    growl "Run", "Run" unless $TESTING
+    growl "autotest running", "Started"
   end
 
   Autotest.add_hook :red do |at|
@@ -14,22 +16,10 @@ module Autotest::Growl
   end
 
   Autotest.add_hook :green do |at|
-    growl "Tests Passed", "All tests passed", -2 if at.tainted 
+    growl "Tests Passed", "Tests passed", -2 if at.tainted
   end
 
-  Autotest.add_hook :init do |at|
-    growl "autotest", "autotest was started" unless $TESTING
-  end
-
-  Autotest.add_hook :interrupt do |at|
-    growl "autotest", "autotest was reset" unless $TESTING
-  end
-
-  Autotest.add_hook :quit do |at|
-    growl "autotest", "autotest is exiting" unless $TESTING
-  end
-
-  Autotest.add_hook :all do |at|_hook
-    growl "autotest", "Tests have fully passed", -2 unless $TESTING
+  Autotest.add_hook :all_good do |at|
+    growl "Tests Passed", "All tests passed", -2 if at.tainted
   end
 end

data/lib/autotest/heckle.rb

@@ -0,0 +1,14 @@
+# -*- ruby -*-
+
+module Autotest::Heckle
+  @@flags  = []
+  @@klasses = []
+  def self.flags; @@flags; end
+  def self.klasses; @@klasses; end
+
+  Autotest.add_hook :all_good do |at|
+    heckle = "heckle" + (@@flags.empty? ? '' : " #{flags.join(' ')}")
+    cmd = @@klasses.map { |klass| "#{heckle} #{klass}" }.join(" && ")
+    system cmd
+  end
+end

data/lib/autotest/migrate.rb

@@ -0,0 +1,7 @@
+# -*- ruby -*-
+
+module Autotest::Migrate
+  Autotest.add_hook(:run) do |autotest|
+    system "rake db:migrate" if autotest.class.to_s == "RailsAutotest"
+  end
+end

data/lib/autotest/notify.rb

@@ -0,0 +1,38 @@
+# libnotify plugin for autotest
+
+begin require 'rubygems'; rescue LoadError; end
+require 'libnotify'
+
+module Autotest::LibNotify
+
+  LibNotify.init("autotest")
+
+  def self.notify title, msg, ico = :info
+    LibNotify::Notification.new(title, msg, "gtk-#{ico}", nil).show
+  end
+
+  Autotest.add_hook :red do |at|
+    failed_tests = at.files_to_test.inject(0){ |s,a| k,v = a;  s + v.size}
+    notify "Tests Failed", "#{failed_tests} tests failed", :no
+  end
+
+  Autotest.add_hook :green do |at|
+    notify "Tests Passed", "All tests passed", :yes
+  end
+
+  Autotest.add_hook :run do |at|
+    notify "autotest", "autotest was started" unless $TESTING
+  end
+
+  Autotest.add_hook :interrupt do |at|
+    notify "autotest", "autotest was reset" unless $TESTING
+  end
+
+  Autotest.add_hook :quit do |at|
+    notify "autotest", "autotest is exiting" unless $TESTING
+  end
+
+  Autotest.add_hook :all do |at|_hook
+    notify "autotest", "Tests have fully passed", :yes unless $TESTING
+  end
+end

data/lib/autotest/redgreen.rb

@@ -5,9 +5,12 @@ module Autotest::RedGreen
   BAR = "=" * 80
 
   Autotest.add_hook :ran_command do |at|
-    at.results.gsub!(/^.* (\d+) failures, (\d+) errors$/) { |match|
-      code = ($1 != "0" or $2 != "0") ? 31 : 32
-      "\e[#{code}m#{BAR}\n#{match}\e[0m\n\n"
-    }
+    output = at.results.join
+    at.results.each do |line|
+      line.gsub!(/^.* (\d+) failures, (\d+) errors$/) { |match|
+        code = ($1 != "0" or $2 != "0") ? 31 : 32
+        "\e[#{code}m#{BAR}\n#{match}\e[0m\n\n"
+      }
+    end
   end
 end

data/lib/autotest/screen.rb

@@ -0,0 +1,77 @@
+class Autotest::Screen
+  # Autotest::Screen is test result notify GUN Screen's statusline.
+  #
+  # === screenshots
+  # * <img src="http://f.hatena.ne.jp/images/fotolife/s/secondlife/20061109/20061109015543.png" />
+  # * <img src="http://f.hatena.ne.jp/images/fotolife/s/secondlife/20061109/20061109015522.png" />
+  #
+  # == SYNOPSIS
+  #   require 'autotest/screen'
+  #   # Autotest::Screen.statusline = '%H %`%-w%{=b bw}%n %t%{-}%+w (your statusline)'
+  #
+
+  DEFAULT_STATUSLINE = '%H %`%-w%{=b bw}%n %t%{-}%+w'
+  DEFAULT_SCREEN_CMD = 'screen'
+
+  SCREEN_COLOR = {
+    :black => 'dd',
+    :green => 'gk',
+    :red   => 'rw',
+  }
+
+  def self.message(msg, color = :black)
+    col = SCREEN_COLOR[color]
+    msg = %Q[ %{=b #{col}} #{msg} %{-}]
+    send_cmd(msg)
+  end
+
+  def self.clear
+    send_cmd('')
+  end
+
+  def self.run_screen_session?
+    str = `#{screen_cmd} -ls`
+    str.match(/(\d+) Socket/) && ($1.to_i > 0)
+  end
+
+  def self.execute?
+    !($TESTING || !run_screen_session?)
+  end
+
+  @statusline, @screen_cmd = nil
+  def self.statusline; @statusline || DEFAULT_STATUSLINE.dup; end
+  def self.statusline=(a); @statusline = a; end
+  def self.screen_cmd; @screen_cmd || DEFAULT_SCREEN_CMD.dup; end
+  def self.screen_cmd=(a); @screen_cmd = a; end
+
+  def self.send_cmd(msg)
+    cmd = %(#{screen_cmd} -X eval 'hardstatus alwayslastline "#{(statusline + msg).gsub('"', '\"')}"') #' stupid ruby-mode
+    system cmd
+  end
+
+  Autotest.add_hook :run do  |at|
+    message 'Run Tests' if execute?
+  end
+
+  Autotest.add_hook :interrupt do |at|
+    message 'Run Tests' if execute?
+  end
+
+
+  Autotest.add_hook :quit do |at|
+    clear if execute?
+  end
+
+  Autotest.add_hook :ran_command do |at|
+    if execute? then
+      output = at.results.join
+      failed = output.scan(/^\s+\d+\) (?:Failure|Error):\n(.*?)\((.*?)\)/)
+      if failed.size == 0 then
+        message "All Green", :green
+      else
+        f,e = failed.partition { |s| s =~ /Failure/ }
+        message "Red F:#{f.size} E:#{e.size}", :red
+      end
+    end
+  end
+end

data/lib/autotest/shame.rb

@@ -0,0 +1,45 @@
+require 'code_statistics'
+require 'rbosa'
+
+module Autotest::Shame
+  @@chat_app = :adium
+
+  def self.chat_app= o
+    @@chat_app = o
+  end
+
+  # Until the rails team learns how to write modular code... I must steal :/
+  STATS_DIRECTORIES = [
+                       %w(Controllers        app/controllers),
+                       %w(Helpers            app/helpers),
+                       %w(Models             app/models),
+                       %w(Libraries          lib/),
+                       %w(APIs               app/apis),
+                       %w(Components         components),
+                       %w(Integration\ tests test/integration),
+                       %w(Functional\ tests  test/functional),
+                       %w(Unit\ tests        test/unit),
+                      ].select { |name, dir| File.directory?(dir) }
+
+  def self.shame
+    stats = CodeStatistics.new(*STATS_DIRECTORIES)
+    code  = stats.send :calculate_code
+    tests = stats.send :calculate_tests
+    msg = "Code To Test Ratio: 1:#{sprintf("%.2f", tests.to_f/code)}"
+    $-w = ! $-w
+    case @@chat_app
+    when :adium then
+      OSA.app('Adium').adium_controller.my_status_message = msg
+    when :ichat then
+      OSA.app('ichat').status_message = msg
+    else
+      raise "huh?"
+    end
+    $-w = ! $-w
+    $stderr.puts "Status set to: #{msg.inspect}"
+  end
+
+  Autotest.add_hook(:all_good) do |autotest|
+    shame
+  end
+end

data/lib/autotest/timestamp.rb

@@ -2,6 +2,8 @@
 
 module Autotest::Timestamp
   Autotest.add_hook :waiting do |at|
-    puts "# waiting... #{Time.now}"
+    puts
+    puts "# Waiting at #{Time.now.strftime "%Y-%m-%d %H:%M:%S"}"
+    puts
   end
 end

data/lib/camping_autotest.rb

@@ -0,0 +1,37 @@
+require 'autotest'
+
+##
+# CampingAutotest is an Autotest subclass designed for use with Camping projects.
+#
+# To use CampingAutotest pass the -camping flag to autotest.
+#
+# Contributed by Geoffrey Grosenbach http://nubyonrails.com
+
+class CampingAutotest < Autotest
+
+  def initialize # :nodoc:
+    super
+    @exceptions = %r%\.(log|db)$%
+
+    @test_mappings = {
+      %r%^test/fixtures/([^_]+)_.*s\.yml% => proc { |_, m|
+        "test/#{m[1]}_test.rb"
+      },
+      %r%^test/.*rb$% => proc { |filename, m|
+        filename
+      },
+      %r%^public/([^\/]+)/(models|controllers|views)\.rb$% => proc { |_, m|
+        "test/#{m[1]}_test.rb"
+      },
+      %r%^public/(.*)\.rb$% => proc { |_, m|
+        "test/#{m[1]}_test.rb"
+      },
+    }
+
+    return functional_tests
+  end
+
+  def tests_for_file(filename)
+    super.select { |f| @files.has_key? f }
+  end
+end

data/lib/functional_test_matrix.rb

@@ -0,0 +1,85 @@
+
+########################################################################
+# The Idea:
+#
+# This is supposed to get us thinking about the various dimensions our
+# testing should address. If there are states orthogonal to each other
+# (eg. readable vs unreadable, logged in vs not logged in) each of
+# those states should comprise a dimension in the matrix. By
+# addressing it this way, we should be able to minimize the amount of
+# setup/teardown code and get full coverage across our actions for all
+# these edge cases and as a result have extremely clear tests.
+#
+########################################################################
+# Example Test Matrix Specification:
+#
+# matrix :example, :edge1, edge2, :edge3, ...
+# action :action1,   :new,  :err,   :err, ...
+# action :action2,   :del,  :err,    :na, ...
+# action ...
+#
+########################################################################
+# Matrix:
+#
+# I envision the setups being a code that combines the different
+# dimensions of edge case state.
+#
+# Something for a CMS might look like: `[df]_[ugo]_[rRwW]` where:
+#
+# + `[df]` for dir/file.
+# + and the rest is in the style of symbolic args to chmod:
+#   + u/g/o = user, group, or other
+#   + lowercase `X` == `X`able, uppercase `X` == un`X`able, where `X`
+#     is read/write.
+#
+########################################################################
+# Action:
+#
+# :new/:err/:del are just examples, they should have semantic info
+# attached to them.
+#
+# Use :na to specify an inapplicable edge case for that action.
+#
+# Edge cases specific to an action that fall outside the matrix are
+# regular tests.
+#
+########################################################################
+# Matrix Methods (the legos):
+#
+# Everything else basically equates to lego pieces:
+#
+# + There is one "init" method per matrix: matrix_init_#{descr}(setup_args)
+# + There is one "setup" method per action: matrix_setup_#{action}(setup, expect)
+# + There is one "test" method per result: matrix_test_#{result}(setup)
+#
+# Thus, for the example above, the top left-most test will end up calling:
+#
+#     matrix_init_example(:edge1)
+#     matrix_setup_action1(:edge1, :new)
+#     matrix_test_new(:edge1)
+#
+# Read the action method for exact details.
+########################################################################
+
+module FunctionalTestMatrix
+  def matrix(name, *setups)
+    @@matrix, @@setups = name, setups
+  end
+
+  def action(action, *results)
+    testcases = @@setups.zip(results).reject { |a,b| b == :na }
+    testcases = Hash[*testcases.flatten]
+    matrix = @@matrix # bind to local scope for define_method closure
+
+    testcases.each do |setup, expected|
+      define_method "test_#{action}_#{setup}" do
+        @action = action
+        send "matrix_init_#{matrix}", *setup.to_s.split(/_/).map {|c| c.intern }
+        send "matrix_setup_#{action}", setup, expected
+        send "matrix_test_#{expected}", setup
+      end
+    end
+  end
+
+  module_function :matrix, :action
+end