diff options
Diffstat (limited to 'vm/mterp/armv5te/OP_NEW_INSTANCE_JUMBO.S')
| -rw-r--r-- | vm/mterp/armv5te/OP_NEW_INSTANCE_JUMBO.S | 103 |
1 files changed, 103 insertions, 0 deletions
diff --git a/vm/mterp/armv5te/OP_NEW_INSTANCE_JUMBO.S b/vm/mterp/armv5te/OP_NEW_INSTANCE_JUMBO.S new file mode 100644 index 0000000..ce41bf3 --- /dev/null +++ b/vm/mterp/armv5te/OP_NEW_INSTANCE_JUMBO.S @@ -0,0 +1,103 @@ +%verify "executed" +%verify "class not resolved" +%verify "class cannot be resolved" +%verify "class not initialized" +%verify "class fails to initialize" +%verify "class already resolved/initialized" +%verify "class is abstract or interface" +%verify "allocation fails" + /* + * Create a new instance of a class. + */ + /* new-instance/jumbo vBBBB, class@AAAAAAAA */ + FETCH(r0, 1) @ r0<- aaaa (lo) + FETCH(r1, 2) @ r1<- AAAA (hi) + ldr r3, [rSELF, #offThread_methodClassDex] @ r3<- pDvmDex + orr r1, r0, r1, lsl #16 @ r1<- AAAAaaaa + ldr r3, [r3, #offDvmDex_pResClasses] @ r3<- pDvmDex->pResClasses + ldr r0, [r3, r1, lsl #2] @ r0<- resolved class +#if defined(WITH_JIT) + add r10, r3, r1, lsl #2 @ r10<- &resolved_class +#endif + EXPORT_PC() @ req'd for init, resolve, alloc + cmp r0, #0 @ already resolved? + beq .L${opcode}_resolve @ no, resolve it now +.L${opcode}_resolved: @ r0=class + ldrb r1, [r0, #offClassObject_status] @ r1<- ClassStatus enum + cmp r1, #CLASS_INITIALIZED @ has class been initialized? + bne .L${opcode}_needinit @ no, init class now +.L${opcode}_initialized: @ r0=class + mov r1, #ALLOC_DONT_TRACK @ flags for alloc call + bl dvmAllocObject @ r0<- new object + b .L${opcode}_finish @ continue +%break + + .balign 32 @ minimize cache lines +.L${opcode}_finish: @ r0=new object + FETCH(r3, 3) @ r3<- BBBB + cmp r0, #0 @ failed? +#if defined(WITH_JIT) + /* + * The JIT needs the class to be fully resolved before it can + * include this instruction in a trace. + */ + ldrh r1, [rSELF, #offThread_subMode] + beq common_exceptionThrown @ yes, handle the exception + ands r1, #kSubModeJitTraceBuild @ under construction? + bne .L${opcode}_jitCheck +#else + beq common_exceptionThrown @ yes, handle the exception +#endif +.L${opcode}_end: + FETCH_ADVANCE_INST(4) @ advance rPC, load rINST + GET_INST_OPCODE(ip) @ extract opcode from rINST + SET_VREG(r0, r3) @ vBBBB<- r0 + GOTO_OPCODE(ip) @ jump to next instruction + +#if defined(WITH_JIT) + /* + * Check to see if we need to stop the trace building early. + * r0: new object + * r3: vAA + */ +.L${opcode}_jitCheck: + ldr r1, [r10] @ reload resolved class + cmp r1, #0 @ okay? + bne .L${opcode}_end @ yes, finish + mov r9, r0 @ preserve new object + mov r10, r3 @ preserve vAA + mov r0, rSELF + mov r1, rPC + bl dvmJitEndTraceSelect @ (self, pc) + FETCH_ADVANCE_INST(2) @ advance rPC, load rINST + GET_INST_OPCODE(ip) @ extract opcode from rINST + SET_VREG(r9, r10) @ vAA<- new object + GOTO_OPCODE(ip) @ jump to next instruction +#endif + + /* + * Class initialization required. + * + * r0 holds class object + */ +.L${opcode}_needinit: + mov r9, r0 @ save r0 + bl dvmInitClass @ initialize class + cmp r0, #0 @ check boolean result + mov r0, r9 @ restore r0 + bne .L${opcode}_initialized @ success, continue + b common_exceptionThrown @ failed, deal with init exception + + /* + * Resolution required. This is the least-likely path. + * + * r1 holds AAAAAAAA + */ +.L${opcode}_resolve: + ldr r3, [rSELF, #offThread_method] @ r3<- self->method + mov r2, #0 @ r2<- false + ldr r0, [r3, #offMethod_clazz] @ r0<- method->clazz + bl dvmResolveClass @ r0<- resolved ClassObject ptr + cmp r0, #0 @ got null? + bne .L${opcode}_resolved @ no, continue + b common_exceptionThrown @ yes, handle exception |