AXElements 0.6.0beta2 → 0.7.5

data/test/integration/accessibility/test_qualifier.rb

@@ -0,0 +1,148 @@
+require 'test/integration/helper'
+
+class TestAccessibilityQualifier < MiniTest::Unit::TestCase
+
+  def app
+    AX::Application.new REF
+  end
+
+  def qualifier klass, criteria, &block
+    Accessibility::Qualifier.new(klass, criteria, &block)
+  end
+
+  def dock
+    AX::DOCK
+  end
+
+  def list
+    @@list ||= dock.children.first
+  end
+
+  def items
+    @@items ||= list.children
+  end
+
+  def test_qualifies_based_on_class
+    q = qualifier(:List, {})
+    assert q.qualifies? list
+    refute q.qualifies? items.sample
+  end
+
+  def test_qualifies_based_on_superclass
+    q = qualifier(:DockItem, {})
+    items.each do |item|
+      assert q.qualifies? item
+    end
+
+    refute q.qualifies? dock
+  end
+
+  def test_qualifies_based_on_non_existant_class
+    q = qualifier(:Derp, {})
+    refute q.qualifies? dock
+    refute q.qualifies? list
+    refute q.qualifies? items.sample
+  end
+
+  def test_qualifies_based_on_attribute_filter
+    q = qualifier(:DockItem, title: 'Trash')
+    trash  = items.find { |item| item.class == AX::TrashDockItem }
+    others = items.select { |item| item != trash }
+
+    assert q.qualifies? trash
+    others.each do |other|
+      refute q.qualifies? other
+    end
+  end
+
+  def test_qualifies_based_on_regexp_match
+    q = qualifier(:DockItem, title: /Trash/)
+    trash  = items.find { |item| item.class == AX::TrashDockItem }
+    others = items.select { |item| item != trash }
+
+    assert q.qualifies? trash
+    others.each do |other|
+      refute q.qualifies? other
+    end
+  end
+
+  def test_qualifies_based_on_subsearch
+    q = qualifier(:List, dock_item: { title: 'Trash' })
+    assert q.qualifies? list
+    refute q.qualifies? dock
+    refute q.qualifies? items.sample
+  end
+
+  def test_qualifies_based_on_param_attribute_value
+    e = app.attribute(:main_window).attribute(:title_ui_element)
+    q = qualifier(:StaticText, [:string_for_range, CFRange.new(0,2)] => 'AX' )
+    assert q.qualifies? e
+    refute q.qualifies? list
+  end
+
+  def test_qualifies_based_on_param_attribute_regexp_match
+    e = app.attribute(:main_window).attribute(:title_ui_element)
+    q = qualifier(:StaticText, [:string_for_range, CFRange.new(0,2)] => /AX/ )
+    assert q.qualifies? e
+    refute q.qualifies? items.sample
+  end
+
+  def test_qualifies_based_on_multiple_filters
+    q = qualifier(:DockItem, title: 'Trash', role_description: /trash dock item/)
+    assert q.qualifies? items.last
+    refute q.qualifies? items.first
+
+    q = qualifier(:List, role_description: /list/, trash_dock_item: { title: 'Trash' })
+    assert q.qualifies? list
+    refute q.qualifies? items.sample
+  end
+
+  def test_qualifiers_can_use_aliased_attributes
+    id = "I'm a little teapot"
+    q = qualifier(:Button, id: id)
+    app.main_window.children.each do |kid|
+      if kid.attributes.include?(:identifier) && kid.id == id
+        assert q.qualifies? kid
+      else
+        refute q.qualifies? kid
+      end
+    end
+  end
+
+  def test_qualifies_based_on_given_block
+    @got_called = 0
+    q = qualifier(:DockItem, {}) do |element|
+      @got_called += 1
+      element.subrole == KAXTrashDockItemSubrole
+    end
+    refute q.qualifies?(items.first), @got_called
+    assert q.qualifies?(items.last), @got_called
+    assert_equal 2, @got_called
+  end
+
+  def test_describe
+    def describe expected, qualifier
+      assert_equal expected, qualifier.describe
+    end
+    describe 'DockItem',                                     qualifier(:DockItem,{                                         }               )
+    describe 'Button(title: "Free Bacon")',                  qualifier(:Button,  { title: 'Free Bacon'                     }               )
+    describe 'Element[✔]',                                   qualifier(:Element, {                                         }, &proc { |_| })
+    describe 'Window(id: /FindMe/, button(title: "Press"))', qualifier(:Window,  { id: /FindMe/, button: { title: 'Press' }}               )
+    describe 'Row(id: "Yo")[✔]',                             qualifier(:Row,       id: 'Yo',                                  &proc { |_| })
+  end
+
+  # n is the number of filters used
+  def bench_filters
+    skip 'TODO'
+  end
+
+  # n is the number of elements compared
+  def bench_similar_elements
+    skip 'TODO'
+    q = qualifier(:DockItem, title: 'Finder')
+    assert_performance_linear do |n|
+      (items * n).each { |item| q.qualifies? item }
+    end
+  end
+
+end

