.globl _start
_start:
+ ldr r2, =UART0_PADDR
+ mov r1, #'A'
+ str r1, [r2]
+
ldr r0, =kernel_table0-KERNEL_BASE
mcr p15, 0, r0, c2, c0, 1 @ Set TTBR1 to r0
mcr p15, 0, r0, c2, c0, 0 @ Set TTBR0 to r0 too (for identity)
+ mov r1, #'c'
+ str r1, [r2]
+
mov r0, #1
mcr p15, 0, r0, c2, c0, 2 @ Set TTCR to 1 (50/50 split)
+
+ mov r1, #'e'
+ str r1, [r2]
mov r0, #3
mcr p15, 0, r0, c3, c0, 0 @ Set Domain 0 to Manager
+ mov r1, #'s'
+ str r1, [r2]
+
@ Enable VMSA
mrc p15, 0, r0, c1, c0, 0
orr r0, r0, #1
orr r0, r0, #1 << 23
mcr p15, 0, r0, c1, c0, 0
+ ldr r2, =0xF1000000
+ mov r1, #'s'
+ str r1, [r2]
+
@ Enable access faults on domains 0 & 1
mov r0, #0x55 @ 01010101b
mcr p15, 0, r0, c3, c0, 0
+ mov r1, #'2'
+ str r1, [r2]
+
@
@ Check for security extensions
@
orreq r0, #0x2000
mcreq p15, 0, r0, c1, c0, 0
+ mov r1, #'-'
+ str r1, [r2]
@ Prepare for interrupts
cps #18 @ IRQ Mode
ldr sp, =abortstack+0x1000
cps #19
- ldr sp, =0x80000000-4 @ Set up stack (top of user range)
+ mov r1, #'a'
+ str r1, [r2]
+ mov r1, #'r'
+ str r1, [r2]
+ mov r1, #'m'
+ str r1, [r2]
+ mov r1, #13
+ str r1, [r2]
+ mov r1, #10
+ str r1, [r2]
+
+.extern bss_start
+.extern bss_size_div_4
+.zero_bss:
+ ldr r0, =bss_start
+ ldr r1, =bss_end
+ mov r3, #0
+.zero_bss_loop:
+ str r3, [r0],#4
+ cmp r0, r1
+ bls .zero_bss_loop
+
+.goto_c:
+ ldr sp, =0x80000000-8 @ Set up stack (top of user range)
ldr r0, =kmain
mov pc, r0
1: b 1b @ Infinite loop
-_ptr_kmain:
- .long kmain
.comm irqstack, 0x1000 @ ; 4KiB Stack
.comm abortstack, 0x1000 @ ; 4KiB Stack
stack:
.space MM_KSTACK_SIZE, 0 @ Original kernel stack
+// vim: ts=8, ft=armv7
+