testautoi 0.9.127

data/features-skeleton/.irbrc

@@ -0,0 +1,23 @@
+require 'rubygems'
+require 'irb/completion'
+require 'irb/ext/save-history'
+
+ARGV.concat [ "--readline",
+              "--prompt-mode",
+              "simple" ]
+
+# 25 entries in the list
+IRB.conf[:SAVE_HISTORY] = 50
+
+# Store results in home directory with specified file name
+IRB.conf[:HISTORY_FILE] = ".irb-history"
+
+require 'calabash-cucumber/operations'
+require 'calabash-cucumber/launch/simulator_helper'
+SIM=Calabash::Cucumber::SimulatorHelper
+
+include Calabash::Cucumber::Operations
+
+def embed(x,y=nil,z=nil)
+   puts "Screenshot at #{x}"
+end

data/features-skeleton/irb_ios4.sh

@@ -0,0 +1,2 @@
+#!/bin/bash
+IRBRC=.irbrc OS=ios4 irb

data/features-skeleton/irb_ios5.sh

@@ -0,0 +1,2 @@
+#!/bin/bash
+IRBRC=.irbrc irb

data/features-skeleton/my_first.feature

@@ -0,0 +1,12 @@
+Feature: Running a test
+  As an iOS developer
+  I want to have a sample feature file
+  So I can begin testing quickly
+
+Scenario: Example steps
+  Given I am on the Welcome Screen
+  Then I swipe left
+  And I wait until I don't see "Please swipe left"
+  And take picture
+
+

data/features-skeleton/step_definitions/calabash_steps.rb

@@ -0,0 +1 @@
+require 'calabash-cucumber/calabash_steps'

data/features-skeleton/step_definitions/my_first_steps.rb

@@ -0,0 +1,4 @@
+Given /^I am on the Welcome Screen$/ do
+  element_exists("view")
+  sleep(STEP_PAUSE)
+end

data/features-skeleton/support/env.rb

@@ -0,0 +1 @@
+require 'calabash-cucumber/cucumber'

data/features-skeleton/support/launch.rb

@@ -0,0 +1,77 @@
+########################################
+#                                      #
+#       Important Note                 #
+#                                      #
+#   When running calabash-ios tests at #
+#   www.lesspainful.com                #
+#   this file will be overwritten by   #
+#   a file which automates             #
+#   app launch on devices.             #
+#                                      #
+#   Don't rely on this file being      #
+#   present when running at            #
+#   www.lesspainful.com.               #
+#                                      #
+#  Only put stuff here to automate     #
+#  iOS Simulator.                      #
+#                                      #
+#  You can put your app bundle path    #
+#  for automating simulator app start: #
+#  Uncomment APP_BUNDLE_PATH =..       #
+#                                      #
+########################################
+
+require 'calabash-cucumber/launch/simulator_helper'
+require 'sim_launcher'
+
+# Uncomment and replace ?? appropriately
+# This should point to your Simulator build
+# which includes calabash framework
+# this is usually the Calabash build configuration
+# of your production target.
+#APP_BUNDLE_PATH = "~/Library/Developer/Xcode/DerivedData/??/Build/Products/Calabash-iphonesimulator/??.app"
+#
+
+def reset_app_jail(sdk, app_path)
+  app = File.basename(app_path)
+  bundle = `find "#{ENV['HOME']}/Library/Application Support/iPhone Simulator/#{sdk}/Applications/" -type d -depth 2 -name "#{app}" | head -n 1`
+  return if bundle.empty? # Assuming we're already clean
+
+  sandbox = File.dirname(bundle)
+  ['Library', 'Documents', 'tmp'].each do |dir|
+    FileUtils.rm_rf(File.join(sandbox, dir))
+  end
+end
+
+def relaunch(args=nil)
+  if ENV['NO_LAUNCH']!="1"
+    sdk = ENV['SDK_VERSION'] || SimLauncher::SdkDetector.new().latest_sdk_version
+    path = Calabash::Cucumber::SimulatorHelper.app_bundle_or_raise(app_path)
+    if ENV['RESET_BETWEEN_SCENARIOS']=="1"
+      reset_app_jail(sdk, path)
+    end
+
+    Calabash::Cucumber::SimulatorHelper.relaunch(path,sdk,ENV['DEVICE'] || 'iphone', args)
+  end
+end
+
+def app_path
+  ENV['APP_BUNDLE_PATH'] || (defined?(APP_BUNDLE_PATH) && APP_BUNDLE_PATH)
+end
+
+def calabash_notify
+  if self.respond_to?(:on_launch)
+    self.on_launch
+  end
+end
+
+Before do |scenario|
+  relaunch
+  calabash_notify
+end
+
+at_exit do
+  if ENV['NO_LAUNCH']!="1" and ENV['NO_STOP']!="1"
+    Calabash::Cucumber::SimulatorHelper.stop
+  end
+end

