operawatir 0.3-jruby

data/lib/operawatir/helper.rb

@@ -0,0 +1,53 @@
+# -*- coding: utf-8 -*-
+
+# TODO
+#   You need to set the OPERA_LAUNCHER and OPERA_PATH environment variables
+#   for this Helper to work.
+
+require 'operawatir'
+require 'rspec'
+require 'rbconfig'
+
+module OperaWatir::Helper
+  extend self
+  
+  def settings
+    OperaWatir::Browser.settings
+  end
+  
+  def browser
+    @browser ||= OperaWatir::Browser.new
+  end
+  
+  def configure_rspec!
+    RSpec.configure do |config|
+      
+      # Set every RSpec option
+      settings.each do |key, value|
+        config.send("#{key}=", value) if config.respond_to?("#{key}=")
+      end
+            
+      config.include SpecHelpers
+      
+      config.after(:suite) { browser.quit! if browser }
+    end
+  end
+
+  def run!(settings={})
+    OperaWatir::Browser.settings = settings
+    configure_rspec!
+    RSpec::Core::Runner.autorun
+  end
+  
+private
+
+  module SpecHelpers
+    def browser
+      OperaWatir::Helper.browser
+    end
+
+    def window
+      browser.active_window
+    end
+  end
+end

data/lib/operawatir/selector.rb

@@ -0,0 +1,111 @@
+class OperaWatir::Selector
+  BASE_TYPES       = [:id, :class_name, :tag_name, :css, :xpath]
+  COLLECTION_TYPES = [:index, :attribute]
+  META_TYPES       = [:join, :antijoin]
+
+  TYPES = BASE_TYPES + COLLECTION_TYPES + META_TYPES
+
+  attr_accessor :collection, :sexp
+
+  def initialize(collection, sexp=nil)
+    self.collection, self.sexp = collection, sexp
+  end
+
+  def eval(exp=sexp)
+    exp.is_a?(Array) ? apply(*optimise(exp).map {|x| eval(x)}) : exp
+  end
+
+  def apply(fn, *args)
+    elms = args.shift
+
+    # Say hello to the the ol' send trick.
+    #
+    # Private methods can be called when using send. This "bug" was
+    # briefly disabled in 1.9 but people complained because it's very
+    # handy (but bad).
+    if elms.nil?
+      collection.parent.send("find_elements_by_#{fn}", *args)
+    else
+      collection.send(:_elms=, elms)
+      if META_TYPES.include?(fn)
+        send("apply_#{fn}", elms, args)
+      else
+        collection.send("find_elements_by_#{fn}", *args)
+      end
+    end
+  end
+
+  (BASE_TYPES + COLLECTION_TYPES).each do |name|
+    define_method name do |val|
+      self.sexp = [name, sexp, val]
+      self
+    end
+  end
+
+  META_TYPES.each do |name|
+    define_method name do |&blk|
+      list = BlockBuilder.new(self)
+      blk.call(list)
+      self.sexp = list.items.inject([name]) do |items, item|
+        items << item.sexp
+      end
+      self
+    end
+  end
+
+  # Handy shortcut
+
+  alias_method :tag, :tag_name
+
+private
+
+  def optimise(sexp)
+    # [:attribute, [:tag_name, nil, TAG], {:id => ID}]
+    # =>
+    # [:tag_name, [:id, nil, ID], TAG]
+    if (
+        sexp.first == :attribute and
+        sexp[1].first == :tag_name and sexp[1][1].nil? and
+        sexp.last.length == 1 and sexp.last.has_key?(:id) and
+        sexp.last[:id].is_a?(String)
+    )
+      # Need to uppercase the tag name as Element.tag_name is alway uppercase
+      [:attribute, [:id, nil, sexp.last[:id]], {:tag_name => sexp[1].last.to_s.upcase}]
+    else
+      sexp
+    end
+  end
+
+  def apply_join(base, elms)
+    elms.inject(base) do |col, elm|
+      col | elm
+    end
+  end
+
+  def apply_antijoin(base, elms)
+    elms.inject(base) do |col, elm|
+      col - elm
+    end
+  end
+
+  def apply_antijoin(elms)
+    elms.inject([]) do |result, elm|
+      result - elm
+    end
+  end
+
+  class BlockBuilder
+    attr_accessor :selector, :items
+
+    def initialize(selector)
+      self.selector, self.items = selector, []
+    end
+
+    def method_missing(*args, &blk)
+      OperaWatir::Selector.new(selector.collection, selector.sexp).send(*args, &blk).tap do |s|
+        items << s
+      end
+    end
+  end
+
+end

