uttk 0.3.1.2

data/test/ruby/wc.rb

@@ -0,0 +1,43 @@
+
+S::Suite.new 'Test the wc command (wc.rb)' do
+
+  attributes do
+    strategy S::Cmd
+    command 'wc -c'
+    self.exit 0     # Must use self otherwise it is Kernel.exit
+  end
+
+  contents do
+
+    name 'good foo' do
+      input 'foo'
+      output(/\s*3\n$/)
+    end
+
+    name 'bad foo' do
+      input 'foo'
+      output(/\s*4\n$/)
+      weight(-1)
+    end
+
+    name 'good foo foo' do
+      input "foo\n foo"
+      output(/\s*8\n$/)
+    end
+
+    name 'useless foo' do
+      input "foo"
+    end
+
+    name 'from file test' do
+      input Pathname.new('<<pwd>>/../fixtures/text/1.txt')
+      output(/\s*272\n$/)
+    end
+
+  end
+
+end
+
+
+
+

data/test/unit-suite.yml

@@ -0,0 +1,10 @@
+---
+
+Uttk unit test suite: !S::Iterate
+  over: !pathlist <<pwd>>/unit/**/(*_test.rb)
+  iter: [it_file, it_name]
+  test:
+    Unit test <<it_name>>: !S::RUnit
+      input: !path <<it_file>>
+      dir: <<pwd>>
+      verbose: true

data/test/unit/dumpers/path_test.rb

@@ -0,0 +1,46 @@
+# Author::    Nicolas Pouillard  <ertai@lrde.epita.fr>.
+# Copyright:: Copyright (c) 2005 Uttk Team. All rights reserved.
+# License::   LGPL
+# Revision::  $Id: /w/fey/uttk/trunk/test/unit/dumpers/path_test.rb 21844 2006-02-17T17:26:59.771162Z pouillar  $
+
+test_section __FILE__ do
+
+  module Uttk
+
+    module Dumpers
+
+      class PathTest < ::Test::Unit::TestCase
+
+        #
+        # Methods
+        #
+
+        def setup
+          super
+          # ...
+        end
+
+        def teardown
+          super
+          # ...
+        end
+
+        #
+        # Tests
+        #
+
+        def test_xxx
+          # ...
+        end
+
+        def test_yyy
+          # ...
+        end
+
+      end # class PathTest
+
+    end # module Dumpers
+
+  end # module Uttk
+
+end

data/test/unit/dumpers/xml_test.rb

@@ -0,0 +1,65 @@
+# Author::    Nicolas Pouillard  <ertai@lrde.epita.fr>.
+# Copyright:: Copyright (c) 2004, 2005 Uttk Team. All rights reserved.
+# License::   LGPL
+# Revision::  $Id: /w/fey/uttk/trunk/test/unit/dumpers/xml_test.rb 21975 2006-02-19T22:24:11.182512Z pouillar  $
+
+test_section __FILE__ do
+
+module Uttk
+
+  module Dumpers
+
+    class Xml
+
+      class Test < Test::Unit::TestCase
+
+        def test_simple
+          ref_output = <<-end
+            <?xml version="1.0" encoding="iso-8859-1"?>
+            <node name='root' type='Uttk::Strategies::Suite'>
+              <node name='contents'>
+                <node name='sub1' type='Uttk::Strategies::Cmd'>
+                  <node name='foo'>bar</node>
+                  <node name='test'>
+                    <node name='subsub'>
+                      <node name='status'>PASS</node>
+                    </node>
+                  </node>
+                </node>
+                <node name='sub2'>
+                  <node name='status'>FAILED</node>
+                </node>
+              </node>
+              <node name='status'>1/2</node>
+            </node>
+          end
+          ref_output.gsub!(/^            /, '')
+
+          TempPath.new do |my_output|
+            io = my_output.open('w')
+            log = Logger.new(Xml.new(io))
+            log.new_node :root, :type => Strategies::Suite do
+              log.new_node :contents, :ordered => true do
+                log.new_node :sub1, :type => Strategies::Cmd do
+                  log.foo = :bar
+                  log.test = { :subsub => { :status => :PASS } }
+                end
+                log.sub2 = { :status => :FAILED }
+              end
+              log.status = '1/2'
+            end
+            log.close
+            io.close
+            assert_equal(ref_output, my_output.read)
+          end
+        end
+
+      end # class Test
+
+    end # class Xml
+
+  end # module Dumpers
+
+end # module Uttk
+
+end

