diff options
Diffstat (limited to 'vm/mterp/armv4t/OP_SPUT_WIDE.S')
| -rw-r--r-- | vm/mterp/armv4t/OP_SPUT_WIDE.S | 46 |
1 files changed, 46 insertions, 0 deletions
diff --git a/vm/mterp/armv4t/OP_SPUT_WIDE.S b/vm/mterp/armv4t/OP_SPUT_WIDE.S new file mode 100644 index 0000000..a67e2d8 --- /dev/null +++ b/vm/mterp/armv4t/OP_SPUT_WIDE.S @@ -0,0 +1,46 @@ +%default {"volatile":"0"} +%verify "executed" +%verify "field already resolved" +%verify "field not yet resolved" +%verify "field cannot be resolved" + /* + * 64-bit SPUT handler. + */ + /* sput-wide vAA, field@BBBB */ + ldr r0, [rGLUE, #offGlue_methodClassDex] @ r0<- DvmDex + FETCH(r1, 1) @ r1<- field ref BBBB + ldr r0, [r0, #offDvmDex_pResFields] @ r0<- dvmDex->pResFields + mov r9, rINST, lsr #8 @ r9<- AA + ldr r2, [r0, r1, lsl #2] @ r2<- resolved StaticField ptr + add r9, rFP, r9, lsl #2 @ r9<- &fp[AA] + cmp r2, #0 @ is resolved entry null? + beq .L${opcode}_resolve @ yes, do resolve +.L${opcode}_finish: @ field ptr in r2, AA in r9 + FETCH_ADVANCE_INST(2) @ advance rPC, load rINST + ldmia r9, {r0-r1} @ r0/r1<- vAA/vAA+1 + GET_INST_OPCODE(r10) @ extract opcode from rINST + add r2, r2, #offStaticField_value @ r2<- pointer to data + .if $volatile + bl dvmQuasiAtomicSwap64 @ stores r0/r1 into addr r2 + .else + stmia r2, {r0-r1} @ field<- vAA/vAA+1 + .endif + GOTO_OPCODE(r10) @ jump to next instruction +%break + + /* + * Continuation if the field has not yet been resolved. + * r1: BBBB field ref + * r9: &fp[AA] + * + * Returns StaticField pointer in r2. + */ +.L${opcode}_resolve: + ldr r2, [rGLUE, #offGlue_method] @ r2<- current method + EXPORT_PC() @ resolve() could throw, so export now + ldr r0, [r2, #offMethod_clazz] @ r0<- method->clazz + bl dvmResolveStaticField @ r0<- resolved StaticField ptr + cmp r0, #0 @ success? + mov r2, r0 @ copy to r2 + bne .L${opcode}_finish @ yes, finish + b common_exceptionThrown @ no, handle exception |