arm/lib/lib1funcs.S

40 .macro ARM_DIV_BODY dividend, divisor, result, curbit
44 	clz	\curbit, \divisor
48 	mov	\divisor, \divisor, lsl \result
54 	@ Initially shift the divisor left 3 bits if possible,
58 	tst	\divisor, #0xe0000000
59 	moveq	\divisor, \divisor, lsl #3
63 	@ Unless the divisor is very big, shift it up in multiples of
65 	@ division loop.  Continue shifting until the divisor is
67 1:	cmp	\divisor, #0x10000000
68 	cmplo	\divisor, \dividend
69 	movlo	\divisor, \divisor, lsl #4
75 1:	cmp	\divisor, #0x80000000
76 	cmplo	\divisor, \dividend
77 	movlo	\divisor, \divisor, lsl #1
86 1:	cmp	\dividend, \divisor
87 	subhs	\dividend, \dividend, \divisor
89 	cmp	\dividend, \divisor,  lsr #1
90 	subhs	\dividend, \dividend, \divisor, lsr #1
92 	cmp	\dividend, \divisor,  lsr #2
93 	subhs	\dividend, \dividend, \divisor, lsr #2
95 	cmp	\dividend, \divisor,  lsr #3
96 	subhs	\dividend, \dividend, \divisor, lsr #3
100 	movne	\divisor,  \divisor, lsr #4
106 .macro ARM_DIV2_ORDER divisor, order
110 	clz	\order, \divisor
115 	cmp	\divisor, #(1 << 16)
116 	movhs	\divisor, \divisor, lsr #16
120 	cmp	\divisor, #(1 << 8)
121 	movhs	\divisor, \divisor, lsr #8
124 	cmp	\divisor, #(1 << 4)
125 	movhs	\divisor, \divisor, lsr #4
128 	cmp	\divisor, #(1 << 2)
130 	addls	\order, \order, \divisor, lsr #1
137 .macro ARM_MOD_BODY dividend, divisor, order, spare
141 	clz	\order, \divisor
144 	mov	\divisor, \divisor, lsl \order
150 	@ Unless the divisor is very big, shift it up in multiples of
152 	@ division loop.  Continue shifting until the divisor is
154 1:	cmp	\divisor, #0x10000000
155 	cmplo	\divisor, \dividend
156 	movlo	\divisor, \divisor, lsl #4
162 1:	cmp	\divisor, #0x80000000
163 	cmplo	\divisor, \dividend
164 	movlo	\divisor, \divisor, lsl #1
175 1:	cmp	\dividend, \divisor
176 	subhs	\dividend, \dividend, \divisor
177 	cmp	\dividend, \divisor,  lsr #1
178 	subhs	\dividend, \dividend, \divisor, lsr #1
179 	cmp	\dividend, \divisor,  lsr #2
180 	subhs	\dividend, \dividend, \divisor, lsr #2
181 	cmp	\dividend, \divisor,  lsr #3
182 	subhs	\dividend, \dividend, \divisor, lsr #3
184 	mov	\divisor, \divisor, lsr #4
196 	cmp	\dividend, \divisor
197 	subhs	\dividend, \dividend, \divisor
198 	mov	\divisor,  \divisor,  lsr #1
199 3:	cmp	\dividend, \divisor
200 	subhs	\dividend, \dividend, \divisor
201 	mov	\divisor,  \divisor,  lsr #1
202 4:	cmp	\dividend, \divisor
203 	subhs	\dividend, \dividend, \divisor
245 	subs	r2, r1, #1			@ compare divisor with 1
247 	cmpne	r0, r1				@ compare dividend with divisor
249 	tsthi	r1, r2				@ see if divisor is power of 2
278 	tst	r1, r2				@ divisor is power of 2 ?
315 	subs	r2, r1, #1			@ compare divisor with 1
316 	cmpne	r0, r1				@ compare dividend with divisor
318 	tsthi	r1, r2				@ see if divisor is power of 2