// Copyright (c) 1997-2009 Nokia Corporation and/or its subsidiary(-ies).

 // All rights reserved.

 // This component and the accompanying materials are made available

 // under the terms of "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:

 //

 #include "POSIXIF.H"

 // Category for the panic.

 _LIT(KEstlibInit, "ESTLIB-INIT");

 // Access for the outside world

 extern "C" {

 EXPORT_C void CloseSTDLIB()

 	{

 	struct _reent* p=(struct _reent*)Dll::Tls();

 	if (p==0)

 		return;

 	_reclaim_reent(p);	// Reclaiming calls the atexit processing and generally tries to tidy up

 	User::Free(p);		// then we give back the struct _reent itself

 	Dll::SetTls(0);		// ... so we don't free it again when the DLL exits

 	}

 /**

 Allocates memory for the library globals struct and returns a pointer to it. If the

 memory has been allocated previously then it simply returns a pointer to the memory.

 Panics if any error/failure occurs.

 @return On Success, a pointer to the memory containing the library globals.

 */

 EXPORT_C struct _reent *ImpurePtr(void)

 	{

 	struct _reent* p=(struct _reent*)Dll::Tls();

 	if (p)

 		return p; // Memory is already allocated for the library globals.

 	// First use, so construct the default struct _reent and the associated SystemInterface

 	p=(struct _reent*)User::Alloc(sizeof(struct _reent));

 	if(p ==0)

 		{

 		User::Panic(KEstlibInit,KErrNoMemory);

 		}

 	TInt err= Dll::SetTls(p);

 	if (err != KErrNone)

 		{

 		delete p;

 		p = 0;

 		Dll::FreeTls();

 		User::Panic(KEstlibInit, err);

 		}

 	void* sysIf=0;

 	CProcessSystemInterface* pSysIf=new CProcessSystemInterface;

 	if (pSysIf && pSysIf->Connect()==KErrNone)

 		{

 		sysIf=pSysIf;

 		}

 	else

 		{

 		delete pSysIf;

 		pSysIf = 0;

 		CTrapCleanup *cleanup = NULL;

 		if(User::TrapHandler() == NULL)

 			{

 			cleanup = CTrapCleanup::New();

 			if(cleanup != NULL)

 		        {

 				//use static_cast to perform the valid conversion from CLocalSystemInterface to base class MSystemInterface

 				TRAP(err, sysIf = static_cast<MSystemInterface*> (CLocalSystemInterface::NewL()));

 		        }

 		    else

 		    	{

 				err = KErrNoMemory;

 				}

 	    	delete cleanup;

 			}

 		else

 			{

 			//use static_cast to perform the valid conversion from CLocalSystemInterface to base class MSystemInterface

 			TRAP(err, sysIf = static_cast<MSystemInterface*> (CLocalSystemInterface::NewL()));

 			}

 		}

 	if (err != KErrNone)

 		{

 	    delete p;

 	    p = 0;

 		Dll::FreeTls();

 		User::Panic(KEstlibInit, err);

 		}

 	Mem::FillZ(p,sizeof(struct _reent));

 	_init_reent(p,sysIf);

 	return p;

 	}

 /**

 This is a panic free version of ImpurePtr. It allocates memory for the library globals

 struct and returns a pointer to it. If the memory has been allocated previously then it

 simply returns a pointer to the memory.

 If there is not enough memory available to set up the library globals or other error occurs,

 a NULL pointer will be returned.

 @return On Success, a pointer to the memory containing the library globals.

 		On Failure, a NULL pointer.

 */

 EXPORT_C struct _reent * ImpurePtr2(void)

 	{

 	struct _reent* p = (struct _reent*)Dll::Tls();

 	if (p)

 		return p; // Memory is already allocated for the library globals.

 	// First use, so construct the default struct _reent and the associated SystemInterface

 	p =(struct _reent*)User::Alloc(sizeof(struct _reent));

 	if (p== 0)

 		return p ; // NULL

 	if (Dll::SetTls(p))

 		{

 		delete p;

 		p = 0;

 		Dll::FreeTls();

 		return p; // NULL

 		}

 	void* sysIf=0;

 	CProcessSystemInterface* pSysIf=new CProcessSystemInterface;

 	if (pSysIf && pSysIf->Connect()==KErrNone)

 		{

 		sysIf=pSysIf;

 		}

 	else

 		{

 		TInt err=KErrNone;

 		delete pSysIf;

 		pSysIf = 0;

 		CTrapCleanup *cleanup = NULL;

 		if(User::TrapHandler() == NULL)

 			{

 			cleanup = CTrapCleanup::New();

 			if(cleanup != NULL)

 		        {

 				//use static_cast to perform the valid conversion from CLocalSystemInterface to base class MSystemInterface

 				TRAP(err, sysIf = static_cast<MSystemInterface*> (CLocalSystemInterface::NewL()));

 		        }

 	    	delete cleanup;

 			}

 		else

 			{

 			//use static_cast to perform the valid conversion from CLocalSystemInterface to base class MSystemInterface

 			TRAP(err, sysIf = static_cast<MSystemInterface*> (CLocalSystemInterface::NewL()));

 			}

 		}

 	if (!sysIf)

 		{

 		delete p;

 		p = 0;

 		Dll::FreeTls();

 		return p; // NULL

 		}

 	Mem::FillZ(p,sizeof(struct _reent));

 	_init_reent(p,sysIf);

 	return p; // Library globals have been set up correctly.

 	}

 EXPORT_C int *__errno(void)

 	{

 	return &(ImpurePtr()->_errno);

 	}

 EXPORT_C void _exit (int status) _ATTRIBUTE((noreturn))

 	{

 	struct _reent* p=(struct _reent*)Dll::Tls();

 	if (p)

 		{

 		MSystemInterface& sysIf=Interface(p);

 		sysIf.TerminateProcess(status);

 		}

 	RProcess().Terminate(status);	// just in case

 	}

 } // extern "C"

 #ifndef EKA2

 GLDEF_C TInt E32Dll(TDllReason)

 //

 // DLL entry point

 //

 	{

 	return KErrNone;

 	}

 #endif