// Copyright (c) 1994-2009 Nokia Corporation and/or its subsidiary(-ies).
// All rights reserved.
// This component and the accompanying materials are made available
// under the terms of the License "Eclipse Public License v1.0"
// which accompanies this distribution, and is available
// at the URL "http://www.eclipse.org/legal/epl-v10.html".
//
// Initial Contributors:
// Nokia Corporation - initial contribution.
//
// Contributors:
//
// Description:
// e32\memmodel\epoc\multiple\mkernel.cpp
// 
//

#include "memmodel.h"

/********************************************
 * Thread
 ********************************************/

TInt DThread::AllocateSupervisorStack()
	{
	__KTRACE_OPT(KTHREAD,Kern::Printf("DThread::AllocateSupervisorStack %O %x",this,iSupervisorStackSize));
	iSupervisorStackSize=Mmu::RoundToPageSize(iSupervisorStackSize);
	if (iThreadType!=EThreadInitial)
		{
		TInt offset=MM::SvStackChunk->Allocate(iSupervisorStackSize,PP::SupervisorThreadStackGuard);
		if (offset<0)
			{
			__KTRACE_FAIL(KErrNoMemory,Kern::Printf("ASS: %d",KErrNoMemory));
			return KErrNoMemory;
			}
		iSupervisorStack=MM::SvStackChunk->Base()+offset+PP::SupervisorThreadStackGuard;
		iSupervisorStackAllocated = TRUE;
		__KTRACE_OPT(KTHREAD,Kern::Printf("Supervisor stack at %x, size %x",iSupervisorStack,iSupervisorStackSize));
		}
	return KErrNone;
	}

void DMemModelThread::DoExit1()
	{
	// Regularize the thread state before main exit processing.
	// We must remove any existing alias before we do any operation 
	// which requires aliasing (e.g. logon completion).
	__KTRACE_OPT(KTHREAD,Kern::Printf("DMemModelThread %O DoExit1",this));
	NKern::LockSystem();
	RemoveAlias();
	NKern::UnlockSystem();
	}

void DThread::FreeSupervisorStack()
	{
	__KTRACE_OPT(KTHREAD,Kern::Printf("DThread::FreeSupervisorStack %O",this));
	if (iSupervisorStackAllocated)
		{
		TAny* pStack = __e32_atomic_swp_ord_ptr(&iSupervisorStack, 0);
		if (pStack && iThreadType!=EThreadInitial)
			{
			__KTRACE_OPT(KTHREAD,Kern::Printf("Freeing supervisor stack at %08x, size %x",pStack,iSupervisorStackSize));
			TInt offset=(TUint8*)pStack-MM::SvStackChunk->Base();
			TInt r=MM::SvStackChunk->Decommit(offset-PP::SupervisorThreadStackGuard,iSupervisorStackSize+PP::SupervisorThreadStackGuard);
			__ASSERT_DEBUG(r==KErrNone, MM::Panic(MM::EDecommitFailed));
			(void)r; //Supress the warning in urel build
			}
		}
	iSupervisorStackAllocated = FALSE;
	}

TInt DThread::AllocateUserStack(TInt aSize, TBool /*aPaged*/)
	{
	__KTRACE_OPT(KTHREAD,Kern::Printf("DThread::AllocateUserStack %O %x",this,aSize));

	aSize=Mmu::RoundToPageSize(aSize);
	if (aSize>PP::MaxUserThreadStack)
		return KErrTooBig;
	TInt guard=PP::UserThreadStackGuard;
	DProcess* pP=iOwningProcess;
	NKern::LockSystem();
	DChunk* pC=pP->iDataBssStackChunk;
	if (!pC || pC->Open()!=KErrNone)	// so chunk doesn't disappear during Allocate()
		{
		NKern::UnlockSystem();
		__KTRACE_FAIL(KErrDied,Kern::Printf("AUS1: %d",KErrDied));
		return KErrDied;
		}
	NKern::UnlockSystem();
	TInt r=pC->Allocate(aSize,guard);
	TInt s=pC->Close(NULL);				// NULL since we didn't add chunk to process again
	if (s & EObjectDeleted)
		{
		__KTRACE_FAIL(KErrDied,Kern::Printf("AUS2: %d",KErrDied));
		return KErrDied;
		}
	if (r<0)
		{
		__KTRACE_FAIL(r,Kern::Printf("AUS3: %d",r));
		return r;
		}
	iUserStackSize=aSize;
	iUserStackRunAddress=pP->iDataBssRunAddress+r+guard;
	__KTRACE_OPT(KTHREAD,Kern::Printf("User stack run address at %x",iUserStackRunAddress));
	return KErrNone;
	}

void DThread::FreeUserStack()
	{
	__KTRACE_OPT(KTHREAD,Kern::Printf("DThread::FreeUserStack %O",this));
	TLinAddr usr_stack = (TLinAddr)__e32_atomic_swp_ord_ptr(&iUserStackRunAddress, 0);
	if (usr_stack)
		{
		__KTRACE_OPT(KTHREAD,Kern::Printf("Freeing user stack at %x",usr_stack));
		DMemModelProcess* pP=(DMemModelProcess*)iOwningProcess;
		NKern::LockSystem();
		DMemModelChunk* pC=(DMemModelChunk*)pP->iDataBssStackChunk;
		if (!pC || pC->Open()!=KErrNone)	// so chunk doesn't disappear during Decommit()
			{
			NKern::UnlockSystem();
			__KTRACE_FAIL(KErrDied,Kern::Printf("FUS"));
			return;
			}
		NKern::UnlockSystem();
		TInt offset=usr_stack-pP->iDataBssRunAddress;
		TInt r=pC->Decommit(offset-PP::UserThreadStackGuard,iUserStackSize+PP::UserThreadStackGuard);
		__ASSERT_DEBUG(r==KErrNone, MM::Panic(MM::EDecommitFailed));
		pC->Close(NULL);			// NULL since we didn't add chunk to process again
		(void)r; //Supress the warning in urel build
		}
	}

void DThread::IpcExcHandler(TExcTrap* aTrap, DThread* aThread, TAny* aContext)
	{
	aThread->iIpcClient = 0;
	TIpcExcTrap& xt=*(TIpcExcTrap*)aTrap;
	switch (xt.ExcLocation(aThread, aContext))
		{
		case TIpcExcTrap::EExcRemote:
			// problem accessing remote address - 'leave' so an error code will be returned
			NKern::LockSystem();
			((DMemModelThread*)aThread)->RemoveAlias();
			xt.Exception(KErrBadDescriptor);  // does not return

		case TIpcExcTrap::EExcLocal:
			// problem accessing local address - return and panic current thread as usual
			NKern::LockSystem();
			((DMemModelThread*)aThread)->RemoveAlias();
			NKern::UnlockSystem();
			return;

		default:
			// otherwise return and fault kernel
			NKern::LockSystem();
			return;
		}
	}