// Call handlers: flexible map of call targets to arbitrary handling code
//
// Each handler needs DEF_CALL_HANDLER and SETUP_CALL_HANDLER
//

typedef std::string (JSWriter::*CallHandler)(const Instruction*, std::string Name, int NumArgs);
typedef std::map<std::string, CallHandler> CallHandlerMap;
CallHandlerMap CallHandlers;

// Definitions

unsigned getNumArgOperands(const Instruction *I) {
  return ImmutableCallSite(I).arg_size();
}

const Value *getActuallyCalledValue(const Instruction *I) {
  const Value *CV = ImmutableCallSite(I).getCalledValue();

  // if the called value is a bitcast of a function, then we just call it directly, properly
  // for example, extern void x() in C will turn into void x(...) in LLVM IR, then the IR bitcasts
  // it to the proper form right before the call. this both causes an unnecessary indirect
  // call, and it is done with the wrong type. TODO: don't even put it into the function table
  if (const Function *F = dyn_cast<const Function>(CV->stripPointerCasts())) {
    CV = F;
  }
  return CV;
}

#define DEF_CALL_HANDLER(Ident, Code) \
  std::string CH_##Ident(const Instruction *CI, std::string Name, int NumArgs=-1) { Code }

DEF_CALL_HANDLER(__default__, {
  if (!CI) return ""; // we are just called from a handler that was called from getFunctionIndex, only to ensure the handler was run at least once
  const Value *CV = getActuallyCalledValue(CI);
  bool NeedCasts = true;
  FunctionType *FT;
  bool Invoke = false;
  if (InvokeState == 1) {
    InvokeState = 2;
    Invoke = true;
  }
  std::string Sig;
  const Function *F = dyn_cast<const Function>(CV);
  if (F) {
    NeedCasts = F->isDeclaration(); // if ffi call, need casts
    FT = F->getFunctionType();
  } else {
    FT = dyn_cast<FunctionType>(dyn_cast<PointerType>(CV->getType())->getElementType());
    if (isAbsolute(CV->stripPointerCasts())) {
      Name = "abort /* segfault, call an absolute addr */ ";
    } else {
      // function pointer call
      ensureFunctionTable(FT);
      if (!Invoke) {
        Sig = getFunctionSignature(FT, &Name);
        Name = std::string("FUNCTION_TABLE_") + Sig + "[" + Name + " & #FM_" + Sig + "#]";
        NeedCasts = false; // function table call, so stays in asm module
      }
    }
  }

  bool ForcedNumArgs = NumArgs != -1;
  if (!ForcedNumArgs) NumArgs = getNumArgOperands(CI);

  if (!FT->isVarArg() && !ForcedNumArgs) {
    int TypeNumArgs = FT->getNumParams();
    if (TypeNumArgs != NumArgs) {
      if (EmscriptenAssertions) prettyWarning() << "unexpected number of arguments " << utostr(NumArgs) << " in call to '" << F->getName() << "', should be " << utostr(TypeNumArgs) << "\n";
      if (NumArgs > TypeNumArgs) NumArgs = TypeNumArgs; // lop off the extra params that will not be used and just break validation
    }
    if (EmscriptenAssertions) {
      for (int i = 0; i < std::min(TypeNumArgs, NumArgs); i++) {
        Type *TypeType = FT->getParamType(i);
        Type *ActualType = CI->getOperand(i)->getType();
        if (getFunctionSignatureLetter(TypeType) != getFunctionSignatureLetter(ActualType)) {
          prettyWarning() << "unexpected argument type " << *ActualType << " at index " << utostr(i) << " in call to '" << F->getName() << "', should be " << *TypeType << "\n";
        }
      }
    }
  }
  if (EmscriptenAssertions) {
    Type *TypeType = FT->getReturnType();
    Type *ActualType = CI->getType();
    if (getFunctionSignatureLetter(TypeType) != getFunctionSignatureLetter(ActualType)) {
      prettyWarning() << "unexpected return type " << *ActualType << " in call to '" << F->getName() << "', should be " << *TypeType << "\n";
    }
  }

  if (Invoke) {
    Sig = getFunctionSignature(FT, &Name);
    Name = "invoke_" + Sig;
    NeedCasts = true;
  }
  std::string text = Name + "(";
  if (Invoke) {
    // add first param
    if (F) {
      text += utostr(getFunctionIndex(F)); // convert to function pointer
    } else {
      text += getValueAsCastStr(CV); // already a function pointer
    }
    if (NumArgs > 0) text += ",";
  }
  // this is an ffi call if we need casts, and it is not a special Math_ builtin
  bool FFI = NeedCasts;
  if (FFI && Name.find("Math_") == 0) {
    if (Name == "Math_ceil" || Name == "Math_floor" || Name == "Math_min" || Name == "Math_max" || Name == "Math_sqrt" || Name == "Math_abs") {
      // This special Math builtin is optimizable with all types, including floats, so can treat it as non-ffi
      FFI = false;
    }
  }
  unsigned FFI_OUT = FFI ? ASM_FFI_OUT : 0;
  for (int i = 0; i < NumArgs; i++) {
    if (!NeedCasts) {
      text += getValueAsStr(CI->getOperand(i));
    } else {
      text += getValueAsCastParenStr(CI->getOperand(i), ASM_NONSPECIFIC | FFI_OUT);
    }
    if (i < NumArgs - 1) text += ",";
  }
  text += ")";
  // handle return value
  Type *InstRT = CI->getType();
  Type *ActualRT = FT->getReturnType();
  if (!InstRT->isVoidTy() && ActualRT->isVoidTy()) {
    // the function we are calling was cast to something returning a value, but it really
    // does not return a value
    getAssignIfNeeded(CI); // ensure the variable is defined, but do not emit it here
                           // it should have 0 uses, but just to be safe
  } else if (!ActualRT->isVoidTy()) {
    unsigned FFI_IN = FFI ? ASM_FFI_IN : 0;
    text = getAssignIfNeeded(CI) + "(" + getCast(text, ActualRT, ASM_NONSPECIFIC | FFI_IN) + ")";
  }
  return text;
})

// exceptions support
DEF_CALL_HANDLER(emscripten_preinvoke, {
  assert(InvokeState == 0);
  InvokeState = 1;
  return "__THREW__ = 0";
})
DEF_CALL_HANDLER(emscripten_postinvoke, {
  assert(InvokeState == 1 || InvokeState == 2); // normally 2, but can be 1 if the call in between was optimized out
  InvokeState = 0;
  return getAssign(CI) + "__THREW__; __THREW__ = 0";
})
DEF_CALL_HANDLER(emscripten_landingpad, {
  std::string Ret = getAssign(CI) + "___cxa_find_matching_catch(-1,-1";
  unsigned Num = getNumArgOperands(CI);
  for (unsigned i = 1; i < Num-1; i++) { // ignore personality and cleanup XXX - we probably should not be doing that!
    Ret += ",";
    Ret += getValueAsCastStr(CI->getOperand(i));
  }
  Ret += ")|0";
  return Ret;
})
DEF_CALL_HANDLER(emscripten_resume, {
  return "___resumeException(" + getValueAsCastStr(CI->getOperand(0)) + ")";
})

// setjmp support

