rsel 0.1.1 → 0.1.2

data/spec/st_browser_spec.rb

@@ -0,0 +1,58 @@
+require 'spec/st_spec_helper'
+
+describe 'browser window' do
+  describe "#open_browser" do
+    it "raises StopTestCannotConnect if the connection fails" do
+      st = Rsel::SeleniumTest.new('bogus_host')
+      lambda do
+        st.open_browser
+      end.should raise_error(Rsel::StopTestCannotConnect)
+    end
+
+    # TODO: Find a cross-platform way of testing this
+    #it "uses the javascript-xpath library for *iexplore" do
+      #st = Rsel::SeleniumTest.new('localhost', :browser => '*iexplore')
+      #st.open_browser
+    #end
+
+    it "reports failure to connect to a bogus Selenium server" do
+      st = Rsel::SeleniumTest.new('http://localhost:8070', { :host => 'localhost', :port => '8070' })
+      lambda do
+        st.open_browser
+      end.should raise_error(Rsel::StopTestCannotConnect)
+    end
+
+  end
+
+  describe "#maximize_browser" do
+    it "returns true" do
+      st = Rsel::SeleniumTest.new('http://localhost:8070')
+      st.open_browser
+      st.maximize_browser.should be_true
+      st.close_browser
+    end
+  end
+
+  describe "#close_browser" do
+    before(:each) do
+      @st_temp = Rsel::SeleniumTest.new('http://localhost:8070/')
+      @st_temp.open_browser
+    end
+
+    it "returns true if there are no errors" do
+      @st_temp.close_browser('and show errors').should be_true
+    end
+
+    it "returns true if there are errors, but show_errors is unset" do
+      @st_temp.field_equals("Nonexistent field", "Nonexistent words")
+      @st_temp.close_browser('without showing errors').should be_true
+    end
+
+    it "raises StopTestStepFailed if there are errors and show_errors is set" do
+      @st_temp.field_equals("Nonexistent field", "Nonexistent words")
+      lambda do
+        @st_temp.close_browser('and show errors')
+      end.should raise_error(Rsel::StopTestStepFailed)
+    end
+  end
+end

data/spec/st_buttons_spec.rb

@@ -0,0 +1,95 @@
+require 'spec/st_spec_helper'
+
+describe 'buttons' do
+  before(:each) do
+    @st.visit("/form").should be_true
+  end
+
+  describe "#click_button" do
+    context "passes when" do
+      context "studying and " do 
+        it "button exists and is enabled" do
+          @st.begin_study
+          @st.click_button("Submit person form").should be_true
+          @st.end_study
+        end
+
+        it "button exists within scope" do
+          @st.begin_study
+          @st.click_button("Submit person form", :within => "person_form").should be_true
+          @st.end_study
+        end
+      end
+
+      it "button exists and is enabled" do
+        @st.click_button("Submit person form").should be_true
+      end
+
+      it "button exists within scope" do
+        @st.click_button("Submit person form", :within => "person_form").should be_true
+      end
+
+      it "button exists in table row" do
+        # TODO
+      end
+    end
+
+    context "fails when" do
+      it "button does not exist" do
+        @st.click_button("No such button").should be_false
+      end
+
+      it "button exists, but not within scope" do
+        @st.click_button("Submit person form", :within => "spouse_form").should be_false
+      end
+
+      it "button exists, but not in table row" do
+        # TODO
+      end
+
+      it "button exists, but is read-only" do
+        @st.visit("/readonly_form").should be_true
+        @st.click_button("Submit person form").should be_false
+      end
+    end
+  end
+
+
+  describe "#button_exists" do
+    context "passes when" do
+      context "button with text" do
+        it "exists" do
+          @st.button_exists("Submit person form").should be_true
+          @st.button_exists("Save preferences").should be_true
+        end
+
+        it "exists within scope" do
+          @st.button_exists("Submit person form", :within => "person_form").should be_true
+          @st.button_exists("Submit spouse form", :within => "spouse_form").should be_true
+        end
+
+        it "exists in table row" do
+          # TODO
+        end
+      end
+    end
+
+    context "fails when" do
+      it "no such button exists" do
+        @st.button_exists("Apple").should be_false
+        @st.button_exists("Big Red").should be_false
+      end
+
+      it "button exists, but not within scope" do
+        @st.button_exists("Submit spouse form", :within => "person_form").should be_false
+        @st.button_exists("Submit person form", :within => "spouse_form").should be_false
+      end
+
+      it "button exists, but not in table row" do
+        # TODO
+      end
+    end
+  end
+
+end
+

