| /* |
| * armboot - Startup Code for OMAP3530/ARM Cortex CPU-core |
| * |
| * Copyright (c) 2004 Texas Instruments <r-woodruff2@ti.com> |
| * |
| * Copyright (c) 2001 Marius Gröger <mag@sysgo.de> |
| * Copyright (c) 2002 Alex Züpke <azu@sysgo.de> |
| * Copyright (c) 2002 Gary Jennejohn <garyj@denx.de> |
| * Copyright (c) 2003 Richard Woodruff <r-woodruff2@ti.com> |
| * Copyright (c) 2003 Kshitij <kshitij@ti.com> |
| * Copyright (c) 2006-2008 Syed Mohammed Khasim <x0khasim@ti.com> |
| * |
| * See file CREDITS for list of people who contributed to this |
| * project. |
| * |
| * This program is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU General Public License as |
| * published by the Free Software Foundation; either version 2 of |
| * the License, or (at your option) any later version. |
| * |
| * This program is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| * GNU General Public License for more details. |
| * |
| * You should have received a copy of the GNU General Public License |
| * along with this program; if not, write to the Free Software |
| * Foundation, Inc., 59 Temple Place, Suite 330, Boston, |
| * MA 02111-1307 USA |
| */ |
| |
| #include <config.h> |
| #include <version.h> |
| |
| .globl _start |
| _start: b reset |
| ldr pc, _undefined_instruction |
| ldr pc, _software_interrupt |
| ldr pc, _prefetch_abort |
| ldr pc, _data_abort |
| ldr pc, _not_used |
| ldr pc, _irq |
| ldr pc, _fiq |
| |
| _undefined_instruction: .word undefined_instruction |
| _software_interrupt: .word software_interrupt |
| _prefetch_abort: .word prefetch_abort |
| _data_abort: .word data_abort |
| _not_used: .word not_used |
| _irq: .word irq |
| _fiq: .word fiq |
| _pad: .word 0x12345678 /* now 16*4=64 */ |
| .global _end_vect |
| _end_vect: |
| |
| .balignl 16,0xdeadbeef |
| /************************************************************************* |
| * |
| * Startup Code (reset vector) |
| * |
| * do important init only if we don't start from memory! |
| * setup Memory and board specific bits prior to relocation. |
| * relocate armboot to ram |
| * setup stack |
| * |
| *************************************************************************/ |
| |
| _TEXT_BASE: |
| .word TEXT_BASE |
| |
| .globl _armboot_start |
| _armboot_start: |
| .word _start |
| |
| /* |
| * These are defined in the board-specific linker script. |
| */ |
| .globl _bss_start |
| _bss_start: |
| .word __bss_start |
| |
| .globl _bss_end |
| _bss_end: |
| .word _end |
| |
| #ifdef CONFIG_USE_IRQ |
| /* IRQ stack memory (calculated at run-time) */ |
| .globl IRQ_STACK_START |
| IRQ_STACK_START: |
| .word 0x0badc0de |
| |
| /* IRQ stack memory (calculated at run-time) */ |
| .globl FIQ_STACK_START |
| FIQ_STACK_START: |
| .word 0x0badc0de |
| #endif |
| |
| /* |
| * the actual reset code |
| */ |
| |
| reset: |
| /* |
| * set the cpu to SVC32 mode |
| */ |
| mrs r0, cpsr |
| bic r0, r0, #0x1f |
| orr r0, r0, #0xd3 |
| msr cpsr,r0 |
| |
| #if (CONFIG_OMAP34XX) |
| /* Copy vectors to mask ROM indirect addr */ |
| adr r0, _start @ r0 <- current position of code |
| add r0, r0, #4 @ skip reset vector |
| mov r2, #64 @ r2 <- size to copy |
| add r2, r0, r2 @ r2 <- source end address |
| mov r1, #SRAM_OFFSET0 @ build vect addr |
| mov r3, #SRAM_OFFSET1 |
| add r1, r1, r3 |
| mov r3, #SRAM_OFFSET2 |
| add r1, r1, r3 |
| next: |
| ldmia r0!, {r3 - r10} @ copy from source address [r0] |
| stmia r1!, {r3 - r10} @ copy to target address [r1] |
| cmp r0, r2 @ until source end address [r2] |
| bne next @ loop until equal */ |
| #if !defined(CONFIG_SYS_NAND_BOOT) && !defined(CONFIG_SYS_ONENAND_BOOT) |
| /* No need to copy/exec the clock code - DPLL adjust already done |
| * in NAND/oneNAND Boot. |
| */ |
| bl cpy_clk_code @ put dpll adjust code behind vectors |
| #endif /* NAND Boot */ |
| #endif |
| /* the mask ROM code should have PLL and others stable */ |
| #ifndef CONFIG_SKIP_LOWLEVEL_INIT |
| bl cpu_init_crit |
| #endif |
| |
| #ifndef CONFIG_SKIP_RELOCATE_UBOOT |
| relocate: @ relocate U-Boot to RAM |
| adr r0, _start @ r0 <- current position of code |
| ldr r1, _TEXT_BASE @ test if we run from flash or RAM |
| cmp r0, r1 @ don't reloc during debug |
| beq stack_setup |
| |
| ldr r2, _armboot_start |
| ldr r3, _bss_start |
| sub r2, r3, r2 @ r2 <- size of armboot |
| add r2, r0, r2 @ r2 <- source end address |
| |
| copy_loop: @ copy 32 bytes at a time |
| ldmia r0!, {r3 - r10} @ copy from source address [r0] |
| stmia r1!, {r3 - r10} @ copy to target address [r1] |
| cmp r0, r2 @ until source end addreee [r2] |
| ble copy_loop |
| #endif /* CONFIG_SKIP_RELOCATE_UBOOT */ |
| |
| /* Set up the stack */ |
| stack_setup: |
| ldr r0, _TEXT_BASE @ upper 128 KiB: relocated uboot |
| sub r0, r0, #CONFIG_SYS_MALLOC_LEN @ malloc area |
| sub r0, r0, #CONFIG_SYS_GBL_DATA_SIZE @ bdinfo |
| #ifdef CONFIG_USE_IRQ |
| sub r0, r0, #(CONFIG_STACKSIZE_IRQ + CONFIG_STACKSIZE_FIQ) |
| #endif |
| sub sp, r0, #12 @ leave 3 words for abort-stack |
| and sp, sp, #~7 @ 8 byte alinged for (ldr/str)d |
| |
| /* Clear BSS (if any). Is below tx (watch load addr - need space) */ |
| clear_bss: |
| ldr r0, _bss_start @ find start of bss segment |
| ldr r1, _bss_end @ stop here |
| mov r2, #0x00000000 @ clear value |
| clbss_l: |
| str r2, [r0] @ clear BSS location |
| cmp r0, r1 @ are we at the end yet |
| add r0, r0, #4 @ increment clear index pointer |
| bne clbss_l @ keep clearing till at end |
| |
| ldr pc, _start_armboot @ jump to C code |
| |
| _start_armboot: .word start_armboot |
| |
| |
| /************************************************************************* |
| * |
| * CPU_init_critical registers |
| * |
| * setup important registers |
| * setup memory timing |
| * |
| *************************************************************************/ |
| cpu_init_crit: |
| /* |
| * Invalidate L1 I/D |
| */ |
| mov r0, #0 @ set up for MCR |
| mcr p15, 0, r0, c8, c7, 0 @ invalidate TLBs |
| mcr p15, 0, r0, c7, c5, 0 @ invalidate icache |
| |
| /* |
| * disable MMU stuff and caches |
| */ |
| mrc p15, 0, r0, c1, c0, 0 |
| bic r0, r0, #0x00002000 @ clear bits 13 (--V-) |
| bic r0, r0, #0x00000007 @ clear bits 2:0 (-CAM) |
| orr r0, r0, #0x00000002 @ set bit 1 (--A-) Align |
| orr r0, r0, #0x00000800 @ set bit 12 (Z---) BTB |
| mcr p15, 0, r0, c1, c0, 0 |
| |
| /* |
| * Jump to board specific initialization... |
| * The Mask ROM will have already initialized |
| * basic memory. Go here to bump up clock rate and handle |
| * wake up conditions. |
| */ |
| mov ip, lr @ persevere link reg across call |
| bl lowlevel_init @ go setup pll,mux,memory |
| mov lr, ip @ restore link |
| mov pc, lr @ back to my caller |
| /* |
| ************************************************************************* |
| * |
| * Interrupt handling |
| * |
| ************************************************************************* |
| */ |
| @ |
| @ IRQ stack frame. |
| @ |
| #define S_FRAME_SIZE 72 |
| |
| #define S_OLD_R0 68 |
| #define S_PSR 64 |
| #define S_PC 60 |
| #define S_LR 56 |
| #define S_SP 52 |
| |
| #define S_IP 48 |
| #define S_FP 44 |
| #define S_R10 40 |
| #define S_R9 36 |
| #define S_R8 32 |
| #define S_R7 28 |
| #define S_R6 24 |
| #define S_R5 20 |
| #define S_R4 16 |
| #define S_R3 12 |
| #define S_R2 8 |
| #define S_R1 4 |
| #define S_R0 0 |
| |
| #define MODE_SVC 0x13 |
| #define I_BIT 0x80 |
| |
| /* |
| * use bad_save_user_regs for abort/prefetch/undef/swi ... |
| * use irq_save_user_regs / irq_restore_user_regs for IRQ/FIQ handling |
| */ |
| |
| .macro bad_save_user_regs |
| sub sp, sp, #S_FRAME_SIZE @ carve out a frame on current |
| @ user stack |
| stmia sp, {r0 - r12} @ Save user registers (now in |
| @ svc mode) r0-r12 |
| |
| ldr r2, _armboot_start |
| sub r2, r2, #(CONFIG_SYS_MALLOC_LEN) |
| sub r2, r2, #(CONFIG_SYS_GBL_DATA_SIZE + 8) @ set base 2 words into abort |
| @ stack |
| ldmia r2, {r2 - r3} @ get values for "aborted" pc |
| @ and cpsr (into parm regs) |
| add r0, sp, #S_FRAME_SIZE @ grab pointer to old stack |
| |
| add r5, sp, #S_SP |
| mov r1, lr |
| stmia r5, {r0 - r3} @ save sp_SVC, lr_SVC, pc, cpsr |
| mov r0, sp @ save current stack into r0 |
| @ (param register) |
| .endm |
| |
| .macro irq_save_user_regs |
| sub sp, sp, #S_FRAME_SIZE |
| stmia sp, {r0 - r12} @ Calling r0-r12 |
| add r8, sp, #S_PC @ !! R8 NEEDS to be saved !! |
| @ a reserved stack spot would |
| @ be good. |
| stmdb r8, {sp, lr}^ @ Calling SP, LR |
| str lr, [r8, #0] @ Save calling PC |
| mrs r6, spsr |
| str r6, [r8, #4] @ Save CPSR |
| str r0, [r8, #8] @ Save OLD_R0 |
| mov r0, sp |
| .endm |
| |
| .macro irq_restore_user_regs |
| ldmia sp, {r0 - lr}^ @ Calling r0 - lr |
| mov r0, r0 |
| ldr lr, [sp, #S_PC] @ Get PC |
| add sp, sp, #S_FRAME_SIZE |
| subs pc, lr, #4 @ return & move spsr_svc into |
| @ cpsr |
| .endm |
| |
| .macro get_bad_stack |
| ldr r13, _armboot_start @ setup our mode stack (enter |
| @ in banked mode) |
| sub r13, r13, #(CONFIG_SYS_MALLOC_LEN) @ move past malloc pool |
| sub r13, r13, #(CONFIG_SYS_GBL_DATA_SIZE + 8) @ move to reserved a couple |
| @ spots for abort stack |
| |
| str lr, [r13] @ save caller lr in position 0 |
| @ of saved stack |
| mrs lr, spsr @ get the spsr |
| str lr, [r13, #4] @ save spsr in position 1 of |
| @ saved stack |
| |
| mov r13, #MODE_SVC @ prepare SVC-Mode |
| @ msr spsr_c, r13 |
| msr spsr, r13 @ switch modes, make sure |
| @ moves will execute |
| mov lr, pc @ capture return pc |
| movs pc, lr @ jump to next instruction & |
| @ switch modes. |
| .endm |
| |
| .macro get_bad_stack_swi |
| sub r13, r13, #4 @ space on current stack for |
| @ scratch reg. |
| str r0, [r13] @ save R0's value. |
| ldr r0, _armboot_start @ get data regions start |
| sub r0, r0, #(CONFIG_SYS_MALLOC_LEN) @ move past malloc pool |
| sub r0, r0, #(CONFIG_SYS_GBL_DATA_SIZE + 8) @ move past gbl and a couple |
| @ spots for abort stack |
| str lr, [r0] @ save caller lr in position 0 |
| @ of saved stack |
| mrs r0, spsr @ get the spsr |
| str lr, [r0, #4] @ save spsr in position 1 of |
| @ saved stack |
| ldr r0, [r13] @ restore r0 |
| add r13, r13, #4 @ pop stack entry |
| .endm |
| |
| .macro get_irq_stack @ setup IRQ stack |
| ldr sp, IRQ_STACK_START |
| .endm |
| |
| .macro get_fiq_stack @ setup FIQ stack |
| ldr sp, FIQ_STACK_START |
| .endm |
| |
| /* |
| * exception handlers |
| */ |
| .align 5 |
| undefined_instruction: |
| get_bad_stack |
| bad_save_user_regs |
| bl do_undefined_instruction |
| |
| .align 5 |
| software_interrupt: |
| get_bad_stack_swi |
| bad_save_user_regs |
| bl do_software_interrupt |
| |
| .align 5 |
| prefetch_abort: |
| get_bad_stack |
| bad_save_user_regs |
| bl do_prefetch_abort |
| |
| .align 5 |
| data_abort: |
| get_bad_stack |
| bad_save_user_regs |
| bl do_data_abort |
| |
| .align 5 |
| not_used: |
| get_bad_stack |
| bad_save_user_regs |
| bl do_not_used |
| |
| #ifdef CONFIG_USE_IRQ |
| |
| .align 5 |
| irq: |
| get_irq_stack |
| irq_save_user_regs |
| bl do_irq |
| irq_restore_user_regs |
| |
| .align 5 |
| fiq: |
| get_fiq_stack |
| /* someone ought to write a more effective fiq_save_user_regs */ |
| irq_save_user_regs |
| bl do_fiq |
| irq_restore_user_regs |
| |
| #else |
| |
| .align 5 |
| irq: |
| get_bad_stack |
| bad_save_user_regs |
| bl do_irq |
| |
| .align 5 |
| fiq: |
| get_bad_stack |
| bad_save_user_regs |
| bl do_fiq |
| |
| #endif |
| |
| /* |
| * v7_flush_dcache_all() |
| * |
| * Flush the whole D-cache. |
| * |
| * Corrupted registers: r0-r5, r7, r9-r11 |
| * |
| * - mm - mm_struct describing address space |
| */ |
| .align 5 |
| .global v7_flush_dcache_all |
| v7_flush_dcache_all: |
| stmfd r13!, {r0 - r5, r7, r9 - r12, r14} |
| |
| mov r7, r0 @ take a backup of device type |
| cmp r0, #0x3 @ check if the device type is |
| @ GP |
| moveq r12, #0x1 @ set up to invalide L2 |
| smi: .word 0x01600070 @ Call SMI monitor (smieq) |
| cmp r7, #0x3 @ compare again in case its |
| @ lost |
| beq finished_inval @ if GP device, inval done |
| @ above |
| |
| mrc p15, 1, r0, c0, c0, 1 @ read clidr |
| ands r3, r0, #0x7000000 @ extract loc from clidr |
| mov r3, r3, lsr #23 @ left align loc bit field |
| beq finished_inval @ if loc is 0, then no need to |
| @ clean |
| mov r10, #0 @ start clean at cache level 0 |
| inval_loop1: |
| add r2, r10, r10, lsr #1 @ work out 3x current cache |
| @ level |
| mov r1, r0, lsr r2 @ extract cache type bits from |
| @ clidr |
| and r1, r1, #7 @ mask of the bits for current |
| @ cache only |
| cmp r1, #2 @ see what cache we have at |
| @ this level |
| blt skip_inval @ skip if no cache, or just |
| @ i-cache |
| mcr p15, 2, r10, c0, c0, 0 @ select current cache level |
| @ in cssr |
| mov r2, #0 @ operand for mcr SBZ |
| mcr p15, 0, r2, c7, c5, 4 @ flush prefetch buffer to |
| @ sych the new cssr&csidr, |
| @ with armv7 this is 'isb', |
| @ but we compile with armv5 |
| mrc p15, 1, r1, c0, c0, 0 @ read the new csidr |
| and r2, r1, #7 @ extract the length of the |
| @ cache lines |
| add r2, r2, #4 @ add 4 (line length offset) |
| ldr r4, =0x3ff |
| ands r4, r4, r1, lsr #3 @ find maximum number on the |
| @ way size |
| clz r5, r4 @ find bit position of way |
| @ size increment |
| ldr r7, =0x7fff |
| ands r7, r7, r1, lsr #13 @ extract max number of the |
| @ index size |
| inval_loop2: |
| mov r9, r4 @ create working copy of max |
| @ way size |
| inval_loop3: |
| orr r11, r10, r9, lsl r5 @ factor way and cache number |
| @ into r11 |
| orr r11, r11, r7, lsl r2 @ factor index number into r11 |
| mcr p15, 0, r11, c7, c6, 2 @ invalidate by set/way |
| subs r9, r9, #1 @ decrement the way |
| bge inval_loop3 |
| subs r7, r7, #1 @ decrement the index |
| bge inval_loop2 |
| skip_inval: |
| add r10, r10, #2 @ increment cache number |
| cmp r3, r10 |
| bgt inval_loop1 |
| finished_inval: |
| mov r10, #0 @ swith back to cache level 0 |
| mcr p15, 2, r10, c0, c0, 0 @ select current cache level |
| @ in cssr |
| mcr p15, 0, r10, c7, c5, 4 @ flush prefetch buffer, |
| @ with armv7 this is 'isb', |
| @ but we compile with armv5 |
| |
| ldmfd r13!, {r0 - r5, r7, r9 - r12, pc} |