DEF_CALL_HANDLER(emscripten_prep_setjmp, {
  return getAdHocAssign("_setjmpTable", Type::getInt32Ty(CI->getContext())) + "STACKTOP; STACKTOP=(STACKTOP+168)|0;" + // XXX FIXME
         "HEAP32[_setjmpTable>>2]=0";
})
DEF_CALL_HANDLER(emscripten_setjmp, {
  // env, label, table
  Declares.insert("saveSetjmp");
  return "_saveSetjmp(" + getValueAsStr(CI->getOperand(0)) + "," + getValueAsStr(CI->getOperand(1)) + ",_setjmpTable|0)|0";
})
DEF_CALL_HANDLER(emscripten_longjmp, {
  Declares.insert("longjmp");
  return CH___default__(CI, "_longjmp");
})
DEF_CALL_HANDLER(emscripten_check_longjmp, {
  std::string Threw = getValueAsStr(CI->getOperand(0));
  std::string Target = getJSName(CI);
  std::string Assign = getAssign(CI);
  return "if (((" + Threw + "|0) != 0) & ((threwValue|0) != 0)) { " +
           Assign + "_testSetjmp(HEAP32[" + Threw + ">>2]|0, _setjmpTable)|0; " +
           "if ((" + Target + "|0) == 0) { _longjmp(" + Threw + "|0, threwValue|0); } " + // rethrow
           "tempRet0 = threwValue; " +
         "} else { " + Assign + "-1; }";
})
DEF_CALL_HANDLER(emscripten_get_longjmp_result, {
  std::string Threw = getValueAsStr(CI->getOperand(0));
  return getAssign(CI) + "tempRet0";
})

// emscripten instrinsics
DEF_CALL_HANDLER(emscripten_debugger, {
  CanValidate = false;
  return "debugger";
})

// i64 support

DEF_CALL_HANDLER(getHigh32, {
  return getAssign(CI) + "tempRet0";
})
DEF_CALL_HANDLER(setHigh32, {
  return "tempRet0 = " + getValueAsStr(CI->getOperand(0));
})
// XXX float handling here is not optimal
#define TO_I(low, high) \
DEF_CALL_HANDLER(low, { \
  std::string Input = getValueAsStr(CI->getOperand(0)); \
  if (PreciseF32 && CI->getOperand(0)->getType()->isFloatTy()) Input = "+" + Input; \
  return getAssign(CI) + "(~~" + Input + ")>>>0"; \
}) \
DEF_CALL_HANDLER(high, { \
  std::string Input = getValueAsStr(CI->getOperand(0)); \
  if (PreciseF32 && CI->getOperand(0)->getType()->isFloatTy()) Input = "+" + Input; \
  return getAssign(CI) + "+Math_abs(" + Input + ") >= +1 ? " + Input + " > +0 ? (Math_min(+Math_floor(" + Input + " / +4294967296), +4294967295) | 0) >>> 0 : ~~+Math_ceil((" + Input + " - +(~~" + Input + " >>> 0)) / +4294967296) >>> 0 : 0"; \
})
TO_I(FtoILow, FtoIHigh);
TO_I(DtoILow, DtoIHigh);
DEF_CALL_HANDLER(BDtoILow, {
  return "HEAPF64[tempDoublePtr>>3] = " + getValueAsStr(CI->getOperand(0)) + ";" + getAssign(CI) + "HEAP32[tempDoublePtr>>2]|0";
})
DEF_CALL_HANDLER(BDtoIHigh, {
  return getAssign(CI) + "HEAP32[tempDoublePtr+4>>2]|0";
})
DEF_CALL_HANDLER(SItoF, {
  std::string Ret = "(+" + getValueAsCastParenStr(CI->getOperand(0), ASM_UNSIGNED) + ") + " +
                                       "(+4294967296*(+" + getValueAsCastParenStr(CI->getOperand(1), ASM_SIGNED) +   "))";
  if (PreciseF32 && CI->getType()->isFloatTy()) {
    Ret = "Math_fround(" + Ret + ")";
  }
  return getAssign(CI) + Ret;
})
DEF_CALL_HANDLER(UItoF, {
  std::string Ret = "(+" + getValueAsCastParenStr(CI->getOperand(0), ASM_UNSIGNED) + ") + " +
                                       "(+4294967296*(+" + getValueAsCastParenStr(CI->getOperand(1), ASM_UNSIGNED) + "))";
  if (PreciseF32 && CI->getType()->isFloatTy()) {
    Ret = "Math_fround(" + Ret + ")";
  }
  return getAssign(CI) + Ret;
})
DEF_CALL_HANDLER(SItoD, {
  return getAssign(CI) + "(+" + getValueAsCastParenStr(CI->getOperand(0), ASM_UNSIGNED) + ") + " +
                                       "(+4294967296*(+" + getValueAsCastParenStr(CI->getOperand(1), ASM_SIGNED) +   "))";
})
DEF_CALL_HANDLER(UItoD, {
  return getAssign(CI) + "(+" + getValueAsCastParenStr(CI->getOperand(0), ASM_UNSIGNED) + ") + " +
                                       "(+4294967296*(+" + getValueAsCastParenStr(CI->getOperand(1), ASM_UNSIGNED) + "))";
})
DEF_CALL_HANDLER(BItoD, {
  return "HEAP32[tempDoublePtr>>2] = " +   getValueAsStr(CI->getOperand(0)) + ";" +
         "HEAP32[tempDoublePtr+4>>2] = " + getValueAsStr(CI->getOperand(1)) + ";" +
         getAssign(CI) + "+HEAPF64[tempDoublePtr>>3]";
})

// misc

DEF_CALL_HANDLER(llvm_nacl_atomic_store_i32, {
  return "HEAP32[" + getValueAsStr(CI->getOperand(0)) + ">>2]=" + getValueAsStr(CI->getOperand(1));
})

#define UNROLL_LOOP_MAX 8
#define WRITE_LOOP_MAX 128

DEF_CALL_HANDLER(llvm_memcpy_p0i8_p0i8_i32, {
  if (CI) {
    ConstantInt *AlignInt = dyn_cast<ConstantInt>(CI->getOperand(3));
    if (AlignInt) {
      ConstantInt *LenInt = dyn_cast<ConstantInt>(CI->getOperand(2));
      if (LenInt) {
        // we can emit inline code for this
        unsigned Len = LenInt->getZExtValue();
        if (Len <= WRITE_LOOP_MAX) {
          unsigned Align = AlignInt->getZExtValue();
          if (Align > 4) Align = 4;
          else if (Align == 0) Align = 1; // align 0 means 1 in memcpy and memset (unlike other places where it means 'default/4')
          if (Align == 1 && Len > 1 && WarnOnUnaligned) {
            errs() << "emcc: warning: unaligned memcpy in  " << CI->getParent()->getParent()->getName() << ":" << *CI << " (compiler's fault?)\n";
          }
          unsigned Pos = 0;
          std::string Ret;
          std::string Dest = getValueAsStr(CI->getOperand(0));
          std::string Src = getValueAsStr(CI->getOperand(1));
          while (Len > 0) {
            // handle as much as we can in the current alignment
            unsigned CurrLen = Align*(Len/Align);
            unsigned Factor = CurrLen/Align;
            if (Factor <= UNROLL_LOOP_MAX) {
              // unroll
              for (unsigned Offset = 0; Offset < CurrLen; Offset += Align) {
                std::string Add = "+" + utostr(Pos + Offset) + (Align == 1 ? "|0" : "");
                Ret += ";" + getHeapAccess(Dest + Add, Align) + "=" + getHeapAccess(Src + Add, Align) + "|0";
              }
            } else {
              // emit a loop
              UsedVars["dest"] = UsedVars["src"] = UsedVars["stop"] = Type::getInt32Ty(TheModule->getContext())->getTypeID();
              Ret += "dest=" + Dest + "+" + utostr(Pos) + "|0; src=" + Src + "+" + utostr(Pos) + "|0; stop=dest+" + utostr(CurrLen) + "|0; do { " + getHeapAccess("dest", Align) + "=" + getHeapAccess("src", Align) + "|0; dest=dest+" + utostr(Align) + "|0; src=src+" + utostr(Align) + "|0; } while ((dest|0) < (stop|0))";
            }
            Pos += CurrLen;
            Len -= CurrLen;
            Align /= 2;
          }
          return Ret;
        }
      }
    }
  }
  Declares.insert("memcpy");
  return CH___default__(CI, "_memcpy", 3) + "|0";
})