data/lib/operawatir/version.rb

@@ -0,0 +1,15 @@
+module OperaWatir
+
+  # @private
+  VERSION = File.read(File.join(File.dirname(__FILE__), '../..', 'VERSION')).strip.freeze
+
+  # Fetches OperaWatir's version number.  Note that this is not the
+  # same as OperaDriver's version number.
+  #
+  # @return [String] current version of OperaWatir
+  def self.version
+    VERSION
+  end
+  
+end
+

data/lib/operawatir/window.rb

@@ -0,0 +1,174 @@
+class OperaWatir::Window
+
+  attr_accessor :browser
+
+  def initialize(browser)
+    self.browser = browser
+  end
+
+
+  # Navigation
+
+  def back
+    driver.navigate.back
+  end
+
+  def forward
+    driver.navigate.forward
+  end
+
+  def stop
+    driver.stop
+  end
+
+  # FIXME No window management support
+  def close
+    driver.close
+  end
+
+  def refresh
+    driver.navigate.refresh
+  end
+
+  def title
+    driver.getTitle
+  end
+
+  def url
+    driver.getCurrentUrl
+  end
+
+  def url=(url)
+    driver.get(url)
+  end
+  alias_method :goto, :url=  # deprecate?
+
+  def text
+    driver.getText
+  end
+
+  def html
+    driver.getPageSource
+  end
+
+  # TODO: Expose window querying from driver
+  def exists?
+    url != ''
+  end
+
+  def document
+  end
+
+  def eval_js(js)
+    object = driver.executeScript(js, [].to_java(:string))
+  end
+  alias_method :execute_script, :eval_js
+
+
+  # Keyboard
+
+  def key(key)
+    driver.key(key)
+  end
+
+  def key_down(key)
+    driver.keyDown(key)
+  end
+
+  def key_up(key)
+    driver.keyUp(key)
+  end
+
+  def type(text)
+    driver.type(text)
+  end
+
+
+  # Opera-specific
+
+  def screenshot(file_name, hashes=[], time_out=2)
+    driver.saveScreenshot(file_name, time_out, hashes.to_java(:string))
+  end
+
+  def visual_hash(time_out=50)
+    document.visual_hash timeout
+  end
+
+  # Raw finders
+
+  OperaWatir::Selector::BASE_TYPES.each do |type|
+    define_method("find_by_#{type}") do |name|
+      OperaWatir::Collection.new(self).tap do |c|
+        c.selector.send(type, name.to_s)
+      end
+    end
+  end
+
+  alias_method :find_by_class, :find_by_class_name
+  alias_method :find_by_tag, :find_by_tag_name
+
+  def elements
+    find_by_tag('*')
+  end
+
+  def method_missing(tag, *args)
+    OperaWatir::Collection.new(self).tap do |c|
+      c.selector.tag_name tag
+      c.add_selector_from_arguments args
+    end
+  end
+
+
+private
+
+  # Locate elements by id.
+  #
+  # @return [Array] an array of found elements
+  def find_elements_by_id(value)
+    driver.findElementsById(value).to_a.map do |node|
+      OperaWatir::Element.new(node)
+    end
+  end
+
+  # Locate elements by class.
+  #
+  # @return [Array] an array of found elements
+  def find_elements_by_class_name(value)
+    driver.findElementsByClassName(value).to_a.map do |node|
+      OperaWatir::Element.new(node)
+    end
+  end
+
+  # Locate elements by tag name.
+  #
+  # @return [Array] an array of found elements
+  def find_elements_by_tag_name(value)
+    driver.findElementsByTagName(value).to_a.map do |node|
+      OperaWatir::Element.new(node)
+    end
+  end
+
+  # Locate elements by CSS selector.
+  #
+  # @return [Array] an array of found elements
+  def find_elements_by_css(value)
+    driver.findElementsByCssSelector(value).to_a.map do |node|
+      OperaWatir::Element.new(node)
+    end
+  end
+
+  # Locate elements by XPath expression.
+  #
+  # @return [Array] an array of found elements
+  def find_elements_by_xpath(value)
+    driver.findElementsByXPath(value).to_a.map do |node|
+      OperaWatir::Element.new(node)
+    end
+  end
+
+  # @private
+  def driver
+    browser.driver
+  end
+
+end

