259 lines
		
	
	
	
		
			5.3 KiB
			
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
		
		
			
		
	
	
			259 lines
		
	
	
	
		
			5.3 KiB
			
		
	
	
	
		
			ArmAsm
		
	
	
	
	
	
|   | /* Copyright (C) 1989, 1992, 1993, 1994, 1995 Free Software Foundation, Inc. | ||
|  | 
 | ||
|  | This file is part of GNU CC. | ||
|  | 
 | ||
|  | GNU CC 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, or (at your option)
 | ||
|  | any later version. | ||
|  | 
 | ||
|  | GNU CC 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 GNU CC; see the file COPYING.  If not, write to
 | ||
|  | the Free Software Foundation, 59 Temple Place - Suite 330, | ||
|  | Boston, MA 02111-1307, USA.  */ | ||
|  | 
 | ||
|  | 	.text | ||
|  | 	.align 4
 | ||
|  | 	.globl __udivdi3
 | ||
|  | __udivdi3: | ||
|  | 	save %sp,-104,%sp | ||
|  | 	mov %i3,%o3 | ||
|  | 	cmp %i2,0 | ||
|  | 	bne .LL40 | ||
|  | 	mov %i1,%i3 | ||
|  | 	cmp %o3,%i0 | ||
|  | 	bleu .LL41 | ||
|  | 	mov %i3,%o1 | ||
|  | 	! Inlined udiv_qrnnd | ||
|  | 	mov	32,%g1 | ||
|  | 	subcc	%i0,%o3,%g0 | ||
|  | 1:	bcs	5f | ||
|  | 	 addxcc %o1,%o1,%o1	! shift n1n0 and a q-bit in lsb | ||
|  | 	sub	%i0,%o3,%i0	! this kills msb of n | ||
|  | 	addx	%i0,%i0,%i0	! so this cannot give carry | ||
|  | 	subcc	%g1,1,%g1 | ||
|  | 2:	bne	1b | ||
|  | 	 subcc	%i0,%o3,%g0 | ||
|  | 	bcs	3f | ||
|  | 	 addxcc %o1,%o1,%o1	! shift n1n0 and a q-bit in lsb | ||
|  | 	b	3f | ||
|  | 	 sub	%i0,%o3,%i0	! this kills msb of n | ||
|  | 4:	sub	%i0,%o3,%i0 | ||
|  | 5:	addxcc	%i0,%i0,%i0 | ||
|  | 	bcc	2b | ||
|  | 	 subcc	%g1,1,%g1 | ||
|  | ! Got carry from n.  Subtract next step to cancel this carry. | ||
|  | 	bne	4b | ||
|  | 	 addcc	%o1,%o1,%o1	! shift n1n0 and a 0-bit in lsb | ||
|  | 	sub	%i0,%o3,%i0 | ||
|  | 3:	xnor	%o1,0,%o1 | ||
|  | 	! End of inline udiv_qrnnd | ||
|  | 	b .LL45 | ||
|  | 	mov 0,%o2 | ||
|  | .LL41: | ||
|  | 	cmp %o3,0 | ||
|  | 	bne .LL77 | ||
|  | 	mov %i0,%o2 | ||
|  | 	mov 1,%o0 | ||
|  | 	call .udiv,0 | ||
|  | 	mov 0,%o1 | ||
|  | 	mov %o0,%o3 | ||
|  | 	mov %i0,%o2 | ||
|  | .LL77: | ||
|  | 	mov 0,%o4 | ||
|  | 	! Inlined udiv_qrnnd | ||
|  | 	mov	32,%g1 | ||
|  | 	subcc	%o4,%o3,%g0 | ||
|  | 1:	bcs	5f | ||
|  | 	 addxcc %o2,%o2,%o2	! shift n1n0 and a q-bit in lsb | ||
|  | 	sub	%o4,%o3,%o4	! this kills msb of n | ||
|  | 	addx	%o4,%o4,%o4	! so this cannot give carry | ||
|  | 	subcc	%g1,1,%g1 | ||
|  | 2:	bne	1b | ||
|  | 	 subcc	%o4,%o3,%g0 | ||
|  | 	bcs	3f | ||
|  | 	 addxcc %o2,%o2,%o2	! shift n1n0 and a q-bit in lsb | ||
|  | 	b	3f | ||
|  | 	 sub	%o4,%o3,%o4	! this kills msb of n | ||
|  | 4:	sub	%o4,%o3,%o4 | ||
|  | 5:	addxcc	%o4,%o4,%o4 | ||
|  | 	bcc	2b | ||
|  | 	 subcc	%g1,1,%g1 | ||
|  | ! Got carry from n.  Subtract next step to cancel this carry. | ||
|  | 	bne	4b | ||
|  | 	 addcc	%o2,%o2,%o2	! shift n1n0 and a 0-bit in lsb | ||
|  | 	sub	%o4,%o3,%o4 | ||
|  | 3:	xnor	%o2,0,%o2 | ||
|  | 	! End of inline udiv_qrnnd | ||
|  | 	mov %o4,%i0 | ||
|  | 	mov %i3,%o1 | ||
|  | 	! Inlined udiv_qrnnd | ||
|  | 	mov	32,%g1 | ||
|  | 	subcc	%i0,%o3,%g0 | ||
|  | 1:	bcs	5f | ||
|  | 	 addxcc %o1,%o1,%o1	! shift n1n0 and a q-bit in lsb | ||
|  | 	sub	%i0,%o3,%i0	! this kills msb of n | ||
|  | 	addx	%i0,%i0,%i0	! so this cannot give carry | ||
|  | 	subcc	%g1,1,%g1 | ||
|  | 2:	bne	1b | ||
|  | 	 subcc	%i0,%o3,%g0 | ||
|  | 	bcs	3f | ||
|  | 	 addxcc %o1,%o1,%o1	! shift n1n0 and a q-bit in lsb | ||
|  | 	b	3f | ||
|  | 	 sub	%i0,%o3,%i0	! this kills msb of n | ||
|  | 4:	sub	%i0,%o3,%i0 | ||
|  | 5:	addxcc	%i0,%i0,%i0 | ||
|  | 	bcc	2b | ||
|  | 	 subcc	%g1,1,%g1 | ||
|  | ! Got carry from n.  Subtract next step to cancel this carry. | ||
|  | 	bne	4b | ||
|  | 	 addcc	%o1,%o1,%o1	! shift n1n0 and a 0-bit in lsb | ||
|  | 	sub	%i0,%o3,%i0 | ||
|  | 3:	xnor	%o1,0,%o1 | ||
|  | 	! End of inline udiv_qrnnd | ||
|  | 	b .LL78 | ||
|  | 	mov %o1,%l1 | ||
|  | .LL40: | ||
|  | 	cmp %i2,%i0 | ||
|  | 	bleu .LL46 | ||
|  | 	sethi %hi(65535),%o0 | ||
|  | 	b .LL73 | ||
|  | 	mov 0,%o1 | ||
|  | .LL46: | ||
|  | 	or %o0,%lo(65535),%o0 | ||
|  | 	cmp %i2,%o0 | ||
|  | 	bgu .LL53 | ||
|  | 	mov %i2,%o1 | ||
|  | 	cmp %i2,256 | ||
|  | 	addx %g0,-1,%o0 | ||
|  | 	b .LL59 | ||
|  | 	and %o0,8,%o2 | ||
|  | .LL53: | ||
|  | 	sethi %hi(16777215),%o0 | ||
|  | 	or %o0,%lo(16777215),%o0 | ||
|  | 	cmp %o1,%o0 | ||
|  | 	bgu .LL59 | ||
|  | 	mov 24,%o2 | ||
|  | 	mov 16,%o2 | ||
|  | .LL59: | ||
|  | 	srl %o1,%o2,%o1 | ||
|  | 	sethi %hi(__clz_tab),%o0 | ||
|  | 	or %o0,%lo(__clz_tab),%o0 | ||
|  | 	ldub [%o1+%o0],%o0 | ||
|  | 	add %o0,%o2,%o0 | ||
|  | 	mov 32,%o1 | ||
|  | 	subcc %o1,%o0,%o2 | ||
|  | 	bne,a .LL67 | ||
|  | 	mov 32,%o0 | ||
|  | 	cmp %i0,%i2 | ||
|  | 	bgu .LL69 | ||
|  | 	cmp %i3,%o3 | ||
|  | 	blu .LL73 | ||
|  | 	mov 0,%o1 | ||
|  | .LL69: | ||
|  | 	b .LL73 | ||
|  | 	mov 1,%o1 | ||
|  | .LL67: | ||
|  | 	sub %o0,%o2,%o0 | ||
|  | 	sll %i2,%o2,%i2 | ||
|  | 	srl %o3,%o0,%o1 | ||
|  | 	or %i2,%o1,%i2 | ||
|  | 	sll %o3,%o2,%o3 | ||
|  | 	srl %i0,%o0,%o1 | ||
|  | 	sll %i0,%o2,%i0 | ||
|  | 	srl %i3,%o0,%o0 | ||
|  | 	or %i0,%o0,%i0 | ||
|  | 	sll %i3,%o2,%i3 | ||
|  | 	mov %i0,%o5 | ||
|  | 	mov %o1,%o4 | ||
|  | 	! Inlined udiv_qrnnd | ||
|  | 	mov	32,%g1 | ||
|  | 	subcc	%o4,%i2,%g0 | ||
|  | 1:	bcs	5f | ||
|  | 	 addxcc %o5,%o5,%o5	! shift n1n0 and a q-bit in lsb | ||
|  | 	sub	%o4,%i2,%o4	! this kills msb of n | ||
|  | 	addx	%o4,%o4,%o4	! so this cannot give carry | ||
|  | 	subcc	%g1,1,%g1 | ||
|  | 2:	bne	1b | ||
|  | 	 subcc	%o4,%i2,%g0 | ||
|  | 	bcs	3f | ||
|  | 	 addxcc %o5,%o5,%o5	! shift n1n0 and a q-bit in lsb | ||
|  | 	b	3f | ||
|  | 	 sub	%o4,%i2,%o4	! this kills msb of n | ||
|  | 4:	sub	%o4,%i2,%o4 | ||
|  | 5:	addxcc	%o4,%o4,%o4 | ||
|  | 	bcc	2b | ||
|  | 	 subcc	%g1,1,%g1 | ||
|  | ! Got carry from n.  Subtract next step to cancel this carry. | ||
|  | 	bne	4b | ||
|  | 	 addcc	%o5,%o5,%o5	! shift n1n0 and a 0-bit in lsb | ||
|  | 	sub	%o4,%i2,%o4 | ||
|  | 3:	xnor	%o5,0,%o5 | ||
|  | 	! End of inline udiv_qrnnd | ||
|  | 	mov %o4,%i0 | ||
|  | 	mov %o5,%o1 | ||
|  | 	! Inlined umul_ppmm | ||
|  | 	wr	%g0,%o1,%y	! SPARC has 0-3 delay insn after a wr | ||
|  | 	sra	%o3,31,%g2	! Do not move this insn | ||
|  | 	and	%o1,%g2,%g2	! Do not move this insn | ||
|  | 	andcc	%g0,0,%g1	! Do not move this insn | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,%o3,%g1 | ||
|  | 	mulscc	%g1,0,%g1 | ||
|  | 	add	%g1,%g2,%o0 | ||
|  | 	rd	%y,%o2 | ||
|  | 	cmp %o0,%i0 | ||
|  | 	bgu,a .LL73 | ||
|  | 	add %o1,-1,%o1 | ||
|  | 	bne,a .LL45 | ||
|  | 	mov 0,%o2 | ||
|  | 	cmp %o2,%i3 | ||
|  | 	bleu .LL45 | ||
|  | 	mov 0,%o2 | ||
|  | 	add %o1,-1,%o1 | ||
|  | .LL73: | ||
|  | 	mov 0,%o2 | ||
|  | .LL45: | ||
|  | 	mov %o1,%l1 | ||
|  | .LL78: | ||
|  | 	mov %o2,%l0 | ||
|  | 	mov %l0,%i0 | ||
|  | 	mov %l1,%i1 | ||
|  | 	ret | ||
|  | 	restore |