rautomation 0.5.1 → 0.6.0

data/History.rdoc

@@ -1,3 +1,17 @@
+=== Version 0.6.0 / 2011-07-03
+
+=== WinFFI adapter
+
+* Window#send_keys now accepts only String argument similar to AutoIt's Send function.
+* added Table#strings, #select, #selected? methods.
+* added Label element support with #value method.
+* added #has_focus? and #set_focus methods to controls.
+* added possibility to search controls by automation id as :id.
+* added #enabled? and #disabled? methods for controls.
+* added Window#control and #controls methods for accessing controls generally.
+* added SelectList#option method.
+* added ListBox element support with #count, #items, #exist?, #selected? and #select methods.
+
 === Version 0.5.1 / 2011-01-30
 
 === All adapters

data/README.rdoc

@@ -25,7 +25,7 @@ RAutomation provides:
     window.text # => "Lorem ipsum dolor sit amet, consectetur adipiscing elit. Donec ultricies..."
     
     window.text_field(:class => "Edit", :index => 0).set "hello, world!"
-    button = window.button(:text => "&Save")
+    button = window.button(:value => "&Save")
     button.exists? # => true
     button.click
     

data/VERSION

@@ -1 +1 @@
-0.5.1
+0.6.0

data/ext/IAccessibleDLL/IAccessibleDLL/IAccessibleDLL.cpp

@@ -1,13 +1,7 @@
 // IAccessibleDLL.cpp : Defines the exported functions for the DLL application.
 //
 
-#undef UNICODE
-
 #include "stdafx.h"
