mohawk 0.0.1 → 0.0.2

data/lib/mohawk/accessors/label.rb

@@ -0,0 +1,13 @@
+module Mohawk
+	module Accessors
+		class Label
+			def initialize(adapter, locator)
+				@label = adapter.window.label(locator)
+			end
+			
+			def value 
+				@label.value
+			end
+		end
+	end
+end

data/lib/mohawk/accessors/menu_item.rb

@@ -0,0 +1,21 @@
+module Mohawk
+  module Accessors
+    class MenuItem
+      def initialize(adapter, locator)
+        @adapter = adapter
+        @locator = locator
+      end
+
+      def select
+        menu_item.open
+      end
+
+      private
+      def menu_item
+        @locator[:path].reduce(@adapter.window) do |the_menu, menu_item|
+          the_menu.menu :text => menu_item
+        end
+      end
+    end
+  end
+end

data/lib/mohawk/accessors/table.rb

@@ -0,0 +1,50 @@
+module Mohawk
+  module Accessors
+    class Table
+      class Row
+        attr_reader :row
+
+        def initialize(table, row)
+          @row = row
+          @table = table
+        end
+        
+        def selected?
+          @table.selected? row.row
+        end
+
+        def cells
+          row.cells.map &:text
+        end
+
+        def to_hash
+          {:text => row.text, :row => row.row }
+        end
+      end
+
+      attr_reader :table
+
+      def initialize(adapter, locator)
+        @table = adapter.window.table(locator)
+      end
+
+      def select(which_item)
+        table.select which_item if which_item.is_a? Integer
+      end
+
+      def rows
+        table.rows.map do |row|
+          Row.new(table, row).to_hash
+        end
+      end
+
+      def row(which_row)
+        Row.new table, table.row(:index => which_row)
+      end
+
+      def view
+        table
+      end
+    end
+  end
+end

data/lib/mohawk/accessors/text.rb

@@ -2,6 +2,7 @@ module Mohawk
   module Accessors
     class Text
       def initialize(adapter, locator)
+        @adapter = adapter
         @text = adapter.window.text_field(locator)
       end
 
@@ -16,6 +17,11 @@ module Mohawk
       def clear
         @text.clear
       end
