263 lines
8.0 KiB
C
263 lines
8.0 KiB
C
![]() |
/*
|
||
|
* 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();
|
||
|
}
|