// Copyright (c) 2002-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:

// e32test\misc\exc.cpp

// Utility generating various kinds of exceptions.  Useful to test

// debuggers.

// 

//

#include <e32std.h>

#include <e32std_private.h>

void InfiniteRecursion()

	{

	InfiniteRecursion();

	}

#ifdef __ARMCC__

#pragma Ono_inline // prevent compile time errors

#endif

void Store42(TInt*& p)

	{

	*p = 42;

	}

void Foo()

	{

	// uninitialised pointer on stack - may not crash

	TInt* p;

	Store42(p);

	}

void Foo1(TUint8 *ps)

        {	

	TInt32* p = (TInt32*)ps;

	*p = 0x42;

	}

void Foo2(TUint8 *ps)

        {	

	TInt16* p = (TInt16*)ps;

	*p = 0x42;

	}

TInt E32Main()

	{

	TBuf<32> cmd;

	User::CommandLine(cmd);

	TLex lex(cmd);

	TInt n=0;

	lex.Val(n);

	typedef void (*TPfn)();

	switch (n)

		{

	default:

	case 0:

		{

		// data abort - accessing non-existent memory

		TInt* p = (TInt*) 0x1000;

		*p = 0x42;

		}

		break;

	case 1:

		// data abort - stack overflow

		InfiniteRecursion();

		break;

	case 2:

		{

		// data abort - pointer in deleted heap cell

		// May not crash on UREL builds

		struct S { TInt* iPtr; };

		S* p = new S;

		p->iPtr = new TInt;

		delete p->iPtr;

		delete p;

		*(p->iPtr) = 42;

		}

		break;

	case 3:

		// data abort - uninitialised pointer on stack

		Foo();

		break;

	case 4:

		{

		// data abort - misaligned access to 32 bit word

		TUint8 buffer[16];

		Foo1(buffer+2);

		}

		break;

	case 5:

		{

		// data abort - misaligned access to 16 bit word

		TUint8 buffer[16];

		Foo2 (buffer+1);

 		}

		break;

	case 6:

		{

		// prefetch abort

		TPfn f = NULL;

		f();

		}

		break;

	case 7:

		{

		// undefined instruction

		TUint32 undef = 0xE6000010;

		TPfn f = (TPfn) &undef;

		f();

		}

		break;

		}

	return 0;

	}