/*****************************************************************************/
/**						Microsoft LAN Manager								**/
/**				Copyright(c) Microsoft Corp., 1987-1990						**/
/*****************************************************************************/
/*****************************************************************************
File				: pass2.cxx
Title				: pass2 controller
History				:
	24-Aug-1991	VibhasC	Created

*****************************************************************************/

#if 0
						Notes
						-----
This file provides the interface for the acf semantics pass. It also
initializes the pass2 controller object.

#endif // 0

/****************************************************************************
 includes
 ****************************************************************************/

#include "nulldefs.h"
extern	"C"	{
	#include <stdio.h>
	#include <stdlib.h>
	#include <malloc.h>
	extern int yyacfparse();
}

#include "nodeskl.hxx"
#include "control.hxx"
#include "cmdana.hxx"
#include "miscnode.hxx"
#include "filehndl.hxx"
#include "acfattr.hxx"
#include "ctxt.hxx"
#include "idict.hxx"

/****************************************************************************
	local definitions
 ****************************************************************************/

#define ACF_ATTR_COUNT	(ACF_ATTR_END - ACF_ATTR_START)
#define ACF_ATTR_MAX	(ACF_ATTR_COUNT - 1)

/****************************************************************************
	extern procedures
 ****************************************************************************/

extern void						initlex();
extern void						AcfConflictInit( void );

/****************************************************************************
	extern data 
 ****************************************************************************/

extern class ccontrol		*	pCompiler;
extern node_source			*	pSourceNode;
extern node_interface		*	pBaseInterfaceNode;
extern NFA_INFO				*	pImportCntrl;
extern CMD_ARG				*	pCommand;
extern BOOL						fAtLeastOneProcWOHandle;
extern idict				*	pDictProcsWOHandle;

/****************************************************************************
	local data
 ****************************************************************************/

ATTR_SUMMARY 		AcfConflicts[ ACF_ATTR_COUNT ][ ATTR_VECTOR_SIZE ];

/****************************************************************************/


_pass2::_pass2()
	{
	

//	AcfConflictInit(); // done already in pass1 to prepare for -app_config

	pAcfIncludeList	= (type_node_list *)NULL;

	pCompiler->SetPassNumber( ACF_PASS );
	}

