gridinit-jmeter 0.3.2 → 1.0.0.pre

data/spec/dsl_spec.rb

@@ -1,162 +1,457 @@
 require "spec_helper"
+require "pry-debugger"
 
 describe "DSL" do
 
-  it "test plan should respond to thread groups" do
-    test {}.should respond_to :threads
+  describe 'aliased DSL methods' do
+    it "test plan should respond to aliased methods" do
+      test {}.should respond_to :variables
+      test {}.should respond_to :defaults
+      test {}.should respond_to :cookies
+      test {}.should respond_to :cache
+      test {}.should respond_to :header
+      test {}.should respond_to :auth
+    end
+  end
+
+
+  describe 'write to stdout and file' do
+    it "should output a test plan to stdout" do
+      $stdout.should_receive(:puts).with(/jmeterTestPlan/i)
+      test do
+      end.out
+    end
+
+    it "should output a test plan to jmx file" do
+      file = mock('file')
+      File.should_receive(:open).with("jmeter.jmx", "w").and_yield(file)
+      file.should_receive(:write).with(/jmeterTestPlan/i)
+      test do
+      end.jmx
+    end
+  end
+
+
+  describe 'user agent' do
+    let(:doc) do
+      test do
+        with_user_agent :chrome
+        threads
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//HeaderManager").first }
+
+    it 'should match on user_agent' do
+      fragment.search(".//stringProp[@name='Header.name']").text.should == 'User-Agent'
+      fragment.search(".//stringProp[@name='Header.value']").text.should == 
+        'Mozilla/5.0 (Macintosh; Intel Mac OS X 10_7_4) AppleWebKit/536.5 (KHTML, like Gecko) Chrome/19.0.1084.46 Safari/536.5'
+    end
+  end
+
+
+  describe 'thread groups' do
+    let(:doc) do
+      test do
+        threads count: 101, continue_forever: true, duration: 69
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//ThreadGroup").first }
+
+    it 'should match on num_threads' do
+      fragment.search(".//stringProp[@name='ThreadGroup.num_threads']").text.should == '101'
+    end
+
+    it 'should match on continue_forever' do
+      fragment.search(".//boolProp[@name='LoopController.continue_forever']").text.should == 'true'
+    end
+
+    it 'should match on loops' do
+      fragment.search(".//stringProp[@name='LoopController.loops']").text.should == '-1'
+    end
+
+    it 'should match on duration' do
+      fragment.search(".//stringProp[@name='ThreadGroup.duration']").text.should == '69'
+    end
   end
 
-  it "test plan should respond to transactions" do
-    test {}.should respond_to :transaction
+
+  describe 'thread groups old syntax' do
+    let(:doc) do
+      test do
+        threads 101, continue_forever: true, duration: 69
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//ThreadGroup").first }
+
+    it 'should match on num_threads' do
+      fragment.search(".//stringProp[@name='ThreadGroup.num_threads']").text.should == '101'
+    end
+
+    it 'should match on continue_forever' do
+      fragment.search(".//boolProp[@name='LoopController.continue_forever']").text.should == 'true'
+    end
+
+    it 'should match on loops' do
+      fragment.search(".//stringProp[@name='LoopController.loops']").text.should == '-1'
+    end
+
+    it 'should match on duration' do
+      fragment.search(".//stringProp[@name='ThreadGroup.duration']").text.should == '69'
+    end
+  end
+
+
+  describe 'transaction controller' do
+    let(:doc) do
+      test do
+        threads do
+          transaction name: "TC_01", parent: true, include_timers: true
+        end
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//TransactionController").first }
+
+    it 'should match on parent' do
+      fragment.search(".//boolProp[@name='TransactionController.parent']").text.should == 'true'
+    end
+
+    it 'should match on includeTimers' do
+      fragment.search(".//boolProp[@name='TransactionController.includeTimers']").text.should == 'true'
+    end
+  end
+
+
+  describe 'visit' do
+    let(:doc) do
+      test do
+        threads do
+          transaction name: "TC_01", parent: true, include_timers: true do
+            visit url: "/home?location=melbourne", always_encode: true
+          end
+        end
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//HTTPSamplerProxy").first }
+
+    it 'should match on path' do
+      fragment.search(".//stringProp[@name='HTTPSampler.path']").text.should == '/home'
+    end
+
+    it 'should match on always_encode' do
+      fragment.search(".//boolProp[@name='HTTPArgument.always_encode']").text.should == 'true'
+    end
+  end
+
+
+  describe 'visit old syntax' do
+    let(:doc) do
+      test do
+        threads do
+          visit "/home?location=melbourne", always_encode: true
+        end
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//HTTPSamplerProxy").first }
+
+    it 'should match on path' do
+      fragment.search(".//stringProp[@name='HTTPSampler.path']").text.should == '/home'
+    end
+  end
+
+
+  describe 'https' do
+    let(:doc) do
+      test do
+        threads do
+          transaction name: "TC_01", parent: true, include_timers: true do
+            visit url: "https://example.com"
+          end
+        end
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//HTTPSamplerProxy").first }
+
+    it 'should match on protocol' do
+      fragment.search(".//stringProp[@name='HTTPSampler.protocol']").text.should == 'https'
+    end
   end
 
