satip-axe/kernel/arch/frv/lib/outsl_sw.S

46 lines
1.1 KiB
ArmAsm
Raw Normal View History

/* outsl_ns.S: output array of 4b words to device with byte swapping
*
* Copyright (C) 2003 Red Hat, Inc. All Rights Reserved.
* Written by David Howells (dhowells@redhat.com)
*
* 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.
*/
.text
.p2align 4
###############################################################################
#
# void __outsl_sw(unsigned int port, const void *buf, int n)
#
###############################################################################
.globl __outsl_sw
.type __outsl_sw,@function
__outsl_sw:
subi.p gr9,#1,gr9
setlos #1,gr4
0:
ldubu @(gr9,gr4),gr5
ldubu @(gr9,gr4),gr6
slli gr6,#8,gr6
ldubu.p @(gr9,gr4),gr7
or gr5,gr6,gr5
ldubu.p @(gr9,gr4),gr6
slli gr7,#16,gr7
slli.p gr6,#24,gr6
or gr5,gr7,gr5
subicc.p gr10,#1,gr10,icc0
or gr5,gr6,gr5
sti.p gr5,@(gr8,#0)
bhi icc0,#2,0b
membar
bralr
.size __outsl_sw, .-__outsl_sw