data/test/integration/ax/test_application.rb

@@ -0,0 +1,56 @@
+require 'test/integration/helper'
+
+class TestAXApplication < MiniTest::Unit::TestCase
+
+  def app
+    @app ||= AX::Application.new REF
+  end
+
+  def running_app
+    @app.instance_variable_get :@app
+  end
+
+  def test_initialize_args
+    assert_equal app, AX::Application.new(PID)
+    assert_equal app, AX::Application.new(running_app.localizedName)
+    assert_equal app, AX::Application.new(running_app)
+  end
+
+  def test_can_set_focus_and_blur_app # lol, blur
+    assert app.set :focused, to: false
+    refute app.active?
+    refute app.attribute :focused
+    refute app.attribute :focused?
+
+    assert app.set :focused, to: true
+    assert app.active?
+    assert app.attribute :focused
+    assert app.attribute :focused?
+
+  ensure
+    running_app.activateWithOptions NSApplicationActivateIgnoringOtherApps
+  end
+
+  def test_can_hide_and_unhide_app
+    assert app.set :hidden, to: true
+    assert app.hidden?
+
+    assert app.set :hidden, to: false
+    refute app.hidden?
+
+    assert app.perform :hide
+    assert app.hidden?
+
+    assert app.perform :unhide
+    refute app.hidden?
+
+  ensure
+    running_app.activateWithOptions NSApplicationActivateIgnoringOtherApps
+  end
+
+  def test_element_at_point
+    button = app.main_window.close_button
+    assert_equal button, app.element_at_point(button)
+  end
+
+end

data/test/integration/ax/test_element.rb

@@ -0,0 +1,46 @@
+require 'test/integration/helper'
+
+class TestAXElement < MiniTest::Unit::TestCase
+
+  def app
+    @@app ||= AX::Application.new PID
+  end
+
+  def test_search_singular_returns_array
+    result = app.search(:window)
+    assert_kind_of AX::Window, result
+  end
+
+  def test_search_plural
+    result = app.search(:windows)
+    assert_kind_of NSArray, result
+  end
+
+  def test_set_range
+    box = app.window.text_area
+    box.set :value, 'okey dokey lemon pokey'
+
+    box.set :selected_text_range, 0..5
+    assert_equal 0..5, box.selected_text_range
+
+    box.set :selected_text_range, 1..5
+    assert_equal 1..5, box.selected_text_range
+
+    box.set :selected_text_range, 5...10
+    assert_equal 5..9, box.selected_text_range
+
+    box.set :selected_text_range, 1..-1
+    assert_equal 1..21, box.selected_text_range
+
+    box.set :selected_text_range, 4...-10
+    assert_equal 4..11, box.selected_text_range
+
+  ensure
+    box.set :value, '' if box
+  end
+
+  #  @todo test setting selected text
+  #  def test_setting
+  #  end
+
+end

data/test/integration/ax/test_row.rb

