difects 3.0.0

data/CREDITS

@@ -0,0 +1,21 @@
+%#----------------------------------------------------------------------------
+## AUTHORS
+%#----------------------------------------------------------------------------
+
+Suraj N. Kurapati
+
+%#----------------------------------------------------------------------------
+## CREDITS
+%#----------------------------------------------------------------------------
+
+François Beausoleil,
+Gavin Sinclair,
+Iñaki Baz Castillo,
+Sean O'Halpin
+
+%#----------------------------------------------------------------------------
+## LICENSE
+%#----------------------------------------------------------------------------
+
+%# See the file named "LICENSE".
+%< "LICENSE"

data/LICENSE

@@ -0,0 +1,15 @@
+(the ISC license)
+
+Copyright 2009 Suraj N. Kurapati <sunaku@gmail.com>
+
+Permission to use, copy, modify, and/or distribute this software for any
+purpose with or without fee is hereby granted, provided that the above
+copyright notice and this permission notice appear in all copies.
+
+THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.

data/bin/difects

@@ -0,0 +1,25 @@
+#!/usr/bin/env ruby
+
+require 'difects'
+
+if ARGV.delete('-h') or ARGV.delete('--help')
+  # try to display UNIX version of help manual
+  man_path = File.join(DIFECTS::INSTDIR, 'man')
+  unless system 'man', '-M', man_path, '-a', 'difects'
+    # try to display HTML version of help manual
+    man_html = man_path + '.html'
+    unless %w[$BROWSER open start].any? {|b| system "#{b} #{man_html}" }
+      # no luck; direct user to project website
+      puts "See #{DIFECTS::WEBSITE}"
+    end
+  end
+  exit
+elsif ARGV.delete('-v') or ARGV.delete('--version')
+  puts DIFECTS::VERSION
+  exit
+end
+
+DIFECTS.debug = ARGV.delete('-d') || ARGV.delete('--debug')
+
+require 'difects/auto'
+ARGV.each {|glob| Dir[glob].each {|test| load test } }

data/lib/difects/auto.rb

@@ -0,0 +1,17 @@
+# Provides painless, automatic configuration of DIFECTS.
+#
+# Simply require() this file and DIFECTS will be available for use anywhere
+# in your program and will execute all tests before your program exits.
+
+require 'difects'
+include DIFECTS
+
+at_exit do
+  DIFECTS.start
+
+  # reflect number of failures in exit status
+  stats = DIFECTS.stats
+  fails = stats[:fail] + stats[:error]
+
+  exit [fails, 255].min
+end

data/lib/difects/inochi.rb

@@ -0,0 +1,93 @@
+module DIFECTS
+
+  ##
+  # Official name of this project.
+  #
+  PROJECT = 'DIFECTS'
+
+  ##
+  # Short single-line description of this project.
+  #
+  TAGLINE = 'Assertion testing library for Ruby'
+
+  ##
+  # Address of this project's official home page.
+  #
+  WEBSITE = 'http://snk.tuxfamily.org/lib/difects/'
+
+  ##
+  # Number of this release of this project.
+  #
+  VERSION = '3.0.0'
+
+  ##
+  # Date of this release of this project.
+  #
+  RELDATE = '2010-07-24'
+
+  ##
+  # Description of this release of this project.
+  #
+  def self.inspect
+    "#{PROJECT} #{VERSION} (#{RELDATE})"
+  end
+
+  ##
+  # Location of this release of this project.
+  #
+  INSTDIR = File.expand_path('../../..', __FILE__)
+
+  ##
+  # RubyGems required by this project during runtime.
+  #
+  # @example
+  #
+  #   RUNTIME = {
+  #     # this project needs exactly version 1.2.3 of the "an_example" gem
+  #     "an_example" => [ "1.2.3" ],
+  #
+  #     # this project needs at least version 1.2 (but not
+  #     # version 1.2.4 or newer) of the "another_example" gem
+  #     "another_example" => [ ">= 1.2" , "< 1.2.4" ],
+  #
+  #     # this project needs any version of the "yet_another_example" gem
+  #     "yet_another_example" => [],
+  #   }
+  #
+  RUNTIME = {}
+
+  ##
+  # RubyGems required by this project during development.
+  #
+  # @example
+  #
+  #   DEVTIME = {
+  #     # this project needs exactly version 1.2.3 of the "an_example" gem
+  #     "an_example" => [ "1.2.3" ],
+  #
+  #     # this project needs at least version 1.2 (but not
+  #     # version 1.2.4 or newer) of the "another_example" gem
+  #     "another_example" => [ ">= 1.2" , "< 1.2.4" ],
+  #
+  #     # this project needs any version of the "yet_another_example" gem
+  #     "yet_another_example" => [],
+  #   }
+  #
+  DEVTIME = {
+    'inochi' => [ '>= 3.0.0', '< 4' ],
+  }
+
+  # establish gem version dependencies
+  if respond_to? :gem
+    [RUNTIME, DEVTIME].each do |deps|
+      deps.each do |gem_name, gem_version|
+        begin
+          gem gem_name, *Array(gem_version)
+        rescue LoadError => error
+          warn "#{self.inspect}: #{error}"
+        end
+      end
+    end
+  end
+
+end

