// Copyright (c) 2008-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/include/nkernsmp/arm/entry.h

// 

//

#include <arm_gic.h>

#include <arm_tmr.h>

extern "C" {

extern void __ArmVectorReset();

extern void __ArmVectorUndef();

extern void __ArmVectorSwi();

extern void __ArmVectorAbortPrefetch();

extern void __ArmVectorAbortData();

extern void __ArmVectorReserved();

extern void __ArmVectorIrq();

extern void __ArmVectorFiq();

#define __DECLARE_UNDEFINED_INSTRUCTION_HANDLER		asm(".word __ArmVectorUndef ")

#define __DECLARE_PREFETCH_ABORT_HANDLER			asm(".word __ArmVectorAbortPrefetch ")

#define __DECLARE_DATA_ABORT_HANDLER				asm(".word __ArmVectorAbortData ")

#ifdef BTRACE_CPU_USAGE

extern void btrace_irq_entry(TInt);

extern void btrace_fiq_entry();

#endif

extern void handle_crash_ipi();

#ifdef _DEBUG

extern void __DebugMsgIrq(TUint aIrqNumber);

#endif

/* NOTE: We must ensure that this code goes at the beginning of the kernel image.

*/

__NAKED__ void __this_must_go_at_the_beginning_of_the_kernel_image()

	{

	asm("ldr	pc, __reset_vector ");		// 00 = Reset vector

	asm("ldr	pc, __undef_vector ");		// 04 = Undefined instruction vector

	asm("ldr	pc, __swi_vector ");		// 08 = SWI vector

	asm("ldr	pc, __pabt_vector ");		// 0C = Prefetch abort vector

	asm("ldr	pc, __dabt_vector ");		// 10 = Data abort vector

	asm("ldr	pc, __unused_vector ");		// 14 = unused

	asm("b		HandleIrq ");				// 18 = IRQ vector

											// 1C = FIQ vector, code in situ

	/*** FIQ entry point ******************************************************/

	asm("ldr	r12, __ArmInterrupt ");

#ifdef BTRACE_CPU_USAGE

	asm("ldr	r11, __BTraceCpuUsageFilter ");

#endif

	asm("sub	lr, lr, #4 ");

	asm("ldr	r10, [r12,#%a0]" : : "i" _FOFF(SArmInterruptInfo,iFiqHandler)); // r10 points to FIQ handler

	asm("str	lr, [sp, #-4]! ");

	// we assume FIQ handler preserves r0-r7 but not r8-r12

	// hence must be assembler, so stack misalignment OK

#if defined(__CPU_ARM_HAS_WORKING_CLREX)

	CLREX

#elif defined(__CPU_ARM_HAS_LDREX_STREX)

	STREX(8,14,13);						// dummy STREX to reset exclusivity monitor

#endif

#ifdef __USER_MEMORY_GUARDS_ENABLED__

	USER_MEMORY_GUARD_ON(,lr,r8);

	asm("str lr, [sp, #-4]! ");

#endif

#ifdef BTRACE_CPU_USAGE

	asm("ldrb	r8, [r11] ");

	asm("ldr	lr, _ArmVectorFiq ");

	asm("cmp	r8, #0 ");

	asm("bne	btrace_fiq");

	__JUMP(,	r10);					// jump to FIQ handler

	asm("btrace_fiq: ");				// call trace handler before fiq handler...

	asm("stmfd	sp!, {r0-r3,r12,lr} ");

	asm("adr	lr, btrace_fiq_return ");

	asm("ldr	pc, __btrace_fiq_entry ");

	asm("btrace_fiq_return: ");

	asm("ldmfd	sp!, {r0-r3,r12,lr} ");

	__JUMP(,	r10);					// jump to FIQ handler

#endif

	asm("ldr lr, _ArmVectorFiq ");

	__JUMP(,r10);			// jump to FIQ handler

	/*** Nested IRQ register save *********************************************/

	asm("nested_irq: ");

	SRSDBW(MODE_SYS);					// save return address and return CPSR to interrupt stack

	CPSCHM(MODE_SYS);					// mode_sys, IRQs off

	asm("stmfd	sp!, {r0-r12,lr} ");	// save R0-R12,R14 from system mode

	GET_RWNO_TID(,r4);

	asm("b nested_irq_rejoin ");

	/*** IRQ entry point ******************************************************/

	asm("HandleIrq: ");

	asm("mrs	r13, spsr ");

	asm("sub	lr, lr, #4 ");

	asm("and	r13, r13, #0x1f ");

	asm("cmp	r13, #0x1f ");			// interrupted mode_sys?

	asm("beq	nested_irq ");			// yes -> nested interrupt

	SRSDBW(MODE_SVC);					// save return address and return CPSR to supervisor stack

	__ASM_CLI_MODE(MODE_SVC);			// mode_svc, IRQs and FIQs off

	asm("sub	sp, sp, #%a0" : : "i" _FOFF(SThreadExcStack,iR15));

	asm("stmia	sp, {r0-r14}^ ");		// save R0-R12, R13_usr, R14_usr

	asm("mov	r1, #%a0" : : "i" ((TInt)SThreadExcStack::EIrq));

#if defined(__CPU_ARM_HAS_WORKING_CLREX)

	CLREX

#elif defined(__CPU_ARM_HAS_LDREX_STREX)

	STREX(12, 0, 13);					// dummy STREX to reset exclusivity monitor

#endif

	GET_RWNO_TID(,r4);

	asm("mov	r5, sp ");

	asm("str	r1, [sp, #%a0]" : : "i" _FOFF(SThreadExcStack,iExcCode));	// word describing exception type

	__ASM_STI2_MODE(MODE_SYS);			// mode_sys, IRQs off, FIQs on

	asm("ldr	sp, [r4, #%a0]" : : "i" _FOFF(TSubScheduler, i_IrqStackTop));

	USER_MEMORY_GUARD_ON(,r8,r0);		// r8 = original DACR if user memory guards in use

	asm("nested_irq_rejoin: ");

	asm("ldr	r0, [r4, #%a0]" : : "i" _FOFF(TSubScheduler, i_IrqCount));

	asm("ldr	r7, [r4, #%a0]" : : "i" _FOFF(TSubScheduler, i_IrqNestCount));

	asm("ldr	r12, __ArmInterrupt ");

	asm("ldr	r10, _ArmVectorIrq ");

	asm("add	r0, r0, #1 ");

	asm("add	r7, r7, #1 ");

	__DATA_MEMORY_BARRIER_Z__(r2);		// ensure memory accesses in interrupted code are observed before

										// the writes to i_IrqCount, i_IrqNestCount

	asm("str	r0, [r4, #%a0]" : : "i" _FOFF(TSubScheduler, i_IrqCount));		// increment i_IrqCount

	asm("ldr	r6, [r4, #%a0]" : : "i" _FOFF(TSubScheduler, i_GicCpuIfcAddr));

	asm("str	r7, [r4, #%a0]" : : "i" _FOFF(TSubScheduler, i_IrqNestCount));	// increment i_IrqNestCount

	asm("1: ");

#ifdef BTRACE_CPU_USAGE

	asm("ldr	r2, __BTraceCpuUsageFilter ");

#endif

	asm("mov	r1, #%a0" : : "i" ((TInt)E_GicIntId_Spurious+1));

	asm("ldr	r0, [r6, #%a0]" : : "i" _FOFF(GicCpuIfc, iAck));		// r0 = number of interrupt to service

#ifdef BTRACE_CPU_USAGE

	asm("ldrb	r2, [r2] ");

#endif

	asm("sub	r1, r1, #1 ");

	asm("cmp	r0, r1 ");				// any more interrupts pending?

	asm("beq	2f ");					// if not, branch out

#ifdef BTRACE_CPU_USAGE

	asm("cmp	r2, #0 ");

	asm("beq	9f ");

	asm("stmfd	sp!, {r0-r3} ");

	asm("adr	lr, btrace_irq_return ");

	asm("ldr	pc, __btrace_irq_entry ");

	asm("btrace_irq_return: ");

	asm("ldmfd	sp!, {r0-r3} ");

	asm("9: ");

#endif	// BTRACE_CPU_USAGE

	ASM_DEBUG1(_longjump_Irq,r0);

	asm("adr	lr, 1b ");

	asm("tst	r0, #0x3e0 ");			// check for interrupt numbers 0-31

	asm("beq	3f ");					// branch out if so

	__JUMP(,r11);						// jump to dispatcher, R0 = interrupt number, return to 1:

										// dispatcher acknowledges interrupt

	// No more interrupts pending - jump to postamble in the kernel

	// R4->TSubScheduler at this point, R5->saved registers on SVC stack if not nested IRQ

	// R6->GIC CPU interface

	asm("2: ");

	__JUMP(,r10);

	// Kernel IPI

	asm("3: ");

	asm("and	r2, r0, #31 ");			// r2 = interrupt number 0...31

	asm("cmp	r2, #%a0" : : "i" ((TInt)TIMESLICE_VECTOR));

	asm("beq	do_timeslice_irq ");

	asm("cmp	r2, #%a0" : : "i" ((TInt)RESCHED_IPI_VECTOR));

	asm("beq	do_resched_ipi ");

	asm("cmp	r2, #%a0" : : "i" ((TInt)GENERIC_IPI_VECTOR));

	asm("beq	do_generic_ipi ");

	asm("cmp	r2, #%a0" : : "i" ((TInt)TRANSFERRED_IRQ_VECTOR));

	asm("beq	do_transferred_ipi ");

	asm("cmp	r2, #15 ");

	__JUMP(hi,	r11);					// if >15 but not TIMESLICE_VECTOR, call dispatcher

	// else assume CRASH_IPI

	asm("str	r0, [r6, #%a0]" : : "i" _FOFF(GicCpuIfc, iEoi));		// acknowledge interrupt

	__DATA_SYNC_BARRIER_Z__(r1);

	asm("ldr	r1, __HandleCrashIPI ");

	__JUMP(,	r1);					// CRASH IPI, so crash

	// TIMESLICE, RESCHED or TRANSFERRED

	asm("do_timeslice_irq: ");

	asm("ldr	r2, [r4, #%a0]" : : "i" _FOFF(TSubScheduler, i_LocalTimerAddr));

	asm("mov	r1, #1 ");

	asm("str	r1, [r2, #%a0]" : : "i" _FOFF(ArmLocalTimer, iTimerIntStatus));	// clear timer event flag

	asm("do_resched_ipi: ");

	asm("mov	r1, #1 ");

	asm("strb	r1, [r4, #%a0]" : : "i" _FOFF(TSubScheduler, iRescheduleNeededFlag));

	asm("do_transferred_ipi: ");

	asm("str	r0, [r6, #%a0]" : : "i" _FOFF(GicCpuIfc, iEoi));		// acknowledge interrupt

	__DATA_SYNC_BARRIER_Z__(r1);		// ensure writes to i_IrqCount, i_IrqNestCount, iRescheduleNeededFlag complete before SEV

										// also ensure EOI is written before we return from the interrupt

	ARM_SEV;							// kick any CPUs waiting for us to enter the ISR

	asm("b		1b ");

	// GENERIC_IPI

	asm("do_generic_ipi: ");

	asm("ldr	r2, _GenericIPIIsr ");

	asm("str	r0, [r6, #%a0]" : : "i" _FOFF(GicCpuIfc, iEoi));		// acknowledge interrupt

	asm("mov	r0, r4 ");				// r0->SubScheduler

	__DATA_SYNC_BARRIER_Z__(r1);

	__JUMP(,	r2);

	asm("__DebugMsg_longjump_Irq: ");

	asm("ldr	pc, _dmIrq ");

	asm("__reset_vector:");

	asm(".word	__ArmVectorReset "); 

	asm("__undef_vector:");

	__DECLARE_UNDEFINED_INSTRUCTION_HANDLER;

	asm("__swi_vector:");

	asm(".word	__ArmVectorSwi "); 

	asm("__pabt_vector:");

	__DECLARE_PREFETCH_ABORT_HANDLER;

	asm("__dabt_vector:");

	__DECLARE_DATA_ABORT_HANDLER;

	asm("__unused_vector:");

	asm(".word	__ArmVectorReserved ");

	asm("__ArmInterrupt: ");

	asm(".word	ArmInterruptInfo ");

	asm("_ArmVectorIrq: ");

	asm(".word	__ArmVectorIrq ");

	asm("_GenericIPIIsr: ");

	asm(".word generic_ipi_isr ");

	asm("_ArmVectorFiq: ");

	asm(".word	__ArmVectorFiq ");

	asm("__HandleCrashIPI: ");

	asm(".word handle_crash_ipi ");

#ifdef BTRACE_CPU_USAGE

	asm("__BTraceCpuUsageFilter: ");

	asm(".word	%a0" : : "i" ((TInt)&BTraceData.iFilter[BTrace::ECpuUsage]));

	asm("__btrace_irq_entry: ");

	asm(".word btrace_irq_entry ");

	asm("__btrace_fiq_entry: ");

	asm(".word btrace_fiq_entry ");

#endif

	asm("_dmIrq: ");

	asm(".word __DebugMsgIrq ");

	}

}