caius-safariwatir 0.3.4

data/lib/watir/exceptions.rb

@@ -0,0 +1,42 @@
+module Watir
+  module Exception
+
+    # Root class for all Watir Exceptions
+    class WatirException < RuntimeError  
+        def initialize(message="")
+            super(message)
+        end
+    end
+    
+    # This exception is thrown if an attempt is made to access an object that doesn't exist
+    class UnknownObjectException < WatirException; end
+    # This exception is thrown if an attempt is made to access an object that is in a disabled state
+    class ObjectDisabledException   < WatirException; end
+    # This exception is thrown if an attempt is made to access a frame that cannot be found 
+    class UnknownFrameException< WatirException; end
+    # This exception is thrown if an attempt is made to access a form that cannot be found 
+    class UnknownFormException< WatirException; end
+    # This exception is thrown if an attempt is made to access an object that is in a read only state
+    class ObjectReadOnlyException  < WatirException; end
+    # This exception is thrown if an attempt is made to access an object when the specified value cannot be found
+    class NoValueFoundException < WatirException; end
+    # This exception gets raised if part of finding an object is missing
+    class MissingWayOfFindingObjectException < WatirException; end
+    # this exception is raised if an attempt is made to  access a table cell that doesnt exist
+    class UnknownCellException < WatirException; end
+    # This exception is thrown if the window cannot be found
+    class NoMatchingWindowFoundException < WatirException; end
+    # This exception is thrown if an attemp is made to acces the status bar of the browser when it doesnt exist
+    class NoStatusBarException < WatirException; end
+    # This exception is thrown if an http error, such as a 404, 500 etc is encountered while navigating
+    class NavigationException < WatirException; end
+    # This exception is raised if a timeout is exceeded
+    class TimeOutException < WatirException
+      def initialize(duration, timeout)
+        @duration, @timeout = duration, timeout
+      end 
+      attr_reader :duration, :timeout
+    end
+    
+  end
+end

data/safariwatir.gemspec