-  it "test plan should respond to visit" do
-    test {}.should respond_to :visit
+
+  describe 'xhr' do
+    let(:doc) do
+      test do
+        threads do
+          transaction name: "TC_02", parent: true, include_timers: true do
+            visit url: "/" do
+              with_xhr
+            end
+          end
+        end
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//HeaderManager").first }
+
+    it 'should match on XHR' do
+      fragment.search(".//stringProp[@name='Header.value']").text.should == 'XMLHttpRequest'
+    end
   end
 
-  it "test plan should respond to soap" do
-    test {}.should respond_to :soap
+
+  describe 'submit' do
+    let(:doc) do
+      test do
+        threads do
+          transaction name: "TC_03", parent: true, include_timers: true do
+            submit url: "/", fill_in: { username: 'tim', password: 'password' }
+          end
+        end
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//HTTPSamplerProxy").first }
+
+    it 'should match on POST' do
+      fragment.search(".//stringProp[@name='HTTPSampler.method']").text.should == 'POST'
+    end
   end
 
-  it "test plan should respond to submit" do
-    test {}.should respond_to :submit
+
+  describe 'If' do
+    let(:doc) do
+      test do
+        threads do
+          If condition: '2>1' do
+            visit url: "/"
+          end
+        end
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//IfController").first }
+
+    it 'should match on If' do
+      fragment.search(".//stringProp[@name='IfController.condition']").text.should == '2>1'
+    end
   end
 
-  it "should output a test plan to stdout" do
-    $stdout.should_receive(:puts).with(/jmeterTestPlan/i)
-    test do
-    end.out
+
+  describe 'exists' do
+    let(:doc) do
+      test do
+        threads do
+          exists 'apple' do
+            visit url: "/"
+          end
+        end
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//IfController").first }
+
+    it 'should match on exists' do
+      fragment.search(".//stringProp[@name='IfController.condition']").text.should == "'${apple}'.length > 0"
+    end
   end
 
-  it "should output a test plan to jmx file" do
-    file = mock('file')
-    File.should_receive(:open).with("jmeter.jmx", "w").and_yield(file)
-    file.should_receive(:write).with(/jmeterTestPlan/i)
-    test do
-    end.jmx
+
+  describe 'While' do
+    let(:doc) do
+      test do
+        threads do
+          While condition: 'true' do
+            visit url: "/"
+          end
+        end
+      end.to_doc
+    end
+
+    let(:fragment) { doc.search("//WhileController").first }
+
+    it 'should match on While' do
+      fragment.search(".//stringProp[@name='WhileController.condition']").text.should == 'true'
+    end
   end
 
-  describe 'Disabled reports' do
+
+  describe 'Loop' do
     let(:doc) do
       test do
-        aggregate_report('Aggregate Report disabled', {enabled: false})
-        aggregate_report('Aggregate Report enabled', {enabled: true})
-        aggregate_report('Aggregate Report default', {enabled: true})
+        threads do
+          Loop count: 5 do
+            visit url: "/"
+          end
+        end
       end.to_doc
     end
 