data/lib/difects/long.rb

@@ -0,0 +1,25 @@
+# Provides long name aliases for DIFECTS's default abbreviated vocabulary.
+
+require 'difects'
+
+module DIFECTS
+  short_to_long = {
+    'D' => 'Describe',
+    'T' => 'True',
+    'F' => 'False',
+    'E' => 'Error',
+    'C' => 'Catch',
+    'S' => 'Share',
+    'I' => 'Inform',
+  }
+
+  short_to_long.each do |src, dst|
+    instance_methods(false).grep(/^#{src}\b/).each do |short|
+      long = short.to_s.sub(src, dst)
+      alias_method long, short
+    end
+  end
+
+  # for hooks
+  Describe = D
+end

data/lib/difects/mini.rb

@@ -0,0 +1,92 @@
+# MiniTest emulation layer.
+
+require 'difects'
+require 'difects/spec'
+require 'difects/unit'
+
+module DIFECTS
+  instance_methods(false).each do |meth|
+    if meth =~ /^assert_not/
+      alias_method 'refute' + $', meth
+    end
+  end
+end
+
+{
+  :must => '::DIFECTS.assert',
+  :wont => '::DIFECTS.refute',
+}.
+each do |outer, inner|
+  #
+  # XXX: using eval() because Ruby 1.8 does
+  #      not support default values and
+  #      block parameters in define_method()
+  #
+  file, line = __FILE__, __LINE__ ; eval %{
+    class Object
+      def #{outer}_be_close_to other, message = nil
+        #{inner}_in_delta self, other, nil, message
+      end
+
+      def #{outer}_be_empty message = nil
+        #{inner}_empty self, message
+      end
+
+      def #{outer}_be_instance_of klass, message = nil
+        #{inner}_instance_of klass, self, message
+      end
+
+      def #{outer}_be_kind_of klass, message = nil
+        #{inner}_kind_of klass, self, message
+      end
+
+      def #{outer}_be_nil message = nil
+        #{inner}_nil self, message
+      end
+
+      def #{outer}_be_same_as other, message = nil
+        #{inner}_same self, other, message
+      end
+
+      def #{outer}_be_within_delta other, delta = nil, message = nil
+        #{inner}_in_delta self, other, delta, message
+      end
+
+      alias #{outer}_be_within_epsilon #{outer}_be_within_delta
+
+      def #{outer}_equal expected, message = nil
+        #{inner}_equal expected, self, message
+      end
+
+      def #{outer}_include item, message = nil
+        #{inner}_include item, self, message
+      end
+
+      def #{outer}_match pattern, message = nil
+        #{inner}_match pattern, self, message
+      end
+
+      def #{outer}_raise *args, &block
+        #{inner}_raise(*args, &block)
+      end
+
+      def #{outer}_respond_to query, message = nil
+        #{inner}_respond_to self, query, message
+      end
+
+      def #{outer}_send query, *args
+        #{inner}_send self, query, *args
+      end
+    end
+
+    class Proc
+      def #{outer}_raise *args
+        #{inner}_raise(*args, &self)
+      end
+
+      def #{outer}_throw symbol, message = nil
+        #{inner}_throw symbol, message, &self
+      end
+    end
+  }, TOPLEVEL_BINDING, file, line
+end

data/lib/difects/spec.rb

@@ -0,0 +1,31 @@
+# RSpec emulation layer.
+
+require 'difects'
+
+module DIFECTS
+  alias describe D
+  alias context  D
+  alias it       D
+
+  def before what, &block
+    meth =
+      case what
+      when :each then :<
+      when :all  then :<<
+      else raise ArgumentError, what
+      end
+
+    send meth, &block
+  end
+
+  def after what, &block
+    meth =
+      case what
+      when :each then :>
+      when :all  then :>>
+      else raise ArgumentError, what
+      end
+
+    send meth, &block
+  end
+end

data/lib/difects/unit.rb

@@ -0,0 +1,101 @@
+# Test::Unit emulation layer.
+
+require 'difects'
+
+module DIFECTS
+  alias test      D
+  alias setup     <
+  alias setup!    <<
+  alias teardown  >
+  alias teardown! >>
+
+  [
+    [:assert,     nil,  nil   ],
+    [:assert_not, '!',  'not '],
+  ].
+  each do |prefix, polarity, action|
+    #
+    # XXX: using eval() because Ruby 1.8 does
+    #      not support default values and
+    #      block parameters in define_method()
+    #
+    file, line = __FILE__, __LINE__ ; module_eval %{
+      alias #{prefix} T#{polarity}
+      alias #{prefix} T#{polarity}
+
+      def #{prefix}_empty collection, message = nil
+        message ||= 'collection must #{action}be empty'
+        T#{polarity}(message) { collection.empty? }
+      end
+
+      def #{prefix}_equal expected, actual, message = nil
+        message ||= 'actual must #{action}equal expected'
+        T#{polarity}(message) { actual == expected }
+      end
+
+      def #{prefix}_in_delta expected, actual, delta = nil, message = nil
+        message ||= 'actual must #{action}be within delta of expected'
+        delta   ||= 0.001
+
+        T#{polarity}(message) do
+          Math.abs(expected - actual) <= Math.abs(delta)
+        end
+      end
+
+      alias #{prefix}_in_epsilon #{prefix}_in_delta
+
+      def #{prefix}_include item, collection, message = nil
+        message ||= 'collection must #{action}include item'
+        T#{polarity}(messsage) { collection.include? item }
+      end
+
+      def #{prefix}_instance_of klass, object, message = nil
+        message ||= 'object must #{action}be an instance of class'
+        T#{polarity}(message) { object.instance_of? klass }
+      end
+
+      def #{prefix}_kind_of klass, object, message = nil
+        message ||= 'object must #{action}be a kind of class'
+        T#{polarity}(message) { object.kind_of? klass }
+      end
+
+      def #{prefix}_nil object, message = nil
+        message ||= 'object must #{action}be nil'
+        T#{polarity}(message) { object == nil }
+      end
+
+      def #{prefix}_match pattern, string, message = nil
+        message ||= 'string must #{action}match pattern'
+        T#{polarity}(message) { string =~ pattern }
+      end
+
+      def #{prefix}_same expected, actual, message = nil
+        message ||= 'actual must #{action}be same as expected'
+        T#{polarity}(message) { actual.equal? expected }
+      end
+
+      def #{prefix}_operator object, operator, operand, message = nil
+        message ||= 'object must #{action}support operator with operand'
+        T#{polarity} { object.__send__ operator, operand }
+      end
+
+      def #{prefix}_raise *args, &block
+        E#{polarity}(args.pop, *args, &block)
+      end
+
+      def #{prefix}_respond_to object, query, message = nil
+        message ||= 'object must #{action}respond to query'
+        T#{polarity}(message) { object.respond_to? query }
+      end
+
+      def #{prefix}_throw symbol, message = nil, &block
+        C#{polarity}(message, symbol, &block)
+      end
+
+      def #{prefix}_send object, query, *args
+        response = object.__send__(query, *args)
+        T#{polarity} { response }
+      end
+    }, file, line
+  end
+end