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.
159 lines
5.1 KiB
159 lines
5.1 KiB
/*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
|
|
Copyright (c) 1989-1999 Microsoft Corporation
|
|
|
|
Module Name:
|
|
|
|
pickle.hxx
|
|
|
|
Abstract:
|
|
|
|
Header file for pickle code generation class.
|
|
|
|
Notes:
|
|
|
|
|
|
History:
|
|
|
|
Mar-20-1994 VibhasC Created.
|
|
----------------------------------------------------------------------------*/
|
|
|
|
#pragma warning ( disable : 4238 4239 )
|
|
|
|
/****************************************************************************
|
|
* include files
|
|
***************************************************************************/
|
|
#include "nulldefs.h"
|
|
extern "C"
|
|
{
|
|
#include <stdio.h>
|
|
}
|
|
|
|
#include "ndrcls.hxx"
|
|
/****************************************************************************
|
|
* local definitions
|
|
***************************************************************************/
|
|
|
|
#define TYPE_ALIGN_SIZE_CODE 0
|
|
#define TYPE_ENCODE_CODE 1
|
|
#define TYPE_DECODE_CODE 2
|
|
#define TYPE_FREE_CODE 3
|
|
|
|
/****************************************************************************
|
|
* local data
|
|
***************************************************************************/
|
|
|
|
/****************************************************************************
|
|
* externs
|
|
***************************************************************************/
|
|
extern void GenStdMesPrototype( CCB * pCCB,
|
|
PNAME pTypeName,
|
|
int Code,
|
|
BOOL fImpBin );
|
|
/****************************************************************************/
|
|
|
|
//
|
|
// The pickle code generation class.
|
|
//
|
|
|
|
class CG_TYPE_ENCODE : public CG_TYPEDEF
|
|
{
|
|
private:
|
|
|
|
BOOL fEncode;
|
|
BOOL fDecode;
|
|
BOOL fImplicitHandle;
|
|
RESOURCE * pBindingResource;
|
|
ulong TypeIndex;
|
|
|
|
//
|
|
// Keep a link to the actual specification of the type.
|
|
//
|
|
|
|
// Generate the sizing stub for the type.
|
|
|
|
CG_STATUS GenTypeSize( CCB * pCCB );
|
|
|
|
// Generate the encoding stub for the type.
|
|
|
|
CG_STATUS GenTypeEncode( CCB * pCCB );
|
|
|
|
// Generate the decoding stub for type.
|
|
|
|
CG_STATUS GenTypeDecode( CCB * pCCB );
|
|
|
|
// Generate the freeing stub for type.
|
|
|
|
CG_STATUS GenTypeFree( CCB * pCCB );
|
|
|
|
// Miscellaneous.
|
|
|
|
void AllocateEncodeResources( CCB * pCCB );
|
|
|
|
expr_proc_call * CreateStdMesEngineProc( CCB * pCCB,
|
|
int Code );
|
|
|
|
public:
|
|
|
|
// The constructor.
|
|
CG_TYPE_ENCODE( node_skl * pT,
|
|
BOOL fE,
|
|
BOOL fD)
|
|
:CG_TYPEDEF(pT, XLAT_SIZE_INFO())
|
|
{
|
|
fEncode = fE;
|
|
fDecode = fD;
|
|
pBindingResource = 0;
|
|
fImplicitHandle = FALSE;
|
|
TypeIndex = 0;
|
|
}
|
|
|
|
|
|
// Identify encode or decode.
|
|
|
|
BOOL IsEncode()
|
|
{
|
|
return (BOOL) fEncode;
|
|
}
|
|
BOOL IsDecode()
|
|
{
|
|
return (BOOL) fDecode;
|
|
}
|
|
|
|
ID_CG GetCGID()
|
|
{
|
|
return ID_CG_TYPE_ENCODE;
|
|
}
|
|
|
|
virtual
|
|
void Visit( CG_VISITOR *pVisitor )
|
|
{
|
|
pVisitor->Visit( this );
|
|
}
|
|
|
|
void SetHasImplicitHandle()
|
|
{
|
|
fImplicitHandle = 1;
|
|
}
|
|
|
|
BOOL HasImplicitHandle()
|
|
{
|
|
return (BOOL) (fImplicitHandle == 1);
|
|
}
|
|
|
|
void SetBindingResource( RESOURCE * pRes )
|
|
{
|
|
pBindingResource = pRes;
|
|
}
|
|
|
|
RESOURCE * GetBindingResource()
|
|
{
|
|
return pBindingResource;
|
|
}
|
|
|
|
// Generate the pickling code.
|
|
|
|
virtual
|
|
CG_STATUS GenTypeEncodingStub( CCB * pCCB );
|
|
|
|
};
|
|
|