diff options
Diffstat (limited to 'vm/mterp/x86/OP_INVOKE_DIRECT.S')
-rw-r--r-- | vm/mterp/x86/OP_INVOKE_DIRECT.S | 53 |
1 files changed, 53 insertions, 0 deletions
diff --git a/vm/mterp/x86/OP_INVOKE_DIRECT.S b/vm/mterp/x86/OP_INVOKE_DIRECT.S new file mode 100644 index 0000000..7d27c6f --- /dev/null +++ b/vm/mterp/x86/OP_INVOKE_DIRECT.S @@ -0,0 +1,53 @@ +%default { "isrange":"0", "routine":"NoRange" } +%verify "executed" +%verify "unknown method" + /* + * Handle a direct method call. + * + * (We could defer the "is 'this' pointer null" test to the common + * method invocation code, and use a flag to indicate that static + * calls don't count. If we do this as part of copying the arguments + * out we could avoiding loading the first arg twice.) + * + * for: invoke-direct, invoke-direct/range + */ + /* op vB, {vD, vE, vF, vG, vA}, class@CCCC */ + /* op {vCCCC..v(CCCC+AA-1)}, meth@BBBB */ + movl rSELF,%ecx + movzwl 2(rPC),%eax # eax<- BBBB + movl offThread_methodClassDex(%ecx),%ecx # ecx<- pDvmDex + EXPORT_PC + movl offDvmDex_pResMethods(%ecx),%ecx # ecx<- pDvmDex->pResMethods + movzwl 4(rPC),rIBASE # rIBASE<- GFED or CCCC + movl (%ecx,%eax,4),%eax # eax<- resolved methodToCall + .if (!$isrange) + andl $$0xf,rIBASE # rIBASE<- D (or stays CCCC) + .endif + testl %eax,%eax # already resolved? + GET_VREG_R %ecx rIBASE # ecx<- "this" ptr + je .L${opcode}_resolve # not resolved, do it now +.L${opcode}_finish: + testl %ecx,%ecx # null "this"? + jne common_invokeMethod${routine} # no, continue on + jmp common_errNullObject + + /* + * On entry: + * TMP_SPILL <- "this" register + * Things a bit ugly on this path, but it's the less + * frequent one. We'll have to do some reloading. + */ +.L${opcode}_resolve: + SPILL_TMP1(%ecx) + movl rSELF,%ecx + movl offThread_method(%ecx),%ecx # ecx<- self->method + movzwl 2(rPC),%eax # reference (BBBB or CCCC) + movl offMethod_clazz(%ecx),%ecx # ecx<- method->clazz + movl $$METHOD_DIRECT,OUT_ARG2(%esp) + movl %eax,OUT_ARG1(%esp) + movl %ecx,OUT_ARG0(%esp) + call dvmResolveMethod # eax<- call(clazz, ref, flags) + UNSPILL_TMP1(%ecx) + testl %eax,%eax + jne .L${opcode}_finish + jmp common_exceptionThrown |