@@ -0,0 +1,23 @@
+require 'test/integration/helper'
+
+class TestAXRow < MiniTest::Unit::TestCase
+
+  def app;   @@app   ||= AX::Application.new REF end
+  def table; @@table ||= app.main_window.table end
+  def rows;  @@rows  ||= table.rows end
+  def row;               rows.first end
+
+  def test_child_in_column
+    assert_equal row.children.second, row.child_in_column(header: 'Two')
+    assert_equal row.children.first,  row.child_in_column(header: 'One')
+
+    assert_raises Accessibility::SearchFailure do
+      rows.first.child_in_column header: 'Fifty'
+    end
+  end
+
+  def bench_row_in_column
+    skip 'TODO'
+  end
+
+end

data/test/integration/ax_elements/test_nsarray_compat.rb

@@ -0,0 +1,43 @@
+require 'test/integration/helper'
+
+class TestNSArrayCompat < MiniTest::Unit::TestCase
+
+  def app
+    @@app ||= AX::Application.new PID
+  end
+
+  def test_raises_for_non_elements
+    assert_raises NoMethodError do
+      [1].rows
+    end
+
+    assert_raises NoMethodError do
+      [app,1].titles
+    end
+  end
+
+  def test_normally_pluralized_method_names_work
+    table  = app.main_window.table
+    result = [table,table].rows
+    assert_equal result.first, result.last
+  end
+
+  def test_artificially_pluralized_method_names_work
+    assert_equal [app.title], [app].titles
+  end
+
+  def test_predicate_methods_work
+    assert_equal [true],  [app].focused?
+  end
+
+  def test_handles_searching_an_array
+    assert_equal [app].windows, [app.windows]
+  end
+
+  def test_raises_if_element_does_not_respond
+    assert_raises NoMethodError do
+      [app.main_window.close_button].windoze
+    end
+  end
+
+end

data/test/integration/minitest/test_ax_elements.rb

@@ -0,0 +1,98 @@
+require 'test/integration/helper'
+require 'minitest/ax_elements'
+
+class TestMiniTestAssertions < MiniTest::Unit::TestCase
+
+  def app
+    @@app ||= AX::Application.new PID
+  end
+
+  def test_assert_has_child
+    expected = app.window
+
+    assert_equal expected, assert_has_child(app, :window)
+    assert_equal expected, assert_has_child(app, :window, title: 'AXElementsTester')
+
+    result = assert_has_child(app, :window) { |x|
+      @got_called = true
+      x.title == 'AXElementsTester'
+    }
+    assert_equal expected, result
+    assert @got_called
+  end
+
+  def test_assert_has_child_raises_in_failure_cases
+    e = assert_raises MiniTest::Assertion do
+      assert_has_child app, :button
+    end
+    assert_match /to have Button as a child/, e.message
+
+    e = assert_raises MiniTest::Assertion do
+      assert_has_child app, :button, title: 'Press Me'
+    end
+    assert_match /to have Button\(title: "Press Me"\) as a child/, e.message
+  end
+
+  def test_assert_has_descendent
+    expected = app.main_window.check_box
+
+    assert_equal expected, assert_has_descendent(app,:check_box)
+    assert_equal expected, assert_has_descendent(app,:check_box,title: /Box/)
+
+    result = assert_has_descendent app, :check_box do |x|
+      @got_called = true
+      x.title == 'Unchecked Check Box'
+    end
+    assert_equal expected, result
+    assert @got_called
+  end
+
+  def test_assert_has_descendent_raises_in_failure_cases
+    ancestor = app.main_window.slider
+    e        = assert_raises MiniTest::Assertion do
+      assert_has_descendent ancestor, :window, title: /Cake/
+    end
+    assert_match /to have Window\(title: \/Cake\/\) as a descendent/, e.message
+  end
+
+  def test_refute_has_child
+    assert_nil refute_has_child(app,:button)
+    assert_nil refute_has_child(app,:window,title: 'Herp Derp')
+
+    result = refute_has_child app, :window do |x|
+      @got_called = true
+      x.title == 'Herp Derp'
+    end
+    assert_nil result
+    assert @got_called
+  end
+
+  def test_refute_has_child_raises_in_failure_cases
+    e = assert_raises MiniTest::Assertion do
+      refute_has_child app, :window
+    end
+    assert_match /not to have #{Regexp.escape(app.window.inspect)} as a child/, e.message
+  end
+
+  def test_refute_has_descendent
+    slider = app.main_window.slider
+
+    assert_nil refute_has_descendent(slider,:window)
+    assert_nil refute_has_descendent(slider,:element,title: 'Rhubarb')
+
+    result = refute_has_descendent slider, :element do |x|
+      @got_called = true
+      x.attributes.include?(:title) && x.title == 'Rhubarb'
+    end
+    assert_nil result
+    assert @got_called
+  end
+
+  def test_refute_has_descendent_raises_in_failure_cases
+    e = assert_raises MiniTest::Assertion do
+      refute_has_descendent app, :window
+    end
+    assert_match /#{Regexp.escape(app.window.inspect)} as a descendent/, e.message
+  end
+
+end

