| /* | |
| * flashasm.S: flash magic for LART | |
| * | |
| * Copyright (C) 1999 2000 2001 Jan-Derk bakker (J.D.Bakker@its.tudelft.nl) | |
| * | |
| * 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 | |
| * | |
| */ | |
| .text | |
| .globl data_to_flash | |
| .globl data_from_flash | |
| /* Subroutine that takes data in r0 and formats it so it will be in */ | |
| /* the correct order for the internal flash */ | |
| /* used for LART only */ | |
| data_to_flash: | |
| mov r1, #0x0 | |
| tst r0, #0x00000001 | |
| orrne r1, r1, #0x00001000 | |
| tst r0, #0x00000002 | |
| orrne r1, r1, #0x00004000 | |
| tst r0, #0x00000004 | |
| orrne r1, r1, #0x00000800 | |
| tst r0, #0x00000008 | |
| orrne r1, r1, #0x00000200 | |
| tst r0, #0x00000010 | |
| orrne r1, r1, #0x00000001 | |
| tst r0, #0x00000020 | |
| orrne r1, r1, #0x00000004 | |
| tst r0, #0x00000040 | |
| orrne r1, r1, #0x00000080 | |
| tst r0, #0x00000080 | |
| orrne r1, r1, #0x00000020 | |
| tst r0, #0x00000100 | |
| orrne r1, r1, #0x00002000 | |
| tst r0, #0x00000200 | |
| orrne r1, r1, #0x00008000 | |
| tst r0, #0x00000400 | |
| orrne r1, r1, #0x00000400 | |
| tst r0, #0x00000800 | |
| orrne r1, r1, #0x00000100 | |
| tst r0, #0x00001000 | |
| orrne r1, r1, #0x00000002 | |
| tst r0, #0x00002000 | |
| orrne r1, r1, #0x00000008 | |
| tst r0, #0x00004000 | |
| orrne r1, r1, #0x00000040 | |
| tst r0, #0x00008000 | |
| orrne r1, r1, #0x00000010 | |
| tst r0, #0x00010000 | |
| orrne r1, r1, #0x00100000 | |
| tst r0, #0x00020000 | |
| orrne r1, r1, #0x00400000 | |
| tst r0, #0x00040000 | |
| orrne r1, r1, #0x00080000 | |
| tst r0, #0x00080000 | |
| orrne r1, r1, #0x00020000 | |
| tst r0, #0x00100000 | |
| orrne r1, r1, #0x01000000 | |
| tst r0, #0x00200000 | |
| orrne r1, r1, #0x04000000 | |
| tst r0, #0x00400000 | |
| orrne r1, r1, #0x80000000 | |
| tst r0, #0x00800000 | |
| orrne r1, r1, #0x20000000 | |
| tst r0, #0x01000000 | |
| orrne r1, r1, #0x00200000 | |
| tst r0, #0x02000000 | |
| orrne r1, r1, #0x00800000 | |
| tst r0, #0x04000000 | |
| orrne r1, r1, #0x00040000 | |
| tst r0, #0x08000000 | |
| orrne r1, r1, #0x00010000 | |
| tst r0, #0x10000000 | |
| orrne r1, r1, #0x02000000 | |
| tst r0, #0x20000000 | |
| orrne r1, r1, #0x08000000 | |
| tst r0, #0x40000000 | |
| orrne r1, r1, #0x40000000 | |
| tst r0, #0x80000000 | |
| orrne r1, r1, #0x10000000 | |
| mov r0, r1 | |
| mov pc, lr | |
| /* Takes data received from the flash, and unshuffles it. */ | |
| data_from_flash: | |
| mov r1, #0x00 | |
| tst r0, #0x00000001 | |
| orrne r1, r1, #0x00000010 | |
| tst r0, #0x00000002 | |
| orrne r1, r1, #0x00001000 | |
| tst r0, #0x00000004 | |
| orrne r1, r1, #0x00000020 | |
| tst r0, #0x00000008 | |
| orrne r1, r1, #0x00002000 | |
| tst r0, #0x00000010 | |
| orrne r1, r1, #0x00008000 | |
| tst r0, #0x00000020 | |
| orrne r1, r1, #0x00000080 | |
| tst r0, #0x00000040 | |
| orrne r1, r1, #0x00004000 | |
| tst r0, #0x00000080 | |
| orrne r1, r1, #0x00000040 | |
| tst r0, #0x00000100 | |
| orrne r1, r1, #0x00000800 | |
| tst r0, #0x00000200 | |
| orrne r1, r1, #0x00000008 | |
| tst r0, #0x00000400 | |
| orrne r1, r1, #0x00000400 | |
| tst r0, #0x00000800 | |
| orrne r1, r1, #0x00000004 | |
| tst r0, #0x00001000 | |
| orrne r1, r1, #0x00000001 | |
| tst r0, #0x00002000 | |
| orrne r1, r1, #0x00000100 | |
| tst r0, #0x00004000 | |
| orrne r1, r1, #0x00000002 | |
| tst r0, #0x00008000 | |
| orrne r1, r1, #0x00000200 | |
| tst r0, #0x00010000 | |
| orrne r1, r1, #0x08000000 | |
| tst r0, #0x00020000 | |
| orrne r1, r1, #0x00080000 | |
| tst r0, #0x00040000 | |
| orrne r1, r1, #0x04000000 | |
| tst r0, #0x00080000 | |
| orrne r1, r1, #0x00040000 | |
| tst r0, #0x00100000 | |
| orrne r1, r1, #0x00010000 | |
| tst r0, #0x00200000 | |
| orrne r1, r1, #0x01000000 | |
| tst r0, #0x00400000 | |
| orrne r1, r1, #0x00020000 | |
| tst r0, #0x00800000 | |
| orrne r1, r1, #0x02000000 | |
| tst r0, #0x01000000 | |
| orrne r1, r1, #0x00100000 | |
| tst r0, #0x02000000 | |
| orrne r1, r1, #0x10000000 | |
| tst r0, #0x04000000 | |
| orrne r1, r1, #0x00200000 | |
| tst r0, #0x08000000 | |
| orrne r1, r1, #0x20000000 | |
| tst r0, #0x10000000 | |
| orrne r1, r1, #0x80000000 | |
| tst r0, #0x20000000 | |
| orrne r1, r1, #0x00800000 | |
| tst r0, #0x40000000 | |
| orrne r1, r1, #0x40000000 | |
| tst r0, #0x80000000 | |
| orrne r1, r1, #0x00400000 | |
| mov r0, r1 | |
| mov pc, lr |