data/spec/fire_event/fire_event.rb

@@ -0,0 +1,268 @@
+require "operawatir/helper"
+
+describe "fire_event" do
+  after(:each) do
+    browser.p(:id, "result").verify_contains("PASS").should == true
+  end
+
+  # onMouseOver 
+  it "should fire event onMouseOver with symbol" do
+    browser.goto files + "onMouseOver.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onMouseOver) }
+  end
+
+  it "should fire event onMouseOver with lowercase symbol" do
+    browser.goto files + "onMouseOver.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onmouseover) }
+  end
+
+  it "should fire event onMouseOver with string" do
+    browser.goto files + "onMouseOver.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onMouseOver") }
+  end
+
+  it "should fire event onMouseOver with lowercase string" do
+    browser.goto files + "onMouseOver.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onmouseover") }
+  end
+
+
+  # onMouseOut
+  it "should fire event onMouseOut with symbol" do
+    browser.goto files + "onMouseOut.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onMouseOut) }
+  end
+
+  it "should fire event onMouseOut with lowercase symbol" do
+    browser.goto files + "onMouseOut.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onmouseout) }
+  end
+
+  it "should fire event onMouseOut with string" do
+    browser.goto files + "onMouseOut.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onMouseOut") }
+  end
+
+  it "should fire event onMouseOut with lowercase string" do
+    browser.goto files + "onMouseOut.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onmouseout") }
+  end
+
+
+  # onMouseDown
+  it "should fire event onMouseDown with symbol" do
+    browser.goto files + "onMouseDown.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onMouseDown) }
+  end
+
+  it "should fire event onMouseDown with lowercase symbol" do
+    browser.goto files + "onMouseDown.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onmousedown) }
+  end
+
+  it "should fire event onMouseDown with string" do
+    browser.goto files + "onMouseDown.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onMouseDown") }
+  end
+
+  it "should fire event onMouseDown with lowercase string" do
+    browser.goto files + "onMouseDown.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onmousedown") }
+  end
+
+
+  # onMouseUp
+  it "should fire event onMouseUp with symbol" do
+    browser.goto files + "onMouseUp.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onMouseUp) }
+  end
+
+  it "should fire event onMouseUp with lowercase symbol" do
+    browser.goto files + "onMouseUp.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onmouseup) }
+  end
+
+  it "should fire event onMouseUp with string" do
+    browser.goto files + "onMouseUp.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onMouseUp") }
+  end
+
+  it "should fire event onMouseUp with lowercase string" do
+    browser.goto files + "onMouseUp.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onmouseup") }
+  end
+
+
+  # onMouseMove
+  it "should fire event onMouseMove with symbol" do
+    browser.goto files + "onMouseMove.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onMouseMove) }
+  end
+
+  it "should fire event onMouseMove with lowercase symbol" do
+    browser.goto files + "onMouseMove.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onmousemove) }
+  end
+
+  it "should fire event onMouseMove with string" do
+    browser.goto files + "onMouseMove.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onMouseMove") }
+  end
+
+  it "should fire event onMouseMove with lowercase string" do
+    browser.goto files + "onMouseMove.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onmousemove") }
+  end
+
+
+  # onClick
+  it "should fire event onClick with symbol" do
+    browser.goto files + "onClick.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onClick) }
+  end
+
+  it "should fire event onClick with lowercase symbol" do
+    browser.goto files + "onClick.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onclick) }
+  end
+
+  it "should fire event onClick with string" do
+    browser.goto files + "onClick.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onClick") }
+  end
+
+  it "should fire event onClick with lowercase string" do
+    browser.goto files + "onClick.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onclick") }
+  end
+
+
+  # onDblClick
+  it "should fire event onDblClick with symbol" do
+    browser.goto files + "onDblClick.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onDblClick) }
+  end
+
+  it "should fire event onDblClick with lowercase symbol" do
+    browser.goto files + "onDblClick.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:ondblclick) }
+  end
+
+  it "should fire event onDblClick with string" do
+    browser.goto files + "onDblClick.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onDblClick") }
+  end
+
+  it "should fire event onDblClick with lowercase string" do
+    browser.goto files + "onDblClick.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("ondblclick") }
+  end
+
+
+  # onAbort cannot be automated using Watir.
+
+ 
+  # onBlur
+  it "should fire event onBlur with symbol" do
+    browser.goto files + "onBlur.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onBlur) }
+  end
+
+  it "should fire event onBlur with lowercase symbol" do
+    browser.goto files + "onBlur.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onblur) }
+  end
+
+  it "should fire event onBlur with string" do
+    browser.goto files + "onBlur.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onBlur") }
+  end
+
+  it "should fire event onBlur with lowercase string" do
+    browser.goto files + "onBlur.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onblur") }
+  end
+
+
+  # onChange
+  it "should fire event onChange with symbol" do
+    browser.goto files + "onChange.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onChange) }
+  end
+
+  it "should fire event onChange with lowercase symbol" do
+    browser.goto files + "onChange.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onchange) }
+  end
+
+  it "should fire event onChange with string" do
+    browser.goto files + "onChange.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onChange") }
+  end
+
+  it "should fire event onChange with lowercase string" do
+    browser.goto files + "onChange.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onchange") }
+  end
+
+
+  # onFocus
+  it "should fire event onFocus with symbol" do
+    browser.goto files + "onFocus.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onFocus) }
+  end
+
+  it "should fire event onFocus with lowercase symbol" do
+    browser.goto files + "onFocus.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event(:onfocus) }
+  end
+
+  it "should fire event onFocus with string" do
+    browser.goto files + "onFocus.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onFocus") }
+  end
+
+  it "should fire event onFocus with lowercase string" do
+    browser.goto files + "onFocus.html"
+    browser.elements(:xpath, "//form/*").each { |e| e.fire_event("onfocus") }
+  end
+
+  # FIXME: onLoad
+
+
+  # FIXME:  onReset
+
+
+  # FIXME:  onResize
+
+
+  it "should fire event onScroll with symbol" do
+    browser.goto files + "onScroll.html"
+    browser.element(:xpath, "//body").fire_event(:onScroll)
+  end
+
+  it "should fire event onScroll with lowercase symbol" do
+    browser.goto files + "onScroll.html"
+    browser.element(:xpath, "//body").fire_event(:onscroll)
+  end
+
+  it "should fire event onScroll with string" do
+    browser.goto files + "onScroll.html"
+    browser.element(:xpath, "//body").fire_event("onScroll")
+  end
+
+  it "should fire event onScroll with lowercase string" do
+    browser.goto files + "onScroll.html"
+    browser.element(:xpath, "//body").fire_event("onscroll")
+  end
+
+  
+  # FIXME:  onSelect
+
+
+  # FIXME:  onSubmit
+
+
+  # FIXME:  onUnload
+end
+