shlwapi test

Jürgen Schmied juergenschmied at lycos.de
Thu May 9 04:45:55 CDT 2002


dlls/shlwapi/test/*
some api-tests
---
juergen.schmied at debitel.net



-------------- next part --------------
--- /dev/null	Mon Mar  4 08:42:02 2002
+++ wine/dlls/shlwapi/tests/shlwapi_test.spec	Mon Apr 22 17:38:45 2002
@@ -0,0 +1,10 @@
+name    user32_test
+type    win32
+mode    cuiexe
+
+import user32.dll
+import advapi32.dll
+import kernel32.dll
+import ntdll.dll
+import shlwapi.dll
+
--- /dev/null	Mon Mar  4 08:42:02 2002
+++ wine/dlls/shlwapi/tests/shreg.c	Tue Apr 30 07:08:20 2002
@@ -0,0 +1,193 @@
+/* Unit test suite for SHReg* functions 
+ *
+ * Copyright 2002 Juergen Schmied
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+ */
+
+#include <assert.h>
+#include <stdlib.h>
+#include <stdio.h>
+
+#include "wine/test.h"
+#include "winbase.h"
+#include "winreg.h"
+#include "winuser.h"
+#include "wine/obj_base.h"
+#include "wine/obj_storage.h"
+#include "shlwapi.h"
+
+char * sTestpath1 = "%SYSTEMROOT%\\subdir1";
+char * sTestpath2 = "%USERPROFILE%\\subdir1";
+
+char sExpTestpath1[MAX_PATH];
+char sExpTestpath2[MAX_PATH];
+
+char * sEmptyBuffer ="0123456789";
+
+void create_test_entrys()
+{
+	HKEY hKey;
+
+	ok(!RegCreateKeyA(HKEY_CURRENT_USER, "Software\\Wine\\Test", &hKey), "");
+
+	if (hKey)
+	{
+           ok(!RegSetValueExA(hKey,"Test1",0,REG_EXPAND_SZ, sTestpath1, strlen(sTestpath1)), "");
+           ok(!RegSetValueExA(hKey,"Test2",0,REG_SZ, sTestpath1, strlen(sTestpath1)), "");
+           ok(!RegSetValueExA(hKey,"Test3",0,REG_EXPAND_SZ, sTestpath2, strlen(sTestpath2)), "");
+	   RegCloseKey(hKey);
+	}
+
+	ExpandEnvironmentStringsA(sTestpath1, sExpTestpath1, sizeof(sExpTestpath1));
+	ExpandEnvironmentStringsA(sTestpath2, sExpTestpath2, sizeof(sExpTestpath2));
+	ok(strlen(sExpTestpath2) > 25, "%USERPROFILE% is set to a short value on this machine. we cant perform all tests.");
+}
+
+void test_SHGetValue()
+{
+	DWORD dwSize;
+	DWORD dwType;
+	char buf[MAX_PATH];
+
+	strcpy(buf, sEmptyBuffer);
+	dwSize = MAX_PATH;
+	dwType = -1;
+	ok(! SHGetValueA(HKEY_CURRENT_USER, "Software\\Wine\\Test", "Test1", &dwType, buf, &dwSize), "");
+	ok( 0 == strcmp(sExpTestpath1, buf), "(%s)", buf);
+	ok( REG_SZ == dwType, "(%lx)", dwType);
+
+	strcpy(buf, sEmptyBuffer);
+	dwSize = MAX_PATH;
+	dwType = -1;
+	ok(! SHGetValueA(HKEY_CURRENT_USER, "Software\\Wine\\Test", "Test2", &dwType, buf, &dwSize), "");
+	ok( 0 == strcmp(sTestpath1, buf) , "(%s)", buf);
+	ok( REG_SZ == dwType , "(%lx)", dwType);
+}
+
+void test_SHGetTegPath()
+{
+	char buf[MAX_PATH];
+
+	strcpy(buf, sEmptyBuffer);
+	ok(! SHRegGetPathA(HKEY_CURRENT_USER, "Software\\Wine\\Test", "Test1", buf, 0), "");
+	ok( 0 == strcmp(sExpTestpath1, buf) , "(%s)", buf);
+}
+
+void test_SHQUeryVakueEx()
+{
+	HKEY hKey;
+	DWORD dwSize;
+	DWORD dwType;
+	char buf[MAX_PATH];
+	DWORD dwRet;
+	char * sTestedFunction = "";
+	int nUsedBuffer1;
+	int nUsedBuffer2;
+
+	ok(! RegOpenKeyExA(HKEY_CURRENT_USER, "Software\\Wine\\Test", 0,  KEY_QUERY_VALUE, &hKey), "test4 RegOpenKey");
+
+	/****** SHQueryValueExA ******/
+
+	sTestedFunction = "SHQueryValueExA";
+	nUsedBuffer1 = max(strlen(sExpTestpath1)+1, strlen(sTestpath1));
+	nUsedBuffer2 = max(strlen(sExpTestpath2)+1, strlen(sTestpath2));
+	/*
+	 * Case 1.1 All arguments are NULL
+	 */
+	ok(! SHQueryValueExA( hKey, "Test1", NULL, NULL, NULL, NULL), "");
+
+	/*
+	 * Case 1.2 dwType is set
+	 */
+	dwType = -1;
+	ok(! SHQueryValueExA( hKey, "Test1", NULL, &dwType, NULL, NULL), "");
+	ok( dwType == REG_SZ, "(%lu)", dwType);
+
+	/*
+	 * dwSize is set
+         * dwExpanded < dwUnExpanded
+	 */
+	dwSize = 6;
+	ok(! SHQueryValueExA( hKey, "Test1", NULL, NULL, NULL, &dwSize), "");
+	ok( dwSize == nUsedBuffer1, "(%lu,%lu)", dwSize, nUsedBuffer1);
+
+	/*
+         * dwExpanded > dwUnExpanded
+	 */
+	dwSize = 6;
+	ok(! SHQueryValueExA( hKey, "Test3", NULL, NULL, NULL, &dwSize), "");
+	ok( dwSize == nUsedBuffer2, "(%lu,%lu)", dwSize, nUsedBuffer2);
+
+
+	/*
+	 * Case 1 string shrinks during expanding
+	 */
+	strcpy(buf, sEmptyBuffer);
+	dwSize = 6;
+	dwType = -1;
+	dwRet = SHQueryValueExA( hKey, "Test1", NULL, &dwType, buf, &dwSize);
+	ok( dwRet == ERROR_MORE_DATA, "(%lu)", dwRet);
+	ok( 0 == strcmp(sEmptyBuffer, buf), "(%s)", buf);
+	ok( dwType == REG_SZ, "(%lu)" , dwType);
+	ok( dwSize == nUsedBuffer1, "(%lu,%lu)" , dwSize, nUsedBuffer1);
+
+	/*
+	 * string grows during expanding
+	 */	
+	strcpy(buf, sEmptyBuffer);
+	dwSize = 6;
+	dwType = -1;
+	dwRet = SHQueryValueExA( hKey, "Test3", NULL, &dwType, buf, &dwSize);
+	ok( ERROR_MORE_DATA == dwRet, "");
+	ok( 0 == strcmp(sEmptyBuffer, buf), "(%s)", buf);
+	ok( dwSize == nUsedBuffer2, "(%lu,%lu)" , dwSize, nUsedBuffer2);
+	ok( dwType == REG_SZ, "(%lu)" , dwType);
+
+	/*
+	 * if the unexpanded string fits into the buffer it can get cut when expanded
+	 */
+	strcpy(buf, sEmptyBuffer);
+	dwSize = 24;
+	dwType = -1;
+	ok( ERROR_MORE_DATA == SHQueryValueExA( hKey, "Test3", NULL, &dwType, buf, &dwSize), "");
+	ok( 0 == strncmp(sExpTestpath2, buf, 24-1), "(%s)", buf);
+	ok( 24-1 == strlen(buf), "(%s)", buf);
+	ok( dwSize == nUsedBuffer2, "(%lu,%lu)" , dwSize, nUsedBuffer2);
+	ok( dwType == REG_SZ, "(%lu)" , dwType);
+
+	/*
+	 * The buffer is NULL but the size is set
+	 */
+	strcpy(buf, sEmptyBuffer);
+	dwSize = 6;
+	dwType = -1;
+	dwRet = SHQueryValueExA( hKey, "Test3", NULL, &dwType, NULL, &dwSize);
+	ok( ERROR_SUCCESS == dwRet, "(%lu)", dwRet);
+	ok( dwSize == nUsedBuffer2, "(%lu,%lu)" , dwSize, nUsedBuffer2);
+	ok( dwType == REG_SZ, "(%lu)" , dwType);
+
+
+	RegCloseKey(hKey);
+}
+
+START_TEST(shreg)
+{
+	create_test_entrys();
+	test_SHGetValue();
+	test_SHGetValue();
+	test_SHGetTegPath();
+}
+



More information about the wine-patches mailing list