/*++
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