| 1 | /* SPDX-License-Identifier: GPL-2.0-only */ |
|---|
| 2 | /* |
|---|
| 3 | * linux/arch/arm/lib/io-writesl.S |
|---|
| 4 | * |
|---|
| 5 | * Copyright (C) 1995-2000 Russell King |
|---|
| 6 | */ |
|---|
| 7 | #include <linux/linkage.h> |
|---|
| 8 | #include <asm/assembler.h> |
|---|
| 9 | |
|---|
| 10 | ENTRY(__raw_writesl) |
|---|
| 11 | teq r2, #0 @ do we have to check for the zero len? |
|---|
| 12 | reteq lr |
|---|
| 13 | ands ip, r1, #3 |
|---|
| 14 | bne 3f |
|---|
| 15 | |
|---|
| 16 | subs r2, r2, #4 |
|---|
| 17 | bmi 2f |
|---|
| 18 | stmfd sp!, {r4, lr} |
|---|
| 19 | 1: ldmia r1!, {r3, r4, ip, lr} |
|---|
| 20 | subs r2, r2, #4 |
|---|
| 21 | str r3, [r0, #0] |
|---|
| 22 | str r4, [r0, #0] |
|---|
| 23 | str ip, [r0, #0] |
|---|
| 24 | str lr, [r0, #0] |
|---|
| 25 | bpl 1b |
|---|
| 26 | ldmfd sp!, {r4, lr} |
|---|
| 27 | 2: movs r2, r2, lsl #31 |
|---|
| 28 | ldmiacs r1!, {r3, ip} |
|---|
| 29 | strcs r3, [r0, #0] |
|---|
| 30 | ldrne r3, [r1, #0] |
|---|
| 31 | strcs ip, [r0, #0] |
|---|
| 32 | strne r3, [r0, #0] |
|---|
| 33 | ret lr |
|---|
| 34 | |
|---|
| 35 | 3: bic r1, r1, #3 |
|---|
| 36 | ldr r3, [r1], #4 |
|---|
| 37 | cmp ip, #2 |
|---|
| 38 | blt 5f |
|---|
| 39 | bgt 6f |
|---|
| 40 | |
|---|
| 41 | 4: mov ip, r3, lspull #16 |
|---|
| 42 | ldr r3, [r1], #4 |
|---|
| 43 | subs r2, r2, #1 |
|---|
| 44 | orr ip, ip, r3, lspush #16 |
|---|
| 45 | str ip, [r0] |
|---|
| 46 | bne 4b |
|---|
| 47 | ret lr |
|---|
| 48 | |
|---|
| 49 | 5: mov ip, r3, lspull #8 |
|---|
| 50 | ldr r3, [r1], #4 |
|---|
| 51 | subs r2, r2, #1 |
|---|
| 52 | orr ip, ip, r3, lspush #24 |
|---|
| 53 | str ip, [r0] |
|---|
| 54 | bne 5b |
|---|
| 55 | ret lr |
|---|
| 56 | |
|---|
| 57 | 6: mov ip, r3, lspull #24 |
|---|
| 58 | ldr r3, [r1], #4 |
|---|
| 59 | subs r2, r2, #1 |
|---|
| 60 | orr ip, ip, r3, lspush #8 |
|---|
| 61 | str ip, [r0] |
|---|
| 62 | bne 6b |
|---|
| 63 | ret lr |
|---|
| 64 | ENDPROC(__raw_writesl) |
|---|
| 65 | |
|---|