data/test/integration/rspec/expectations/test_ax_elements.rb

@@ -0,0 +1,58 @@
+# -*- coding: utf-8 -*-
+require 'test/integration/helper'
+require 'rspec/expectations/ax_elements'
+
+class TestRSpecMatchers < MiniTest::Unit::TestCase
+
+  def app
+    @@app ||= AX::Application.new PID
+  end
+
+  def test_have_child_should_failure_message
+    m = Accessibility::HasChildMatcher.new(:window, {}) {}
+    e = app.main_window.slider
+
+    m.matches? e
+    assert_equal "Expected #{e.inspect} to have child Window[✔]",
+      m.failure_message_for_should
+  end
+
+  def test_have_child_should_not_failure_message
+    m = Accessibility::HasChildMatcher.new(:window, {})
+    e = app.window
+
+    m.does_not_match? app
+    assert_equal "Expected #{app.inspect} to NOT have child #{e.inspect}",
+      m.failure_message_for_should_not
+  end
+
+  def test_have_child_description
+    m = Accessibility::HasChildMatcher.new(:window,{}) {}
+    assert_equal 'should have a child that matches Window[✔]', m.description
+  end
+
+  def test_have_descendent_should_failure_message
+    m = Accessibility::HasDescendentMatcher.new(:button, {}) {}
+    q = Accessibility::Qualifier.new(:Button,{}) {}
+    e = app.main_window.slider
+
+    m.matches? e
+    assert_equal "Expected #{e.inspect} to have descendent Button[✔]",
+      m.failure_message_for_should
+  end
+
+  def test_have_descendent_should_not_failure_message
+    m = Accessibility::HasDescendentMatcher.new(:window,{})
+    e = app.window
+
+    m.does_not_match? app
+    assert_equal "Expected #{app.inspect} to NOT have descendent #{e.inspect}",
+      m.failure_message_for_should_not
+  end
+
+  def test_have_descendent_description
+    m = Accessibility::HasDescendentMatcher.new(:button,{})
+    assert_equal 'should have a descendent matching Button', m.description
+  end
+
+end

data/test/integration/test_mouse.rb

@@ -0,0 +1,35 @@
+require 'test/integration/helper'
+
+class TestMouse < MiniTest::Unit::TestCase
+
+  def app
+    @@app ||= AX::Application.new REF
+  end
+
+  def test_drag_to
+    skip
+    starting_point = app.main_window.position
+    def element
+      app.main_window.title_ui_element
+    end
+
+    point = CGPointMake(400, 400)
+    Mouse.move_to element.to_point
+    Mouse.drag_to point, 2
+    highlight element, timeout: 5, color: NSColor.greenColor
+    assert NSPointInRect(point, element.bounds),
+    {
+      point: point.inspect,
+      bounds: element.bounds.inspect,
+      mouse: Mouse.current_position.inspect
+    }
+
+    point = CGPointMake(800, 200)
+    Mouse.move_to element.to_point
+    Mouse.drag_to point, 2
+    assert NSPointInRect(point, element.bounds)
+  ensure
+    set app.main_window, position: starting_point if starting_point
+  end
+
+end