void
Type_init (ejsval exports)
{
_ejs_gc_add_root (&_ejs_Type_prototype);
_ejs_Type_prototype = _ejs_object_create(_ejs_Object_prototype);
_ejs_Type = _ejs_function_new_utf8_with_proto (_ejs_null, "LLVMType", (EJSClosureFunc)Type_impl, _ejs_Type_prototype);
_ejs_object_setprop_utf8 (exports, "Type", _ejs_Type);
#define OBJ_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_Type, x, Type_##x)
#define PROTO_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_Type_prototype, x, Type_prototype_##x)
OBJ_METHOD(getDoubleTy);
OBJ_METHOD(getInt64Ty);
OBJ_METHOD(getInt32Ty);
OBJ_METHOD(getInt16Ty);
OBJ_METHOD(getInt8Ty);
OBJ_METHOD(getInt1Ty);
OBJ_METHOD(getVoidTy);
PROTO_METHOD(pointerTo);
PROTO_METHOD(isVoid);
PROTO_METHOD(dump);
PROTO_METHOD(toString);
}
void
DIBuilder_init (ejsval exports)
{
_ejs_DIBuilder_specops = _ejs_Object_specops;
_ejs_DIBuilder_specops.class_name = "LLVMDIBuilder";
_ejs_DIBuilder_specops.Allocate = DIBuilder_allocate;
_ejs_gc_add_root (&_ejs_DIBuilder_prototype);
_ejs_DIBuilder_prototype = _ejs_object_create(_ejs_Object_prototype);
_ejs_DIBuilder = _ejs_function_new_utf8_with_proto (_ejs_null, "LLVMDIBuilder", (EJSClosureFunc)DIBuilder_impl, _ejs_DIBuilder_prototype);
_ejs_object_setprop_utf8 (exports, "DIBuilder", _ejs_DIBuilder);
#define PROTO_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_DIBuilder_prototype, x, DIBuilder_prototype_##x)
PROTO_METHOD(createCompileUnit);
PROTO_METHOD(createFile);
PROTO_METHOD(createFunction);
PROTO_METHOD(createLexicalBlock);
PROTO_METHOD(finalize);
#undef PROTO_METHOD
EJS_INSTALL_SYMBOL_FUNCTION_FLAGS (_ejs_DIBuilder, create, DIBuilder_create, EJS_PROP_NOT_ENUMERABLE);
}
void
IRBuilder_init (ejsval exports)
{
_ejs_gc_add_root (&_ejs_IRBuilder_prototype);
_ejs_IRBuilder_prototype = _ejs_object_create(_ejs_Object_prototype);
_ejs_IRBuilder = _ejs_function_new_utf8_with_proto (_ejs_null, "LLVMIRBuilder", (EJSClosureFunc)IRBuilder_impl, _ejs_IRBuilder_prototype);
_ejs_object_setprop_utf8 (exports, "IRBuilder", _ejs_IRBuilder);
#define OBJ_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_IRBuilder, x, IRBuilder_##x)
OBJ_METHOD(setInsertPoint);
OBJ_METHOD(setInsertPointStartBB);
OBJ_METHOD(getInsertBlock);
OBJ_METHOD(createRet);
OBJ_METHOD(createRetVoid);
OBJ_METHOD(createPointerCast);
OBJ_METHOD(createFPCast);
OBJ_METHOD(createCall);
OBJ_METHOD(createInvoke);
OBJ_METHOD(createFAdd);
OBJ_METHOD(createAlloca);
OBJ_METHOD(createLoad);
OBJ_METHOD(createStore);
OBJ_METHOD(createExtractElement);
OBJ_METHOD(createExtractValue);
OBJ_METHOD(createGetElementPointer);
OBJ_METHOD(createInBoundsGetElementPointer);
OBJ_METHOD(createStructGetElementPointer);
OBJ_METHOD(createICmpEq);
OBJ_METHOD(createICmpSGt);
OBJ_METHOD(createICmpUGE);
OBJ_METHOD(createICmpUGt);
OBJ_METHOD(createICmpULt);
OBJ_METHOD(createBr);
OBJ_METHOD(createCondBr);
OBJ_METHOD(createPhi);
OBJ_METHOD(createGlobalStringPtr);
OBJ_METHOD(createUnreachable);
OBJ_METHOD(createAnd);
OBJ_METHOD(createOr);
OBJ_METHOD(createZExt);
OBJ_METHOD(createIntToPtr);
OBJ_METHOD(createPtrToInt);
OBJ_METHOD(createBitCast);
OBJ_METHOD(createSwitch);
OBJ_METHOD(createSelect);
OBJ_METHOD(createNswSub);
OBJ_METHOD(createLandingPad);
OBJ_METHOD(createResume);
OBJ_METHOD(setCurrentDebugLocation);
#undef OBJ_METHOD
}
static EJSBool
json_value_to_ejsval(JSON_Value *v, ejsval *rv)
{
switch (json_value_get_type (v)) {
case JSONNull:
*rv = _ejs_null;
return EJS_TRUE;
case JSONString:
*rv = _ejs_string_new_utf8 (json_value_get_string(v));
return EJS_TRUE;
case JSONNumber:
*rv = NUMBER_TO_EJSVAL(json_value_get_number(v));
return EJS_TRUE;
case JSONObject: {
JSON_Object *obj = json_value_get_object (v);
*rv = _ejs_object_create (_ejs_null);
int count = json_object_get_count (obj);
for (int i = 0; i < count; i ++) {
const char *propkey = json_object_get_name (obj, i);
ejsval propval;
if (!json_value_to_ejsval (json_object_get_value (obj, propkey), &propval))
return EJS_FALSE;
_ejs_object_setprop_utf8 (*rv, propkey, propval);
}
return EJS_TRUE;
}
case JSONArray: {
JSON_Array *arr = json_value_get_array (v);
int count = json_array_get_count (arr);
*rv = _ejs_array_new (count, EJS_FALSE);
for (int i = 0; i < count; i ++) {
ejsval propkey = _ejs_number_new (i);
ejsval propval;
if (!json_value_to_ejsval (json_array_get_value (arr, i), &propval))
return EJS_FALSE;
_ejs_object_setprop (*rv, propkey, propval);
}
return EJS_TRUE;
}
case JSONBoolean:
*rv = BOOLEAN_TO_EJSVAL(json_value_get_boolean(v));
return EJS_TRUE;
case JSONError:
EJS_NOT_IMPLEMENTED();
return EJS_FALSE;
}
}
static ejsval
_ejs_wrapFdWithStream (int fd)
{
ejsval stream = _ejs_object_create(_ejs_null);
EJS_INSTALL_FUNCTION (stream, "write", _ejs_stream_write);
EJS_INSTALL_FUNCTION (stream, "end", _ejs_stream_end);
_ejs_object_setprop_utf8 (stream, "%internal_fd", NUMBER_TO_EJSVAL(fd));
return stream;
}
void
DebugLoc_init (ejsval exports)
{
_ejs_DebugLoc_specops = _ejs_Object_specops;
_ejs_DebugLoc_specops.class_name = "LLVMDebugLoc";
_ejs_DebugLoc_specops.Allocate = DebugLoc_allocate;
_ejs_gc_add_root (&_ejs_DebugLoc_prototype);
_ejs_DebugLoc_prototype = _ejs_object_create(_ejs_Object_prototype);
_ejs_DebugLoc = _ejs_function_new_utf8_with_proto (_ejs_null, "LLVMDebugLoc", (EJSClosureFunc)DebugLoc_impl, _ejs_DebugLoc_prototype);
_ejs_object_setprop_utf8 (exports, "DebugLoc", _ejs_DebugLoc);
#define OBJ_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_DebugLoc, x, DebugLoc_##x)
OBJ_METHOD(get);
}
void
DILexicalBlock_init (ejsval exports)
{
_ejs_DILexicalBlock_specops = _ejs_Object_specops;
_ejs_DILexicalBlock_specops.class_name = "LLVMDILexicalBlock";
_ejs_DILexicalBlock_specops.Allocate = DILexicalBlock_allocate;
_ejs_gc_add_root (&_ejs_DILexicalBlock_prototype);
_ejs_DILexicalBlock_prototype = _ejs_object_create(_ejs_Object_prototype);
_ejs_DILexicalBlock = _ejs_function_new_utf8_with_proto (_ejs_null, "LLVMDILexicalBlock", (EJSClosureFunc)DILexicalBlock_impl, _ejs_DILexicalBlock_prototype);
_ejs_object_setprop_utf8 (exports, "DILexicalBlock", _ejs_DILexicalBlock);
#define PROTO_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_DILexicalBlock_prototype, x, DILexicalBlock_prototype_##x)
#undef PROTO_METHOD
}
void
ConstantArray_init (ejsval exports)
{
_ejs_gc_add_root (&_ejs_ConstantArray_proto);
_ejs_ConstantArray_proto = _ejs_object_create(_ejs_Object_prototype);
_ejs_ConstantArray = _ejs_function_new_utf8_with_proto (_ejs_null, "LLVMConstantArray", (EJSClosureFunc)ConstantArray_impl, _ejs_ConstantArray_proto);
_ejs_object_setprop_utf8 (exports, "ConstantArray", _ejs_ConstantArray);
#define OBJ_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_ConstantArray, x, ConstantArray_##x)
#define PROTO_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_ConstantArray_proto, x, ConstantArray_prototype_##x)
OBJ_METHOD(get);
#undef PROTO_METHOD
#undef OBJ_METHOD
}
void
StructType_init (ejsval exports)
{
_ejs_StructType_proto = _ejs_object_create (Type_get_prototype());
_ejs_StructType = _ejs_function_new_utf8_with_proto (_ejs_null, "LLVMStructType", (EJSClosureFunc)StructType_impl, _ejs_StructType_proto);
_ejs_object_setprop_utf8 (exports, "StructType", _ejs_StructType);
#define OBJ_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_StructType, x, StructType_##x)
#define PROTO_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_StructType_proto, x, StructType_prototype_##x)
OBJ_METHOD(create);
PROTO_METHOD(dump);
PROTO_METHOD(toString);
#undef OBJ_METHOD
#undef PROTO_METHOD
}
void
Constant_init (ejsval exports)
{
_ejs_gc_add_root (&_ejs_Constant_prototype);
_ejs_Constant_prototype = _ejs_object_create(_ejs_Object_prototype);
_ejs_Constant = _ejs_function_new_utf8_with_proto (_ejs_null, "LLVMConstant", (EJSClosureFunc)Constant_impl, _ejs_Constant_prototype);
_ejs_object_setprop_utf8 (exports, "Constant", _ejs_Constant);
#define OBJ_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_Constant, x, Constant_##x)
#define PROTO_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_Constant_prototype, x, Constant_prototype_##x)
OBJ_METHOD(getNull);
OBJ_METHOD(getAggregateZero);
OBJ_METHOD(getBoolValue);
OBJ_METHOD(getIntegerValue);
#undef PROTO_METHOD
#undef OBJ_METHOD
}
void
FunctionType_init (ejsval exports)
{
_ejs_gc_add_root (&_ejs_FunctionType_proto);
_ejs_FunctionType_proto = _ejs_object_create (Type_get_prototype());
_ejs_FunctionType = _ejs_function_new_utf8_with_proto (_ejs_null, "LLVMFunctionType", (EJSClosureFunc)FunctionType_impl, _ejs_FunctionType_proto);
_ejs_object_setprop_utf8 (exports, "FunctionType", _ejs_FunctionType);
#define OBJ_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_FunctionType, x, FunctionType_##x)
#define PROTO_METHOD(x) EJS_INSTALL_ATOM_FUNCTION(_ejs_FunctionType_proto, x, FunctionType_prototype_##x)
OBJ_METHOD(get);
PROTO_METHOD(getReturnType);
PROTO_METHOD(getParamType);
PROTO_METHOD(dump);
PROTO_METHOD(toString);
#undef OBJ_METHOD
#undef PROTO_METHOD
}
ejsval
_ejs_fs_createWriteStream (ejsval env, ejsval _this, uint32_t argc, ejsval* args)
{
ejsval stream = _ejs_object_create(_ejs_null);
EJS_INSTALL_FUNCTION (stream, "write", _ejs_stream_write);
EJS_INSTALL_FUNCTION (stream, "end", _ejs_stream_end);
char *utf8_path = ucs2_to_utf8(EJSVAL_TO_FLAT_STRING(args[0]));
int fd = open (utf8_path, O_CREAT | O_TRUNC | O_WRONLY, 0777);
free (utf8_path);
if (fd == -1) {
perror ("open");
printf ("we should totally throw an exception here\n");
return _ejs_undefined;
}
_ejs_object_setprop_utf8 (stream, "%internal_fd", NUMBER_TO_EJSVAL(fd));
return stream;
}
ejsval
IRBuilder_new(llvm::IRBuilder<>* llvm_fun)
{
return _ejs_object_create (_ejs_null);
}
