OP_IGET_JUMBO.S revision a8b91c52fd8a90b784835dfe1f8898035266c4dd
1%default { "load":"lw", "barrier":" # noop", "sqnum":"0" } 2%verify "executed" 3%verify "null object" 4%verify "field already resolved" 5%verify "field not yet resolved" 6%verify "field cannot be resolved" 7 /* 8 * Jumbo 32-bit instance field get. 9 * 10 * for: iget/jumbo, iget-object/jumbo, iget-boolean/jumbo, iget-byte/jumbo, 11 * iget-char/jumbo, iget-short/jumbo 12 */ 13 /* exop vBBBB, vCCCC, field@AAAAAAAA */ 14 FETCH(a1, 1) # a1<- aaaa (lo) 15 FETCH(a2, 2) # a2<- AAAA (hi) 16 FETCH(a0, 4) # a0<- CCCC 17 LOAD_rSELF_methodClassDex(a3) # a3 <- DvmDex 18 sll a2,a2,16 19 or a1, a1, a2 # a1<- AAAAaaaa 20 LOAD_base_offDvmDex_pResFields(a2, a3) # a2 <- pDvmDex->pResFields 21 GET_VREG(rOBJ, a0) # rOBJ <- fp[B], the object pointer 22 LOAD_eas2(a0, a2, a1) # a0 <- resolved InstField ptr 23 # is resolved entry null? 24 bnez a0, .L${opcode}_finish # no, already resolved 25 LOAD_rSELF_method(a2) # a2 <- current method 26 EXPORT_PC() # resolve() could throw 27 LOAD_base_offMethod_clazz(a0, a2) # a0 <- method->clazz 28 JAL(dvmResolveInstField) # v0 <- resolved InstField ptr 29 b .L${opcode}_resolved # resolved, continue 30 31%break 32 33.L${opcode}_resolved: 34 # test results 35 move a0, v0 36 beqz a0,common_exceptionThrown 37 /* 38 * Currently: 39 * v0 holds resolved field 40 * rOBJ holds object (caller saved) 41 */ 42.L${opcode}_finish: 43 #BAL(common_squeak${sqnum}) 44 LOAD_base_offInstField_byteOffset(a3, a0) # a3 <- byte offset of field 45 # check object for null 46 beqz rOBJ, common_errNullObject # object was null 47 addu a3, a3, rOBJ # form address 48 $load a0, (a3) # a0 <- obj.field (8/16/32 bits) 49 $barrier # acquiring load 50 FETCH(a2, 3) # a2<- BBBB 51 FETCH_ADVANCE_INST(5) # advance rPC, load rINST 52 SET_VREG(a0, a2) # fp[BBBB]<- a0 53 GET_INST_OPCODE(t0) # extract opcode from rINST 54 GOTO_OPCODE(t0) # jump to next instruction 55 56