data/test/unit/dumpers/yaml_test.rb

@@ -0,0 +1,65 @@
+# Author::    Nicolas Pouillard  <ertai@lrde.epita.fr>.
+# Copyright:: Copyright (c) 2004, 2005 Uttk Team. All rights reserved.
+# License::   LGPL
+# Revision::  $Id: /w/fey/uttk/trunk/test/unit/dumpers/yaml_test.rb 21975 2006-02-19T22:24:11.182512Z pouillar  $
+
+test_section __FILE__ do
+
+module Uttk
+
+  module Dumpers
+
+    class Yaml
+
+      class Test < Test::Unit::TestCase
+
+        def test_simple
+          out_ref = <<-end
+            ---
+            root: !S::Suite
+              contents:
+                - sub1: !S::Pool
+                    test:
+                      subsub:
+                        status: PASS
+                    foo: bar
+                - sub2:
+                    status: FAIL
+              status: FAIL(50%)
+          end
+          out_ref.gsub!(/^            /, '')
+
+          out_my = StringIO.new
+          l = Logger.new(Yaml.new(out_my))
+          l.new_node :root, :type => Strategies::Suite do
+            l.new_node :contents, :ordered => true do
+              l.new_node :sub1, :type => Strategies::Pool do
+                l.new_node :test do
+                  l.new_node :subsub do
+                    l.new_node(:status) { l.new_leaf "PASS" }
+                  end
+                end
+                l.new_node :foo do
+                  l.new_leaf "bar"
+                end
+              end
+              l.new_node :sub2 do
+                l.new_node(:status) { l.new_leaf "FAIL" }
+              end
+            end
+            l.new_node(:status) { l.new_leaf "FAIL(50%)" }
+          end
+          out_my.rewind
+
+          assert_equal(out_ref, out_my.read)
+        end
+
+      end
+
+    end # class Yaml
+
+  end # module Dumpers
+
+end # module Uttk
+
+end

data/test/unit/filters/buffer_test.rb

