1 /* 2 * Long integer shift. This is different from the generic 32/64-bit 3 * binary operations because vAA/vBB are 64-bit but vCC (the shift 4 * distance) is 32-bit. Also, Dalvik requires us to ignore all but the low 5 * 6 bits. 6 */ 7 /* shr-long vAA:vBB(rARG1:rARG0), vCC(a2) - result in (rRESULT1:rRESULT0) */ 8 sra rRESULT1, rARG1, a2 # rhi<- ahi >> (shift&31) 9 srl rRESULT0, rARG0, a2 # rlo<- alo >> (shift&31) 10 sra a3, rARG1, 31 # a3<- sign(ah) 11 not rARG0, a2 # alo<- 31-shift (shift is 5b) 12 sll rARG1, 1 13 sll rARG1, rARG0 # ahi<- ahi << (32-(shift&31)) 14 or rRESULT0, rARG1 # rlo<- rlo | ahi 15 andi a2, 0x20 # shift & 0x20 16 movn rRESULT0, rRESULT1, a2 # rlo<- rhi (if shift&0x20) 17 movn rRESULT1, a3, a2 # rhi<- sign(ahi) (if shift&0x20) 18 RETURN 19
