331 lines
9.7 KiB
C++
331 lines
9.7 KiB
C++
|
//#--------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// File: convertvsa.cpp
|
||
|
|
//
|
||
|
|
// Synopsis: Implementation of SdoProfile class methods
|
||
|
|
// which are used to convert a SDO VSA attribute
|
||
|
|
// to an IAS VSA attribute
|
||
|
|
//
|
||
|
|
// History: 06/16/98 MKarki Created
|
||
|
|
//
|
||
|
|
// Copyright (C) 1997-98 Microsoft Corporation
|
||
|
|
// All rights reserved.
|
||
|
|
//
|
||
|
|
//----------------------------------------------------------------
|
||
|
|
#include "stdafx.h"
|
||
|
|
#include <iasattr.h>
|
||
|
|
#include <winsock2.h>
|
||
|
|
#include "sdoprofile.h"
|
||
|
|
|
||
|
|
//
|
||
|
|
// here the VSA format types as enum
|
||
|
|
//
|
||
|
|
typedef enum _rfc_format_
|
||
|
|
{
|
||
|
|
NONRFC_HEX,
|
||
|
|
RFC_STRING,
|
||
|
|
RFC_DEC,
|
||
|
|
RFC_HEx
|
||
|
|
|
||
|
|
} VSAFORMAT;
|
||
|
|
|
||
|
|
//
|
||
|
|
// these are constants which give the size of the VSA fields in the
|
||
|
|
// SDO
|
||
|
|
//
|
||
|
|
const DWORD VSA_FORMAT_SIZE = 2;
|
||
|
|
const DWORD VENDOR_ID_SIZE = 8;
|
||
|
|
const DWORD VENDOR_TYPE_SIZE = 2;
|
||
|
|
const DWORD VENDOR_LENGTH_SIZE = 2;
|
||
|
|
const DWORD MAX_ATTRIBUTE_LENGTH = 253;
|
||
|
|
const DWORD MAX_ASCII = 127;
|
||
|
|
|
||
|
|
//++--------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: VSAAttributeFromVariant
|
||
|
|
//
|
||
|
|
// Synopsis: This is the private method of class
|
||
|
|
// CSdoProfile. It is used to convert a
|
||
|
|
// VSA SDO attribute to a VSA IAS attribute
|
||
|
|
//
|
||
|
|
// Arguments:
|
||
|
|
// [in] VARIANT*
|
||
|
|
// [in] IASTYPE
|
||
|
|
//
|
||
|
|
// Returns: PIASATTRIBUTE
|
||
|
|
//
|
||
|
|
//
|
||
|
|
// History: MKarki Created 05/21/98
|
||
|
|
//
|
||
|
|
//----------------------------------------------------------------
|
||
|
|
PIASATTRIBUTE
|
||
|
|
CSdoProfile::VSAAttributeFromVariant (
|
||
|
|
VARIANT *pVariant,
|
||
|
|
IASTYPE iasType
|
||
|
|
)
|
||
|
|
{
|
||
|
|
|
||
|
|
BOOL bStatus = FALSE;
|
||
|
|
PBYTE pBuffer = NULL;
|
||
|
|
WCHAR wstrTemp [MAX_ATTRIBUTE_LENGTH +1];
|
||
|
|
PBYTE pHexString = NULL;
|
||
|
|
DWORD dwFilledBuffer = 0;
|
||
|
|
PDWORD pdwValue = NULL;
|
||
|
|
PIASATTRIBUTE pIasAttribute = NULL;
|
||
|
|
|
||
|
|
_ASSERT (NULL != pVariant);
|
||
|
|
|
||
|
|
//
|
||
|
|
// if this is a VSA attribute than the type can only be
|
||
|
|
// IASTYPE_OCTET_STRING
|
||
|
|
//
|
||
|
|
_ASSERT (IASTYPE_OCTET_STRING == iasType);
|
||
|
|
|
||
|
|
__try
|
||
|
|
{
|
||
|
|
|
||
|
|
//
|
||
|
|
// Allocate an attribute to hold the result.
|
||
|
|
//
|
||
|
|
DWORD dwRetVal = ::IASAttributeAlloc (1, &pIasAttribute);
|
||
|
|
if ( 0 != dwRetVal )
|
||
|
|
__leave;
|
||
|
|
|
||
|
|
//
|
||
|
|
// Allocate the memory for the IAS attribute
|
||
|
|
//
|
||
|
|
PBYTE pBuffer = reinterpret_cast <PBYTE>
|
||
|
|
(::CoTaskMemAlloc(MAX_ATTRIBUTE_LENGTH));
|
||
|
|
if (NULL == pBuffer)
|
||
|
|
{
|
||
|
|
IASTracePrintf("Error in Profile VSAAttributeFromVariant() - CoTaskMemAlloc() failed...");
|
||
|
|
__leave;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
PWCHAR pStrStart = V_BSTR (pVariant);
|
||
|
|
//
|
||
|
|
// get the size of the string passed in
|
||
|
|
//
|
||
|
|
DWORD dwVsaLength = wcslen (pStrStart);
|
||
|
|
|
||
|
|
_ASSERT (
|
||
|
|
(dwVsaLength >= VSA_FORMAT_SIZE) &&
|
||
|
|
(dwVsaLength <= MAX_ATTRIBUTE_LENGTH)
|
||
|
|
);
|
||
|
|
|
||
|
|
// get the VSA format stored as the first 2 characters of the
|
||
|
|
// string
|
||
|
|
//
|
||
|
|
lstrcpynW (wstrTemp, pStrStart, VSA_FORMAT_SIZE +1);
|
||
|
|
DWORD dwFormat = wcstoul (wstrTemp, NULL, 16);
|
||
|
|
pStrStart += VSA_FORMAT_SIZE;
|
||
|
|
|
||
|
|
// get the vendor ID now
|
||
|
|
//
|
||
|
|
PDWORD pdwVendorId = reinterpret_cast <PDWORD> (pBuffer);
|
||
|
|
lstrcpyn (wstrTemp, pStrStart, VENDOR_ID_SIZE +1);
|
||
|
|
*pdwVendorId = htonl (wcstoul (wstrTemp, NULL, 16));
|
||
|
|
pStrStart += VENDOR_ID_SIZE;
|
||
|
|
dwFilledBuffer += sizeof (DWORD);
|
||
|
|
|
||
|
|
// take different action depending upon the VSA format
|
||
|
|
//
|
||
|
|
if (NONRFC_HEX == dwFormat)
|
||
|
|
{
|
||
|
|
// Non RFC Format
|
||
|
|
//
|
||
|
|
_ASSERT (dwVsaLength > (VSA_FORMAT_SIZE + VENDOR_ID_SIZE));
|
||
|
|
|
||
|
|
// go through the characters in string and convert to hex
|
||
|
|
//
|
||
|
|
for (
|
||
|
|
dwVsaLength -= (VSA_FORMAT_SIZE + VENDOR_ID_SIZE),
|
||
|
|
pHexString = pBuffer + dwFilledBuffer;
|
||
|
|
((dwFilledBuffer < MAX_ATTRIBUTE_LENGTH) &&
|
||
|
|
(dwVsaLength > 0));
|
||
|
|
pStrStart += 2, dwVsaLength -= 2,
|
||
|
|
pHexString++, dwFilledBuffer++
|
||
|
|
)
|
||
|
|
{
|
||
|
|
//TODO - change use of wcstoul to convert string to hex
|
||
|
|
//
|
||
|
|
lstrcpynW (wstrTemp, pStrStart, 3);
|
||
|
|
*pHexString = wcstoul (wstrTemp, NULL, 16);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
//
|
||
|
|
// RFC compliant format
|
||
|
|
//
|
||
|
|
_ASSERT (dwVsaLength >
|
||
|
|
(VSA_FORMAT_SIZE + VENDOR_ID_SIZE +
|
||
|
|
VENDOR_TYPE_SIZE + VENDOR_LENGTH_SIZE)
|
||
|
|
);
|
||
|
|
|
||
|
|
//
|
||
|
|
// get vendor Type
|
||
|
|
//
|
||
|
|
PBYTE pVendorType = reinterpret_cast <PBYTE>
|
||
|
|
(pBuffer + dwFilledBuffer);
|
||
|
|
lstrcpyn (wstrTemp, pStrStart, VENDOR_TYPE_SIZE + 1);
|
||
|
|
*pVendorType = wcstoul (wstrTemp, NULL, 16);
|
||
|
|
pStrStart += VENDOR_TYPE_SIZE;
|
||
|
|
dwFilledBuffer += sizeof (BYTE);
|
||
|
|
|
||
|
|
//
|
||
|
|
// get vendor Length
|
||
|
|
//
|
||
|
|
PBYTE pVendorLength = reinterpret_cast <PBYTE>
|
||
|
|
(pBuffer +dwFilledBuffer);
|
||
|
|
lstrcpyn (wstrTemp, pStrStart, VENDOR_LENGTH_SIZE +1);
|
||
|
|
*pVendorLength = wcstoul (wstrTemp, NULL, 16);
|
||
|
|
pStrStart += VENDOR_LENGTH_SIZE;
|
||
|
|
dwFilledBuffer += sizeof (BYTE);
|
||
|
|
|
||
|
|
//
|
||
|
|
// now we do processing specific to each specific RFC
|
||
|
|
// compliant VSA type
|
||
|
|
//
|
||
|
|
switch (dwFormat)
|
||
|
|
{
|
||
|
|
case RFC_STRING: // RFC compliant string format
|
||
|
|
|
||
|
|
dwFilledBuffer += wcstombs (
|
||
|
|
reinterpret_cast <PCHAR>
|
||
|
|
(pBuffer + dwFilledBuffer),
|
||
|
|
pStrStart,
|
||
|
|
MAX_ATTRIBUTE_LENGTH - (dwFilledBuffer + 1)
|
||
|
|
);
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 2: // RFC compliant decimal format
|
||
|
|
|
||
|
|
//
|
||
|
|
// get decimal value
|
||
|
|
//
|
||
|
|
pdwValue = reinterpret_cast <PDWORD>
|
||
|
|
(pBuffer + dwFilledBuffer);
|
||
|
|
*pdwValue = htonl (wcstoul (pStrStart, NULL, 16));
|
||
|
|
dwFilledBuffer += sizeof (DWORD);
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 3: // RFC compliant HEX format
|
||
|
|
//
|
||
|
|
// go through the characters in string and convert to hex
|
||
|
|
//
|
||
|
|
dwVsaLength -= (VSA_FORMAT_SIZE + VENDOR_ID_SIZE +
|
||
|
|
VENDOR_TYPE_SIZE + VENDOR_LENGTH_SIZE);
|
||
|
|
pHexString = reinterpret_cast <PBYTE>
|
||
|
|
(pBuffer + dwFilledBuffer);
|
||
|
|
|
||
|
|
//
|
||
|
|
// convert the Hex values into bytes
|
||
|
|
//
|
||
|
|
for (;
|
||
|
|
((dwFilledBuffer < MAX_ATTRIBUTE_LENGTH) &&
|
||
|
|
(dwVsaLength > 0));
|
||
|
|
pStrStart += 2, dwVsaLength -= 2,
|
||
|
|
pHexString++, dwFilledBuffer++
|
||
|
|
)
|
||
|
|
{
|
||
|
|
lstrcpynW (wstrTemp, pStrStart, 3);
|
||
|
|
*pHexString = wcstoul (wstrTemp, NULL, 16);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
default:
|
||
|
|
//
|
||
|
|
// error
|
||
|
|
//
|
||
|
|
IASTracePrintf("Error in SDO Profile - VSAAttributeFromVariant() - Unknown VSA type...");
|
||
|
|
__leave;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
//
|
||
|
|
// now set values in the IASAttribute
|
||
|
|
//
|
||
|
|
pIasAttribute->Value.OctetString.dwLength = dwFilledBuffer;
|
||
|
|
pIasAttribute->Value.OctetString.lpValue = pBuffer;
|
||
|
|
pIasAttribute->Value.itType = iasType;
|
||
|
|
|
||
|
|
//
|
||
|
|
// succefully converted VSA to IASAttribute
|
||
|
|
//
|
||
|
|
bStatus = TRUE;
|
||
|
|
}
|
||
|
|
__finally
|
||
|
|
{
|
||
|
|
if (FALSE == bStatus)
|
||
|
|
{
|
||
|
|
//
|
||
|
|
// free the resources allocated
|
||
|
|
//
|
||
|
|
|
||
|
|
if (NULL != pBuffer)
|
||
|
|
{
|
||
|
|
::CoTaskMemFree (pBuffer);
|
||
|
|
pBuffer = NULL;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (NULL != pIasAttribute)
|
||
|
|
{
|
||
|
|
::IASAttributeRelease (pIasAttribute);
|
||
|
|
pIasAttribute = NULL;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return (pIasAttribute);
|
||
|
|
|
||
|
|
} // end of CSdoProfile::VSAAttributeFromVariant method
|
||
|
|
|
||
|
|
#if 0
|
||
|
|
//++--------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: ConvertToInt
|
||
|
|
//
|
||
|
|
// Synopsis: This is the private method of CSdoProfile
|
||
|
|
// used to convert a WCHAR to its actual value
|
||
|
|
//
|
||
|
|
// Arguments:
|
||
|
|
// [in] WCHAR
|
||
|
|
//
|
||
|
|
// Returns: BYTE
|
||
|
|
//
|
||
|
|
// History: MKarki Created 05/21/98
|
||
|
|
//
|
||
|
|
//----------------------------------------------------------------
|
||
|
|
BYTE
|
||
|
|
CSdoProfile::ConvertToInt (
|
||
|
|
WCHAR inChar
|
||
|
|
)
|
||
|
|
{
|
||
|
|
static const BYTE ConversionArray [MAX_ASCII] =
|
||
|
|
{
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 0 - 9 */
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 10 - 19 */
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 20 - 29 */
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 30 - 39 */
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 1, /* 40 - 49 */
|
||
|
|
2, 3, 4, 5, 6, 7, 8, 9, 0, 0, /* 50 - 59 */
|
||
|
|
0, 0, 0, 0, 0, 10, 11, 12, 13, 14,/* 60 - 69 */
|
||
|
|
15, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 70 - 79 */
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 80 - 89 */
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 10, 11, 12, /* 90 - 99 */
|
||
|
|
13, 14, 15, 0, 0, 0, 0, 0, 0, 0, /* 100- 109*/
|
||
|
|
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, /* 110- 119*/
|
||
|
|
0, 0, 0, 0, 0, 0, 0 /* 120- 126*/
|
||
|
|
};
|
||
|
|
|
||
|
|
_ASSERT (inChar < MAX_ASCII);
|
||
|
|
|
||
|
|
return (ConversionArray[inChar]);
|
||
|
|
|
||
|
|
}
|
||
|
|
#endif
|