zentest-without-autotest 4.1.4

data/README.markdown

@@ -0,0 +1,96 @@
+This is ZenTest without [AutoTest and UnitDiff](http://github.com/grosser/autotest)
+
+ZenTest provides 2 different tools: zentest and multiruby.
+
+ZenTest scans your target and unit-test code and writes your missing
+code based on simple naming rules, enabling XP at a much quicker
+pace. ZenTest only works with Ruby and Test::Unit. Nobody uses this
+tool anymore but it is the package namesake, so it stays.
+
+multiruby runs anything you want on multiple versions of ruby. Great
+for compatibility checking! Use multiruby_setup to manage your
+installed versions.
+
+Install
+=======
+### Requirements
+ * Ruby 1.6+, JRuby 1.1.2+, or rubinius
+ * rubygems
+
+###Setup
+    sudo gem install zentest-without-autotest
+
+From Source:
+    git co git://github.com/grosser/zentest.git && cd zentest
+    rake install
+
+Strategy
+========
+There are two strategies intended for ZenTest: test conformance
+auditing and rapid XP.
+
+For auditing, ZenTest provides an excellent means of finding methods
+that have slipped through the testing process. I've run it against my
+own software and found I missed a lot in a well tested
+package. Writing those tests found 4 bugs I had no idea existed.
+
+ZenTest can also be used to evaluate generated code and execute your
+tests, allowing for very rapid development of both tests and
+implementation.
+
+Features
+========
+
+* Scans your ruby code and tests and generates missing methods for you.
+* Test against multiple versions with multiruby.
+* Enhance and automatically audit your rails tests using Test::Rails.
+* Includes a LinuxJournal article on testing with ZenTest written by Pat Eyler.
+* See also: http://blog.zenspider.com/archives/zentest/
+* See also: http://blog.segment7.net/articles/category/zentest
+
+Synopsis
+========
+    ZenTest MyProject.rb TestMyProject.rb > missing.rb
+
+    multiruby_setup mri:svn:current
+    multiruby ./TestMyProject.rb
+
+    (and other stuff for Test::Rails)
+
+TODO
+====
+ - cleanup the readme: and insert useful examples + compact instructions + remove blabla
+
+License
+=======
+###This is only ripped from ZenTest
+Ripper: [Michael Grosser](http://pragmatig.wordpress.com)
+
+### ZenTest Authors
+ - http://www.zenspider.com/ZSS/Products/ZenTest/
+ - http://rubyforge.org/projects/zentest/
+ - ryand-ruby@zenspider.com
+
+(The MIT License)
+
+Copyright (c) 2001-2006 Ryan Davis, Eric Hodel, Zen Spider Software
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+

data/Rakefile

@@ -0,0 +1,70 @@
+$LOAD_PATH << 'lib'
+
+require 'rubygems'
+require 'zentest'
+
+#rake test
+require 'rake/testtask'
+Rake::TestTask.new(:test) {|test| test.libs << "test"}
+task :default => :test
+
+desc "run autotest on itself"
+task :autotest do
+  ruby "-Ilib -w ./bin/autotest"
+end
+
+desc "update example_dot_autotest.rb with all possible constants"
+task :update do
+  system "p4 edit example_dot_autotest.rb"
+  File.open "example_dot_autotest.rb", "w" do |f|
+    f.puts "# -*- ruby -*-"
+    f.puts
+    Dir.chdir "lib" do
+      Dir["autotest/*.rb"].sort.each do |s|
+        next if s =~ /rails|discover/
+        f.puts "# require '#{s[0..-4]}'"
+      end
+    end
+
+    f.puts
+
+    Dir["lib/autotest/*.rb"].sort.each do |file|
+      file = File.read(file)
+      m = file[/module.*/].split(/ /).last rescue nil
+      next unless m
+
+      file.grep(/def[^(]+=/).each do |setter|
+        setter = setter.sub(/^ *def self\./, '').sub(/\s*=\s*/, ' = ')
+        f.puts "# #{m}.#{setter}"
+      end
+    end
+  end
+  system "p4 diff -du example_dot_autotest.rb"
+end
+
+desc "show rcov report"
+task :rcov_info do
+  ruby "-Ilib -S rcov --text-report --save coverage.info test/test_*.rb"
+end
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "zentest-without-autotest"
+    gem.summary = "ZenTest, without AutoTest and UnitDiff"
+    gem.homepage = "http://github.com/grosser/zentest"
+    gem.authors = ["Ryan Davis"]
+  end
+  Jeweler::GemcutterTasks.new
+rescue LoadError
+  puts "Jeweler, or one of its dependencies, is not available. Install it with: sudo gem install technicalpickles-jeweler -s http://gems.github.com"
+end
+
+task :sort do
+  begin
+    sh 'for f in lib/*.rb; do echo $f; grep "^ *def " $f | grep -v sort=skip > x; sort x > y; echo $f; echo; diff x y; done'
+    sh 'for f in test/test_*.rb; do echo $f; grep "^ *def.test_" $f > x; sort x > y; echo $f; echo; diff x y; done'
+  ensure
+    sh 'rm x y'
+  end
+end

data/VERSION

@@ -0,0 +1 @@
+4.1.4

data/bin/multigem

@@ -0,0 +1,4 @@
+#!/usr/bin/env ruby -w
+
+exec "multiruby", "-S", "gem", *ARGV
+

data/bin/multiruby

@@ -0,0 +1,50 @@
+#!/usr/bin/env ruby -w
+
+require 'multiruby'
+
+root_dir = Multiruby.root_dir
+versions = Multiruby.build_and_install
+versions = ENV['VERSIONS'].split(/:/) if ENV.has_key? 'VERSIONS'
+
+if ENV.has_key? 'EXCLUDED_VERSIONS' then
+  excludes = Regexp.union(*ENV['EXCLUDED_VERSIONS'].split(/:/))
+  versions = versions.delete_if { |v| v =~ excludes }
+end
+
+# safekeep original PATH
+original_path = ENV['PATH']
+
+results = {}
+versions.each do |version|
+  ruby = "#{root_dir}/install/#{version}/bin/ruby"
+
+  ruby.sub!(/bin.ruby/, 'bin/rbx') if version =~ /rubinius/
+
+  puts
+  puts "VERSION = #{version}"
+  cmd = [ruby, ARGV].flatten.map { |s| s =~ /\"/ ? "'#{s}'" : s }.join(' ')
+  cmd.sub!(/#{ENV['HOME']}/, '~')
+  puts "CMD     = #{cmd}"
+  puts
+
+  # prepend ruby binary path prior execution
+  ENV['PATH'] = [File.dirname(ruby), original_path].join(File::PATH_SEPARATOR)
+
+  system ruby, *ARGV
+  puts
+  puts "RESULT = #{$?}"
+  results[version] = $?
+
+  # restore the path to original state
+  ENV['PATH'] = original_path
+end
+
+passed, failed = results.keys.partition { |v| results[v] == 0 }
+
+puts
+puts "TOTAL RESULT = #{failed.size} failures out of #{results.size}"
+puts
+puts "Passed: #{passed.join(", ")}"
+puts "Failed: #{failed.join(", ")}"
+
+exit failed.size

data/bin/multiruby_setup

@@ -0,0 +1,73 @@
+#!/usr/bin/env ruby -w
+
+require 'multiruby'
+
+ENV.delete 'RUBYOPT'
+
+ARGV << "help" if ARGV.empty?
+
+Dir.chdir Multiruby.root_dir
+Multiruby.setup_dirs(false)
+
+ARGV.each do |spec|
+  case spec
+  when "-h", "--help", "help" then
+    Multiruby.help
+    exit 0
+  when "the_usual" then # TODO: update #help
+    ARGV.push(*Multiruby::TAGS.map { |v| "mri:tar:#{v.gsub(/_/, '.')}" })
+    ARGV << "build" << "update:rubygems"
+    system "multigem install --no-ri --no-rdoc rake minitest ZenTest"
+  when "build" then
+    Multiruby.build_and_install
+  when "clean" then
+    Multiruby.clean
+  when "list" then
+    Multiruby.list
+  when /rm:(.*)/ then
+    Multiruby.rm $1
+  when "rubygems:merge" then
+    Multiruby.merge_rubygems
+  when "rubygems:update", "update:rubygems" then
+    Multiruby.update_rubygems
+  when "update" then
+    Multiruby.update
+  when "tags" then
+    p Multiruby.tags
+  when "mri:svn:current" then
+    ARGV << "mri:svn:releases" << "mri:svn:branches" << "build"
+  when "mri:svn:releases" then
+    Multiruby::TAGS.each do |v|
+      latest = Multiruby.mri_latest_tag v
+      abort "Can't find tag #{v}" unless latest
+      ARGV << "mri:svn:tag:#{latest}:mri_rel_#{v}"
+    end
+    ARGV << "build"
+  when /mri:svn:branch:(.*)/ then
+    ver = "branches/ruby_#{$1}" unless ver == "trunk"
+    Multiruby.svn_co "#{Multiruby::MRI_SVN}/#{$1}", "mri_#{$1}"
+    ARGV << "build"
+  when "mri:svn:branches" then
+    Multiruby::BRANCHES.each do |v|
+      ARGV << "mri:svn:branch:#{v}"
+    end
+    ARGV << "build"
+  when /mri:svn:tag:(.*):(.*)/ then
+    Multiruby.svn_co "#{Multiruby::MRI_SVN}/tags/#{$1}", $2
+    ARGV << "build"
+  when /mri:svn:tag:(.*)/ then
+    ARGV << "mri:svn:tag:#{$1}:#{$1}" << "build"
+  when /mri:tar:(.*)/ then
+    Multiruby.fetch_tar $1
+    ARGV << "build"
+  when /rbx:git:current/ then
+    Multiruby.git_clone "#{Multiruby::RBX_GIT}", "rubinius"
+    ARGV << "build"
+  when /rbx:ln:(.*)/ then
+    Multiruby.rbx_ln $1
+    ARGV << "build"
+  else
+    warn "unknown spec #{spec}"
+  end
+end
+

data/bin/zentest

@@ -0,0 +1,28 @@
+#!/usr/local/bin/ruby -swI .
+
+require 'zentest'
+
+$TESTING = true # for ZenWeb and any other testing infrastructure code
+
+if defined? $v then
+  puts "#{File.basename $0} v#{ZenTest::VERSION}"
+  exit 0
+end
+
+if defined? $h then
+  puts "usage: #{File.basename $0} [-h -v] test-and-implementation-files..."
+  puts "  -h display this information"
+  puts "  -v display version information"
+  puts "  -r Reverse mapping (ClassTest instead of TestClass)"
+  puts "  -e (Rapid XP) eval the code generated instead of printing it"
+  exit 0
+end
+
+code = ZenTest.fix(*ARGV)
+if defined? $e then
+  require 'test/unit'
+  eval code
+else
+  print code
+end
+

data/example_dot_autotest.rb

@@ -0,0 +1,12 @@
+# -*- ruby -*-
+
+# require 'autotest/autoupdate'
+# require 'autotest/once'
+# require 'autotest/rcov'
+# require 'autotest/restart'
+# require 'autotest/timestamp'
+
+# Autotest::AutoUpdate.sleep_time = o
+# Autotest::AutoUpdate.update_cmd = o
+# Autotest::RCov.command = o
+# Autotest::RCov.pattern = o

data/lib/focus.rb

@@ -0,0 +1,21 @@
+class Module
+  def focus *wanteds
+    wanteds.map! { |m| m.to_s }
+    unwanteds = public_instance_methods(false).grep(/test_/) - wanteds
+    unwanteds.each do |unwanted|
+      remove_method unwanted
+    end
+  end
+
+  def blur
+    parent = self.superclass
+
+    ObjectSpace.each_object Class do |klass|
+      next unless parent > klass
+      next if klass == self
+
+      klass.send :focus
+      klass.send :undef_method, :default_test
+    end
+  end
+end

data/lib/functional_test_matrix.rb

@@ -0,0 +1,92 @@
+
+########################################################################
+# 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, :OK,    :e_NF,  :mod,   ...
+# action :action2, :OK,    :e_RO,  :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.
+#
+# Use :OK to specify the standard positive state. It is equivalent to
+# a result with the same name as the action. (eg
+# matrix_test_index). This cleans up the matrix a lot and allows for
+# narrower and more readable columns.
+#
+# 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 matrix "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|
+      expected_action = expected == :OK ? action : expected
+      define_method "test_#{matrix}_#{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_action}", setup
+      end
+    end
+  end
+
+  module_function :matrix, :action
+end