@@ -0,0 +1,34 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{safariwatir}
+  s.version = "0.3.4"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 1.2") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Dave Hoover"]
+  s.date = %q{2009-02-14}
+  s.description = %q{WATIR stands for "Web Application Testing in Ruby".  See WATIR project for more information.  This is a Safari-version of the original IE-only WATIR.}
+  s.email = %q{dave@obtiva.com}
+  s.extra_rdoc_files = ["lib/safariwatir/core_ext.rb", "lib/safariwatir/scripter.rb", "lib/safariwatir.rb", "lib/watir/exceptions.rb", "README.rdoc"]
+  s.files = ["lib/safariwatir/core_ext.rb", "lib/safariwatir/scripter.rb", "lib/safariwatir.rb", "lib/watir/exceptions.rb", "Manifest", "Rakefile", "README.rdoc", "safariwatir.gemspec", "safariwatir_example.rb"]
+  s.has_rdoc = true
+  s.homepage = %q{http://safariwatir.rubyforge.org/}
+  s.rdoc_options = ["--line-numbers", "--inline-source", "--title", "Safariwatir", "--main", "README.rdoc"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{safariwatir}
+  s.rubygems_version = %q{1.3.1}
+  s.summary = %q{Automated testing tool for web applications.}
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 2
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<rb-appscript>, [">= 0"])
+    else
+      s.add_dependency(%q<rb-appscript>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<rb-appscript>, [">= 0"])
+  end
+end

data/safariwatir_example.rb

@@ -0,0 +1,151 @@
+require 'rubygems'
+require 'safariwatir'
+
+# TODO 
+#
+# Looking up textareas, or any input element for that matter, by index
+#
+# Be more attached to the Safari window.
+#    Currently, if a different window is selected, the AppleScript executes against it.
+# Verify onclick is working for buttons and links
+# TextFields should not respond to button method, etc.
+
+# Unsupported Elements: Test that P/Div/Span/TD handle link, button, etc.,
+#                       Javascript confirm [OK/CANCEL], Javascript prompt, Javascript popup windows
+
+# Need to find a better way to distinguish between a submit button and a checkbox, re: page_load
+
+# SAFARI ISSUES
+# Labels are not clickable
+# No known way to programatically click a <button> 
+# Links with href="javascript:foo()"
+
+safari = Watir::Safari.new
+
+def safari.google_to_prag
+  goto("http://google.com")
+  text_field(:name, "q").set("pickaxe")
+  button(:name, "btnG").click
+  link(:text, /Programming Ruby/).click
+  link(:url, "http://www.pragprog.com/titles/ruby/source_code").click
+  link(:text, "All Categories").click
+  link(:text, "All Titles").click
+  link(:url, /retrospectives/).click
+  puts "FAILURE prag" unless contains_text("Dave Hoover")  
+end
+
+def safari.ala
+  goto("http://alistapart.com/")
+  text_field(:id, "search").set("grail")
+  checkbox(:id, "incdisc").set
+  button(:id, "submit").click
+  puts "FAILURE ala" unless contains_text('Search Results for “grail”')
+end
+
+def safari.amazon
+  goto("http://amazon.com")
+  select_list(:name, "url").select("VHS")
+  select_list(:name, "url").select_value("search-alias=stripbooks")
+  text_field(:name, "field-keywords").set("potter")
+  button(:name, "Go").click
+  puts "FAILURE amazon" unless contains_text("Deathly Hallows")
+end
+
+def safari.google_advanced
+  goto("http://www.google.com/advanced_search")
+  radio(:name, "safe", "active").set
+  radio(:name, "safe", "images").set
+  # Safari doesn't support label clicking ... perhaps I should raise an Exception
+  label(:text, "No filtering").click
+  radio(:id, "ss").set
+  text_field(:name, "as_q").set("obtiva")
+  button(:name, "btnG").click
+  puts "FAILURE google" unless contains_text("Training, Coaching, and Software Development")
+end
+
+def safari.reddit
+  goto("http://reddit.com/")
+  text_field(:name, "user").set("foo")
+  password(:name, "passwd").set("bar")
+  form(:index, 2).submit
+  puts "FAILURE reddit" unless contains_text("foo") and contains_text("logout")  
+end
+
+def safari.colbert
+  goto("http://www.colbertnation.com/cn/contact.php")
+  text_field(:name, "formmessage").set("Beware the Bear")
+  button(:value, "Send Email").click
+  puts "FAILURE colbert" unless text_field(:name, "formmessage").verify_contains(/Enter message/)  
+end
+
+def safari.redsquirrel
+  goto("http://redsquirrel.com/")
+  begin
+    text_field(:id, "not_there").set("imaginary")
+    puts "FAILURE squirrel text no e"
+  rescue Watir::UnknownObjectException => e
+    puts "FAILURE squirrel text bad e" unless e.message =~ /not_there/
+  end
+  begin
+    link(:text, "no_where").click
+    puts "FAILURE squirrel link no e"
+  rescue Watir::UnknownObjectException => e
+    puts "FAILURE squirrel link bad e" unless e.message =~ /no_where/
+  end
+end
+
+def safari.weinberg
+  goto("http://www.geraldmweinberg.com/")
+  puts "FAILURE weinberg menu" unless frame("menu").contains_text("Jerry Weinberg's Site")
+  frame("menu").link(:text, "Books").click
+  frame("menu").link(:text, /psychology/i).click
+  puts "FAILURE weinberg content" unless frame("content").contains_text("Silver Anniversary")  
+end
+
+def safari.tables
+  # Site Redesign, need to update test
+  # goto("http://basecamphq.com/")
+  # puts "FAILURE basecamp content" unless table(:index, 1)[1][2].text =~ /What is Basecamp\?/
+  
+  goto("http://www.jimthatcher.com/webcourse9.htm")
+  puts "FAILURE thatcher" unless cell(:id, "c5").text == "subtotals"
+  
+  goto("http://amazon.com/")
+  if contains_text("If you're not")
+    link(:text, "click here").click
+  end
+    
+  puts "FAILURE amazon tr" unless row(:id, "twotabtop")[2].text =~ /Your\s+Amazon\.com/
+  row(:id, "twotabtop")[2].link(:index, 1).click
+  puts "FAILURE amazon link" unless contains_text("personalized recommendations")
+    
+  goto("http://www.dreamweaverresources.com/tutorials/tableborder.htm")
+  puts "FAILURE dreamweaver" unless table(:id, "titletable")[1][1].text =~ /CSS/
+end
+
+def safari.onchange
+  goto("http://www.gr8cardeal.co.uk/?s=1")
+  select_list(:name, "manufacturer").select_value("BMW")
+  sleep 0.3 # There's an Ajax call here
+  select_list(:name, "model").select_value("Z4 ROADSTER")
+end
+
+def safari.ruby_sponsor_images
+  goto("http://mtnwestruby.org/")
+  puts "FAILURE image obtiva" unless image(:src, "http://mtnwestruby.org/images/sponsors/obtiva_logo.png").exists?
+  puts "FAILURE image thoughtworks" unless image(:src, /thoughtworks/).exists?
+end
+
+begin
+  safari.google_to_prag
+  safari.ala
+  safari.amazon
+  safari.google_advanced
+  safari.reddit
+  safari.colbert
+  safari.redsquirrel
+  safari.weinberg
+  safari.tables
+  safari.onchange
+  safari.ruby_sponsor_images
+end

metadata

@@ -0,0 +1,79 @@
+--- !ruby/object:Gem::Specification 
+name: caius-safariwatir
+version: !ruby/object:Gem::Version 
+  version: 0.3.4
+platform: ruby
+authors: 
+- Dave Hoover
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-02-14 00:00:00 -08:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rb-appscript
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: WATIR stands for "Web Application Testing in Ruby".  See WATIR project for more information.  This is a Safari-version of the original IE-only WATIR.
+email: dave@obtiva.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- lib/safariwatir/core_ext.rb
+- lib/safariwatir/scripter.rb
+- lib/safariwatir.rb
+- lib/watir/exceptions.rb
+- README.rdoc
+files: 
+- lib/safariwatir/core_ext.rb
+- lib/safariwatir/scripter.rb
+- lib/safariwatir.rb
+- lib/watir/exceptions.rb
+- Manifest
+- Rakefile
+- README.rdoc
+- safariwatir.gemspec
+- safariwatir_example.rb
+has_rdoc: true
+homepage: http://safariwatir.rubyforge.org/
+post_install_message: 
+rdoc_options: 
+- --line-numbers
+- --inline-source
+- --title
+- Safariwatir
+- --main
+- README.rdoc
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "1.2"
+  version: 
+requirements: []
+
+rubyforge_project: safariwatir
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Automated testing tool for web applications.
+test_files: []
+