DEF_CALL_HANDLER(llvm_memset_p0i8_i32, {
  if (CI) {
    ConstantInt *AlignInt = dyn_cast<ConstantInt>(CI->getOperand(3));
    if (AlignInt) {
      ConstantInt *LenInt = dyn_cast<ConstantInt>(CI->getOperand(2));
      if (LenInt) {
        ConstantInt *ValInt = dyn_cast<ConstantInt>(CI->getOperand(1));
        if (ValInt) {
          // we can emit inline code for this
          unsigned Len = LenInt->getZExtValue();
          if (Len <= WRITE_LOOP_MAX) {
            unsigned Align = AlignInt->getZExtValue();
            unsigned Val = ValInt->getZExtValue();
            if (Align > 4) Align = 4;
            else if (Align == 0) Align = 1; // align 0 means 1 in memcpy and memset (unlike other places where it means 'default/4')
            if (Align == 1 && Len > 1 && WarnOnUnaligned) {
              errs() << "emcc: warning: unaligned memcpy in  " << CI->getParent()->getParent()->getName() << ":" << *CI << " (compiler's fault?)\n";
            }
            unsigned Pos = 0;
            std::string Ret;
            std::string Dest = getValueAsStr(CI->getOperand(0));
            while (Len > 0) {
              // handle as much as we can in the current alignment
              unsigned CurrLen = Align*(Len/Align);
              unsigned FullVal = 0;
              for (unsigned i = 0; i < Align; i++) {
                FullVal <<= 8;
                FullVal |= Val;
              }
              unsigned Factor = CurrLen/Align;
              if (Factor <= UNROLL_LOOP_MAX) {
                // unroll
                for (unsigned Offset = 0; Offset < CurrLen; Offset += Align) {
                  std::string Add = "+" + utostr(Pos + Offset) + (Align == 1 ? "|0" : "");
                  Ret += ";" + getHeapAccess(Dest + Add, Align) + "=" + utostr(FullVal) + "|0";
                }
              } else {
                // emit a loop
                UsedVars["dest"] = UsedVars["stop"] = Type::getInt32Ty(TheModule->getContext())->getTypeID();
                Ret += "dest=" + Dest + "+" + utostr(Pos) + "|0; stop=dest+" + utostr(CurrLen) + "|0; do { " + getHeapAccess("dest", Align) + "=" + utostr(FullVal) + "|0; dest=dest+" + utostr(Align) + "|0; } while ((dest|0) < (stop|0))";
              }
              Pos += CurrLen;
              Len -= CurrLen;
              Align /= 2;
            }
            return Ret;
          }
        }
      }
    }
  }
  Declares.insert("memset");
  return CH___default__(CI, "_memset", 3) + "|0";
})

DEF_CALL_HANDLER(llvm_memmove_p0i8_p0i8_i32, {
  Declares.insert("memmove");
  return CH___default__(CI, "_memmove", 3) + "|0";
})

DEF_CALL_HANDLER(llvm_expect_i32, {
  return getAssign(CI) + getValueAsStr(CI->getOperand(0));
})

DEF_CALL_HANDLER(llvm_dbg_declare, {
  return "";
})

DEF_CALL_HANDLER(llvm_dbg_value, {
  return "";
})

DEF_CALL_HANDLER(llvm_lifetime_start, {
  return "";
})

DEF_CALL_HANDLER(llvm_lifetime_end, {
  return "";
})

DEF_CALL_HANDLER(llvm_invariant_start, {
  return "";
})

DEF_CALL_HANDLER(llvm_invariant_end, {
  return "";
})

DEF_CALL_HANDLER(llvm_prefetch, {
  return "";
})

DEF_CALL_HANDLER(llvm_flt_rounds, {
  // FLT_ROUNDS helper. We don't support setting the rounding mode dynamically,
  // so it's always round-to-nearest (1).
  return getAssign(CI) + "1";
})

DEF_CALL_HANDLER(bitshift64Lshr, {
  return CH___default__(CI, "_bitshift64Lshr", 3);
})

DEF_CALL_HANDLER(bitshift64Ashr, {
  return CH___default__(CI, "_bitshift64Ashr", 3);
})

DEF_CALL_HANDLER(bitshift64Shl, {
  return CH___default__(CI, "_bitshift64Shl", 3);
})

DEF_CALL_HANDLER(llvm_ctlz_i32, {
  return CH___default__(CI, "_llvm_ctlz_i32", 1);
})

DEF_CALL_HANDLER(llvm_cttz_i32, {
  return CH___default__(CI, "_llvm_cttz_i32", 1);
})

// vector ops
DEF_CALL_HANDLER(emscripten_float32x4_signmask, {
  return getAssign(CI) + "SIMD.float32x4.bitsToInt32x4(" + getValueAsStr(CI->getOperand(0)) + ").signMask";
})
DEF_CALL_HANDLER(emscripten_float32x4_min, {
  return CH___default__(CI, "SIMD.float32x4.min");
})
DEF_CALL_HANDLER(emscripten_float32x4_max, {
  return CH___default__(CI, "SIMD.float32x4.max");
})
DEF_CALL_HANDLER(emscripten_float32x4_sqrt, {
  return CH___default__(CI, "SIMD.float32x4.sqrt");
})
DEF_CALL_HANDLER(emscripten_float32x4_lessThan, {
  return CH___default__(CI, "SIMD.float32x4.lessThan");
})
DEF_CALL_HANDLER(emscripten_float32x4_lessThanOrEqual, {
  return CH___default__(CI, "SIMD.float32x4.lessThanOrEqual");
})
DEF_CALL_HANDLER(emscripten_float32x4_equal, {
  return CH___default__(CI, "SIMD.float32x4.equal");
})
DEF_CALL_HANDLER(emscripten_float32x4_greaterThanOrEqual, {
  return CH___default__(CI, "SIMD.float32x4.greaterThanOrEqual");
})
DEF_CALL_HANDLER(emscripten_float32x4_greaterThan, {
  return CH___default__(CI, "SIMD.float32x4.greaterThan");
})
DEF_CALL_HANDLER(emscripten_float32x4_and, {
  return getAssign(CI) + "SIMD.int32x4.bitsToFloat32x4(SIMD.int32x4.and(SIMD.float32x4.bitsToInt32x4(" +
                                                      getValueAsStr(CI->getOperand(0)) + "),SIMD.float32x4.bitsToInt32x4(" + getValueAsStr(CI->getOperand(1)) + ")))";
})
DEF_CALL_HANDLER(emscripten_float32x4_andNot, {
  return getAssign(CI) + "SIMD.int32x4.bitsToFloat32x4(SIMD.int32x4.and(SIMD.int32x4.not(SIMD.float32x4.bitsToInt32x4(" +
                                                      getValueAsStr(CI->getOperand(0)) + ")),SIMD.float32x4.bitsToInt32x4(" + getValueAsStr(CI->getOperand(1)) + ")))";
})
DEF_CALL_HANDLER(emscripten_float32x4_or, {
  return getAssign(CI) + "SIMD.int32x4.bitsToFloat32x4(SIMD.int32x4.or(SIMD.float32x4.bitsToInt32x4(" +
                                                      getValueAsStr(CI->getOperand(0)) + "),SIMD.float32x4.bitsToInt32x4(" + getValueAsStr(CI->getOperand(1)) + ")))";
})
DEF_CALL_HANDLER(emscripten_float32x4_xor, {
  return getAssign(CI) + "SIMD.int32x4.bitsToFloat32x4(SIMD.int32x4.xor(SIMD.float32x4.bitsToInt32x4(" +
                                                      getValueAsStr(CI->getOperand(0)) + "),SIMD.float32x4.bitsToInt32x4(" + getValueAsStr(CI->getOperand(1)) + ")))";
})
DEF_CALL_HANDLER(emscripten_int32x4_bitsToFloat32x4, {
  return CH___default__(CI, "SIMD.int32x4.bitsToFloat32x4");
})
DEF_CALL_HANDLER(emscripten_int32x4_toFloat32x4, {
  return CH___default__(CI, "SIMD.int32x4.toFloat32x4");
})
DEF_CALL_HANDLER(emscripten_float32x4_bitsToInt32x4, {
  return CH___default__(CI, "SIMD.float32x4.bitsToInt32x4");
})
DEF_CALL_HANDLER(emscripten_float32x4_toInt32x4, {
  return CH___default__(CI, "SIMD.float32x4.toInt32x4");
})

