Reading attributeSchema and classSchema Objects
本主題提供直接從架構容器中的 attributeSchema 和 classSchema 物件讀取的程式代碼範例和指導方針。 請注意,在大部分的程式設計情況下,當您必須讀取類別或屬性定義的相關數據時,從抽象架構讀取數據會更有效率,如讀取抽象架構中所述。
用來從架構容器讀取的介面和技術是用來讀取 Active Directory 網域服務 中的任何物件。 指導方針包括:
- 若要系結至架構容器,請取得可藉由系結至 rootDSE 並讀取 schemaNamingContext 屬性來擷取其辨別名稱,如無伺服器系結和 RootDSE 中所述。
- 使用架構容器的 IADsContainer 指標來列舉 attributeSchema 和 classSchema 物件。
- 使用 IADs 或 IDirectoryObject 介面來擷取 attributeSchema 和 classSchema 物件的屬性。
- 使用 ADsOpenObject 或 ADsGetObject 函式直接系結至 attributeSchema 或 classSchema 物件。
- 如果您要讀取多個 attributeSchema 或 classSchema 物件,您可以藉由系結至架構容器上的 IADsContainer 指標,以及使用 IADsContainer.GetObject 方法來系結至個別類別和屬性物件,以提高效能。 這比建立重複的 ADsOpenObject 或 ADsGetObject 呼叫更有效率,以系結至個別類別和屬性物件。 使用 cn 屬性來建置 IADsContainer.GetObject 呼叫的相對路徑(例如,user 類別的 classSchema 物件為 “cn=user”。
- 使用架構容器的 IDirectorySearch 指標來查詢符合搜尋篩選之屬性或類別的架構。
如需示範搜尋架構物件之不同方法的程式代碼範例,請參閱 搜尋架構物件的範例程序代碼。
下列 C++ 程式代碼範例會系結至架構容器上的 IADsContainer 指標,然後使用 ADsBuildEnumerator 和 ADsEnumerateNext 函式來列舉其內容。 請注意,列舉包含所有 attributeSchema 和 classSchema 物件,以及單一子Schema 物件,也就是抽象架構。
針對每個列舉物件,程式代碼範例會使用IADs.Class屬性來判斷它是 attributeSchema 或 classSchema 物件。 程式代碼範例示範如何讀取抽象架構中無法使用的屬性。
// Add activeds.lib to the project.
// Add adsiid.lib to the project.
#include "stdafx.h"
#include <windows.h>
#include <stdio.h>
#include <ole2.h>
#include <activeds.h>
#include <atlbase.h>
// Forward declarations.
void ProcessAttribute(IADs *pChild);
void ProcessClass(IADs *pChild);
// Entry point for the application.
int wmain(int argc, WCHAR* argv[])
{
HRESULT hr;
hr = CoInitialize(NULL);
if(SUCCEEDED(hr))
{
CComBSTR sbstrDSPath;
CComVariant svar;
IADs *pRootDSE = NULL;
IADsContainer *pSchema = NULL;
IEnumVARIANT *pEnum = NULL;
ULONG lFetch;
CComBSTR sbstrClass;
DWORD dwClasses = 0, dwAttributes = 0, dwUnknownClass = 0;
// Bind to rootDSE to get the schemaNamingContext property.
hr = ADsGetObject(L"LDAP://rootDSE", IID_IADs, (void**)&pRootDSE);
if (FAILED(hr))
{
wprintf(L"ADsGetObject failed: 0x%x\n", hr);
goto cleanup;
}
hr = pRootDSE->Get(CComBSTR("schemaNamingContext"), &svar);
sbstrDSPath = "LDAP://";
sbstrDSPath += svar.bstrVal;
// Bind to the actual schema container.
wprintf(L"Binding to %s\n", sbstrDSPath);
hr = ADsGetObject(sbstrDSPath, IID_IADsContainer, (void**) &pSchema);
if (FAILED(hr))
{
wprintf(L"ADsGetObject to schema failed: 0x%x\n", hr);
goto cleanup;
}
// Enumerate the attribute and class objects in the schema container.
hr = ADsBuildEnumerator(pSchema, &pEnum);
if (FAILED(hr))
{
wprintf(L"ADsBuildEnumerator failed: 0x%x\n", hr);
goto cleanup;
}
hr = ADsEnumerateNext(pEnum, 1, &svar, &lFetch);
while(S_OK == hr && 1 == lFetch)
{
IADs *pChild = NULL;
// Get an IADs pointer on the child object.
hr = V_DISPATCH(&svar)->QueryInterface(IID_IADs, (void**) &pChild);
if (SUCCEEDED(hr))
{
// Verify that this is a class, attribute, or subSchema object.
hr = pChild->get_Class(&sbstrClass);
if (SUCCEEDED(hr))
{
// Get data. This depends on type of schema element.
if (_wcsicmp(L"classSchema", sbstrClass) == 0)
{
dwClasses++;
wprintf(L"%s\n", sbstrClass);
ProcessClass(pChild);
wprintf(L"\n");
}
else if (_wcsicmp(L"attributeSchema", sbstrClass) == 0)
{
dwAttributes++;
wprintf(L"%s\n", sbstrClass);
ProcessAttribute(pChild);
wprintf(L"\n");
}
else if (_wcsicmp(L"subSchema", sbstrClass) == 0)
{
wprintf(L"abstract schema");
wprintf(L"\n");
}
else
{
dwUnknownClass++;
}
}
pChild->Release();
}
hr = ADsEnumerateNext(pEnum, 1, &svar, &lFetch);
}
wprintf(L"Classes: %u\nAttributes: %u\nUnknown: %u\n", dwClasses, dwAttributes, dwUnknownClass);
cleanup:
if (pRootDSE)
{
pRootDSE->Release();
}
if (pEnum)
{
ADsFreeEnumerator(pEnum);
}
if (pSchema)
{
pSchema->Release();
}
}
CoUninitialize();
return 0;
}
// PrintGUIDFromVariant
// Prints a GUID in string format.
void PrintGUIDFromVariant(VARIANT varGUID)
{
HRESULT hr;
void HUGEP *pArray;
WCHAR szGUID[40];
LPGUID pGUID;
DWORD dwLen = sizeof(GUID);
hr = SafeArrayAccessData(V_ARRAY(&varGUID), &pArray);
if(SUCCEEDED(hr))
{
pGUID = (LPGUID)pArray;
// Convert GUID to string.
StringFromGUID2(*pGUID, szGUID, 40);
// Print GUID.
wprintf(L",%s",szGUID);
SafeArrayUnaccessData(V_ARRAY(&varGUID));
}
}
// PrintADSPropertyValue
void PrintADSPropertyValue(VARIANT var, BSTR bstrPropName, HRESULT hr)
{
if (E_ADS_PROPERTY_NOT_FOUND == hr)
{
wprintf(L"-- not set --\n");
}
else if (FAILED(hr))
{
wprintf(L"get %s failed: 0x%x\n", bstrPropName, hr);
}
else
{
switch (var.vt)
{
case VT_BSTR:
wprintf(L"%s\n", var.bstrVal);
break;
case VT_I4:
wprintf(L"%u\n", var.iVal);
break;
case VT_BOOL:
wprintf(L"%s\n", var.boolVal ? L"TRUE" : L"FALSE");
break;
default:
wprintf(L"-- ??? --\n");
}
}
}
// ProcessAttribute
// Gets information about an attributeClass object.
void ProcessAttribute(IADs *pChild)
{
HRESULT hr;
CComVariant svar;
CComBSTR sbstrPropName;
// Get the attribute Common-Name (cn) property.
sbstrPropName = "cn";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the attribute lDAPDisplayName.
sbstrPropName = "lDAPDisplayName";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the class linkID.
sbstrPropName = "linkID";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the attribute schemaIDGUID.
sbstrPropName = "schemaIDGUID";
hr = pChild->Get(sbstrPropName, &svar);
if (E_ADS_PROPERTY_NOT_FOUND == hr)
{
wprintf(L"-- not set --\n");
}
else if(SUCCEEDED(hr))
{
PrintGUIDFromVariant(svar);
}
// Get the attribute attributeSecurityGUID.
sbstrPropName = "attributeSecurityGUID";
hr = pChild->Get(sbstrPropName, &svar);
if (E_ADS_PROPERTY_NOT_FOUND == hr)
{
wprintf(L"-- not set --\n");
}
else if (SUCCEEDED(hr))
{
PrintGUIDFromVariant(svar);
}
// Get the attribute attributeSyntax property.
sbstrPropName = "attributeSyntax";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the attribute's oMSyntax property.
sbstrPropName = "oMSyntax";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
}
// ProcessClass
// Gets information about a schema class.
void ProcessClass(IADs *pChild)
{
HRESULT hr;
CComVariant svar;
CComBSTR sbstrPropName;
// Get the class cn.
sbstrPropName = "cn";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the class lDAPDisplayName.
sbstrPropName = "lDAPDisplayName";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the class schemaIDGUID.
sbstrPropName = "schemaIDGUID";
hr = pChild->Get(sbstrPropName, &svar);
if (FAILED(hr))
{
wprintf(L",get schemaIDGUID failed: 0x%x", hr);
}
else
{
PrintGUIDFromVariant(svar);
}
// Get the class adminDescription property.
sbstrPropName = "adminDescription";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the class adminDisplayName property.
sbstrPropName = "adminDisplayName";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the class rDNAttID.
sbstrPropName = "rDNAttID";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the class defaultHidingValue.
sbstrPropName = "defaultHidingValue";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the class defaultObjectCategory.
sbstrPropName = "defaultObjectCategory";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the class systemOnly value.
sbstrPropName = "systemOnly";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
// Get the class defaultSecurityDescriptor.
sbstrPropName = "defaultSecurityDescriptor";
hr = pChild->Get(sbstrPropName, &svar);
PrintADSPropertyValue(svar, sbstrPropName, hr);
}