CodeMonkeySteve-mustard 0.1

data/MIT-LICENSE

@@ -0,0 +1,21 @@
+Copyright (c) 2006-2009 Steve Sloan
+
+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/README.rdoc

@@ -0,0 +1,8 @@
+= Mustard
+
+Mustard is a unit testing framework inspired by Shoulda[http://thoughtbot.com/projects/shoulda/], but without the inefficiencies of Test::Unit.
+
+Author::    Steve Sloan (mailto:steve@finagle.org)
+Website::   http://github.com/CodeMonkeySteve/mustard
+Copyright:: Copyright (c) 2009 Steve Sloan
+License::   MIT

data/Rakefile

@@ -0,0 +1,20 @@
+require 'rake'
+require 'rake/clean'
+require 'rake/testtask'
+require 'rake/rdoctask'
+
+Rake::TestTask.new do |t|
+  t.test_files = FileList['test/test_*.rb']
+  t.verbose = true
+end
+
+Rake::RDocTask.new :rdoc do |rdoc|
+  rdoc.rdoc_dir = 'html'
+  rdoc.title    = "Mustard -- The Testing Secret Sauce"
+  rdoc.options += ['--line-numbers', '--inline-source', '--main', 'README.rdoc' ]
+  rdoc.rdoc_files.include 'README.rdoc', 'MIT-LICENSE'
+  rdoc.rdoc_files.include 'lib/**/*.rb'
+end
+
+task :default => [ :test ]
+

data/lib/mustard.rb

@@ -0,0 +1,55 @@
+require 'mustard/test'
+
+module Mustard
+
+  @@autorun = false
+  def self.autorun?( enabled = nil )
+    @@autorun = enabled  unless enabled.nil?
+    @@autorun
+  end
+
+  module Squeeze
+
+    def scope( *args, &blk )
+      Scope.use( *args, &blk )
+    end
+
+    def test( *args, &blk )
+      t = Test.use( *args, &blk )
+      @@tests ||= []
+      @@tests << t  unless @@tests.include?(t)
+    end
+  
+    def self.included( into )
+      Mustard.autorun? true
+      at_exit do
+        exit( into.autotest ? 0 : 1 )  if Mustard.autorun?
+      end
+    end
+
+protected
+    def autotest
+      return true  if @@tests.empty?
+      $stderr.sync = true
+      context = Context.new
+      passed = failed = 0
+      start = Time.now
+
+      @@tests.all? do |t|
+        t.assert!(context)  do |assrtn, pass, ctx|
+          if pass
+            passed += 1
+            $stderr.print '.'
+          else
+            failed += 1
+            $stderr.puts '!', "in: #{ctx} (#{assrtn.file}:#{assrtn.line})", "failed: #{assrtn.name}"
+          end
+        end
+      end
+      $stderr.puts ''  if failed.zero?
+      $stderr.puts "#{failed} failed, #{passed} passed, in #{Time.now - start}s"
+      failed.zero?
+    end
+  end
+
+end

data/lib/mustard/assertion.rb

@@ -0,0 +1,32 @@
+module Mustard
+
+class Assertion
+  def self.on_success( &blk )
+    (@@success_callbacks ||= []) << blk  if blk
+  end
+
+  def self.on_failure( &blk )
+    (@@failure_callbacks ||= []) << blk  if blk
+  end
+
+
+  attr_accessor :name, :file, :line
+
+  def initialize( name, scope, file, line, &blk )
+    @name, @scope, @file, @line, @blk = name, scope, file, line, blk
+  end
+
+  def call( context = nil )
+    @scope.use! context  do |ctx|
+      context.eval( &@blk )
+    end
+  end
+
+  def assert!( context = nil, &callbk )
+    context ||= Context.new
+    res = self.call context
+    yield( self, res, context )  if callbk
+  end
+end
+
+end

data/lib/mustard/context.rb

@@ -0,0 +1,55 @@
+module Mustard
+
+class Context
+  class Workspace ; end
+
+  def initialize
+    @scopes = []
+    @workspaces = []
+    @workspace = nil
+  end
+
+  def open?( scope )
+    @scopes.include? scope
+  end
+
+  def closed?( scope )
+    ! open? scope
+  end
+
+  def open( scope, &blk )
+#puts "open: #{scope.name.inspect}"
+    unless open? scope
+      if @workspace
+        @workspaces.push @workspace
+        @workspace = @workspace.dup
+      else
+        @workspace = Workspace.new
+      end
+      yield  if blk
+    end
+    @scopes.push scope
+#puts "(#{self})"
+  end
+
+  def close( scope, &blk )
+#puts "close: #{scope.name.inspect}"
+   raise "Mismatched context: got #{scope.name.inspect}, expected #{@scopes.last.name.inspect}"  unless scope == @scopes.last
+   @scopes.pop
+   if closed? scope
+     yield  if blk
+     @workspace = @workspaces.pop
+   end
+#puts "(#{self})"
+  end
+
+  def eval( &blk )
+    @workspace.instance_eval( &blk )
+  end
+
+  def to_s
+    @scopes.map { |s| s.name.inspect }.join(', ')
+  end
+end
+
+end

data/lib/mustard/scope.rb

@@ -0,0 +1,65 @@
+require 'mustard/context'
+
+module Mustard
+
+class Scope
+  @@all = {}
+  def self.[]( name )
+    name && @@all[name]
+  end
+
+  def self.use( name = nil, *scopes, &defn )
+    s = Scope[name] || Scope.new( name, *scopes )
+    s.instance_eval( &defn )  if defn
+    s
+  end
+
+  attr_reader :name
+
+  def initialize( name = nil, *scopes, &defn )
+    @name, @scopes = name, scopes
+    @setup, @teardown = [], [], []
+
+    @@all[@name] = self  if @name
+    self.instance_eval( &defn )  if defn
+  end
+
+  def setup( &blk )
+    @setup << blk
+  end
+
+  def teardown( &blk )
+    @teardown << blk
+  end
+
+  def with( name, *scopes, &defn )
+    @scopes << Scope.use( name, *scopes, &defn )
+  end
+
+  def use!( context = nil, &blk )
+    context ||= Context.new
+    open! context
+    res = yield( context )
+    close! context
+    res
+  end
+
+protected
+
+  def open!( context )
+    context.open self  do
+      @scopes.each { |scope|  scope.open! context  }
+       @setup.each { |blk|    context.eval( &blk )  }
+    end
+  end
+
+  def close!( context )
+    context.close self  do
+      @teardown.reverse.each { |blk|    context.eval( &blk )  }
+        @scopes.reverse.each { |scope|  scope.close! context  }
+    end
+  end
+end
+
+end
+

data/lib/mustard/test.rb

@@ -0,0 +1,42 @@
+require 'mustard/scope'
+require 'mustard/assertion'
+
+module Mustard
+
+class Test < Scope
+  @@all = {}
+  def self.use( name = nil, *scopes, &defn )
+    t = Scope[name] || Test.new( name, *scopes )
+    t.instance_eval( &defn )  if defn
+    t
+  end
+
+  def initialize( name, *scopes, &defn )
+    @assertions = []
+    super name, *scopes, &defn
+  end
+
+  def must( name = nil, file = __FILE__, line = __LINE__, &blk )
+    @assertions << Assertion.new( name, self, file, line, &blk )
+  end
+
+  def must_not( name = nil, file = __FILE__, line = __LINE__, &blk )
+    @assertions << Assertion.new( (name && "not #{name}"), self, file, line ) {  ! instance_eval(&blk)  }
+  end
+
+#  def go( name, &blk )
+#    Test.new "#{self.name}+#{name}", self, &blk
+#  end
+
+  def test( name = nil, &defn )
+    @assertions << Test.new( name, self, &defn )
+  end
+
+  def assert!( context = nil, &callbk )
+    use! context  do |ctx|
+      @assertions.each { |a|  a.assert!( ctx, &callbk )  }
+    end
+  end
+end
+
+end

data/test/test_stuff.rb

@@ -0,0 +1,33 @@
+require 'mustard'
+include Mustard::Squeeze
+
+class Numeric
+  def even? ; (self % 2).zero?    ; end
+  def odd?  ; (self % 2).nonzero? ; end
+end
+
+test 'prime number test' do
+  with 'prime number'  do
+    setup do
+      @prime_number = 97
+    end
+  end
+
+  must('be true')     { @prime_number       }
+  must('be odd')      { @prime_number.odd?  }
+  must_not('be even') { @prime_number.even? }
+
+  test 'add one' do
+    setup do
+      @prime_number += 1
+    end
+    must('be even')    { @prime_number.even? }
+    must_not('be odd') { @prime_number.odd?  }
+  end
+
+  must('be odd again') { @prime_number.odd? }
+end
+
+#test 'failing test' do
+#  must 'fail' do  false  end
+#end

metadata

@@ -0,0 +1,64 @@
+--- !ruby/object:Gem::Specification 
+name: CodeMonkeySteve-mustard
+version: !ruby/object:Gem::Version 
+  version: "0.1"
+platform: ruby
+authors: 
+- Steve Sloan
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-07-27 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: An efficient unit testing framework inspired by Shoulda
+email: steve@finagle.org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README.rdoc
+files: 
+- MIT-LICENSE
+- README.rdoc
+- Rakefile
+- lib/mustard.rb
+- lib/mustard/assertion.rb
+- lib/mustard/context.rb
+- lib/mustard/scope.rb
+- lib/mustard/test.rb
+has_rdoc: false
+homepage: http://github.com/CodeMonkeySteve/mustard
+licenses: 
+post_install_message: 
+rdoc_options: 
+- --main
+- README.rdoc
+- --inline-source
+- --line-numbers
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: An efficient unit testing framework inspired by Shoulda
+test_files: 
+- test/test_stuff.rb