#include "stdafx.h"

#include <Compiler.h>

#define BREAK_EIP(checkEip)  (obp+0x00401000>=checkEip)

const ::DllProc &Schedule::GetDllProc() const
{
	if( type != Schedule::DllProc )
	{
		compiler.errorMessenger.OutputFatalError();
	}
	return *pDllProc;
}
const ::UserProc &Schedule::GetUserProc() const
{
	if( !( type == Schedule::UserProc || type == Schedule::AddressOf || type == Schedule::CatchAddress ) )
	{
		compiler.errorMessenger.OutputFatalError();
	}
	return *pUserProc;
}
const ::CClass &Schedule::GetClass() const
{
	if( !( type == Schedule::ComVtbl || type == Schedule::Vtbl || type == Schedule::TypeInfo ) )
	{
		compiler.errorMessenger.OutputFatalError();
	}
	return *pClass;
}

void Schedule::SpecifyAddressOf()
{
	if( type != Schedule::UserProc )
	{
		compiler.errorMessenger.OutputFatalError();
	}
	type = Schedule::AddressOf;
}
void Schedule::SpecifyCatchAddress()
{
	if( type != Schedule::UserProc )
	{
		compiler.errorMessenger.OutputFatalError();
	}
	type = Schedule::CatchAddress;
}

void NativeCode::PutEx( const NativeCode &nativeCode )
{
	long baseOffset = GetSize();

	// コードバッファを追加
	Put( nativeCode.GetBuffer(), nativeCode.GetSize() );

	// スケジュールを追加
	BOOST_FOREACH( const Schedule &schedule, nativeCode.schedules )
	{
		this->schedules.push_back(
			Schedule(
				schedule.GetType(),
				baseOffset + schedule.GetOffset(),
				schedule.GetLongPtrValue()
			)
		);
	}

	// ソースコード行番号とネイティブコード位置の対応情報を追加
	BOOST_FOREACH( const SourceLine &sourceLine, nativeCode.sourceLines )
	{
		this->sourceLines.push_back(
			SourceLine(
				sourceLine.GetLineNum(),
				baseOffset + sourceLine.GetNativeCodePos(),
				sourceLine.GetSourceIndex(),
				sourceLine.GetSourceCodePos(),
				sourceLine.GetCodeType()
			)
		);
	}
}

void NativeCode::PutEx( long l, Schedule::Type scheduleType )
{
	if( scheduleType == Schedule::CatchAddress )
	{
		const UserProc *pUserProc = &compiler.GetCompilingUserProc();
		if( compiler.IsGlobalAreaCompiling() )
		{
			pUserProc = UserProc::pGlobalProc;
		}
		PutCatchAddressSchedule( pUserProc, l );
	}
	else
	{
		if( scheduleType != Schedule::None )
		{
			schedules.push_back( Schedule( scheduleType, GetSize() ) );
		}

		Put( l );
	}
}

void NativeCode::PutUserProcSchedule( const UserProc *pUserProc, bool isCall )
{
	pUserProc->Using();

	Schedule schedule( pUserProc, GetSize() );
	if( isCall == false )
	{
		schedule.SpecifyAddressOf();
	}
	schedules.push_back( schedule );

	Put( (long)0 );
}

void NativeCode::PutCatchAddressSchedule( const UserProc *pUserProc, long codePos )
{
	pUserProc->Using();

	Schedule schedule( pUserProc, GetSize() );
	schedule.SpecifyCatchAddress();
	schedules.push_back( schedule );

	Put( codePos );
}

void NativeCode::PutDllProcSchedule( const DllProc *pDllProc )
{
	pDllProc->Using();

	schedules.push_back( Schedule( pDllProc, GetSize() ) );

	Put( (long)0 );
}

void NativeCode::PutComVtblSchedule( const CClass *pClass )
{
	schedules.push_back( Schedule( Schedule::ComVtbl, pClass, GetSize() ) );

	Put( (long)0 );
}

void NativeCode::PutVtblSchedule( const CClass *pClass )
{
	schedules.push_back( Schedule( Schedule::Vtbl, pClass, GetSize() ) );

	Put( (long)0 );
}

void NativeCode::NextSourceLine()
{
	if( sourceLines.size() )
	{
		if( sourceLines.back().GetNativeCodePos() == GetSize() )
		{
			sourceLines.back().SetSourceCodePos( cp );
			return;
		}
	}

	extern BOOL bDebugSupportProc;
	extern BOOL bSystemProc;
	DWORD sourceLineType = 0;
	if( bDebugSupportProc )
	{
		sourceLineType |= CODETYPE_DEBUGPROC;
	}
	if( bSystemProc )
	{
		sourceLineType |= CODETYPE_SYSTEMPROC;
	}
	sourceLines.push_back(
		SourceLine(
			(long)sourceLines.size(),
			GetSize(),
			compiler.GetObjectModule().GetCurrentSourceIndex(),
			cp,
			sourceLineType
		)
	);
}

void NativeCode::ResetDataSectionBaseOffset( long dataSectionBaseOffset )
{
	BOOST_FOREACH( const Schedule &schedule, schedules )
	{
		if( schedule.GetType() == Schedule::DataTable )
		{
			Overwrite(
				schedule.GetOffset(),
				GetLong( schedule.GetOffset() ) + dataSectionBaseOffset
			);
		}
	}
}
void NativeCode::ResetSourceIndexes( long sourceIndexBase )
{
	BOOST_FOREACH( SourceLine &sourceLine, sourceLines )
	{
		sourceLine.SetSourceIndex( sourceLine.GetSourceIndex() + sourceIndexBase );
	}
}