@@ -0,0 +1,168 @@
+# Author::    Yannick Lacaute <lacaut_y@epita.fr>
+# Copyright:: Copyright (c) 2004, 2005 Uttk team. All rights reserved.
+# License::   LGPL
+# $Id: Buffer.rb 645 2005-07-11 21:52:01 thor $
+
+test_section __FILE__ do
+
+module Uttk
+
+  module Filters
+
+    class BufferTest < Test::Unit::TestCase
+      include Mocks::Assertions
+      include Buffer::Assertions
+
+      @@ordered = { :ordered => true }
+
+      def get_notifs ( anObject )
+        mo = Mocks::Observer.new
+        log = Logger.new(mo)
+        log << anObject
+        mo.mock_args
+      end
+
+      def setup
+        @notif_one_leaf = [
+          [ [], :foo ]
+        ]
+
+        @notif_two_leaves = [
+          [ [], :foo ],
+          [ [], :bar ]
+        ]
+
+        @notifs_simple_map = [
+          [ [:foo], :bar ]
+        ]
+
+        @notifs_simple_omap = [
+          [ [[:foo, @@ordered], :bar], :baz ]
+        ]
+
+        @complex_tree_with_array =
+        {
+          :root =>
+          {
+            :strategy => :cmd,
+            :contents =>
+            [
+              {
+                :test1 =>
+                {
+                  :cmd  => [:a],
+                  :exit => [:aa]
+                },
+              },
+              {
+                :test2 =>
+                {
+                  :cmd  => :b,
+                  :exit => :bb
+                },
+              }
+            ]
+          }
+        }
+
+        @complex_tree_with_ohash =
+        {
+          :root =>
+          {
+            :strategy => :cmd,
+            :contents =>
+            OHash[
+              :test1, { :cmd => [:a], :exit=> [:aa] },
+              :test2, { :cmd => :b, :exit => :bb }
+            ]
+          }
+        }
+
+        @notifs_complex_gen_from_ohash = get_notifs(@complex_tree_with_ohash)
+        @notifs_complex_gen_from_array = get_notifs(@complex_tree_with_array)
+
+        @notifs_complex = [
+          [ [:root, [:strategy, @@ordered]], :cmd ],
+
+          [ [:root,[:contents, @@ordered],:test1,[:cmd, @@ordered]], [:a] ],
+          [ [:root,[:contents, @@ordered],:test1,[:exit, @@ordered]], [:aa] ],
+
+          [ [:root,[:contents, @@ordered],:test2,:cmd], :b ],
+          [ [:root,[:contents, @@ordered],:test2,:exit], :bb ]
+        ]
+
+        @notifs_map_with_two_leaves = [
+          [ [:foo], :bar ],
+          [ [:foo], :baz ]
+        ]
+
+        @notifs_omap_with_two_leaves = [
+          [ [[:foo, @@ordered]], :bar ],
+          [ [[:foo, @@ordered]], :baz ]
+        ]
+
+        self.mock_object = Mocks::Observer.new
+        @buffer = Buffer.new([mock_object])
+      end
+
+      def inject(notifs)
+        notifs.each do |n|
+          @buffer.update(*Logger.make_notif(n))
+        end
+      end
+
+      def test_buffer_one_leaf
+        inject @notif_one_leaf
+        assert_buffer :foo
+      end
+
+      def test_buffer_two_leaves
+        inject @notif_two_leaves
+        assert_buffer :bar
+      end
+
+      def test_buffer_simple_map
+        inject @notifs_simple_map
+        assert_buffer :foo => :bar
+        assert_not_buffer :foo => { :wrong_value => nil }
+      end
+
+      def test_buffer_simple_omap
+        inject @notifs_simple_omap
+        assert_buffer :foo => OHash[:bar, :baz]
+      end
+
+      def test_buffer_complex
+        inject @notifs_complex
+        assert_buffer @complex_tree_with_ohash
+      end
+
+      def test_buffer_complex_from_ohash
+        inject @notifs_complex_gen_from_ohash
+        assert_buffer @complex_tree_with_ohash
+      end
+
+      def test_buffer_complex_from_array
+        inject @notifs_complex_gen_from_array
+        assert_buffer @complex_tree_with_ohash
+      end
+
+      def test_buffer_map_with_two_leaves
+        assert_raise(Logger::DuplicatedPath) { inject @notifs_map_with_two_leaves }
+      end
+
+      def test_buffer_omap_with_two_leaves
+        inject @notifs_omap_with_two_leaves
+        assert_buffer :foo => [
+                         :bar,
+                         :baz
+                       ]
+      end
+
+    end # class BufferTest
+
+  end # module Filters
+
+end # module Uttk
+
+end

data/test/unit/filters/keep_skip_based_test.rb

@@ -0,0 +1,46 @@
+# Author::    Nicolas Pouillard  <ertai@lrde.epita.fr>.
+# Copyright:: Copyright (c) 2005 Uttk Team. All rights reserved.
+# License::   LGPL
+# Revision::  $Id: /fey/uttk/trunk/test/unit/filters/keep_skip_based_test.rb 8778 2005-09-26T04:34:48.103938Z ertai  $
+
+test_section __FILE__ do
+
+  module Uttk
+
+    module Filters
+
+      class KeepSkipBasedTest < ::Test::Unit::TestCase
+
+        #
+        # Methods
+        #
+
+        def setup
+          super
+          # ...
+        end
+
+        def teardown
+          super
+          # ...
+        end
+
+        #
+        # Tests
+        #
+
+        def test_xxx
+          # ...
+        end
+
+        def test_yyy
+          # ...
+        end
+
+      end # class KeepSkipBasedTest
+
+    end # module Filters
+
+  end # module Uttk
+
+end