#define DEF_REDIRECT_HANDLER(name, to) \
DEF_CALL_HANDLER(name, { \
  /* FIXME: do not redirect if this is implemented and not just a declare! */ \
  Declares.insert(#to); \
  Redirects[#name] = #to; \
  return CH___default__(CI, "_" #to); \
})

#define DEF_BUILTIN_HANDLER(name, to) \
DEF_CALL_HANDLER(name, { \
  return CH___default__(CI, #to); \
})

// Various simple redirects for our js libc, see library.js and LibraryManager.load
DEF_REDIRECT_HANDLER(__01readdir64_, readdir);
DEF_REDIRECT_HANDLER(__xpg_basename, basename);
DEF_REDIRECT_HANDLER(stat64, stat);
DEF_REDIRECT_HANDLER(fstat64, fstat);
DEF_REDIRECT_HANDLER(lstat64, lstat);
DEF_REDIRECT_HANDLER(__01fstat64_, fstat);
DEF_REDIRECT_HANDLER(__01stat64_, stat);
DEF_REDIRECT_HANDLER(__01lstat64_, lstat);
DEF_REDIRECT_HANDLER(__01statvfs64_, statvfs);
DEF_REDIRECT_HANDLER(__01fstatvfs64_, fstatvfs);
DEF_REDIRECT_HANDLER(pathconf, fpathconf);
DEF_REDIRECT_HANDLER(fdatasync, fsync);
DEF_REDIRECT_HANDLER(ualarm, alarm);
DEF_REDIRECT_HANDLER(execle, execl);
DEF_REDIRECT_HANDLER(execlp, execl);
DEF_REDIRECT_HANDLER(execv, execl);
DEF_REDIRECT_HANDLER(execve, execl);
DEF_REDIRECT_HANDLER(execvp, execl);
DEF_REDIRECT_HANDLER(vfork, fork);
DEF_REDIRECT_HANDLER(getegid, getgid);
DEF_REDIRECT_HANDLER(getuid, getgid);
DEF_REDIRECT_HANDLER(geteuid, getgid);
DEF_REDIRECT_HANDLER(getpgrp, getgid);
DEF_REDIRECT_HANDLER(getpid, getgid);
DEF_REDIRECT_HANDLER(getppid, getgid);
DEF_REDIRECT_HANDLER(getresgid, getresuid);
DEF_REDIRECT_HANDLER(getsid, getpgid);
DEF_REDIRECT_HANDLER(setegid, setgid);
DEF_REDIRECT_HANDLER(setuid, setgid);
DEF_REDIRECT_HANDLER(seteuid, setgid);
DEF_REDIRECT_HANDLER(setsid, setgid);
DEF_REDIRECT_HANDLER(setpgrp, setgid);
DEF_REDIRECT_HANDLER(setregid, setpgid);
DEF_REDIRECT_HANDLER(setreuid, setpgid);
DEF_REDIRECT_HANDLER(setresuid, setpgid);
DEF_REDIRECT_HANDLER(setresgid, setpgid);
DEF_REDIRECT_HANDLER(open64, open);
DEF_REDIRECT_HANDLER(lseek64, lseek);
DEF_REDIRECT_HANDLER(ftruncate64, ftruncate);
DEF_REDIRECT_HANDLER(__01open64_, open);
DEF_REDIRECT_HANDLER(__01lseek64_, lseek);
DEF_REDIRECT_HANDLER(__01truncate64_, truncate);
DEF_REDIRECT_HANDLER(__01ftruncate64_, ftruncate);
DEF_REDIRECT_HANDLER(getc, fgetc);
DEF_REDIRECT_HANDLER(getc_unlocked, fgetc);
DEF_REDIRECT_HANDLER(flockfile, ftrylockfile);
DEF_REDIRECT_HANDLER(funlockfile, ftrylockfile);
DEF_REDIRECT_HANDLER(putc, fputc);
DEF_REDIRECT_HANDLER(putc_unlocked, fputc);
DEF_REDIRECT_HANDLER(putchar_unlocked, putchar);
DEF_REDIRECT_HANDLER(fseeko, fseek);
DEF_REDIRECT_HANDLER(fseeko64, fseek);
DEF_REDIRECT_HANDLER(ftello, ftell);
DEF_REDIRECT_HANDLER(ftello64, ftell);
DEF_REDIRECT_HANDLER(fopen64, fopen);
DEF_REDIRECT_HANDLER(__01fopen64_, fopen);
DEF_REDIRECT_HANDLER(__01freopen64_, freopen);
DEF_REDIRECT_HANDLER(__01fseeko64_, fseek);
DEF_REDIRECT_HANDLER(__01ftello64_, ftell);
DEF_REDIRECT_HANDLER(__01tmpfile64_, tmpfile);
DEF_REDIRECT_HANDLER(__isoc99_fscanf, fscanf);
DEF_REDIRECT_HANDLER(_IO_getc, getc);
DEF_REDIRECT_HANDLER(_IO_putc, putc);
DEF_REDIRECT_HANDLER(_ZNSo3putEc, putchar);
DEF_REDIRECT_HANDLER(__01mmap64_, mmap);
DEF_BUILTIN_HANDLER(abs, Math_abs);
DEF_BUILTIN_HANDLER(labs, Math_abs);
DEF_REDIRECT_HANDLER(__cxa_atexit, atexit);
DEF_REDIRECT_HANDLER(atol, atoi);
DEF_REDIRECT_HANDLER(__environ, _environ);
DEF_REDIRECT_HANDLER(arc4random, rand);
DEF_REDIRECT_HANDLER(llvm_memcpy_i32, memcpy);
DEF_REDIRECT_HANDLER(llvm_memcpy_i64, memcpy);
DEF_REDIRECT_HANDLER(llvm_memcpy_p0i8_p0i8_i64, memcpy);
DEF_REDIRECT_HANDLER(llvm_memmove_i32, memmove);
DEF_REDIRECT_HANDLER(llvm_memmove_i64, memmove);
DEF_REDIRECT_HANDLER(llvm_memmove_p0i8_p0i8_i64, memmove);
DEF_REDIRECT_HANDLER(llvm_memset_i32, memset);
DEF_REDIRECT_HANDLER(llvm_memset_p0i8_i64, memset);
DEF_REDIRECT_HANDLER(strcoll, strcmp);
DEF_REDIRECT_HANDLER(index, strchr);
DEF_REDIRECT_HANDLER(rindex, strrchr);
DEF_REDIRECT_HANDLER(_toupper, toupper);
DEF_REDIRECT_HANDLER(_tolower, tolower);
DEF_REDIRECT_HANDLER(terminate, __cxa_call_unexpected);
DEF_BUILTIN_HANDLER(cos, Math_cos);
DEF_BUILTIN_HANDLER(cosf, Math_cos);
DEF_BUILTIN_HANDLER(cosl, Math_cos);
DEF_BUILTIN_HANDLER(sin, Math_sin);
DEF_BUILTIN_HANDLER(sinf, Math_sin);
DEF_BUILTIN_HANDLER(sinl, Math_sin);
DEF_BUILTIN_HANDLER(tan, Math_tan);
DEF_BUILTIN_HANDLER(tanf, Math_tan);
DEF_BUILTIN_HANDLER(tanl, Math_tan);
DEF_BUILTIN_HANDLER(acos, Math_acos);
DEF_BUILTIN_HANDLER(acosf, Math_acos);
DEF_BUILTIN_HANDLER(acosl, Math_acos);
DEF_BUILTIN_HANDLER(asin, Math_asin);
DEF_BUILTIN_HANDLER(asinf, Math_asin);
DEF_BUILTIN_HANDLER(asinl, Math_asin);
DEF_BUILTIN_HANDLER(atan, Math_atan);
DEF_BUILTIN_HANDLER(atanf, Math_atan);
DEF_BUILTIN_HANDLER(atanl, Math_atan);
DEF_BUILTIN_HANDLER(atan2, Math_atan2);
DEF_BUILTIN_HANDLER(atan2f, Math_atan2);
DEF_BUILTIN_HANDLER(atan2l, Math_atan2);
DEF_BUILTIN_HANDLER(exp, Math_exp);
DEF_BUILTIN_HANDLER(expf, Math_exp);
DEF_BUILTIN_HANDLER(expl, Math_exp);
DEF_REDIRECT_HANDLER(erfcf, erfc);
DEF_REDIRECT_HANDLER(erfcl, erfc);
DEF_REDIRECT_HANDLER(erff, erf);
DEF_REDIRECT_HANDLER(erfl, erf);
DEF_BUILTIN_HANDLER(log, Math_log);
DEF_BUILTIN_HANDLER(logf, Math_log);
DEF_BUILTIN_HANDLER(logl, Math_log);
DEF_BUILTIN_HANDLER(sqrt, Math_sqrt);
DEF_BUILTIN_HANDLER(sqrtf, Math_sqrt);
DEF_BUILTIN_HANDLER(sqrtl, Math_sqrt);
DEF_BUILTIN_HANDLER(fabs, Math_abs);
DEF_BUILTIN_HANDLER(fabsf, Math_abs);
DEF_BUILTIN_HANDLER(fabsl, Math_abs);
DEF_BUILTIN_HANDLER(ceil, Math_ceil);
DEF_BUILTIN_HANDLER(ceilf, Math_ceil);
DEF_BUILTIN_HANDLER(ceill, Math_ceil);
DEF_BUILTIN_HANDLER(floor, Math_floor);
DEF_BUILTIN_HANDLER(floorf, Math_floor);
DEF_BUILTIN_HANDLER(floorl, Math_floor);
DEF_BUILTIN_HANDLER(pow, Math_pow);
DEF_BUILTIN_HANDLER(powf, Math_pow);
DEF_BUILTIN_HANDLER(powl, Math_pow);
DEF_BUILTIN_HANDLER(llvm_sqrt_f32, Math_sqrt);
DEF_BUILTIN_HANDLER(llvm_sqrt_f64, Math_sqrt);
DEF_BUILTIN_HANDLER(llvm_pow_f32, Math_pow);
DEF_BUILTIN_HANDLER(llvm_pow_f64, Math_pow);
DEF_BUILTIN_HANDLER(llvm_log_f32, Math_log);
DEF_BUILTIN_HANDLER(llvm_log_f64, Math_log);
DEF_BUILTIN_HANDLER(llvm_exp_f32, Math_exp);
DEF_BUILTIN_HANDLER(llvm_exp_f64, Math_exp);
DEF_REDIRECT_HANDLER(cbrtf, cbrt);
DEF_REDIRECT_HANDLER(cbrtl, cbrt);
DEF_REDIRECT_HANDLER(frexpf, frexp);
DEF_REDIRECT_HANDLER(__finite, finite);
DEF_REDIRECT_HANDLER(__isinf, isinf);
DEF_REDIRECT_HANDLER(__isnan, isnan);
DEF_REDIRECT_HANDLER(copysignf, copysign);
DEF_REDIRECT_HANDLER(copysignl, copysign);
DEF_REDIRECT_HANDLER(hypotf, hypot);
DEF_REDIRECT_HANDLER(hypotl, hypot);
DEF_REDIRECT_HANDLER(sinhf, sinh);
DEF_REDIRECT_HANDLER(sinhl, sinh);
DEF_REDIRECT_HANDLER(coshf, cosh);
DEF_REDIRECT_HANDLER(coshl, cosh);
DEF_REDIRECT_HANDLER(tanhf, tanh);
DEF_REDIRECT_HANDLER(tanhl, tanh);
DEF_REDIRECT_HANDLER(asinhf, asinh);
DEF_REDIRECT_HANDLER(asinhl, asinh);
DEF_REDIRECT_HANDLER(acoshf, acosh);
DEF_REDIRECT_HANDLER(acoshl, acosh);
DEF_REDIRECT_HANDLER(atanhf, atanh);
DEF_REDIRECT_HANDLER(atanhl, atanh);
DEF_REDIRECT_HANDLER(exp2f, exp2);
DEF_REDIRECT_HANDLER(exp2l, exp2);
DEF_REDIRECT_HANDLER(expm1f, expm1);
DEF_REDIRECT_HANDLER(expm1l, expm1);
DEF_REDIRECT_HANDLER(roundf, round);
DEF_REDIRECT_HANDLER(roundl, round);
DEF_REDIRECT_HANDLER(lround, round);
DEF_REDIRECT_HANDLER(lroundf, round);
DEF_REDIRECT_HANDLER(lroundl, round);
DEF_REDIRECT_HANDLER(llround, round);
DEF_REDIRECT_HANDLER(llroundf, round);
DEF_REDIRECT_HANDLER(llroundl, round);
DEF_REDIRECT_HANDLER(rintf, rint);
DEF_REDIRECT_HANDLER(rintl, rint);
DEF_REDIRECT_HANDLER(lrint, rint);
DEF_REDIRECT_HANDLER(lrintf, rint);
DEF_REDIRECT_HANDLER(lrintl, rint);
DEF_REDIRECT_HANDLER(llrintf, llrint);
DEF_REDIRECT_HANDLER(llrintl, llrint);
DEF_REDIRECT_HANDLER(nearbyint, rint);
DEF_REDIRECT_HANDLER(nearbyintf, rint);
DEF_REDIRECT_HANDLER(nearbyintl, rint);
DEF_REDIRECT_HANDLER(truncf, trunc);
DEF_REDIRECT_HANDLER(truncl, trunc);
DEF_REDIRECT_HANDLER(fdimf, fdim);
DEF_REDIRECT_HANDLER(fdiml, fdim);
DEF_REDIRECT_HANDLER(fmaxf, fmax);
DEF_REDIRECT_HANDLER(fmaxl, fmax);
DEF_REDIRECT_HANDLER(fminf, fmin);
DEF_REDIRECT_HANDLER(fminl, fmin);
DEF_REDIRECT_HANDLER(fmaf, fma);
DEF_REDIRECT_HANDLER(fmal, fma);
DEF_REDIRECT_HANDLER(fmodf, fmod);
DEF_REDIRECT_HANDLER(fmodl, fmod);
DEF_REDIRECT_HANDLER(remainder, fmod);
DEF_REDIRECT_HANDLER(remainderf, fmod);
DEF_REDIRECT_HANDLER(remainderl, fmod);
DEF_REDIRECT_HANDLER(log10f, log10);
DEF_REDIRECT_HANDLER(log10l, log10);
DEF_REDIRECT_HANDLER(log1pf, log1p);
DEF_REDIRECT_HANDLER(log1pl, log1p);
DEF_REDIRECT_HANDLER(log2f, log2);
DEF_REDIRECT_HANDLER(log2l, log2);
DEF_REDIRECT_HANDLER(nanf, nan);
DEF_REDIRECT_HANDLER(nanl, nan);
DEF_REDIRECT_HANDLER(sincosl, sincos);
DEF_REDIRECT_HANDLER(__fpclassifyd, __fpclassify);
DEF_REDIRECT_HANDLER(__fpclassifyf, __fpclassify);
DEF_REDIRECT_HANDLER(__fpclassifyl, __fpclassify);
DEF_REDIRECT_HANDLER(timelocal, mktime);
DEF_REDIRECT_HANDLER(gnu_dev_makedev, makedev);
DEF_REDIRECT_HANDLER(gnu_dev_major, major);
DEF_REDIRECT_HANDLER(gnu_dev_minor, minor);
DEF_REDIRECT_HANDLER(sigprocmask, sigaction);
DEF_REDIRECT_HANDLER(killpg, kill);
DEF_REDIRECT_HANDLER(waitid, wait);
DEF_REDIRECT_HANDLER(waitpid, wait);
DEF_REDIRECT_HANDLER(wait3, wait);
DEF_REDIRECT_HANDLER(wait4, wait);
DEF_REDIRECT_HANDLER(__errno, __errno_location);
DEF_REDIRECT_HANDLER(__01getrlimit64_, getrlimit);
DEF_REDIRECT_HANDLER(ntohl, htonl);
DEF_REDIRECT_HANDLER(ntohs, htons);
DEF_REDIRECT_HANDLER(SDL_LoadBMP, IMG_Load);
DEF_REDIRECT_HANDLER(SDL_LoadBMP_RW, IMG_Load_RW);
DEF_REDIRECT_HANDLER(Mix_CloseAudio, SDL_CloseAudio);
DEF_REDIRECT_HANDLER(Mix_PlayChannelTimed, Mix_PlayChannel);
DEF_REDIRECT_HANDLER(Mix_LoadMUS_RW, Mix_LoadWAV_RW);
DEF_REDIRECT_HANDLER(Mix_FreeMusic, Mix_FreeChunk);
DEF_REDIRECT_HANDLER(Mix_FadeInMusicPos, Mix_PlayMusic);
DEF_REDIRECT_HANDLER(Mix_FadeOutMusic, Mix_HaltMusic);
DEF_REDIRECT_HANDLER(TTF_RenderText_Blended, TTF_RenderText_Solid);
DEF_REDIRECT_HANDLER(TTF_RenderText_Shaded, TTF_RenderText_Solid);
DEF_REDIRECT_HANDLER(TTF_RenderUTF8_Solid, TTF_RenderText_Solid);
DEF_REDIRECT_HANDLER(SDL_getenv, getenv);
DEF_REDIRECT_HANDLER(SDL_RWFromMem, SDL_RWFromConstMem);

// Setups

void setupCallHandlers() {
  assert(CallHandlers.empty());
  #define SETUP_CALL_HANDLER(Ident) \
    CallHandlers["_" #Ident] = &JSWriter::CH_##Ident;

  SETUP_CALL_HANDLER(__default__);
  SETUP_CALL_HANDLER(emscripten_preinvoke);
  SETUP_CALL_HANDLER(emscripten_postinvoke);
  SETUP_CALL_HANDLER(emscripten_landingpad);
  SETUP_CALL_HANDLER(emscripten_resume);
  SETUP_CALL_HANDLER(emscripten_prep_setjmp);
  SETUP_CALL_HANDLER(emscripten_setjmp);
  SETUP_CALL_HANDLER(emscripten_longjmp);
  SETUP_CALL_HANDLER(emscripten_check_longjmp);
  SETUP_CALL_HANDLER(emscripten_get_longjmp_result);
  SETUP_CALL_HANDLER(emscripten_debugger);
  SETUP_CALL_HANDLER(getHigh32);
  SETUP_CALL_HANDLER(setHigh32);
  SETUP_CALL_HANDLER(FtoILow);
  SETUP_CALL_HANDLER(FtoIHigh);
  SETUP_CALL_HANDLER(DtoILow);
  SETUP_CALL_HANDLER(DtoIHigh);
  SETUP_CALL_HANDLER(BDtoILow);
  SETUP_CALL_HANDLER(BDtoIHigh);
  SETUP_CALL_HANDLER(SItoF);
  SETUP_CALL_HANDLER(UItoF);
  SETUP_CALL_HANDLER(SItoD);
  SETUP_CALL_HANDLER(UItoD);
  SETUP_CALL_HANDLER(BItoD);
  SETUP_CALL_HANDLER(llvm_nacl_atomic_store_i32);
  SETUP_CALL_HANDLER(llvm_memcpy_p0i8_p0i8_i32);
  SETUP_CALL_HANDLER(llvm_memset_p0i8_i32);
  SETUP_CALL_HANDLER(llvm_memmove_p0i8_p0i8_i32);
  SETUP_CALL_HANDLER(llvm_expect_i32);
  SETUP_CALL_HANDLER(llvm_dbg_declare);
  SETUP_CALL_HANDLER(llvm_dbg_value);
  SETUP_CALL_HANDLER(llvm_lifetime_start);
  SETUP_CALL_HANDLER(llvm_lifetime_end);
  SETUP_CALL_HANDLER(llvm_invariant_start);
  SETUP_CALL_HANDLER(llvm_invariant_end);
  SETUP_CALL_HANDLER(llvm_prefetch);
  SETUP_CALL_HANDLER(llvm_flt_rounds);
  SETUP_CALL_HANDLER(bitshift64Lshr);
  SETUP_CALL_HANDLER(bitshift64Ashr);
  SETUP_CALL_HANDLER(bitshift64Shl);
  SETUP_CALL_HANDLER(llvm_ctlz_i32);
  SETUP_CALL_HANDLER(llvm_cttz_i32);
  SETUP_CALL_HANDLER(emscripten_float32x4_signmask);
  SETUP_CALL_HANDLER(emscripten_float32x4_min);
  SETUP_CALL_HANDLER(emscripten_float32x4_max);
  SETUP_CALL_HANDLER(emscripten_float32x4_sqrt);
  SETUP_CALL_HANDLER(emscripten_float32x4_lessThan);
  SETUP_CALL_HANDLER(emscripten_float32x4_lessThanOrEqual);
  SETUP_CALL_HANDLER(emscripten_float32x4_equal);
  SETUP_CALL_HANDLER(emscripten_float32x4_greaterThanOrEqual);
  SETUP_CALL_HANDLER(emscripten_float32x4_greaterThan);
  SETUP_CALL_HANDLER(emscripten_float32x4_and);
  SETUP_CALL_HANDLER(emscripten_float32x4_andNot);
  SETUP_CALL_HANDLER(emscripten_float32x4_or);
  SETUP_CALL_HANDLER(emscripten_float32x4_xor);
  SETUP_CALL_HANDLER(emscripten_int32x4_bitsToFloat32x4);
  SETUP_CALL_HANDLER(emscripten_int32x4_toFloat32x4);
  SETUP_CALL_HANDLER(emscripten_float32x4_bitsToInt32x4);
  SETUP_CALL_HANDLER(emscripten_float32x4_toInt32x4);

  SETUP_CALL_HANDLER(__01readdir64_);
  SETUP_CALL_HANDLER(__xpg_basename);
  SETUP_CALL_HANDLER(stat64);
  SETUP_CALL_HANDLER(fstat64);
  SETUP_CALL_HANDLER(lstat64);
  SETUP_CALL_HANDLER(__01fstat64_);
  SETUP_CALL_HANDLER(__01stat64_);
  SETUP_CALL_HANDLER(__01lstat64_);
  SETUP_CALL_HANDLER(__01statvfs64_);
  SETUP_CALL_HANDLER(__01fstatvfs64_);
  SETUP_CALL_HANDLER(pathconf);
  SETUP_CALL_HANDLER(fdatasync);
  SETUP_CALL_HANDLER(ualarm);
  SETUP_CALL_HANDLER(execle);
  SETUP_CALL_HANDLER(execlp);
  SETUP_CALL_HANDLER(execv);
  SETUP_CALL_HANDLER(execve);
  SETUP_CALL_HANDLER(execvp);
  SETUP_CALL_HANDLER(vfork);
  SETUP_CALL_HANDLER(getegid);
  SETUP_CALL_HANDLER(getuid);
  SETUP_CALL_HANDLER(geteuid);
  SETUP_CALL_HANDLER(getpgrp);
  SETUP_CALL_HANDLER(getpid);
  SETUP_CALL_HANDLER(getppid);
  SETUP_CALL_HANDLER(getresgid);
  SETUP_CALL_HANDLER(getsid);
  SETUP_CALL_HANDLER(setegid);
  SETUP_CALL_HANDLER(setuid);
  SETUP_CALL_HANDLER(seteuid);
  SETUP_CALL_HANDLER(setsid);
  SETUP_CALL_HANDLER(setpgrp);
  SETUP_CALL_HANDLER(setregid);
  SETUP_CALL_HANDLER(setreuid);
  SETUP_CALL_HANDLER(setresuid);
  SETUP_CALL_HANDLER(setresgid);
  SETUP_CALL_HANDLER(open64);
  SETUP_CALL_HANDLER(lseek64);
  SETUP_CALL_HANDLER(ftruncate64);
  SETUP_CALL_HANDLER(__01open64_);
  SETUP_CALL_HANDLER(__01lseek64_);
  SETUP_CALL_HANDLER(__01truncate64_);
  SETUP_CALL_HANDLER(__01ftruncate64_);
  SETUP_CALL_HANDLER(getc);
  SETUP_CALL_HANDLER(getc_unlocked);
  SETUP_CALL_HANDLER(flockfile);
  SETUP_CALL_HANDLER(funlockfile);
  SETUP_CALL_HANDLER(putc);
  SETUP_CALL_HANDLER(putc_unlocked);
  SETUP_CALL_HANDLER(putchar_unlocked);
  SETUP_CALL_HANDLER(fseeko);
  SETUP_CALL_HANDLER(fseeko64);
  SETUP_CALL_HANDLER(ftello);
  SETUP_CALL_HANDLER(ftello64);
  SETUP_CALL_HANDLER(fopen64);
  SETUP_CALL_HANDLER(__01fopen64_);
  SETUP_CALL_HANDLER(__01freopen64_);
  SETUP_CALL_HANDLER(__01fseeko64_);
  SETUP_CALL_HANDLER(__01ftello64_);
  SETUP_CALL_HANDLER(__01tmpfile64_);
  SETUP_CALL_HANDLER(__isoc99_fscanf);
  SETUP_CALL_HANDLER(_IO_getc);
  SETUP_CALL_HANDLER(_IO_putc);
  SETUP_CALL_HANDLER(_ZNSo3putEc);
  SETUP_CALL_HANDLER(__01mmap64_);
  SETUP_CALL_HANDLER(abs);
  SETUP_CALL_HANDLER(labs);
  SETUP_CALL_HANDLER(__cxa_atexit);
  SETUP_CALL_HANDLER(atol);
  SETUP_CALL_HANDLER(__environ);
  SETUP_CALL_HANDLER(arc4random);
  SETUP_CALL_HANDLER(llvm_memcpy_i32);
  SETUP_CALL_HANDLER(llvm_memcpy_i64);
  SETUP_CALL_HANDLER(llvm_memcpy_p0i8_p0i8_i64);
  SETUP_CALL_HANDLER(llvm_memmove_i32);
  SETUP_CALL_HANDLER(llvm_memmove_i64);
  SETUP_CALL_HANDLER(llvm_memmove_p0i8_p0i8_i64);
  SETUP_CALL_HANDLER(llvm_memset_i32);
  SETUP_CALL_HANDLER(llvm_memset_p0i8_i64);
  SETUP_CALL_HANDLER(strcoll);
  SETUP_CALL_HANDLER(index);
  SETUP_CALL_HANDLER(rindex);
  SETUP_CALL_HANDLER(_toupper);
  SETUP_CALL_HANDLER(_tolower);
  SETUP_CALL_HANDLER(terminate);
  SETUP_CALL_HANDLER(cos);
  SETUP_CALL_HANDLER(cosf);
  SETUP_CALL_HANDLER(cosl);
  SETUP_CALL_HANDLER(sin);
  SETUP_CALL_HANDLER(sinf);
  SETUP_CALL_HANDLER(sinl);
  SETUP_CALL_HANDLER(tan);
  SETUP_CALL_HANDLER(tanf);
  SETUP_CALL_HANDLER(tanl);
  SETUP_CALL_HANDLER(acos);
  SETUP_CALL_HANDLER(acosf);
  SETUP_CALL_HANDLER(acosl);
  SETUP_CALL_HANDLER(asin);
  SETUP_CALL_HANDLER(asinf);
  SETUP_CALL_HANDLER(asinl);
  SETUP_CALL_HANDLER(atan);
  SETUP_CALL_HANDLER(atanf);
  SETUP_CALL_HANDLER(atanl);
  SETUP_CALL_HANDLER(atan2);
  SETUP_CALL_HANDLER(atan2f);
  SETUP_CALL_HANDLER(atan2l);
  SETUP_CALL_HANDLER(exp);
  SETUP_CALL_HANDLER(expf);
  SETUP_CALL_HANDLER(expl);
  SETUP_CALL_HANDLER(erfcf);
  SETUP_CALL_HANDLER(erfcl);
  SETUP_CALL_HANDLER(erff);
  SETUP_CALL_HANDLER(erfl);
  SETUP_CALL_HANDLER(log);
  SETUP_CALL_HANDLER(logf);
  SETUP_CALL_HANDLER(logl);
  SETUP_CALL_HANDLER(sqrt);
  SETUP_CALL_HANDLER(sqrtf);
  SETUP_CALL_HANDLER(sqrtl);
  SETUP_CALL_HANDLER(fabs);
  SETUP_CALL_HANDLER(fabsf);
  SETUP_CALL_HANDLER(fabsl);
  SETUP_CALL_HANDLER(ceil);
  SETUP_CALL_HANDLER(ceilf);
  SETUP_CALL_HANDLER(ceill);
  SETUP_CALL_HANDLER(floor);
  SETUP_CALL_HANDLER(floorf);
  SETUP_CALL_HANDLER(floorl);
  SETUP_CALL_HANDLER(pow);
  SETUP_CALL_HANDLER(powf);
  SETUP_CALL_HANDLER(powl);
  SETUP_CALL_HANDLER(llvm_sqrt_f32);
  SETUP_CALL_HANDLER(llvm_sqrt_f64);
  SETUP_CALL_HANDLER(llvm_pow_f32);
  SETUP_CALL_HANDLER(llvm_pow_f64);
  SETUP_CALL_HANDLER(llvm_log_f32);
  SETUP_CALL_HANDLER(llvm_log_f64);
  SETUP_CALL_HANDLER(llvm_exp_f32);
  SETUP_CALL_HANDLER(llvm_exp_f64);
  SETUP_CALL_HANDLER(cbrtf);
  SETUP_CALL_HANDLER(cbrtl);
  SETUP_CALL_HANDLER(frexpf);
  SETUP_CALL_HANDLER(__finite);
  SETUP_CALL_HANDLER(__isinf);
  SETUP_CALL_HANDLER(__isnan);
  SETUP_CALL_HANDLER(copysignf);
  SETUP_CALL_HANDLER(copysignl);
  SETUP_CALL_HANDLER(hypotf);
  SETUP_CALL_HANDLER(hypotl);
  SETUP_CALL_HANDLER(sinhf);
  SETUP_CALL_HANDLER(sinhl);
  SETUP_CALL_HANDLER(coshf);
  SETUP_CALL_HANDLER(coshl);
  SETUP_CALL_HANDLER(tanhf);
  SETUP_CALL_HANDLER(tanhl);
  SETUP_CALL_HANDLER(asinhf);
  SETUP_CALL_HANDLER(asinhl);
  SETUP_CALL_HANDLER(acoshf);
  SETUP_CALL_HANDLER(acoshl);
  SETUP_CALL_HANDLER(atanhf);
  SETUP_CALL_HANDLER(atanhl);
  SETUP_CALL_HANDLER(exp2f);
  SETUP_CALL_HANDLER(exp2l);
  SETUP_CALL_HANDLER(expm1f);
  SETUP_CALL_HANDLER(expm1l);
  SETUP_CALL_HANDLER(roundf);
  SETUP_CALL_HANDLER(roundl);
  SETUP_CALL_HANDLER(lround);
  SETUP_CALL_HANDLER(lroundf);
  SETUP_CALL_HANDLER(lroundl);
  SETUP_CALL_HANDLER(llround);
  SETUP_CALL_HANDLER(llroundf);
  SETUP_CALL_HANDLER(llroundl);
  SETUP_CALL_HANDLER(rintf);
  SETUP_CALL_HANDLER(rintl);
  SETUP_CALL_HANDLER(lrint);
  SETUP_CALL_HANDLER(lrintf);
  SETUP_CALL_HANDLER(lrintl);
  SETUP_CALL_HANDLER(llrintf);
  SETUP_CALL_HANDLER(llrintl);
  SETUP_CALL_HANDLER(nearbyint);
  SETUP_CALL_HANDLER(nearbyintf);
  SETUP_CALL_HANDLER(nearbyintl);
  SETUP_CALL_HANDLER(truncf);
  SETUP_CALL_HANDLER(truncl);
  SETUP_CALL_HANDLER(fdimf);
  SETUP_CALL_HANDLER(fdiml);
  SETUP_CALL_HANDLER(fmaxf);
  SETUP_CALL_HANDLER(fmaxl);
  SETUP_CALL_HANDLER(fminf);
  SETUP_CALL_HANDLER(fminl);
  SETUP_CALL_HANDLER(fmaf);
  SETUP_CALL_HANDLER(fmal);
  SETUP_CALL_HANDLER(fmodf);
  SETUP_CALL_HANDLER(fmodl);
  SETUP_CALL_HANDLER(remainder);
  SETUP_CALL_HANDLER(remainderf);
  SETUP_CALL_HANDLER(remainderl);
  SETUP_CALL_HANDLER(log10f);
  SETUP_CALL_HANDLER(log10l);
  SETUP_CALL_HANDLER(log1pf);
  SETUP_CALL_HANDLER(log1pl);
  SETUP_CALL_HANDLER(log2f);
  SETUP_CALL_HANDLER(log2l);
  SETUP_CALL_HANDLER(nanf);
  SETUP_CALL_HANDLER(nanl);
  SETUP_CALL_HANDLER(sincosl);
  SETUP_CALL_HANDLER(__fpclassifyd);
  SETUP_CALL_HANDLER(__fpclassifyf);
  SETUP_CALL_HANDLER(__fpclassifyl);
  SETUP_CALL_HANDLER(timelocal);
  SETUP_CALL_HANDLER(gnu_dev_makedev);
  SETUP_CALL_HANDLER(gnu_dev_major);
  SETUP_CALL_HANDLER(gnu_dev_minor);
  SETUP_CALL_HANDLER(sigprocmask);
  SETUP_CALL_HANDLER(killpg);
  SETUP_CALL_HANDLER(waitid);
  SETUP_CALL_HANDLER(waitpid);
  SETUP_CALL_HANDLER(wait3);
  SETUP_CALL_HANDLER(wait4);
  SETUP_CALL_HANDLER(__errno);
  SETUP_CALL_HANDLER(__01getrlimit64_);
  SETUP_CALL_HANDLER(ntohl);
  SETUP_CALL_HANDLER(ntohs);
  SETUP_CALL_HANDLER(SDL_LoadBMP);
  SETUP_CALL_HANDLER(SDL_LoadBMP_RW);
  SETUP_CALL_HANDLER(Mix_CloseAudio);
  SETUP_CALL_HANDLER(Mix_PlayChannelTimed);
  SETUP_CALL_HANDLER(Mix_LoadMUS_RW);
  SETUP_CALL_HANDLER(Mix_FreeMusic);
  SETUP_CALL_HANDLER(Mix_FadeInMusicPos);
  SETUP_CALL_HANDLER(Mix_FadeOutMusic);
  SETUP_CALL_HANDLER(TTF_RenderText_Blended);
  SETUP_CALL_HANDLER(TTF_RenderText_Shaded);
  SETUP_CALL_HANDLER(TTF_RenderUTF8_Solid);
  SETUP_CALL_HANDLER(SDL_getenv);
  SETUP_CALL_HANDLER(SDL_RWFromMem);
}

std::string handleCall(const Instruction *CI) {
  const Value *CV = getActuallyCalledValue(CI);
  if (isa<InlineAsm>(CV)) {
    errs() << "In function " << CI->getParent()->getParent()->getName() << "()\n";
    report_fatal_error("asm() not supported, use EM_ASM() (see emscripten.h)");
  }

  // Get the name to call this function by. If it's a direct call, meaning
  // which know which Function we're calling, avoid calling getValueAsStr, as
  // we don't need to use a function index.
  const std::string &Name = isa<Function>(CV) ? getJSName(CV) : getValueAsStr(CV);

  CallHandlerMap::iterator CH = CallHandlers.find("___default__");
  if (isa<Function>(CV)) {
    CallHandlerMap::iterator Custom = CallHandlers.find(Name);
    if (Custom != CallHandlers.end()) CH = Custom;
  }
  return (this->*(CH->second))(CI, Name, -1);
}