73 74ENTRY(__divsi3) 75.L_divide: /* r0 = r0 / r1; r1 = r0 % r1 */ 76 eor r0, r1, r0 77 eor r1, r0, r1 78 eor r0, r1, r0 79 /* r0 = r1 / r0; r1 = r1 % r0 */ 80 cmp r0, #1 81 bcc .L_overflow 82 beq .L_divide_l0 83 ands ip, r0, #0x80000000 84 rsbmi r0, r0, #0 85 ands r2, r1, #0x80000000 86 eor ip, ip, r2 87 rsbmi r1, r1, #0 88 orr ip, r2, ip, lsr #1 /* ip bit 0x40000000 = -ve division */ 89 /* ip bit 0x80000000 = -ve remainder */ 90 91.L_divide_l1: 92 mov r2, #1 93 mov r3, #0 94 95 /* 96 * If the highest bit of the dividend is set, we have to be 97 * careful when shifting the divisor. Test this. 98 */ 99 movs r1,r1 100 bpl .L_old_code 101 102 /* 103 * At this point, the highest bit of r1 is known to be set. 104 * We abuse this below in the tst instructions. 105 */ 106 tst r1, r0 /*, lsl #0 */ 107 bmi .L_divide_b1 108 tst r1, r0, lsl #1 109 bmi .L_divide_b2 110 tst r1, r0, lsl #2 111 bmi .L_divide_b3 112 tst r1, r0, lsl #3 113 bmi .L_divide_b4 114 tst r1, r0, lsl #4 115 bmi .L_divide_b5 116 tst r1, r0, lsl #5 117 bmi .L_divide_b6 118 tst r1, r0, lsl #6 119 bmi .L_divide_b7 120 tst r1, r0, lsl #7 121 bmi .L_divide_b8 122 tst r1, r0, lsl #8 123 bmi .L_divide_b9 124 tst r1, r0, lsl #9 125 bmi .L_divide_b10 126 tst r1, r0, lsl #10 127 bmi .L_divide_b11 128 tst r1, r0, lsl #11 129 bmi .L_divide_b12 130 tst r1, r0, lsl #12 131 bmi .L_divide_b13 132 tst r1, r0, lsl #13 133 bmi .L_divide_b14 134 tst r1, r0, lsl #14 135 bmi .L_divide_b15 136 tst r1, r0, lsl #15 137 bmi .L_divide_b16 138 tst r1, r0, lsl #16 139 bmi .L_divide_b17 140 tst r1, r0, lsl #17 141 bmi .L_divide_b18 142 tst r1, r0, lsl #18 143 bmi .L_divide_b19 144 tst r1, r0, lsl #19 145 bmi .L_divide_b20 146 tst r1, r0, lsl #20 147 bmi .L_divide_b21 148 tst r1, r0, lsl #21 149 bmi .L_divide_b22 150 tst r1, r0, lsl #22 151 bmi .L_divide_b23 152 tst r1, r0, lsl #23 153 bmi .L_divide_b24 154 tst r1, r0, lsl #24 155 bmi .L_divide_b25 156 tst r1, r0, lsl #25 157 bmi .L_divide_b26 158 tst r1, r0, lsl #26 159 bmi .L_divide_b27 160 tst r1, r0, lsl #27 161 bmi .L_divide_b28 162 tst r1, r0, lsl #28 163 bmi .L_divide_b29 164 tst r1, r0, lsl #29 165 bmi .L_divide_b30 166 tst r1, r0, lsl #30 167 bmi .L_divide_b31 168/* 169 * instead of: 170 * tst r1, r0, lsl #31 171 * bmi .L_divide_b32 172 */ 173 b .L_divide_b32 174 175.L_old_code: 176 cmp r1, r0 177 bcc .L_divide_b0 178 cmp r1, r0, lsl #1 179 bcc .L_divide_b1 180 cmp r1, r0, lsl #2 181 bcc .L_divide_b2 182 cmp r1, r0, lsl #3 183 bcc .L_divide_b3 184 cmp r1, r0, lsl #4 185 bcc .L_divide_b4 186 cmp r1, r0, lsl #5 187 bcc .L_divide_b5 188 cmp r1, r0, lsl #6 189 bcc .L_divide_b6 190 cmp r1, r0, lsl #7 191 bcc .L_divide_b7 192 cmp r1, r0, lsl #8 193 bcc .L_divide_b8 194 cmp r1, r0, lsl #9 195 bcc .L_divide_b9 196 cmp r1, r0, lsl #10 197 bcc .L_divide_b10 198 cmp r1, r0, lsl #11 199 bcc .L_divide_b11 200 cmp r1, r0, lsl #12 201 bcc .L_divide_b12 202 cmp r1, r0, lsl #13 203 bcc .L_divide_b13 204 cmp r1, r0, lsl #14 205 bcc .L_divide_b14 206 cmp r1, r0, lsl #15 207 bcc .L_divide_b15 208 cmp r1, r0, lsl #16 209 bcc .L_divide_b16 210 cmp r1, r0, lsl #17 211 bcc .L_divide_b17 212 cmp r1, r0, lsl #18 213 bcc .L_divide_b18 214 cmp r1, r0, lsl #19 215 bcc .L_divide_b19 216 cmp r1, r0, lsl #20 217 bcc .L_divide_b20 218 cmp r1, r0, lsl #21 219 bcc .L_divide_b21 220 cmp r1, r0, lsl #22 221 bcc .L_divide_b22 222 cmp r1, r0, lsl #23 223 bcc .L_divide_b23 224 cmp r1, r0, lsl #24 225 bcc .L_divide_b24 226 cmp r1, r0, lsl #25 227 bcc .L_divide_b25 228 cmp r1, r0, lsl #26 229 bcc .L_divide_b26 230 cmp r1, r0, lsl #27 231 bcc .L_divide_b27 232 cmp r1, r0, lsl #28 233 bcc .L_divide_b28 234 cmp r1, r0, lsl #29 235 bcc .L_divide_b29 236 cmp r1, r0, lsl #30 237 bcc .L_divide_b30 238.L_divide_b32: 239 cmp r1, r0, lsl #31 240 subhs r1, r1,r0, lsl #31 241 addhs r3, r3,r2, lsl #31 242.L_divide_b31: 243 cmp r1, r0, lsl #30 244 subhs r1, r1,r0, lsl #30 245 addhs r3, r3,r2, lsl #30 246.L_divide_b30: 247 cmp r1, r0, lsl #29 248 subhs r1, r1,r0, lsl #29 249 addhs r3, r3,r2, lsl #29 250.L_divide_b29: 251 cmp r1, r0, lsl #28 252 subhs r1, r1,r0, lsl #28 253 addhs r3, r3,r2, lsl #28 254.L_divide_b28: 255 cmp r1, r0, lsl #27 256 subhs r1, r1,r0, lsl #27 257 addhs r3, r3,r2, lsl #27 258.L_divide_b27: 259 cmp r1, r0, lsl #26 260 subhs r1, r1,r0, lsl #26 261 addhs r3, r3,r2, lsl #26 262.L_divide_b26: 263 cmp r1, r0, lsl #25 264 subhs r1, r1,r0, lsl #25 265 addhs r3, r3,r2, lsl #25 266.L_divide_b25: 267 cmp r1, r0, lsl #24 268 subhs r1, r1,r0, lsl #24 269 addhs r3, r3,r2, lsl #24 270.L_divide_b24: 271 cmp r1, r0, lsl #23 272 subhs r1, r1,r0, lsl #23 273 addhs r3, r3,r2, lsl #23 274.L_divide_b23: 275 cmp r1, r0, lsl #22 276 subhs r1, r1,r0, lsl #22 277 addhs r3, r3,r2, lsl #22 278.L_divide_b22: 279 cmp r1, r0, lsl #21 280 subhs r1, r1,r0, lsl #21 281 addhs r3, r3,r2, lsl #21 282.L_divide_b21: 283 cmp r1, r0, lsl #20 284 subhs r1, r1,r0, lsl #20 285 addhs r3, r3,r2, lsl #20 286.L_divide_b20: 287 cmp r1, r0, lsl #19 288 subhs r1, r1,r0, lsl #19 289 addhs r3, r3,r2, lsl #19 290.L_divide_b19: 291 cmp r1, r0, lsl #18 292 subhs r1, r1,r0, lsl #18 293 addhs r3, r3,r2, lsl #18 294.L_divide_b18: 295 cmp r1, r0, lsl #17 296 subhs r1, r1,r0, lsl #17 297 addhs r3, r3,r2, lsl #17 298.L_divide_b17: 299 cmp r1, r0, lsl #16 300 subhs r1, r1,r0, lsl #16 301 addhs r3, r3,r2, lsl #16 302.L_divide_b16: 303 cmp r1, r0, lsl #15 304 subhs r1, r1,r0, lsl #15 305 addhs r3, r3,r2, lsl #15 306.L_divide_b15: 307 cmp r1, r0, lsl #14 308 subhs r1, r1,r0, lsl #14 309 addhs r3, r3,r2, lsl #14 310.L_divide_b14: 311 cmp r1, r0, lsl #13 312 subhs r1, r1,r0, lsl #13 313 addhs r3, r3,r2, lsl #13 314.L_divide_b13: 315 cmp r1, r0, lsl #12 316 subhs r1, r1,r0, lsl #12 317 addhs r3, r3,r2, lsl #12 318.L_divide_b12: 319 cmp r1, r0, lsl #11 320 subhs r1, r1,r0, lsl #11 321 addhs r3, r3,r2, lsl #11 322.L_divide_b11: 323 cmp r1, r0, lsl #10 324 subhs r1, r1,r0, lsl #10 325 addhs r3, r3,r2, lsl #10 326.L_divide_b10: 327 cmp r1, r0, lsl #9 328 subhs r1, r1,r0, lsl #9 329 addhs r3, r3,r2, lsl #9 330.L_divide_b9: 331 cmp r1, r0, lsl #8 332 subhs r1, r1,r0, lsl #8 333 addhs r3, r3,r2, lsl #8 334.L_divide_b8: 335 cmp r1, r0, lsl #7 336 subhs r1, r1,r0, lsl #7 337 addhs r3, r3,r2, lsl #7 338.L_divide_b7: 339 cmp r1, r0, lsl #6 340 subhs r1, r1,r0, lsl #6 341 addhs r3, r3,r2, lsl #6 342.L_divide_b6: 343 cmp r1, r0, lsl #5 344 subhs r1, r1,r0, lsl #5 345 addhs r3, r3,r2, lsl #5 346.L_divide_b5: 347 cmp r1, r0, lsl #4 348 subhs r1, r1,r0, lsl #4 349 addhs r3, r3,r2, lsl #4 350.L_divide_b4: 351 cmp r1, r0, lsl #3 352 subhs r1, r1,r0, lsl #3 353 addhs r3, r3,r2, lsl #3 354.L_divide_b3: 355 cmp r1, r0, lsl #2 356 subhs r1, r1,r0, lsl #2 357 addhs r3, r3,r2, lsl #2 358.L_divide_b2: 359 cmp r1, r0, lsl #1 360 subhs r1, r1,r0, lsl #1 361 addhs r3, r3,r2, lsl #1 362.L_divide_b1: 363 cmp r1, r0 364 subhs r1, r1, r0 365 addhs r3, r3, r2 366.L_divide_b0: 367 368 tst ip, #0x20000000 369 bne .L_udivide_l1 370 mov r0, r3 371 cmp ip, #0 372 rsbmi r1, r1, #0 373 movs ip, ip, lsl #1 374 bicmi r0, r0, #0x80000000 /* Fix incase we divided 0x80000000 */ 375 rsbmi r0, r0, #0 376 RET 377 378.L_udivide_l1: 379 tst ip, #0x10000000 380 mov r1, r1, lsl #1 381 orrne r1, r1, #1 382 mov r3, r3, lsl #1 383 cmp r1, r0 384 subhs r1, r1, r0 385 addhs r3, r3, r2 386 mov r0, r3 387 RET
| 76 77ENTRY(__divsi3) 78.L_divide: /* r0 = r0 / r1; r1 = r0 % r1 */ 79 eor r0, r1, r0 80 eor r1, r0, r1 81 eor r0, r1, r0 82 /* r0 = r1 / r0; r1 = r1 % r0 */ 83 cmp r0, #1 84 bcc .L_overflow 85 beq .L_divide_l0 86 ands ip, r0, #0x80000000 87 rsbmi r0, r0, #0 88 ands r2, r1, #0x80000000 89 eor ip, ip, r2 90 rsbmi r1, r1, #0 91 orr ip, r2, ip, lsr #1 /* ip bit 0x40000000 = -ve division */ 92 /* ip bit 0x80000000 = -ve remainder */ 93 94.L_divide_l1: 95 mov r2, #1 96 mov r3, #0 97 98 /* 99 * If the highest bit of the dividend is set, we have to be 100 * careful when shifting the divisor. Test this. 101 */ 102 movs r1,r1 103 bpl .L_old_code 104 105 /* 106 * At this point, the highest bit of r1 is known to be set. 107 * We abuse this below in the tst instructions. 108 */ 109 tst r1, r0 /*, lsl #0 */ 110 bmi .L_divide_b1 111 tst r1, r0, lsl #1 112 bmi .L_divide_b2 113 tst r1, r0, lsl #2 114 bmi .L_divide_b3 115 tst r1, r0, lsl #3 116 bmi .L_divide_b4 117 tst r1, r0, lsl #4 118 bmi .L_divide_b5 119 tst r1, r0, lsl #5 120 bmi .L_divide_b6 121 tst r1, r0, lsl #6 122 bmi .L_divide_b7 123 tst r1, r0, lsl #7 124 bmi .L_divide_b8 125 tst r1, r0, lsl #8 126 bmi .L_divide_b9 127 tst r1, r0, lsl #9 128 bmi .L_divide_b10 129 tst r1, r0, lsl #10 130 bmi .L_divide_b11 131 tst r1, r0, lsl #11 132 bmi .L_divide_b12 133 tst r1, r0, lsl #12 134 bmi .L_divide_b13 135 tst r1, r0, lsl #13 136 bmi .L_divide_b14 137 tst r1, r0, lsl #14 138 bmi .L_divide_b15 139 tst r1, r0, lsl #15 140 bmi .L_divide_b16 141 tst r1, r0, lsl #16 142 bmi .L_divide_b17 143 tst r1, r0, lsl #17 144 bmi .L_divide_b18 145 tst r1, r0, lsl #18 146 bmi .L_divide_b19 147 tst r1, r0, lsl #19 148 bmi .L_divide_b20 149 tst r1, r0, lsl #20 150 bmi .L_divide_b21 151 tst r1, r0, lsl #21 152 bmi .L_divide_b22 153 tst r1, r0, lsl #22 154 bmi .L_divide_b23 155 tst r1, r0, lsl #23 156 bmi .L_divide_b24 157 tst r1, r0, lsl #24 158 bmi .L_divide_b25 159 tst r1, r0, lsl #25 160 bmi .L_divide_b26 161 tst r1, r0, lsl #26 162 bmi .L_divide_b27 163 tst r1, r0, lsl #27 164 bmi .L_divide_b28 165 tst r1, r0, lsl #28 166 bmi .L_divide_b29 167 tst r1, r0, lsl #29 168 bmi .L_divide_b30 169 tst r1, r0, lsl #30 170 bmi .L_divide_b31 171/* 172 * instead of: 173 * tst r1, r0, lsl #31 174 * bmi .L_divide_b32 175 */ 176 b .L_divide_b32 177 178.L_old_code: 179 cmp r1, r0 180 bcc .L_divide_b0 181 cmp r1, r0, lsl #1 182 bcc .L_divide_b1 183 cmp r1, r0, lsl #2 184 bcc .L_divide_b2 185 cmp r1, r0, lsl #3 186 bcc .L_divide_b3 187 cmp r1, r0, lsl #4 188 bcc .L_divide_b4 189 cmp r1, r0, lsl #5 190 bcc .L_divide_b5 191 cmp r1, r0, lsl #6 192 bcc .L_divide_b6 193 cmp r1, r0, lsl #7 194 bcc .L_divide_b7 195 cmp r1, r0, lsl #8 196 bcc .L_divide_b8 197 cmp r1, r0, lsl #9 198 bcc .L_divide_b9 199 cmp r1, r0, lsl #10 200 bcc .L_divide_b10 201 cmp r1, r0, lsl #11 202 bcc .L_divide_b11 203 cmp r1, r0, lsl #12 204 bcc .L_divide_b12 205 cmp r1, r0, lsl #13 206 bcc .L_divide_b13 207 cmp r1, r0, lsl #14 208 bcc .L_divide_b14 209 cmp r1, r0, lsl #15 210 bcc .L_divide_b15 211 cmp r1, r0, lsl #16 212 bcc .L_divide_b16 213 cmp r1, r0, lsl #17 214 bcc .L_divide_b17 215 cmp r1, r0, lsl #18 216 bcc .L_divide_b18 217 cmp r1, r0, lsl #19 218 bcc .L_divide_b19 219 cmp r1, r0, lsl #20 220 bcc .L_divide_b20 221 cmp r1, r0, lsl #21 222 bcc .L_divide_b21 223 cmp r1, r0, lsl #22 224 bcc .L_divide_b22 225 cmp r1, r0, lsl #23 226 bcc .L_divide_b23 227 cmp r1, r0, lsl #24 228 bcc .L_divide_b24 229 cmp r1, r0, lsl #25 230 bcc .L_divide_b25 231 cmp r1, r0, lsl #26 232 bcc .L_divide_b26 233 cmp r1, r0, lsl #27 234 bcc .L_divide_b27 235 cmp r1, r0, lsl #28 236 bcc .L_divide_b28 237 cmp r1, r0, lsl #29 238 bcc .L_divide_b29 239 cmp r1, r0, lsl #30 240 bcc .L_divide_b30 241.L_divide_b32: 242 cmp r1, r0, lsl #31 243 subhs r1, r1,r0, lsl #31 244 addhs r3, r3,r2, lsl #31 245.L_divide_b31: 246 cmp r1, r0, lsl #30 247 subhs r1, r1,r0, lsl #30 248 addhs r3, r3,r2, lsl #30 249.L_divide_b30: 250 cmp r1, r0, lsl #29 251 subhs r1, r1,r0, lsl #29 252 addhs r3, r3,r2, lsl #29 253.L_divide_b29: 254 cmp r1, r0, lsl #28 255 subhs r1, r1,r0, lsl #28 256 addhs r3, r3,r2, lsl #28 257.L_divide_b28: 258 cmp r1, r0, lsl #27 259 subhs r1, r1,r0, lsl #27 260 addhs r3, r3,r2, lsl #27 261.L_divide_b27: 262 cmp r1, r0, lsl #26 263 subhs r1, r1,r0, lsl #26 264 addhs r3, r3,r2, lsl #26 265.L_divide_b26: 266 cmp r1, r0, lsl #25 267 subhs r1, r1,r0, lsl #25 268 addhs r3, r3,r2, lsl #25 269.L_divide_b25: 270 cmp r1, r0, lsl #24 271 subhs r1, r1,r0, lsl #24 272 addhs r3, r3,r2, lsl #24 273.L_divide_b24: 274 cmp r1, r0, lsl #23 275 subhs r1, r1,r0, lsl #23 276 addhs r3, r3,r2, lsl #23 277.L_divide_b23: 278 cmp r1, r0, lsl #22 279 subhs r1, r1,r0, lsl #22 280 addhs r3, r3,r2, lsl #22 281.L_divide_b22: 282 cmp r1, r0, lsl #21 283 subhs r1, r1,r0, lsl #21 284 addhs r3, r3,r2, lsl #21 285.L_divide_b21: 286 cmp r1, r0, lsl #20 287 subhs r1, r1,r0, lsl #20 288 addhs r3, r3,r2, lsl #20 289.L_divide_b20: 290 cmp r1, r0, lsl #19 291 subhs r1, r1,r0, lsl #19 292 addhs r3, r3,r2, lsl #19 293.L_divide_b19: 294 cmp r1, r0, lsl #18 295 subhs r1, r1,r0, lsl #18 296 addhs r3, r3,r2, lsl #18 297.L_divide_b18: 298 cmp r1, r0, lsl #17 299 subhs r1, r1,r0, lsl #17 300 addhs r3, r3,r2, lsl #17 301.L_divide_b17: 302 cmp r1, r0, lsl #16 303 subhs r1, r1,r0, lsl #16 304 addhs r3, r3,r2, lsl #16 305.L_divide_b16: 306 cmp r1, r0, lsl #15 307 subhs r1, r1,r0, lsl #15 308 addhs r3, r3,r2, lsl #15 309.L_divide_b15: 310 cmp r1, r0, lsl #14 311 subhs r1, r1,r0, lsl #14 312 addhs r3, r3,r2, lsl #14 313.L_divide_b14: 314 cmp r1, r0, lsl #13 315 subhs r1, r1,r0, lsl #13 316 addhs r3, r3,r2, lsl #13 317.L_divide_b13: 318 cmp r1, r0, lsl #12 319 subhs r1, r1,r0, lsl #12 320 addhs r3, r3,r2, lsl #12 321.L_divide_b12: 322 cmp r1, r0, lsl #11 323 subhs r1, r1,r0, lsl #11 324 addhs r3, r3,r2, lsl #11 325.L_divide_b11: 326 cmp r1, r0, lsl #10 327 subhs r1, r1,r0, lsl #10 328 addhs r3, r3,r2, lsl #10 329.L_divide_b10: 330 cmp r1, r0, lsl #9 331 subhs r1, r1,r0, lsl #9 332 addhs r3, r3,r2, lsl #9 333.L_divide_b9: 334 cmp r1, r0, lsl #8 335 subhs r1, r1,r0, lsl #8 336 addhs r3, r3,r2, lsl #8 337.L_divide_b8: 338 cmp r1, r0, lsl #7 339 subhs r1, r1,r0, lsl #7 340 addhs r3, r3,r2, lsl #7 341.L_divide_b7: 342 cmp r1, r0, lsl #6 343 subhs r1, r1,r0, lsl #6 344 addhs r3, r3,r2, lsl #6 345.L_divide_b6: 346 cmp r1, r0, lsl #5 347 subhs r1, r1,r0, lsl #5 348 addhs r3, r3,r2, lsl #5 349.L_divide_b5: 350 cmp r1, r0, lsl #4 351 subhs r1, r1,r0, lsl #4 352 addhs r3, r3,r2, lsl #4 353.L_divide_b4: 354 cmp r1, r0, lsl #3 355 subhs r1, r1,r0, lsl #3 356 addhs r3, r3,r2, lsl #3 357.L_divide_b3: 358 cmp r1, r0, lsl #2 359 subhs r1, r1,r0, lsl #2 360 addhs r3, r3,r2, lsl #2 361.L_divide_b2: 362 cmp r1, r0, lsl #1 363 subhs r1, r1,r0, lsl #1 364 addhs r3, r3,r2, lsl #1 365.L_divide_b1: 366 cmp r1, r0 367 subhs r1, r1, r0 368 addhs r3, r3, r2 369.L_divide_b0: 370 371 tst ip, #0x20000000 372 bne .L_udivide_l1 373 mov r0, r3 374 cmp ip, #0 375 rsbmi r1, r1, #0 376 movs ip, ip, lsl #1 377 bicmi r0, r0, #0x80000000 /* Fix incase we divided 0x80000000 */ 378 rsbmi r0, r0, #0 379 RET 380 381.L_udivide_l1: 382 tst ip, #0x10000000 383 mov r1, r1, lsl #1 384 orrne r1, r1, #1 385 mov r3, r3, lsl #1 386 cmp r1, r0 387 subhs r1, r1, r0 388 addhs r3, r3, r2 389 mov r0, r3 390 RET
|