data/features/step_definitions/calabash_steps.rb

@@ -0,0 +1,439 @@
+WAIT_TIMEOUT = (ENV['WAIT_TIMEOUT'] || 30).to_f
+STEP_PAUSE = (ENV['STEP_PAUSE'] || 0.5).to_f
+
+Given /^(my|the) app is running$/ do |_|
+  #no-op exists for backwards compatibility
+end
+
+
+# -- Touch --#
+Then /^I (?:press|touch) on screen (\d+) from the left and (\d+) from the top$/ do |x, y|
+  touch(nil, {:offset => {:x => x.to_i, :y => y.to_i}})
+  sleep(STEP_PAUSE)
+end
+
+Then /^I (?:press|touch) "([^\"]*)"$/ do |name|
+  touch("view marked:'#{name}'")
+  sleep(STEP_PAUSE)
+end
+
+Then /^I (?:press|touch) "([^\"]*)" on number (\d+)$/ do |name, index|
+  index = index.to_i
+  screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)
+  cnt = 1
+  res = query("view marked:'#{name}'").empty?
+  while res do
+    swipe('up', {:query => "scrollView index:#{index-1}"})
+    res = query("view marked:'#{name}'").empty?
+    cnt = cnt + 1
+    if cnt >= 5 then
+      break
+    end
+  end
+  sleep(1.0)
+  touch("view marked:'#{name}'")      
+  sleep(STEP_PAUSE)
+end
+
+Then /^I (?:press|touch) (\d+)% right and (\d+)% down from "([^\"]*)" $/ do |x,y,name|
+  raise "This step is not yet implemented on iOS"
+end
+
+Then /^I (?:press|touch) button number (\d+)$/ do |index|
+  index = index.to_i
+  screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)
+  touch("button index:#{index-1}")
+  sleep(STEP_PAUSE)
+end
+
+Then /^I (?:press|touch) the "([^\"]*)" button$/ do |name|
+  touch("button marked:'#{name}'")
+  sleep(STEP_PAUSE)
+end
+
+Then /^I (?:press|touch) the "([^\"]*)" (?:input|text) field$/ do |name|
+  touch("textField placeholder:'#{name}'")
+  sleep(STEP_PAUSE)
+end
+
+#Note in tables views: this means visible cell index!
+Then /^I (?:press|touch) list item number (\d+)$/ do |index|
+   index = index.to_i
+   screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)
+   touch("tableViewCell index:#{index-1}")
+   sleep(STEP_PAUSE)
+end
+
+Then /^I (?:press|touch) list item "([^\"]*)"$/ do |cell_name|
+   touch("tableViewCell marked:'#{cell_name}'")
+   sleep(STEP_PAUSE)
+end
+
+Then /^I toggle the switch$/ do
+  touch("switch")
+  sleep(STEP_PAUSE)
+end
+
+Then /^I toggle the "([^\"]*)" switch$/ do |name|
+  touch("switch marked:'#{name}'")
+  sleep(STEP_PAUSE)
+end
+
+Then /^I touch (?:the)? user location$/ do
+  touch("view:'MKUserLocationView'")
+  sleep(STEP_PAUSE)
+end
+
+Then /^I (?:touch|press) (?:done|search)$/ do
+  done
+  sleep(STEP_PAUSE)
+end
+
+
+## -- Entering text -- ##
+
+Then /^I enter "([^\"]*)" into the "([^\"]*)" field$/ do |text_to_type, field_name|
+  set_text("textField marked:'#{field_name}'", text_to_type)
+  sleep(STEP_PAUSE)
+end
+
+Then /^I enter "([^\"]*)" into the "([^\"]*)" (?:text|input) field$/ do |text_to_type, field_name|
+  set_text("textField placeholder:'#{field_name}'", text_to_type)
+  sleep(STEP_PAUSE)
+end
+
+Then /^I type "([^\"]*)" into the "([^\"]*)" (?:text|input) field$/ do |text_to_type, field_name|
+  tap(field_name)
+  wait_for_elements_exist( ["keyboardAutomatic"] )
+  keyboard_enter_text(text_to_type)
+  sleep(STEP_PAUSE)
+end
+
+Then /^I type "([^\"]*)" into (?:input|text) field number (\d+)$/ do |text_to_type, index|
+    index = index.to_i
+    screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)    
+    touch("textField index:#{index-1}")
+    wait_for_elements_exist( ["keyboardAutomatic"] )
+    keyboard_enter_text(text_to_type)
+    sleep(STEP_PAUSE)
+end
+
+# alias
+Then /^I fill in "([^\"]*)" with "([^\"]*)"$/ do |text_field, text_to_type|
+  macro %Q|I enter "#{text_to_type}" into the "#{text_field}" text field|
+end
+
+Then /^I use the native keyboard to enter "([^\"]*)" into the "([^\"]*)" (?:text|input) field$/ do |text_to_type, field_name|
+  raise "Native keyboard entering is not yet implemented on iOS"
+end
+
+Then /^I fill in text fields as follows:$/ do |table|
+  table.hashes.each do |row|
+    macro %Q|I enter "#{row['text']}" into the "#{row['field']}" text field|
+  end
+end
+
+Then /^I enter "([^\"]*)" into (?:input|text) field number (\d+)$/ do |text, index|
+  index = index.to_i
+  screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)
+  set_text("textField index:#{index-1}",text)
+end
+
+Then /^I enter "([^\"]*)" into text view number (\d+)$/ do |text, index|
+  index = index.to_i
+  screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)
+  set_text("textView index:#{index-1}",text)
+end
+    
+Then /^I use the native keyboard to enter "([^\"]*)" into (?:input|text) field number (\d+)$/ do |text, index|
+  raise "Native keyboard entering is not yet implemented on iOS"
+end
+
+
+When /^I clear "([^\"]*)"$/ do |name|
+  macro %Q|I enter "" into the "#{name}" text field|
+end
+
+Then /^I clear (?:input|text) field number (\d+)$/ do |index|
+  index = index.to_i
+  screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)
+  set_text("textField index:#{index-1}","")
+end
+
+# -- See -- #
+Then /^I wait to see "([^\"]*)"$/ do |expected_mark|
+  wait_for(WAIT_TIMEOUT) { view_with_mark_exists( expected_mark ) }
+end
+
+Then /^I wait until I don't see "([^\"]*)"$/ do |expected_mark|
+  sleep 1## wait for previous screen to disappear
+  wait_for(WAIT_TIMEOUT) { not element_exists( "view marked:'#{expected_mark}'" )}
+end
+
+Then /^I wait to not see "([^\"]*)"$/ do |expected_mark|
+  macro %Q|I wait until I don't see "#{expected_mark}"|
+end
+
+Then /^I wait for "([^\"]*)" to appear$/ do |name|
+  macro %Q|I wait to see "#{name}"|
+end
+
+Then /^I wait for the "([^\"]*)" button to appear$/ do |name|
+  wait_for(WAIT_TIMEOUT) { element_exists( "button marked:'#{name}'" ) }
+end
+
+
+Then /^I wait to see a navigation bar titled "([^\"]*)"$/ do |expected_mark|
+  wait_for(WAIT_TIMEOUT) do
+     query('navigationItemView', :accessibilityLabel).include?(expected_mark)
+  end
+end
+
+Then /^I wait for the "([^\"]*)" (?:input|text) field$/ do |placeholder|
+  wait_for(WAIT_TIMEOUT) { element_exists( "textField placeholder:'#{placeholder}'") }
+end
+
+Then /^I wait for (\d+) (?:input|text) field(?:s)?$/ do |count|
+  count = count.to_i
+  wait_for(WAIT_TIMEOUT) { query(:textField).count >= count  }
+end
+
+
+Then /^I wait$/ do
+  sleep 2
+end
+
+Then /^I wait and wait$/ do
+  sleep 4
+end
+
+Then /^I wait and wait and wait...$/ do
+  sleep 10
+end
+
+When /^I wait for ([\d\.]+) second(?:s)?$/ do |num_seconds|
+  num_seconds = num_seconds.to_f
+  sleep num_seconds
+end
+
+
+Then /^I go back$/ do
+  touch("navigationItemButtonView first")
+  sleep(STEP_PAUSE)
+end
+
+Then /^(?:I\s)?take (?:picture|screenshot)$/ do
+  sleep(STEP_PAUSE)
+  screenshot_embed
+end
+
+Then /^I swipe (left|right|up|down)$/ do |dir|
+  swipe(dir)
+  sleep(STEP_PAUSE)
+end
+
+Then /^I swipe (left|right|up|down) on number (\d+)$/ do |dir, index|
+  index = index.to_i
+  screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)
+  swipe(dir, {:query => "scrollView index:#{index-1}"})
+  sleep(STEP_PAUSE)
+end
+
+Then /^I swipe (left|right|up|down) on number (\d+) at x (\d+) and y (\d+)$/ do |dir, index, x, y|
+  index = index.to_i
+  screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)
+  swipe(dir, {:offset => {:x => x.to_i, :y => y.to_i}, :query => "scrollView index:#{index-1}"})
+  sleep(STEP_PAUSE)
+end
+
+Then /^I swipe (left|right|up|down) on "([^\"]*)"$/ do |dir, mark|
+    swipe(dir, {:query => "view marked:'#{mark}'"})
+    sleep(STEP_PAUSE)
+end
+
+Then /^I swipe on cell number (\d+)$/ do |index|
+  index = index.to_i
+  screenshot_and_raise "Index should be positive (was: #{index})" if (index<=0)
+  cell_swipe({:query => "tableViewCell index:#{index-1}"})
+  sleep(STEP_PAUSE)
+end
+
+
+##pinch##
+Then /^I pinch to zoom (in|out)$/ do |in_out|
+  pinch(in_out)
+  sleep(STEP_PAUSE)
+end
+
+Then /^I pinch to zoom (in|out) on "([^\"]*)"$/ do |in_out, name|
+  pinch(in_out,{:query => "view marked:'#{name}'"})
+  sleep(STEP_PAUSE)
+end
+
+#   Note "up/left/right" seems to be missing on the web base
+Then /^I scroll (left|right|up|down)$/ do |dir|
+  scroll("scrollView index:0", dir)
+  sleep(STEP_PAUSE)
+end
+
+Then /^I scroll (left|right|up|down) on "([^\"]*)"$/ do |dir,name|
+  scroll("view marked:'#{name}'", dir)
+  sleep(STEP_PAUSE)
+end
+
+
+
+### Playback ###
+Then /^I playback recording "([^\"]*)"$/ do |filename|
+    playback(filename)
+    sleep(STEP_PAUSE)
+end
+
+Then /^I playback recording "([^\"]*)" on "([^\"]*)"$/ do |filename, name|
+    playback(filename, {:query => "view marked:'#{name}'"})
+    sleep(STEP_PAUSE)
+end
+
+Then /^I playback recording "([^\"]*)" on "([^\"]*)" with offset (\d+),(\d+)$/ do |filename, name, x, y|
+  x = x.to_i
+  y = y.to_i
+  playback(filename, {:query => "view marked:'#{name}'", :offset => {:x => x, :y => y}})
+  sleep(STEP_PAUSE)
+end
+
+Then /^I reverse playback recording "([^\"]*)"$/ do |filename|
+  playback(filename, {:reverse => true})
+  sleep(STEP_PAUSE)
+end
+
+Then /^I reverse playback recording "([^\"]*)" on "([^\"]*)"$/ do |filename, name|
+  playback(filename, {:query => "view marked:'#{name}'",:reverse => true})
+  sleep(STEP_PAUSE)
+end
+
+Then /^I reverse playback recording "([^\"]*)" on "([^\"]*)" with offset (\d+),(\d+)$/ do |filename, name, x, y|
+  x = x.to_i
+  y = y.to_i
+  playback(filename, {:query => "view marked:'#{name}'", :offset => {:x => x, :y => y},:reverse => true})
+  sleep(STEP_PAUSE)
+end
+
+
+### Device orientation ###
+Then /^I rotate device (left|right)$/ do |dir|
+  dir = dir.to_sym
+  rotate(dir)
+  sleep(5)#SERVO wait
+end
+
+Then /^I send app to background for (\d+) seconds$/ do |secs|
+  secs = secs.to_f
+  background(secs)
+  sleep(secs+10)
+end
+
+### Assertions ###
+Then /^I should see "([^\"]*)"$/ do |expected_mark|
+  res = (element_exists( "view marked:'#{expected_mark}'" ) or
+         element_exists( "view text:'#{expected_mark}'"))
+  if not res
+    screenshot_and_raise "No element found with mark or text: #{expected_mark}"
+  end
+end
+
+Then /^I should not see "([^\"]*)"$/ do |expected_mark|
+  res = query("view marked:'#{expected_mark}'")
+  res.concat query("view text:'#{expected_mark}'")
+  unless res.empty?
+    screenshot_and_raise "Expected no element with text nor accessibilityLabel: #{expected_mark}, found #{res.join(", ")}"
+  end
+end
+
+Then /^I should see a "([^\"]*)" button$/ do |expected_mark|
+  check_element_exists("button marked:'#{expected_mark}'")
+end
+Then /^I should not see a "([^\"]*)" button$/ do |expected_mark|
+  check_element_does_not_exist("button marked:'#{expected_mark}'")
+end
+
+Then /^I don't see the text "([^\"]*)"$/ do |text|
+  macro %Q|I should not see "#{text}"|
+end
+Then /^I don't see the "([^\"]*)"$/ do |text|
+  macro %Q|I should not see "#{text}"|
+end
+
+Then /^I see the text "([^\"]*)"$/ do |text|
+  macro %Q|I should see "#{text}"|
+end
+Then /^I see the "([^\"]*)"$/ do |text|
+  macro %Q|I should see "#{text}"|
+end
+
+Then /^I (?:should)? see text starting with "([^\"]*)"$/ do |text|
+  res = query("view {text BEGINSWITH '#{text}'}").empty?
+  if res
+    screenshot_and_raise "No text found starting with: #{text}"
+  end
+end
+
+Then /^I (?:should)? see text containing "([^\"]*)"$/ do |text|
+  res = query("view {text LIKE '*#{text}*'}").empty?
+  if res
+    screenshot_and_raise "No text found containing: #{text}"
+  end
+end
+
+Then /^I (?:should)? see text ending with "([^\"]*)"$/ do |text|
+  res = query("view {text ENDSWITH '#{text}'}").empty?
+  if res
+    screenshot_and_raise "No text found ending with: #{text}"
+  end
+end
+
+Then /^I see (\d+) (?:input|text) field(?:s)?$/ do |count|
+  count = count.to_i
+  cnt = query(:textField).count
+  if cnt < count
+      screenshot_and_raise "Expected at least #{count} text/input fields, found #{cnt}"
+  end
+end
+
+Then /^I should see a "([^\"]*)" (?:input|text) field$/ do |expected_mark|
+  res = element_exists("textField placeholder:'#{expected_mark}'") or
+          element_exists("textField marked:'#{expected_mark}'")
+  unless res
+    screenshot_and_raise "Expected textfield with placeholder or accessibilityLabel: #{txt}"
+  end
+end
+
+Then /^I should not see a "([^\"]*)" (?:input|text) field$/ do |expected_mark|
+  res = query("textField placeholder:'#{expected_mark}'")
+  res.concat query("textField marked:'#{expected_mark}'")
+  unless res.empty?
+    screenshot_and_raise "Expected no textfield with placeholder nor accessibilityLabel: #{txt}, found #{res}"
+  end
+end
+
+
+Then /^I should see a map$/ do
+  check_element_exists("view:'MKMapView'")
+end
+
+Then /^I should see (?:the)? user location$/ do
+  check_element_exists("view:'MKUserLocationView'")
+end
+
+### Dismiss a dialog if it appears ###
+Then /^I (?:press|touch) "([^\"]*)" on the "([^\"]*)" dialog if it appears$/ do |text, dialog|
+    text = escape_quotes(text)
+    dialog = escape_quotes(dialog)
+    res = (element_exists( "view marked:'#{dialog}'" ) or
+           element_exists( "view text:'#{dialog}'"))
+    if res
+        touch("view marked:'#{text}'")
+    end
+    sleep(STEP_PAUSE)
+end
+
+