Sweden-Number/dlls/adsldp/tests/ldap.c

444 lines
16 KiB
C

/*
* LDAPNamespace Tests
*
* Copyright 2019 Dmitry Timoshkov
*
* 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 <stdarg.h>
#include <stdio.h>
#define COBJMACROS
#include "windef.h"
#include "winbase.h"
#include "objbase.h"
#include "iads.h"
#include "adserr.h"
#include "adshlp.h"
#include "wine/test.h"
#include "initguid.h"
DEFINE_GUID(CLSID_LDAP,0x228d9a81,0xc302,0x11cf,0x9a,0xa4,0x00,0xaa,0x00,0x4a,0x56,0x91);
DEFINE_GUID(CLSID_LDAPNamespace,0x228d9a82,0xc302,0x11cf,0x9a,0xa4,0x00,0xaa,0x00,0x4a,0x56,0x91);
DEFINE_OLEGUID(CLSID_PointerMoniker,0x306,0,0);
static const struct
{
const WCHAR *path;
HRESULT hr, hr_ads_open, hr_ads_get;
const WCHAR *user, *password;
LONG flags;
} test[] =
{
{ L"invalid", MK_E_SYNTAX, E_ADS_BAD_PATHNAME, E_FAIL },
{ L"LDAP", MK_E_SYNTAX, E_ADS_BAD_PATHNAME, E_FAIL },
{ L"LDAP:", S_OK },
{ L"LDAP:/", E_ADS_BAD_PATHNAME },
{ L"LDAP://", E_ADS_BAD_PATHNAME },
{ L"LDAP://ldap.forumsys.com", S_OK },
{ L"LDAP:///ldap.forumsys.com", E_ADS_BAD_PATHNAME },
{ L"LDAP://ldap.forumsys.com:389", S_OK },
{ L"LDAP://ldap.forumsys.com:389/DC=example,DC=com", S_OK },
{ L"LDAP://ldap.forumsys.com/", E_ADS_BAD_PATHNAME },
{ L"LDAP://ldap.forumsys.com/rootDSE", S_OK },
{ L"LDAP://ldap.forumsys.com/rootDSE/", E_ADS_BAD_PATHNAME },
{ L"LDAP://ldap.forumsys.com/rootDSE/invalid", E_ADS_BAD_PATHNAME },
{ L"LDAP://ldap.forumsys.com/rootDSE", S_OK, S_OK, S_OK, NULL, NULL, 0 },
{ L"LDAP://ldap.forumsys.com/rootDSE", S_OK, S_OK, S_OK, L"CN=read-only-admin,DC=example,DC=com", L"password", 0 },
/*{ L"LDAP://invalid", __HRESULT_FROM_WIN32(ERROR_DS_INVALID_DN_SYNTAX) }, takes way too much time */
};
static void test_LDAP(void)
{
HRESULT hr;
IUnknown *unk;
IADs *ads;
IADsOpenDSObject *ads_open;
IDispatch *disp;
BSTR path, user, password;
int i;
hr = CoCreateInstance(&CLSID_LDAPNamespace, 0, CLSCTX_INPROC_SERVER, &IID_IADs, (void **)&ads);
ok(hr == S_OK, "got %#x\n", hr);
IADs_Release(ads);
hr = CoCreateInstance(&CLSID_LDAPNamespace, 0, CLSCTX_INPROC_SERVER, &IID_IUnknown, (void **)&unk);
ok(hr == S_OK, "got %#x\n", hr);
hr = IUnknown_QueryInterface(unk, &IID_IDispatch, (void **)&disp);
ok(hr == S_OK, "got %#x\n", hr);
IDispatch_Release(disp);
hr = IUnknown_QueryInterface(unk, &IID_IADsOpenDSObject, (void **)&ads_open);
ok(hr == S_OK, "got %#x\n", hr);
for (i = 0; i < ARRAY_SIZE(test); i++)
{
path = SysAllocString(test[i].path);
user = test[i].user ? SysAllocString(test[i].user) : NULL;
password = test[i].password ? SysAllocString(test[i].password) : NULL;
hr = IADsOpenDSObject_OpenDSObject(ads_open, path, user, password, test[i].flags, &disp);
if (hr == HRESULT_FROM_WIN32(ERROR_DS_SERVER_DOWN))
{
SysFreeString(path);
skip("server is down\n");
break;
}
ok(hr == test[i].hr || hr == test[i].hr_ads_open, "%d: got %#x, expected %#x\n", i, hr, test[i].hr);
if (hr == S_OK)
IDispatch_Release(disp);
hr = ADsOpenObject(path, user, password, test[i].flags, &IID_IADs, (void **)&ads);
ok(hr == test[i].hr || hr == test[i].hr_ads_get, "%d: got %#x, expected %#x\n", i, hr, test[i].hr);
if (hr == S_OK)
IADs_Release(ads);
hr = ADsGetObject(path, &IID_IDispatch, (void **)&disp);
ok(hr == test[i].hr || hr == test[i].hr_ads_get, "%d: got %#x, expected %#x\n", i, hr, test[i].hr);
if (hr == S_OK)
IDispatch_Release(disp);
SysFreeString(path);
SysFreeString(user);
SysFreeString(password);
}
IADsOpenDSObject_Release(ads_open);
IUnknown_Release(unk);
}
static void test_ParseDisplayName(void)
{
HRESULT hr;
IBindCtx *bc;
IParseDisplayName *parse;
IMoniker *mk;
IUnknown *unk;
CLSID clsid;
BSTR path;
ULONG count;
int i;
hr = CoCreateInstance(&CLSID_LDAP, 0, CLSCTX_INPROC_SERVER, &IID_IParseDisplayName, (void **)&parse);
ok(hr == S_OK, "got %#x\n", hr);
IParseDisplayName_Release(parse);
hr = CoCreateInstance(&CLSID_LDAP, 0, CLSCTX_INPROC_SERVER, &IID_IUnknown, (void **)&unk);
ok(hr == S_OK, "got %#x\n", hr);
hr = IUnknown_QueryInterface(unk, &IID_IParseDisplayName, (void **)&parse);
ok(hr == S_OK, "got %#x\n", hr);
IUnknown_Release(unk);
hr = CreateBindCtx(0, &bc);
ok(hr == S_OK, "got %#x\n", hr);
for (i = 0; i < ARRAY_SIZE(test); i++)
{
path = SysAllocString(test[i].path);
count = 0xdeadbeef;
hr = IParseDisplayName_ParseDisplayName(parse, bc, path, &count, &mk);
if (hr == HRESULT_FROM_WIN32(ERROR_DS_SERVER_DOWN))
{
SysFreeString(path);
skip("server is down\n");
break;
}
ok(hr == test[i].hr || hr == test[i].hr_ads_open, "%d: got %#x, expected %#x\n", i, hr, test[i].hr);
if (hr == S_OK)
{
ok(count == lstrlenW(test[i].path), "%d: got %d\n", i, count);
hr = IMoniker_GetClassID(mk, &clsid);
ok(hr == S_OK, "got %#x\n", hr);
ok(IsEqualGUID(&clsid, &CLSID_PointerMoniker), "%d: got %s\n", i, wine_dbgstr_guid(&clsid));
IMoniker_Release(mk);
}
SysFreeString(path);
count = 0xdeadbeef;
hr = MkParseDisplayName(bc, test[i].path, &count, &mk);
todo_wine_if(i == 0 || i == 1 || i == 11 || i == 12)
ok(hr == test[i].hr, "%d: got %#x, expected %#x\n", i, hr, test[i].hr);
if (hr == S_OK)
{
ok(count == lstrlenW(test[i].path), "%d: got %d\n", i, count);
hr = IMoniker_GetClassID(mk, &clsid);
ok(hr == S_OK, "got %#x\n", hr);
ok(IsEqualGUID(&clsid, &CLSID_PointerMoniker), "%d: got %s\n", i, wine_dbgstr_guid(&clsid));
IMoniker_Release(mk);
}
}
IBindCtx_Release(bc);
IParseDisplayName_Release(parse);
}
struct result
{
const WCHAR *name;
ADSTYPEENUM type;
const WCHAR *values[16];
};
struct search
{
const WCHAR *dn;
ADS_SCOPEENUM scope;
struct result res[16];
};
static void do_search(const struct search *s)
{
HRESULT hr;
IDirectorySearch *ds;
ADS_SEARCHPREF_INFO pref;
ADS_SEARCH_HANDLE sh;
ADS_SEARCH_COLUMN col;
LPWSTR name;
const struct result *res;
trace("search DN %s\n", wine_dbgstr_w(s->dn));
hr = ADsGetObject(s->dn, &IID_IDirectorySearch, (void **)&ds);
ok(hr == S_OK, "got %#x\n", hr);
if (hr != S_OK) return;
pref.dwSearchPref = ADS_SEARCHPREF_SEARCH_SCOPE;
pref.vValue.dwType = ADSTYPE_INTEGER;
pref.vValue.Integer = s->scope;
pref.dwStatus = 0xdeadbeef;
hr = IDirectorySearch_SetSearchPreference(ds, &pref, 1);
ok(hr == S_OK, "got %#x\n", hr);
ok(pref.dwStatus == ADS_STATUS_S_OK, "got %d\n", pref.dwStatus);
hr = IDirectorySearch_ExecuteSearch(ds, (WCHAR *)L"(objectClass=*)", NULL, ~0, &sh);
ok(hr == S_OK, "got %#x\n", hr);
res = s->res;
while ((hr = IDirectorySearch_GetNextRow(ds, sh)) != S_ADS_NOMORE_ROWS)
{
ok(hr == S_OK, "got %#x\n", hr);
while ((hr = IDirectorySearch_GetNextColumnName(ds, sh, &name)) != S_ADS_NOMORE_COLUMNS)
{
DWORD i;
ok(hr == S_OK, "got %#x\n", hr);
ok(res->name != NULL, "got extra row %s\n", wine_dbgstr_w(name));
ok(!wcscmp(res->name, name), "expected %s, got %s\n", wine_dbgstr_w(res->name), wine_dbgstr_w(name));
memset(&col, 0xde, sizeof(col));
hr = IDirectorySearch_GetColumn(ds, sh, name, &col);
ok(hr == S_OK, "got %#x\n", hr);
ok(col.dwADsType == res->type, "got %d for %s\n", col.dwADsType, wine_dbgstr_w(name));
for (i = 0; i < col.dwNumValues; i++)
{
ok(res->values[i] != NULL, "expected to have more values for %s\n", wine_dbgstr_w(name));
if (!res->values[i]) break;
ok(!wcscmp(res->values[i], col.pADsValues[i].CaseIgnoreString),
"expected %s, got %s\n", wine_dbgstr_w(res->values[i]), wine_dbgstr_w(col.pADsValues[i].CaseIgnoreString));
}
ok(!res->values[i], "expected extra value %s\n", wine_dbgstr_w(res->values[i]));
FreeADsMem(name);
res++;
}
}
ok(res->name == NULL, "there are more rows in test data: %s\n", wine_dbgstr_w(res->name));
hr = IDirectorySearch_CloseSearchHandle(ds, sh);
ok(hr == S_OK, "got %#x\n", hr);
IDirectorySearch_Release(ds);
}
static void test_DirectorySearch(void)
{
static const struct search root_base =
{
L"LDAP://ldap.forumsys.com", ADS_SCOPE_BASE,
{
{ L"objectClass", ADSTYPE_CASE_IGNORE_STRING, { L"top", L"OpenLDAProotDSE", NULL } },
{ L"ADsPath", ADSTYPE_CASE_IGNORE_STRING, { L"LDAP://ldap.forumsys.com/", NULL } },
{ NULL }
}
};
static const struct search scientists_base =
{
L"LDAP://ldap.forumsys.com/OU=scientists,DC=example,DC=com", ADS_SCOPE_BASE,
{
{ L"uniqueMember", ADSTYPE_CASE_IGNORE_STRING, { L"uid=einstein,dc=example,dc=com",
L"uid=galieleo,dc=example,dc=com", L"uid=tesla,dc=example,dc=com", L"uid=newton,dc=example,dc=com",
L"uid=training,dc=example,dc=com", L"uid=jmacy,dc=example,dc=com", NULL } },
{ L"ou", ADSTYPE_CASE_IGNORE_STRING, { L"scientists", NULL } },
{ L"cn", ADSTYPE_CASE_IGNORE_STRING, { L"Scientists", NULL } },
{ L"objectClass", ADSTYPE_CASE_IGNORE_STRING, { L"groupOfUniqueNames", L"top", NULL } },
{ L"ADsPath", ADSTYPE_CASE_IGNORE_STRING, { L"LDAP://ldap.forumsys.com/ou=scientists,dc=example,dc=com", NULL } },
{ NULL }
}
};
static const struct search scientists_subtree =
{
L"LDAP://ldap.forumsys.com/OU=scientists,DC=example,DC=com", ADS_SCOPE_SUBTREE,
{
{ L"uniqueMember", ADSTYPE_CASE_IGNORE_STRING, { L"uid=einstein,dc=example,dc=com",
L"uid=galieleo,dc=example,dc=com", L"uid=tesla,dc=example,dc=com", L"uid=newton,dc=example,dc=com",
L"uid=training,dc=example,dc=com", L"uid=jmacy,dc=example,dc=com", NULL } },
{ L"ou", ADSTYPE_CASE_IGNORE_STRING, { L"scientists", NULL } },
{ L"cn", ADSTYPE_CASE_IGNORE_STRING, { L"Scientists", NULL } },
{ L"objectClass", ADSTYPE_CASE_IGNORE_STRING, { L"groupOfUniqueNames", L"top", NULL } },
{ L"ADsPath", ADSTYPE_CASE_IGNORE_STRING, { L"LDAP://ldap.forumsys.com/ou=scientists,dc=example,dc=com", NULL } },
{ L"uniqueMember", ADSTYPE_CASE_IGNORE_STRING, { L"uid=tesla,dc=example,dc=com", NULL } },
{ L"ou", ADSTYPE_CASE_IGNORE_STRING, { L"italians", NULL } },
{ L"cn", ADSTYPE_CASE_IGNORE_STRING, { L"Italians", NULL } },
{ L"objectClass", ADSTYPE_CASE_IGNORE_STRING, { L"groupOfUniqueNames", L"top", NULL } },
{ L"ADsPath", ADSTYPE_CASE_IGNORE_STRING, { L"LDAP://ldap.forumsys.com/ou=italians,ou=scientists,dc=example,dc=com", NULL } },
{ NULL }
}
};
HRESULT hr;
IDirectorySearch *ds;
ADS_SEARCHPREF_INFO pref;
ADS_SEARCH_HANDLE sh;
ADS_SEARCH_COLUMN col;
LPWSTR name;
hr = ADsGetObject(L"LDAP://ldap.forumsys.com/rootDSE", &IID_IDirectorySearch, (void **)&ds);
todo_wine
ok(hr == E_NOINTERFACE, "got %#x\n", hr);
hr = ADsGetObject(L"LDAP://ldap.forumsys.com", &IID_IDirectorySearch, (void **)&ds);
ok(hr == S_OK, "got %#x\n", hr);
if (hr != S_OK) return;
pref.dwSearchPref = ADS_SEARCHPREF_SEARCH_SCOPE;
pref.vValue.dwType = ADSTYPE_INTEGER;
pref.vValue.Integer = ADS_SCOPE_BASE;
pref.dwStatus = 0xdeadbeef;
hr = IDirectorySearch_SetSearchPreference(ds, &pref, 1);
ok(hr == S_OK, "got %#x\n", hr);
ok(pref.dwStatus == ADS_STATUS_S_OK, "got %d\n", pref.dwStatus);
hr = IDirectorySearch_ExecuteSearch(ds, (WCHAR *)L"(objectClass=*)", NULL, ~0, NULL);
ok(hr == E_ADS_BAD_PARAMETER, "got %#x\n", hr);
if (0) /* crashes under XP */
{
hr = IDirectorySearch_ExecuteSearch(ds, (WCHAR *)L"(objectClass=*)", NULL, 1, &sh);
ok(hr == E_ADS_BAD_PARAMETER, "got %#x\n", hr);
}
hr = IDirectorySearch_ExecuteSearch(ds, (WCHAR *)L"(objectClass=*)", NULL, ~0, &sh);
ok(hr == S_OK, "got %#x\n", hr);
hr = IDirectorySearch_GetNextColumnName(ds, sh, &name);
ok(hr == E_ADS_BAD_PARAMETER, "got %#x\n", hr);
hr = IDirectorySearch_GetPreviousRow(ds, sh);
todo_wine
ok(hr == E_ADS_BAD_PARAMETER, "got %#x\n", hr);
while (IDirectorySearch_GetNextRow(ds, sh) != S_ADS_NOMORE_ROWS)
{
while (IDirectorySearch_GetNextColumnName(ds, sh, &name) != S_ADS_NOMORE_COLUMNS)
{
DWORD i;
hr = IDirectorySearch_GetColumn(ds, sh, name, &col);
ok(hr == S_OK, "got %#x for column %s\n", hr, wine_dbgstr_w(name));
if (winetest_debug > 1) /* useful to create test arrays */
{
printf("Column %s (values type %d):\n", wine_dbgstr_w(name), col.dwADsType);
printf("{ ");
for (i = 0; i < col.dwNumValues; i++)
printf("%s, ", wine_dbgstr_w(col.pADsValues[i].CaseIgnoreString));
printf("NULL }\n");
}
hr = IDirectorySearch_FreeColumn(ds, &col);
todo_wine
ok(hr == S_OK, "got %#x\n", hr);
}
name = (void *)0xdeadbeef;
hr = IDirectorySearch_GetNextColumnName(ds, sh, &name);
ok(hr == S_ADS_NOMORE_COLUMNS || broken(hr == S_OK) /* XP */, "got %#x\n", hr);
ok(name == NULL || broken(name && !wcscmp(name, L"ADsPath")) /* XP */, "got %p/%s\n", name, wine_dbgstr_w(name));
}
hr = IDirectorySearch_GetNextRow(ds, sh);
ok(hr == S_ADS_NOMORE_ROWS, "got %#x\n", hr);
name = NULL;
hr = IDirectorySearch_GetNextColumnName(ds, sh, &name);
todo_wine
ok(hr == S_OK || broken(hr == S_ADS_NOMORE_COLUMNS) /* XP */, "got %#x\n", hr);
todo_wine
ok((name && !wcscmp(name, L"ADsPath")) || broken(!name) /* XP */, "got %s\n", wine_dbgstr_w(name));
FreeADsMem(name);
name = (void *)0xdeadbeef;
hr = IDirectorySearch_GetNextColumnName(ds, sh, &name);
ok(hr == S_ADS_NOMORE_COLUMNS || broken(hr == S_OK) /* XP */, "got %#x\n", hr);
ok(name == NULL || broken(name && !wcscmp(name, L"ADsPath")) /* XP */, "got %p/%s\n", name, wine_dbgstr_w(name));
if (0) /* crashes under XP */
{
hr = IDirectorySearch_GetColumn(ds, sh, NULL, &col);
ok(hr == E_ADS_BAD_PARAMETER, "got %#x\n", hr);
}
hr = IDirectorySearch_CloseSearchHandle(ds, sh);
ok(hr == S_OK, "got %#x\n", hr);
IDirectorySearch_Release(ds);
do_search(&root_base);
do_search(&scientists_base);
do_search(&scientists_subtree);
}
START_TEST(ldap)
{
HRESULT hr;
hr = CoInitialize(NULL);
ok(hr == S_OK, "got %#x\n", hr);
test_LDAP();
test_ParseDisplayName();
test_DirectorySearch();
CoUninitialize();
}