arm/lib/lib1funcs.S

28 .macro ARM_DIV_BODY dividend, divisor, result, curbit
32 	clz	\curbit, \divisor
36 	mov	\divisor, \divisor, lsl \result
42 	@ Initially shift the divisor left 3 bits if possible,
46 	tst	\divisor, #0xe0000000
47 	moveq	\divisor, \divisor, lsl #3
51 	@ Unless the divisor is very big, shift it up in multiples of
53 	@ division loop.  Continue shifting until the divisor is
55 1:	cmp	\divisor, #0x10000000
56 	cmplo	\divisor, \dividend
57 	movlo	\divisor, \divisor, lsl #4
63 1:	cmp	\divisor, #0x80000000
64 	cmplo	\divisor, \dividend
65 	movlo	\divisor, \divisor, lsl #1
74 1:	cmp	\dividend, \divisor
75 	subhs	\dividend, \dividend, \divisor
77 	cmp	\dividend, \divisor,  lsr #1
78 	subhs	\dividend, \dividend, \divisor, lsr #1
80 	cmp	\dividend, \divisor,  lsr #2
81 	subhs	\dividend, \dividend, \divisor, lsr #2
83 	cmp	\dividend, \divisor,  lsr #3
84 	subhs	\dividend, \dividend, \divisor, lsr #3
88 	movne	\divisor,  \divisor, lsr #4
94 .macro ARM_DIV2_ORDER divisor, order
98 	clz	\order, \divisor
103 	cmp	\divisor, #(1 << 16)
104 	movhs	\divisor, \divisor, lsr #16
108 	cmp	\divisor, #(1 << 8)
109 	movhs	\divisor, \divisor, lsr #8
112 	cmp	\divisor, #(1 << 4)
113 	movhs	\divisor, \divisor, lsr #4
116 	cmp	\divisor, #(1 << 2)
118 	addls	\order, \order, \divisor, lsr #1
125 .macro ARM_MOD_BODY dividend, divisor, order, spare
129 	clz	\order, \divisor
132 	mov	\divisor, \divisor, lsl \order
138 	@ Unless the divisor is very big, shift it up in multiples of
140 	@ division loop.  Continue shifting until the divisor is
142 1:	cmp	\divisor, #0x10000000
143 	cmplo	\divisor, \dividend
144 	movlo	\divisor, \divisor, lsl #4
150 1:	cmp	\divisor, #0x80000000
151 	cmplo	\divisor, \dividend
152 	movlo	\divisor, \divisor, lsl #1
163 1:	cmp	\dividend, \divisor
164 	subhs	\dividend, \dividend, \divisor
165 	cmp	\dividend, \divisor,  lsr #1
166 	subhs	\dividend, \dividend, \divisor, lsr #1
167 	cmp	\dividend, \divisor,  lsr #2
168 	subhs	\dividend, \dividend, \divisor, lsr #2
169 	cmp	\dividend, \divisor,  lsr #3
170 	subhs	\dividend, \dividend, \divisor, lsr #3
172 	mov	\divisor, \divisor, lsr #4
184 	cmp	\dividend, \divisor
185 	subhs	\dividend, \dividend, \divisor
186 	mov	\divisor,  \divisor,  lsr #1
187 3:	cmp	\dividend, \divisor
188 	subhs	\dividend, \dividend, \divisor
189 	mov	\divisor,  \divisor,  lsr #1
190 4:	cmp	\dividend, \divisor
191 	subhs	\dividend, \dividend, \divisor
232 	subs	r2, r1, #1			@ compare divisor with 1
234 	cmpne	r0, r1				@ compare dividend with divisor
236 	tsthi	r1, r2				@ see if divisor is power of 2
263 	tst	r1, r2				@ divisor is power of 2 ?
302 	subs	r2, r1, #1			@ compare divisor with 1
303 	cmpne	r0, r1				@ compare dividend with divisor
305 	tsthi	r1, r2				@ see if divisor is power of 2