Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

470 lines
12 KiB

// Copyright (C) 2000 Microsoft Corporation
//
// Non-domain Naming Context checking code
//
// 13 July 2000 sburns, from code supplied by jeffparh
#include "headers.hxx"
#include "state.hpp"
#include "resource.h"
#include "NonDomainNc.hpp"
#ifdef LOGGING_BUILD
#define LOG_LDAP(msg, ldap) LOG(msg); LOG(String::format(L"LDAP error %1!ld!", (ldap)))
#else
#define LOG_LDAP(msg, ldap)
#endif
HRESULT
LdapToHresult(int ldapError)
{
// CODEWORK: I'm told that ldap_get_option for LDAP_OPT_SERVER_ERROR or
// LDAP_OPT_SERVER_EXT_ERROR (or perhaps LDAP_OPT_ERROR_STRING?) will give
// an error result with "higher fidelity"
return Win32ToHresult(::LdapMapErrorToWin32(ldapError));
}
// provided by jeffparh
DWORD
IsLastReplicaOfNC(
IN LDAP * hld,
IN LPWSTR pszConfigNC,
IN LPWSTR pszNC,
IN LPWSTR pszNtdsDsaDN,
OUT BOOL * pfIsLastReplica
)
/*++
Routine Description:
Determine whether any DSAs other than that with DN pszNtdsDsaDN hold
replicas of a particular NC.
Arguments:
hld (IN) - LDAP handle to execute search with.
pszConfigNC (IN) - DN of the config NC. Used as a base for the search.
pszNC (IN) - NC for which to check for other replicas.
pszNtdsDsaDN (IN) - DN of the DSA object known to currently have a replica
of the NC. We are specifically looking for replicas *other than* this
one.
pfIsLastReplica (OUT) - On successful return, TRUE iff no DSAs hold replicas
of pszNC other than that with DN pszNtdsDsaDN.
Return Values:
Win error.
--*/
{
LOG_FUNCTION2(IsLastReplicaOfNC, pszNC ? pszNC : L"(null)");
ASSERT(hld);
ASSERT(pszConfigNC);
ASSERT(pszNC);
ASSERT(pszNtdsDsaDN);
ASSERT(pfIsLastReplica);
if (
!hld
|| !pszConfigNC
|| !pszNC
|| !pszNtdsDsaDN
|| !pfIsLastReplica)
{
return ERROR_INVALID_PARAMETER;
}
// Just checking for existence -- don't really want any attributes
// returned.
static LPWSTR rgpszDsaAttrsToRead[] = {
L"__invalid_attribute_name__",
NULL
};
// FUTURE-2002/03/22-BrettSh - NO_DOT_NET_BETA3_COMPAT_NEEDED - When
// we don't need to be compat with Beta3, we can change this section:
// (|(msDS-HasMasterNCs=%ls)(hasMasterNCs=%ls))
// to:
// (msDS-HasMasterNCs=%ls)
static WCHAR szFilterFormat[]
= L"(&(objectCategory=ntdsDsa)(|(msDS-HasMasterNCs=%ls)(hasMasterNCs=%ls))(!(distinguishedName=%ls)))";
*pfIsLastReplica = TRUE;
int ldStatus = 0;
DWORD err = 0;
LDAPMessage * pDsaResults = NULL;
LDAPMessage * pDsaEntry = NULL;
size_t cchFilter;
PWSTR pszFilter;
LDAP_TIMEVAL lTimeout = {3*60, 0}; // three minutes
do
{
cchFilter = sizeof(szFilterFormat) / sizeof(*szFilterFormat)
// ISSUE-2002/02/27-sburns if the swprintf below is replaced with
// String::format, then these wcslen calls can be eliminated.
+ wcslen(pszNtdsDsaDN)
+ wcslen(pszNC)
+ wcslen(pszNC);
pszFilter = (PWSTR) new BYTE[sizeof(WCHAR) * cchFilter];
// ISSUE-2002/02/27-sburns should use strsafe function here, or
// String::format
swprintf(pszFilter, szFilterFormat, pszNC, pszNC, pszNtdsDsaDN);
// Search config NC for any ntdsDsa object that hosts this NC other
// than that with dn pszNtdsDsaDN. Note that we cap the search at one
// returned object -- we're not really trying to enumerate, just
// checking for existence.
ldStatus = ldap_search_ext_sW(hld, pszConfigNC, LDAP_SCOPE_SUBTREE,
pszFilter, rgpszDsaAttrsToRead, 0,
NULL, NULL, &lTimeout, 1, &pDsaResults);
if (pDsaResults)
{
// Ignore any error (such as LDAP_SIZELIMIT_EXCEEDED) when the
// search returns results.
ldStatus = 0;
pDsaEntry = ldap_first_entry(hld, pDsaResults);
*pfIsLastReplica = (NULL == pDsaEntry);
} else if (ldStatus)
{
// Search failed and returned no results.
LOG_LDAP(L"Config NC search failed", ldStatus);
break;
} else
{
// No error, no results. This shouldn't happen.
LOG("ldap_search_ext_sW returned no results and no error!");
ASSERT(false);
}
}
while (0);
if (NULL != pDsaResults) {
ldap_msgfree(pDsaResults);
}
if (pszFilter)
{
delete[] pszFilter;
}
if (!err && ldStatus) {
err = LdapMapErrorToWin32(ldStatus);
}
return err;
}
// S_OK if this machine (the localhost) is the last replica of at least one
// non-domain NC, S_FALSE if not, or error otherwise. If S_OK, then the
// StringList will contain the DNs of the non domain NCs for which this
// machine is the last replica.
//
// based on code from jeffparh
//
// hld (IN) - LDAP handle bound to DSA to evaluate.
//
// result (OUT) - string list to receive DNs of the non-domain NCs.
HRESULT
IsLastNdncReplica(LDAP* hld, StringList& result)
{
LOG_FUNCTION(IsLastNdncReplica);
ASSERT(hld);
ASSERT(result.empty());
HRESULT hr = S_FALSE;
LDAPMessage* rootResults = 0;
PWSTR* configNc = 0;
PWSTR* schemaNc = 0;
PWSTR* domainNc = 0;
PWSTR* masterNcs = 0;
PWSTR* ntdsDsaDn = 0;
do
{
// Gather basic rootDSE info.
static PWSTR ROOT_ATTRS_TO_READ[] =
{
LDAP_OPATT_NAMING_CONTEXTS_W,
LDAP_OPATT_DEFAULT_NAMING_CONTEXT_W,
LDAP_OPATT_CONFIG_NAMING_CONTEXT_W,
LDAP_OPATT_SCHEMA_NAMING_CONTEXT_W,
LDAP_OPATT_DS_SERVICE_NAME_W,
0
};
LOG(L"Calling ldap_search_s");
int ldStatus =
ldap_search_sW(
hld,
0,
LDAP_SCOPE_BASE,
L"(objectClass=*)",
ROOT_ATTRS_TO_READ,
0,
&rootResults);
if (ldStatus)
{
LOG_LDAP(L"RootDSE search failed", ldStatus);
hr = LdapToHresult(ldStatus);
break;
}
configNc = ldap_get_valuesW(hld, rootResults, LDAP_OPATT_CONFIG_NAMING_CONTEXT_W);
schemaNc = ldap_get_valuesW(hld, rootResults, LDAP_OPATT_SCHEMA_NAMING_CONTEXT_W);
domainNc = ldap_get_valuesW(hld, rootResults, LDAP_OPATT_DEFAULT_NAMING_CONTEXT_W);
masterNcs = ldap_get_valuesW(hld, rootResults, LDAP_OPATT_NAMING_CONTEXTS_W);
ntdsDsaDn = ldap_get_valuesW(hld, rootResults, LDAP_OPATT_DS_SERVICE_NAME_W);
if (
(0 == configNc)
|| (0 == schemaNc)
|| (0 == domainNc)
|| (0 == masterNcs)
|| (0 == ntdsDsaDn))
{
LOG(L"Can't find key rootDSE attributes!");
hr = Win32ToHresult(ERROR_DS_UNAVAILABLE);
break;
}
// There is only one value for each of these attributes...
ASSERT(1 == ldap_count_valuesW(configNc));
ASSERT(1 == ldap_count_valuesW(schemaNc));
ASSERT(1 == ldap_count_valuesW(domainNc));
ASSERT(1 == ldap_count_valuesW(ntdsDsaDn));
DWORD masterNcCount = ldap_count_valuesW(masterNcs);
LOG(String::format(L"masterNcCount = %1!d!", masterNcCount));
// '3' => 1 nc for config, 1 nc for schema, 1 nc for this DC's own
// domain.
if (masterNcCount <= 3)
{
// DSA holds no master NCs other than config, schema, and its own
// domain. Thus, it is not the last replica of any NDNC.
LOG(L"This dsa holds no master NCs other than config, schema, and domain");
ASSERT(3 == masterNcCount);
ASSERT(0 == ldStatus);
ASSERT(hr == S_FALSE);
break;
}
// Loop through non-config/schema/domain NCs to determine those for
// which the DSA is the last replica.
for (int i = 0; 0 != masterNcs[i]; ++i)
{
PWSTR nc = masterNcs[i];
LOG(L"Evaluating " + String(nc));
ASSERT(nc);
ASSERT(configNc);
ASSERT(*configNc);
ASSERT(schemaNc);
ASSERT(*schemaNc);
ASSERT(domainNc);
ASSERT(*domainNc);
if (
// REVIEWED-2002/02/27-sburns we're properly checking these
// strings for null in the for loop test and in a check above
// (in addition to the ASSERTs)
(0 != wcscmp(nc, *configNc))
&& (0 != wcscmp(nc, *schemaNc))
&& (0 != wcscmp(nc, *domainNc)))
{
// A non-config/schema/domain NC.
LOG(L"Calling IsLastReplicaOfNC on " + String(nc));
BOOL isLastReplica = FALSE;
DWORD err =
IsLastReplicaOfNC(
hld,
*configNc,
nc,
*ntdsDsaDn,
&isLastReplica);
if (err)
{
LOG(L"IsLastReplicaOfNC() failed");
hr = Win32ToHresult(err);
break;
}
if (isLastReplica)
{
// This DSA is indeed the last replica of this particular
// NC. Return the DN of this NC to our caller.
LOG(L"last replica of " + String(nc));
result.push_back(nc);
}
else
{
LOG(L"not last replica of " + String(nc));
}
}
}
// If we broke out of the prior loop with an error, jump out to the
// cleanup section.
BREAK_ON_FAILED_HRESULT(hr);
hr = result.size() > 0 ? S_OK : S_FALSE;
}
while (0);
if (rootResults)
{
ldap_msgfree(rootResults);
}
if (0 != configNc)
{
ldap_value_freeW(configNc);
}
if (0 != schemaNc)
{
ldap_value_freeW(schemaNc);
}
if (0 != domainNc)
{
ldap_value_freeW(domainNc);
}
if (0 != masterNcs)
{
ldap_value_freeW(masterNcs);
}
if (0 != ntdsDsaDn)
{
ldap_value_freeW(ntdsDsaDn);
}
#ifdef LOGGING_BUILD
LOG_HRESULT(hr);
for (
StringList::iterator i = result.begin();
i != result.end();
++i)
{
LOG(*i);
}
#endif
return hr;
}
// S_OK if this machine (the localhost) is the last replica of at least one
// non-domain NC, S_FALSE if not, or error otherwise.
//
// result - If S_OK is returned, receives the DNs of the non domain NCs for
// which this machine is the last replica. Should be empty on entry.
HRESULT
IsLastNonDomainNamingContextReplica(StringList& result)
{
LOG_FUNCTION(IsLastNonDomainNamingContextReplica);
ASSERT(result.empty());
result.clear();
HRESULT hr = S_FALSE;
LDAP* hld = 0;
do
{
// Connect to target DSA.
LOG(L"Calling ldap_open");
hld = ldap_openW(L"localhost", LDAP_PORT);
if (!hld)
{
LOG("Cannot open LDAP connection to localhost");
hr = Win32ToHresult(ERROR_DS_UNAVAILABLE);
break;
}
// Bind using logged-in user's credentials.
int ldStatus = ldap_bind_s(hld, 0, 0, LDAP_AUTH_NEGOTIATE);
if (ldStatus)
{
LOG_LDAP(L"LDAP bind failed", ldStatus);
hr = LdapToHresult(ldStatus);
break;
}
// go do the real work
hr = IsLastNdncReplica(hld, result);
}
while (0);
if (hld)
{
ldap_unbind(hld);
}
LOG_HRESULT(hr);
return hr;
}