ttk 0.1.576

data/ruby_ex/yaml/yregexpath.rb

@@ -0,0 +1,76 @@
+# Author:: Marco Tessari  <marco.tessari@epita.fr>.
+# Copyright:: Copyright (c) 2004 TTK Team. All rights reserved.
+# License:: Ruby license.
+
+# $LastChangedBy: polrop $
+# $Id: yregexpath.rb 159 2005-02-18 12:07:23Z polrop $
+
+module YAML
+
+  class YRegexPath
+    attr_reader :segments, :root, :wanted_node_index
+
+    def initialize ( str )
+      raise ArgumentError, 'Argument must be a string' unless str.is_a?(String)
+      @segments = []
+      @wanted_node_index = nil
+      @root = (str[0] == ?/)
+      while str =~ /^(\/|#)?((?:(?:\\.)|[^\\=\/#])+)(?:=((?:(?:\\.)|[^\\\/#])*))?/
+        if ($1 == "#")
+          if (@wanted_node_index.nil?)
+            @wanted_node_index = @segments.length 
+          else
+            raise ArgumentError, 'More than a "#" given.'
+          end
+        end
+        if ($3.nil?)
+          @segments << Regexp.new($2)
+        else
+          @segments << [ Regexp.new($2), Regexp.new($3) ]
+        end
+        str = $'
+      end
+      @wanted_node_index = @segments.length if @wanted_node_index.nil?
+    end
+  end
+
+end # module YAML
+
+if defined? TEST_MODE or $0 == __FILE__
+
+  require 'test/unit'
+  
+  class YRegexPathTest < Test::Unit::TestCase
+    def compare(str, tab)
+      tab.collect! do |e|
+        if (e.is_a?(Array))
+          e.collect! { |s| Regexp.new(s) unless s.nil? }
+        else
+          Regexp.new(e)
+        end
+      end
+      desc = "Compare #{str} with #{tab}."
+      assert_equal(tab, YAML::YRegexPath.new(str).segments, desc)
+    end
+    
+    def testit
+      compare('mho', [ 'mho' ])
+      compare('mho\\', [ 'mho' ])
+      compare('/mho', [ 'mho' ])
+      compare('/mho=42', [ [ 'mho', '42'] ])
+      compare('/mho=[0-9]+', [ [ 'mho', '[0-9]+' ] ])
+      compare('m\/ho', [ 'm\/ho' ])
+      compare('mho/foo', [ 'mho', 'foo' ])
+      compare('mho=35/foo=test', [ [ 'mho' , '35' ], [ 'foo' , 'test' ] ])
+      compare('test#status=PASS', [ 'test' , [ 'status' , 'PASS' ] ])
+      compare('mho#', [ 'mho' ])
+    end
+    
+    def test_errors
+      # Build with something else than a String.
+      assert_raise(ArgumentError) { YAML::YRegexPath.new(42) }
+      # Two '#'.
+      assert_raise(ArgumentError) { YAML::YRegexPath.new('1#2#3') }
+    end
+  end
+end

data/test/all/TestTAssert/first.yml

@@ -0,0 +1,65 @@
+# Test a simple assert test
+#
+#  - name: Simple preassertion
+#    class: TestTAssert
+#    pre_assertions:
+#      assert:
+#        name: "HOME = /tmp/toto"
+#        assertion: |
+#          ENV{"HOME"} = /tmp/toto
+#    test: true
+#    post_assertions: ast
+---
+
+name: Simple TestTAssert Test
+class: TestTSuite
+attributes:
+  toto: tata
+content:
+  - name: Test false
+    class: TestTCmd
+    command: false
+    exit: 1
+    fatal: true
+  - name: Simple test suite asserted
+    class: TestTAssert
+    attributes:
+      command: true
+    post_assertions: true
+    content:
+      - name: failed
+        class: TestTCmd
+        exit: 1
+      - name: pass
+        class: TestTCmd
+        exit: 0
+  - name: Simple test suite pre_assertions
+    class: TestTAssert
+    attributes:
+      aliases: &tmp /tmp
+      aliases: &fd0 /dev/fd0
+      aliases: &fstab /etc/fstab
+    pre_assertions:
+       - [ [ file.atime, *tmp ], >=, 2004-10-07 16:57:34.000000000 +02:00 ]
+       - [ file.directory?, *tmp ]
+       - [ not, [ file.chardev?, *tmp ] ]
+       - [ file.blockdev?, *fd0 ]
+       - [ [ file.basename, *fd0 ], ==, fd0 ]
+       - [ [ file.ctime, *fd0 ], ==, 2004-01-29 18:14:37.000000000 +01:00 ]
+       - [ not, [ file.exist?, /dev/tty0qsdf ] ]
+       - [ [ file.chardev?, /dev/tty0 ] ]
+       - [ [ 1002, <, [ file.size, *fstab ] ],
+           or,
+           [ [ file.size, *fstab ], <=, 1002 ] ]
+       - [ [ file.dirname, /home/polrop/ruby/ ], =~, '/^\/home\/\w+/' ]
+       - [ file.zero?, /dev/zero ]
+       - [ kernel.eval, '3 + 3 + 5 + 6 == 17' ]
+       - [ kernel.system, 'true' ]
+       - [ [ file.basename, [ env.get, HOME ] ], ==, polrop ]
+       - [ kernel.eval, 'File.basename(ENV["HOME"]) == "polrop"' ]
+       - [ not, [ env.exist?, TOTO ] ]
+    content:
+      - name: Test true
+        class: TestTFail
+        fatal: true
+    post_assertions: []

data/test/all/TestTAssert/segfault.yml

@@ -0,0 +1,31 @@
+# Test a simple assert test
+---
+
+name: Simple TestTAssertTest
+class: TestTSuite
+content:
+  - name: Affiche mais ou��� et les pre|postconditions|commandes
+    class: TestTAssert
+  - name: Precondition
+    class: TestTAssert
+    aliases:
+      &cmd myprog
+      &filename toto.txt
+    precondition:
+      input: condition
+      files:
+        *filename: [ exit, readable, writeable, is_dir, is_link ]
+
+      memory: condition
+      envvar: condition
+      program: condition
+    command: [ *cmd, *filename ]
+    postcondition:
+      output: condition
+      error: condition
+      file: condition
+      memory: condition
+      envvar: condition
+      program: condition
+
+

data/test/all/dist-suite-indirect-nested.yml

@@ -0,0 +1,15 @@
+---
+
+dist-suite:
+  strategy: DistSuite
+  hosts: { port: /42000/ }
+  contents:
+    pool1:
+      strategy: PoolSuite
+      contents:
+        dist-suite-nested-1:
+          strategy: DistSuite
+          hosts: { port: /52000/ }
+          contents:
+            pass11:
+              strategy: Pass

data/test/all/dist-suite-nested-3.yml

@@ -0,0 +1,16 @@
+---
+
+dist-suite-nested-1:
+  strategy: DistSuite
+  hosts: { port: /42000/ }
+  contents:
+    dist-suite-nested-2:
+      strategy: DistSuite
+      hosts: { port: /42000/ }
+      contents:
+        dist-suite-nested-3:
+          strategy: DistSuite
+          hosts: { port: /42000/ }
+          contents:
+            pass:
+              strategy: Pass

data/test/all/dist-suite-nested-in-pool.yml

@@ -0,0 +1,51 @@
+---
+
+dist-suite:
+  strategy: DistSuite
+  hosts: { port: /42000/ }
+  contents:
+    pool1:
+      strategy: PoolSuite
+      contents:
+        dist-suite-nested-11:
+          strategy: DistSuite
+          hosts: { port: /52000/ }
+          contents:
+            fail11:
+              strategy: Fail
+              weight: -1
+            pass11:
+              strategy: Pass
+
+        dist-suite-nested-12:
+          strategy: DistSuite
+          hosts: { port: /62000/ }
+          contents:
+            fail12:
+              strategy: Fail
+              weight: -1
+            pass12:
+              strategy: Pass
+
+#    pool2:
+#      strategy: PoolSuite
+#      contents:
+#        dist-suite-nested-21:
+#        strategy: DistSuite
+#        hosts: { port: /52000/ }
+#        contents:
+#          fail21:
+#            strategy: Fail
+#            weight: -1
+#          pass21:
+#            strategy: Pass
+
+#      dist-suite-nested-22:
+#        strategy: DistSuite
+#        hosts: { port: /62000/ }
+#        contents:
+#          fail22:
+#            strategy: Fail
+#            weight: -1
+#          pass22:
+#            strategy: Pass

data/test/all/dist-suite-nested.yml

@@ -0,0 +1,28 @@
+---
+
+dist-suite:
+  strategy: DistSuite
+  hosts: { port: /42000/ }
+  contents:
+    dist-suite-nested-1:
+      strategy: DistSuite
+      hosts: { port: /52000/ }
+      contents:
+        fail1:
+          strategy: Fail
+          weight: -1
+        pass1:
+          strategy: Pass
+
+    dist-suite-nested-2:
+      strategy: DistSuite
+      hosts: { port: /62000/ }
+      contents:
+        fail2:
+          strategy: Fail
+          weight: -1
+        pass2:
+          strategy: Pass
+
+    pass:
+      strategy: Pass

data/test/all/no_suite.yml

@@ -0,0 +1,18 @@
+#no_suite.yml
+---
+                                 
+name: Multiple tests without suite 1
+class: TestTCmd
+command: " exit 0 "
+code: 0
+
+name: Multiple tests without suite 2 (not tested)
+class: TestTCmd
+command: " exit 4 "
+code: 0
+
+name: Multiple tests without suite 2 (not tested)
+class: TestTCmd
+command: " exit 42 "
+code: 42
+weight: -1

data/test/all/pipeline-timeout.yml

@@ -0,0 +1,21 @@
+#pipeline-timeout.yml
+---
+
+name: test pipeline timeout option (XFAIL) (pipeline-timeout.yml)
+class: TestTSuite
+attributes:
+  class: TestTCmd
+  command: sleep %a | sleep %a
+  exit: 0
+  timeout: 1
+content:
+  - name: I'm suppose to FAIL
+    args: 42
+    weight: -1
+  - name: I'm suppose to PASS
+    args: 0
+
+  - name: Zombie Verification Killall
+    exit: 1
+    command: killall -v sleep
+    error: "No matching processes belonging to you were found\n"

data/test/all/remote_cmd.yml

@@ -0,0 +1,23 @@
+#remote_cmd.yml
+---
+
+name: Test a remote command (remote_cmd.yml)
+class: TestTSuite
+attributes:
+  class: TestTRemoteCmd
+  hostname: localhost
+  exit: 0
+content:
+  - name: Test a valid command (exit 0)
+    command: exit 0
+  - name: Test a invalid command (exit 42)
+    command: exit 42
+    weight: -1
+  - name: Test input output
+    command: md5 < '%i'
+    input from file: all/text/1.txt
+    output: "0f0b3e7f2159ca2e848c60f5c6bf32bd\n"
+  - name: Test remote timeout
+    command: sleep 42
+    timeout: 2
+    weight: -1

data/test/all/remote_dispatcher.yml

@@ -0,0 +1,26 @@
+#remote_dispatcher.yml
+---
+
+name: Test the remote dispatcher (remote_dispatcher.yml)
+class: TestTSuite
+pool: true
+attributes:
+  class: TestTRemoteCmd
+  dispatcher:
+    class: Tools::HostDispatcher
+    hosts: [ { hostname: feydakins }, { hostname: constantinople } ]
+  exit: 0
+content:
+  - name: Test a valid command (exit 0)
+    command: exit 0
+  - name: Test input output
+    command: md5sum
+    input from file: all/text/1.txt
+    output: "0f0b3e7f2159ca2e848c60f5c6bf32bd  -\n"
+  - name: Test a invalid command (exit 42)
+    command: exit 42
+    weight: -1
+  - name: Test remote timeout
+    command: sleep 42
+    timeout: 2
+    weight: -1

data/test/all/suite_timeout.yml

@@ -0,0 +1,32 @@
+#suite_timeout.yml
+---
+
+name: test timeout option on a suite (suite_timeout.yml)
+class: TestTSuite
+attributes:
+  timeout: 1
+content:
+  - name: I'm NOT suppose to FINISH
+    class: TestTSuite
+    attributes:
+      class: TestTCmd
+      command: sleep
+      exit: 0
+    content:
+      - name: I'm suppose to PASS
+        args: 0
+
+      - name: I'm suppose to FAIL
+        args: 42
+        weight: -1
+
+      - name: I'm NOT suppose to be TESTED
+        args: 0
+        weight: -1
+
+  - name: Zombie Verification Killall
+    class: TestTCmd
+    exit: 1
+    command: killall -v sleep
+    error: "No matching processes belonging to you were found\n"
+

data/test/all/weight.yml

@@ -0,0 +1,113 @@
+---
+
+Test the weight system:
+  strategy: Suite
+  attributes:
+    strategy: Suite
+  contents:
+    - All or nothing (0%):
+        wclass: WMin
+        contents: 
+          - Suppose to PASS 1:
+              strategy: Pass
+          - Suppose to PASS 2:
+              strategy: Pass
+          - Suppose to FAIL 3:
+              strategy: Fail
+        
+    - All or nothing (100%):
+        wclass: WMin
+        contents: 
+          - Suppose to PASS 4:
+              strategy: Pass
+          - Suppose to FAIL 5:
+              strategy: Fail
+              weight: -1
+          - Suppose to PASS 6:
+              strategy: Pass
+        
+    - Percentage (70%):
+        contents: 
+          - Suppose to PASS 7:
+              strategy: Pass
+          - Suppose to PASS 8:
+              strategy: Pass
+              weight: 2
+          - Sub suite (25%):
+              strategy: Suite
+              contents: 
+                - Suppose to PASS 9:
+                    strategy: Pass
+                - Suppose to FAIL 10:
+                    strategy: Fail
+                    weight: 2
+                - Suppose to FAIL 11:
+                    strategy: Fail
+          - Suppose to FAIL 12:
+              strategy: Fail
+          - Suppose to PASS 13:
+              strategy: Pass
+
+    - Fatal pass (100%):
+        attributes:
+          strategy: Pass
+        contents: 
+          - Suppose to PASS 14:
+              fatal: true
+          - Suppose to PASS 15: {}
+
+    - Fatal fail (50%):
+        contents: 
+          - Suppose to FAIL 16:
+              strategy: Fail
+              fatal: true
+          - Suppose to be not tested 17:
+              strategy: Pass
+
+    - Fatal pass but other fail (50%):
+        contents: 
+          - Suppose to PASS 18:
+              strategy: Pass
+              fatal: true
+          - Suppose to FAIL 19:
+              strategy: Fail
+
+    - Fatal pass but no weight (100%):
+        attributes:
+          strategy: Pass
+        contents: 
+          - Suppose to PASS 20:
+              weight: 0
+              fatal: true
+          - Suppose to PASS 21: {}
+          - Suppose to PASS 22: {}
+
+    - Fatal fail but no weight (100%):
+        attributes:
+          strategy: Pass
+        contents: 
+          - Suppose to FAIL 23:
+              weight: 0
+              strategy: Fail
+              fatal: true
+          - Suppose to be not tested 24: {}
+          - Suppose to be not tested 25: {}
+
+    - Negative (66%):
+        attributes:
+          strategy: Pass
+        contents: 
+          - Suppose to PASS 26: {}
+          - Suppose to PASS 27:
+              weight: -1
+          - Suppose to PASS 28: {}
+
+    - Negative (100%):
+        attributes:
+          strategy: Pass
+        contents: 
+          - Suppose to PASS 29: {}
+          - Suppose to PASS 30:
+              weight: -1
+              strategy: Fail
+          - Suppose to PASS 31: {}