operawatir 0.3-jruby

data/spec/legacy_watirspec/text_fields_spec.rb

@@ -0,0 +1,38 @@
+# encoding: utf-8
+require File.expand_path("../spec_helper", __FILE__)
+
+describe "TextFields" do
+
+  before :each do
+    browser.goto(WatirSpec.files + "/forms_with_input_elements.html")
+  end
+
+  describe "#length" do
+    it "returns the number of text fields" do
+      browser.text_fields.length.should == 9
+    end
+  end
+
+  describe "#[]" do
+    it "returns the text field at the given index" do
+      browser.text_fields[1].id.should == "new_user_first_name"
+      browser.text_fields[2].id.should == "new_user_last_name"
+      browser.text_fields[3].id.should == "new_user_email"
+    end
+  end
+
+  describe "#each" do
+    it "iterates through text fields correctly" do
+      index = 1
+      browser.text_fields.each do |r|
+        r.name.should == browser.text_field(:index, index).name
+        r.id.should ==  browser.text_field(:index, index).id
+        r.value.should == browser.text_field(:index, index).value
+        index += 1
+      end
+      browser.text_fields.length.should == index - 1
+    end
+  end
+
+
+end

data/spec/legacy_watirspec/ul_spec.rb

@@ -0,0 +1,84 @@
+# encoding: utf-8
+require File.expand_path("../spec_helper", __FILE__)
+
+describe "Ul" do
+
+  before :each do
+    browser.goto(WatirSpec.files + "/non_control_elements.html")
+  end
+
+  # Exists method
+  describe "#exist?" do
+    it "returns true if the 'ul' exists" do
+      browser.ul(:id, "navbar").should exist
+      browser.ul(:id, /navbar/).should exist
+      browser.ul(:index, 1).should exist
+      browser.ul(:xpath, "//ul[@id='navbar']").should exist
+    end
+
+    it "returns true if the element exists (default how = :id)" do
+      browser.ul("navbar").should exist
+    end
+
+    it "returns the first ul if given no args" do
+      browser.ul.should exist
+    end
+
+    it "returns false if the 'ul' doesn't exist" do
+      browser.ul(:id, "no_such_id").should_not exist
+      browser.ul(:id, /no_such_id/).should_not exist
+      browser.ul(:text, "no_such_text").should_not exist
+      browser.ul(:text, /no_such_text/).should_not exist
+      browser.ul(:class, "no_such_class").should_not exist
+      browser.ul(:class, /no_such_class/).should_not exist
+      browser.ul(:index, 1337).should_not exist
+      browser.ul(:xpath, "//ul[@id='no_such_id']").should_not exist
+    end
+
+    it "raises TypeError when 'what' argument is invalid" do
+      lambda { browser.ul(:id, 3.14).exists? }.should raise_error(TypeError)
+    end
+
+    it "raises MissingWayOfFindingObjectException when 'how' argument is invalid" do
+      lambda { browser.ul(:no_such_how, 'some_value').exists? }.should raise_error(MissingWayOfFindingObjectException)
+    end
+  end
+
+  # Attribute methods
+  describe "#class_name" do
+    it "returns the class attribute" do
+      browser.ul(:id, 'navbar').class_name.should == 'navigation'
+    end
+
+    it "returns an empty string if the element exists and the attribute doesn't" do
+      browser.ul(:index, 2).class_name.should == ''
+    end
+
+    it "raises UnknownObjectException if the ul doesn't exist" do
+      lambda { browser.ul(:id, 'no_such_id').class_name }.should raise_error(UnknownObjectException)
+    end
+  end
+
+  describe "#id" do
+    it "returns the id attribute" do
+      browser.ul(:class, 'navigation').id.should == "navbar"
+    end
+
+    it "returns an empty string if the element exists and the attribute doesn't" do
+      browser.ul(:index, 2).id.should == ''
+    end
+
+    it "raises UnknownObjectException if the ul doesn't exist" do
+      lambda { browser.ul(:id, "no_such_id").id }.should raise_error(UnknownObjectException)
+      lambda { browser.ul(:index, 1337).id }.should raise_error(UnknownObjectException)
+    end
+  end
+
+  describe "#respond_to?" do
+    it "returns true for all attribute methods" do
+      browser.ul(:index, 1).should respond_to(:class_name)
+      browser.ul(:index, 1).should respond_to(:id)
+    end
+  end
+
+end

data/spec/legacy_watirspec/uls_spec.rb

