1481 lines
40 KiB
C
1481 lines
40 KiB
C
/*++
|
||
|
||
Copyright (c) 1997-1999 Microsoft Corporation
|
||
|
||
Module Name:
|
||
|
||
ioctl.c
|
||
|
||
Abstract:
|
||
|
||
Cluster control functions.
|
||
|
||
Author:
|
||
|
||
Mike Massa (mikemas) 23-Jan-1998
|
||
|
||
Revision History:
|
||
|
||
--*/
|
||
|
||
#include "initp.h"
|
||
|
||
|
||
//
|
||
// Parameter block used for setting all cluster properties.
|
||
//
|
||
typedef struct {
|
||
LPWSTR AdminExtensions;
|
||
DWORD AdminExtensionsLength;
|
||
CLUSTER_NETWORK_ROLE DefaultNetworkRole;
|
||
LPWSTR Description;
|
||
LPBYTE Security;
|
||
DWORD SecurityLength;
|
||
LPBYTE SecurityDescriptor;
|
||
DWORD SecurityDescriptorLength;
|
||
LPWSTR GroupsAdminExtensions;
|
||
DWORD GroupsAdminExtensionsLength;
|
||
LPWSTR NetworksAdminExtensions;
|
||
DWORD NetworksAdminExtensionsLength;
|
||
LPWSTR NetworkInterfacesAdminExtensions;
|
||
DWORD NetworkInterfacesAdminExtensionsLength;
|
||
LPWSTR NodesAdminExtensions;
|
||
DWORD NodesAdminExtensionsLength;
|
||
LPWSTR ResourcesAdminExtensions;
|
||
DWORD ResourcesAdminExtensionsLength;
|
||
LPWSTR ResourceTypesAdminExtensions;
|
||
DWORD ResourceTypesAdminExtensionsLength;
|
||
DWORD EnableEventLogReplication;
|
||
DWORD QuorumArbitrationTimeout;
|
||
DWORD QuorumArbitrationEqualizer;
|
||
DWORD DisableGroupPreferredOwnerRandomization;
|
||
} CS_CLUSTER_INFO, *PCS_CLUSTER_INFO;
|
||
|
||
//
|
||
// Parameter block used for setting the cluster 'Security Descriptor' property
|
||
//
|
||
typedef struct {
|
||
LPBYTE Security;
|
||
DWORD SecurityLength;
|
||
} CS_CLUSTER_SECURITY_INFO, *PCS_CLUSTER_SECURITY_INFO;
|
||
|
||
//
|
||
// Parameter block used for setting the cluster 'Security' property
|
||
//
|
||
typedef struct {
|
||
LPBYTE SecurityDescriptor;
|
||
DWORD SecurityDescriptorLength;
|
||
} CS_CLUSTER_SD_INFO, *PCS_CLUSTER_SD_INFO;
|
||
|
||
|
||
//
|
||
// Cluster Common properties.
|
||
//
|
||
|
||
//
|
||
// Read-Write Common Properties.
|
||
//
|
||
RESUTIL_PROPERTY_ITEM
|
||
CspClusterCommonProperties[] = {
|
||
{ CLUSREG_NAME_ADMIN_EXT,
|
||
NULL,
|
||
CLUSPROP_FORMAT_MULTI_SZ,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, AdminExtensions)
|
||
},
|
||
{ CLUSREG_NAME_CLUS_DEFAULT_NETWORK_ROLE,
|
||
NULL,
|
||
CLUSPROP_FORMAT_DWORD,
|
||
ClusterNetworkRoleClientAccess,
|
||
ClusterNetworkRoleNone,
|
||
ClusterNetworkRoleInternalAndClient,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, DefaultNetworkRole)
|
||
},
|
||
{ CLUSREG_NAME_CLUS_DESC,
|
||
NULL,
|
||
CLUSPROP_FORMAT_SZ,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, Description)
|
||
},
|
||
{ CLUSREG_NAME_CLUS_SECURITY,
|
||
NULL,
|
||
CLUSPROP_FORMAT_BINARY,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, Security)
|
||
},
|
||
{ CLUSREG_NAME_CLUS_SD,
|
||
NULL,
|
||
CLUSPROP_FORMAT_BINARY,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, SecurityDescriptor)
|
||
},
|
||
{ CLUSREG_KEYNAME_GROUPS L"\\" CLUSREG_NAME_ADMIN_EXT,
|
||
NULL,
|
||
CLUSPROP_FORMAT_MULTI_SZ,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, GroupsAdminExtensions)
|
||
},
|
||
{ CLUSREG_KEYNAME_NETWORKS L"\\" CLUSREG_NAME_ADMIN_EXT,
|
||
NULL,
|
||
CLUSPROP_FORMAT_MULTI_SZ,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, NetworksAdminExtensions)
|
||
},
|
||
{ CLUSREG_KEYNAME_NETINTERFACES L"\\" CLUSREG_NAME_ADMIN_EXT,
|
||
NULL,
|
||
CLUSPROP_FORMAT_MULTI_SZ,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, NetworkInterfacesAdminExtensions)
|
||
},
|
||
{ CLUSREG_KEYNAME_NODES L"\\" CLUSREG_NAME_ADMIN_EXT,
|
||
NULL,
|
||
CLUSPROP_FORMAT_MULTI_SZ,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, NodesAdminExtensions)
|
||
},
|
||
{ CLUSREG_KEYNAME_RESOURCES L"\\" CLUSREG_NAME_ADMIN_EXT,
|
||
NULL,
|
||
CLUSPROP_FORMAT_MULTI_SZ,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, ResourcesAdminExtensions)
|
||
},
|
||
{ CLUSREG_KEYNAME_RESOURCE_TYPES L"\\" CLUSREG_NAME_ADMIN_EXT,
|
||
NULL,
|
||
CLUSPROP_FORMAT_MULTI_SZ,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, ResourceTypesAdminExtensions)
|
||
},
|
||
{ CLUSREG_NAME_CLUS_EVTLOG_PROPAGATION,
|
||
NULL,
|
||
CLUSPROP_FORMAT_DWORD,
|
||
1, // default value //
|
||
0, // min value //
|
||
1, // max value //
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, EnableEventLogReplication)
|
||
},
|
||
{ CLUSREG_NAME_QUORUM_ARBITRATION_TIMEOUT,
|
||
NULL,
|
||
CLUSPROP_FORMAT_DWORD,
|
||
60, // default value //
|
||
1, // min value //
|
||
60 * 60, // max value // One hour for arbitration. Should be enough
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, QuorumArbitrationTimeout)
|
||
},
|
||
{ CLUSREG_NAME_QUORUM_ARBITRATION_EQUALIZER,
|
||
NULL,
|
||
CLUSPROP_FORMAT_DWORD,
|
||
7, // default value //
|
||
0, // min value //
|
||
60 * 60, // max value // One hour for arbitration. Should be enough
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, QuorumArbitrationEqualizer)
|
||
},
|
||
{ CLUSREG_NAME_DISABLE_GROUP_PREFERRED_OWNER_RANDOMIZATION,
|
||
NULL,
|
||
CLUSPROP_FORMAT_DWORD,
|
||
0, // default value // don't disable randomization
|
||
0, // min value //
|
||
1, // max value //
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_INFO, DisableGroupPreferredOwnerRandomization)
|
||
},
|
||
{ NULL, NULL, 0, 0, 0, 0, 0 } };
|
||
|
||
//
|
||
// Property table used for setting the cluster 'Security Descriptor' property
|
||
//
|
||
RESUTIL_PROPERTY_ITEM
|
||
CspClusterSDProperty[] = {
|
||
{ CLUSREG_NAME_CLUS_SD,
|
||
NULL,
|
||
CLUSPROP_FORMAT_BINARY,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_SD_INFO, SecurityDescriptor)
|
||
},
|
||
{ NULL, NULL, 0, 0, 0, 0, 0 } };
|
||
|
||
//
|
||
// Property table used for setting the cluster 'Security' property
|
||
//
|
||
RESUTIL_PROPERTY_ITEM
|
||
CspClusterSecurityProperty[] = {
|
||
{ CLUSREG_NAME_CLUS_SECURITY,
|
||
NULL,
|
||
CLUSPROP_FORMAT_BINARY,
|
||
0,
|
||
0,
|
||
0,
|
||
0,
|
||
FIELD_OFFSET(CS_CLUSTER_SECURITY_INFO, Security)
|
||
},
|
||
{ NULL, NULL, 0, 0, 0, 0, 0 } };
|
||
|
||
|
||
//
|
||
// Read-Only Common Properties.
|
||
//
|
||
RESUTIL_PROPERTY_ITEM
|
||
CspClusterROCommonProperties[] = {
|
||
{ NULL, NULL, 0, 0, 0, 0, 0 } };
|
||
|
||
//
|
||
// Cluster registry API function pointers.
|
||
//
|
||
CLUSTER_REG_APIS
|
||
CspClusterRegApis = {
|
||
(PFNCLRTLCREATEKEY) DmRtlCreateKey,
|
||
(PFNCLRTLOPENKEY) DmRtlOpenKey,
|
||
(PFNCLRTLCLOSEKEY) DmCloseKey,
|
||
(PFNCLRTLSETVALUE) DmSetValue,
|
||
(PFNCLRTLQUERYVALUE) DmQueryValue,
|
||
(PFNCLRTLENUMVALUE) DmEnumValue,
|
||
(PFNCLRTLDELETEVALUE) DmDeleteValue,
|
||
NULL,
|
||
NULL,
|
||
NULL
|
||
};
|
||
|
||
|
||
//
|
||
// Local Functions
|
||
//
|
||
|
||
DWORD
|
||
CspClusterControl(
|
||
IN DWORD ControlCode,
|
||
IN PUCHAR InBuffer,
|
||
IN DWORD InBufferSize,
|
||
OUT PUCHAR OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
);
|
||
|
||
DWORD
|
||
CspClusterEnumCommonProperties(
|
||
OUT PVOID OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
);
|
||
|
||
DWORD
|
||
CspClusterGetCommonProperties(
|
||
IN BOOL ReadOnly,
|
||
IN HDMKEY RegistryKey,
|
||
OUT PVOID OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
);
|
||
|
||
DWORD
|
||
CspClusterValidateCommonProperties(
|
||
IN HDMKEY RegistryKey,
|
||
IN PVOID InBuffer,
|
||
IN DWORD InBufferSize
|
||
);
|
||
|
||
DWORD
|
||
CspClusterSetCommonProperties(
|
||
IN HDMKEY RegistryKey,
|
||
IN PVOID InBuffer,
|
||
IN DWORD InBufferSize
|
||
);
|
||
|
||
DWORD
|
||
CspClusterEnumPrivateProperties(
|
||
IN HDMKEY RegistryKey,
|
||
OUT PVOID OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
);
|
||
|
||
DWORD
|
||
CspClusterGetPrivateProperties(
|
||
IN HDMKEY RegistryKey,
|
||
OUT PVOID OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
);
|
||
|
||
DWORD
|
||
CspClusterValidatePrivateProperties(
|
||
IN HDMKEY RegistryKey,
|
||
IN PVOID InBuffer,
|
||
IN DWORD InBufferSize
|
||
);
|
||
|
||
DWORD
|
||
CspClusterSetPrivateProperties(
|
||
IN HDMKEY RegistryKey,
|
||
IN PVOID InBuffer,
|
||
IN DWORD InBufferSize
|
||
);
|
||
|
||
|
||
DWORD
|
||
WINAPI
|
||
CsClusterControl(
|
||
IN PNM_NODE HostNode OPTIONAL,
|
||
IN DWORD ControlCode,
|
||
IN PUCHAR InBuffer,
|
||
IN DWORD InBufferSize,
|
||
OUT PUCHAR OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
)
|
||
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Provides for arbitrary communication and control between an application
|
||
and a cluster.
|
||
|
||
Arguments:
|
||
|
||
HostNode - Supplies the host node on which the cluster control should
|
||
be delivered. If this is NULL, the local node is used. Not honored!
|
||
|
||
ControlCode- Supplies the control code that defines the
|
||
structure and action of the cluster control.
|
||
Values of ControlCode between 0 and 0x10000000 are reserved
|
||
for future definition and use by Microsoft. All other values
|
||
are available for use by ISVs
|
||
|
||
InBuffer- Supplies a pointer to the input buffer to be passed
|
||
to the cluster.
|
||
|
||
InBufferSize- Supplies the size, in bytes, of the data pointed
|
||
to by lpInBuffer..
|
||
|
||
OutBuffer- Supplies a pointer to the output buffer to be
|
||
filled in by the cluster..
|
||
|
||
OutBufferSize- Supplies the size, in bytes, of the available
|
||
space pointed to by lpOutBuffer.
|
||
|
||
BytesReturned - Returns the number of bytes of lpOutBuffer
|
||
actually filled in by the cluster.
|
||
|
||
Required - Returns the number of bytes if the OutBuffer is not big
|
||
enough.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful
|
||
|
||
Win32 error code otherwise
|
||
|
||
--*/
|
||
|
||
{
|
||
DWORD status;
|
||
|
||
//
|
||
// In the future - we should verify the access mode!
|
||
//
|
||
if ( CLUSCTL_GET_CONTROL_OBJECT( ControlCode ) != CLUS_OBJECT_CLUSTER ) {
|
||
return(ERROR_INVALID_FUNCTION);
|
||
}
|
||
|
||
status = CspClusterControl(
|
||
ControlCode,
|
||
InBuffer,
|
||
InBufferSize,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required
|
||
);
|
||
|
||
return(status);
|
||
|
||
} // CsClusterControl
|
||
|
||
|
||
|
||
DWORD
|
||
CspClusterControl(
|
||
IN DWORD ControlCode,
|
||
IN PUCHAR InBuffer,
|
||
IN DWORD InBufferSize,
|
||
OUT PUCHAR OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
)
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Provides for arbitrary communication and control between an application
|
||
and a specific instance of a node.
|
||
|
||
Arguments:
|
||
|
||
ControlCode- Supplies the control code that defines the
|
||
structure and action of the cluster control.
|
||
Values of ControlCode between 0 and 0x10000000 are reserved
|
||
for future definition and use by Microsoft. All other values
|
||
are available for use by ISVs
|
||
|
||
InBuffer- Supplies a pointer to the input buffer to be passed
|
||
to the cluster.
|
||
|
||
InBufferSize- Supplies the size, in bytes, of the data pointed
|
||
to by lpInBuffer.
|
||
|
||
OutBuffer- Supplies a pointer to the output buffer to be
|
||
filled in by the cluster.
|
||
|
||
OutBufferSize- Supplies the size, in bytes, of the available
|
||
space pointed to by lpOutBuffer.
|
||
|
||
BytesReturned - Returns the number of bytes of lpOutBuffer
|
||
actually filled in by the cluster.
|
||
|
||
Required - Returns the number of bytes if the OutBuffer is not big
|
||
enough.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful
|
||
|
||
Win32 error code otherwise
|
||
|
||
--*/
|
||
|
||
{
|
||
DWORD status;
|
||
CLUSPROP_BUFFER_HELPER props;
|
||
DWORD bufSize;
|
||
BOOL success;
|
||
DWORD nameLen;
|
||
|
||
if (DmClusterParametersKey == NULL) {
|
||
return(ERROR_SHARING_PAUSED);
|
||
}
|
||
|
||
switch ( ControlCode ) {
|
||
|
||
case CLUSCTL_CLUSTER_UNKNOWN:
|
||
*BytesReturned = 0;
|
||
status = ERROR_SUCCESS;
|
||
break;
|
||
|
||
case CLUSCTL_RESOURCE_GET_COMMON_PROPERTY_FMTS:
|
||
status = ClRtlGetPropertyFormats( CspClusterCommonProperties,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required );
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_GET_FQDN:
|
||
// Return the fully qualified cluster name
|
||
*BytesReturned = OutBufferSize;
|
||
nameLen = lstrlenW( CsClusterName ) * sizeof(UNICODE_NULL);
|
||
success = GetComputerNameEx( ComputerNameDnsDomain,
|
||
(LPWSTR)OutBuffer,
|
||
BytesReturned );
|
||
|
||
|
||
*BytesReturned = *BytesReturned * sizeof(UNICODE_NULL);
|
||
if ( success ) {
|
||
status = STATUS_SUCCESS;
|
||
//
|
||
// Okay - append Cluster Name now. With a dot.
|
||
//
|
||
if ( (*BytesReturned + nameLen + 2*sizeof(UNICODE_NULL)) <= OutBufferSize ) {
|
||
lstrcatW( (LPWSTR)OutBuffer, L"." );
|
||
lstrcatW( (LPWSTR)OutBuffer, CsClusterName );
|
||
*BytesReturned = *BytesReturned + nameLen + 2*sizeof(UNICODE_NULL);
|
||
} else {
|
||
*Required = *BytesReturned + nameLen + 2*sizeof(UNICODE_NULL);
|
||
*BytesReturned = 0;
|
||
status = ERROR_MORE_DATA;
|
||
}
|
||
} else {
|
||
*Required = *BytesReturned + nameLen + sizeof(UNICODE_NULL);
|
||
*BytesReturned = 0;
|
||
status = GetLastError();
|
||
}
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_ENUM_COMMON_PROPERTIES:
|
||
status = CspClusterEnumCommonProperties(
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required
|
||
);
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_GET_RO_COMMON_PROPERTIES:
|
||
status = CspClusterGetCommonProperties(
|
||
TRUE, // ReadOnly
|
||
DmClusterParametersKey,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required
|
||
);
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_GET_COMMON_PROPERTIES:
|
||
status = CspClusterGetCommonProperties(
|
||
FALSE, // ReadOnly
|
||
DmClusterParametersKey,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required
|
||
);
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_VALIDATE_COMMON_PROPERTIES:
|
||
status = CspClusterValidateCommonProperties(
|
||
DmClusterParametersKey,
|
||
InBuffer,
|
||
InBufferSize
|
||
);
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_SET_COMMON_PROPERTIES:
|
||
status = CspClusterSetCommonProperties(
|
||
DmClusterParametersKey,
|
||
InBuffer,
|
||
InBufferSize
|
||
);
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_ENUM_PRIVATE_PROPERTIES:
|
||
status = CspClusterEnumPrivateProperties(
|
||
DmClusterParametersKey,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required
|
||
);
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_GET_RO_PRIVATE_PROPERTIES:
|
||
if ( OutBufferSize < sizeof(DWORD) ) {
|
||
*BytesReturned = 0;
|
||
*Required = sizeof(DWORD);
|
||
if ( OutBuffer == NULL ) {
|
||
status = ERROR_SUCCESS;
|
||
} else {
|
||
status = ERROR_MORE_DATA;
|
||
}
|
||
} else {
|
||
LPDWORD ptrDword = (LPDWORD) OutBuffer;
|
||
*ptrDword = 0;
|
||
*BytesReturned = sizeof(DWORD);
|
||
status = ERROR_SUCCESS;
|
||
}
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_GET_PRIVATE_PROPERTIES:
|
||
status = CspClusterGetPrivateProperties(
|
||
DmClusterParametersKey,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required
|
||
);
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_VALIDATE_PRIVATE_PROPERTIES:
|
||
status = CspClusterValidatePrivateProperties(
|
||
DmClusterParametersKey,
|
||
InBuffer,
|
||
InBufferSize
|
||
);
|
||
break;
|
||
|
||
case CLUSCTL_CLUSTER_SET_PRIVATE_PROPERTIES:
|
||
status = CspClusterSetPrivateProperties(
|
||
DmClusterParametersKey,
|
||
InBuffer,
|
||
InBufferSize
|
||
);
|
||
break;
|
||
|
||
default:
|
||
status = ERROR_INVALID_FUNCTION;
|
||
break;
|
||
}
|
||
|
||
return(status);
|
||
|
||
} // CspClusterControl
|
||
|
||
|
||
|
||
DWORD
|
||
CspClusterEnumCommonProperties(
|
||
OUT PVOID OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
)
|
||
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Enumerates the common property names for a given node.
|
||
|
||
Arguments:
|
||
|
||
OutBuffer - Supplies the output buffer.
|
||
|
||
OutBufferSize - Supplies the size of the output buffer.
|
||
|
||
BytesReturned - The number of bytes returned in OutBuffer.
|
||
|
||
Required - The required number of bytes if OutBuffer is too small.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful.
|
||
|
||
A Win32 error code on failure.
|
||
|
||
--*/
|
||
|
||
{
|
||
DWORD status;
|
||
|
||
//
|
||
// Get the common properties.
|
||
//
|
||
status = ClRtlEnumProperties(
|
||
CspClusterCommonProperties,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required
|
||
);
|
||
|
||
return(status);
|
||
|
||
} // CspClusterEnumCommonProperties
|
||
|
||
|
||
|
||
DWORD
|
||
CspClusterGetCommonProperties(
|
||
IN BOOL ReadOnly,
|
||
IN HDMKEY RegistryKey,
|
||
OUT PVOID OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
)
|
||
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Gets the common properties for a given cluster.
|
||
|
||
Arguments:
|
||
|
||
ReadOnly - TRUE if the read-only properties should be read.
|
||
FALSE otherwise.
|
||
|
||
RegistryKey - Supplies the registry key for this cluster.
|
||
|
||
OutBuffer - Supplies the output buffer.
|
||
|
||
OutBufferSize - Supplies the size of the output buffer.
|
||
|
||
BytesReturned - The number of bytes returned in OutBuffer.
|
||
|
||
Required - The required number of bytes if OutBuffer is too small.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful.
|
||
|
||
A Win32 error code on failure.
|
||
|
||
--*/
|
||
|
||
{
|
||
DWORD status;
|
||
PRESUTIL_PROPERTY_ITEM propertyTable;
|
||
|
||
if ( ReadOnly ) {
|
||
propertyTable = CspClusterROCommonProperties;
|
||
} else {
|
||
propertyTable = CspClusterCommonProperties;
|
||
}
|
||
|
||
//
|
||
// Get the common properties.
|
||
//
|
||
status = ClRtlGetProperties( RegistryKey,
|
||
&CspClusterRegApis,
|
||
propertyTable,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required );
|
||
|
||
return(status);
|
||
|
||
} // CspClusterGetCommonProperties
|
||
|
||
|
||
|
||
DWORD
|
||
CspClusterValidateCommonProperties(
|
||
IN HDMKEY RegistryKey,
|
||
IN PVOID InBuffer,
|
||
IN DWORD InBufferSize
|
||
)
|
||
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Validates the common properties for a given cluster.
|
||
|
||
Arguments:
|
||
|
||
Node - Supplies the cluster object.
|
||
|
||
InBuffer - Supplies the input buffer.
|
||
|
||
InBufferSize - Supplies the size of the input buffer.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful.
|
||
|
||
A Win32 error code on failure.
|
||
|
||
--*/
|
||
|
||
{
|
||
DWORD status;
|
||
|
||
//
|
||
// Validate the property list.
|
||
//
|
||
status = ClRtlVerifyPropertyTable( CspClusterCommonProperties,
|
||
NULL, // Reserved
|
||
FALSE, // Don't allow unknowns
|
||
InBuffer,
|
||
InBufferSize,
|
||
NULL );
|
||
|
||
if ( status != ERROR_SUCCESS ) {
|
||
ClRtlLogPrint( LOG_CRITICAL,
|
||
"[CS] ValidateCommonProperties, error in verify routine.\n");
|
||
}
|
||
|
||
return(status);
|
||
|
||
} // CspClusterValidateCommonProperties
|
||
|
||
|
||
|
||
DWORD
|
||
CspClusterSetCommonProperties(
|
||
IN HDMKEY RegistryKey,
|
||
IN PVOID InBuffer,
|
||
IN DWORD InBufferSize
|
||
)
|
||
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Sets the common properties for a given cluster.
|
||
|
||
Arguments:
|
||
|
||
Node - Supplies the cluster object.
|
||
|
||
InBuffer - Supplies the input buffer.
|
||
|
||
InBufferSize - Supplies the size of the input buffer.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful.
|
||
|
||
A Win32 error code on failure.
|
||
|
||
--*/
|
||
|
||
{
|
||
DWORD status;
|
||
|
||
PSECURITY_DESCRIPTOR pSecurityDescriptor = NULL;
|
||
DWORD cbSecurityDescriptorSize = 0;
|
||
|
||
PRESUTIL_PROPERTY_ITEM pOtherPropertyTable = NULL;
|
||
LPBYTE pOtherParameterBlock = NULL;
|
||
|
||
BOOL bSDFound = FALSE;
|
||
BOOL bSecurityFound = FALSE;
|
||
|
||
DWORD dwValue;
|
||
|
||
//
|
||
// Only one of securityInfo or sdInfo is going to be used at at time.
|
||
// So use a union.
|
||
//
|
||
union
|
||
{
|
||
CS_CLUSTER_SECURITY_INFO securityInfo;
|
||
CS_CLUSTER_SD_INFO sdInfo;
|
||
|
||
} paramBlocks;
|
||
|
||
|
||
//
|
||
// Dummy do-while loop to avoid gotos
|
||
//
|
||
do
|
||
{
|
||
//
|
||
// Validate the property list.
|
||
//
|
||
status = ClRtlVerifyPropertyTable(
|
||
CspClusterCommonProperties,
|
||
NULL, // Reserved
|
||
FALSE, // Don't allow unknowns
|
||
InBuffer,
|
||
InBufferSize,
|
||
NULL );
|
||
|
||
if ( status != ERROR_SUCCESS ) {
|
||
ClRtlLogPrint( LOG_CRITICAL,
|
||
"[CS] ClusterSetCommonProperties, error trying to verify property table. %1!u!\n",
|
||
status);
|
||
break;
|
||
}
|
||
|
||
//
|
||
// Set all the properties that were passed in.
|
||
//
|
||
status = ClRtlSetPropertyTable(
|
||
NULL,
|
||
RegistryKey,
|
||
&CspClusterRegApis,
|
||
CspClusterCommonProperties,
|
||
NULL, // Reserved
|
||
FALSE, // Don't allow unknowns
|
||
InBuffer,
|
||
InBufferSize,
|
||
FALSE, // bForceWrite
|
||
NULL
|
||
);
|
||
|
||
if ( status != ERROR_SUCCESS ) {
|
||
ClRtlLogPrint( LOG_CRITICAL,
|
||
"[CS] ClusterSetCommonProperties, error trying to set properties in table. %1!u!\n",
|
||
status);
|
||
break;
|
||
}
|
||
|
||
//
|
||
// Clear the parameter blocks.
|
||
//
|
||
ZeroMemory( ¶mBlocks, sizeof( paramBlocks ) );
|
||
|
||
//
|
||
// See if the "Security Descriptor" property exists in the input
|
||
// property list. If so, set the 'Security' property also.
|
||
|
||
status = ClRtlFindBinaryProperty(
|
||
InBuffer,
|
||
InBufferSize,
|
||
CLUSREG_NAME_CLUS_SD,
|
||
(LPBYTE *) &pSecurityDescriptor,
|
||
&cbSecurityDescriptorSize
|
||
);
|
||
|
||
if ( status == ERROR_SUCCESS ) {
|
||
//
|
||
// The 'Security Descriptor' property is present.
|
||
// Choose this over the 'Security' property.
|
||
//
|
||
if ( cbSecurityDescriptorSize > 0 ) {
|
||
//
|
||
// A security descriptor of nonzero size has been found.
|
||
// Check if this is a valid security descriptor.
|
||
//
|
||
if ( IsValidSecurityDescriptor( pSecurityDescriptor ) == FALSE ) {
|
||
//
|
||
// Return the most appropriate error code, since IsValidSecurityDescriptor
|
||
// does not provide extended error information.
|
||
//
|
||
ClRtlLogPrint( LOG_CRITICAL,
|
||
"[CS] ClusterSetCommonProperties, Invalid security descriptor.\n");
|
||
status = ERROR_INVALID_DATA;
|
||
break;
|
||
}
|
||
|
||
paramBlocks.securityInfo.Security = ClRtlConvertClusterSDToNT4Format( pSecurityDescriptor );
|
||
paramBlocks.securityInfo.SecurityLength = GetSecurityDescriptorLength(
|
||
paramBlocks.securityInfo.Security );
|
||
}
|
||
else {
|
||
//
|
||
// The security string could have been passed in, but it may be
|
||
// a zero length buffer. In this case, we will delete the
|
||
// Security property too.
|
||
//
|
||
paramBlocks.securityInfo.Security = NULL;
|
||
paramBlocks.securityInfo.SecurityLength = 0;
|
||
}
|
||
|
||
bSDFound = TRUE;
|
||
pOtherPropertyTable = CspClusterSecurityProperty;
|
||
pOtherParameterBlock = (LPBYTE) ¶mBlocks.securityInfo;
|
||
}
|
||
else {
|
||
//
|
||
// We haven't found a valid security descriptor so far.
|
||
//
|
||
PSECURITY_DESCRIPTOR pSecurity = NULL;
|
||
DWORD cbSecuritySize = 0;
|
||
|
||
status = ClRtlFindBinaryProperty(
|
||
InBuffer,
|
||
InBufferSize,
|
||
CLUSREG_NAME_CLUS_SECURITY,
|
||
(LPBYTE *) &pSecurity,
|
||
&cbSecuritySize
|
||
);
|
||
|
||
if ( status == ERROR_SUCCESS ) {
|
||
if ( cbSecuritySize > 0 ) {
|
||
//
|
||
// A security descriptor of nonzero size has been found.
|
||
// Check if this is a valid security descriptor.
|
||
//
|
||
if ( IsValidSecurityDescriptor( pSecurity ) == FALSE ) {
|
||
//
|
||
// Return the most appropriate error code, since IsValidSecurityDescriptor
|
||
// does not provide extended error information.
|
||
//
|
||
ClRtlLogPrint( LOG_CRITICAL,
|
||
"[CS] ClusterSetCommonProperties, Invalid security descriptor.\n");
|
||
status = ERROR_INVALID_DATA;
|
||
break;
|
||
}
|
||
|
||
//
|
||
// Since we will not be modifying the info pointed to by the parameter block,
|
||
// just point it to the right place in the input buffer itself.
|
||
// A valid NT4 security descriptor is valid for NT5 too.
|
||
//
|
||
paramBlocks.sdInfo.SecurityDescriptor = pSecurity;
|
||
paramBlocks.sdInfo.SecurityDescriptorLength = cbSecuritySize;
|
||
}
|
||
else {
|
||
//
|
||
// The security string could have been passed in, but it may be
|
||
// a zero length buffer. In this case, we will delete the
|
||
// Security Descriptor property too.
|
||
//
|
||
paramBlocks.sdInfo.SecurityDescriptor = NULL;
|
||
paramBlocks.sdInfo.SecurityDescriptorLength = 0;
|
||
}
|
||
|
||
bSecurityFound = TRUE;
|
||
pOtherPropertyTable = CspClusterSDProperty;
|
||
pOtherParameterBlock = (LPBYTE) ¶mBlocks.sdInfo;
|
||
}
|
||
else {
|
||
//
|
||
// We didn't find any security information.
|
||
// Nevertheless, we were successful in setting the properties.
|
||
//
|
||
status = ERROR_SUCCESS;
|
||
}
|
||
}
|
||
|
||
if ( ( bSDFound != FALSE ) || ( bSecurityFound != FALSE ) ) {
|
||
PVOID pPropertyList = NULL;
|
||
DWORD cbPropertyListSize = 0;
|
||
DWORD cbBytesReturned = 0;
|
||
DWORD cbBytesRequired = 0;
|
||
|
||
//
|
||
// Create a new property list to incorporate the changed security information.
|
||
//
|
||
status = ClRtlPropertyListFromParameterBlock(
|
||
pOtherPropertyTable,
|
||
NULL, // OUT PVOID pOutPropertyList
|
||
&cbPropertyListSize, // IN OUT LPDWORD pcbOutPropertyListSize
|
||
pOtherParameterBlock,
|
||
&cbBytesReturned,
|
||
&cbBytesRequired
|
||
);
|
||
|
||
if ( status != ERROR_MORE_DATA ) {
|
||
//
|
||
// We have passed in a NULL buffer, so the return code has to
|
||
// be ERROR_MORE_DATA. Otherwise something else has gone wrong,
|
||
// so abort.
|
||
//
|
||
ClRtlLogPrint( LOG_CRITICAL,
|
||
"[CS] ClusterSetCommonProperties, Error getting temporary "
|
||
"property list size. %1!u!\n",
|
||
status);
|
||
break;
|
||
}
|
||
|
||
pPropertyList = LocalAlloc( LMEM_FIXED, cbBytesRequired );
|
||
if ( pPropertyList == NULL ) {
|
||
status = GetLastError();
|
||
ClRtlLogPrint( LOG_CRITICAL,
|
||
"[CS] ClusterSetCommonProperties, Error allocating memory "
|
||
"for property list. %1!u!\n",
|
||
status);
|
||
break;
|
||
}
|
||
cbPropertyListSize = cbBytesRequired;
|
||
|
||
status = ClRtlPropertyListFromParameterBlock(
|
||
pOtherPropertyTable,
|
||
pPropertyList,
|
||
&cbPropertyListSize,
|
||
pOtherParameterBlock,
|
||
&cbBytesReturned,
|
||
&cbBytesRequired
|
||
);
|
||
|
||
if ( status == ERROR_SUCCESS ) {
|
||
status = ClRtlSetPropertyTable(
|
||
NULL,
|
||
RegistryKey,
|
||
&CspClusterRegApis,
|
||
pOtherPropertyTable,
|
||
NULL, // Reserved
|
||
FALSE, // Don't allow unknowns
|
||
pPropertyList,
|
||
cbPropertyListSize,
|
||
FALSE, // bForceWrite
|
||
NULL
|
||
);
|
||
}
|
||
else {
|
||
ClRtlLogPrint( LOG_CRITICAL,
|
||
"[CS] ClusterSetCommonProperties, Error creating property list. %1!u!\n",
|
||
status);
|
||
|
||
LocalFree( pPropertyList );
|
||
break;
|
||
}
|
||
|
||
LocalFree( pPropertyList );
|
||
|
||
if ( status != ERROR_SUCCESS ) {
|
||
ClRtlLogPrint( LOG_CRITICAL,
|
||
"[CS] ClusterSetCommonProperties, error in setting property table. %1!u!\n",
|
||
status);
|
||
break;
|
||
}
|
||
}
|
||
}
|
||
while ( FALSE ); // do-while: dummy loop to avoid gotos
|
||
|
||
if (status == ERROR_SUCCESS) {
|
||
if ( ERROR_SUCCESS == ClRtlFindDwordProperty(
|
||
InBuffer,
|
||
InBufferSize,
|
||
CLUSREG_NAME_QUORUM_ARBITRATION_TIMEOUT,
|
||
&dwValue) )
|
||
{
|
||
ClRtlLogPrint( LOG_UNUSUAL, "[CS] Arbitration Timeout is changed %1!d! => %2!d!.\n",
|
||
MmQuorumArbitrationTimeout, dwValue);
|
||
MmQuorumArbitrationTimeout = dwValue;
|
||
}
|
||
if ( ERROR_SUCCESS == ClRtlFindDwordProperty(
|
||
InBuffer,
|
||
InBufferSize,
|
||
CLUSREG_NAME_QUORUM_ARBITRATION_EQUALIZER,
|
||
&dwValue) )
|
||
{
|
||
ClRtlLogPrint( LOG_UNUSUAL, "[CS] Arbitration Equalizer is changed %1!d! => %2!d!.\n",
|
||
MmQuorumArbitrationEqualizer, dwValue);
|
||
MmQuorumArbitrationEqualizer = dwValue;
|
||
}
|
||
if ( ClRtlFindDwordProperty(
|
||
InBuffer,
|
||
InBufferSize,
|
||
CLUSREG_NAME_DISABLE_GROUP_PREFERRED_OWNER_RANDOMIZATION,
|
||
&dwValue ) == ERROR_SUCCESS )
|
||
{
|
||
ClRtlLogPrint(LOG_NOISE, "[CS] Cluster common property %1!ws! is changed to %2!u!...\n",
|
||
CLUSREG_NAME_DISABLE_GROUP_PREFERRED_OWNER_RANDOMIZATION,
|
||
dwValue);
|
||
}
|
||
}
|
||
|
||
//
|
||
// If the 'Security Descriptor' property was found, free the memory allocated,
|
||
// to store the NT4 security descriptor.
|
||
//
|
||
if ( bSDFound != FALSE ) {
|
||
LocalFree( paramBlocks.securityInfo.Security );
|
||
}
|
||
|
||
return(status);
|
||
|
||
} // CspClusterSetCommonProperties
|
||
|
||
|
||
|
||
DWORD
|
||
CspClusterEnumPrivateProperties(
|
||
IN HDMKEY RegistryKey,
|
||
OUT PVOID OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
)
|
||
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Enumerates the private property names for a given cluster.
|
||
|
||
Arguments:
|
||
|
||
RegistryKey - Registry key for the cluster.
|
||
|
||
OutBuffer - Supplies the output buffer.
|
||
|
||
OutBufferSize - Supplies the size of the output buffer.
|
||
|
||
BytesReturned - The number of bytes returned in OutBuffer.
|
||
|
||
Required - The required number of bytes if OutBuffer is too small.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful.
|
||
|
||
A Win32 error code on failure.
|
||
|
||
--*/
|
||
|
||
{
|
||
HDMKEY parametersKey;
|
||
DWORD totalBufferSize = 0;
|
||
DWORD status;
|
||
|
||
*BytesReturned = 0;
|
||
*Required = 0;
|
||
|
||
//
|
||
// Clear the output buffer
|
||
//
|
||
ZeroMemory( OutBuffer, OutBufferSize );
|
||
|
||
//
|
||
// Open the cluster cluster parameters key.
|
||
//
|
||
parametersKey = DmOpenKey( RegistryKey,
|
||
CLUSREG_KEYNAME_PARAMETERS,
|
||
MAXIMUM_ALLOWED );
|
||
|
||
if ( parametersKey == NULL ) {
|
||
status = GetLastError();
|
||
if ( status == ERROR_FILE_NOT_FOUND ) {
|
||
status = ERROR_SUCCESS;
|
||
}
|
||
return(status);
|
||
}
|
||
|
||
//
|
||
// Enum the private properties for the cluster.
|
||
//
|
||
status = ClRtlEnumPrivateProperties( parametersKey,
|
||
&CspClusterRegApis,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required );
|
||
|
||
DmCloseKey( parametersKey );
|
||
|
||
return(status);
|
||
|
||
} // CspClusterEnumPrivateProperties
|
||
|
||
|
||
|
||
DWORD
|
||
CspClusterGetPrivateProperties(
|
||
IN HDMKEY RegistryKey,
|
||
OUT PVOID OutBuffer,
|
||
IN DWORD OutBufferSize,
|
||
OUT LPDWORD BytesReturned,
|
||
OUT LPDWORD Required
|
||
)
|
||
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Gets the private properties for a given cluster.
|
||
|
||
Arguments:
|
||
|
||
OutBuffer - Supplies the output buffer.
|
||
|
||
OutBufferSize - Supplies the size of the output buffer.
|
||
|
||
BytesReturned - The number of bytes returned in OutBuffer.
|
||
|
||
Required - The required number of bytes if OutBuffer is too small.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful.
|
||
|
||
A Win32 error code on failure.
|
||
|
||
--*/
|
||
|
||
{
|
||
DWORD status;
|
||
HDMKEY parametersKey;
|
||
DWORD totalBufferSize = 0;
|
||
|
||
*BytesReturned = 0;
|
||
*Required = 0;
|
||
|
||
//
|
||
// Clear the output buffer
|
||
//
|
||
ZeroMemory( OutBuffer, OutBufferSize );
|
||
|
||
//
|
||
// Open the cluster\parameters key.
|
||
//
|
||
parametersKey = DmOpenKey( RegistryKey,
|
||
CLUSREG_KEYNAME_PARAMETERS,
|
||
MAXIMUM_ALLOWED );
|
||
if ( parametersKey == NULL ) {
|
||
status = GetLastError();
|
||
if ( status == ERROR_FILE_NOT_FOUND ) {
|
||
//
|
||
// If we don't have a parameters key, then return an
|
||
// item count of 0 and an endmark.
|
||
//
|
||
totalBufferSize = sizeof(DWORD) + sizeof(CLUSPROP_SYNTAX);
|
||
if ( OutBufferSize < totalBufferSize ) {
|
||
*Required = totalBufferSize;
|
||
status = ERROR_MORE_DATA;
|
||
} else {
|
||
// This is somewhat redundant since we zero the
|
||
// buffer above, but it's here for clarity.
|
||
CLUSPROP_BUFFER_HELPER buf;
|
||
buf.pb = OutBuffer;
|
||
buf.pList->nPropertyCount = 0;
|
||
buf.pdw++;
|
||
buf.pSyntax->dw = CLUSPROP_SYNTAX_ENDMARK;
|
||
*BytesReturned = totalBufferSize;
|
||
status = ERROR_SUCCESS;
|
||
}
|
||
}
|
||
return(status);
|
||
}
|
||
|
||
//
|
||
// Get private properties for the cluster.
|
||
//
|
||
status = ClRtlGetPrivateProperties( parametersKey,
|
||
&CspClusterRegApis,
|
||
OutBuffer,
|
||
OutBufferSize,
|
||
BytesReturned,
|
||
Required );
|
||
|
||
DmCloseKey( parametersKey );
|
||
|
||
return(status);
|
||
|
||
} // CspClusterGetPrivateProperties
|
||
|
||
|
||
|
||
DWORD
|
||
CspClusterValidatePrivateProperties(
|
||
IN HDMKEY RegistryKey,
|
||
IN PVOID InBuffer,
|
||
IN DWORD InBufferSize
|
||
)
|
||
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Validates the private properties for a given cluster.
|
||
|
||
Arguments:
|
||
|
||
RegistryKey - Registry key for the cluster.
|
||
|
||
InBuffer - Supplies the input buffer.
|
||
|
||
InBufferSize - Supplies the size of the input buffer.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful.
|
||
|
||
A Win32 error code on failure.
|
||
|
||
--*/
|
||
|
||
{
|
||
DWORD status;
|
||
|
||
//
|
||
// Validate the property list.
|
||
//
|
||
status = ClRtlVerifyPrivatePropertyList( InBuffer,
|
||
InBufferSize );
|
||
|
||
return(status);
|
||
|
||
} // CspClusterValidatePrivateProperties
|
||
|
||
|
||
|
||
DWORD
|
||
CspClusterSetPrivateProperties(
|
||
IN HDMKEY RegistryKey,
|
||
IN PVOID InBuffer,
|
||
IN DWORD InBufferSize
|
||
)
|
||
|
||
/*++
|
||
|
||
Routine Description:
|
||
|
||
Sets the private properties for a given cluster.
|
||
|
||
Arguments:
|
||
|
||
RegistryKey - Registry key for the cluster.
|
||
|
||
InBuffer - Supplies the input buffer.
|
||
|
||
InBufferSize - Supplies the size of the input buffer.
|
||
|
||
Return Value:
|
||
|
||
ERROR_SUCCESS if successful.
|
||
|
||
A Win32 error code on failure.
|
||
|
||
--*/
|
||
|
||
{
|
||
DWORD status;
|
||
HDMKEY parametersKey;
|
||
DWORD disposition;
|
||
|
||
//
|
||
// Validate the property list.
|
||
//
|
||
status = ClRtlVerifyPrivatePropertyList( InBuffer,
|
||
InBufferSize );
|
||
|
||
if ( status == ERROR_SUCCESS ) {
|
||
|
||
//
|
||
// Open the cluster\parameters key
|
||
//
|
||
parametersKey = DmOpenKey( RegistryKey,
|
||
CLUSREG_KEYNAME_PARAMETERS,
|
||
MAXIMUM_ALLOWED );
|
||
if ( parametersKey == NULL ) {
|
||
status = GetLastError();
|
||
if ( status == ERROR_FILE_NOT_FOUND ) {
|
||
//
|
||
// Try to create the parameters key.
|
||
//
|
||
parametersKey = DmCreateKey( RegistryKey,
|
||
CLUSREG_KEYNAME_PARAMETERS,
|
||
0,
|
||
KEY_READ | KEY_WRITE,
|
||
NULL,
|
||
&disposition );
|
||
if ( parametersKey == NULL ) {
|
||
status = GetLastError();
|
||
return(status);
|
||
}
|
||
}
|
||
}
|
||
|
||
status = ClRtlSetPrivatePropertyList( NULL, // IN HANDLE hXsaction
|
||
parametersKey,
|
||
&CspClusterRegApis,
|
||
InBuffer,
|
||
InBufferSize );
|
||
|
||
DmCloseKey( parametersKey );
|
||
}
|
||
|
||
return(status);
|
||
|
||
} // CspClusterSetPrivateProperties
|