EMILE/second/enter_kernel030.S
Laurent Vivier 9bd9755dbb Update email address
Signed-off-by: Laurent Vivier <Laurent@Vivier.EU>
2013-09-05 14:45:27 +02:00

63 lines
833 B
ArmAsm

/*
*
* (c) 2004-2007 Laurent Vivier <Laurent@Vivier.EU>
*
*/
.include "copymem.i"
.align 4
.global enter_kernel030
enter_kernel030:
link.w %fp,#-8
/* get physical start address of kernel */
move.l 8(%fp), %a0
/* size of image to relocate */
move.l 12(%fp), %d0
/* destination address */
move.l 16(%fp), %a2
/* bootenv address (EXPERIMENTAL) */
move.l %a2, %a1
add.l %d0, %a1
sub.l #4096, %a1
move.l #0x80000000, %d4
/* entry point */
move.l 20(%fp), %a3
/* disable MMU */
lea -8(%fp), %a4
pmove %tc, %a4@
bclr #7, %a4@
pmove %a4@, %tc
clr.l %a4@
pmove %a4@, %tt0
pmove %a4@, %tt1
/* copy kernel to destination address */
copymem %a0, %a2, %d0
/* jump into kernel */
jmp %a3@
/* never comes here... I hope */
unlk %fp
rts
.global end_enter_kernel030
end_enter_kernel030: