arm/lib/lib1funcs.S

26 .macro ARM_DIV_BODY dividend, divisor, result, curbit
30 	clz	\curbit, \divisor
34 	mov	\divisor, \divisor, lsl \result
40 	@ Initially shift the divisor left 3 bits if possible,
44 	tst	\divisor, #0xe0000000
45 	moveq	\divisor, \divisor, lsl #3
49 	@ Unless the divisor is very big, shift it up in multiples of
51 	@ division loop.  Continue shifting until the divisor is
53 1:	cmp	\divisor, #0x10000000
54 	cmplo	\divisor, \dividend
55 	movlo	\divisor, \divisor, lsl #4
61 1:	cmp	\divisor, #0x80000000
62 	cmplo	\divisor, \dividend
63 	movlo	\divisor, \divisor, lsl #1
72 1:	cmp	\dividend, \divisor
73 	subhs	\dividend, \dividend, \divisor
75 	cmp	\dividend, \divisor,  lsr #1
76 	subhs	\dividend, \dividend, \divisor, lsr #1
78 	cmp	\dividend, \divisor,  lsr #2
79 	subhs	\dividend, \dividend, \divisor, lsr #2
81 	cmp	\dividend, \divisor,  lsr #3
82 	subhs	\dividend, \dividend, \divisor, lsr #3
86 	movne	\divisor,  \divisor, lsr #4
92 .macro ARM_DIV2_ORDER divisor, order
96 	clz	\order, \divisor
101 	cmp	\divisor, #(1 << 16)
102 	movhs	\divisor, \divisor, lsr #16
106 	cmp	\divisor, #(1 << 8)
107 	movhs	\divisor, \divisor, lsr #8
110 	cmp	\divisor, #(1 << 4)
111 	movhs	\divisor, \divisor, lsr #4
114 	cmp	\divisor, #(1 << 2)
116 	addls	\order, \order, \divisor, lsr #1
123 .macro ARM_MOD_BODY dividend, divisor, order, spare
127 	clz	\order, \divisor
130 	mov	\divisor, \divisor, lsl \order
136 	@ Unless the divisor is very big, shift it up in multiples of
138 	@ division loop.  Continue shifting until the divisor is
140 1:	cmp	\divisor, #0x10000000
141 	cmplo	\divisor, \dividend
142 	movlo	\divisor, \divisor, lsl #4
148 1:	cmp	\divisor, #0x80000000
149 	cmplo	\divisor, \dividend
150 	movlo	\divisor, \divisor, lsl #1
161 1:	cmp	\dividend, \divisor
162 	subhs	\dividend, \dividend, \divisor
163 	cmp	\dividend, \divisor,  lsr #1
164 	subhs	\dividend, \dividend, \divisor, lsr #1
165 	cmp	\dividend, \divisor,  lsr #2
166 	subhs	\dividend, \dividend, \divisor, lsr #2
167 	cmp	\dividend, \divisor,  lsr #3
168 	subhs	\dividend, \dividend, \divisor, lsr #3
170 	mov	\divisor, \divisor, lsr #4
182 	cmp	\dividend, \divisor
183 	subhs	\dividend, \dividend, \divisor
184 	mov	\divisor,  \divisor,  lsr #1
185 3:	cmp	\dividend, \divisor
186 	subhs	\dividend, \dividend, \divisor
187 	mov	\divisor,  \divisor,  lsr #1
188 4:	cmp	\dividend, \divisor
189 	subhs	\dividend, \dividend, \divisor
230 	subs	r2, r1, #1			@ compare divisor with 1
232 	cmpne	r0, r1				@ compare dividend with divisor
234 	tsthi	r1, r2				@ see if divisor is power of 2
261 	tst	r1, r2				@ divisor is power of 2 ?
300 	subs	r2, r1, #1			@ compare divisor with 1
301 	cmpne	r0, r1				@ compare dividend with divisor
303 	tsthi	r1, r2				@ see if divisor is power of 2