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