#include #include #include "../common.h" #include "../entry_point.h" #include "test_null.h" static int test_value = 3; static napi_value Get(napi_env env, napi_callback_info info) { size_t argc = 2; napi_value args[2]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 2, "Wrong number of arguments"); napi_valuetype valuetype0; NODE_API_CALL(env, napi_typeof(env, args[0], &valuetype0)); NODE_API_ASSERT(env, valuetype0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_valuetype valuetype1; NODE_API_CALL(env, napi_typeof(env, args[1], &valuetype1)); NODE_API_ASSERT(env, valuetype1 == napi_string || valuetype1 == napi_symbol, "Wrong type of arguments. Expects a string or symbol as second."); napi_value object = args[0]; napi_value output; NODE_API_CALL(env, napi_get_property(env, object, args[1], &output)); return output; } static napi_value GetNamed(napi_env env, napi_callback_info info) { size_t argc = 2; napi_value args[2]; char key[256] = ""; size_t key_length; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 2, "Wrong number of arguments"); napi_valuetype value_type0; NODE_API_CALL(env, napi_typeof(env, args[0], &value_type0)); NODE_API_ASSERT(env, value_type0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_valuetype value_type1; NODE_API_CALL(env, napi_typeof(env, args[1], &value_type1)); NODE_API_ASSERT(env, value_type1 == napi_string, "Wrong type of arguments. Expects a string as second."); napi_value object = args[0]; NODE_API_CALL(env, napi_get_value_string_utf8(env, args[1], key, 255, &key_length)); key[255] = 0; NODE_API_ASSERT(env, key_length <= 255, "Cannot accommodate keys longer than 255 bytes"); napi_value output; NODE_API_CALL(env, napi_get_named_property(env, object, key, &output)); return output; } static napi_value GetPropertyNames(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value args[1]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 1, "Wrong number of arguments"); napi_valuetype value_type0; NODE_API_CALL(env, napi_typeof(env, args[0], &value_type0)); NODE_API_ASSERT(env, value_type0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_value output; NODE_API_CALL(env, napi_get_property_names(env, args[0], &output)); return output; } static napi_value GetSymbolNames(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value args[1]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 1, "Wrong number of arguments"); napi_valuetype value_type0; NODE_API_CALL(env, napi_typeof(env, args[0], &value_type0)); NODE_API_ASSERT(env, value_type0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_value output; NODE_API_CALL(env, napi_get_all_property_names( env, args[0], napi_key_include_prototypes, napi_key_skip_strings, napi_key_numbers_to_strings, &output)); return output; } static napi_value GetEnumerableWritableNames(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value args[1]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 1, "Wrong number of arguments"); napi_valuetype value_type0; NODE_API_CALL(env, napi_typeof(env, args[0], &value_type0)); NODE_API_ASSERT( env, value_type0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_value output; NODE_API_CALL( env, napi_get_all_property_names(env, args[0], napi_key_include_prototypes, napi_key_enumerable | napi_key_writable, napi_key_numbers_to_strings, &output)); return output; } static napi_value GetOwnWritableNames(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value args[1]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 1, "Wrong number of arguments"); napi_valuetype value_type0; NODE_API_CALL(env, napi_typeof(env, args[0], &value_type0)); NODE_API_ASSERT( env, value_type0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_value output; NODE_API_CALL(env, napi_get_all_property_names(env, args[0], napi_key_own_only, napi_key_writable, napi_key_numbers_to_strings, &output)); return output; } static napi_value GetEnumerableConfigurableNames(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value args[1]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 1, "Wrong number of arguments"); napi_valuetype value_type0; NODE_API_CALL(env, napi_typeof(env, args[0], &value_type0)); NODE_API_ASSERT( env, value_type0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_value output; NODE_API_CALL( env, napi_get_all_property_names(env, args[0], napi_key_include_prototypes, napi_key_enumerable | napi_key_configurable, napi_key_numbers_to_strings, &output)); return output; } static napi_value GetOwnConfigurableNames(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value args[1]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 1, "Wrong number of arguments"); napi_valuetype value_type0; NODE_API_CALL(env, napi_typeof(env, args[0], &value_type0)); NODE_API_ASSERT( env, value_type0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_value output; NODE_API_CALL(env, napi_get_all_property_names(env, args[0], napi_key_own_only, napi_key_configurable, napi_key_numbers_to_strings, &output)); return output; } static napi_value Set(napi_env env, napi_callback_info info) { size_t argc = 3; napi_value args[3]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 3, "Wrong number of arguments"); napi_valuetype valuetype0; NODE_API_CALL(env, napi_typeof(env, args[0], &valuetype0)); NODE_API_ASSERT(env, valuetype0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_valuetype valuetype1; NODE_API_CALL(env, napi_typeof(env, args[1], &valuetype1)); NODE_API_ASSERT(env, valuetype1 == napi_string || valuetype1 == napi_symbol, "Wrong type of arguments. Expects a string or symbol as second."); NODE_API_CALL(env, napi_set_property(env, args[0], args[1], args[2])); napi_value valuetrue; NODE_API_CALL(env, napi_get_boolean(env, true, &valuetrue)); return valuetrue; } static napi_value SetNamed(napi_env env, napi_callback_info info) { size_t argc = 3; napi_value args[3]; char key[256] = ""; size_t key_length; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 3, "Wrong number of arguments"); napi_valuetype value_type0; NODE_API_CALL(env, napi_typeof(env, args[0], &value_type0)); NODE_API_ASSERT(env, value_type0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_valuetype value_type1; NODE_API_CALL(env, napi_typeof(env, args[1], &value_type1)); NODE_API_ASSERT(env, value_type1 == napi_string, "Wrong type of arguments. Expects a string as second."); NODE_API_CALL(env, napi_get_value_string_utf8(env, args[1], key, 255, &key_length)); key[255] = 0; NODE_API_ASSERT(env, key_length <= 255, "Cannot accommodate keys longer than 255 bytes"); NODE_API_CALL(env, napi_set_named_property(env, args[0], key, args[2])); napi_value value_true; NODE_API_CALL(env, napi_get_boolean(env, true, &value_true)); return value_true; } static napi_value Has(napi_env env, napi_callback_info info) { size_t argc = 2; napi_value args[2]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 2, "Wrong number of arguments"); napi_valuetype valuetype0; NODE_API_CALL(env, napi_typeof(env, args[0], &valuetype0)); NODE_API_ASSERT(env, valuetype0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_valuetype valuetype1; NODE_API_CALL(env, napi_typeof(env, args[1], &valuetype1)); NODE_API_ASSERT(env, valuetype1 == napi_string || valuetype1 == napi_symbol, "Wrong type of arguments. Expects a string or symbol as second."); bool has_property; NODE_API_CALL(env, napi_has_property(env, args[0], args[1], &has_property)); napi_value ret; NODE_API_CALL(env, napi_get_boolean(env, has_property, &ret)); return ret; } static napi_value HasNamed(napi_env env, napi_callback_info info) { size_t argc = 2; napi_value args[2]; char key[256] = ""; size_t key_length; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 2, "Wrong number of arguments"); napi_valuetype value_type0; NODE_API_CALL(env, napi_typeof(env, args[0], &value_type0)); NODE_API_ASSERT(env, value_type0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_valuetype value_type1; NODE_API_CALL(env, napi_typeof(env, args[1], &value_type1)); NODE_API_ASSERT(env, value_type1 == napi_string || value_type1 == napi_symbol, "Wrong type of arguments. Expects a string as second."); NODE_API_CALL(env, napi_get_value_string_utf8(env, args[1], key, 255, &key_length)); key[255] = 0; NODE_API_ASSERT(env, key_length <= 255, "Cannot accommodate keys longer than 255 bytes"); bool has_property; NODE_API_CALL(env, napi_has_named_property(env, args[0], key, &has_property)); napi_value ret; NODE_API_CALL(env, napi_get_boolean(env, has_property, &ret)); return ret; } static napi_value HasOwn(napi_env env, napi_callback_info info) { size_t argc = 2; napi_value args[2]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc == 2, "Wrong number of arguments"); napi_valuetype valuetype0; NODE_API_CALL(env, napi_typeof(env, args[0], &valuetype0)); NODE_API_ASSERT(env, valuetype0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); // napi_valuetype valuetype1; // NODE_API_CALL(env, napi_typeof(env, args[1], &valuetype1)); // // NODE_API_ASSERT(env, valuetype1 == napi_string || valuetype1 == napi_symbol, // "Wrong type of arguments. Expects a string or symbol as second."); bool has_property; NODE_API_CALL(env, napi_has_own_property(env, args[0], args[1], &has_property)); napi_value ret; NODE_API_CALL(env, napi_get_boolean(env, has_property, &ret)); return ret; } static napi_value Delete(napi_env env, napi_callback_info info) { size_t argc = 2; napi_value args[2]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc == 2, "Wrong number of arguments"); napi_valuetype valuetype0; NODE_API_CALL(env, napi_typeof(env, args[0], &valuetype0)); NODE_API_ASSERT(env, valuetype0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_valuetype valuetype1; NODE_API_CALL(env, napi_typeof(env, args[1], &valuetype1)); NODE_API_ASSERT(env, valuetype1 == napi_string || valuetype1 == napi_symbol, "Wrong type of arguments. Expects a string or symbol as second."); bool result; napi_value ret; NODE_API_CALL(env, napi_delete_property(env, args[0], args[1], &result)); NODE_API_CALL(env, napi_get_boolean(env, result, &ret)); return ret; } static napi_value New(napi_env env, napi_callback_info info) { napi_value ret; NODE_API_CALL(env, napi_create_object(env, &ret)); napi_value num; NODE_API_CALL(env, napi_create_int32(env, 987654321, &num)); NODE_API_CALL(env, napi_set_named_property(env, ret, "test_number", num)); napi_value str; const char* str_val = "test string"; size_t str_len = strlen(str_val); NODE_API_CALL(env, napi_create_string_utf8(env, str_val, str_len, &str)); NODE_API_CALL(env, napi_set_named_property(env, ret, "test_string", str)); return ret; } static napi_value Inflate(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value args[1]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); NODE_API_ASSERT(env, argc >= 1, "Wrong number of arguments"); napi_valuetype valuetype0; NODE_API_CALL(env, napi_typeof(env, args[0], &valuetype0)); NODE_API_ASSERT(env, valuetype0 == napi_object, "Wrong type of arguments. Expects an object as first argument."); napi_value obj = args[0]; napi_value propertynames; NODE_API_CALL(env, napi_get_property_names(env, obj, &propertynames)); uint32_t i, length; NODE_API_CALL(env, napi_get_array_length(env, propertynames, &length)); for (i = 0; i < length; i++) { napi_value property_str; NODE_API_CALL(env, napi_get_element(env, propertynames, i, &property_str)); napi_value value; NODE_API_CALL(env, napi_get_property(env, obj, property_str, &value)); double double_val; NODE_API_CALL(env, napi_get_value_double(env, value, &double_val)); NODE_API_CALL(env, napi_create_double(env, double_val + 1, &value)); NODE_API_CALL(env, napi_set_property(env, obj, property_str, value)); } return obj; } static napi_value Wrap(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value arg; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, &arg, NULL, NULL)); NODE_API_CALL(env, napi_wrap(env, arg, &test_value, NULL, NULL, NULL)); return NULL; } static napi_value Unwrap(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value arg; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, &arg, NULL, NULL)); void* data; NODE_API_CALL(env, napi_unwrap(env, arg, &data)); bool is_expected = (data != NULL && *(int*)data == 3); napi_value result; NODE_API_CALL(env, napi_get_boolean(env, is_expected, &result)); return result; } static napi_value TestSetProperty(napi_env env, napi_callback_info info) { napi_status status; napi_value object, key, value; NODE_API_CALL(env, napi_create_object(env, &object)); NODE_API_CALL(env, napi_create_string_utf8(env, "", NAPI_AUTO_LENGTH, &key)); NODE_API_CALL(env, napi_create_object(env, &value)); status = napi_set_property(NULL, object, key, value); add_returned_status(env, "envIsNull", object, "Invalid argument", napi_invalid_arg, status); napi_set_property(env, NULL, key, value); add_last_status(env, "objectIsNull", object); napi_set_property(env, object, NULL, value); add_last_status(env, "keyIsNull", object); napi_set_property(env, object, key, NULL); add_last_status(env, "valueIsNull", object); return object; } static napi_value TestHasProperty(napi_env env, napi_callback_info info) { napi_status status; napi_value object, key; bool result; NODE_API_CALL(env, napi_create_object(env, &object)); NODE_API_CALL(env, napi_create_string_utf8(env, "", NAPI_AUTO_LENGTH, &key)); status = napi_has_property(NULL, object, key, &result); add_returned_status(env, "envIsNull", object, "Invalid argument", napi_invalid_arg, status); napi_has_property(env, NULL, key, &result); add_last_status(env, "objectIsNull", object); napi_has_property(env, object, NULL, &result); add_last_status(env, "keyIsNull", object); napi_has_property(env, object, key, NULL); add_last_status(env, "resultIsNull", object); return object; } static napi_value TestGetProperty(napi_env env, napi_callback_info info) { napi_status status; napi_value object, key, result; NODE_API_CALL(env, napi_create_object(env, &object)); NODE_API_CALL(env, napi_create_string_utf8(env, "", NAPI_AUTO_LENGTH, &key)); NODE_API_CALL(env, napi_create_object(env, &result)); status = napi_get_property(NULL, object, key, &result); add_returned_status(env, "envIsNull", object, "Invalid argument", napi_invalid_arg, status); napi_get_property(env, NULL, key, &result); add_last_status(env, "objectIsNull", object); napi_get_property(env, object, NULL, &result); add_last_status(env, "keyIsNull", object); napi_get_property(env, object, key, NULL); add_last_status(env, "resultIsNull", object); return object; } static napi_value TestFreeze(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value args[1]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); napi_value object = args[0]; NODE_API_CALL(env, napi_object_freeze(env, object)); return object; } static napi_value TestSeal(napi_env env, napi_callback_info info) { size_t argc = 1; napi_value args[1]; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, args, NULL, NULL)); napi_value object = args[0]; NODE_API_CALL(env, napi_object_seal(env, object)); return object; } // We create two type tags. They are basically 128-bit UUIDs. #define TYPE_TAG_COUNT 5 static const napi_type_tag type_tags[TYPE_TAG_COUNT] = { {0xdaf987b3cc62481a, 0xb745b0497f299531}, {0xbb7936c374084d9b, 0xa9548d0762eeedb9}, {0xa5ed9ce2e4c00c38, 0}, {0, 0}, {0xa5ed9ce2e4c00c38, 0xdaf987b3cc62481a}, }; #define VALIDATE_TYPE_INDEX(env, type_index) \ do { \ if ((type_index) >= TYPE_TAG_COUNT) { \ NODE_API_CALL((env), \ napi_throw_range_error((env), \ "NODE_API_TEST_INVALID_TYPE_INDEX", \ "Invalid type index")); \ } \ } while (0) static napi_value TypeTaggedInstance(napi_env env, napi_callback_info info) { size_t argc = 1; uint32_t type_index; napi_value instance, which_type; napi_type_tag tag; // Below we copy the tag before setting it to prevent bugs where a pointer // to the tag (instead of the 128-bit tag value) is stored. NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, &which_type, NULL, NULL)); NODE_API_CALL(env, napi_get_value_uint32(env, which_type, &type_index)); VALIDATE_TYPE_INDEX(env, type_index); NODE_API_CALL(env, napi_create_object(env, &instance)); tag = type_tags[type_index]; NODE_API_CALL(env, napi_type_tag_object(env, instance, &tag)); // Since the tag passed to napi_type_tag_object() was copied to the stack, // a type tagging implementation that uses a pointer instead of the // tag value would end up pointing to stack memory. // When CheckTypeTag() is called later on, it might be the case that this // stack address has been left untouched by accident (if no subsequent // function call has clobbered it), which means the pointer would still // point to valid data. // To make sure that tags are stored by value and not by reference, // clear this copy; any implementation using a pointer would end up with // random stack data or { 0, 0 }, but not the original tag value, and fail. memset(&tag, 0, sizeof(tag)); return instance; } // V8 will not allow us to construct an external with a NULL data value. #define IN_LIEU_OF_NULL ((void*)0x1) static napi_value PlainExternal(napi_env env, napi_callback_info info) { napi_value instance; NODE_API_CALL( env, napi_create_external(env, IN_LIEU_OF_NULL, NULL, NULL, &instance)); return instance; } static napi_value TypeTaggedExternal(napi_env env, napi_callback_info info) { size_t argc = 1; uint32_t type_index; napi_value instance, which_type; napi_type_tag tag; // See TypeTaggedInstance() for an explanation about why we copy the tag // to the stack and why we call memset on it after the external is tagged. NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, &which_type, NULL, NULL)); NODE_API_CALL(env, napi_get_value_uint32(env, which_type, &type_index)); VALIDATE_TYPE_INDEX(env, type_index); NODE_API_CALL( env, napi_create_external(env, IN_LIEU_OF_NULL, NULL, NULL, &instance)); tag = type_tags[type_index]; NODE_API_CALL(env, napi_type_tag_object(env, instance, &tag)); memset(&tag, 0, sizeof(tag)); return instance; } static napi_value CheckTypeTag(napi_env env, napi_callback_info info) { size_t argc = 2; bool result; napi_value argv[2], js_result; uint32_t type_index; NODE_API_CALL(env, napi_get_cb_info(env, info, &argc, argv, NULL, NULL)); NODE_API_CALL(env, napi_get_value_uint32(env, argv[0], &type_index)); VALIDATE_TYPE_INDEX(env, type_index); NODE_API_CALL(env, napi_check_object_type_tag(env, argv[1], &type_tags[type_index], &result)); NODE_API_CALL(env, napi_get_boolean(env, result, &js_result)); return js_result; } EXTERN_C_START napi_value Init(napi_env env, napi_value exports) { napi_property_descriptor descriptors[] = { DECLARE_NODE_API_PROPERTY("Get", Get), DECLARE_NODE_API_PROPERTY("GetNamed", GetNamed), DECLARE_NODE_API_PROPERTY("GetPropertyNames", GetPropertyNames), DECLARE_NODE_API_PROPERTY("GetSymbolNames", GetSymbolNames), DECLARE_NODE_API_PROPERTY("GetEnumerableWritableNames", GetEnumerableWritableNames), DECLARE_NODE_API_PROPERTY("GetOwnWritableNames", GetOwnWritableNames), DECLARE_NODE_API_PROPERTY("GetEnumerableConfigurableNames", GetEnumerableConfigurableNames), DECLARE_NODE_API_PROPERTY("GetOwnConfigurableNames", GetOwnConfigurableNames), DECLARE_NODE_API_PROPERTY("Set", Set), DECLARE_NODE_API_PROPERTY("SetNamed", SetNamed), DECLARE_NODE_API_PROPERTY("Has", Has), DECLARE_NODE_API_PROPERTY("HasNamed", HasNamed), DECLARE_NODE_API_PROPERTY("HasOwn", HasOwn), DECLARE_NODE_API_PROPERTY("Delete", Delete), DECLARE_NODE_API_PROPERTY("New", New), DECLARE_NODE_API_PROPERTY("Inflate", Inflate), DECLARE_NODE_API_PROPERTY("Wrap", Wrap), DECLARE_NODE_API_PROPERTY("Unwrap", Unwrap), DECLARE_NODE_API_PROPERTY("TestSetProperty", TestSetProperty), DECLARE_NODE_API_PROPERTY("TestHasProperty", TestHasProperty), DECLARE_NODE_API_PROPERTY("TypeTaggedInstance", TypeTaggedInstance), DECLARE_NODE_API_PROPERTY("TypeTaggedExternal", TypeTaggedExternal), DECLARE_NODE_API_PROPERTY("PlainExternal", PlainExternal), DECLARE_NODE_API_PROPERTY("CheckTypeTag", CheckTypeTag), DECLARE_NODE_API_PROPERTY("TestGetProperty", TestGetProperty), DECLARE_NODE_API_PROPERTY("TestFreeze", TestFreeze), DECLARE_NODE_API_PROPERTY("TestSeal", TestSeal), }; init_test_null(env, exports); NODE_API_CALL(env, napi_define_properties( env, exports, sizeof(descriptors) / sizeof(*descriptors), descriptors)); return exports; } EXTERN_C_END