-    let(:aggregate_report_disabled) { doc.search("//ResultCollector[@testname='Aggregate Report disabled']").first }
-    let(:aggregate_report_enabled) { doc.search("//ResultCollector[@testname='Aggregate Report enabled']").first }
-    let(:aggregate_report_default) { doc.search("//ResultCollector[@testname='Aggregate Report default']").first }
+    let(:fragment) { doc.search("//LoopController").first }
 
-    it 'should disable Aggregate Report disabled' do
-      aggregate_report_disabled.attributes['enabled'].value.should == 'false'
+    it 'should match on Loops' do
+      fragment.search(".//stringProp[@name='LoopController.loops']").text.should == '5'
     end
+  end
+
 
-    it 'should disable Aggregate Report enabled' do
-      aggregate_report_enabled.attributes['enabled'].value.should == 'true'
+  describe 'Counter' do
+    let(:doc) do
+      test do
+        threads do
+          visit url: "/" do
+            counter start: 1, per_user: true
+          end
+        end
+      end.to_doc
     end
-    it 'should disable Aggregate Report default' do
-      aggregate_report_enabled.attributes['enabled'].value.should == 'true'
+
+    let(:fragment) { doc.search("//CounterConfig").first }
+
+    it 'should match on 5 Loops' do
+      fragment.search(".//boolProp[@name='CounterConfig.per_user']").text.should == 'true'
     end
   end
 
-  describe do
 
+  describe 'Switch' do
     let(:doc) do
       test do
-        view_results_full_visualizer('View Results Tree error_only', {error_only: true})
-        view_results_full_visualizer('View Results Tree not error_only', {error_only: false})
-        view_results_full_visualizer('View Results Tree default')
+        threads do
+          Switch value: 'cat' do
+            visit url: "/"
+          end
+        end
       end.to_doc
     end
 
-    let(:report_errors_only) { doc.search("//ResultCollector[@testname='View Results Tree error_only']").first }
-    let(:report_not_errors_only) { doc.search("//ResultCollector[@testname='View Results Tree not error_only']").first }
-    let(:report_default) { doc.search("//ResultCollector[@testname='View Results Tree default']").first }
+    let(:fragment) { doc.search("//SwitchController").first }
 
-    it 'should be true when errors only' do
-      error_logging = report_errors_only.children.first
-      error_logging.attributes['name'].value.should == 'ResultCollector.error_logging'
-      error_logging.text.should == 'true'
+    it 'should match on Switch' do
+      fragment.search(".//stringProp[@name='SwitchController.value']").text.should == 'cat'
     end
+  end
 
-    it 'should be false when not errors only' do
-      error_logging = report_not_errors_only.children.first
-      error_logging.attributes['name'].value.should == 'ResultCollector.error_logging'
-      error_logging.text.should == 'false'
+  describe 'regex extract' do
+    let(:doc) do
+      test do
+        extract regex: 'pattern', name: 'my_regex'
+      end.to_doc
     end
-    it 'should default to false when not given' do
-      error_logging = report_default.children.first
-      error_logging.attributes['name'].value.should == 'ResultCollector.error_logging'
-      error_logging.text.should == 'false'
+
+    let(:fragment) { doc.search("//RegexExtractor").first }
+
+    it 'should match on refname' do
+      fragment.search(".//stringProp[@name='RegexExtractor.refname']").text.should == 'my_regex'
     end
   end
 
-  describe 'extract use_headers_type' do
 
+  describe 'xpath extract' do
     let(:doc) do
       test do
-        extract :regex, 'match on url', 'blah', {match_on: 'URL'}
-        extract :regex, 'match on default', 'blah'
+        extract xpath: '//node', name: 'my_xpath'
       end.to_doc
     end
 
-    let(:extract_url) { doc.search("//RegexExtractor[@testname='match on url']").first }
-    let(:extract) { doc.search("//RegexExtractor[@testname='match on default']").first }
+    let(:fragment) { doc.search("//XPathExtractor").first }
 
