| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /* outsl_ns.S: output array of 4b words to device without byte swapping | 
 | 2 |  * | 
 | 3 |  * Copyright (C) 2003 Red Hat, Inc. All Rights Reserved. | 
 | 4 |  * Written by David Howells (dhowells@redhat.com) | 
 | 5 |  * | 
 | 6 |  * This program is free software; you can redistribute it and/or | 
 | 7 |  * modify it under the terms of the GNU General Public License | 
 | 8 |  * as published by the Free Software Foundation; either version | 
 | 9 |  * 2 of the License, or (at your option) any later version. | 
 | 10 |  */ | 
 | 11 |  | 
 | 12 |  | 
 | 13 |         .text | 
 | 14 |         .p2align	4 | 
 | 15 |  | 
 | 16 | ############################################################################### | 
 | 17 | # | 
 | 18 | # void __outsl_ns(unsigned int port, const void *buf, int n) | 
 | 19 | # | 
 | 20 | ############################################################################### | 
 | 21 |         .globl		__outsl_ns | 
 | 22 |         .type		__outsl_ns,@function | 
 | 23 | __outsl_ns: | 
 | 24 | 	andicc.p	gr9,#3,gr0,icc0 | 
 | 25 | 	setlos		#4,gr4 | 
 | 26 | 	bne		icc0,#0,__outsl_ns_misaligned | 
 | 27 | 	subi		gr9,#4,gr9 | 
 | 28 | 0: | 
 | 29 | 	ldu.p		@(gr9,gr4),gr5 | 
 | 30 | 	subicc		gr10,#1,gr10,icc0 | 
 | 31 | 	sti.p		gr5,@(gr8,#0) | 
 | 32 | 	bhi		icc0,#2,0b | 
 | 33 |  | 
 | 34 | 	membar | 
 | 35 | 	bralr | 
 | 36 |  | 
 | 37 | __outsl_ns_misaligned: | 
 | 38 | 	subi.p		gr9,#1,gr9 | 
 | 39 | 	setlos		#1,gr4 | 
 | 40 | 0: | 
 | 41 | 	ldubu		@(gr9,gr4),gr5 | 
 | 42 | 	ldubu.p		@(gr9,gr4),gr6 | 
 | 43 | 	slli		gr5,#8,gr5 | 
 | 44 | 	ldubu.p		@(gr9,gr4),gr7 | 
 | 45 | 	or		gr5,gr6,gr5 | 
 | 46 | 	ldubu.p		@(gr9,gr4),gr6 | 
 | 47 | 	slli		gr5,#16,gr5 | 
 | 48 | 	slli.p		gr7,#8,gr7 | 
 | 49 | 	or		gr5,gr6,gr5 | 
 | 50 | 	subicc.p	gr10,#1,gr10,icc0 | 
 | 51 | 	or		gr5,gr7,gr5 | 
 | 52 |  | 
 | 53 | 	sti.p		gr5,@(gr8,#0) | 
 | 54 | 	bhi		icc0,#2,0b | 
 | 55 |  | 
 | 56 | 	membar | 
 | 57 | 	bralr | 
 | 58 |  | 
 | 59 | 	.size		__outsl_ns, .-__outsl_ns |