+
+      def enter(text)
+        text_window = @adapter.window.child(:hwnd => @text.hwnd)
+        text_window.send_keys text.split(//)
+      end
     end
   end
 end

data/lib/mohawk/accessors/tree_view.rb

@@ -0,0 +1,30 @@
+module Mohawk
+  module Accessors
+    class TreeView
+      def initialize(adapter, locator)
+        @tree = adapter.window.select_list(locator)
+      end
+
+      def value
+        @tree.value
+      end
+
+      def items
+        @tree.options.map &:text
+      end
+
+      def expand(which_item)
+        @tree.expand which_item
+      end
+
+      def collapse(which_item)
+        @tree.collapse which_item
+      end
+
+      def select(which_item)
+        @tree.select which_item if which_item.is_a? Integer
+        @tree.set which_item if which_item.is_a? String
+      end
+    end
+  end
+end

data/lib/mohawk/adapters/uia_adapter.rb

@@ -26,6 +26,22 @@ module Mohawk
       def radio(locator)
         Mohawk::Accessors::Radio.new(self, locator)
       end
+	  
+      def label(locator)
+        Mohawk::Accessors::Label.new(self, locator)
+      end
+
+      def menu_item(locator)
+        Mohawk::Accessors::MenuItem.new(self, locator)
+      end
+
+      def table(locator)
+        Mohawk::Accessors::Table.new(self, locator)
+      end
+
+      def tree_view(locator)
+        Mohawk::Accessors::TreeView.new(self, locator)
+      end
     end
   end
 end

data/lib/mohawk/navigation.rb

@@ -1,9 +1,10 @@
 module Mohawk
   module Navigation
     def on(cls, &block)
-      @screen = cls.new
-      block.call @screen if block
-      @screen
+      screen = cls.new
+      screen.wait_until_present
+      block.call screen if block
+      screen
     end
   end
 end

data/lib/mohawk/version.rb

@@ -1,3 +1,3 @@
 module Mohawk
-  VERSION = "0.0.1"
+  VERSION = "0.0.2"
 end

data/mohawk.gemspec

@@ -17,8 +17,10 @@ Gem::Specification.new do |gem|
   gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
   gem.require_paths = ["lib"]
 
-  gem.add_dependency 'rautomation'
+  gem.add_dependency 'rautomation', '>= 0.8.0'
 
-  gem.add_development_dependency 'childprocess'
+  gem.add_development_dependency 'cucumber'
   gem.add_development_dependency 'rspec'
+  gem.add_development_dependency 'rake'
+  gem.add_development_dependency 'childprocess'
 end

data/spec/lib/mohawk/accessors/combo_spec.rb

@@ -5,6 +5,11 @@ class ComboBoxScreen
   window(:id => nil)
   
   combo_box(:nacho_combos, :id => "comboBoxId")
+  dropdown(:my_default, :id => "defaultAliasId")
+  dropdown(:my_combobox, :id => "comboboxAliasId")
+  dropdown(:my_dropdown, :id => "dropdownAliasId")
+  dropdown(:my_drop_down, :id => "drop_downAliasId")
+  dropdown(:my_select_list, :id => "select_listAliasId")
 end
 
 class Option
@@ -24,11 +29,14 @@ describe Mohawk::Accessors::Combo do
 
   before(:each) do
     RAutomation::Window.stub(:new).and_return(window)
-    window.should_receive(:select_list).with(:id => "comboBoxId").and_return(combo_box_field)
   end
 
   context "accessing combo box controls" do
 
+    before(:each) do
+      window.should_receive(:select_list).with(:id => "comboBoxId").and_return(combo_box_field)
+    end
+
     it "knows the current selected item" do
       combo_box_field.should_receive(:value).and_return("Selected Item")
       screen.nacho_combos.should eq("Selected Item")
@@ -51,5 +59,24 @@ describe Mohawk::Accessors::Combo do
     end
 
   end
+
+  context "aliases for combo_box" do
+    let(:null_combo) { double("Null ComboBox Field").as_null_object }
+    let(:combo_aliases) { ["default", "combobox", "dropdown", "drop_down", "select_list"] }
+
+    def expected_alias(id)
+      window.should_receive(:select_list).with(:id => "#{id}AliasId").ordered.and_return(null_combo)
+    end
+
+    it "has many aliases" do
+      combo_aliases.each do |which_alias|
+        expected_alias which_alias
+      end
+
+      combo_aliases.each do |which_alias|
+        screen.send "my_#{which_alias}"
+      end
+    end
+  end
 end
 

data/spec/lib/mohawk/accessors/label_spec.rb

@@ -0,0 +1,25 @@
+require 'spec_helper'
+
+class LabelScreen
+	include Mohawk
+	
+	window(:title => nil)
+	label(:label_control, :id => "labelID")
+end
+
+describe Mohawk::Accessors::Label do
+	let(:screen) { LabelScreen.new }
+	let(:window) { double("RAutomation Window") }
+	let(:label_control) { double("Label Control") }
+	
+	before(:each) do
+		RAutomation::Window.stub(:new).and_return(window)
+		window.should_receive(:label).with(:id => "labelID").and_return(label_control)
+	end
+	
+	it "can retrieve the label value" do
+		label_control.should_receive(:value).and_return("some string")
+		screen.label_control.should eq("some string")
+	end
+
+end

data/spec/lib/mohawk/accessors/menu_spec.rb

@@ -0,0 +1,32 @@
+require 'spec_helper'
+
+class MenuItemScreen
+  include Mohawk
+  window(:id => nil)
+  
+  menu_item(:the_menu_item, :path => ["Path", "To", "Some Menu", "Item"])
+end
+
+describe Mohawk::Accessors::MenuItem do
+  let(:screen) { MenuItemScreen.new }
+  let(:window) { double("RAutomation Window") }
+  let(:menu) { double("RAutomation Menu Item") }
+
+  before(:each) do
+    RAutomation::Window.stub(:new).and_return(window)
+  end
+
+  context "selecting menu items" do
+    before(:each) do
+      window.should_receive(:menu).with(:text => "Path").and_return(menu)
+    end
+
+    it "can open a menu item" do
+      menu.should_receive(:menu).with(:text => "To").and_return(menu)
+      menu.should_receive(:menu).with(:text => "Some Menu").and_return(menu)
+      menu.should_receive(:menu).with(:text => "Item").and_return(menu)
+      menu.should_receive(:open)
+      screen.the_menu_item
+    end
+  end
+end

data/spec/lib/mohawk/accessors/table_spec.rb

@@ -0,0 +1,96 @@
+require 'spec_helper'
+
+class TableScreen
+  include Mohawk
+  window(:id => nil)
+
+  table(:top, :id => "tableId")
+
+  # aliases
+  table(:my_default, :id => "defaultAliasId")
+  listview(:my_listview, :id => "listviewAliasId")
+  list_view(:my_list_view, :id => "list_viewAliasId")
+end
+
+class FakeTableRow
+  attr_reader :text, :row
+  def initialize(text, row)
+    @text = text
+    @row = row
+  end
+end
+
+describe Mohawk::Accessors::Table do
+  let(:screen) { TableScreen.new }
+  let(:window) { double("RAutomation Window") }
+  let(:table) { double("Table") }
+
+  before(:each) do
+    RAutomation::Window.stub(:new).and_return(window)
+  end
+
+  context "working with table controls" do
+    before(:each) do
+      window.should_receive(:table).with(:id => "tableId").and_return(table)
+    end
+
+    it "can set a value by index" do
+      table.should_receive(:select).with(1)
+      screen.top = 1
+    end
+
+    it "has rows" do
+      fake_rows = [FakeTableRow.new("First Row", 0), FakeTableRow.new("Second Row", 1)]
+      expected_rows = fake_rows.map {|r| {:text => r.text, :row => r.row} }
+      table.should_receive(:rows).and_return(fake_rows)
+      expected_rows.should eq(screen.top_rows)
+    end
+
+    it "can return the raw view" do
+      screen.top_view.should_not be_nil
+    end
+
+    describe Mohawk::Accessors::Table::Row do
+      let(:table_row) { double("RAutomation Table::Row") }
+
+      before(:each) do
+        table.should_receive(:row).with(:index => 0).and_return(table_row)
+        table_row.stub(:row).and_return 0
+      end
+
+      it "can get an individual row" do
+        screen.top_row(0).should_not be_nil
+      end
+
+      it "knows if it is selected" do
+        table.should_receive(:selected?).with(0).and_return(true)
+        screen.top_row(0).should be_selected
+      end
+
+      it "has cells" do
+        expected_cells = [FakeTableRow.new("Item 1", 0), FakeTableRow.new("Item 2", 1)]
+        table_row.should_receive(:cells).and_return(expected_cells)
+        screen.top_row(0).cells.should eq expected_cells.map &:text
+      end
+    end
+  end
+
+  context "aliases for table" do
+    let(:null_table) { double("Null ComboBox Field").as_null_object }
+    let(:table_aliases) { ["default", "listview", "list_view"] }
+
+    def expected_alias(id)
+      window.should_receive(:table).with(:id => "#{id}AliasId").ordered.and_return(null_table)
+    end
+
+    it "has many aliases" do
+      table_aliases.each do |which_alias|
+        expected_alias which_alias
+      end
+
+      table_aliases.each do |which_alias|
+        screen.send "my_#{which_alias}_view"
+      end
+    end
+  end
+end

data/spec/lib/mohawk/accessors/text_spec.rb

@@ -11,6 +11,7 @@ describe Mohawk::Accessors::Text do
   let(:screen) { TextScreen.new }
   let(:window) { double("RAutomation Window") }
   let(:text_field) { double("Text Field") }
+  let(:text_field_window) { double("Text Field Window") }
 
   before(:each) do
     RAutomation::Window.stub(:new).and_return(window)
@@ -34,5 +35,13 @@ describe Mohawk::Accessors::Text do
       screen.clear_text_id
     end
 
+    it "enters the text" do
+      text_field.should_receive(:hwnd).and_return 123
+      window.should_receive(:child).with(:hwnd => 123).and_return(text_field_window)
+      text_field_window.should_receive(:send_keys).with("entered text".split(//))
+
+      screen.enter_text_id "entered text"
+    end
+
   end
 end

data/spec/lib/mohawk/accessors/tree_view_spec.rb

@@ -0,0 +1,86 @@
+require 'spec_helper'
+
+class TreeViewScreen
+  include Mohawk
+  window(:id => nil)
+
+  tree_view(:oak, :id => "treeViewId")
+
+  # aliases
+  tree_view(:my_default, :id => "defaultAliasId")
+  treeview(:my_treeview, :id => "treeviewAliasId")
+  tree(:my_tree, :id => "treeAliasId")
+end
+
+class FakeTreeItem
+  attr_reader :text
+
+  def initialize(item_text)
+    @text = item_text
+  end
+end
+
+describe Mohawk::Accessors::TreeView do
+  let(:screen) { TreeViewScreen.new }
+  let(:window) { double("RAutomation Window") }
+  let(:tree_field) { double("TreeView Field") }
+
+  before(:each) do
+    RAutomation::Window.stub(:new).and_return(window)
+  end
+
+  context "working with TreeView controls" do
+    before(:each) do
+      window.should_receive(:select_list).with(:id => "treeViewId").and_return(tree_field)
+    end
+
+    it "has a value" do
+      tree_field.should_receive(:value).and_return("tree value")
+      screen.oak.should eq "tree value"
+    end
+
+    it "can select items by index" do
+      tree_field.should_receive(:select).with(7)
+      screen.oak = 7
+    end
+
+    it "can select items by their value" do
+      tree_field.should_receive(:set).with("item value")
+      screen.oak = "item value"
+    end
+
+    it "can return the tree items" do
+      tree_field.should_receive(:options).and_return([FakeTreeItem.new("Item One"), FakeTreeItem.new("Item Two")])
+      screen.oak_items.should eq ["Item One", "Item Two"]
+    end
+
+    it "can expand items" do
+      tree_field.should_receive(:expand).with(7)
+      screen.expand_oak_item 7
+    end
+
+    it "can collapse items" do
+      tree_field.should_receive(:collapse).with("some item")
+      screen.collapse_oak_item "some item"
+    end
+  end
+
+  context "aliases for tree_view" do
+    let(:null_tree_view) { double("Null TreeView Field").as_null_object }
+    let(:tree_view_aliases) { ["default", "treeview", "tree"] }
+
+    def expected_alias(id)
+      window.should_receive(:select_list).with(:id => "#{id}AliasId").ordered.and_return(null_tree_view)
+    end
+
+    it "has many aliases" do
+      tree_view_aliases.each do |which_alias|
+        expected_alias which_alias
+      end
+
+      tree_view_aliases.each do |which_alias|
+        screen.send "my_#{which_alias}"
+      end
+    end
+  end
+end