sapphire 0.0.2

data/lib/sapphire.rb

@@ -0,0 +1,30 @@
+require "test/unit"
+require "rubygems"
+require "rspec"
+require 'yaml'
+require 'selenium-webdriver'
+require 'delegate'
+require 'Forwardable'
+require 'win32ole'
+require 'json'
+
+Dir[File.dirname(__FILE__) + '/sapphire/Testing/*.rb'].each {|file| require file }
+Dir[File.dirname(__FILE__) + '/sapphire/WebAbstractions/Controls/Base/*.rb'].each {|file| require file }
+Dir[File.dirname(__FILE__) + '/sapphire/WebAbstractions/Controls/*.rb'].each {|file| require file }
+Dir[File.dirname(__FILE__) + '/sapphire/DataAbstractions/*.rb'].each {|file| require file }
+Dir[File.dirname(__FILE__) + '/sapphire/DSL/Browser/*.rb'].each {|file| require file }
+Dir[File.dirname(__FILE__) + '/sapphire/DSL/Configuration/*.rb'].each {|file| require file }
+Dir[File.dirname(__FILE__) + '/sapphire/DSL/Data/*.rb'].each {|file| require file }
+Dir[File.dirname(__FILE__) + '/sapphire/DSL/Scenarios/*.rb'].each {|file| require file }
+
+module Sapphire
+  module Sapphire
+    include DSL::Scenarios
+    include DSL::Browser
+    include DSL::Configuration
+    include DSL::Data
+    include DataAbstractions
+    include WebAbstractions
+    include Testing
+  end
+end

data/lib/sapphire/DSL/Browser/Browser.rb

@@ -0,0 +1,13 @@
+module Sapphire
+  module DSL
+    module Browser
+      class Browser
+        def Close
+          sleep(2)
+          $browser.close
+        end
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Check.rb

@@ -0,0 +1,12 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Check(*args)
+        ExecuteAgainstControl(args) do |control, arg|
+          control.Check true
+        end
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Clear.rb

@@ -0,0 +1,15 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Clear(item)
+        if(item.is_a? Class)
+          x = item.new
+          x.Clear
+          return
+        end
+        @page.Reset
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Click.rb

@@ -0,0 +1,12 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Click(*args)
+        ExecuteAgainstControl(args) do |control, arg|
+          control.Click
+        end
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Close.rb

@@ -0,0 +1,12 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Exit(item)
+        x = item.new
+        x.Close
+      end
+    end
+  end
+end
+
+

data/lib/sapphire/DSL/Browser/Complete.rb

@@ -0,0 +1,15 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Complete(page)
+        if(page.is_a? Class)
+          x = page.new(@browser)
+        else
+          x = page
+        end
+        @page = x.Complete
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/CurrentUrl.rb

@@ -0,0 +1,11 @@
+module Sapphire
+  module DSL
+    module Browser
+      def CurrentUrl(value)
+        url = @browser.CurrentUrl
+        url == value
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Error.rb

@@ -0,0 +1,12 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Error(hash)
+       ExecuteHashAgainstControl(hash) do |control, arg|
+          control.Text.should == arg
+        end
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/ExecuteAgainstControl.rb

@@ -0,0 +1,45 @@
+module Sapphire
+  module DSL
+    module Browser
+      def ExecuteHashAgainstControl(hash, &block)
+        hash.keys.each do |key|
+          @page.fields.each do |field|
+            field.keys.each do |field_key|
+              if(field_key == key)
+                block.call(field[key], hash[key])
+                return
+              end
+            end
+          end
+        end
+
+        raise "cannot find control matching " + hash.to_s + " for page " + @page.to_s
+      end
+
+      def ExecuteAgainstControl(*args, &block)
+        @page.fields.each do |field|
+          field.keys.each do |field_key|
+            args.each do |arg_array|
+              arg_array.each do |arg|
+                if(field_key == arg)
+                  block.call(field[field_key], arg)
+                  return
+                end
+              end
+            end
+          end
+        end
+
+        arglist = ""
+        args.each do |arg_array|
+          arg_array.each do |arg|
+            arglist += arg.to_s + ", "
+          end
+        end
+
+        raise "Cannot find controls matching: " + arglist + "for page " + @page.to_s
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Exists.rb