@@ -0,0 +1,40 @@
+# encoding: utf-8
+require File.expand_path("../spec_helper", __FILE__)
+
+bug "WTR-332", :watir do
+  describe "Uls" do
+
+    before :each do
+      browser.goto(WatirSpec.files + "/non_control_elements.html")
+    end
+
+    describe "#length" do
+      it "returns the number of uls" do
+        browser.uls.length.should == 2
+      end
+    end
+
+    describe "#[]" do
+      it "returns the ul at the given index" do
+        browser.uls[1].id.should == "navbar"
+      end
+    end
+
+    describe "#each" do
+      it "iterates through uls correctly" do
+        count = 0
+
+        browser.uls.each_with_index do |ul, index|
+          ul.name.should == browser.ul(:index, index+1).name
+          ul.id.should == browser.ul(:index, index+1).id
+          ul.value.should == browser.ul(:index, index+1).value
+
+          count += 1
+        end
+
+        count.should > 0
+      end
+    end
+
+  end
+end

data/spec/legacy_watirspec/watir_compatibility_spec.rb

@@ -0,0 +1,176 @@
+# encoding: utf-8
+require File.expand_path("../spec_helper", __FILE__)
+
+describe "IE" do
+
+  # Class methods
+  it "responds to .speed" do
+    WatirSpec.implementation.browser_class.should respond_to("speed")
+  end
+
+  it "responds to .speed=" do
+    WatirSpec.implementation.browser_class.should respond_to("speed=")
+  end
+
+  it "responds to .attach_timeout" do
+    WatirSpec.implementation.browser_class.should respond_to("attach_timeout")
+  end
+
+  it "responds to .attach_timeout=" do
+    WatirSpec.implementation.browser_class.should respond_to("attach_timeout=")
+  end
+
+  it "responds to .visible" do
+    WatirSpec.implementation.browser_class.should respond_to("visible")
+  end
+
+  it "responds to .each" do
+    WatirSpec.implementation.browser_class.should respond_to("each")
+  end
+
+  it "responds to .start" do
+    WatirSpec.implementation.browser_class.should respond_to("start")
+  end
+
+  # Instance methods
+  it "responds to #visible" do
+    browser.should respond_to("visible")
+  end
+
+  it "responds to #visible=" do
+    browser.should respond_to("visible=")
+  end
+
+  it "responds to #wait" do
+    browser.should respond_to("wait")
+  end
+
+  describe "#bring_to_front" do
+    it "returns true" do
+      browser.bring_to_front.should be_true
+    end
+  end
+
+  describe "#checkBox" do
+    it "behaves like #checkbox" do
+      browser.goto(WatirSpec.files + "/forms_with_input_elements.html")
+      browser.checkbox(:id, "new_user_interests_books").should exist
+      browser.checkbox(:id, "new_user_interests_cars").should_not be_set
+      browser.checkbox(:id, "new_user_interests_cars").set
+      browser.checkbox(:id, "new_user_interests_cars").should be_set
+    end
+  end
+
+end
+
+describe "Image" do
+
+  before :each do
+    browser.goto(WatirSpec.files + "/images.html")
+  end
+
+  describe "#hasLoaded?" do
+    it "behaves like #loaded?" do
+      browser.image(:name, 'circle').hasLoaded?.should be_true
+    end
+  end
+
+  describe "#fileSize" do
+    bug "WTR-346", :watir do
+      it "behaves like #file_size" do
+        browser.image(:id, 'square').fileSize.should == 788
+      end
+    end
+  end
+
+  describe "#fileCreatedDate" do
+    bug "WTR-347", :watir do
+      it "behaves like #file_created_date" do
+        browser.goto(WatirSpec.host + "/images.html")
+        image = browser.image(:index, 2)
+        path = File.dirname(__FILE__) + "/html/#{image.src}"
+        image.file_created_date.to_i.should == File.mtime(path).to_i
+      end
+    end
+  end
+
+end
+
+describe "RadioCheckCommon" do
+
+  before :each do
+    browser.goto(WatirSpec.files + "/forms_with_input_elements.html")
+  end
+
+  describe "#isSet?" do
+    it "behaves like #set?" do
+      browser.radio(:id, "new_user_newsletter_yes").isSet?.should be_true
+    end
+  end
+
+  describe "#getState" do
+    it "behaves like #set?" do
+      browser.checkbox(:id, "new_user_interests_books").getState.should be_true
+    end
+  end
+
+end
+
+describe "SelectList" do
+
+  before :each do
+    browser.goto(WatirSpec.files + "/forms_with_input_elements.html")
+  end
+
+  describe "#getSelectedItems" do
+    it "behaves like #selected_options" do
+      browser.select_list(:name, "new_user_country").getSelectedItems.should == ["Norway"]
+      browser.select_list(:name, "new_user_languages").getSelectedItems.should == ["English", "Norwegian"]
+    end
+  end
+
+  describe "#getAllContents" do
+    it "behaves like #options" do
+      expected = ["Denmark" ,"Norway" , "Sweden" , "United Kingdom", "USA", "Germany"]
+      sl = browser.select_list(:name, "new_user_country")
+      sl.getAllContents.should == sl.options
+    end
+  end
+
+  describe "#clearSelection" do
+    it "behaves like #clear" do
+      browser.select_list(:name, "new_user_languages").clearSelection
+      browser.select_list(:name, "new_user_languages").getSelectedItems.should be_empty
+    end
+  end
+
+end
+
+describe "TextField" do
+
+  before :each do
+    browser.goto(WatirSpec.files + "/forms_with_input_elements.html")
+  end
+
+  describe "#dragContentsTo" do
+    it "behaves like #drag_contents_to" do
+      browser.text_field(:name, "new_user_first_name").set("Smith")
+      browser.text_field(:name, "new_user_first_name").dragContentsTo(:name, "new_user_last_name")
+      browser.text_field(:name, "new_user_first_name").value.should be_empty
+      browser.text_field(:id, "new_user_last_name").value.should == "Smith"
+    end
+  end
+
+  describe "#getContents" do
+    it "behaves like #get_contents" do
+      browser.text_field(:name, "new_user_occupation").getContents.should == "Developer"
+    end
+  end
+
+  describe "#requires_typing" do
+    it "responds to the method" do
+      browser.text_field(:name, "new_user_occupation").should respond_to(:requires_typing)
+    end
+  end
+
+end