data/spec/st_checkboxes_spec.rb

@@ -0,0 +1,235 @@
+require 'spec/st_spec_helper'
+
+describe 'checkboxes' do
+  before(:each) do
+    @st.visit("/form").should be_true
+  end
+
+  describe "#enable_checkbox" do
+    context "passes when" do
+      context "checkbox with label" do
+        it "exists" do
+          @st.enable_checkbox("I like cheese").should be_true
+          @st.enable_checkbox("I like salami").should be_true
+        end
+
+        it "exists and is already checked" do
+          @st.enable_checkbox("I like cheese")
+          @st.enable_checkbox("I like cheese").should be_true
+        end
+
+        it "exists within scope" do
+          @st.enable_checkbox("I like cheese", :within => "cheese_checkbox").should be_true
+          @st.enable_checkbox("I like salami", :within => "salami_checkbox").should be_true
+        end
+
+        it "exists in table row" do
+          @st.visit("/table")
+          @st.enable_checkbox("Like", :in_row => "Marcus").should be_true
+        end
+      end
+
+      context "checkbox with id=" do
+        it "exists" do
+          @st.enable_checkbox("id=like_cheese").should be_true
+        end
+      end
+
+      context "checkbox with xpath=" do
+        it "exists" do
+          @st.enable_checkbox("xpath=//input[@id='like_cheese']").should be_true
+        end
+      end
+    end
+
+    context "fails when" do
+      context "checkbox with label" do
+        it "does not exist" do
+          @st.enable_checkbox("I dislike bacon").should be_false
+          @st.enable_checkbox("I like broccoli").should be_false
+        end
+
+        it "exists, but not within scope" do
+          @st.enable_checkbox("I like cheese", :within => "salami_checkbox").should be_false
+          @st.enable_checkbox("I like salami", :within => "cheese_checkbox").should be_false
+        end
+
+        it "exists, but not in table row" do
+          @st.visit("/table")
+          @st.enable_checkbox("Like", :in_row => "Eric").should be_false
+        end
+
+        it "exists, but is read-only" do
+          @st.visit("/readonly_form").should be_true
+          @st.enable_checkbox("I like salami").should be_false
+        end
+      end
+    end
+  end
+
+  describe "#disable_checkbox" do
+    context "passes when" do
+      context "checkbox with label" do
+        it "exists" do
+          @st.disable_checkbox("I like cheese").should be_true
+          @st.disable_checkbox("I like salami").should be_true
+        end
+
+        it "exists and is already unchecked" do
+          @st.disable_checkbox("I like cheese")
+          @st.disable_checkbox("I like cheese").should be_true
+        end
+
+        it "exists within scope" do
+          @st.disable_checkbox("I like cheese", :within => "cheese_checkbox").should be_true
+          @st.disable_checkbox("I like salami", :within => "preferences_form").should be_true
+        end
+
+        it "exists in table row" do
+          @st.visit("/table")
+          @st.disable_checkbox("Like", :in_row => "Marcus").should be_true
+        end
+      end
+
+      context "checkbox with id=" do
+        it "exists" do
+          @st.disable_checkbox("id=like_cheese").should be_true
+        end
+      end
+
+      context "checkbox with xpath=" do
+        it "exists" do
+          @st.disable_checkbox("xpath=//input[@id='like_cheese']").should be_true
+        end
+      end
+    end
+
+    context "fails when" do
+      context "checkbox with label" do
+        it "does not exist" do
+          @st.disable_checkbox("I dislike bacon").should be_false
+          @st.disable_checkbox("I like broccoli").should be_false
+        end
+
+        it "exists, but not within scope" do
+          @st.disable_checkbox("I like cheese", :within => "salami_checkbox").should be_false
+          @st.disable_checkbox("I like salami", :within => "cheese_checkbox").should be_false
+        end
+
+        it "exists, but not in table row" do
+          @st.visit("/table")
+          @st.disable_checkbox("Like", :in_row => "Eric").should be_false
+        end
+
+        it "exists, but is read-only" do
+          @st.visit("/readonly_form").should be_true
+          @st.disable_checkbox("I like cheese").should be_false
+        end
+      end
+    end
+  end
+
+  describe "#checkbox_is_enabled" do
+    context "passes when" do
+      context "checkbox with label" do
+        it "exists and is checked" do
+          @st.enable_checkbox("I like cheese").should be_true
+          @st.checkbox_is_enabled("I like cheese").should be_true
+        end
+
+        it "exists within scope and is checked" do
+          @st.enable_checkbox("I like cheese", :within => "cheese_checkbox").should be_true
+          @st.checkbox_is_enabled("I like cheese", :within => "cheese_checkbox").should be_true
+        end
+
+        it "exists in table row and is checked" do
+          @st.visit("/table")
+          @st.enable_checkbox("Like", :in_row => "Ken").should be_true
+          @st.checkbox_is_enabled("Like", :in_row => "Ken").should be_true
+        end
+
+        it "exists and is checked, but read-only" do
+          @st.visit("/readonly_form").should be_true
+          @st.checkbox_is_enabled("I like cheese").should be_true
+        end
+      end
+    end
+
+    context "fails when" do
+      context "checkbox with label" do
+        it "does not exist" do
+          @st.checkbox_is_enabled("I dislike bacon").should be_false
+        end
+
+        it "exists but is unchecked" do
+          @st.disable_checkbox("I like cheese").should be_true
+          @st.checkbox_is_enabled("I like cheese").should be_false
+        end
+
+        it "exists and is checked, but not within scope" do
+          @st.enable_checkbox("I like cheese", :within => "cheese_checkbox").should be_true
+          @st.checkbox_is_enabled("I like cheese", :within => "salami_checkbox").should be_false
+        end
+
+        it "exists and is checked, but not in table row" do
+          @st.visit("/table")
+          @st.enable_checkbox("Like", :in_row => "Marcus").should be_true
+          @st.checkbox_is_enabled("Like", :in_row => "Eric").should be_false
+        end
+      end
+    end
+  end
+
+  describe "#checkbox_is_disabled" do
+    context "passes when" do
+      context "checkbox with label" do
+        it "exists and is unchecked" do
+          @st.disable_checkbox("I like cheese").should be_true
+          @st.checkbox_is_disabled("I like cheese").should be_true
+        end
+
+        it "exists within scope and is unchecked" do
+          @st.disable_checkbox("I like cheese", :within => "cheese_checkbox").should be_true
+          @st.checkbox_is_disabled("I like cheese", :within => "cheese_checkbox").should be_true
+        end
+
+        it "exists in table row and is unchecked" do
+          @st.visit("/table")
+          @st.disable_checkbox("Like", :in_row => "Ken").should be_true
+          @st.checkbox_is_disabled("Like", :in_row => "Ken").should be_true
+        end
+
+        it "exists and is unchecked, but read-only" do
+          @st.visit("/readonly_form").should be_true
+          @st.checkbox_is_disabled("I like salami").should be_true
+        end
+      end
+    end
+
+    context "fails when" do
+      context "checkbox with label" do
+        it "does not exist" do
+          @st.checkbox_is_disabled("I dislike bacon").should be_false
+        end
+
+        it "exists but is checked" do
+          @st.enable_checkbox("I like cheese").should be_true
+          @st.checkbox_is_disabled("I like cheese").should be_false
+        end
+
+        it "exists and is unchecked, but not within scope" do
+          @st.disable_checkbox("I like cheese", :within => "cheese_checkbox").should be_true
+          @st.checkbox_is_disabled("I like cheese", :within => "salami_checkbox").should be_false
+        end
+
+        it "exists and is unchecked, but not in table row" do
+          @st.visit("/table")
+          @st.disable_checkbox("Like", :in_row => "Marcus").should be_true
+          @st.checkbox_is_disabled("Like", :in_row => "Eric").should be_false
+        end
+      end
+    end
+  end
+end
+
+