-    it 'should match on URL' do
-      extract_url.search(".//stringProp[@name='RegexExtractor.useHeaders']").text.should == 'URL'
+    it 'should match on refname' do
+      fragment.search(".//stringProp[@name='XPathExtractor.refname']").text.should == 'my_xpath'
     end
+  end
+
+
+  describe 'assertions' do
+
+    describe 'scope all' do
+      let(:doc) do
+        test do
+          visit '/' do
+            assert contains: 'Welcome'
+          end
+        end.to_doc
+      end
+
+      let(:fragment) { doc.search("//ResponseAssertion").first }
 
-    it 'should default to false' do
-      extract.search(".//stringProp[@name='RegexExtractor.useHeaders']").text.should == 'false'
+      it 'should match on match' do
+        fragment.search(".//stringProp[@name='match']").text.should == 'Welcome'
+      end
+
+      it 'should match on scope' do
+        fragment.search(".//stringProp[@name='Assertion.scope']").text.should == 'all'
+      end
+
+      it 'should match on test_type' do
+        fragment.search(".//intProp[@name='Assertion.test_type']").text.should == '2'
+      end
     end
 
+    describe 'scope main' do
+      let(:doc) do
+        test do
+          visit '/' do
+            assert contains: 'Welcome', scope: 'main'
+          end
+        end.to_doc
+      end
+
+      let(:fragment) { doc.search("//ResponseAssertion").first }
+
+      it 'should match on scope' do
+        puts doc.to_xml indent: 2
+        fragment.search(".//stringProp[@name='Assertion.scope']").text.should == ""
+      end
+    end
   end
 
-  describe 'Nested controllers' do
 
+  describe 'Nested controllers' do
     let(:doc) do
       test do
-        simple 'blah1.1' do
-          simple 'blah2.1'
-          simple 'blah2.2' do
-            simple 'blah3.1'
+        Simple name: 'node1.1' do
+          Simple name: 'node2.1'
+          Simple name: 'node2.2' do
+            Simple name: 'node3.1'
           end
-          simple 'blah2.3'
+          Simple name: 'node2.3'
         end
-        simple 'blah1.2'
+        Simple name: 'node1.2'
       end.to_doc
     end
 
-    let(:blah1_1) { doc.search("//GenericController[@testname='blah1.1']").first }
-    let(:blah1_2) { doc.search("//GenericController[@testname='blah1.2']").first }
+    let(:node1_1) { doc.search("//GenericController[@testname='node1.1']").first }
+    let(:node1_2) { doc.search("//GenericController[@testname='node1.2']").first }
 
-    let(:blah2_1) { doc.search("//GenericController[@testname='blah2.1']").first }
-    let(:blah2_2) { doc.search("//GenericController[@testname='blah2.2']").first }
-    let(:blah2_3) { doc.search("//GenericController[@testname='blah2.3']").first }
+    let(:node2_1) { doc.search("//GenericController[@testname='node2.1']").first }
+    let(:node2_2) { doc.search("//GenericController[@testname='node2.2']").first }
+    let(:node2_3) { doc.search("//GenericController[@testname='node2.3']").first }
 
-    let(:blah3_1) { doc.search("//GenericController[@testname='blah3.1']").first }
+    let(:node3_1) { doc.search("//GenericController[@testname='node3.1']").first }
 
     it 'nodes should have hashTree as its parent' do
-      [blah1_1, blah1_2, blah2_1, blah2_2, blah2_3, blah3_1].each do |node|
+      [node1_1, node1_2, node2_1, node2_2, node2_3, node3_1].each do |node|
         node.parent.name.should == 'hashTree'
       end
     end
 
-    describe 'blah3_1' do
-      it 'parent parent should be blah2_2' do
-        blah3_1.parent.should == blah2_2.next
+    describe 'node3_1' do
+      it 'parent parent should be node2_2' do
+        node3_1.parent.should == node2_2.next
       end
     end
 
-    describe 'blah1_2' do
-      it 'previous non hashTree sibling is blah1_1' do
-        blah1_2.previous.previous.should == blah1_1
+    describe 'node1_2' do
+      it 'previous non hashTree sibling is node1_1' do
+        node1_2.previous.previous.should == node1_1
       end
     end
 
   end
-
 end