Lectura de atributosSchema y classSchema Objects
En este tema se proporcionan ejemplos de código e instrucciones para leer directamente desde objetos attributeSchema y classSchema en el contenedor de esquemas. Tenga en cuenta que, en la mayoría de las situaciones de programación, cuando se deben leer datos sobre una definición de clase o atributo, es más eficaz leer datos del esquema abstracto, como se describe en Lectura del esquema abstracto.
Las interfaces y técnicas que se usan para leer desde el contenedor de esquemas son las que se usan para leer cualquier objeto en Servicios de dominio de Active Directory. Las instrucciones incluyen:
- Para enlazar al contenedor de esquemas, obtenga su nombre distintivo que se puede recuperar mediante el enlace a rootDSE y la lectura de la propiedad schemaNamingContext , como se describe en Enlace sin servidor y RootDSE.
- Use un puntero IADsContainer para el contenedor de esquemas para enumerar los objetos attributeSchema y classSchema .
- Use los IAD o la interfaz IDirectoryObject para recuperar las propiedades de un objeto attributeSchema y classSchema .
- Use las funciones ADsOpenObject o ADsGetObject para enlazar directamente a un objeto attributeSchema o classSchema .
- Si va a leer varios objetos attributeSchema o classSchema , puede aumentar el rendimiento enlazando a un puntero IADsContainer en el contenedor de esquemas y usando el método IADsContainer.GetObject para enlazar a los objetos de atributo y clase individuales. Esto es más eficaz que hacer llamadas ADsOpenObject o ADsGetObject repetidas para enlazar a los objetos de atributo y clase individuales. Use el atributo cn para compilar la ruta de acceso relativa para la llamada IADsContainer.GetObject (por ejemplo, "cn=user" para el objeto classSchema para la clase de usuario).
- Use un puntero IDirectorySearch para el contenedor de esquemas para consultar el esquema de atributos o clases que coincidan con un filtro de búsqueda.
Para obtener un ejemplo de código que muestre distintos métodos de búsqueda de objetos de esquema, vea Código de ejemplo para buscar objetos de esquema.
El siguiente ejemplo de código de C++ se enlaza a un puntero IADsContainer en el contenedor de esquemas y, a continuación, usa las funciones ADsBuildEnumerator y ADsEnumerateNext para enumerar su contenido. Tenga en cuenta que la enumeración incluye todos los objetos attributeSchema y classSchema , así como un único objeto subSchema , que es el esquema abstracto.
Para cada objeto enumerado, el ejemplo de código usa la propiedad IADs.Class para determinar si es un objeto attributeSchema o classSchema . En el ejemplo de código se muestra cómo leer las propiedades que no están disponibles en el esquema abstracto.
// 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);
}