1 %verify "executed" 2 %verify "null object" 3 %verify "field already resolved" 4 %verify "field not yet resolved" 5 %verify "field cannot be resolved" 6 /* iput-wide vA, vB, field@CCCC */ 7 mov r0, rINST, lsr #12 @ r0<- B 8 ldr r3, [rGLUE, #offGlue_methodClassDex] @ r3<- DvmDex 9 FETCH(r1, 1) @ r1<- field ref CCCC 10 ldr r2, [r3, #offDvmDex_pResFields] @ r2<- pResFields 11 GET_VREG(r9, r0) @ r9<- fp[B], the object pointer 12 ldr r0, [r2, r1, lsl #2] @ r0<- resolved InstField ptr 13 cmp r0, #0 @ is resolved entry null? 14 bne .L${opcode}_finish @ no, already resolved 15 8: ldr r2, [rGLUE, #offGlue_method] @ r2<- current method 16 EXPORT_PC() @ resolve() could throw 17 ldr r0, [r2, #offMethod_clazz] @ r0<- method->clazz 18 bl dvmResolveInstField @ r0<- resolved InstField ptr 19 cmp r0, #0 @ success? 20 bne .L${opcode}_finish @ yes, finish up 21 b common_exceptionThrown 22 %break 23 24 /* 25 * Currently: 26 * r0 holds resolved field 27 * r9 holds object 28 */ 29 .L${opcode}_finish: 30 ubfx r2, rINST, #8, #4 @ r2<- A 31 cmp r9, #0 @ check object for null 32 ldr r3, [r0, #offInstField_byteOffset] @ r3<- byte offset of field 33 add r2, rFP, r2, lsl #2 @ r3<- &fp[A] 34 beq common_errNullObject @ object was null 35 FETCH_ADVANCE_INST(2) @ advance rPC, load rINST 36 ldmia r2, {r0-r1} @ r0/r1<- fp[A] 37 GET_INST_OPCODE(ip) @ extract opcode from rINST 38 strd r0, [r9, r3] @ obj.field (64 bits, aligned)<- r0 39 GOTO_OPCODE(ip) @ jump to next instruction 40
