windows-nt/Source/XPSP1/NT/com/rpc/midl/inc/nodeskl.hxx

3398 lines
101 KiB
C++
Raw Permalink Normal View History

2020-09-26 03:20:57 -05:00
// Copyright (c) 1993-1999 Microsoft Corporation
#ifndef __NODESKL_HXX__
#define __NODESKL_HXX__
#pragma warning ( disable : 4710 4706 )
#include "common.hxx"
#include "errors.hxx"
#include "midlnode.hxx"
#include "symtable.hxx"
#include "symtable.hxx"
#include "stream.hxx"
#include "prttype.hxx"
#include "expr.hxx"
#include "attrlist.hxx"
#include "linenum.hxx"
#include "freelist.hxx"
class node_guid;
/***
*** Here is the class hierarcy for the typegraph nodes.
*** (last updated 6/22/95)
***/
/*
node_skl
named_node \\nodes with siblings and names and attributes
node_base_type
node_def
node_def_fe
node_e_status_t
node_echo_string
node_pragma_pack
node_field
node_bitfield
node_file
node_forward
node_href
node_id
node_id_fe \\ front-end version of node_id
node_interface
node_coclass
node_dispinterface
node_libarary
node_module
node_pipe_object
node_interface_reference
node_label
node_param
node_proc
node_su_base
node_enum
node_struct
node_en_struct
node_union
node_en_union
node_wchar_t
node_error
node_source
npa_nodes
node_array
node_pointer
node_safearray
*/
/***
*** The base node type all the nodes in the typegraph are derived from.
*** This is a virtual class; there are no nodes directly of this type.
*** It is used to describe the routines used to walk the typegraph.
***/
// forward class declarations
class CG_CLASS;
class XLAT_CTXT;
class SEM_ANALYSIS_CTXT;
class node_interface;
class node_file;
class gplistmgr;
extern unsigned short CurrentIntfKey;
enum TypeSet
{
ts_UnsignedFixedPoint,
ts_FixedPoint,
ts_FloatingPoint,
ts_Character,
ts_String,
ts_Interface,
};
class MODIFIER_SET
{
private:
unsigned _int64 ModifierBits; // Modifier bits
unsigned short Align; // alignment from __declspec(align(N))
char * pUnknownTxt; // Text for unknown __declspec"
public:
BOOL IsFlagAModifier(ATTR_T flag) const;
BOOL IsModifierSet(ATTR_T flag) const;
BOOL AnyModifiersSet() const;
void SetModifier(ATTR_T flag);
void ClearModifier(ATTR_T flag);
void SetDeclspecAlign( unsigned short NewAlign);
unsigned short GetDeclspecAlign() const;
void SetDeclspecUnknown(char *pNewUnknownTxt);
char *GetDeclspecUnknown() const;
void Clear();
void Merge(const MODIFIER_SET & MergeModifierSet);
void PrintDebugInfo() const;
};
class INITIALIZED_MODIFIER_SET : public MODIFIER_SET
{
public:
INITIALIZED_MODIFIER_SET() {Clear();}
INITIALIZED_MODIFIER_SET( ATTR_T flag ) {Clear(); SetModifier( flag );}
};
struct FRONT_MEMORY_INFO
{
unsigned long Size; // Size of the item
unsigned short Align; // Required memory alignment
BOOL IsMustAlign; // Has __declspec(align())
FRONT_MEMORY_INFO()
: Size(0),
Align(1),
IsMustAlign(FALSE)
{
}
FRONT_MEMORY_INFO(unsigned long NewSize, unsigned short NewAlign, BOOL NewIsMustAlign)
: Size(NewSize),
Align(NewAlign),
IsMustAlign(NewIsMustAlign)
{
}
void Init(unsigned long NewSize, unsigned short NewAlign, BOOL NewIsMustAlign )
{
Size = NewSize; Align = NewAlign; IsMustAlign = NewIsMustAlign;
}
};
class node_skl
{
private:
node_skl * pChild;
node_file * pTLBFile;
// ISSUE-2000/08/03-mikew
// The ia64 compiler is optimizing bitfields badly. The C guys said
// it will be fixed in the next drop.
#ifdef IA64
unsigned long Kind ;// : 8;
protected:
unsigned long MiscBits ;// : 8; // this field should be cleared by any
// class that uses it
private:
unsigned long IntfKey ;// : 16;
#else // !IA64
unsigned long Kind : 8;
protected:
unsigned long MiscBits : 8; // this field should be cleared by any
// class that uses it
private:
unsigned long IntfKey : 16;
#endif
INITIALIZED_MODIFIER_SET ModiferSet;
public:
node_skl( )
{
Kind = (unsigned long) NODE_ILLEGAL;
pChild = NULL;
IntfKey = CurrentIntfKey;
pTLBFile = NULL;
}
node_skl( NODE_T NodeKind, node_skl * pCh = NULL)
{
Kind = (unsigned long) NodeKind;
pChild = pCh;
IntfKey = CurrentIntfKey;
pTLBFile = NULL;
}
// lightweight version for backend use
node_skl( node_skl * pCh, NODE_T NodeKind )
{
Kind = (unsigned long) NodeKind;
pChild = pCh;
IntfKey = 0;
pTLBFile = NULL;
}
virtual unsigned long
GetInterfaceKey() { return IntfKey; };
virtual void
SetInterfaceKey( unsigned long uIntfKey ) { IntfKey = uIntfKey; };
node_skl * GetChild()
{
return pChild;
}
node_skl * SetChild(node_skl * pCh)
{
return pChild = pCh;
}
node_skl * GetBasicType();
node_skl * GetNonDefChild()
{
node_skl * p = pChild;
while ( p && p->NodeKind() == NODE_DEF )
p = p->GetChild();
return p;
}
node_skl * GetNonDefSelf()
{
node_skl * p = this;
while ( p->NodeKind() == NODE_DEF )
p = p->GetChild();
return p;
}
node_skl * SetBasicType(node_skl * pBT)
{
return pChild = pBT;
};
NODE_T NodeKind()
{
return (NODE_T) Kind;
};
node_interface *GetMyInterfaceNode();
virtual
node_file * GetDefiningFile();
virtual
BOOL IsStringableType()
{
return FALSE;
}
node_file * GetDefiningTLB()
{
return pTLBFile;
}
void SetDefiningTLB(node_file *p)
{
pTLBFile = p;
}
inline // see sneaky definition for this below named_node
char * GetSymName();
inline // see sneaky definition for this below named_node
char * GetCurrentSpelling();
MODIFIER_SET & GetModifiers() { return ModiferSet;}
BOOL IsDef()
{
return ! GetModifiers().IsModifierSet(ATTR_TAGREF);
};
void SetEdgeType( EDGE_T Et )
{
if (Et == EDGE_USE)
{
GetModifiers().SetModifier( ATTR_TAGREF );
};
};
virtual
BOOL FInSummary( ATTR_T )
{
return FALSE;
};
virtual
BOOL HasAttributes()
{
return FALSE;
}
virtual
BOOL IsEncapsulatedStruct()
{
return FALSE;
}
virtual
BOOL IsEncapsulatedUnion()
{
return FALSE;
}
virtual
BOOL IsPtrOrArray()
{
return FALSE;
}
virtual
BOOL IsStructOrUnion()
{
return FALSE;
}
virtual
BOOL IsBasicType()
{
return FALSE;
}
// virtual
// bool IsCompatibleType( TypeSet )
// {
// return FALSE;
// }
virtual
BOOL IsInterfaceOrObject()
{
return FALSE;
}
FRONT_MEMORY_INFO AdjustMemoryInfoForModifiers(FRONT_MEMORY_INFO OrigInfo);
// For use by classes that just use the child memory size modified with
// modifiers.
FRONT_MEMORY_INFO GetModifiedMemoryInfoFromChild();
FRONT_MEMORY_INFO GetInvalidMemoryInfo();
virtual
FRONT_MEMORY_INFO GetMemoryInfo() = 0;
unsigned long GetSize()
{
return GetMemoryInfo().Size;
}
unsigned short GetAlign()
{
return GetMemoryInfo().Align;
}
BOOL IsMustAlign()
{
return GetMemoryInfo().IsMustAlign;
}
virtual
void PrintMemoryInfo(ISTREAM *pStream, BOOL bNewLine);
virtual
EXPR_VALUE ConvertMyKindOfValueToEXPR_VALUE( EXPR_VALUE value )
{
return value;
}
virtual
void GetPositionInfo( tracked_node& )
{
}
virtual
STATUS_T DoPrintType( PRTFLAGS ,
BufferManager * ,
ISTREAM * ,
node_skl * ,
node_skl * )
{
return STATUS_OK;
};
virtual
STATUS_T DoPrintDecl( PRTFLAGS ,
BufferManager * ,
ISTREAM * ,
node_skl * ,
node_skl * )
{
return STATUS_OK;
};
STATUS_T PrintType(PRTFLAGS Flags,
ISTREAM * pStream,
node_skl * pParent = NULL,
node_skl * pIntf = NULL);
void EmitModifiers( BufferManager *, bool fSuppressConst);
void EmitProcModifiers( BufferManager *, PRTFLAGS );
void EmitModelModifiers( BufferManager *);
virtual void EmitPtrModifiers( BufferManager *, unsigned long ulFlags = 0 );
void CheckDeclspecAlign( SEM_ANALYSIS_CTXT & MyContext );
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
void * operator new ( size_t size )
{
return AllocateOnceNew( size );
}
void operator delete( void * ptr )
{
AllocateOnceDelete( ptr );
}
virtual
node_skl* GetDuplicateGuid (
node_guid*,
SymTable*
);
// returns true if context_handle attribute is present
// semantic checks for context handle
virtual bool CheckContextHandle( SEM_ANALYSIS_CTXT& );
}; // end of class node_skl
/***
*** Here are the direct descendents of node_skl; nodes with symtab entries
*** and nodes without them
***/
// named nodes that can be on a list (have siblings)
class named_node : public node_skl
{
private:
char * pName;
char * pCurrentSpelling;
class named_node *pSibling;
class ATTRLIST AttrList; // attributes dangle from here
protected:
unsigned int fBeingAnalyzed : 1;
public:
// lightweight version for backend use
named_node( char * psz, NODE_T Kind )
: node_skl( NULL, Kind ),
fBeingAnalyzed( FALSE )
{
pCurrentSpelling =
pName = psz;
pSibling = NULL;
AttrList.MakeAttrList();
};
named_node( NODE_T Kind, char * psz = NULL)
: node_skl( Kind, NULL ),
fBeingAnalyzed( FALSE )
{
pCurrentSpelling =
pName = psz;
pSibling = NULL;
AttrList.MakeAttrList();
};
// convert constructor (for node_id to other named_node)
named_node( NODE_T Kind, class named_node * pID )
: node_skl( Kind, pID->GetChild() ),
fBeingAnalyzed( FALSE )
{
pCurrentSpelling =
pName = pID->pName;
pSibling = pID->pSibling;
AttrList = pID->AttrList;
GetModifiers() = pID->GetModifiers();
};
virtual void CopyAttributes( named_node* pNode )
{
AttrList = pNode->AttrList.Clone();
// Clone reverses the order of the list. Fix it.
AttrList.Reverse();
}
char * SetCurrentSpelling(char * sz)
{
return pCurrentSpelling = sz;
};
char * SetSymName(char * psz)
{
return pName = psz;
};
class named_node * GetSibling()
{
return pSibling;
};
class named_node * SetSibling(named_node * pSib)
{
return pSibling = pSib;
};
void SetAttributes( ATTRLIST & AList )
{
AttrList = AList;
};
void SetAttribute( ATTR_T bit )
{
AttrList.Add( bit );
};
void SetAttribute( node_base_attr * attr )
{
AttrList.Add( attr );
};
void AddAttributes( ATTRLIST & AList )
{
AttrList.Merge( AList );
};
void RemoveAttribute( ATTR_T atrib )
{
AttrList.Remove( atrib );
};
node_base_attr * GetAttribute( ATTR_T flag )
{
return AttrList.GetAttribute( flag );
};
ATTRLIST & GetAttributeList( ATTRLIST & AList )
{
return (AList = AttrList);
}
void GetAttributeList( type_node_list * AList )
{
AttrList.GetAttributeList( AList );
}
void DumpAttributes( ISTREAM * pStream );
virtual
BOOL HasAttributes()
{
return AttrList.NonNull();
}
BOOL FInSummary( ATTR_T flag )
{
BOOL result;
if ( GetModifiers().IsFlagAModifier(flag) )
{
result = GetModifiers().IsModifierSet( flag );
}
else
{
result = AttrList.FInSummary( flag );
}
return result;
};
BOOL FMATTRInSummary( MATTR_T flag)
{
return AttrList.FMATTRInSummary(flag);
};
BOOL FTATTRInSummary( TATTR_T flag)
{
return AttrList.FTATTRInSummary(flag);
};
BOOL IsNamedNode();
virtual
node_file * GetFileNode()
{
return NULL;
}
virtual
node_file * SetFileNode(node_file *)
{
return NULL;
}
virtual char*
GetDeclSpecGuid();
// to allow the below GetSymName to work
friend class node_skl;
}; // end of class named_node
inline
char *
node_skl::GetCurrentSpelling()
{
if ( IS_NAMED_NODE(NodeKind()) )
{
return ((named_node *)this)->pCurrentSpelling;
}
else
{
return "";
}
}
inline
char *
node_skl::GetSymName()
{
if ( IS_NAMED_NODE(NodeKind()) )
{
return ((named_node *)this)->pName;
}
else
{
return "";
}
}
class SIBLING_LIST;
class MEMLIST
{
protected:
named_node * pMembers;
public:
MEMLIST( named_node * pHead = NULL)
{
pMembers = pHead;
};
MEMLIST( MEMLIST * pList )
{
*this = *pList;
};
void SetMembers( SIBLING_LIST & MemList );
STATUS_T GetMembers( class type_node_list * MemList );
node_skl * GetFirstMember()
{
return pMembers;
}
void SetFirstMember( named_node * pNode )
{
pMembers = pNode;
}
short GetNumberOfArguments();
void AddLastMember( named_node * pNode );
void RemoveLastMember();
void AddFirstMember( named_node * pNode )
{
pNode->SetSibling( pMembers );
pMembers = pNode;
}
void RemoveFirstMember()
{
if (pMembers) pMembers = pMembers->GetSibling();
}
void AddSecondMember( named_node* pNode );
void MergeMembersToTail( SIBLING_LIST & MemList );
void MergeMembersToTail( MEMLIST & ML )
{
AddLastMember( ML.pMembers );
}
void MergeMembersToHead( MEMLIST & ML )
{
ML.MergeMembersToTail( *this );
pMembers = ML.pMembers;
}
};
class MEM_ITER : public MEMLIST
{
private:
named_node * pCur;
public:
MEM_ITER( MEMLIST * pList )
: MEMLIST( pList )
{
pCur = pMembers;
}
named_node * GetNext()
{
named_node * Ret = pCur;
pCur = (pCur) ? pCur->GetSibling() : NULL;
return Ret;
}
void Init()
{
pCur = pMembers;
}
};
// identifiers
class node_id : public named_node
{
public:
expr_node * pInit;
// lightweight version for backend
node_id( char * pNewName)
: named_node( pNewName, NODE_ID )
{
pInit = NULL;
};
// heavier version for frontend
node_id( NODE_T Kind, char * pNewName)
: named_node( Kind, pNewName )
{
pInit = NULL;
};
expr_node * GetInitList()
{
return pInit;
};
expr_node * GetExpr()
{
return pInit;
};
void SetExpr( expr_node * pExpr )
{
pInit = pExpr;
};
// these two functions are only valid after the defining declaration is complete
BOOL IsConstant()
{
return (BOOL) ( pInit &&
pInit->IsConstant() &&
(FInSummary( ATTR_CONST ) || IsConstantString() ) );
}
BOOL IsConstantString();
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetModifiedMemoryInfoFromChild();}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
// here is the use of the private memory allocator
private:
static
FreeListMgr MyFreeList;
public:
void * operator new (size_t size)
{
return (MyFreeList.Get (size));
}
void operator delete (void * pX)
{
MyFreeList.Put (pX);
}
}; // end of class node_id
// this is what a node_id generated in the front-end looks like
// it has tracking added
class node_id_fe : public node_id, public tracked_node
{
public:
node_id_fe( char * pNewName)
: node_id( NODE_ID, pNewName )
{
};
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
// here is the use of the private memory allocator
private:
static
FreeListMgr MyFreeList;
public:
void * operator new (size_t size)
{
return (MyFreeList.Get (size));
}
void operator delete (void * pX)
{
MyFreeList.Put (pX);
}
};
/***
*** named nodes
***
*** These nodes may be constructed
***/
// enum labels
class node_label : public named_node
{
public:
expr_node * pExpr;
node_label( char * LabelName, expr_node * pNewExpr )
: named_node( NODE_LABEL, LabelName )
{
pExpr = pNewExpr;
};
EXPR_VALUE GetValue()
{
return pExpr->GetValue();
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_label
// handle types stored for node_def and node_param
// these are in order of increasing precedence as binding handles
#define HDL_NONE 0x00
#define HDL_CTXT 0x01
#define HDL_GEN 0x02
#define HDL_PRIM 0x04
// comm/fault status kind
#define STATUS_NONE 0
#define STATUS_COMM 1
#define STATUS_FAULT 2
#define STATUS_BOTH 3
class CG_PARAM;
// function formal parameters
class node_param : public named_node
{
private:
BOOL fOptional : 1; // odl attribute
BOOL fRetval : 1;
BOOL fLCID : 1;
BOOL fExtraStatusParam : 1; // invisible fault or comm status
BOOL fIsAsyncHandle : 1;
BOOL fGenDefaultValueExpr : 1;
BOOL fSaveForAsyncFinish : 1;
BOOL fHasCSSTag : 1;
BOOL fHasCSDRTag : 1;
BOOL fHasCSRTag : 1;
node_param* pAsyncBeginSibling;
node_param* pAsyncFinishSibling;
CG_PARAM* pCGParam;
public:
// the kind of handle, and whether it was applied to the
// param node directly, or to the TypeSpecifier
unsigned long HandleKind : 4;
unsigned long fAppliedHere : 1;
// true if the handle is an [in] handle
unsigned long fBindingParam : 1;
// for below field: bits 1=>toplevel 2=>non-toplevel
unsigned long fDontCallFreeInst : 2;
unsigned long Statuses : 2; // comm/fault statuses
// copy fields from the pID
node_param( node_id_fe * pID)
: named_node( NODE_PARAM, pID ),
fOptional ( 0 ),
fLCID ( 0 ),
fRetval ( 0 ),
fExtraStatusParam ( 0 ),
HandleKind ( 0 ),
fAppliedHere ( 0 ),
fBindingParam ( 0 ),
fDontCallFreeInst ( 0 ),
fIsAsyncHandle ( 0 ),
fGenDefaultValueExpr( 0 ),
Statuses ( STATUS_NONE ),
pAsyncBeginSibling( 0 ),
pAsyncFinishSibling( 0 ),
fSaveForAsyncFinish( 0 ),
fHasCSSTag ( 0 ),
fHasCSDRTag ( 0 ),
fHasCSRTag ( 0 )
{
}
node_param()
: named_node( NODE_PARAM ),
fOptional ( 0 ),
fLCID ( 0 ),
fRetval ( 0 ),
fExtraStatusParam ( 0 ),
HandleKind ( 0 ),
fAppliedHere ( 0 ),
fBindingParam ( 0 ),
fDontCallFreeInst ( 0 ),
fIsAsyncHandle ( 0 ),
fGenDefaultValueExpr( 0 ),
Statuses ( STATUS_NONE ),
pAsyncBeginSibling( 0 ),
pAsyncFinishSibling( 0 ),
fSaveForAsyncFinish( 0 ),
fHasCSSTag ( 0 ),
fHasCSDRTag ( 0 ),
fHasCSRTag ( 0 )
{
}
virtual CG_PARAM*
GetCG()
{
return pCGParam;
}
virtual void
SetCG( CG_PARAM* pCG )
{
pCGParam = pCG;
}
virtual void
SetAsyncBeginSibling( node_param* pParam ) { pAsyncBeginSibling = pParam; };
virtual node_param*
GetAsyncBeginSibling( void ) { return pAsyncBeginSibling; };
virtual void
SetAsyncFinishSibling( node_param* pParam ) { pAsyncFinishSibling = pParam; };
virtual node_param*
GetAsyncFinishSibling( void ) { return pAsyncFinishSibling; };
virtual void SaveForAsyncFinish( void ) { fSaveForAsyncFinish = TRUE; };
virtual BOOL IsSaveForAsyncFinish( void ) { return fSaveForAsyncFinish; };
BOOL HasExplicitHandle()
{
return (HandleKind != HDL_NONE);
}
unsigned short GetHandleKind()
{
return (unsigned short) HandleKind;
}
BOOL IsBindingParam()
{
return ( fBindingParam );
}
BOOL IsExtraStatusParam()
{
return ( fExtraStatusParam );
}
void SetExtraStatusParam()
{
fExtraStatusParam = TRUE;
}
BOOL IsAsyncHandleParam()
{
return ( fIsAsyncHandle );
}
void SetIsAsyncHandleParam()
{
fIsAsyncHandle = TRUE;
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetModifiedMemoryInfoFromChild();}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
void Optional(void)
{
fOptional = TRUE;
}
BOOL IsOptional(void)
{
return fOptional;
}
void Retval(void)
{
fRetval = TRUE;
}
BOOL IsRetval(void)
{
return fRetval;
}
void LCID(void)
{
fLCID = TRUE;
}
BOOL IsLCID(void)
{
return fLCID;
}
void GenDefaultValueExpr( BOOL fGen = TRUE )
{
fGenDefaultValueExpr = fGen;
}
BOOL HasGenDefaultValueExpr( void )
{
return fGenDefaultValueExpr;
}
void SetHasCSSTag()
{
fHasCSSTag = TRUE;
}
void SetHasCSDRTag()
{
fHasCSDRTag = TRUE;
}
void SetHasCSRTag()
{
fHasCSRTag = TRUE;
}
BOOL HasCSTag()
{
return fHasCSSTag | fHasCSRTag | fHasCSDRTag;
}
}; // end of class node_param
class CG_PROC;
// imported files
class node_file : public named_node, public MEMLIST
{
private:
char * pActualFileName;
short ImportLevel;
BOOL fAcfInclude : 1;
BOOL fIsXXXBaseIdl : 1;
BOOL fHasComClasses : 1;
public:
node_file( char *, short );
short GetImportLevel()
{
return ImportLevel;
}
char * GetFileName()
{
return pActualFileName;
}
BOOL AcfExists();
void AcfName( char * );
void SetFileName( char * );
BOOL IsAcfInclude()
{
return fAcfInclude;
}
BOOL HasComClasses()
{
return fHasComClasses;
}
BOOL SetHasComClasses( BOOL yes = TRUE )
{
return (fHasComClasses = yes);
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetInvalidMemoryInfo();};
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
void SetXXXBaseIdl()
{
fIsXXXBaseIdl = TRUE;
}
BOOL IsXXXBaseIdl()
{
return fIsXXXBaseIdl;
}
}; // end of class node_file
// functions and procs
class node_proc : public named_node, public tracked_node, public MEMLIST
{
unsigned long ProcNum : 16;
unsigned long OptimFlags : 8;
unsigned long ImportLevel : 4;
unsigned long fHasFullPointer : 1;
unsigned long fHasAtLeastOneIn : 1;
unsigned long fHasAtLeastOneOut : 1;
unsigned long fHasExplicitHandle : 1;
unsigned long fHasPointer : 1; // ANYWHERE below us
unsigned long fHasStatuses : 1; // has comm/fault status
unsigned long fHasExtraStatusParam: 1; // has the "invisible" status param
unsigned long fCallAsTarget : 1; // the target of a call_as
unsigned long RTStatuses : 2; // return type statuses
unsigned long fHasPipes : 1;
unsigned long fForcedI2 : 1; // true if -Oi2 mode has been forced
unsigned long fForcedS : 1; // true if -Os mode has been forced
unsigned long fHasAsyncHandle : 1;
unsigned long fHasDeny : 1; // true on /deny
unsigned long fHasServerCorr : 1; // correlation on Server
unsigned long fHasClientCorr : 1; // correlation on Client
unsigned long fHasAsyncUUID : 1; // async_uuid
unsigned long fIsBeginProc : 1; // Begin_*
unsigned long fIsFinishProc : 1; // Finish_*
unsigned long fObjectProc : 1; // object proc
unsigned long ulServerCorrCount;
unsigned long ulClientCorrCount;
class node_proc * pCallAsType; // if this is a call_as function
// then this pointer will be set to
// points to its companion during
// semantic analysis
node_proc* pBeginProc;
node_proc* pCSTagRoutine; // from [cs_tag_rtn]
OPT_LEVEL_ENUM OptimLevel;
public:
node_proc( short level, BOOL ) :
named_node ( NODE_PROC ),
ProcNum ( 0xffff ),
OptimFlags ( 0 ),
ImportLevel ( ( level > 15 ) ? 15 : level ),
fHasAtLeastOneIn ( FALSE ),
fHasAtLeastOneOut ( FALSE ),
fHasExplicitHandle ( FALSE ),
fHasPointer ( FALSE ),
fHasFullPointer ( FALSE ),
fHasStatuses ( FALSE ),
fHasExtraStatusParam ( FALSE ),
fCallAsTarget ( FALSE ),
RTStatuses ( STATUS_NONE ),
fHasPipes ( FALSE ),
fForcedI2 ( FALSE ),
fForcedS ( FALSE ),
fHasAsyncHandle ( FALSE ),
pCallAsType ( NULL ),
OptimLevel ( OPT_LEVEL_OS ),
fHasDeny ( FALSE ),
fHasServerCorr ( FALSE ),
fHasClientCorr ( FALSE ),
fHasAsyncUUID ( FALSE ),
fIsBeginProc ( FALSE ),
fIsFinishProc ( FALSE ),
ulClientCorrCount ( 0 ),
ulServerCorrCount ( 0 ),
pBeginProc ( 0 ),
pCSTagRoutine ( 0 ),
fObjectProc ( FALSE )
{
}
node_proc( short level, BOOL , node_id_fe * pID)
: named_node ( NODE_PROC, pID ),
ProcNum ( 0xffff ),
OptimFlags ( 0 ),
ImportLevel ( ( level > 15 ) ? 15 : level ),
fHasAtLeastOneIn ( FALSE ),
fHasAtLeastOneOut ( FALSE ),
fHasExplicitHandle ( FALSE ),
fHasPointer ( FALSE ),
fHasFullPointer ( FALSE ),
fHasStatuses ( FALSE ),
fHasExtraStatusParam ( FALSE ),
fCallAsTarget ( FALSE ),
RTStatuses ( STATUS_NONE ),
fHasPipes ( FALSE ),
fForcedI2 ( FALSE ),
fForcedS ( FALSE ),
fHasAsyncHandle ( FALSE ),
pCallAsType ( NULL ),
OptimLevel ( OPT_LEVEL_OS ),
fHasDeny ( FALSE ),
fHasServerCorr ( FALSE ),
fHasClientCorr ( FALSE ),
fHasAsyncUUID ( FALSE ),
fIsBeginProc ( FALSE ),
fIsFinishProc ( FALSE ),
ulClientCorrCount ( 0 ),
ulServerCorrCount ( 0 ),
pBeginProc ( 0 ),
pCSTagRoutine ( 0 ),
fObjectProc ( FALSE )
{
}
node_proc( node_proc * pClone )
: named_node( NODE_PROC )
{
*this = *pClone;
}
BOOL IsObjectProc() { return fObjectProc; };
void SetObjectProc( BOOL fObject = TRUE ) { fObjectProc = fObject; };
node_proc* GetBeginProc()
{
return pBeginProc;
}
void SetBeginProc( node_proc* pBegin )
{
pBeginProc = pBegin;
}
node_proc * SetCallAsType(node_proc *p)
{
return (pCallAsType = p);
}
node_proc * GetCallAsType()
{
return (pCallAsType);
}
STATUS_T GetParameterList( class type_node_list * MemList )
{
return GetMembers( MemList );
};
node_skl * GetReturnType()
{
return GetChild();
};
short GetImportLevel()
{
return (short) ImportLevel;
}
unsigned short GetOptimizationFlags()
{
return (unsigned short)OptimFlags;
}
unsigned short SetOptimizationFlags( unsigned short OF )
{
return (unsigned short)(OptimFlags = OF);
}
OPT_LEVEL_ENUM GetOptimizationLevel()
{
return (OPT_LEVEL_ENUM) OptimLevel;
}
OPT_LEVEL_ENUM SetOptimizationLevel( OPT_LEVEL_ENUM Level )
{
return OptimLevel = Level;
}
BOOL ForceNonInterpret();
BOOL ForceInterpret2();
void AddStatusParam( char * pName, ATTRLIST Alist );
void AddExplicitHandle (
SEM_ANALYSIS_CTXT* pParentCtxt,
unsigned int uParamNumber = 1
);
void AddFullAsyncHandle (
SEM_ANALYSIS_CTXT* pParentCtxt,
node_skl* pType,
char* szType
);
// returns ATTR_NONE if none explicitly specified
BOOL GetCallingConvention( ATTR_T & Attr );
BOOL HasPipes()
{
return fHasPipes;
}
BOOL HasAtLeastOneIn()
{
return fHasAtLeastOneIn;
};
BOOL HasAtLeastOneOut()
{
return fHasAtLeastOneOut;
};
BOOL HasExplicitHandle()
{
return fHasExplicitHandle;
};
BOOL HasAtLeastOneHandle()
{
// for now....
return fHasExplicitHandle;
};
BOOL SetHasExtraStatusParam()
{
return fHasExtraStatusParam = TRUE;
}
BOOL HasExtraStatusParam()
{
return fHasExtraStatusParam;
}
BOOL HasPointer()
{
return fHasPointer;
};
BOOL IsCallAsTarget()
{
return fCallAsTarget;
}
BOOL HasAtLeastOneShipped();
BOOL HasReturn()
{
node_skl * pCh = GetNonDefChild();
return (pCh) && (pCh->NodeKind() != NODE_VOID);
};
void SetHasAsyncHandle()
{
fHasAsyncHandle = TRUE;
}
BOOL HasAsyncHandle()
{
return fHasAsyncHandle;
}
void SetHasAsyncUUID()
{
fHasAsyncUUID = TRUE;
}
BOOL HasAsyncUUID()
{
return fHasAsyncUUID;
}
void SetHasServerCorr()
{
fHasServerCorr = TRUE;
}
BOOL HasServerCorr()
{
return fHasServerCorr;
}
void SetHasClientCorr()
{
fHasClientCorr = TRUE;
}
BOOL HasClientCorr()
{
return fHasClientCorr;
}
void SetIsBeginProc()
{
fIsBeginProc = TRUE;
}
BOOL IsBeginProc()
{
return fIsBeginProc;
}
void SetIsFinishProc()
{
fIsFinishProc = TRUE;
}
BOOL IsFinishProc()
{
return fIsFinishProc;
}
BOOL HasAParameter()
{
// check if the first one is different from void
node_skl * pParam = GetFirstMember();
if ( !pParam || pParam->NodeKind() == NODE_VOID )
return FALSE;
if ( pParam->NodeKind() == NODE_DEF )
{
node_skl * pCh = pParam->GetNonDefChild();
if ( !pCh || pCh->NodeKind() == NODE_VOID )
return FALSE;
}
return TRUE;
};
node_param * GetParamNode( char * pName )
{
node_param * pCur = (node_param *) GetFirstMember();
while ( pCur )
{
if ( strcmp( pCur->GetSymName(), pName ) == 0 )
return pCur;
pCur = (node_param *) pCur->GetSibling();
}
return NULL;
}
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetReturnType()->GetMemoryInfo();}
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
virtual unsigned long
GetServerCorrelationCount()
{
return ulServerCorrCount;
}
virtual unsigned long
GetClientCorrelationCount()
{
return ulClientCorrCount;
}
virtual void
SetServerCorrelationCount( unsigned long ulCount = 0 )
{
ulServerCorrCount = ulCount;
}
virtual void
SetClientCorrelationCount( unsigned long ulCount = 0 )
{
ulClientCorrCount = ulCount;
}
virtual void
IncServerCorrelationCount( unsigned long ulInc )
{
ulServerCorrCount += ulInc;
}
virtual void
IncClientCorrelationCount( unsigned long ulInc )
{
ulClientCorrCount += ulInc;
}
void SetCSTagRoutine(node_proc *p)
{
pCSTagRoutine = p;
}
node_proc * GetCSTagRoutine()
{
return pCSTagRoutine;
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_proc
class SymTable;
// forward declarations -- may go away
class node_forward : public named_node, public tracked_node
{
SymKey SKey;
SymTable * pSymTbl;
public:
node_forward( SymKey key, SymTable * pTbl )
: named_node( NODE_FORWARD )
{
SKey = key;
pSymTbl = pTbl;
pTbl->SetHasFwds();
MiscBits = 0;
};
named_node * ResolveFDecl();
void GetSymDetails( NAME_T * nm, char ** ppszName);
BOOL IsFirstPass()
{
return ( MiscBits == 0 );
}
void MarkSecondPass()
{
MiscBits = 1;
}
void MarkFirstPass()
{
MiscBits = 0;
}
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetInvalidMemoryInfo();}
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
};
// reference to a type defined in an importlib
class node_href : public named_node, public tracked_node
{
SymKey SKey;
SymTable * pSymTbl;
void * pTypeInfo;
node_file * pFile;
public:
node_href( SymKey key, SymTable * pTbl, void * pti, node_file * pf)
: named_node( NODE_HREF, key.GetString() )
{
SKey = key;
pSymTbl = pTbl;
pTbl->SetHasFwds();
MiscBits = 0;
pTypeInfo = pti;
pFile = pf;
};
~node_href();
named_node * Resolve();
void GetSymDetails( NAME_T * pTag, char ** ppszName)
{
*pTag = SKey.GetKind();
*ppszName = SKey.GetString();
};
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
virtual
node_file * GetDefiningFile()
{
return pFile;
};
};
// fields in structures
class node_field : public named_node
{
public:
node_field( char * pNewName = NULL )
: named_node( NODE_FIELD, pNewName )
{
MiscBits = 0;
};
node_field( node_id_fe * pId )
: named_node( NODE_FIELD, pId )
{
MiscBits = 0;
};
BOOL HasUnknownRepAs()
{
return (BOOL) MiscBits & 1;
};
BOOL SetHasUnknownRepAs()
{
return (BOOL) (MiscBits |= 1);
};
BOOL IsEmptyArm()
{
return (GetChild()->NodeKind() == NODE_ERROR);
};
BOOL IsLastField()
{
return !(GetSibling());
};
virtual
BOOL IsBitField()
{
return FALSE;
}
virtual
short GetFieldSize()
{
return 0;
};
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetModifiedMemoryInfoFromChild();}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_field
// bitfields in structures
class node_bitfield : public node_field
{
public:
unsigned char fBitField;
node_bitfield( char * pNewName = NULL)
: node_field( pNewName )
{
fBitField = 0;
};
node_bitfield( node_id_fe * pId )
: node_field( pId )
{
fBitField = 0;
};
virtual
BOOL IsBitField()
{
return TRUE;
}
virtual
short GetFieldSize()
{
return fBitField;
};
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_bitfield
// bits for different kinds of arrays as fields.
// if more than one bit is set, it is a complex array
#define FLD_PLAIN 0x0
#define FLD_VAR 0x1
#define FLD_CONF 0x2
#define FLD_CONF_VAR 0x4
#define FLD_COMPLEX 0x8 // don't check for equality here!
// structures and unions, and enums, too
class node_su_base : public named_node, public tracked_node, public MEMLIST
{
protected:
unsigned long ZeePee : 16;
unsigned long Complexity : 8;
unsigned long fHasAtLeastOnePointer : 1;
unsigned long fSemAnalyzed : 1;
unsigned long fHasConformance : 1;
char * szTypeInfoName;
public:
node_su_base( NODE_T Kind, char * pName )
: named_node( Kind, pName )
{
fHasAtLeastOnePointer = 0;
ZeePee = 0;
Complexity = 0;
fSemAnalyzed = 0;
fHasConformance = 0;
szTypeInfoName = pName;
};
unsigned short SetZeePee( unsigned short zp )
{
return (unsigned short) (ZeePee = zp);
};
unsigned short GetZeePee()
{
return (unsigned short) ZeePee;
};
unsigned short SetHasAtLeastOnePointer( unsigned short HP )
{
return (unsigned short) (fHasAtLeastOnePointer = HP);
};
unsigned short HasAtLeastOnePointer()
{
return (unsigned short) fHasAtLeastOnePointer;
};
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
BOOL HasConformance()
{
return fHasConformance;
}
void CheckLegalParent(SEM_ANALYSIS_CTXT & MyContext);
void SetTypeInfoName(char * szName)
{
szTypeInfoName = szName;
}
char * GetTypeInfoName(void)
{
return szTypeInfoName;
}
}; // end of class node_su_base
// enum and its tag
class node_enum : public node_su_base
{
BOOL fLong : 1;
public:
node_enum (
char* pTagName
) :
node_su_base( NODE_ENUM, pTagName ),
fLong( FALSE )
{
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_enum
// structures
class node_struct : public node_su_base
{
public:
node_struct( char * pNewName )
: node_su_base( NODE_STRUCT, pNewName )
{
};
virtual
BOOL IsEncapsulatedStruct()
{
return FALSE;
}
virtual
BOOL IsStructOrUnion()
{
return TRUE;
}
virtual
BOOL IsStringableType();
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_struct
class node_en_struct : public node_struct
{
public:
node_en_struct( char * pNewName )
: node_struct( pNewName )
{
};
BOOL IsEncapsulatedStruct()
{
return TRUE;
}
node_skl * GetSwitchField()
{
return GetFirstMember();
}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_en_struct
// unions
class node_union : public node_su_base
{
public:
node_union( char * pNewName )
: node_su_base( NODE_UNION, pNewName )
{
};
virtual
BOOL IsStructOrUnion()
{
return TRUE;
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_union
class node_en_union : public node_union
{
public:
node_en_union( char * pNewName )
: node_union( pNewName )
{
};
virtual
BOOL IsEncapsulatedUnion()
{
return TRUE;
}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_en_union
#define HANDLE_KIND_MASK 0x7
#define HRESULT_FLAG_MASK 0x8
// typedef entries
class node_def : public named_node
{
public:
// (lightweight version) make a typedef with a given name
node_def( char * pName = NULL)
: named_node( pName, NODE_DEF )
{
SetHandleKind( HDL_NONE );
};
// make a typedef with a given name and child
node_def( char * pName, node_skl * pChld )
: named_node( NODE_DEF, pName )
{
MiscBits = 0;
SetHandleKind( HDL_NONE );
SetChild( pChld );
};
// make a typedef cloned from a node_id
node_def( node_id_fe * pIdent )
: named_node( NODE_DEF, pIdent )
{
MiscBits = 0;
SetHandleKind( HDL_NONE );
};
// make a typedef node for (above) a proc
node_def( node_proc * pProc )
: named_node( NODE_DEF, (node_id_fe *) pProc )
{
MiscBits = 0;
SetChild( pProc );
SetHandleKind( HDL_NONE );
};
unsigned long GetHandleKind()
{
return MiscBits & HANDLE_KIND_MASK;
}
unsigned long SetHandleKind( unsigned long H )
{
MiscBits = ( MiscBits & ~HANDLE_KIND_MASK ) | H;
return H;
}
void SetIsHResultOrSCode()
{
MiscBits |= HRESULT_FLAG_MASK;
}
BOOL IsHResultOrSCode()
{
return ( MiscBits & HRESULT_FLAG_MASK ) != 0;
}
BOOL HasAnyHandleSpecification()
{
return (GetHandleKind() != HDL_NONE);
};
BOOL HasAnyCtxtHdlSpecification()
{
return (GetHandleKind() == HDL_CTXT);
};
// return the transmit_as type (or NULL)
node_skl * GetTransmittedType();
// return the represent_as type (or NULL)
char * GetRepresentationName();
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
void MarkDontCallFreeInst( SEM_ANALYSIS_CTXT * pCtxt );
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
void
node_def::SemanticAnalysisForTransmit( SEM_ANALYSIS_CTXT *pMyContext,
BOOL fPresented );
void
node_def::SemanticAnalysisForWireMarshal( SEM_ANALYSIS_CTXT *pMyContext,
BOOL fPresented );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_def
// front-end only version of node_def ( adds line number tracking )
class node_def_fe : public node_def, public tracked_node
{
public:
// make a typedef with a given name and child
node_def_fe( char * pName, node_skl * pChld )
: node_def( pName, pChld )
{
}
// make a typedef cloned from a node_id
node_def_fe( node_id_fe * pIdent )
: node_def( pIdent )
{
}
// make a typedef node for (above) a proc
node_def_fe( node_proc * pProc )
: node_def( pProc )
{
};
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
}; // end of class node_def_fe
typedef struct tagIDLISTMEM
{
struct tagIDLISTMEM * pNext;
char * szName;
__int64 lId;
} IDLISTMEM;
// class for checking for duplicate dispatch ids
class CIDLIST
{
private:
IDLISTMEM * pHead;
public:
CIDLIST()
{
pHead = NULL;
};
~CIDLIST()
{
while (pHead)
{
IDLISTMEM * pThis = pHead;
pHead = pHead->pNext;
delete pThis;
}
};
BOOL AddId(__int64 lId, char * szName);
};
// the interface
class node_interface : public named_node, public MEMLIST, public tracked_node
{
protected:
named_node * pBaseIntf; // base interface if derived intf
node_file * pDefiningFile;
CG_CLASS * pMyCG;
CG_CLASS * pMyTlbCG; // CG node generated in library block
SymTable * pProcTbl;
unsigned short ProcCount;
unsigned short CallBackProcCount;
unsigned short OptimFlags;
OPT_LEVEL_ENUM OptimLevel;
BOOL fIAmIUnknown : 1;
BOOL fPickle : 1;
BOOL fHasProcsWithRpcSs : 1;
BOOL fSemAnalyzed : 1;
BOOL fPrintedDef : 1;
BOOL fPrintedIID : 1;
BOOL fHasOLEAutomation : 1;
BOOL fIsAsyncClone : 1;
BOOL fHasMSConfStructAttr: 1;
BOOL fIs2ndCodegen : 1;
CIDLIST IdList;
node_interface* pAsyncInterface;
void ResetCGIfNecessary();
public:
node_interface( NODE_T Kind = NODE_INTERFACE );
unsigned short &GetProcCount()
{
return ProcCount;
}
unsigned short &GetCallBackProcCount()
{
return CallBackProcCount;
}
void GetVersionDetails( unsigned short * Maj,
unsigned short * Min );
BOOL AddId(__int64 lId, char * szName)
{
return IdList.AddId(lId, szName);
}
virtual BOOL IsAsyncClone()
{
return fIsAsyncClone;
}
virtual void SetIsAsyncClone()
{
fIsAsyncClone = TRUE;
}
virtual
BOOL IsInterfaceOrObject()
{
return TRUE;
}
BOOL IsValidRootInterface()
{
return fIAmIUnknown;
}
void SetValidRootInterface()
{
fIAmIUnknown = TRUE;
}
BOOL IsPickleInterface()
{
return fPickle;
}
void SetPickleInterface()
{
fPickle = TRUE;
}
BOOL GetHasProcsWithRpcSs()
{
return fHasProcsWithRpcSs;
}
virtual
node_file * GetDefiningFile()
{
return pDefiningFile;
}
void SetHasProcsWithRpcSs()
{
fHasProcsWithRpcSs = TRUE;
}
BOOL PrintedDef()
{
return fPrintedDef;
}
void SetPrintedDef()
{
fPrintedDef = TRUE;
}
BOOL PrintedIID()
{
return fPrintedIID;
}
void SetPrintedIID()
{
fPrintedIID = TRUE;
}
node_interface *GetMyBaseInterface();
// note that my base interface reference may be
// a fwd or null
named_node * GetMyBaseInterfaceReference()
{
return pBaseIntf;
}
named_node * SetMyBaseInterfaceReference( named_node * pIF )
{
return (pBaseIntf = pIF);
}
virtual
node_file * GetFileNode()
{
return pDefiningFile;
}
virtual
node_file * SetFileNode(node_file * pF)
{
return (pDefiningFile = pF);
}
CG_CLASS * GetCG(BOOL fInLibrary)
{
ResetCGIfNecessary();
if (fInLibrary)
return pMyTlbCG;
else
return pMyCG;
}
CG_CLASS * SetCG(BOOL fInLibrary, CG_CLASS * pF)
{
if (fInLibrary)
return (pMyTlbCG = pF);
else
return (pMyCG = pF);
}
SymTable * GetProcTbl()
{
return pProcTbl;
}
SymTable * SetProcTbl( SymTable * pS )
{
return (pProcTbl = pS);
}
unsigned short GetOptimizationFlags()
{
return OptimFlags;
}
unsigned short SetOptimizationFlags(unsigned short F)
{
return (OptimFlags = F);
}
OPT_LEVEL_ENUM GetOptimizationLevel()
{
return (OPT_LEVEL_ENUM) OptimLevel;
}
OPT_LEVEL_ENUM SetOptimizationLevel( OPT_LEVEL_ENUM Level )
{
return OptimLevel = Level;
}
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetInvalidMemoryInfo();}
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
virtual BOOL HasOLEAutomation() { return fHasOLEAutomation; };
virtual void HasOLEAutomation(BOOL fHas) { fHasOLEAutomation = fHas; };
virtual node_interface*
GetAsyncInterface() { return pAsyncInterface; };
virtual void
SetAsyncInterface( node_interface* pIF ) { pAsyncInterface = pIF; };
}; // end of class node_interface
class node_pipe;
// the interface
class node_interface_reference : public named_node
{
private:
public:
node_interface_reference( node_interface * pIntf )
: named_node( NODE_INTERFACE_REFERENCE )
{
SetChild( pIntf );
SetSymName( pIntf->GetSymName() );
}
node_interface *GetRealInterface()
{
return (node_interface *)GetChild();
}
named_node * GetMyBaseInterfaceReference()
{
return ((node_interface *)GetChild())->
GetMyBaseInterfaceReference();
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo( ) { return GetInvalidMemoryInfo();}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_interface_reference
/***
*** unnamed nodes
***/
// the root of the typegraph
class node_source : public node_skl, public MEMLIST
{
public:
node_source()
: node_skl( NODE_SOURCE, NULL )
{
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetInvalidMemoryInfo();};
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_source
// pointers and arrays
class npa_nodes : public node_skl
{
unsigned long fHasCSType : 1; // An array of international chars
public:
npa_nodes( NODE_T Kind )
: node_skl( Kind, NULL )
{
fHasCSType = FALSE;
};
void SetHasCSType()
{
fHasCSType = TRUE;
}
BOOL HasCSType()
{
return fHasCSType;
}
BOOL FInSummary( ATTR_T flag )
{
BOOL result;
if ( flag >= ATTR_CPORT_ATTRIBUTES_START && flag <= ATTR_CPORT_ATTRIBUTES_END)
{
result = GetModifiers().IsModifierSet( flag );
}
else
{
result = FALSE;
}
return result;
};
BOOL IsPtrOrArray()
{
return TRUE;
}
}; // end of class npa_nodes
// pointers
class node_pointer : public npa_nodes
{
private:
public:
// constructors
node_pointer()
: npa_nodes( NODE_POINTER )
{
}
node_pointer(node_skl * pChild)
: npa_nodes( NODE_POINTER )
{
SetChild(pChild);
}
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_pointer
// array
class node_array : public npa_nodes
{
expr_node * pUpperBound;
expr_node * pLowerBound;
unsigned long fConformant : 1;
unsigned long fMaybeVarying : 1; // set during semantic analysis
unsigned long fHasPointer : 1;
public:
node_array( expr_node * pLower, expr_node * pUpper )
: npa_nodes( NODE_ARRAY )
{
pUpperBound = pUpper;
pLowerBound = pLower;
fMaybeVarying = TRUE;
fConformant = (pUpper == (expr_node *) -1);
fHasPointer = FALSE;
}
BOOL HasPointer()
{
return fHasPointer;
};
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_array
// misc strings to echo directly
class node_echo_string : public named_node
{
protected:
char * pString;
public:
node_echo_string( char * pStr )
: named_node( NODE_ECHO_STRING )
{
pString = pStr;
SetChild( NULL );
};
char * GetEchoString()
{
return pString;
};
virtual
void PrintSelf( ISTREAM * pStream );
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetInvalidMemoryInfo();}
virtual
void PrintMemoryInfo( ISTREAM *pStream, BOOL bNewLine );
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_echo_string
// #pragma pack(...) string node
#define PRAGMA_PACK_GARBAGE 0
#define PRAGMA_PACK_PUSH 1
#define PRAGMA_PACK_POP 2
#define PRAGMA_PACK_SET 3
#define PRAGMA_PACK_RESET 4
class node_pragma_pack : public node_echo_string
{
private:
node_pragma_pack * pStackLink;
unsigned short PackType;
unsigned short usPackingLevel;
unsigned short usNewLevel;
public:
node_pragma_pack( char * ID,
unsigned short lvl,
unsigned short PT,
unsigned short nlvl = 0 )
: node_echo_string( ID )
{
usPackingLevel = lvl;
PackType = PT;
usNewLevel = nlvl;
}
unsigned short GetZeePee()
{
return usPackingLevel;
}
// link self on as new top node
void Push( node_pragma_pack *& pTop );
// search for matching push and pop it off, returning new ZP
unsigned short Pop( node_pragma_pack *& pTop );
virtual
void PrintSelf( ISTREAM * pStream );
};
class node_e_status_t : public named_node
{
public:
node_e_status_t();
void VerifyParamUsage( SEM_ANALYSIS_CTXT * pCtxt );
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetModifiedMemoryInfoFromChild();}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_e_status_t
// error status -- may go away
class node_error : public node_skl
{
public:
node_error()
: node_skl( NODE_ERROR, NULL )
{
}
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetInvalidMemoryInfo();}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_error
// Flag if the variable is used in a size_is, etc expression, and wether or not
// it's a cs_char array expression
enum SIZE_LENGTH_USAGE
{
NoSizeLengthUsage,
CSSizeLengthUsage,
NonCSSizeLengthUsage
};
// base types e.g. char, long
class node_base_type : public named_node
{
// SIZE_LENGTH_USAGE SizeLengthUsage;
public:
node_base_type( NODE_T MyKind, ATTR_T attr )
: named_node( MyKind )
{
if ( attr != ATTR_NONE )
GetModifiers().SetModifier( attr );
// SizeLengthUsage = NoSizeLengthUsage;
};
node_base_type( const node_base_type * pOriginal )
: named_node( NODE_ILLEGAL )
{
*this = *pOriginal;
}
virtual
BOOL IsBasicType()
{
return TRUE;
}
virtual
BOOL IsStringableType()
{
return ( NodeKind() == NODE_CHAR ) ||
( NodeKind() == NODE_BYTE );
}
BOOL IsAssignmentCompatible( node_base_type * );
// bool IsCompatibleType( TypeSet set ); Nishad
/*
BUGBUG: CG_INTERFACE_POINTER has a bug where it will case a node_base_type to
a node_interface for QI. It just happens to work at the momement but
when the size for node_base_type is increased it causes the TLB code
to AV. Put this back when that is fixed. -- MikeW
SIZE_LENGTH_USAGE GetSizeLengthUsage()
{
return SizeLengthUsage;
}
void SetSizeLengthUsage( SIZE_LENGTH_USAGE usage )
{
SizeLengthUsage = usage;
}
*/
BOOL RangeCheck( __int64 Val );
BOOL IsUnsigned();
virtual
EXPR_VALUE ConvertMyKindOfValueToEXPR_VALUE( __int64 EXPR_VALUE );
void CheckVoidUsage( SEM_ANALYSIS_CTXT * pContext );
void CheckVoidUsageInDispinterface( SEM_ANALYSIS_CTXT * pContext );
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_base_type
// character width specifier
class node_wchar_t : public named_node
{
public:
node_wchar_t();
virtual
BOOL IsStringableType()
{
return TRUE;
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetModifiedMemoryInfoFromChild();}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_wchar_t
class node_library : public node_interface
{
private:
public:
node_library()
: node_interface( NODE_LIBRARY )
{
}
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
virtual
node_file * SetFileNode(node_file * pF)
{
named_node * pN;
MEM_ITER MemIter(this);
while ( pN = MemIter.GetNext() )
{
pN->SetFileNode( pF );
}
return (pDefiningFile = pF);
}
}; // end of class node_library
class node_coclass : public node_interface
{
private:
BOOL fNotCreatable;
protected:
public:
node_coclass()
: node_interface( NODE_COCLASS )
{
fNotCreatable = FALSE;
}
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
BOOL IsNotCreatable(void)
{
return fNotCreatable;
}
BOOL SetNotCreatable(BOOL f)
{
return (fNotCreatable = f);
}
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_coclass
class node_module : public node_interface
{
private:
protected:
public:
node_module()
: node_interface( NODE_MODULE )
{
}
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_module
class node_dispinterface : public node_interface
{
named_node * pDispatch;
protected:
public:
node_dispinterface()
: node_interface( NODE_DISPINTERFACE )
{
}
virtual
void GetPositionInfo( tracked_node & Posn )
{
if (this->HasTracking() )
Posn = * ((tracked_node *) this);
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual STATUS_T
DoPrintDecl (
PRTFLAGS Flags,
BufferManager* pBuffer,
ISTREAM* pStream,
node_skl* pParent,
node_skl* pIntf
);
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
named_node * GetIDispatch()
{
return pDispatch;
}
}; // end of class node_dispinterface
#define SZ_ASYNCPIPEDEFPREFIX "ASYNC_"
class node_pipe : public named_node
{
private:
bool fGenAsyncPipeFlavor;
protected:
bool
GenAsyncPipeFlavor() { return fGenAsyncPipeFlavor; }
void
SetGenAsyncPipeFlavor( bool fGen = true ) { fGenAsyncPipeFlavor = fGen; }
STATUS_T PrintDeclaration(
PRTFLAGS Flags,
BufferManager* pBuffer,
ISTREAM* pStream,
node_skl* pParent,
node_skl* pIntf,
char* szPrefix
);
public:
// constructors
node_pipe()
: named_node( NODE_PIPE ),
fGenAsyncPipeFlavor( false )
{
}
node_pipe(node_skl * pType)
: named_node( NODE_PIPE ),
fGenAsyncPipeFlavor( false )
{
SetChild(pType);
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetInvalidMemoryInfo();}
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
}; // end of class node_pipe
class node_safearray : public npa_nodes
{
private:
// this maintains a reference to LPSAFEARRAY. This is
// necessary to generate the appropriate code when
// SAFEARRAY(type) construct is used outside the library block
named_node* pSafeArrayTypedef;
BOOL fInProxy;
public:
// constructors
node_safearray()
: npa_nodes( NODE_SAFEARRAY ),
pSafeArrayTypedef( 0 ),
fInProxy(0)
{
}
node_safearray(node_skl * pType)
: npa_nodes( NODE_SAFEARRAY ),
pSafeArrayTypedef( 0 ),
fInProxy(0)
{
SetChild(pType);
}
virtual
STATUS_T DoPrintType( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
STATUS_T DoPrintDecl( PRTFLAGS Flags,
BufferManager * pBuffer,
ISTREAM * pStream,
node_skl * pParent,
node_skl * pIntf );
virtual
FRONT_MEMORY_INFO GetMemoryInfo();
virtual
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
virtual
CG_CLASS * ILxlate( XLAT_CTXT * pContext );
virtual
void SetTypeAlias( named_node* pAlias) { pSafeArrayTypedef = pAlias; };
virtual
named_node* GetTypeAlias( void ) { return pSafeArrayTypedef; };
}; // end of class node_pointer
class node_async_handle : public named_node
{
private:
public:
node_async_handle( char* szName ) : named_node( szName, NODE_ASYNC_HANDLE )
{
}
STATUS_T DoPrintDecl(PRTFLAGS Flags,
BufferManager* pBuffer,
ISTREAM* pStream,
node_skl* pParent,
node_skl* pIntf );
STATUS_T DoPrintType(PRTFLAGS Flags,
BufferManager* pBuffer,
ISTREAM* pStream,
node_skl* pParent,
node_skl* pIntf);
virtual
FRONT_MEMORY_INFO GetMemoryInfo( ) { return GetInvalidMemoryInfo();}
CG_CLASS* ILxlate( XLAT_CTXT* pContext );
void SemanticAnalysis( SEM_ANALYSIS_CTXT * pParentCtxt );
}; // node_async_handle
typedef enum __PragmaType
{
mp_MessageDisable,
mp_MessageEnable
} PragmaType;
class node_midl_pragma : public named_node
{
private:
PragmaType m_PragmaType;
gplistmgr* m_pMsgList;
public:
node_midl_pragma( PragmaType pt, gplistmgr* pList ) :
named_node( NODE_MIDL_PRAGMA, "midl_pragma" ),
m_PragmaType( pt ),
m_pMsgList( pList )
{
}
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetInvalidMemoryInfo();}
void SemanticAnalysis( SEM_ANALYSIS_CTXT* );
CG_CLASS* ILxlate( XLAT_CTXT* pContext );
void ProcessPragma();
}; // node_midl_pragma
class node_decl_guid : public named_node
{
public:
node_decl_guid( char* szName, node_guid* guid ) : named_node( NODE_DECL_GUID, szName ),
pGuid( guid )
{
}
virtual
FRONT_MEMORY_INFO GetMemoryInfo() {return GetInvalidMemoryInfo();}
void SemanticAnalysis( SEM_ANALYSIS_CTXT* );
CG_CLASS* ILxlate( XLAT_CTXT* pContext );
STATUS_T
DoPrintType (
PRTFLAGS,
BufferManager*,
ISTREAM*,
node_skl*,
node_skl*
);
STATUS_T
DoPrintDecl (
PRTFLAGS,
BufferManager*,
ISTREAM*,
node_skl*,
node_skl*
);
private:
node_guid* pGuid;
};
#endif // __NODESKL_HXX__