data/spec/st_conditionals_spec.rb

@@ -0,0 +1,180 @@
+require 'spec/st_spec_helper'
+
+describe 'conditionals' do
+  before(:each) do
+    @st.visit("/").should be_true
+    @st.reset_conditionals
+  end
+
+  describe "#if_i_see" do
+    context "passes when" do
+      it "sees text" do
+        @st.if_i_see("About this site").should be_true
+        @st.click("About this site").should be_true
+        @st.end_if.should be_true
+      end
+
+      it "is inside a passed block" do
+        @st.if_i_see("About this site").should be_true
+        @st.click("About this site").should be_true
+        @st.page_loads_in_seconds_or_less(10).should be_true
+        @st.if_i_see("This site is").should be_true
+        @st.see("is really cool.").should be_true
+        @st.end_if.should be_true
+        @st.end_if.should be_true
+      end
+    end
+
+    context "skips when" do
+      it "does not see text" do
+        @st.if_i_see("Bogus link").should be_nil
+        @st.click("Bogus link").should be_nil
+        @st.end_if.should be_true
+      end
+
+      it "is inside a skipped block" do
+        @st.if_i_see("Bogus link").should be_nil
+        @st.click("Bogus link").should be_nil
+        @st.if_i_see("About this site").should be_nil
+        @st.click("About this site").should be_nil
+        @st.end_if.should be_nil
+        @st.end_if.should be_true
+      end
+    end
+  end
+
+  describe "#if_parameter" do
+    context "passes when" do
+      it "sees yes" do
+        @st.if_parameter("yes").should be_true
+        @st.click("About this site").should be_true
+        @st.end_if.should be_true
+      end
+
+      it "sees true" do
+        @st.if_parameter("true").should be_true
+        @st.click("About this site").should be_true
+        @st.end_if.should be_true
+      end
+
+      it "sees YES" do
+        @st.if_parameter("YES").should be_true
+        @st.click("About this site").should be_true
+        @st.end_if.should be_true
+      end
+
+      it "sees TRUE" do
+        @st.if_parameter("TRUE").should be_true
+        @st.click("About this site").should be_true
+        @st.end_if.should be_true
+      end
+
+      it "is inside a passed block" do
+        @st.if_i_see("About this site").should be_true
+        @st.click("About this site").should be_true
+        @st.page_loads_in_seconds_or_less(10).should be_true
+        @st.if_parameter("True").should be_true
+        @st.see("is really cool.").should be_true
+        @st.end_if.should be_true
+        @st.end_if.should be_true
+      end
+    end
+
+    context "skips when" do
+      it "sees something other than yes or true" do
+        @st.if_parameter("Bogus").should be_nil
+        @st.click("Bogus link").should be_nil
+        @st.end_if.should be_true
+      end
+
+      it "is inside a skipped block" do
+        @st.if_parameter("Bogus link").should be_nil
+        @st.click("Bogus link").should be_nil
+        @st.if_parameter("TRUE").should be_nil
+        @st.click("About this site").should be_nil
+        @st.end_if.should be_nil
+        @st.end_if.should be_true
+      end
+    end
+  end
+
+  # TODO: if_is
+  describe "#if_is" do
+    context "passes when" do
+      it "sees the same string" do
+        @st.if_is("yes", 'yes').should be_true
+        @st.click("About this site").should be_true
+        @st.end_if.should be_true
+      end
+
+      it "sees a matching empty string" do
+        @st.if_is("",'').should be_true
+        @st.click("About this site").should be_true
+        @st.end_if.should be_true
+      end
+
+      it "is inside a passed block" do
+        @st.if_i_see("About this site").should be_true
+        @st.click("About this site").should be_true
+        @st.page_loads_in_seconds_or_less(10).should be_true
+        @st.if_is("True", "True").should be_true
+        @st.see("is really cool.").should be_true
+        @st.end_if.should be_true
+        @st.end_if.should be_true
+      end
+    end
+
+    context "skips when" do
+      it "sees different strings" do
+        @st.if_is("Ken", "Bogus").should be_nil
+        @st.click("Bogus link").should be_nil
+        @st.end_if.should be_true
+      end
+
+      it "is inside a skipped block" do
+        @st.if_is("Ken", "Bogus").should be_nil
+        @st.click("Bogus link").should be_nil
+        @st.if_is("True", "True").should be_nil
+        @st.click("About this site").should be_nil
+        @st.end_if.should be_nil
+        @st.end_if.should be_true
+      end
+    end
+  end
+
+  describe "#otherwise" do
+    context "skips when" do
+      it "its if was true" do
+        @st.if_i_see("About this site").should be_true
+        @st.click("About this site").should be_true
+        @st.otherwise.should be_nil
+        @st.click("Bogus link").should be_nil
+        @st.end_if.should be_true
+      end
+    end
+    context "passes when" do
+      it "its if was false" do
+        @st.if_i_see("Bogus link").should be_nil
+        @st.click("Bogus link").should be_nil
+        @st.otherwise.should be_true
+        @st.click("About this site").should be_true
+        @st.end_if.should be_true
+      end
+    end
+
+    context "fails when" do
+      it "does not have a matching if" do
+        @st.otherwise.should be_false
+      end
+    end
+  end
+
+  describe "#end_if" do
+    context "fails when" do
+      it "does not have a matching if" do
+        @st.end_if.should be_false
+      end
+    end
+  end
+
+end