data/spec/legacy_watirspec/watirspec_helper.rb

@@ -0,0 +1,57 @@
+# encoding: utf-8
+$LOAD_PATH.unshift File.dirname(__FILE__)
+$LOAD_PATH.unshift File.expand_path('../../../lib', __FILE__)
+require 'rspec'
+
+require 'guards'
+require 'server'
+
+require 'operawatir/helper'
+
+RSpec.configure do |config|
+  config.mock_with :rr
+end
+
+module WatirSpec
+  extend self
+
+  attr_accessor :args, :guarded
+
+  def host
+    "http://#{Server.bind}:#{Server.port}"
+  end
+  alias_method :files, :host
+
+  def guards
+    @guards ||= []
+  end
+
+  def guarded?
+    !!@guarded
+  end
+  
+  def new_browser
+    OperaWatir::Helper.browser
+  end
+
+  module Helpers
+    def fixture(*paths)
+      [WatirSpec.host, *paths].join('/')
+    end
+  end
+
+end
+
+include OperaWatir::Exceptions
+
+include WatirSpec::Guard::Helpers
+
+RSpec.configure do |config|
+  config.include WatirSpec::Helpers
+  config.include OperaWatir::Helper::SpecHelpers
+
+  config.before(:suite) do
+    Thread.new { WatirSpec::Server.run! }
+  end
+end
+

data/utils/Rakefile

@@ -0,0 +1,79 @@
+require "rubygems"
+require "spec"
+require "spec/rake/spectask"
+require "pathname"
+
+all_tests = {}
+all_files = Dir["**/*.rb"]
+
+all_files.each do |filename|
+  if filename =~ /\//
+    sub = filename.split("/")
+    subfilename = sub[1]
+
+    unless all_tests.has_key?(sub[0])
+      all_tests.merge!({sub[0] => {}})
+    end
+
+    test = {subfilename[0..-4] => subfilename}
+    all_tests[sub[0]].merge!(test)
+  elsif filename =~ /helper.rb/
+    next 
+  else
+    test = {filename[0..-4] => filename}
+    all_tests.merge!(test)
+  end
+end
+
+spec_opts = ["--color", "--require rubygems"] #, "--format OperaHelperFormatter"]
+spec_files = []
+
+# All tests
+desc "All tests"
+Spec::Rake::SpecTask.new("test") do |t|
+  all_tests.each do |testname, testfile|
+    if testfile.kind_of?(Hash)
+      testfile.each do |subtestname, subtestfile|
+        spec_files.push testname + "/" + subtestfile
+      end
+    else
+      spec_files.push testfile
+    end
+  end
+
+  t.spec_opts = spec_opts
+  t.spec_files = [spec_files]
+end
+
+namespace :test do
+  all_tests.each_pair do |testname, testfile|
+    if testfile.kind_of?(Hash)
+      testfile.each_pair do |subtestname, subtestfile|
+        testfile[subtestname] = testname + "/" + subtestfile
+      end
+
+      desc "All " + testname + " tests"
+      Spec::Rake::SpecTask.new(testname) do |t|
+        t.spec_opts = spec_opts
+        t.spec_files = testfile.values
+      end
+
+      namespace testname do
+        testfile.each_pair do |subtestname, subtestfile|
+          desc subtestname + " tests"
+          Spec::Rake::SpecTask.new(subtestname) do |t|
+            t.spec_opts = spec_opts
+            t.spec_files = [subtestfile]
+          end
+        end
+      end
+    else
+      desc testname + " tests"
+      Spec::Rake::SpecTask.new(testname) do |t|
+        t.spec_opts = spec_opts
+        t.spec_files = [testfile]
+      end
+    end
+  end
+end
+