src/lj_vm.h

   1 /*
   2 ** Assembler VM interface definitions.
   3 ** Copyright (C) 2005-2014 Mike Pall. See Copyright Notice in luajit.h
   4 */
   5
   6 #ifndef _LJ_VM_H
   7 #define _LJ_VM_H
   8
   9 #include "lj_obj.h"
  10
  11 /* Entry points for ASM parts of VM. */
  12 LJ_ASMF void lj_vm_call(lua_State *L, TValue *base, int nres1);
  13 LJ_ASMF int lj_vm_pcall(lua_State *L, TValue *base, int nres1, ptrdiff_t ef);
  14 typedef TValue *(*lua_CPFunction)(lua_State *L, lua_CFunction func, void *ud);
  15 LJ_ASMF int lj_vm_cpcall(lua_State *L, lua_CFunction func, void *ud,
  16                          lua_CPFunction cp);
  17 LJ_ASMF int lj_vm_resume(lua_State *L, TValue *base, int nres1, ptrdiff_t ef);
  18 LJ_ASMF_NORET void LJ_FASTCALL lj_vm_unwind_c(void *cframe, int errcode);
  19 LJ_ASMF_NORET void LJ_FASTCALL lj_vm_unwind_ff(void *cframe);
  20 LJ_ASMF void lj_vm_unwind_c_eh(void);
  21 LJ_ASMF void lj_vm_unwind_ff_eh(void);
  22 #if LJ_TARGET_X86ORX64
  23 LJ_ASMF void lj_vm_unwind_rethrow(void);
  24 #endif
  25
  26 /* Miscellaneous functions. */
  27 #if LJ_TARGET_X86ORX64
  28 LJ_ASMF int lj_vm_cpuid(uint32_t f, uint32_t res[4]);
  29 #endif
  30 #if LJ_TARGET_PPC
  31 void lj_vm_cachesync(void *start, void *end);
  32 #endif
  33 LJ_ASMF double lj_vm_foldarith(double x, double y, int op);
  34 #if LJ_HASJIT
  35 LJ_ASMF double lj_vm_foldfpm(double x, int op);
  36 #endif
  37 #if !LJ_ARCH_HASFPU
  38 /* Declared in lj_obj.h: LJ_ASMF int32_t lj_vm_tobit(double x); */
  39 #endif
  40
  41 /* Dispatch targets for recording and hooks. */
  42 LJ_ASMF void lj_vm_record(void);
  43 LJ_ASMF void lj_vm_inshook(void);
  44 LJ_ASMF void lj_vm_rethook(void);
  45 LJ_ASMF void lj_vm_callhook(void);
  46 LJ_ASMF void lj_vm_profhook(void);
  47
  48 /* Trace exit handling. */
  49 LJ_ASMF void lj_vm_exit_handler(void);
  50 LJ_ASMF void lj_vm_exit_interp(void);
  51
  52 /* Internal math helper functions. */
  53 #if LJ_TARGET_PPC
  54 #define lj_vm_floor     floor
  55 #define lj_vm_ceil      ceil
  56 #else
  57 LJ_ASMF double lj_vm_floor(double);
  58 #if !LJ_TARGET_X86ORX64
  59 LJ_ASMF double lj_vm_ceil(double);
  60 #endif
  61 #if LJ_TARGET_ARM
  62 LJ_ASMF double lj_vm_floor_sf(double);
  63 LJ_ASMF double lj_vm_ceil_sf(double);
  64 #endif
  65 #endif
  66 #if defined(LUAJIT_NO_LOG2) || LJ_TARGET_X86ORX64
  67 LJ_ASMF double lj_vm_log2(double);
  68 #else
  69 #define lj_vm_log2      log2
  70 #endif
  71
  72 #if LJ_HASJIT
  73 #if LJ_TARGET_X86ORX64
  74 LJ_ASMF void lj_vm_floor_sse(void);
  75 LJ_ASMF void lj_vm_ceil_sse(void);
  76 LJ_ASMF void lj_vm_trunc_sse(void);
  77 LJ_ASMF void lj_vm_exp_x87(void);
  78 LJ_ASMF void lj_vm_exp2_x87(void);
  79 LJ_ASMF void lj_vm_pow_sse(void);
  80 LJ_ASMF void lj_vm_powi_sse(void);
  81 #else
  82 #if LJ_TARGET_PPC
  83 #define lj_vm_trunc     trunc
  84 #else
  85 LJ_ASMF double lj_vm_trunc(double);
  86 #if LJ_TARGET_ARM
  87 LJ_ASMF double lj_vm_trunc_sf(double);
  88 #endif
  89 #endif
  90 LJ_ASMF double lj_vm_powi(double, int32_t);
  91 #ifdef LUAJIT_NO_EXP2
  92 LJ_ASMF double lj_vm_exp2(double);
  93 #else
  94 #define lj_vm_exp2      exp2
  95 #endif
  96 #endif
  97 LJ_ASMF int32_t LJ_FASTCALL lj_vm_modi(int32_t, int32_t);
  98 #if LJ_HASFFI
  99 LJ_ASMF int lj_vm_errno(void);
 100 #endif
 101 #endif
 102
 103 /* Continuations for metamethods. */
 104 LJ_ASMF void lj_cont_cat(void);  /* Continue with concatenation. */
 105 LJ_ASMF void lj_cont_ra(void);  /* Store result in RA from instruction. */
 106 LJ_ASMF void lj_cont_nop(void);  /* Do nothing, just continue execution. */
 107 LJ_ASMF void lj_cont_condt(void);  /* Branch if result is true. */
 108 LJ_ASMF void lj_cont_condf(void);  /* Branch if result is false. */
 109 LJ_ASMF void lj_cont_hook(void);  /* Continue from hook yield. */
 110 LJ_ASMF void lj_cont_stitch(void);  /* Trace stitching. */
 111
 112 enum { LJ_CONT_TAILCALL, LJ_CONT_FFI_CALLBACK };  /* Special continuations. */
 113
 114 /* Start of the ASM code. */
 115 LJ_ASMF char lj_vm_asm_begin[];
 116
 117 /* Bytecode offsets are relative to lj_vm_asm_begin. */
 118 #define makeasmfunc(ofs)        ((ASMFunction)(lj_vm_asm_begin + (ofs)))
 119
 120 #endif