1207 lines
31 KiB
C++
1207 lines
31 KiB
C++
//+-------------------------------------------------------------------------
|
|
//
|
|
// Microsoft Windows
|
|
// Copyright (C) Microsoft Corporation, 1992 - 1992.
|
|
//
|
|
// File: StgVarB.cxx
|
|
//
|
|
// Contents: C++ Base wrapper for PROPVARIANT.
|
|
//
|
|
// History: 01-Aug-94 KyleP Created
|
|
// 31-Jul-96 MikeHill - Relaxed assert in IsUnicodeString.
|
|
// - Allow NULL strings.
|
|
//
|
|
//--------------------------------------------------------------------------
|
|
|
|
#include <pch.cxx>
|
|
|
|
#include "debtrace.hxx"
|
|
#include <propset.h>
|
|
#include <propvar.h>
|
|
|
|
// These optionally-compiled directives tell the compiler & debugger
|
|
// where the real file, rather than the copy, is located.
|
|
#ifdef _ORIG_FILE_LOCATION_
|
|
#if __LINE__ != 25
|
|
#error File heading has change size
|
|
#else
|
|
#line 29 "\\nt\\private\\dcomidl\\stgvarb.cxx"
|
|
#endif
|
|
#endif
|
|
|
|
#if DBGPROP
|
|
|
|
BOOLEAN
|
|
IsUnicodeString(WCHAR const *pwszname, ULONG cb)
|
|
{
|
|
if (cb != 0)
|
|
{
|
|
ULONG i, cchDoubleAnsi, cchNull;
|
|
|
|
cchNull = cchDoubleAnsi = 0;
|
|
for (i = 0; pwszname[i] != L'\0'; i++)
|
|
{
|
|
if ((char) pwszname[i] == '\0' || (char) (pwszname[i] >> 8) == '\0')
|
|
{
|
|
cchNull++;
|
|
if (i > 8 && cchDoubleAnsi > (3*i)/4)
|
|
{
|
|
// BUGBUG: This is a heuristic that should NOT be left in
|
|
// the build for long (even the checked build).
|
|
//PROPASSERT(!"IsUnicodeString: Suspicious string: double Ansi chars");
|
|
//return(FALSE);
|
|
return(TRUE);
|
|
}
|
|
}
|
|
else
|
|
if (isprint((char) pwszname[i]) && isprint((char) (pwszname[i] >> 8)))
|
|
{
|
|
cchDoubleAnsi++;
|
|
}
|
|
}
|
|
if (cchNull < i/4)
|
|
{
|
|
// BUGBUG: This is a heuristic that should NOT be left in the
|
|
// build for long (even the checked build).
|
|
|
|
//BUGBUG: cscdrt stringizes GUIDs, leaving lots of high bytes set.
|
|
//The DRT needs to change to avoid case mapping problems.
|
|
//Until then, return TRUE
|
|
//PROPASSERT(!"IsUnicodeString: Suspicious string: too few zero-extended Ansi chars");
|
|
//return(FALSE);
|
|
}
|
|
|
|
// If cb isn't MAXULONG we verify that cb is at least as
|
|
// big as the string. We can't check for equality, because
|
|
// there are some property sets in which the length field
|
|
// for a string may include several zero padding bytes.
|
|
|
|
PROPASSERT(cb == MAXULONG || (i + 1) * sizeof(WCHAR) <= cb);
|
|
}
|
|
return(TRUE);
|
|
}
|
|
|
|
|
|
BOOLEAN
|
|
IsAnsiString(CHAR const *pszname, ULONG cb)
|
|
{
|
|
if (cb != 0)
|
|
{
|
|
ULONG i;
|
|
|
|
// If the string is NULL, then it's not not an Ansi string,
|
|
// so we'll call it an Ansi string.
|
|
|
|
if( NULL == pszname )
|
|
return( TRUE );
|
|
|
|
for (i = 0; pszname[i] != '\0'; i++)
|
|
{
|
|
}
|
|
if (i == 1 && isprint(pszname[0]) &&
|
|
((ULONG) &pszname[8] & 0xfff) == ((ULONG) pszname & 0xfff) &&
|
|
isprint(pszname[2]) && pszname[3] == '\0' &&
|
|
isprint(pszname[4]) && pszname[5] == '\0' &&
|
|
isprint(pszname[6]) && pszname[7] == '\0')
|
|
{
|
|
// BUGBUG: This is a heuristic that should NOT be left in the
|
|
// build for long (even the checked build).
|
|
PROPASSERT(!"IsAnsiString: Suspicious string: looks like Unicode");
|
|
return(FALSE);
|
|
}
|
|
|
|
// If cb isn't MAXULONG we verify that cb is at least as
|
|
// big as the string. We can't check for equality, because
|
|
// there are some property sets in which the length field
|
|
// for a string may include several zero padding bytes.
|
|
|
|
PROPASSERT(cb == MAXULONG || i + 1 <= cb);
|
|
}
|
|
return(TRUE);
|
|
}
|
|
#endif
|
|
|
|
|
|
//+-------------------------------------------------------------------
|
|
// Member: CBaseStorageVariant::UnmarshalledSize, public
|
|
//
|
|
// Synopsis: Unmarshalls a PROPVARIANT value serialized in a PDeSerStream.
|
|
//
|
|
// Arguments: [stm] -- serialized stream
|
|
// [cb] -- size of *additional* data goes here. Size of
|
|
// base PROPVARIANT not included.
|
|
//
|
|
// Returns: one of the following NTSTATUS values
|
|
// STATUS_SUCCESS -- the call was successful.
|
|
// STATUS_INVALID_PARAMETER -- unsupported type for unmarshalling.
|
|
//
|
|
// Notes: The size is computed assuming 4-byte granular allocations.
|
|
//
|
|
//--------------------------------------------------------------------
|
|
|
|
#if defined(WINNT) && !defined(IPROPERTY_DLL)
|
|
|
|
#ifdef KERNEL
|
|
NTSTATUS
|
|
CBaseStorageVariant::UnmarshalledSize(
|
|
PDeSerStream& stm,
|
|
ULONG &cb)
|
|
{
|
|
NTSTATUS Status = STATUS_SUCCESS;
|
|
ULONG cElems = 0;
|
|
ULONG i;
|
|
|
|
cb = 0;
|
|
|
|
VARTYPE vt = (VARTYPE) stm.GetULong();
|
|
|
|
switch (vt)
|
|
{
|
|
case VT_EMPTY:
|
|
case VT_NULL:
|
|
case VT_UI1:
|
|
case VT_I2:
|
|
case VT_UI2:
|
|
case VT_BOOL:
|
|
case VT_I4:
|
|
case VT_UI4:
|
|
case VT_R4:
|
|
case VT_ERROR:
|
|
case VT_I8:
|
|
case VT_UI8:
|
|
case VT_R8:
|
|
case VT_CY:
|
|
case VT_DATE:
|
|
case VT_FILETIME:
|
|
break;
|
|
|
|
case VT_CLSID:
|
|
cb = sizeof(GUID);
|
|
break;
|
|
|
|
case VT_BLOB:
|
|
case VT_BLOB_OBJECT:
|
|
cb = stm.GetULong();
|
|
break;
|
|
|
|
case VT_CF:
|
|
cb = stm.GetULong() + sizeof(CLIPDATA);
|
|
break;
|
|
|
|
case VT_STREAM:
|
|
case VT_STREAMED_OBJECT:
|
|
PROPASSERT("Serialization of stream not yet supported!");
|
|
Status = STATUS_INVALID_PARAMETER; // BUGBUG -- better error code ?
|
|
break;
|
|
|
|
case VT_STORAGE:
|
|
case VT_STORED_OBJECT:
|
|
PROPASSERT("Serialization of storage not yet supported!");
|
|
Status = STATUS_INVALID_PARAMETER; // BUGBUG -- better error code ?
|
|
break;
|
|
|
|
case VT_BSTR:
|
|
cb = sizeof(ULONG) + stm.GetULong();
|
|
break;
|
|
|
|
case VT_LPSTR:
|
|
cb = stm.GetULong();
|
|
break;
|
|
|
|
case VT_LPWSTR:
|
|
cb = stm.GetULong() * sizeof(WCHAR);
|
|
break;
|
|
|
|
case VT_VECTOR | VT_UI1:
|
|
cb = stm.GetULong();
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I2:
|
|
case VT_VECTOR | VT_UI2:
|
|
case VT_VECTOR | VT_BOOL:
|
|
cb = stm.GetULong() * sizeof(SHORT);
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I4:
|
|
case VT_VECTOR | VT_UI4:
|
|
case VT_VECTOR | VT_R4:
|
|
case VT_VECTOR | VT_ERROR:
|
|
cb = stm.GetULong() * sizeof(LONG);
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I8:
|
|
case VT_VECTOR | VT_UI8:
|
|
case VT_VECTOR | VT_R8:
|
|
case VT_VECTOR | VT_CY:
|
|
case VT_VECTOR | VT_DATE:
|
|
case VT_VECTOR | VT_FILETIME:
|
|
cb = stm.GetULong() * sizeof(LARGE_INTEGER);
|
|
break;
|
|
|
|
case VT_VECTOR | VT_CLSID:
|
|
cb = stm.GetULong() * sizeof(GUID);
|
|
break;
|
|
|
|
case VT_VECTOR | VT_CF:
|
|
cElems = stm.GetULong();
|
|
cb = cElems * sizeof(CLIPDATA);
|
|
break;
|
|
|
|
case VT_VECTOR | VT_BSTR:
|
|
cElems = stm.GetULong();
|
|
cb = cElems * (sizeof(ULONG) + sizeof(LPSTR));
|
|
break;
|
|
|
|
case VT_VECTOR | VT_LPSTR:
|
|
cElems = stm.GetULong();
|
|
cb = cElems * sizeof(LPSTR);
|
|
break;
|
|
|
|
case VT_VECTOR | VT_LPWSTR:
|
|
cElems = stm.GetULong();
|
|
cb = cElems * sizeof(LPWSTR);
|
|
break;
|
|
|
|
case VT_VECTOR | VT_VARIANT:
|
|
cElems = stm.GetULong();
|
|
cb = cElems * sizeof(PROPVARIANT);
|
|
break;
|
|
|
|
default:
|
|
PROPASSERT(!"Invalid type for PROPVARIANT marshalling");
|
|
Status = STATUS_INVALID_PARAMETER;
|
|
break;
|
|
}
|
|
|
|
cb = (cb + 3) & ~3;
|
|
|
|
if (cElems == 0 || Status != STATUS_SUCCESS)
|
|
{
|
|
return(Status);
|
|
}
|
|
|
|
// We have a variant with variable sized data which requires
|
|
// further unmarshalling.
|
|
switch(vt)
|
|
{
|
|
case VT_VECTOR | VT_CF:
|
|
for (i = 0; i < cElems; i++)
|
|
{
|
|
ULONG len = (stm.GetULong() + 3) & ~3;
|
|
|
|
cb += len;
|
|
stm.SkipChar(sizeof(ULONG) + len);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_BSTR:
|
|
case VT_VECTOR | VT_LPSTR:
|
|
for (i = 0; i < cElems; i++)
|
|
{
|
|
ULONG len = (stm.GetULong() + 3) & ~3;
|
|
|
|
cb += len;
|
|
stm.SkipChar(len);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_LPWSTR:
|
|
for (i = 0; i < cElems; i++)
|
|
{
|
|
ULONG len = (stm.GetULong() * sizeof(WCHAR) + 3) & ~3;
|
|
|
|
cb += len;
|
|
stm.SkipWChar(len / sizeof(WCHAR));
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_VARIANT:
|
|
for (i = 0; i < cElems; i++)
|
|
{
|
|
ULONG cbElem = 0;
|
|
|
|
Status = CBaseStorageVariant::UnmarshalledSize(stm, cbElem);
|
|
if (Status != STATUS_SUCCESS)
|
|
{
|
|
break;
|
|
}
|
|
cb += cbElem;
|
|
}
|
|
break;
|
|
}
|
|
return(Status);
|
|
}
|
|
#endif //ifdef KERNEL
|
|
|
|
|
|
//+-------------------------------------------------------------------
|
|
// Member: CBaseStorageVariant::Unmarshall, public
|
|
//
|
|
// Synopsis: Unmarshalls a PROPVARIANT value serialized in a PDeSerStream.
|
|
//
|
|
// Arguments: [stm] -- serialized stream
|
|
// [var] -- unmarshalled PROPVARIANT instance
|
|
// [MemAlloc] -- memory allocator for unmarshalling
|
|
//
|
|
// Returns: one of the following NTSTATUS values
|
|
// STATUS_SUCCESS -- the call was successful.
|
|
// STATUS_INSUFFICIENT_RESOURCES -- out of memory.
|
|
// STATUS_INVALID_PARAMETER -- unsupported type for unmarshalling.
|
|
//--------------------------------------------------------------------
|
|
|
|
NTSTATUS
|
|
CBaseStorageVariant::Unmarshall(
|
|
PDeSerStream& stm,
|
|
PROPVARIANT& var,
|
|
PMemoryAllocator &MemAlloc)
|
|
{
|
|
#if DBG
|
|
switch (stm.PeekULong())
|
|
{
|
|
case VT_EMPTY:
|
|
case VT_NULL:
|
|
case VT_I1:
|
|
case VT_I2:
|
|
case VT_UI2:
|
|
case VT_BOOL:
|
|
case VT_I4:
|
|
case VT_UI4:
|
|
case VT_R4:
|
|
case VT_ERROR:
|
|
case VT_I8:
|
|
case VT_UI8:
|
|
case VT_R8:
|
|
case VT_CY:
|
|
case VT_DATE:
|
|
case VT_FILETIME:
|
|
case VT_CLSID:
|
|
case VT_BLOB:
|
|
case VT_BLOB_OBJECT:
|
|
case VT_CF:
|
|
case VT_STREAM:
|
|
case VT_STREAMED_OBJECT:
|
|
case VT_STORAGE:
|
|
case VT_STORED_OBJECT:
|
|
case VT_BSTR:
|
|
case VT_LPSTR:
|
|
case VT_LPWSTR:
|
|
case VT_VECTOR | VT_UI1:
|
|
case VT_VECTOR | VT_I2:
|
|
case VT_VECTOR | VT_UI2:
|
|
case VT_VECTOR | VT_BOOL:
|
|
case VT_VECTOR | VT_I4:
|
|
case VT_VECTOR | VT_UI4:
|
|
case VT_VECTOR | VT_R4:
|
|
case VT_VECTOR | VT_ERROR:
|
|
case VT_VECTOR | VT_I8:
|
|
case VT_VECTOR | VT_UI8:
|
|
case VT_VECTOR | VT_R8:
|
|
case VT_VECTOR | VT_CY:
|
|
case VT_VECTOR | VT_DATE:
|
|
case VT_VECTOR | VT_FILETIME:
|
|
case VT_VECTOR | VT_CLSID:
|
|
case VT_VECTOR | VT_CF:
|
|
case VT_VECTOR | VT_BSTR:
|
|
case VT_VECTOR | VT_LPSTR:
|
|
case VT_VECTOR | VT_LPWSTR:
|
|
case VT_VECTOR | VT_VARIANT:
|
|
break;
|
|
|
|
default:
|
|
PROPASSERT(!"Invalid type (peek) for PROPVARIANT unmarshalling");
|
|
break;
|
|
}
|
|
#endif
|
|
|
|
NTSTATUS Status = STATUS_SUCCESS;
|
|
ULONG cbAlloc = 0;
|
|
VOID **ppv = NULL;
|
|
BOOLEAN fZero = FALSE;
|
|
|
|
// Zero the entire variant data structure before assembling it together.
|
|
memset(&var, 0, sizeof(PROPVARIANT));
|
|
|
|
var.vt = (VARTYPE) stm.GetULong();
|
|
|
|
switch (var.vt)
|
|
{
|
|
case VT_EMPTY:
|
|
case VT_NULL:
|
|
break;
|
|
|
|
case VT_UI1:
|
|
var.bVal = stm.GetByte();
|
|
break;
|
|
|
|
case VT_I2:
|
|
case VT_UI2:
|
|
case VT_BOOL:
|
|
var.iVal = stm.GetUShort();
|
|
break;
|
|
|
|
case VT_I4:
|
|
case VT_UI4:
|
|
case VT_R4:
|
|
case VT_ERROR:
|
|
var.lVal = stm.GetULong();
|
|
break;
|
|
|
|
case VT_I8:
|
|
case VT_UI8:
|
|
case VT_R8:
|
|
case VT_CY:
|
|
case VT_DATE:
|
|
case VT_FILETIME:
|
|
stm.GetBlob((BYTE *)&var.hVal, sizeof(LARGE_INTEGER));
|
|
break;
|
|
|
|
case VT_CLSID:
|
|
cbAlloc = sizeof(GUID);
|
|
ppv = (void **)&var.puuid;
|
|
break;
|
|
|
|
case VT_BLOB:
|
|
case VT_BLOB_OBJECT:
|
|
var.blob.cbSize = stm.GetULong();
|
|
cbAlloc = var.blob.cbSize;
|
|
ppv = (void **)&var.blob.pBlobData;
|
|
break;
|
|
|
|
case VT_CF:
|
|
var.pclipdata = (CLIPDATA *) MemAlloc.Allocate(sizeof(*var.pclipdata));
|
|
if (var.pclipdata == NULL)
|
|
{
|
|
Status = STATUS_INSUFFICIENT_RESOURCES;
|
|
break;
|
|
}
|
|
var.pclipdata->cbSize = stm.GetULong();
|
|
cbAlloc = CBPCLIPDATA(*var.pclipdata);
|
|
var.pclipdata->ulClipFmt = stm.GetULong();
|
|
ppv = (void **) &var.pclipdata->pClipData;
|
|
break;
|
|
|
|
case VT_STREAM:
|
|
case VT_STREAMED_OBJECT:
|
|
PROPASSERT("Serialization of stream not yet supported!");
|
|
Status = STATUS_INVALID_PARAMETER; // BUGBUG -- better error code ?
|
|
break;
|
|
|
|
case VT_STORAGE:
|
|
case VT_STORED_OBJECT:
|
|
PROPASSERT("Serialization of storage not yet supported!");
|
|
Status = STATUS_INVALID_PARAMETER; // BUGBUG -- better error code ?
|
|
break;
|
|
|
|
case VT_BSTR:
|
|
cbAlloc = sizeof(ULONG) + stm.GetULong();
|
|
ppv = (void **)&var.bstrVal;
|
|
break;
|
|
|
|
case VT_LPSTR:
|
|
cbAlloc = stm.GetULong();
|
|
ppv = (void **)&var.pszVal;
|
|
break;
|
|
|
|
case VT_LPWSTR:
|
|
cbAlloc = stm.GetULong() * sizeof(WCHAR);
|
|
ppv = (void **)&var.pwszVal;
|
|
break;
|
|
|
|
case VT_VECTOR | VT_UI1:
|
|
var.caub.cElems = stm.GetULong();
|
|
cbAlloc = var.caub.cElems * sizeof(BYTE);
|
|
ppv = (void **)&var.caub.pElems;
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I2:
|
|
case VT_VECTOR | VT_UI2:
|
|
case VT_VECTOR | VT_BOOL:
|
|
var.cai.cElems = stm.GetULong();
|
|
cbAlloc = var.cai.cElems * sizeof(SHORT);
|
|
ppv = (void **)&var.cai.pElems;
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I4:
|
|
case VT_VECTOR | VT_UI4:
|
|
case VT_VECTOR | VT_R4:
|
|
case VT_VECTOR | VT_ERROR:
|
|
var.cal.cElems = stm.GetULong();
|
|
cbAlloc = var.cal.cElems * sizeof(LONG);
|
|
ppv = (void **)&var.cal.pElems;
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I8:
|
|
case VT_VECTOR | VT_UI8:
|
|
case VT_VECTOR | VT_R8:
|
|
case VT_VECTOR | VT_CY:
|
|
case VT_VECTOR | VT_DATE:
|
|
case VT_VECTOR | VT_FILETIME:
|
|
var.cah.cElems = stm.GetULong();
|
|
cbAlloc = var.cah.cElems * sizeof(LARGE_INTEGER);
|
|
ppv = (void **)&var.cah.pElems;
|
|
break;
|
|
|
|
case VT_VECTOR | VT_CLSID:
|
|
var.cauuid.cElems = stm.GetULong();
|
|
cbAlloc = var.cauuid.cElems * sizeof(GUID);
|
|
ppv = (void **)&var.cauuid.pElems;
|
|
break;
|
|
|
|
case VT_VECTOR | VT_CF:
|
|
var.caclipdata.cElems = stm.GetULong();
|
|
cbAlloc = var.caclipdata.cElems * sizeof(CLIPDATA);
|
|
ppv = (void **)&var.caclipdata.pElems;
|
|
fZero = TRUE; // set all pClipData pointers to NULL
|
|
break;
|
|
|
|
case VT_VECTOR | VT_BSTR:
|
|
var.cabstr.cElems = stm.GetULong();
|
|
cbAlloc = var.cabstr.cElems * sizeof(BSTR);
|
|
ppv = (void **)&var.cabstr.pElems;
|
|
fZero = TRUE; // set all BSTR pointers to NULL
|
|
break;
|
|
|
|
case VT_VECTOR | VT_LPSTR:
|
|
var.calpstr.cElems = stm.GetULong();
|
|
cbAlloc = var.calpstr.cElems * sizeof(LPSTR);
|
|
ppv = (void **)&var.calpstr.pElems;
|
|
fZero = TRUE; // set all LPSTR pointers to NULL
|
|
break;
|
|
|
|
case VT_VECTOR | VT_LPWSTR:
|
|
var.calpwstr.cElems = stm.GetULong();
|
|
cbAlloc = var.calpwstr.cElems * sizeof(LPWSTR);
|
|
ppv = (void **)&var.calpwstr.pElems;
|
|
fZero = TRUE; // set all LPWSTR pointers to NULL
|
|
break;
|
|
|
|
case VT_VECTOR | VT_VARIANT:
|
|
var.capropvar.cElems = stm.GetULong();
|
|
cbAlloc = var.capropvar.cElems * sizeof(PROPVARIANT);
|
|
ppv = (void **)&var.capropvar.pElems;
|
|
fZero = TRUE; // set all vt pointers to VT_EMPTY
|
|
PROPASSERT(VT_EMPTY == 0);
|
|
break;
|
|
|
|
default:
|
|
PROPASSERT(!"Invalid type for PROPVARIANT unmarshalling");
|
|
Status = STATUS_INVALID_PARAMETER;
|
|
break;
|
|
}
|
|
|
|
if (cbAlloc == 0 || Status != STATUS_SUCCESS)
|
|
{
|
|
// No further work need be done. The Ummarshalling is complete,
|
|
// i.e., fixed size variant or no variable length data.
|
|
|
|
if (ppv != NULL)
|
|
{
|
|
*ppv = NULL;
|
|
}
|
|
return(Status);
|
|
}
|
|
|
|
// Allocate the desired amount of memory and continue unmarshalling
|
|
// if allocation was successfull.
|
|
|
|
ULONG i;
|
|
|
|
PROPASSERT(ppv != NULL);
|
|
*ppv = MemAlloc.Allocate(cbAlloc);
|
|
|
|
if (*ppv == NULL)
|
|
{
|
|
return(STATUS_INSUFFICIENT_RESOURCES);
|
|
}
|
|
if (fZero)
|
|
{
|
|
memset(*ppv, 0, cbAlloc);
|
|
}
|
|
|
|
// We have a variant with variable sized data which requires
|
|
// further unmarshalling.
|
|
switch(var.vt)
|
|
{
|
|
case VT_CLSID:
|
|
stm.GetBlob((BYTE *)var.puuid, sizeof(CLSID));
|
|
break;
|
|
|
|
case VT_BLOB:
|
|
case VT_BLOB_OBJECT:
|
|
stm.GetBlob(var.blob.pBlobData, var.blob.cbSize);
|
|
break;
|
|
|
|
case VT_CF:
|
|
stm.GetBlob(var.pclipdata->pClipData, CBPCLIPDATA(*var.pclipdata));
|
|
break;
|
|
|
|
case VT_BSTR:
|
|
cbAlloc -= sizeof(ULONG);
|
|
*(ULONG *) var.bstrVal = cbAlloc - sizeof (OLECHAR);
|
|
var.bstrVal = (BSTR) ((ULONG *) var.bstrVal + 1);
|
|
stm.GetChar((char *) var.bstrVal, cbAlloc);
|
|
break;
|
|
|
|
case VT_LPSTR:
|
|
stm.GetChar(var.pszVal, cbAlloc);
|
|
break;
|
|
|
|
case VT_LPWSTR:
|
|
stm.GetWChar(var.pwszVal, cbAlloc / sizeof(WCHAR));
|
|
break;
|
|
|
|
case VT_VECTOR | VT_UI1:
|
|
for (i = 0; i < var.caub.cElems; i++)
|
|
{
|
|
var.caub.pElems[i] = stm.GetByte();
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I2:
|
|
case VT_VECTOR | VT_UI2:
|
|
case VT_VECTOR | VT_BOOL:
|
|
for (i = 0; i < var.cai.cElems; i++)
|
|
{
|
|
var.cai.pElems[i] = stm.GetUShort();
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I4:
|
|
case VT_VECTOR | VT_UI4:
|
|
case VT_VECTOR | VT_R4:
|
|
case VT_VECTOR | VT_ERROR:
|
|
for (i = 0; i < var.cal.cElems; i++)
|
|
{
|
|
var.cal.pElems[i] = stm.GetULong();
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I8:
|
|
case VT_VECTOR | VT_UI8:
|
|
case VT_VECTOR | VT_R8:
|
|
case VT_VECTOR | VT_CY:
|
|
case VT_VECTOR | VT_DATE:
|
|
case VT_VECTOR | VT_FILETIME:
|
|
for (i = 0; i < var.cah.cElems; i++)
|
|
{
|
|
stm.GetBlob((BYTE *)&var.cah.pElems[i], sizeof(LARGE_INTEGER));
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_CLSID:
|
|
for (i = 0; i < var.cauuid.cElems; i++)
|
|
{
|
|
stm.GetBlob((BYTE *)&var.cauuid.pElems[i], sizeof(CLSID));
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_CF:
|
|
for (i = 0; i < var.caclipdata.cElems; i++)
|
|
{
|
|
PROPASSERT(var.caclipdata.pElems[i].pClipData == NULL);
|
|
var.caclipdata.pElems[i].cbSize = stm.GetULong();
|
|
cbAlloc = CBPCLIPDATA(var.caclipdata.pElems[i]);
|
|
var.caclipdata.pElems[i].ulClipFmt = stm.GetULong();
|
|
if (cbAlloc == 0)
|
|
{
|
|
Status = STATUS_INVALID_PARAMETER;
|
|
break;
|
|
}
|
|
var.caclipdata.pElems[i].pClipData =
|
|
(BYTE *) MemAlloc.Allocate(cbAlloc);
|
|
if (var.caclipdata.pElems[i].pClipData == NULL)
|
|
{
|
|
Status = STATUS_INSUFFICIENT_RESOURCES;
|
|
break;
|
|
}
|
|
stm.GetBlob(var.caclipdata.pElems[i].pClipData, cbAlloc);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_BSTR:
|
|
for (i = 0; i < var.cabstr.cElems; i++)
|
|
{
|
|
PROPASSERT(var.cabstr.pElems[i] == NULL);
|
|
cbAlloc = stm.GetULong();
|
|
if (cbAlloc == 0)
|
|
{
|
|
Status = STATUS_INVALID_PARAMETER;
|
|
break;
|
|
}
|
|
var.cabstr.pElems[i] =
|
|
(BSTR) MemAlloc.Allocate(sizeof(ULONG) + cbAlloc);
|
|
if (var.cabstr.pElems[i] == NULL)
|
|
{
|
|
Status = STATUS_INSUFFICIENT_RESOURCES;
|
|
break;
|
|
}
|
|
*(ULONG *) var.cabstr.pElems[i] = cbAlloc - sizeof (OLECHAR);
|
|
var.cabstr.pElems[i] = (BSTR) ((ULONG *) var.cabstr.pElems[i] + 1);
|
|
stm.GetChar((char *) var.cabstr.pElems[i], cbAlloc);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_LPSTR:
|
|
for (i = 0; i < var.calpstr.cElems; i++)
|
|
{
|
|
PROPASSERT(var.calpstr.pElems[i] == NULL);
|
|
cbAlloc = stm.GetULong();
|
|
if (cbAlloc == 0)
|
|
{
|
|
Status = STATUS_INVALID_PARAMETER;
|
|
break;
|
|
}
|
|
var.calpstr.pElems[i] = (LPSTR) MemAlloc.Allocate(cbAlloc);
|
|
if (var.calpstr.pElems[i] == NULL)
|
|
{
|
|
Status = STATUS_INSUFFICIENT_RESOURCES;
|
|
break;
|
|
}
|
|
stm.GetChar(var.calpstr.pElems[i], cbAlloc);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_LPWSTR:
|
|
for (i = 0; i < var.calpwstr.cElems; i++)
|
|
{
|
|
PROPASSERT(var.calpwstr.pElems[i] == NULL);
|
|
cbAlloc = stm.GetULong(); // actually, a count of WCHARs
|
|
if (cbAlloc == 0)
|
|
{
|
|
Status = STATUS_INVALID_PARAMETER;
|
|
break;
|
|
}
|
|
var.calpwstr.pElems[i] = (WCHAR *) MemAlloc.Allocate(cbAlloc * sizeof(WCHAR));
|
|
if (var.calpwstr.pElems[i] == NULL)
|
|
{
|
|
Status = STATUS_INSUFFICIENT_RESOURCES;
|
|
break;
|
|
}
|
|
stm.GetWChar(var.calpwstr.pElems[i], cbAlloc);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_VARIANT:
|
|
for (i = 0; i < var.capropvar.cElems; i++)
|
|
{
|
|
PROPASSERT(var.capropvar.pElems[i].vt == VT_EMPTY);
|
|
Status = CBaseStorageVariant::Unmarshall(
|
|
stm,
|
|
var.capropvar.pElems[i],
|
|
MemAlloc);
|
|
if (Status != STATUS_SUCCESS)
|
|
{
|
|
break;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
return(Status);
|
|
}
|
|
|
|
|
|
#ifdef ENABLE_MARSHAL_VARIANT
|
|
inline void
|
|
_Marshall_VT_CF(CLIPDATA *pclipdata, PSerStream &stm)
|
|
{
|
|
CLIPDATA clipdata;
|
|
|
|
clipdata.cbSize = 0;
|
|
clipdata.ulClipFmt = 0;
|
|
|
|
if (pclipdata != NULL)
|
|
{
|
|
clipdata.cbSize = pclipdata->cbSize;
|
|
clipdata.ulClipFmt = pclipdata->ulClipFmt;
|
|
if (pclipdata->pClipData == NULL)
|
|
{
|
|
clipdata.cbSize = 0;
|
|
}
|
|
}
|
|
stm.PutULong(clipdata.cbSize);
|
|
stm.PutULong(clipdata.ulClipFmt);
|
|
if (clipdata.cbSize)
|
|
{
|
|
stm.PutBlob((BYTE *) pclipdata->pClipData, CBPCLIPDATA(clipdata));
|
|
}
|
|
}
|
|
#endif //ifdef ENABLE_MARSHAL_VARIANT
|
|
|
|
|
|
#ifdef ENABLE_MARSHAL_VARIANT
|
|
inline void
|
|
_Marshall_VT_BSTR(BSTR bstrVal, PSerStream &stm)
|
|
{
|
|
if (bstrVal != NULL)
|
|
{
|
|
ULONG cc = BSTRLEN(bstrVal) + sizeof (OLECHAR);
|
|
|
|
stm.PutULong(cc);
|
|
stm.PutChar((char *) bstrVal, cc);
|
|
}
|
|
else
|
|
{
|
|
stm.PutULong(0);
|
|
}
|
|
}
|
|
#endif //ifdef ENABLE_MARSHAL_VARIANT
|
|
|
|
|
|
#ifdef ENABLE_MARSHAL_VARIANT
|
|
inline void
|
|
_Marshall_VT_LPSTR(CHAR *pszVal, PSerStream &stm)
|
|
{
|
|
if (pszVal != NULL)
|
|
{
|
|
// Include NULL because OLE 2.0 spec says so.
|
|
ULONG cc = strlen(pszVal) + 1;
|
|
|
|
stm.PutULong(cc);
|
|
stm.PutChar(pszVal, cc);
|
|
PROPASSERT(IsAnsiString(pszVal, cc));
|
|
}
|
|
else
|
|
{
|
|
stm.PutULong(0);
|
|
}
|
|
}
|
|
#endif //ifdef ENABLE_MARSHAL_VARIANT
|
|
|
|
|
|
#ifdef ENABLE_MARSHAL_VARIANT
|
|
inline void
|
|
_Marshall_VT_LPWSTR(LPWSTR pwszVal, PSerStream &stm)
|
|
{
|
|
if (pwszVal != NULL)
|
|
{
|
|
// Include NULL because OLE 2.0 spec says so.
|
|
|
|
ULONG cc = Prop_wcslen(pwszVal) + 1;
|
|
|
|
PROPASSERT(IsUnicodeString(pwszVal, cc * sizeof(WCHAR)));
|
|
stm.PutULong(cc);
|
|
stm.PutWChar(pwszVal, cc);
|
|
}
|
|
else
|
|
{
|
|
stm.PutULong(0);
|
|
}
|
|
}
|
|
#endif //ifdef ENABLE_MARSHAL_VARIANT
|
|
|
|
|
|
#ifdef ENABLE_MARSHAL_VARIANT
|
|
void
|
|
CBaseStorageVariant::Marshall(PSerStream & stm) const
|
|
{
|
|
ULONG i;
|
|
|
|
stm.PutULong(vt);
|
|
|
|
switch (vt)
|
|
{
|
|
case VT_EMPTY:
|
|
case VT_NULL:
|
|
break;
|
|
|
|
case VT_UI1:
|
|
stm.PutByte(bVal);
|
|
break;
|
|
|
|
case VT_I2:
|
|
case VT_UI2:
|
|
case VT_BOOL:
|
|
stm.PutUShort(iVal);
|
|
break;
|
|
|
|
case VT_I4:
|
|
case VT_UI4:
|
|
case VT_R4:
|
|
case VT_ERROR:
|
|
stm.PutULong(lVal);
|
|
break;
|
|
|
|
case VT_I8:
|
|
case VT_UI8:
|
|
case VT_R8:
|
|
case VT_CY:
|
|
case VT_DATE:
|
|
case VT_FILETIME:
|
|
stm.PutBlob((BYTE *) &hVal, sizeof(hVal));
|
|
break;
|
|
|
|
case VT_CLSID:
|
|
stm.PutBlob((BYTE *)puuid, sizeof(CLSID));
|
|
break;
|
|
|
|
case VT_BLOB:
|
|
case VT_BLOB_OBJECT:
|
|
stm.PutULong(blob.cbSize);
|
|
stm.PutBlob(blob.pBlobData, blob.cbSize);
|
|
break;
|
|
|
|
case VT_CF:
|
|
_Marshall_VT_CF(pclipdata, stm);
|
|
break;
|
|
|
|
case VT_STREAM:
|
|
case VT_STREAMED_OBJECT:
|
|
PROPASSERT("Serialization of stream not yet supported!");
|
|
break;
|
|
|
|
case VT_STORAGE:
|
|
case VT_STORED_OBJECT:
|
|
PROPASSERT("Serialization of storage not yet supported!");
|
|
break;
|
|
|
|
case VT_BSTR:
|
|
_Marshall_VT_BSTR(bstrVal, stm);
|
|
break;
|
|
|
|
case VT_LPSTR:
|
|
_Marshall_VT_LPSTR(pszVal, stm);
|
|
break;
|
|
|
|
case VT_LPWSTR:
|
|
_Marshall_VT_LPWSTR(pwszVal, stm);
|
|
break;
|
|
|
|
case VT_VECTOR | VT_UI1:
|
|
stm.PutULong(caub.cElems);
|
|
for (i = 0; i < caub.cElems; i++)
|
|
{
|
|
stm.PutByte(caub.pElems[i]);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I2:
|
|
case VT_VECTOR | VT_UI2:
|
|
case VT_VECTOR | VT_BOOL:
|
|
stm.PutULong(cai.cElems);
|
|
for (i = 0; i < cai.cElems; i++)
|
|
{
|
|
stm.PutUShort(cai.pElems[i]);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I4:
|
|
case VT_VECTOR | VT_UI4:
|
|
case VT_VECTOR | VT_R4:
|
|
case VT_VECTOR | VT_ERROR:
|
|
stm.PutULong(cal.cElems);
|
|
for (i = 0; i < cal.cElems; i++)
|
|
{
|
|
stm.PutULong(cal.pElems[i]);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_I8:
|
|
case VT_VECTOR | VT_UI8:
|
|
case VT_VECTOR | VT_R8:
|
|
case VT_VECTOR | VT_CY:
|
|
case VT_VECTOR | VT_DATE:
|
|
case VT_VECTOR | VT_FILETIME:
|
|
stm.PutULong(cah.cElems);
|
|
for (i = 0; i < cah.cElems; i++)
|
|
{
|
|
stm.PutBlob((BYTE *) &cah.pElems[i], sizeof(LARGE_INTEGER));
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_CLSID:
|
|
stm.PutULong(cauuid.cElems);
|
|
for (i = 0; i < cauuid.cElems; i++)
|
|
{
|
|
stm.PutBlob((BYTE *)&cauuid.pElems[i], sizeof(CLSID));
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_CF:
|
|
stm.PutULong(caclipdata.cElems);
|
|
for (i = 0; i < caclipdata.cElems; i++)
|
|
{
|
|
_Marshall_VT_CF(&caclipdata.pElems[i], stm);
|
|
}
|
|
break;
|
|
break;
|
|
|
|
case VT_VECTOR | VT_BSTR:
|
|
stm.PutULong(cabstr.cElems);
|
|
for (i = 0; i < cabstr.cElems; i++)
|
|
{
|
|
_Marshall_VT_BSTR(cabstr.pElems[i], stm);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_LPSTR:
|
|
stm.PutULong(calpstr.cElems);
|
|
for (i = 0; i < calpstr.cElems; i++)
|
|
{
|
|
_Marshall_VT_LPSTR(calpstr.pElems[i], stm);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_LPWSTR:
|
|
stm.PutULong(calpwstr.cElems);
|
|
for (i = 0; i < calpwstr.cElems; i++)
|
|
{
|
|
_Marshall_VT_LPWSTR(calpwstr.pElems[i], stm);
|
|
}
|
|
break;
|
|
|
|
case VT_VECTOR | VT_VARIANT:
|
|
stm.PutULong(capropvar.cElems);
|
|
for (i = 0; i < capropvar.cElems; i++)
|
|
{
|
|
((CBaseStorageVariant *) &capropvar.pElems[i])->Marshall(stm);
|
|
}
|
|
break;
|
|
|
|
default:
|
|
PROPASSERT(!"Invalid type for PROPVARIANT marshalling");
|
|
break;
|
|
|
|
}
|
|
}
|
|
#endif //ifdef ENABLE_MARSHAL_VARIANT
|
|
|
|
|
|
#ifdef OLDSUMCATAPI
|
|
void
|
|
MarshallVariant(PSerStream &stm, PROPVARIANT &stgvar)
|
|
{
|
|
CBaseStorageVariant *pstgvar = (CBaseStorageVariant *)&stgvar;
|
|
pstgvar->Marshall(stm);
|
|
}
|
|
#endif //ifdef OLDSUMCATAPI
|
|
|
|
|
|
#ifdef ENABLE_DISPLAY_VARIANT
|
|
VOID
|
|
CBaseStorageVariant::DisplayVariant(
|
|
ULONG ulLevel,
|
|
USHORT CodePage) const
|
|
{
|
|
char *psz;
|
|
|
|
switch (vt)
|
|
{
|
|
case VT_ILLEGAL: psz = "ILLEGAL"; goto EmptyType;
|
|
case VT_EMPTY: psz = "EMPTY"; goto EmptyType;
|
|
case VT_NULL: psz = "NULL"; goto EmptyType;
|
|
|
|
BlobType:
|
|
EmptyType:
|
|
DEBTRACE((DBGFLAG "%s", psz));
|
|
break;
|
|
|
|
case VT_UI1:
|
|
AssertByteField(bVal); // VT_UI1
|
|
DEBTRACE((DBGFLAG "UI1=%hx", bVal));
|
|
break;
|
|
|
|
case VT_I2: psz = "I2"; goto ShortType;
|
|
case VT_UI2: psz = "UI2"; goto ShortType;
|
|
|
|
ShortType:
|
|
AssertShortField(iVal); // VT_I2
|
|
AssertShortField(uiVal); // VT_UI2
|
|
DEBTRACE((DBGFLAG "%s=%hx", psz, iVal));
|
|
break;
|
|
|
|
case VT_BOOL:
|
|
switch (boolVal)
|
|
{
|
|
case VARIANT_TRUE:
|
|
DEBTRACE((DBGFLAG "BOOL=TRUE"));
|
|
break;
|
|
|
|
case FALSE:
|
|
DEBTRACE((DBGFLAG "BOOL=FALSE"));
|
|
break;
|
|
|
|
default:
|
|
DEBTRACE((DBGFLAG "BOOL=%hx???", boolVal));
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case VT_I4: psz = "I4"; goto LongType;
|
|
case VT_UI4: psz = "UI4"; goto LongType;
|
|
case VT_R4: psz = "R4"; goto LongType;
|
|
case VT_ERROR: psz = "ERROR"; goto LongType;
|
|
|
|
LongType:
|
|
AssertLongField(lVal); // VT_I4
|
|
AssertLongField(ulVal); // VT_UI4
|
|
AssertLongField(fltVal); // VT_R4
|
|
AssertLongField(scode); // VT_ERROR
|
|
DEBTRACE((DBGFLAG "%s=%x", psz, lVal));
|
|
break;
|
|
|
|
case VT_I8: psz = "I8"; goto LongLongType;
|
|
case VT_UI8: psz = "UI8"; goto LongLongType;
|
|
case VT_R8: psz = "R8"; goto LongLongType;
|
|
case VT_CY: psz = "CY"; goto LongLongType;
|
|
case VT_DATE: psz = "DATE"; goto LongLongType;
|
|
case VT_FILETIME: psz = "FILETIME"; goto LongLongType;
|
|
|
|
LongLongType:
|
|
AssertLongLongField(hVal); // VT_I8
|
|
AssertLongLongField(uhVal); // VT_UI8
|
|
AssertLongLongField(dblVal); // VT_R8
|
|
AssertLongLongField(cyVal); // VT_CY
|
|
AssertLongLongField(date); // VT_DATE
|
|
AssertLongLongField(filetime); // VT_FILETIME
|
|
DEBTRACE((DBGFLAG "%s=%x:%x", psz, hVal.HighPart, hVal.LowPart));
|
|
break;
|
|
|
|
case VT_CLSID: psz = "CLSID"; goto EmptyType;
|
|
|
|
case VT_BLOB: psz = "BLOB"; goto BlobType;
|
|
case VT_BLOB_OBJECT: psz = "BLOB_OBJECT"; goto BlobType;
|
|
case VT_CF: psz = "CF"; goto BlobType;
|
|
|
|
case VT_STREAM: psz = "STREAM"; goto TestUnicode;
|
|
case VT_STREAMED_OBJECT: psz = "STREAMED_OBJECT"; goto TestUnicode;
|
|
case VT_STORAGE: psz = "STORAGE"; goto TestUnicode;
|
|
case VT_STORED_OBJECT: psz = "STORED_OBJECT"; goto TestUnicode;
|
|
case VT_LPSTR: psz = "LPSTR"; goto TestUnicode;
|
|
|
|
TestUnicode:
|
|
AssertStringField(pszVal); // VT_STREAM, VT_STREAMED_OBJECT
|
|
AssertStringField(pszVal); // VT_STORAGE, VT_STORED_OBJECT
|
|
AssertStringField(pszVal); // VT_LPSTR
|
|
DEBTRACE((
|
|
DBGFLAG
|
|
CodePage == CP_WINUNICODE? "%s=L'%ws'" : "%s='%s'",
|
|
psz,
|
|
pszVal));
|
|
break;
|
|
|
|
case VT_BSTR: psz = "BSTR"; goto PrintUnicode;
|
|
case VT_LPWSTR: psz = "LPWSTR"; goto PrintUnicode;
|
|
|
|
PrintUnicode:
|
|
AssertStringField(pwszVal); // VT_LPWSTR
|
|
AssertStringField(bstrVal); // VT_BSTR
|
|
DEBTRACE((DBGFLAG "%s=L'%ws'", psz, pwszVal));
|
|
break;
|
|
|
|
default:
|
|
if (vt & VT_VECTOR)
|
|
{
|
|
DEBTRACE((DBGFLAG "UNPRINTABLE VECTOR TYPE=%x(%u)", vt, vt));
|
|
}
|
|
else
|
|
{
|
|
DEBTRACE((DBGFLAG "UNKNOWN TYPE=%x(%u)", vt, vt));
|
|
}
|
|
break;
|
|
|
|
}
|
|
}
|
|
#endif //ifdef ENABLE_DISPLAY_VARIANT
|
|
|
|
#endif //ifdef WINNT
|