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.
526 lines
12 KiB
526 lines
12 KiB
//+---------------------------------------------------------------------------
|
|
//
|
|
// Microsoft Windows
|
|
// Copyright (C) Microsoft Corporation, 1996 - 1997.
|
|
//
|
|
// File: var2IIS.cxx
|
|
//
|
|
// Contents: IIS Object to Variant Copy Routines
|
|
//
|
|
// Functions:
|
|
//
|
|
// History: 01-Mar-97 SophiaC Created.
|
|
//
|
|
// Issues: Check null ptrs for AllocADsMem and AllocADsStr
|
|
//
|
|
//----------------------------------------------------------------------------
|
|
#include "iis.hxx"
|
|
|
|
//
|
|
// IISType objects copy code
|
|
//
|
|
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdDWORD(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
|
|
|
|
hr = VariantChangeType(lpVarSrcObject,
|
|
lpVarSrcObject,
|
|
0,
|
|
VT_UI4);
|
|
if (FAILED(hr)) {
|
|
if (hr == E_OUTOFMEMORY) {
|
|
RRETURN(hr);
|
|
}
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_DWORD;
|
|
|
|
lpIISDestObject->IISValue.value_1.dwDWORD =
|
|
lpVarSrcObject->lVal;
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdSTRING(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
|
|
hr = VariantChangeType(lpVarSrcObject,
|
|
lpVarSrcObject,
|
|
0,
|
|
VT_BSTR);
|
|
if (FAILED(hr)) {
|
|
if (hr == E_OUTOFMEMORY) {
|
|
RRETURN(hr);
|
|
}
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_STRING;
|
|
|
|
lpIISDestObject->IISValue.value_2.String =
|
|
AllocADsStr(
|
|
lpVarSrcObject->bstrVal
|
|
);
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdEXPANDSZ(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject
|
|
)
|
|
|
|
{
|
|
HRESULT hr = S_OK;
|
|
|
|
hr = VariantChangeType(lpVarSrcObject,
|
|
lpVarSrcObject,
|
|
0,
|
|
VT_BSTR);
|
|
if (FAILED(hr)) {
|
|
if (hr == E_OUTOFMEMORY) {
|
|
RRETURN(hr);
|
|
}
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_EXPANDSZ;
|
|
|
|
lpIISDestObject->IISValue.value_3.ExpandSz =
|
|
AllocADsStr(
|
|
lpVarSrcObject->bstrVal
|
|
);
|
|
|
|
RRETURN(hr);
|
|
|
|
}
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdMULTISZ(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
|
|
hr = VariantChangeType(lpVarSrcObject,
|
|
lpVarSrcObject,
|
|
0,
|
|
VT_BSTR);
|
|
if (FAILED(hr)) {
|
|
if (hr == E_OUTOFMEMORY) {
|
|
RRETURN(hr);
|
|
}
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_MULTISZ;
|
|
|
|
lpIISDestObject->IISValue.value_4.MultiSz =
|
|
AllocADsStr(
|
|
lpVarSrcObject->bstrVal
|
|
);
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdMIMEMAP(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
LPWSTR pszStr;
|
|
IISMimeType * pMimeType = NULL;
|
|
|
|
if(lpVarSrcObject->vt != VT_DISPATCH){
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_MIMEMAP;
|
|
pMimeType = (IISMimeType *)lpVarSrcObject->pdispVal;
|
|
|
|
hr = ((CMimeType*) pMimeType)->CopyMimeType(
|
|
&pszStr
|
|
);
|
|
BAIL_ON_FAILURE(hr);
|
|
|
|
lpIISDestObject->IISValue.value_6.MimeMap = pszStr;
|
|
|
|
error:
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
|
|
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdBinary(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject,
|
|
BOOL bReturnBinaryAsVT_VARIANT
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
LONG dwSLBound = 0;
|
|
LONG dwSUBound = 0;
|
|
CHAR HUGEP *pArray = NULL;
|
|
|
|
if (bReturnBinaryAsVT_VARIANT)
|
|
{
|
|
hr = VariantChangeType(lpVarSrcObject,lpVarSrcObject,0,VT_ARRAY | VT_VARIANT);
|
|
}
|
|
else
|
|
{
|
|
hr = VariantChangeType(lpVarSrcObject,lpVarSrcObject,0,VT_ARRAY | VT_UI1);
|
|
}
|
|
|
|
if (FAILED(hr)) {
|
|
if (hr == E_OUTOFMEMORY) {
|
|
RRETURN(hr);
|
|
}
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
if (bReturnBinaryAsVT_VARIANT)
|
|
{
|
|
if( lpVarSrcObject->vt != (VT_ARRAY | VT_VARIANT)) {
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if( lpVarSrcObject->vt != (VT_ARRAY | VT_UI1)) {
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
}
|
|
|
|
hr = SafeArrayGetLBound(V_ARRAY(lpVarSrcObject),1,(long FAR *) &dwSLBound );
|
|
BAIL_ON_FAILURE(hr);
|
|
|
|
hr = SafeArrayGetUBound(V_ARRAY(lpVarSrcObject),1,(long FAR *) &dwSUBound );
|
|
BAIL_ON_FAILURE(hr);
|
|
|
|
lpIISDestObject->IISValue.value_5.Binary = (LPBYTE) AllocADsMem(dwSUBound - dwSLBound + 1);
|
|
if (lpIISDestObject->IISValue.value_5.Binary == NULL)
|
|
{
|
|
hr = E_OUTOFMEMORY;
|
|
BAIL_ON_FAILURE(hr);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_BINARY;
|
|
lpIISDestObject->IISValue.value_5.Length = dwSUBound - dwSLBound + 1;
|
|
|
|
hr = SafeArrayAccessData( V_ARRAY(lpVarSrcObject),(void HUGEP * FAR *) &pArray );
|
|
BAIL_ON_FAILURE(hr);
|
|
memcpy( lpIISDestObject->IISValue.value_5.Binary,pArray,dwSUBound-dwSLBound+1);
|
|
SafeArrayUnaccessData( V_ARRAY(lpVarSrcObject) );
|
|
|
|
error:
|
|
RRETURN(hr);
|
|
}
|
|
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdNTACL(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
IADsSecurityDescriptor FAR * pSecDes = NULL;
|
|
PSECURITY_DESCRIPTOR pSecurityDescriptor = NULL;
|
|
DWORD Length = 0;
|
|
IDispatch FAR * pDispatch = NULL;
|
|
|
|
if(lpVarSrcObject->vt != VT_DISPATCH){
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_BINARY;
|
|
pDispatch = V_DISPATCH(lpVarSrcObject);
|
|
|
|
hr = pDispatch->QueryInterface(
|
|
IID_IADsSecurityDescriptor,
|
|
(void **)&pSecDes
|
|
);
|
|
BAIL_ON_FAILURE(hr);
|
|
|
|
hr = ConvertSecurityDescriptorToSecDes(
|
|
pSecDes,
|
|
&pSecurityDescriptor,
|
|
&Length
|
|
);
|
|
BAIL_ON_FAILURE(hr);
|
|
|
|
lpIISDestObject->IISValue.value_5.Binary = (LPBYTE)AllocADsMem(Length);
|
|
if ((lpIISDestObject->IISValue.value_5.Binary) == NULL) {
|
|
hr = E_OUTOFMEMORY;
|
|
BAIL_ON_FAILURE(hr);
|
|
}
|
|
|
|
lpIISDestObject->IISValue.value_5.Length = Length;
|
|
memcpy(lpIISDestObject->IISValue.value_5.Binary, pSecurityDescriptor,
|
|
Length);
|
|
|
|
error:
|
|
|
|
if (pSecDes) {
|
|
pSecDes->Release();
|
|
}
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdIPSECLIST(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
LPBYTE pBuffer;
|
|
DWORD Length = 0;
|
|
IISIPSecurity * pIPSec = NULL;
|
|
|
|
if(lpVarSrcObject->vt != VT_DISPATCH){
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_IPSECLIST;
|
|
pIPSec = (IISIPSecurity*)lpVarSrcObject->pdispVal;
|
|
|
|
hr = ((CIPSecurity*) pIPSec)->CopyIPSecurity(
|
|
&pBuffer,
|
|
&Length
|
|
);
|
|
|
|
if (pBuffer == NULL) {
|
|
RRETURN(E_OUTOFMEMORY);
|
|
}
|
|
|
|
lpIISDestObject->IISValue.value_5.Length = Length;
|
|
lpIISDestObject->IISValue.value_5.Binary = (LPBYTE)AllocADsMem(Length);
|
|
memcpy(lpIISDestObject->IISValue.value_5.Binary, pBuffer, Length);
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdBOOL(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
|
|
hr = VariantChangeType(lpVarSrcObject,
|
|
lpVarSrcObject,
|
|
0,
|
|
VT_BOOL);
|
|
if (FAILED(hr)) {
|
|
if (hr == E_OUTOFMEMORY) {
|
|
RRETURN(hr);
|
|
}
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_BOOL;
|
|
|
|
lpIISDestObject->IISValue.value_1.dwDWORD =
|
|
(lpVarSrcObject->boolVal) ? 1 : 0;
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyIISSynIdBOOLBITMASK(
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
|
|
hr = VariantChangeType(lpVarSrcObject,
|
|
lpVarSrcObject,
|
|
0,
|
|
VT_BOOL);
|
|
if (FAILED(hr)) {
|
|
if (hr == E_OUTOFMEMORY) {
|
|
RRETURN(hr);
|
|
}
|
|
RRETURN(hr = E_ADS_CANT_CONVERT_DATATYPE);
|
|
}
|
|
|
|
lpIISDestObject->IISType = IIS_SYNTAX_ID_BOOL_BITMASK;
|
|
|
|
lpIISDestObject->IISValue.value_1.dwDWORD =
|
|
(lpVarSrcObject->boolVal) ? 1 : 0;
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopy(
|
|
DWORD dwIISType,
|
|
PVARIANT lpVarSrcObject,
|
|
PIISOBJECT lpIISDestObject,
|
|
BOOL bReturnBinaryAsVT_VARIANT
|
|
)
|
|
{
|
|
HRESULT hr = S_OK;
|
|
switch (dwIISType){
|
|
case IIS_SYNTAX_ID_DWORD:
|
|
hr = VarTypeToIISTypeCopyIISSynIdDWORD(
|
|
lpVarSrcObject,
|
|
lpIISDestObject
|
|
);
|
|
break;
|
|
|
|
case IIS_SYNTAX_ID_STRING:
|
|
hr = VarTypeToIISTypeCopyIISSynIdSTRING(
|
|
lpVarSrcObject,
|
|
lpIISDestObject
|
|
);
|
|
break;
|
|
|
|
|
|
case IIS_SYNTAX_ID_EXPANDSZ:
|
|
hr = VarTypeToIISTypeCopyIISSynIdEXPANDSZ(
|
|
lpVarSrcObject,
|
|
lpIISDestObject
|
|
);
|
|
break;
|
|
|
|
case IIS_SYNTAX_ID_MULTISZ:
|
|
hr = VarTypeToIISTypeCopyIISSynIdMULTISZ(
|
|
lpVarSrcObject,
|
|
lpIISDestObject
|
|
);
|
|
break;
|
|
|
|
case IIS_SYNTAX_ID_MIMEMAP:
|
|
hr = VarTypeToIISTypeCopyIISSynIdMIMEMAP(
|
|
lpVarSrcObject,
|
|
lpIISDestObject
|
|
);
|
|
break;
|
|
|
|
case IIS_SYNTAX_ID_NTACL:
|
|
hr = VarTypeToIISTypeCopyIISSynIdNTACL(
|
|
lpVarSrcObject,
|
|
lpIISDestObject
|
|
);
|
|
break;
|
|
|
|
case IIS_SYNTAX_ID_BINARY:
|
|
hr = VarTypeToIISTypeCopyIISSynIdBinary(
|
|
lpVarSrcObject,
|
|
lpIISDestObject,
|
|
bReturnBinaryAsVT_VARIANT
|
|
);
|
|
break;
|
|
|
|
case IIS_SYNTAX_ID_IPSECLIST:
|
|
hr = VarTypeToIISTypeCopyIISSynIdIPSECLIST(
|
|
lpVarSrcObject,
|
|
lpIISDestObject
|
|
);
|
|
break;
|
|
|
|
case IIS_SYNTAX_ID_BOOL:
|
|
hr = VarTypeToIISTypeCopyIISSynIdBOOL(
|
|
lpVarSrcObject,
|
|
lpIISDestObject
|
|
);
|
|
break;
|
|
|
|
case IIS_SYNTAX_ID_BOOL_BITMASK:
|
|
hr = VarTypeToIISTypeCopyIISSynIdBOOLBITMASK(
|
|
lpVarSrcObject,
|
|
lpIISDestObject
|
|
);
|
|
break;
|
|
|
|
default:
|
|
hr = E_FAIL;
|
|
break;
|
|
}
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
|
|
|
|
HRESULT
|
|
VarTypeToIISTypeCopyConstruct(
|
|
DWORD dwIISType,
|
|
LPVARIANT pVarSrcObjects,
|
|
DWORD dwNumObjects,
|
|
LPIISOBJECT * ppIISDestObjects,
|
|
BOOL bReturnBinaryAsVT_VARIANT
|
|
)
|
|
{
|
|
|
|
DWORD i = 0;
|
|
LPIISOBJECT pIISDestObjects = NULL;
|
|
HRESULT hr = S_OK;
|
|
|
|
pIISDestObjects = (LPIISOBJECT)AllocADsMem(
|
|
dwNumObjects * sizeof(IISOBJECT)
|
|
);
|
|
|
|
if (!pIISDestObjects) {
|
|
RRETURN(E_FAIL);
|
|
}
|
|
|
|
for (i = 0; i < dwNumObjects; i++ ) {
|
|
hr = VarTypeToIISTypeCopy(
|
|
dwIISType,
|
|
pVarSrcObjects + i,
|
|
pIISDestObjects + i,
|
|
bReturnBinaryAsVT_VARIANT
|
|
);
|
|
BAIL_ON_FAILURE(hr);
|
|
|
|
}
|
|
|
|
*ppIISDestObjects = pIISDestObjects;
|
|
|
|
RRETURN(S_OK);
|
|
|
|
error:
|
|
|
|
if (pIISDestObjects) {
|
|
|
|
IISTypeFreeIISObjects(
|
|
pIISDestObjects,
|
|
dwNumObjects
|
|
);
|
|
}
|
|
|
|
*ppIISDestObjects = NULL;
|
|
|
|
RRETURN(hr);
|
|
}
|
|
|
|
|