STATUS_T
_pass2::Go()
	{
	type_node_list	*	pTNList = new type_node_list;
	node_file		*	pFNode;
	char				Buffer[_MAX_DRIVE+_MAX_PATH+_MAX_FNAME+_MAX_EXT+1];
	STATUS_T			Status = STATUS_OK;

	/**
	 ** create a new import controller for the acf and
	 ** set the defaults needed
	 **/

	pImportCntrl	= pCompiler->SetImportController( new NFA_INFO );
	pImportCntrl->Init();

	pAcfIncludeList	= new type_node_list;

	pSourceNode->GetMembers( pTNList );

	/**
	 ** for each idl file, check if the corresponding acf exists.
	 ** if yes, process it.
	 **/


	pTNList->Init();
	while( pTNList->GetNext( ( void ** )&pFNode ) == STATUS_OK )
		{

		/**
		 ** for now we assume one interface per child.
		 **/

		pInterfaceNode = (node_interface *)pFNode->GetBasicType();

		if( pFNode->AcfExists() )
			{
			pFNode->AcfName( Buffer );

			if( !pImportCntrl->IsDuplicateInput( Buffer ) )
				{
				Status = pImportCntrl->SetNewInputFile( Buffer );

				if( Status != STATUS_OK)
					break;

				pImportCntrl->ResetEOIFlag();

				initlex();


				if( yyacfparse()  || pCompiler->GetErrorCount() )
					{
					Status = SYNTAX_ERROR;
					break;
					}
				}
			}
		else if( pInterfaceNode == pBaseInterfaceNode )
			{

			// he could not find  the acf file. If the user did specify 
			// an acf switch then we must error out if we do not find
			// the acf.

			if( pCommand->IsSwitchDefined( SWITCH_ACF ) )
				{
				RpcError((char *)NULL,
						 0,
						 (Status = INPUT_OPEN) ,
						 pCommand->GetAcfFileName());
				break;
				}
			}
		}

	delete pTNList;

	/**
	 ** if interface node exists, and does not have any handle type, warn
	 ** the user that midl will use auto_handle. The interface node pointer
	 ** is to the last interface node, which is the base idl file
	 **/

	if( (Status == STATUS_OK) )
		{
		if( pBaseInterfaceNode )
			{
			if( !pBaseInterfaceNode->FInSummary( ATTR_IMPLICIT) &&
			   	!pBaseInterfaceNode->FInSummary( ATTR_AUTO ) &&
			   	!pBaseInterfaceNode->FInSummary( ATTR_OBJECT ) )
				{
				node_auto	*	pAuto = new node_auto;
				pBaseInterfaceNode->node_skl::SetAttribute(
											(node_base_attr *)pAuto );

				// hack for the -hpp. If they specified -hpp, then handle specs
				// dont mean anything for them, hence dont report this error.
				// Otherwise, this error needs to be reported.

				if( !pCommand->IsSwitchDefined( SWITCH_HPP )		&&
					 fAtLeastOneProcWOHandle						&&
					 pDictProcsWOHandle
				  )
					{
					short	i;
					short 	Count= pDictProcsWOHandle->GetCurrentSize();

					for( i = 0;  i < Count; i++)
						{
						RpcError( (char*)NULL,
							  	0,
							  	NO_HANDLE_DEFINED_FOR_PROC,
							  	(char *)pDictProcsWOHandle->GetElement(
															(IDICTKEY)i) );
						}

					}
				}
			}

		/**
	 	 ** The acf pass may have created include file nodes They must translate
	 	 ** into include statements in the generated stubs. We handle that by
	 	 ** merging the include file list with the members of the source node.
	 	 **/

		pTNList	= new type_node_list;
	
		pSourceNode->GetMembers( pTNList );
		pAcfIncludeList->Merge( pTNList );
		pSourceNode->SetMembers( pAcfIncludeList );
		}

	delete pAcfIncludeList;
	delete pImportCntrl;
	return Status;
	}

void
AcfConflictInit()
	{
	// Initialize conflicting attribute array

	SET_ATTR( AcfConflicts[ ATTR_IMPLICIT - ACF_ATTR_START ] , ATTR_AUTO);
	SET_ATTR( AcfConflicts[ ATTR_IMPLICIT - ACF_ATTR_START ] , ATTR_EXPLICIT);

	SET_ATTR( AcfConflicts[ ATTR_EXPLICIT - ACF_ATTR_START ] , ATTR_AUTO);
	SET_ATTR( AcfConflicts[ ATTR_EXPLICIT - ACF_ATTR_START ] , ATTR_IMPLICIT);

	SET_ATTR( AcfConflicts[ ATTR_AUTO - ACF_ATTR_START ] , ATTR_EXPLICIT);
	SET_ATTR( AcfConflicts[ ATTR_AUTO - ACF_ATTR_START ] , ATTR_IMPLICIT);

	SET_ATTR( AcfConflicts[ ATTR_INLINE - ACF_ATTR_START ], ATTR_OUTOFLINE );
	SET_ATTR( AcfConflicts[ ATTR_OUTOFLINE - ACF_ATTR_START ], ATTR_INLINE );

	SET_ATTR( AcfConflicts[ ATTR_CODE - ACF_ATTR_START ], ATTR_NOCODE );
	SET_ATTR( AcfConflicts[ ATTR_NOCODE - ACF_ATTR_START ], ATTR_CODE );

	SET_ATTR( AcfConflicts[ ATTR_SHORT_ENUM - ACF_ATTR_START ],ATTR_LONG_ENUM );
	SET_ATTR( AcfConflicts[ ATTR_LONG_ENUM - ACF_ATTR_START ],ATTR_SHORT_ENUM );

	SET_ATTR( AcfConflicts[ ATTR_INTERPRET - ACF_ATTR_START ],ATTR_NOINTERPRET );
	SET_ATTR( AcfConflicts[ ATTR_NOINTERPRET - ACF_ATTR_START ],ATTR_INTERPRET );
	}