@@ -0,0 +1,22 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Exists(symbol)
+        @page.fields.each do |field|
+          field.keys.each do |field_key|
+            if(field_key == symbol)
+              begin
+                x = field[field_key].FindWithoutWait
+                return x.displayed?
+              rescue
+                return false
+              end
+            end
+          end
+        end
+        false
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/For.rb

@@ -0,0 +1,10 @@
+module Sapphire
+  module DSL
+    module Browser
+      def For(item)
+        {item => GetPageField(item).Text}
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Hide.rb

@@ -0,0 +1,10 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Hide(args)
+        IsHidden(args).should == true
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/IsHidden.rb

@@ -0,0 +1,28 @@
+module Sapphire
+  module DSL
+    module Browser
+      def IsHidden(args)
+        @page.fields.each do |field|
+          field.keys.each do |field_key|
+            if(field_key == args)
+              begin
+                wait = Selenium::WebDriver::Wait.new(:timeout => 10)
+                element = wait.until { x = field[field_key].Find
+                    x and !x.displayed?
+                }
+                if(element)
+                  return element.displayed?
+                end
+              rescue
+               return true
+              end
+            end
+          end
+        end
+
+        raise "cannot find control matching " + args.to_s + " for page " + @page.to_s
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/IsVisible.rb

@@ -0,0 +1,25 @@
+module Sapphire
+  module DSL
+    module Browser
+      def IsVisible(args)
+        @page.fields.each do |field|
+          field.keys.each do |field_key|
+            if(field_key == args)
+              begin
+                x = field[field_key].Find
+                if(x)
+                  return x.displayed?
+                end
+              rescue
+               return false
+              end
+            end
+          end
+        end
+
+        raise "cannot find control matching " + args.to_s + " for page " + @page.to_s
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/MouseOver.rb

@@ -0,0 +1,12 @@
+module Sapphire
+  module DSL
+    module Browser
+      def MouseOver(*args)
+        ExecuteAgainstControl(args) do |control, arg|
+          control.MouseOver
+        end
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Navigate.rb

@@ -0,0 +1,11 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Navigate(page)
+        @page = @browser.NavigateTo(page)
+        @page.Init
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Reload.rb

@@ -0,0 +1,11 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Reload(item)
+        @browser.Reload
+        Should Show item
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Set.rb

@@ -0,0 +1,12 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Set(hash)
+        ExecuteHashAgainstControl(hash) do |control, arg|
+          control.Set arg
+        end
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Should.rb

@@ -0,0 +1,10 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Should(item)
+        item
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Show.rb

@@ -0,0 +1,26 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Show(item)
+
+        if(item.is_a? Hash)
+           ExecuteHashAgainstControl(item) do |control, arg|
+            control.Text.should == arg
+           end
+          return
+        elsif(item.is_a? Symbol)
+          IsVisible(item).should == true
+          return
+        elsif(item.is_a? Class)
+          @page = @browser.ShouldNavigateTo item
+          sleep(1)
+        else
+          @page = item
+        end
+
+        @page.Init
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Start.rb

@@ -0,0 +1,16 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Start(browser)
+        if(browser == ConfigurationBrowser)
+          @browser = AppConfig.Current.Browser
+        else
+          @browser = browser
+        end
+
+        @browser.SetRootUrl(@rootUrl)
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/To.rb

@@ -0,0 +1,10 @@
+module Sapphire
+  module DSL
+    module Browser
+      def To(url)
+        url
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Tracker.rb

@@ -0,0 +1,15 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Track(hash)
+        $tracker ||= {}
+        $tracker.merge! hash
+      end
+
+      def Tracker(item)
+        $tracker[item]
+      end
+    end
+  end
+end
+

data/lib/sapphire/DSL/Browser/Transition.rb

@@ -0,0 +1,10 @@
+module Sapphire
+  module DSL
+    module Browser
+      def Transition(url)
+        @browser.ShouldTransitionTo url
+      end
+    end
+  end
+end
+