Implement WeakRef Object (#4546)
Related test262 test-cases has been removed from skip list. Execpt two test-case since they need other feature to work (Finalization registry and async GC) JerryScript-DCO-1.0-Signed-off-by: Bence Gabor Kis kisbg@inf.u-szeged.hu
This commit is contained in:
@@ -207,7 +207,7 @@ ecma_op_container_free_weakset_entries (ecma_object_t *object_p, /**< object poi
|
||||
continue;
|
||||
}
|
||||
|
||||
ecma_op_container_unref_weak (ecma_get_object_from_value (*entry_p), ecma_make_object_value (object_p));
|
||||
ecma_op_object_unref_weak (ecma_get_object_from_value (*entry_p), ecma_make_object_value (object_p));
|
||||
ecma_op_container_remove_weak_entry (object_p, *entry_p);
|
||||
|
||||
*entry_p = ECMA_VALUE_EMPTY;
|
||||
@@ -238,7 +238,7 @@ ecma_op_container_free_weakmap_entries (ecma_object_t *object_p, /**< object poi
|
||||
continue;
|
||||
}
|
||||
|
||||
ecma_op_container_unref_weak (ecma_get_object_from_value (entry_p->key), ecma_make_object_value (object_p));
|
||||
ecma_op_object_unref_weak (ecma_get_object_from_value (entry_p->key), ecma_make_object_value (object_p));
|
||||
ecma_op_container_remove_weak_entry (object_p, entry_p->key);
|
||||
|
||||
ecma_free_value_if_not_object (entry_p->value);
|
||||
@@ -666,48 +666,6 @@ ecma_op_container_has (ecma_extended_object_t *map_object_p, /**< map object */
|
||||
return ecma_make_boolean_value (entry_p != NULL);
|
||||
} /* ecma_op_container_has */
|
||||
|
||||
/**
|
||||
* Set a weak reference from a container to a key object
|
||||
*/
|
||||
static void
|
||||
ecma_op_container_set_weak (ecma_object_t *const key_p, /**< key object */
|
||||
ecma_extended_object_t *const container_p) /**< container */
|
||||
{
|
||||
if (JERRY_UNLIKELY (ecma_op_object_is_fast_array (key_p)))
|
||||
{
|
||||
ecma_fast_array_convert_to_normal (key_p);
|
||||
}
|
||||
|
||||
ecma_string_t *weak_refs_string_p = ecma_get_internal_string (LIT_INTERNAL_MAGIC_STRING_WEAK_REFS);
|
||||
ecma_property_t *property_p = ecma_find_named_property (key_p, weak_refs_string_p);
|
||||
ecma_collection_t *refs_p;
|
||||
|
||||
if (property_p == NULL)
|
||||
{
|
||||
ecma_property_value_t *value_p;
|
||||
ECMA_CREATE_INTERNAL_PROPERTY (key_p, weak_refs_string_p, property_p, value_p);
|
||||
|
||||
refs_p = ecma_new_collection ();
|
||||
ECMA_SET_INTERNAL_VALUE_POINTER (value_p->value, refs_p);
|
||||
}
|
||||
else
|
||||
{
|
||||
refs_p = ECMA_GET_INTERNAL_VALUE_POINTER (ecma_collection_t, (ECMA_PROPERTY_VALUE_PTR (property_p)->value));
|
||||
}
|
||||
|
||||
const ecma_value_t container_value = ecma_make_object_value ((ecma_object_t *) container_p);
|
||||
for (uint32_t i = 0; i < refs_p->item_count; i++)
|
||||
{
|
||||
if (ecma_is_value_empty (refs_p->buffer_p[i]))
|
||||
{
|
||||
refs_p->buffer_p[i] = container_value;
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
ecma_collection_push_back (refs_p, container_value);
|
||||
} /* ecma_op_container_set_weak */
|
||||
|
||||
/**
|
||||
* Helper method for the Map.prototype.set and Set.prototype.add methods to swap the sign of the given value if needed
|
||||
*
|
||||
@@ -769,7 +727,7 @@ ecma_op_container_set (ecma_extended_object_t *map_object_p, /**< map object */
|
||||
if ((map_object_p->u.class_prop.extra_info & ECMA_CONTAINER_FLAGS_WEAK) != 0)
|
||||
{
|
||||
ecma_object_t *key_p = ecma_get_object_from_value (key_arg);
|
||||
ecma_op_container_set_weak (key_p, map_object_p);
|
||||
ecma_op_object_set_weak (key_p, (ecma_object_t *) map_object_p);
|
||||
}
|
||||
#endif /* JERRY_BUILTIN_WEAKMAP || JERRY_BUILTIN_WEAKSET */
|
||||
}
|
||||
@@ -906,38 +864,11 @@ ecma_op_container_delete_weak (ecma_extended_object_t *map_object_p, /**< map ob
|
||||
ecma_op_internal_buffer_delete (container_p, (ecma_container_pair_t *) entry_p, lit_id);
|
||||
|
||||
ecma_object_t *key_object_p = ecma_get_object_from_value (key_arg);
|
||||
ecma_op_container_unref_weak (key_object_p, ecma_make_object_value ((ecma_object_t *) map_object_p));
|
||||
ecma_op_object_unref_weak (key_object_p, ecma_make_object_value ((ecma_object_t *) map_object_p));
|
||||
|
||||
return ECMA_VALUE_TRUE;
|
||||
} /* ecma_op_container_delete_weak */
|
||||
|
||||
/**
|
||||
* Helper function to remove a weak reference to an object.
|
||||
*
|
||||
* @return ecma value
|
||||
* Returned value must be freed with ecma_free_value.
|
||||
*/
|
||||
void
|
||||
ecma_op_container_unref_weak (ecma_object_t *object_p, /**< this argument */
|
||||
ecma_value_t ref_holder) /**< key argument */
|
||||
{
|
||||
ecma_string_t *weak_refs_string_p = ecma_get_internal_string (LIT_INTERNAL_MAGIC_STRING_WEAK_REFS);
|
||||
|
||||
ecma_property_t *property_p = ecma_find_named_property (object_p, weak_refs_string_p);
|
||||
JERRY_ASSERT (property_p != NULL);
|
||||
|
||||
ecma_collection_t *refs_p = ECMA_GET_INTERNAL_VALUE_POINTER (ecma_collection_t,
|
||||
ECMA_PROPERTY_VALUE_PTR (property_p)->value);
|
||||
for (uint32_t i = 0; i < refs_p->item_count; i++)
|
||||
{
|
||||
if (refs_p->buffer_p[i] == ref_holder)
|
||||
{
|
||||
refs_p->buffer_p[i] = ECMA_VALUE_EMPTY;
|
||||
break;
|
||||
}
|
||||
}
|
||||
} /* ecma_op_container_unref_weak */
|
||||
|
||||
/**
|
||||
* Helper function to remove a key/value pair from a weak container object
|
||||
*/
|
||||
|
||||
@@ -67,7 +67,6 @@ ecma_value_t ecma_op_container_delete (ecma_extended_object_t *map_object_p, ecm
|
||||
lit_magic_string_id_t lit_id);
|
||||
ecma_value_t ecma_op_container_delete_weak (ecma_extended_object_t *map_object_p, ecma_value_t key_arg,
|
||||
lit_magic_string_id_t lit_id);
|
||||
void ecma_op_container_unref_weak (ecma_object_t *object_p, ecma_value_t ref_holder);
|
||||
void ecma_op_container_remove_weak_entry (ecma_object_t *container_p, ecma_value_t key_arg);
|
||||
void ecma_op_container_free_entries (ecma_object_t *object_p);
|
||||
ecma_value_t ecma_op_container_create_iterator (ecma_value_t this_arg,
|
||||
|
||||
@@ -2650,6 +2650,9 @@ ecma_object_check_class_name_is_object (ecma_object_t *obj_p) /**< object */
|
||||
#if JERRY_BUILTIN_WEAKMAP
|
||||
|| ecma_builtin_is (obj_p, ECMA_BUILTIN_ID_WEAKMAP_PROTOTYPE)
|
||||
#endif /* JERRY_BUILTIN_WEAKMAP */
|
||||
#if JERRY_BUILTIN_WEAKREF
|
||||
|| ecma_builtin_is (obj_p, ECMA_BUILTIN_ID_WEAKREF_PROTOTYPE)
|
||||
#endif /* JERRY_BUILTIN_WEAKREF */
|
||||
#if JERRY_BUILTIN_WEAKSET
|
||||
|| ecma_builtin_is (obj_p, ECMA_BUILTIN_ID_WEAKSET_PROTOTYPE)
|
||||
#endif /* JERRY_BUILTIN_WEAKSET */
|
||||
@@ -3239,6 +3242,82 @@ ecma_op_ordinary_object_has_own_property (ecma_object_t *object_p, /**< the obje
|
||||
return property != ECMA_PROPERTY_TYPE_NOT_FOUND && property != ECMA_PROPERTY_TYPE_NOT_FOUND_AND_STOP;
|
||||
} /* ecma_op_ordinary_object_has_own_property */
|
||||
|
||||
#if JERRY_BUILTIN_WEAKREF || JERRY_BUILTIN_WEAKSET || JERRY_BUILTIN_WEAKMAP
|
||||
|
||||
/**
|
||||
* Set a weak reference from a container or WeakRefObject to a key object
|
||||
*/
|
||||
void
|
||||
ecma_op_object_set_weak (ecma_object_t *object_p, /**< key object */
|
||||
ecma_object_t *target_p) /**< target object */
|
||||
{
|
||||
if (JERRY_UNLIKELY (ecma_op_object_is_fast_array (object_p)))
|
||||
{
|
||||
ecma_fast_array_convert_to_normal (object_p);
|
||||
}
|
||||
|
||||
ecma_string_t *weak_refs_string_p = ecma_get_internal_string (LIT_INTERNAL_MAGIC_STRING_WEAK_REFS);
|
||||
ecma_property_t *property_p = ecma_find_named_property (object_p, weak_refs_string_p);
|
||||
ecma_collection_t *refs_p;
|
||||
|
||||
if (property_p == NULL)
|
||||
{
|
||||
ecma_property_value_t *value_p;
|
||||
ECMA_CREATE_INTERNAL_PROPERTY (object_p, weak_refs_string_p, property_p, value_p);
|
||||
|
||||
refs_p = ecma_new_collection ();
|
||||
ECMA_SET_INTERNAL_VALUE_POINTER (value_p->value, refs_p);
|
||||
}
|
||||
else
|
||||
{
|
||||
refs_p = ECMA_GET_INTERNAL_VALUE_POINTER (ecma_collection_t, (ECMA_PROPERTY_VALUE_PTR (property_p)->value));
|
||||
}
|
||||
|
||||
const ecma_value_t target_value = ecma_make_object_value ((ecma_object_t *) target_p);
|
||||
for (uint32_t i = 0; i < refs_p->item_count; i++)
|
||||
{
|
||||
if (ecma_is_value_empty (refs_p->buffer_p[i]))
|
||||
{
|
||||
refs_p->buffer_p[i] = target_value;
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
ecma_collection_push_back (refs_p, target_value);
|
||||
} /* ecma_op_object_set_weak */
|
||||
|
||||
/**
|
||||
* Helper function to remove a weak reference to an object.
|
||||
*
|
||||
* @return ecma value
|
||||
* Returned value must be freed with ecma_free_value.
|
||||
*/
|
||||
void
|
||||
ecma_op_object_unref_weak (ecma_object_t *object_p, /**< this argument */
|
||||
ecma_value_t ref_holder) /**< key argument */
|
||||
{
|
||||
ecma_string_t *weak_refs_string_p = ecma_get_internal_string (LIT_INTERNAL_MAGIC_STRING_WEAK_REFS);
|
||||
|
||||
ecma_property_t *property_p = ecma_find_named_property (object_p, weak_refs_string_p);
|
||||
JERRY_ASSERT (property_p != NULL);
|
||||
|
||||
ecma_collection_t *refs_p = ECMA_GET_INTERNAL_VALUE_POINTER (ecma_collection_t,
|
||||
ECMA_PROPERTY_VALUE_PTR (property_p)->value);
|
||||
ecma_value_t *buffer_p = refs_p->buffer_p;
|
||||
|
||||
while (true)
|
||||
{
|
||||
if (*buffer_p == ref_holder)
|
||||
{
|
||||
*buffer_p = ECMA_VALUE_EMPTY;
|
||||
return;
|
||||
}
|
||||
JERRY_ASSERT (buffer_p < refs_p->buffer_p + refs_p->item_count);
|
||||
buffer_p++;
|
||||
}
|
||||
} /* ecma_op_object_unref_weak */
|
||||
|
||||
#endif /* JERRY_BUILTIN_WEAKREF || JERRY_BUILTIN_WEAKSET || JERRY_BUILTIN_WEAKMAP */
|
||||
/**
|
||||
* Raise property redefinition error
|
||||
*
|
||||
|
||||
@@ -109,6 +109,10 @@ ecma_value_t ecma_op_species_constructor (ecma_object_t *this_value, ecma_builti
|
||||
ecma_value_t ecma_op_invoke_by_symbol_id (ecma_value_t object, lit_magic_string_id_t magic_string_id,
|
||||
ecma_value_t *args_p, uint32_t args_len);
|
||||
#endif /* JERRY_ESNEXT */
|
||||
#if JERRY_BUILTIN_WEAKREF || JERRY_BUILTIN_WEAKSET || JERRY_BUILTIN_WEAKMAP
|
||||
void ecma_op_object_set_weak (ecma_object_t *object_p, ecma_object_t *target_p);
|
||||
void ecma_op_object_unref_weak (ecma_object_t *object_p, ecma_value_t ref_holder);
|
||||
#endif /* JERRY_BUILTIN_WEAKREF || JERRY_BUILTIN_WEAKSET || JERRY_BUILTIN_WEAKMAP */
|
||||
ecma_value_t ecma_op_invoke (ecma_value_t object, ecma_string_t *property_name_p, ecma_value_t *args_p,
|
||||
uint32_t args_len);
|
||||
ecma_value_t ecma_op_invoke_by_magic_id (ecma_value_t object, lit_magic_string_id_t magic_string_id,
|
||||
|
||||
Reference in New Issue
Block a user