155 lines
4.0 KiB
C++
155 lines
4.0 KiB
C++
|
|
||
|
|
#include <pch.cxx>
|
||
|
|
#pragma hdrstop
|
||
|
|
|
||
|
|
|
||
|
|
HINSTANCE hOleAut32 = 0;
|
||
|
|
|
||
|
|
EXTERN_C SYS_ALLOC_STRING *pfnSysAllocString = LoadSysAllocString;
|
||
|
|
EXTERN_C SYS_FREE_STRING *pfnSysFreeString = LoadSysFreeString;
|
||
|
|
EXTERN_C SYS_REALLOC_STRING_LEN *pfnSysReAllocStringLen = LoadSysReAllocStringLen;
|
||
|
|
EXTERN_C SYS_STRING_BYTE_LEN *pfnSysStringByteLen = LoadSysStringByteLen;
|
||
|
|
|
||
|
|
//+-------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: LoadSysAllocString
|
||
|
|
//
|
||
|
|
// Synopsis: Loads oleaut32.dll and calls SysAllocString.
|
||
|
|
//
|
||
|
|
// Returns: S_OK, E_OUTOFMEMORY, E_INVALIDARG.
|
||
|
|
//
|
||
|
|
// Notes: If successful, this function will save a pointer
|
||
|
|
// to the SysAllocString function. Subsequent calls
|
||
|
|
// will go directly to SysAllocString.
|
||
|
|
//
|
||
|
|
//--------------------------------------------------------------------
|
||
|
|
BSTR STDAPICALLTYPE
|
||
|
|
LoadSysAllocString(OLECHAR FAR* pwsz)
|
||
|
|
{
|
||
|
|
BSTR bstr = NULL;
|
||
|
|
|
||
|
|
if(!hOleAut32)
|
||
|
|
{
|
||
|
|
hOleAut32 = LoadLibraryA("oleaut32");
|
||
|
|
}
|
||
|
|
|
||
|
|
if(hOleAut32 != 0)
|
||
|
|
{
|
||
|
|
void *pfn = GetProcAddress(hOleAut32, "SysAllocString");
|
||
|
|
if(pfn != NULL)
|
||
|
|
{
|
||
|
|
pfnSysAllocString = (SYS_ALLOC_STRING *) pfn;
|
||
|
|
bstr = (*pfnSysAllocString)(pwsz);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return bstr;
|
||
|
|
}
|
||
|
|
|
||
|
|
//+-------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: LoadSysFreeString
|
||
|
|
//
|
||
|
|
// Synopsis: Loads oleaut32.dll and calls SysFreeString.
|
||
|
|
//
|
||
|
|
// Returns: None.
|
||
|
|
//
|
||
|
|
// Notes: If successful, this function will save a pointer
|
||
|
|
// to the SysFreeString function. Subsequent calls
|
||
|
|
// will go directly to SysFreeString.
|
||
|
|
//
|
||
|
|
//--------------------------------------------------------------------
|
||
|
|
VOID STDAPICALLTYPE
|
||
|
|
LoadSysFreeString(BSTR bstr)
|
||
|
|
{
|
||
|
|
if(!hOleAut32)
|
||
|
|
{
|
||
|
|
hOleAut32 = LoadLibraryA("oleaut32");
|
||
|
|
}
|
||
|
|
|
||
|
|
if(hOleAut32 != 0)
|
||
|
|
{
|
||
|
|
void *pfn = GetProcAddress(hOleAut32, "SysFreeString");
|
||
|
|
if(pfn != NULL)
|
||
|
|
{
|
||
|
|
pfnSysFreeString = (SYS_FREE_STRING *) pfn;
|
||
|
|
(*pfnSysFreeString)(bstr);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
//+-------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: LoadSysReAllocStringLen
|
||
|
|
//
|
||
|
|
// Synopsis: Loads oleaut32.dll and calls SysReAllocStringLen.
|
||
|
|
//
|
||
|
|
// Returns: TRUE if and only if successful.
|
||
|
|
//
|
||
|
|
// Notes: If successful, this function will save a pointer
|
||
|
|
// to the SysReAllocString function. Subsequent calls
|
||
|
|
// will go directly to SysReAllocStringLen.
|
||
|
|
//
|
||
|
|
//--------------------------------------------------------------------
|
||
|
|
BOOL STDAPICALLTYPE
|
||
|
|
LoadSysReAllocStringLen(BSTR FAR *pbstr, OLECHAR FAR *pwsz, UINT cch)
|
||
|
|
{
|
||
|
|
BOOL fRet = FALSE;
|
||
|
|
|
||
|
|
if(!hOleAut32)
|
||
|
|
{
|
||
|
|
hOleAut32 = LoadLibraryA("oleaut32");
|
||
|
|
}
|
||
|
|
|
||
|
|
if(hOleAut32 != 0)
|
||
|
|
{
|
||
|
|
void *pfn = GetProcAddress(hOleAut32, "SysReAllocStringLen");
|
||
|
|
if(pfn != NULL)
|
||
|
|
{
|
||
|
|
pfnSysReAllocStringLen = (SYS_REALLOC_STRING_LEN *) pfn;
|
||
|
|
fRet = (*pfnSysReAllocStringLen)(pbstr, pwsz, cch);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return( fRet );
|
||
|
|
}
|
||
|
|
|
||
|
|
//+-------------------------------------------------------------------
|
||
|
|
//
|
||
|
|
// Function: LoadSysStringByteLen
|
||
|
|
//
|
||
|
|
// Synopsis: Loads oleaut32.dll and calls SysFreeString.
|
||
|
|
//
|
||
|
|
// Returns: The byte length of the string.
|
||
|
|
//
|
||
|
|
// Notes: If successful, this function will save a pointer
|
||
|
|
// to the SysStringByteLen function. Subsequent calls
|
||
|
|
// will go directly to SysStringByteLen.
|
||
|
|
//
|
||
|
|
//--------------------------------------------------------------------
|
||
|
|
UINT STDAPICALLTYPE
|
||
|
|
LoadSysStringByteLen(BSTR bstr)
|
||
|
|
{
|
||
|
|
UINT uiLen = 0;
|
||
|
|
|
||
|
|
if(!hOleAut32)
|
||
|
|
{
|
||
|
|
hOleAut32 = LoadLibraryA("oleaut32");
|
||
|
|
}
|
||
|
|
|
||
|
|
if(hOleAut32 != 0)
|
||
|
|
{
|
||
|
|
void *pfn = GetProcAddress(hOleAut32, "SysStringByteLen");
|
||
|
|
if(pfn != NULL)
|
||
|
|
{
|
||
|
|
pfnSysStringByteLen = (SYS_STRING_BYTE_LEN *) pfn;
|
||
|
|
uiLen = (*pfnSysStringByteLen)(bstr);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return( uiLen );
|
||
|
|
}
|
||
|
|
|