-#include <windows.h>
-#include <objbase.h>
-#include <OleAcc.h>
-#include <Commctrl.h>
 
 extern "C"
 __declspec( dllexport ) long get_button_state(HWND buttonHwnd) {

data/ext/IAccessibleDLL/IAccessibleDLL/IAccessibleDLL.vcxproj

@@ -70,6 +70,7 @@
       <GenerateDebugInformation>true</GenerateDebugInformation>
       <EnableCOMDATFolding>true</EnableCOMDATFolding>
       <OptimizeReferences>true</OptimizeReferences>
+      <AdditionalDependencies>oleacc.lib;comsuppw.lib;kernel32.lib;user32.lib;gdi32.lib;winspool.lib;comdlg32.lib;advapi32.lib;shell32.lib;ole32.lib;oleaut32.lib;uuid.lib;odbc32.lib;odbccp32.lib;%(AdditionalDependencies)</AdditionalDependencies>
     </Link>
   </ItemDefinitionGroup>
   <ItemGroup>
@@ -93,6 +94,7 @@
       <PrecompiledHeader Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">Create</PrecompiledHeader>
       <PrecompiledHeader Condition="'$(Configuration)|$(Platform)'=='Release|Win32'">Create</PrecompiledHeader>
     </ClCompile>
+    <ClCompile Include="table_support.cpp" />
   </ItemGroup>
   <Import Project="$(VCTargetsPath)\Microsoft.Cpp.targets" />
   <ImportGroup Label="ExtensionTargets">

data/ext/IAccessibleDLL/IAccessibleDLL/IAccessibleDLL.vcxproj.filters

@@ -35,5 +35,8 @@
     <ClCompile Include="dllmain.cpp">
       <Filter>Source Files</Filter>
     </ClCompile>
+    <ClCompile Include="table_support.cpp">
+      <Filter>Source Files</Filter>
+    </ClCompile>
   </ItemGroup>
 </Project>

data/ext/IAccessibleDLL/IAccessibleDLL/stdafx.h

@@ -7,10 +7,16 @@
 
 #include "targetver.h"
 
-#define WIN32_LEAN_AND_MEAN             // Exclude rarely-used stuff from Windows headers
-// Windows Header Files:
-#include <windows.h>
+#include <stdlib.h>
 
+#define WIN32_LEAN_AND_MEAN             // Exclude rarely-used stuff from Windows headers
 
+#include <stdio.h>
+#include <tchar.h>
+#include <windows.h>
+#include <objbase.h>
+#include <OleAcc.h>
+#include <Commctrl.h>
+#include <comutil.h>
 
 // TODO: reference additional headers your program requires here

data/ext/IAccessibleDLL/IAccessibleDLL/table_support.cpp

@@ -0,0 +1,282 @@
+#include "stdafx.h"
+
+#define BUFFER_SIZE 255
+
+long get_number_of_rows(IAccessible *pAccessible) {
+	long count ;
+
+	pAccessible->get_accChildCount(&count) ;
+	return count ;
+}
+
+void get_name(long childId, IAccessible *pAccessible, char *itemText) {
+	BSTR bstrValue ;
+
+	VARIANT varIn ;
+	VariantInit(&varIn) ;
+	varIn.vt = VT_I4 ;
+	varIn.lVal = childId ;
+
+	if (pAccessible->get_accName(varIn, &bstrValue) == S_OK) {
+		char *pszName = _com_util::ConvertBSTRToString(bstrValue) ;
+		strcpy(itemText, pszName) ;
+		delete[] pszName ;
+		SysFreeString(bstrValue) ;
+	} else
+		strcpy(itemText, "\0") ;
+}
+
+HRESULT get_role(long childId, IAccessible *pAccessible, long *pRole) {
+	VARIANT varIn ;
+	VariantInit(&varIn) ;
+	varIn.vt = VT_I4 ;
+	varIn.lVal = childId ;
+
+	VARIANT varOut ;
+	VariantInit(&varOut) ;
+	varOut.vt = VT_I4 ;
+
+	HRESULT hr = pAccessible->get_accRole(varIn, &varOut) ;
+	*pRole = varOut.lVal ;
+
+	return hr ;
+}
+
+void get_role(long childId, IAccessible *pAccessible, char *itemText) {
+	long role ;
+
+	if (get_role(childId, pAccessible, &role) == S_OK) {
+		int roleTextMax = 255 ;
+		LPTSTR pRoleText = new TCHAR[roleTextMax] ;
+		GetRoleText(role, pRoleText, roleTextMax) ;
+
+		int lenSzRoleText = 255 ;
+		char *pszRoleText = new char[lenSzRoleText] ;
+		WideCharToMultiByte(CP_ACP, 0, pRoleText, wcslen(pRoleText) + 1, pszRoleText, lenSzRoleText, NULL, NULL) ;
+
+		sprintf(itemText, "0x%x, %s", role, pszRoleText) ;
+	}
+}
+
+void get_description(long childId, IAccessible *pAccessible, char *itemText) {
+	BSTR bstrValue ;
+
+	VARIANT varIn ;
+	VariantInit(&varIn) ;
+	varIn.vt = VT_I4 ;
+	varIn.lVal = childId ;
+
+	if (pAccessible->get_accDescription(varIn, &bstrValue) == S_OK) {
+		char *pszName = _com_util::ConvertBSTRToString(bstrValue) ;
+		strcpy(itemText, pszName) ;
+		delete[] pszName ;
+		SysFreeString(bstrValue) ;
+	} else
+		strcpy(itemText, "\0") ;
+}
+
+void walk_tree(IAccessible *pAccessible, char **pColumnHeaderNames, long *pColumnHeadersCount) {
+	HRESULT hr ;
+	long childCount ;
+
+	hr = pAccessible->get_accChildCount(&childCount) ;
+	if (FAILED(hr) || childCount == 0)
+		return ;
+
+	VARIANT *pChildVariants = new VARIANT[childCount] ;
+	long childrenFound ;
+	hr = AccessibleChildren(pAccessible, 0, childCount, pChildVariants, &childrenFound) ;
+	if (FAILED(hr))
+		return ;
+
+	for (int i=1; i < childrenFound + 1; i++) {
+		VARIANT vChild = pChildVariants[i] ;
+		if (vChild.vt == VT_DISPATCH) {
+			IDispatch *pDispatch = vChild.pdispVal ;
+			IAccessible *pChildAccessible = NULL ;
+			hr = pDispatch->QueryInterface(IID_IAccessible, (void**) &pChildAccessible) ;
+			if (hr == S_OK) {
+				walk_tree(pChildAccessible, pColumnHeaderNames, pColumnHeadersCount) ;
+
+				pChildAccessible->Release() ;
+			}
+
+			pDispatch->Release() ;
+		} else {
+			long role ;
+			get_role(i, pAccessible, &role) ;
+			if (role == 0x19) {
+				if (pColumnHeaderNames == NULL) {
+					*pColumnHeadersCount = *pColumnHeadersCount + 1 ;
+				} else {
+					char *headerName = (char *)malloc(sizeof(char) * BUFFER_SIZE) ;
+					get_name(i, pAccessible, headerName) ;
+					pColumnHeaderNames[i - 1] = headerName ;
+				}
+			}
+		}
+	}
+}
+
+void find_column_headers(IAccessible *pAccessible, char ***pHeaderNames, long *pColumns) {
+	long columns = 0 ;
+
+	walk_tree(pAccessible, NULL, &columns) ;
+
+	char **pHeaders = (char **)malloc(sizeof(char *) * columns) ;
+	walk_tree(pAccessible, pHeaders, &columns) ;
+
+	*pHeaderNames = pHeaders ;
+	*pColumns = columns ;
+}
+
+char *trimwhitespace(char *str) {   
+	char *end;    
+	// Trim leading space   
+	while(isspace(*str)) 
+		str++;    
+	if(*str == 0)  
+		// All spaces?     
+		return str;    
+	// Trim trailing space   
+	end = str + strlen(str) - 1;   
+	
+	while(end > str && isspace(*end)) 
+		end--;    // Write new null terminator  
+
+	*(end+1) = 0;   
+	
+	return str; 
+} 
+
+char* remove_column_header_name(char *columnName, char *item) {
+	int itemLen = strlen(item) ;
+	int columnNameLen = strlen(columnName) ;
+
+	if (itemLen > 0) {
+		char *newItem = (char *)malloc(sizeof(char *) * (itemLen - columnNameLen)) ; // still a bit too long
+
+		strcpy(newItem, item + columnNameLen + 2) ;  // :<space>
+
+		free(item) ;
+		return newItem ;
+	} else
+		return item ;
+}
+
+extern "C"
+__declspec( dllexport ) void get_table_strings(HMODULE oleAccModule, HWND controlHwnd, void **tableStrings, long *numberOfRowsOut, long *numberOfColumnsOut) {
+	// * to *[] to *[] to * string
+	IAccessible *pAccessible ;
+	LPFNACCESSIBLEOBJECTFROMWINDOW lpfnAccessibleObjectFromWindow ;
+
+	lpfnAccessibleObjectFromWindow = (LPFNACCESSIBLEOBJECTFROMWINDOW)GetProcAddress(oleAccModule, "AccessibleObjectFromWindow");
+
+	if (HRESULT hResult = lpfnAccessibleObjectFromWindow(controlHwnd, OBJID_CLIENT, IID_IAccessible, (void**)&pAccessible) == S_OK) {
+		int numberOfRows = get_number_of_rows(pAccessible) ;   // including the header
+		long numberOfColumns = 3 ;
+		char ***table_rows ;
+		char **pHeaderNames ;
+
+		find_column_headers(pAccessible, &pHeaderNames, &numberOfColumns) ;
+		
+		table_rows = (char ***)malloc(sizeof(char*) * numberOfRows) ;
+		table_rows[0] = pHeaderNames ;
+
+		for (int row = 1; row < numberOfRows; row++) {
+			char **table_row = (char **)malloc(sizeof(char*) * numberOfColumns) ;
+
+			char *mainItem = (char *)malloc(sizeof(char) * BUFFER_SIZE) ;
+			get_name(row, pAccessible, mainItem) ;
+
+			char *description = (char *)malloc(sizeof(char) * 2048) ;
+			get_description(row, pAccessible, description) ;
+
+			char *token ;
+			if (strlen(description) > 0)
+				token = strtok(description, ",") ;
+			else
+				token = NULL ;
+
+			for (int column = 0; column < numberOfColumns; column++) {
+				if (column == 0)
+					table_row[column] = mainItem ;
+				else {
+					char *item = (char *)malloc(sizeof(char) * BUFFER_SIZE) ;
+
+					if (token != NULL) {
+						strcpy(item, token) ;
+						token = strtok(NULL, ",") ;
+					} else
+						strcpy(item, "\0") ;
+
+					table_row[column] = remove_column_header_name(pHeaderNames[column], trimwhitespace(item)) ;
+				}
+			}
+
+			table_rows[row] = table_row ;
+		}
+
+		*tableStrings = table_rows ;
+		*numberOfRowsOut = numberOfRows ;
+		*numberOfColumnsOut = numberOfColumns ;
+	} else {
+		*numberOfRowsOut = 0 ;
+		*numberOfColumnsOut = 0 ;
+	}
+}
+
+extern "C"
+__declspec( dllexport ) void get_table_row_strings(HMODULE oleAccModule, HWND controlHwnd, void **pTableRow, long row, long *pColumns) {
+	long rows ;
+	long columns ;
+	char *tableStrings ;  // pointer to array
+
+	get_table_strings(oleAccModule, controlHwnd, (void **)&tableStrings, &rows, &columns) ;
+
+	*pTableRow = ((char ***)tableStrings)[row] ;
+	*pColumns = columns ;
+}
+
+extern "C"
+__declspec( dllexport ) void select_table_row(HMODULE oleAccModule, HWND controlHwnd, long row) {
+	IAccessible *pAccessible ;
+	LPFNACCESSIBLEOBJECTFROMWINDOW lpfnAccessibleObjectFromWindow ;
+
+	lpfnAccessibleObjectFromWindow = (LPFNACCESSIBLEOBJECTFROMWINDOW)GetProcAddress(oleAccModule, "AccessibleObjectFromWindow");
+
+	if (HRESULT hResult = lpfnAccessibleObjectFromWindow(controlHwnd, OBJID_CLIENT, IID_IAccessible, (void**)&pAccessible) == S_OK) {
+		VARIANT varChild ;
+		VariantInit(&varChild) ;
+		varChild.vt = VT_I4 ;
+		varChild.lVal = row ;
+
+		pAccessible->accSelect(SELFLAG_ADDSELECTION, varChild) ;
+	}
+}
+
+extern "C"
+__declspec( dllexport ) long get_table_row_state(HMODULE oleAccModule, HWND controlHwnd, long row) {
+	IAccessible *pAccessible ;
+	LPFNACCESSIBLEOBJECTFROMWINDOW lpfnAccessibleObjectFromWindow ;
+
+	lpfnAccessibleObjectFromWindow = (LPFNACCESSIBLEOBJECTFROMWINDOW)GetProcAddress(oleAccModule, "AccessibleObjectFromWindow");
+
+	if (HRESULT hResult = lpfnAccessibleObjectFromWindow(controlHwnd, OBJID_CLIENT, IID_IAccessible, (void**)&pAccessible) == S_OK) {
+		VARIANT varChild ;
+		VariantInit(&varChild) ;
+		varChild.vt = VT_I4 ;
+		varChild.lVal = row ;
+
+		VARIANT varState ;
+
+		HRESULT hr = pAccessible->get_accState(varChild, &varState) ;
+		if (hr == S_OK) {
+			if (varState.vt == VT_I4) {
+				return varState.lVal ;
+			} else
+				return FALSE ;
+		} else
+			return FALSE ;
+	}
+}

data/ext/ListViewExplorer/ListViewExplorer.sln

@@ -0,0 +1,20 @@
+
+Microsoft Visual Studio Solution File, Format Version 11.00
+# Visual C++ Express 2010
+Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "ListViewExplorer", "ListViewExplorer\ListViewExplorer.vcxproj", "{EF611F7A-863F-4062-AAD2-84D150F4D7C0}"
+EndProject
+Global
+	GlobalSection(SolutionConfigurationPlatforms) = preSolution
+		Debug|Win32 = Debug|Win32
+		Release|Win32 = Release|Win32
+	EndGlobalSection
+	GlobalSection(ProjectConfigurationPlatforms) = postSolution
+		{EF611F7A-863F-4062-AAD2-84D150F4D7C0}.Debug|Win32.ActiveCfg = Debug|Win32
+		{EF611F7A-863F-4062-AAD2-84D150F4D7C0}.Debug|Win32.Build.0 = Debug|Win32
+		{EF611F7A-863F-4062-AAD2-84D150F4D7C0}.Release|Win32.ActiveCfg = Release|Win32
+		{EF611F7A-863F-4062-AAD2-84D150F4D7C0}.Release|Win32.Build.0 = Release|Win32
+	EndGlobalSection
+	GlobalSection(SolutionProperties) = preSolution
+		HideSolutionNode = FALSE
+	EndGlobalSection
+EndGlobal

data/ext/ListViewExplorer/ListViewExplorer/ListViewExplorer.cpp

@@ -0,0 +1,174 @@
+// ListViewExplorer.cpp : Defines the entry point for the console application.
+//
+
+#include "stdafx.h"
+
+HWND ask_for_list_view_handle() {
+	HWND hwnd = 0 ;
+
+	printf("HWND of list view control: ") ;
+	scanf_s("%x", &hwnd) ;
+	while(getchar() != '\n') continue;
+
+	return hwnd ;
+}
+
+void print_acc_name(VARIANT varIn, IAccessible *pAccessible) {
+	BSTR bstrName ;
+
+	if (pAccessible->get_accName(varIn, &bstrName) == S_OK) {
+		char *pszName = _com_util::ConvertBSTRToString(bstrName) ;
+		printf("  Name: %s\r\n", pszName) ;
+		delete[] pszName ;
+		SysFreeString(bstrName) ;
+	} else
+		printf("  Name: not available\r\n") ;
+}
+
+void print_acc_value(VARIANT varIn, IAccessible *pAccessible) {
+	BSTR bstrValue ;
+
+	if (pAccessible->get_accValue(varIn, &bstrValue) == S_OK) {
+		char *pszValue = _com_util::ConvertBSTRToString(bstrValue) ;
+		printf("  Value: %s\r\n", pszValue) ;
+		delete[] pszValue ;
+		SysFreeString(bstrValue) ;
+	} else
+		printf("  Value: not available\r\n") ;
+}
+
+void print_acc_description(VARIANT varIn, IAccessible *pAccessible) {
+	BSTR bstrValue ;
+
+	if (pAccessible->get_accDescription(varIn, &bstrValue) == S_OK) {
+		char *pszValue = _com_util::ConvertBSTRToString(bstrValue) ;
+		printf("  Description: %s\r\n", pszValue) ;
+		delete[] pszValue ;
+		SysFreeString(bstrValue) ;
+	} else
+		printf("  Description: not available\r\n") ;
+}
+
+void print_acc_child_count(IAccessible *pAccessible) {
+	long count ;
+	pAccessible->get_accChildCount(&count) ;
+	printf("  Number of childs: %d\r\n", count) ;
+}
+
+void print_acc_role(VARIANT varIn, IAccessible *pAccessible) {
+	VARIANT varOut ;
+	VariantInit(&varOut) ;
+	varOut.vt = VT_I4 ;
+
+	pAccessible->get_accRole(varIn, &varOut) ;
+
+	int roleTextMax = 255 ;
+	LPTSTR pRoleText = new TCHAR[roleTextMax] ;
+	GetRoleText(varOut.lVal, pRoleText, roleTextMax) ;
+
+	int lenSzRoleText = 255 ;
+	char *pszRoleText = new char[lenSzRoleText] ;
+	WideCharToMultiByte(CP_ACP, 0, pRoleText, wcslen(pRoleText) + 1, pszRoleText, lenSzRoleText, NULL, NULL) ;
+
+	printf("  Role is %s\r\n", pszRoleText) ;
+}
+
+void print_properties(IAccessible *pAccessible, long childId) {
+	VARIANT varChild ;
+	VariantInit(&varChild) ;
+	varChild.vt = VT_I4 ;
+	varChild.lVal = childId ;
+
+	print_acc_name(varChild, pAccessible) ;
+	print_acc_value(varChild, pAccessible) ;
+	print_acc_role(varChild, pAccessible) ;
+	print_acc_description(varChild, pAccessible) ;
+
+	if (childId == CHILDID_SELF)
+		print_acc_child_count(pAccessible) ;
+}
+
+void iterate_over_childs(IAccessible *pAccessible) {
+	printf("Iterating over childs\r\n") ;
+
+	long childCount ;
+	pAccessible->get_accChildCount(&childCount) ;
+
+	for (int childId = 1; childId <= childCount; childId++) {
+		printf("Child number %d: ", childId) ;
+		VARIANT varChild ;
+		VariantInit(&varChild) ;
+		varChild.vt = VT_I4 ;
+		varChild.lVal = childId ;
+
+		IDispatch *pIDispatch ;
+		HRESULT hr = pAccessible->get_accChild(varChild, &pIDispatch) ;
+		if (hr == S_OK) {
+			printf("get_accChild returned S_OK. Now asking for IDispatch") ;
+			IAccessible *pChildIAccessible ;
+			pIDispatch->QueryInterface(IID_IAccessible, (void**)&pChildIAccessible) ;
+			print_properties(pChildIAccessible, CHILDID_SELF) ;
+		} else if (hr == S_FALSE) {
+			printf("Simple element\r\n") ;
+			print_properties(pAccessible, childId) ;
+		} else if (hr == E_INVALIDARG)
+			printf("Invalid argument\r\n") ;
+		else
+			printf("getAccChild returned %x\r\n", hr) ;
+	}
+}
+
+int _tmain(int argc, _TCHAR* argv[])
+{
+	printf("ListView Explorer\r\n") ;
+
+	HWND hwndListView = ask_for_list_view_handle() ;
+
+	HMODULE hModule = LoadLibraryA("oleacc.dll");
+	if (hModule == 0) {
+		printf("Cannot load oleacc.dll\r\n") ;
+		return 1 ;
+	}
+
+	long numberOfRows ;
+	long numberOfColumns ;
+	char ***tableStrings ;
+
+	get_table_strings(hModule, hwndListView, (char **)&tableStrings, &numberOfRows, &numberOfColumns) ;
+
+	printf("Now printing result\r\n") ;
+	for (int row = 0; row < numberOfRows; row++) {
+		for (int column = 0; column < numberOfColumns; column++) {
+			printf("row %d, col %d is '%s'\r\n", row, column, tableStrings[row][column]) ;
+			free(tableStrings[row][column]) ;
+		}
+		free(tableStrings[row]) ;
+	}
+
+
+	/*
+	printf("ListView Explorer\r\n") ;
+
+	HWND hwndListView = ask_for_list_view_handle() ;
+	IAccessible *pAccessible ;
+	LPFNACCESSIBLEOBJECTFROMWINDOW lpfnAccessibleObjectFromWindow ;
+
+	HMODULE hModule = LoadLibraryA("oleacc.dll");
+	if (hModule == 0) {
+		printf("Cannot load oleacc.dll\r\n") ;
+		return 1 ;
+	}
+
+	lpfnAccessibleObjectFromWindow = (LPFNACCESSIBLEOBJECTFROMWINDOW)GetProcAddress(hModule, "AccessibleObjectFromWindow");
+
+	if (HRESULT hResult = lpfnAccessibleObjectFromWindow(hwndListView, OBJID_CLIENT, IID_IAccessible, (void**)&pAccessible) == S_OK) {
+		printf("Got IAccessible\r\n") ;
+		print_properties(pAccessible, CHILDID_SELF) ;
+		iterate_over_childs(pAccessible) ;
+	} else
+		printf("Cannot retrieve IAccessible for window HWND %x. AccessibleObjectFromWindow returned %x\r\n", hwndListView, hResult) ;
+	*/
+
+	return 0;
+}
+