[PATCH 6/6] msdasql/tests: Initial tests
Alistair Leslie-Hughes
leslie_alistair at hotmail.com
Mon Oct 25 04:34:34 CDT 2021
Signed-off-by: Alistair Leslie-Hughes <leslie_alistair at hotmail.com>
---
configure | 1 +
configure.ac | 1 +
dlls/msdasql/tests/Makefile.in | 5 +
dlls/msdasql/tests/provider.c | 262 +++++++++++++++++++++++++++++++++
4 files changed, 269 insertions(+)
create mode 100644 dlls/msdasql/tests/Makefile.in
create mode 100644 dlls/msdasql/tests/provider.c
diff --git a/configure b/configure
index d0988eb32ed..8c495f546f8 100755
--- a/configure
+++ b/configure
@@ -19409,6 +19409,7 @@ wine_fn_config_makefile dlls/msctf/tests enable_tests
wine_fn_config_makefile dlls/msctfp enable_msctfp
wine_fn_config_makefile dlls/msdaps enable_msdaps
wine_fn_config_makefile dlls/msdasql enable_msdasql
+wine_fn_config_makefile dlls/msdasql/tests enable_tests
wine_fn_config_makefile dlls/msdelta enable_msdelta
wine_fn_config_makefile dlls/msdmo enable_msdmo
wine_fn_config_makefile dlls/msdmo/tests enable_tests
diff --git a/configure.ac b/configure.ac
index 36ab649240b..c91b2bccbb8 100644
--- a/configure.ac
+++ b/configure.ac
@@ -3119,6 +3119,7 @@ WINE_CONFIG_MAKEFILE(dlls/msctf/tests)
WINE_CONFIG_MAKEFILE(dlls/msctfp)
WINE_CONFIG_MAKEFILE(dlls/msdaps)
WINE_CONFIG_MAKEFILE(dlls/msdasql)
+WINE_CONFIG_MAKEFILE(dlls/msdasql/tests)
WINE_CONFIG_MAKEFILE(dlls/msdelta)
WINE_CONFIG_MAKEFILE(dlls/msdmo)
WINE_CONFIG_MAKEFILE(dlls/msdmo/tests)
diff --git a/dlls/msdasql/tests/Makefile.in b/dlls/msdasql/tests/Makefile.in
new file mode 100644
index 00000000000..314238660e2
--- /dev/null
+++ b/dlls/msdasql/tests/Makefile.in
@@ -0,0 +1,5 @@
+TESTDLL = msdasql.dll
+IMPORTS = uuid oleaut32 ole32 odbccp32
+
+C_SRCS = \
+ provider.c
diff --git a/dlls/msdasql/tests/provider.c b/dlls/msdasql/tests/provider.c
new file mode 100644
index 00000000000..951ab2a7387
--- /dev/null
+++ b/dlls/msdasql/tests/provider.c
@@ -0,0 +1,262 @@
+/*
+ * Copyright 2019 Alistair Leslie-Hughes
+ *
+ * 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
+ */
+
+#include <stdio.h>
+#define COBJMACROS
+
+#include "msdasc.h"
+#include "oledb.h"
+#include "odbcinst.h"
+
+#include "initguid.h"
+
+#include "msdasql.h"
+
+#include "wine/test.h"
+
+DEFINE_GUID(DBPROPSET_DBINITALL, 0xc8b522ca, 0x5cf3, 0x11ce, 0xad, 0xe5, 0x00, 0xaa, 0x00, 0x44, 0x77, 0x3d);
+
+static BOOL db_created;
+static char mdbpath[MAX_PATH];
+
+static void test_Properties(void)
+{
+ HRESULT hr;
+ IDBProperties *props;
+ DBPROPIDSET propidset;
+ ULONG infocount;
+ DBPROPINFOSET *propinfoset;
+ WCHAR *desc;
+
+ hr = CoCreateInstance( &CLSID_MSDASQL, NULL, CLSCTX_ALL, &IID_IDBProperties, (void **)&props);
+ ok(hr == S_OK, "Failed to create object 0x%08x\n", hr);
+
+ propidset.rgPropertyIDs = NULL;
+ propidset.cPropertyIDs = 0;
+ propidset.guidPropertySet = DBPROPSET_DBINITALL;
+
+ infocount = 0;
+ hr = IDBProperties_GetPropertyInfo(props, 1, &propidset, &infocount, &propinfoset, &desc);
+ todo_wine ok(hr == S_OK, "got 0x%08x\n", hr);
+ if (hr == S_OK)
+ {
+ ULONG i;
+
+ ok(propinfoset->cPropertyInfos == 14, "got %d\n", propinfoset->cPropertyInfos);
+
+ for (i = 0; i < propinfoset->cPropertyInfos; i++)
+ {
+ trace("%d: pwszDescription: %s\n", i, debugstr_w(propinfoset->rgPropertyInfos[i].pwszDescription) );
+ }
+
+ for (i = 0; i < propinfoset->cPropertyInfos; i++)
+ VariantClear(&propinfoset->rgPropertyInfos[i].vValues);
+
+ CoTaskMemFree(propinfoset->rgPropertyInfos);
+ CoTaskMemFree(propinfoset);
+ }
+
+ IDBProperties_Release(props);
+}
+
+static void test_command_interfaces(IUnknown *cmd)
+{
+ HRESULT hr;
+ ICommandProperties *commandProp;
+ ICommandText *comand_text;
+ IConvertType *convertype;
+ ICommandPrepare *commandprepare;
+ ICommandStream *commandstream;
+ IColumnsInfo *colinfo;
+ IMultipleResults *multiple;
+
+ hr = IUnknown_QueryInterface(cmd, &IID_ICommandProperties, (void**)&commandProp);
+ ok(hr == S_OK, "got 0x%08x\n", hr);
+ ICommandProperties_Release(commandProp);
+
+ hr = IUnknown_QueryInterface(cmd, &IID_ICommandText, (void**)&comand_text);
+ ok(hr == S_OK, "got 0x%08x\n", hr);
+ ICommandText_Release(comand_text);
+
+ hr = IUnknown_QueryInterface(cmd, &IID_IConvertType, (void**)&convertype);
+ todo_wine ok(hr == S_OK, "got 0x%08x\n", hr);
+ if (hr == S_OK)
+ IConvertType_Release(convertype);
+
+ hr = IUnknown_QueryInterface(cmd, &IID_ICommandPrepare, (void**)&commandprepare);
+ todo_wine ok(hr == S_OK, "got 0x%08x\n", hr);
+ if (hr == S_OK)
+ ICommandPrepare_Release(commandprepare);
+
+ hr = IUnknown_QueryInterface(cmd, &IID_IColumnsInfo, (void**)&colinfo);
+ todo_wine ok(hr == S_OK, "got 0x%08x\n", hr);
+ if (hr == S_OK)
+ IColumnsInfo_Release(colinfo);
+
+ hr = IUnknown_QueryInterface(cmd, &IID_ICommandStream, (void**)&commandstream);
+ ok(hr == E_NOINTERFACE, "got 0x%08x\n", hr);
+
+ hr = IUnknown_QueryInterface(cmd, &IID_IMultipleResults, (void**)&multiple);
+ ok(hr == E_NOINTERFACE, "got 0x%08x\n", hr);
+}
+
+static void test_sessions(void)
+{
+ IDBProperties *props;
+ IDBInitialize *dbinit = NULL;
+ IDataInitialize *datainit;
+ IDBCreateSession *dbsession = NULL;
+ IUnknown *session = NULL;
+ IOpenRowset *openrowset = NULL;
+ IDBCreateCommand *create_command = NULL;
+ IUnknown *cmd = NULL;
+ HRESULT hr;
+ BSTR connect_str;
+
+ if (!db_created)
+ {
+ skip("ODBC source wine_test not available.\n");
+ return;
+ }
+
+ connect_str = SysAllocString(L"Provider=MSDASQL.1;Persist Security Info=False;Data Source=wine_test");
+
+ hr = CoCreateInstance( &CLSID_MSDAINITIALIZE, NULL, CLSCTX_INPROC_SERVER, &IID_IDataInitialize,
+ (void **)&datainit );
+ ok(hr == S_OK, "Failed to create object 0x%08x\n", hr);
+ hr = IDataInitialize_GetDataSource( datainit, NULL, CLSCTX_INPROC_SERVER, connect_str, &IID_IDBInitialize,
+ (IUnknown **)&dbinit );
+ SysFreeString(connect_str);
+ todo_wine ok(hr == S_OK, "got 0x%08x\n", hr);
+ if(FAILED(hr))
+ {
+ IDataInitialize_Release( datainit );
+ return;
+ }
+
+ hr = IDBInitialize_QueryInterface( dbinit, &IID_IDBProperties, (void **)&props );
+ ok(hr == S_OK, "got 0x%08x\n", hr);
+ IDBProperties_Release(props);
+
+ hr = IDBInitialize_Initialize( dbinit );
+ ok(hr == S_OK, "got 0x%08x\n", hr);
+ if(FAILED(hr))
+ {
+ IDBInitialize_Release( dbinit );
+ IDataInitialize_Release( datainit );
+ return;
+ }
+
+ hr = IDBInitialize_QueryInterface( dbinit, &IID_IDBCreateSession, (void **)&dbsession );
+ ok(hr == S_OK, "got 0x%08x\n", hr);
+
+ hr = IDBCreateSession_CreateSession( dbsession, NULL, &IID_IUnknown, &session );
+ ok(hr == S_OK, "got 0x%08x\n", hr);
+
+ hr = IUnknown_QueryInterface(session, &IID_IOpenRowset, (void**)&openrowset);
+ ok(hr == S_OK, "got 0x%08x\n", hr);
+
+ hr = IOpenRowset_QueryInterface(openrowset, &IID_IDBCreateCommand, (void**)&create_command);
+ ok(hr == S_OK, "got 0x%08x\n", hr);
+
+ hr = IDBCreateCommand_CreateCommand(create_command, NULL, &IID_IUnknown, (IUnknown **)&cmd);
+ ok(hr == S_OK, "got 0x%08x\n", hr);
+ if (hr == S_OK)
+ {
+ test_command_interfaces(cmd);
+ IUnknown_Release(cmd);
+ }
+
+ IDBCreateCommand_Release(create_command);
+ IOpenRowset_Release(openrowset);
+ IUnknown_Release( session );
+ IDBCreateSession_Release(dbsession);
+ IDBInitialize_Uninitialize( dbinit );
+ IDBInitialize_Release( dbinit );
+ IDataInitialize_Release( datainit );
+}
+
+static void setup_database(void)
+{
+ char *driver;
+ DWORD code;
+ char buffer[1024];
+ WORD size;
+
+ if (winetest_interactive)
+ {
+ trace("assuming odbc 'wine_test' is available\n");
+ db_created = TRUE;
+ return;
+ }
+
+ /*
+ * 32 bit Windows has a default driver for "Microsoft Access Driver" (Windows 7+)
+ * and has the ability to create files on the fly.
+ *
+ * 64 bit Windows ONLY has a driver for "SQL Server", which we cannot use since we don't have a
+ * server to connect to.
+ *
+ * The filename passed to CREATE_DB must end in mdb.
+ */
+ GetTempPathA(sizeof(mdbpath), mdbpath);
+ strcat(mdbpath, "wine_test.mdb");
+
+ driver = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof("DSN=wine_test\0CREATE_DB=") + strlen(mdbpath) + 2);
+ memcpy(driver, "DSN=wine_test\0CREATE_DB=", sizeof("DSN=wine_test\0CREATE_DB="));
+ strcat(driver+sizeof("DSN=wine_test\0CREATE_DB=")-1, mdbpath);
+
+ db_created = SQLConfigDataSource(NULL, ODBC_ADD_DSN, "Microsoft Access Driver (*.mdb)", driver);
+ if (!db_created)
+ {
+ SQLInstallerError(1, &code, buffer, sizeof(buffer), &size);
+ trace("code %d, buffer %s, size %d\n", code, debugstr_a(buffer), size);
+
+ HeapFree(GetProcessHeap(), 0, driver);
+
+ return;
+ }
+
+ memcpy(driver, "DSN=wine_test\0DBQ=", sizeof("DSN=wine_test\0DBQ="));
+ strcat(driver+sizeof("DSN=wine_test\0DBQ=")-1, mdbpath);
+ db_created = SQLConfigDataSource(NULL, ODBC_ADD_DSN, "Microsoft Access Driver (*.mdb)", driver);
+
+ HeapFree(GetProcessHeap(), 0, driver);
+}
+
+static void cleanup_database(void)
+{
+ if (winetest_interactive)
+ return;
+
+ DeleteFileA(mdbpath);
+}
+
+START_TEST(provider)
+{
+ CoInitialize(0);
+
+ setup_database();
+
+ test_Properties();
+ test_sessions();
+
+ cleanup_database();
+
+ CoUninitialize();
+}
--
2.33.0
More information about the wine-devel
mailing list