From 5ca0eb3ce526fda368dc4b35e795cfc7b7658c80 Mon Sep 17 00:00:00 2001
From: Steve Kemp <steve@steve.org.uk>
Date: Tue, 23 Apr 2013 10:23:17 +0100
Subject:   Updated the parser to allow the test to specify whether
 HTTP-redirects   are followed.

  Added test-cases to match.
---
 t/test-custodian-parser.rb | 37 +++++++++++++++++++++++++++++++++++++
 1 file changed, 37 insertions(+)

(limited to 't')

diff --git a/t/test-custodian-parser.rb b/t/test-custodian-parser.rb
index 811cbb5..f982b10 100755
--- a/t/test-custodian-parser.rb
+++ b/t/test-custodian-parser.rb
@@ -275,6 +275,43 @@ EOF
   end
 
 
+  #
+  # Test that the parser works for HTTP-redirection
+  #
+  def test_http_redirection
+
+    #
+    # test data
+    #
+    data = {
+      "http://example must run http."                         => true,
+      "http://example must run http with status 200."         => true,
+      "http://example must run http with content 'bar'."      => true,
+      "http://example must run http following redirects."     => true,
+      "http://example must run http not following redirects." => false,
+      "http://example must run http not following redirect."  => false,
+    }
+
+    data.each do |str,follow|
+      assert_nothing_raised do
+
+        #
+        # Create the new parser
+        #
+        obj = Custodian::TestFactory.create( str )
+
+        assert(obj)
+
+        if ( follow )
+          assert( obj.follow_redirects? )
+        else
+          assert( ! obj.follow_redirects? )
+        end
+      end
+    end
+  end
+
+
 
   #
   # Test that the text we're going to use in alerters is present.
-- 
cgit v1.2.1