66 lines
1.6 KiB
ArmAsm
66 lines
1.6 KiB
ArmAsm
/* SPDX-License-Identifier: GPL-2.0-or-later */
|
|
|
|
/***************************************************************************
|
|
* Copyright (C) 2006 by Magnus Lundin *
|
|
* lundin@mlu.mine.nu *
|
|
* *
|
|
* Copyright (C) 2008 by Spencer Oliver *
|
|
* spen@spen-soft.co.uk *
|
|
***************************************************************************/
|
|
|
|
.text
|
|
.syntax unified
|
|
.cpu cortex-m3
|
|
.thumb
|
|
.thumb_func
|
|
|
|
/*
|
|
* Params :
|
|
* r0 = workarea start
|
|
* r1 = workarea end
|
|
* r2 = target address
|
|
* r3 = count (32bit words)
|
|
*
|
|
* Clobbered:
|
|
* r4 = pFLASH_CTRL_BASE
|
|
* r5 = FLASHWRITECMD
|
|
* r7 - rp
|
|
* r8 - wp, tmp
|
|
*/
|
|
|
|
write:
|
|
ldr r4, pFLASH_CTRL_BASE
|
|
ldr r5, FLASHWRITECMD
|
|
|
|
wait_fifo:
|
|
ldr r8, [r0, #0] /* read wp */
|
|
cmp r8, #0 /* abort if wp == 0 */
|
|
beq exit
|
|
ldr r7, [r0, #4] /* read rp */
|
|
cmp r7, r8 /* wait until rp != wp */
|
|
beq wait_fifo
|
|
|
|
mainloop:
|
|
str r2, [r4, #0] /* FMA - write address */
|
|
add r2, r2, #4 /* increment target address */
|
|
ldr r8, [r7], #4
|
|
str r8, [r4, #4] /* FMD - write data */
|
|
str r5, [r4, #8] /* FMC - enable write */
|
|
busy:
|
|
ldr r8, [r4, #8]
|
|
tst r8, #1
|
|
bne busy
|
|
|
|
cmp r7, r1 /* wrap rp at end of buffer */
|
|
it cs
|
|
addcs r7, r0, #8 /* skip loader args */
|
|
str r7, [r0, #4] /* store rp */
|
|
subs r3, r3, #1 /* decrement word count */
|
|
cbz r3, exit /* loop if not done */
|
|
b wait_fifo
|
|
exit:
|
|
bkpt #0
|
|
|
|
pFLASH_CTRL_BASE: .word 0x400FD000
|
|
FLASHWRITECMD: .word 0xA4420001
|