rautomation 0.6.3 → 0.7.0

data/.gitignore

@@ -0,0 +1,34 @@
+## MAC OS
+.DS_Store
+
+## TEXTMATE
+*.tmproj
+tmtags
+
+## EMACS
+*~
+\#*
+.\#*
+
+## VIM
+*.swp
+
+## PROJECT::GENERAL
+coverage
+rdoc
+pkg
+
+## PROJECT::SPECIFIC
+.idea/*
+
+.yardoc/
+doc/
+
+## VisualStudio
+Debug
+Release
+ipch
+*.sdf
+*.user
+!ext/IAccessibleDLL/Release/*.dll
+

data/Gemfile

@@ -0,0 +1,3 @@
+source :rubygems
+
+gemspec

data/Gemfile.lock

@@ -0,0 +1,24 @@
+PATH
+  remote: .
+  specs:
+    rautomation (0.7.0)
+
+GEM
+  remote: http://rubygems.org/
+  specs:
+    diff-lcs (1.1.3)
+    rspec (2.8.0)
+      rspec-core (~> 2.8.0)
+      rspec-expectations (~> 2.8.0)
+      rspec-mocks (~> 2.8.0)
+    rspec-core (2.8.0)
+    rspec-expectations (2.8.0)
+      diff-lcs (~> 1.1.2)
+    rspec-mocks (2.8.0)
+
+PLATFORMS
+  x86-mingw32
+
+DEPENDENCIES
+  rautomation!
+  rspec (~> 2.3)

data/History.rdoc

@@ -1,3 +1,24 @@
+== Version 0.7.0 / 2012-xx-xx
+
+=== All adapters
+
+  * renamed WinFfi adapter to Win32 adapter
+  * added experimental MsUia adapter
+  * added support for JRuby
+  * Window.windows accepts locators too
+  * added Window#class_names for retrieving internal class names of the window and it's controls
+  * default locator is :index => 0 when nothing else specified
+
+=== Win32 adapter
+
+  * Window#send_keys has now syntax similar to WatirSpec (https://github.com/watir/watirspec/blob/master/element_spec.rb#L206-249)
+  * added TextField#send_keys
+
+=== AutoIt adapter
+
+  * added Window#mouse_move, #mouse_click, #mouse_position, #press_mouse and #release_mouse methods for AutoIt adapter
+
+
 == Version 0.6.3 / 2011-07-16
 
   * use current window's handle (hwnd) in WinFfi::Window#child method

data/LICENSE

@@ -1,4 +1,4 @@
-Copyright (c) 2010-2011 Jarmo Pertman
+Copyright (c) 2010-2012 Jarmo Pertman
 
 Permission is hereby granted, free of charge, to any person obtaining
 a copy of this software and associated documentation files (the

data/README.rdoc

@@ -3,7 +3,7 @@
 * Web: http://www.github.com/jarmo/RAutomation
 * Author: Jarmo Pertman (mailto:jarmo.p[at]gmail.com)
 
-== DESCRIPTION
+{<img alt='Click here to lend your support to: RAutomation and make a donation at www.pledgie.com !' src='https://www.pledgie.com/campaigns/16196.png?skin_name=chrome' />}[https://www.pledgie.com/campaigns/16196]
 
 RAutomation is a small and easy to use library for helping out to automate windows and their controls
 for automated testing.
@@ -35,7 +35,7 @@ RAutomation provides:
     window = RAutomation::Window.new(:title => /part of the title/i)
     windows = window.windows
     puts windows.size # => 2
-    windows.map {|window| window.title } # => ["part of the title 1", "part of the title 2"]
+    windows.map &:title # => ["part of the title 1", "part of the title 2"]
     
     window.windows(:title => /part of other title/i) # => all windows with matching specified title
     
@@ -52,12 +52,12 @@ Check out the documentation for other possible usages!
 
 === Windows
 
-1. gem install rautomation
-2. create script and run it
+    gem install rautomation
 
 Available adapters:
-* :ffi - uses Windows API directly with FFI (default)
+* :win_32 - uses Windows API directly with FFI (default)
 * :autoit - uses AutoIt for automation
+* :ms_uia - an experimental adapter
 
 When using AutoIt adapter:
 You might need administrative privileges if running for the first time and you haven't installed AutoIt before!
@@ -96,7 +96,8 @@ In case of any problems, feel free to contact me.
 
 == Contributors
 
-* Stephan Schwab to WinFfi adapter - http://github.com/snscaimito
+* Stephan Schwab - http://github.com/snscaimito
+* Eric Kessler - http://github.com/enkessler
 
 == Note on Patches/Pull Requests
 
@@ -111,4 +112,4 @@ In case of any problems, feel free to contact me.
 
 == Copyright
 
-Copyright (c) 2010-2011 Jarmo Pertman. See LICENSE for details.
+Copyright (c) 2010-2012 Jarmo Pertman. See LICENSE for details.

data/Rakefile

@@ -1,43 +1,33 @@
 require 'rubygems'
-require 'rake'
+require 'bundler'
 
-begin
-  require 'jeweler'
-  Jeweler::Tasks.new do |gem|
-    gem.name = "rautomation"
-    gem.summary = %Q{Automate windows and their controls through user-friendly API with Ruby}
-    gem.description = %Q{RAutomation is a small and easy to use library for helping out to automate windows and their controls
-for automated testing.
+Bundler::GemHelper.install_tasks
 
-RAutomation provides:
-* Easy to use and user-friendly API (inspired by Watir http://www.watir.com)
-* Cross-platform compatibility
-* Easy extensibility - with small scripting effort it's possible to add support for not yet
-  supported platforms or technologies}
-    gem.email = "jarmo.p@gmail.com"
-    gem.homepage = "http://github.com/jarmo/RAutomation"
-    gem.authors = ["Jarmo Pertman"]
-    gem.add_development_dependency "rspec", "~>2.3"
+task :default => "spec:all"
 
-    ignored_files = []
-    ignored_files << ".gitignore" << ".gemspec" << "features" << "IAccessibleDLL.sdf"
-    gem.files = `git ls-files`.strip.split($/).delete_if {|f| f =~ Regexp.union(*ignored_files)}
+namespace :spec do
+  require 'rspec/core/rake_task'
+  RSpec::Core::RakeTask.new(:spec)
+
+  RSpec::Core::RakeTask.new(:rcov) do |spec|
+    spec.rcov = true
   end
-  Jeweler::GemcutterTasks.new
-rescue LoadError
-  puts "Jeweler (or a dependency) not available. Install it with: gem install jeweler"
-end
 
-require 'rspec/core/rake_task'
-RSpec::Core::RakeTask.new(:spec)
+  adapters = %w[win_32 autoit ms_uia]
+  adapters.each do |adapter|
+    desc "Run specs against #{adapter} adapter"
+    task adapter do
+      ENV["RAUTOMATION_ADAPTER"] = adapter
+      puts "Running specs for adapter: #{adapter}"
+      task = Rake::Task["spec:spec"]
+      task.reenable
+      task.invoke      
+    end
+  end
 
-RSpec::Core::RakeTask.new(:rcov) do |spec|
-  spec.rcov = true
+  desc "Run specs against all adapters"
+  task :all => adapters.map {|a| "spec:#{a}"}
 end
 
-task :spec => :check_dependencies
-
-task :default => :spec
-
 require 'yard'
 YARD::Rake::YardocTask.new

data/VERSION

@@ -1 +1 @@
-0.6.3
+0.7.0

data/ext/UiaDll/UiaDll/UiaDll.cpp

@@ -29,6 +29,32 @@ __declspec( dllexport ) IUIAutomationElement *RA_FindWindow(char *pszAutomationI
 	return NULL ;
 }
 
+//This doesn't work
+extern "C"
+__declspec( dllexport ) int RA_FindWindowByPID(int processId, IUIAutomationElement *pElement) {
+	IUIAutomationElement *pRootElement;
+
+	HRESULT hr = getGlobalIUIAutomation()->GetRootElement(&pRootElement);
+	if (SUCCEEDED(hr)) {
+		IUIAutomationCondition *pCondition;
+		VARIANT varProperty;
+
+		VariantInit(&varProperty);
+		varProperty.vt = VT_I4;
+		varProperty.intVal = (processId);
+
+		hr = getGlobalIUIAutomation()->CreatePropertyCondition(UIA_ProcessIdPropertyId, varProperty, &pCondition);
+		if (SUCCEEDED(hr)) {
+
+			hr = pRootElement->FindFirst(TreeScope_Children, pCondition, &pElement);
+			if (SUCCEEDED(hr)) {
+				return 1;
+			}
+		}
+	}
+	return 0;
+}
+
 extern "C"
 __declspec( dllexport ) BOOL RA_IsOffscreen(IUIAutomationElement *pElement) {
 	BOOL isOffscreen ;
@@ -50,6 +76,37 @@ __declspec ( dllexport ) IUIAutomationElement *RA_ElementFromHandle(HWND hwnd) {
 	}
 }
 
+extern "C"
+__declspec ( dllexport ) IUIAutomationElement *RA_GetFocusedElement() {
+	IUIAutomationElement *pelement;
+	
+	HRESULT hr = getGlobalIUIAutomation()->GetFocusedElement(&pelement);
+	
+	if (SUCCEEDED(hr))
+		return pelement;
+	else {
+		printf("RA_GetFocusedElement: Cannot find element from focus. HRESULT was 0x%x\r\n", hr) ;
+		return false ;
+	}
+}
+
+extern "C"
+__declspec ( dllexport ) IUIAutomationElement *RA_ElementFromPoint(int xCoord, int yCoord) {
+	IUIAutomationElement *pElement ;
+	POINT point;
+
+	point.x = xCoord;
+	point.y = yCoord;
+
+	HRESULT hr = getGlobalIUIAutomation()->ElementFromPoint(point, &pElement) ;
+	if (SUCCEEDED(hr))
+		return pElement ;
+	else {
+		printf("RA_ElementFromPoint: Cannot find element from point %d , %d. HRESULT was 0x%x\r\n", xCoord, yCoord, hr) ;
+		return NULL ;
+	}
+}
+
 extern "C" __declspec ( dllexport ) IUIAutomationElement *RA_FindChildById(IUIAutomationElement *pElement, char *automationId) {
 	IUIAutomationCondition *pCondition ;
 	VARIANT varProperty ;
@@ -78,6 +135,34 @@ extern "C" __declspec ( dllexport ) IUIAutomationElement *RA_FindChildById(IUIAu
 	}
 }
 
+extern "C" __declspec ( dllexport ) IUIAutomationElement *RA_FindChildByName(IUIAutomationElement *pElement, char *elementName) {
+	IUIAutomationCondition *pCondition ;
+	VARIANT varProperty ;
+
+	VariantInit(&varProperty) ;
+	varProperty.vt = VT_BSTR ;
+	varProperty.bstrVal = _bstr_t(elementName) ;
+
+	HRESULT hr = getGlobalIUIAutomation()->CreatePropertyCondition(UIA_NamePropertyId, varProperty, &pCondition) ;
+	if (SUCCEEDED(hr)) {
+		IUIAutomationElement *pFound ;
+
+		hr = pElement->FindFirst(TreeScope_Descendants, pCondition, &pFound) ;
+		if (SUCCEEDED(hr)) {
+			if (pFound == NULL)
+				printf("RA_FindChildByName: Element with automation name %s was not found\r\n", elementName) ;
+			    //printf("RA_FindChildByName: success with value %s\r\n", elementName) ;
+			return pFound ;
+		} else {
+			printf("RA_FindChildByName: FindFirst for children looking for %s failed. hr = 0x%x\r\n", elementName, hr) ;
+			return NULL ;
+		}
+	} else {
+		printf("RA_FindChildByName: Cannot create search condition. hr = 0x%x\r\n", hr) ;
+		return NULL ;
+	}
+}
+
 extern "C" __declspec ( dllexport ) HWND RA_CurrentNativeWindowHandle(IUIAutomationElement *pElement) {
 	UIA_HWND uia_hwnd ;
 
@@ -90,6 +175,21 @@ extern "C" __declspec ( dllexport ) HWND RA_CurrentNativeWindowHandle(IUIAutomat
 	return (HWND)uia_hwnd ;
 }
 
+extern "C" __declspec ( dllexport ) int RA_GetCurrentProcessId(IUIAutomationElement *pElement) {
+	HRESULT hr;
+	int process_id;
+
+	hr = pElement->get_CurrentProcessId(&process_id);
+
+    if  (SUCCEEDED(hr)){
+		return process_id;
+	}
+	else {
+		printf("RA_GetCurrentProcessId: get_CurrentProcessId returned 0x%x\r\n", hr) ;
+		return 0 ;
+	}
+}
+
 extern "C" __declspec ( dllexport ) BOOL RA_SetFocus(IUIAutomationElement *pElement) {
 	HRESULT hr = pElement->SetFocus() ;
 	if (hr != S_OK)
@@ -110,6 +210,59 @@ extern "C" __declspec ( dllexport ) int RA_GetCurrentControlType(IUIAutomationEl
 	}
 }
 
+extern "C" __declspec ( dllexport ) long RA_ClickMouse() {
+	mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
+    mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
+	return 0;
+}
+
+extern "C" __declspec ( dllexport ) long RA_MoveMouse(int x, int y) {
+	return SetCursorPos(x,y);
+}
+
+extern "C" __declspec ( dllexport ) long RA_GetDesktopHandle() {
+	return (long)GetDesktopWindow();
+}
+
+extern "C" __declspec ( dllexport ) int RA_CurrentBoundingRectangle(IUIAutomationElement *pElement, long *rectangle) {
+	RECT boundary;
+
+	HRESULT hr = pElement->get_CurrentBoundingRectangle(&boundary) ;
+	if (SUCCEEDED(hr)) {
+	
+		rectangle[0] = boundary.left;
+		rectangle[1] = boundary.top;
+		rectangle[2] = boundary.right;
+		rectangle[3] = boundary.bottom;
+
+		return 1;
+	}
+	else {
+		printf("RA_CurrentBoundingRectangle: get_CurrentBoundingRectangle failed 0x%x\r\n", hr) ;
+		return 0 ;
+	}
+}
+
+extern "C" __declspec ( dllexport ) int RA_CurrentIsOffscreen(IUIAutomationElement *pElement, int *visible) {
+	BOOL offscreen;
+
+	HRESULT hr = pElement->get_CurrentIsOffscreen(&offscreen) ;
+	if (SUCCEEDED(hr)) {
+		if(offscreen){
+		  *visible = 1;
+		}
+		else
+		{
+		  *visible = 0;
+		}
+		return 1;
+	}
+	else {
+		printf("RA_CurrentIsOffscreen: get_CurrentIsOffscreen failed 0x%x\r\n", hr) ;
+		return 0 ;
+	}
+}
+
 extern "C" __declspec ( dllexport ) int RA_FindChildren(IUIAutomationElement *pElement, IUIAutomationElement *pChildren[]) {
 	IUIAutomationCondition *pTrueCondition ;
 	IUIAutomationElementArray *pElementArray ;
@@ -153,21 +306,50 @@ extern "C" __declspec ( dllexport ) int RA_FindChildren(IUIAutomationElement *pE
 extern "C" __declspec ( dllexport ) int RA_GetName(IUIAutomationElement *pElement, char *pName) {
 	BSTR bstrName ;
 	HRESULT hr = pElement->get_CurrentName(&bstrName) ;
+
 	if (FAILED(hr)) {
 		printf("RA_GetName: get_CurrentName failed 0x%x\r\n", hr) ;
-		return 0 ;
+		return -1 ;
 	}
 
 	char *pszName = _com_util::ConvertBSTRToString(bstrName) ;
-	if (pName == NULL) {
-		return strlen(pszName) ;
+
+	if (pszName != NULL){
+		if (pName == NULL) {
+			return strlen(pszName) ;
+		} else {
+			strcpy(pName, pszName) ;
+			return strlen(pszName) ;
+		}
 	} else {
-		strcpy(pName, pszName) ;
-		return strlen(pszName) ;
+		return -1;
 	}
 }
 
-extern "C" __declspec ( dllexport ) BOOL RA_GetIsSelected(IUIAutomationElement *pElement, int *pResult) {
+extern "C" __declspec ( dllexport ) int RA_GetClassName(IUIAutomationElement *pElement, char *pClass) {
+	BSTR bstrClass ;
+	HRESULT hr = pElement->get_CurrentClassName(&bstrClass) ;
+
+	if (FAILED(hr)) {
+		printf("RA_GetName: get_CurrentClassName failed 0x%x\r\n", hr) ;
+		return -1 ;
+	}
+
+	char *pszClass = _com_util::ConvertBSTRToString(bstrClass) ;
+
+	if (pszClass != NULL){
+		if (pClass == NULL) {
+			return strlen(pszClass) ;
+		} else {
+			strcpy(pClass, pszClass) ;
+			return strlen(pszClass) ;
+		}
+	} else {
+		return -1;
+	}
+}
+
+extern "C" __declspec ( dllexport ) BOOL RA_GetIsSelected(IUIAutomationElement *pElement) {
 	ISelectionItemProvider *pSelectionPattern ;
 	HRESULT hr = pElement->GetCurrentPattern(UIA_SelectionItemPatternId, (IUnknown**)&pSelectionPattern) ;
 	
@@ -176,14 +358,13 @@ extern "C" __declspec ( dllexport ) BOOL RA_GetIsSelected(IUIAutomationElement *
 		return FALSE ;
 	}
 
-	BOOL pRetVal ;
-	hr = pSelectionPattern->get_IsSelected(&pRetVal) ;
+	BOOL RetVal ;
+	hr = pSelectionPattern->get_IsSelected(&RetVal) ;
 	if (FAILED(hr)) {
 		printf("RA_GetIsSelected: get_IsSelected failed 0x%x\r\n", hr) ;
 		return FALSE ;
 	} else {
-		*pResult = pRetVal ;
-		return TRUE ;
+		return RetVal ;
 	}
 }
 
@@ -203,3 +384,48 @@ extern "C" __declspec ( dllexport ) int RA_Select(IUIAutomationElement *pElement
 
 	return 1;
 }
+
+extern "C" __declspec ( dllexport ) int RA_Set_Value(IUIAutomationElement *pElement, char *pValue) {
+	IValueProvider *pValuePattern ;
+	HRESULT hr = pElement->GetCurrentPattern(UIA_ValuePatternId, (IUnknown**)&pValuePattern) ;
+	
+	if (FAILED(hr)) {
+		printf("RA_Set_Value: getCurrentPattern failed 0x%x\r\n") ;
+		return 0 ;
+	}
+
+	BSTR unicodestr;
+	
+	int lenA = lstrlenA(pValue);
+    int lenW = ::MultiByteToWideChar(CP_ACP, 0, pValue, lenA, 0, 0);
+
+    if (lenW > 0)
+    {
+      unicodestr = ::SysAllocStringLen(0, lenW);
+      ::MultiByteToWideChar(CP_ACP, 0, pValue, lenA, unicodestr, lenW);
+    }
+    else
+    {
+       printf("RA_Set_Value: conversion to unicode string failed\r\n");
+    }
+
+	hr = pValuePattern->SetValue(unicodestr);
+    ::SysFreeString(unicodestr);
+
+	
+
+	if (FAILED(hr)) {
+		printf("RA_SetValue: SetValue failed 0x%x\r\n", hr) ;
+		return 0 ;
+	}
+
+	//It'd be great if this worked
+	/*hr = UiaRaiseAutomationEvent((IRawElementProviderSimple*) pElement, UIA_Selection_InvalidatedEventId);
+	if (FAILED(hr)) {
+		printf("RA_SetValue: UiaRaiseAutomationEvent failed 0x%x\r\n", hr) ;
+		return 0 ;
+	}*/
+
+	return 1;
+}
+