mirror of
https://github.com/jerryscript-project/jerryscript.git
synced 2025-12-15 16:29:21 +00:00
Since the project is now hosted at the JS Foundation we can move to unified copyright notices for the project. Starting with this commit all future contributions to the project should only carry the following copyright notice (except for third-party code which requires copyright information to be preserved): "Copyright JS Foundation and other contributors, http://js.foundation" (without the quotes) This avoids cluttering the codebase with contributor-specific copyright notices which have a higher maintenance overhead and tend to get outdated quickly. Also dropping the year from the copyright notices helps to avoid yearly code changes just to update the copyright notices. Note that each contributor still retains full copyright ownership of his/her contributions and the respective authorship is tracked very accurately via Git. JerryScript-DCO-1.0-Signed-off-by: Tilmann Scheller t.scheller@samsung.com
848 lines
24 KiB
C
848 lines
24 KiB
C
/* Copyright JS Foundation and other contributors, http://js.foundation
|
|
*
|
|
* Licensed under the Apache License, Version 2.0 (the "License");
|
|
* you may not use this file except in compliance with the License.
|
|
* You may obtain a copy of the License at
|
|
*
|
|
* http://www.apache.org/licenses/LICENSE-2.0
|
|
*
|
|
* Unless required by applicable law or agreed to in writing, software
|
|
* distributed under the License is distributed on an "AS IS" BASIS
|
|
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
|
* See the License for the specific language governing permissions and
|
|
* limitations under the License.
|
|
*/
|
|
|
|
#include "ecma-alloc.h"
|
|
#include "ecma-array-object.h"
|
|
#include "ecma-builtin-helpers.h"
|
|
#include "ecma-builtins.h"
|
|
#include "ecma-conversion.h"
|
|
#include "ecma-exceptions.h"
|
|
#include "ecma-gc.h"
|
|
#include "ecma-globals.h"
|
|
#include "ecma-helpers.h"
|
|
#include "ecma-objects.h"
|
|
#include "ecma-objects-general.h"
|
|
#include "ecma-try-catch-macro.h"
|
|
#include "jrt.h"
|
|
|
|
#define ECMA_BUILTINS_INTERNAL
|
|
#include "ecma-builtins-internal.h"
|
|
|
|
#define BUILTIN_INC_HEADER_NAME "ecma-builtin-object.inc.h"
|
|
#define BUILTIN_UNDERSCORED_ID object
|
|
#include "ecma-builtin-internal-routines-template.inc.h"
|
|
|
|
/** \addtogroup ecma ECMA
|
|
* @{
|
|
*
|
|
* \addtogroup ecmabuiltins
|
|
* @{
|
|
*
|
|
* \addtogroup object ECMA Object object built-in
|
|
* @{
|
|
*/
|
|
|
|
/**
|
|
* Handle calling [[Call]] of built-in Object object
|
|
*
|
|
* @return ecma value
|
|
*/
|
|
ecma_value_t
|
|
ecma_builtin_object_dispatch_call (const ecma_value_t *arguments_list_p, /**< arguments list */
|
|
ecma_length_t arguments_list_len) /**< number of arguments */
|
|
{
|
|
JERRY_ASSERT (arguments_list_len == 0 || arguments_list_p != NULL);
|
|
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
if (arguments_list_len == 0
|
|
|| ecma_is_value_undefined (arguments_list_p[0])
|
|
|| ecma_is_value_null (arguments_list_p[0]))
|
|
{
|
|
ret_value = ecma_builtin_object_dispatch_construct (arguments_list_p, arguments_list_len);
|
|
}
|
|
else
|
|
{
|
|
ret_value = ecma_op_to_object (arguments_list_p[0]);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_dispatch_call */
|
|
|
|
/**
|
|
* Handle calling [[Construct]] of built-in Object object
|
|
*
|
|
* @return ecma value
|
|
*/
|
|
ecma_value_t
|
|
ecma_builtin_object_dispatch_construct (const ecma_value_t *arguments_list_p, /**< arguments list */
|
|
ecma_length_t arguments_list_len) /**< number of arguments */
|
|
{
|
|
JERRY_ASSERT (arguments_list_len == 0 || arguments_list_p != NULL);
|
|
|
|
if (arguments_list_len == 0)
|
|
{
|
|
ecma_object_t *obj_p = ecma_op_create_object_object_noarg ();
|
|
|
|
return ecma_make_object_value (obj_p);
|
|
}
|
|
else
|
|
{
|
|
return ecma_op_create_object_object_arg (arguments_list_p[0]);
|
|
}
|
|
} /* ecma_builtin_object_dispatch_construct */
|
|
|
|
/**
|
|
* The Object object's 'getPrototypeOf' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.2
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_get_prototype_of (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg) /**< routine's argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
/* 1. */
|
|
if (!ecma_is_value_object (arg))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
/* 2. */
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg);
|
|
ecma_object_t *prototype_p = ecma_get_object_prototype (obj_p);
|
|
|
|
if (prototype_p)
|
|
{
|
|
ret_value = ecma_make_object_value (prototype_p);
|
|
ecma_ref_object (prototype_p);
|
|
}
|
|
else
|
|
{
|
|
ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_NULL);
|
|
}
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_get_prototype_of */
|
|
|
|
/**
|
|
* The Object object's 'getOwnPropertyNames' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.4
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_get_own_property_names (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg) /**< routine's argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
if (!ecma_is_value_object (arg))
|
|
{
|
|
/* 1. */
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg);
|
|
/* 2-5. */
|
|
ret_value = ecma_builtin_helper_object_get_properties (obj_p, false);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_get_own_property_names */
|
|
|
|
/**
|
|
* The Object object's 'seal' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.8
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_seal (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg) /**< routine's argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
/* 1. */
|
|
if (!ecma_is_value_object (arg))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
/* 2. */
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg);
|
|
|
|
ecma_collection_header_t *props_p = ecma_op_object_get_property_names (obj_p, false, false, false);
|
|
|
|
ecma_collection_iterator_t iter;
|
|
ecma_collection_iterator_init (&iter, props_p);
|
|
|
|
while (ecma_collection_iterator_next (&iter)
|
|
&& ecma_is_value_empty (ret_value))
|
|
{
|
|
ecma_string_t *property_name_p = ecma_get_string_from_value (*iter.current_value_p);
|
|
|
|
/* 2.a */
|
|
ecma_property_descriptor_t prop_desc;
|
|
|
|
if (!ecma_op_object_get_own_property_descriptor (obj_p, property_name_p, &prop_desc))
|
|
{
|
|
continue;
|
|
}
|
|
|
|
/* 2.b */
|
|
prop_desc.is_configurable = false;
|
|
|
|
/* 2.c */
|
|
ECMA_TRY_CATCH (define_own_prop_ret,
|
|
ecma_op_object_define_own_property (obj_p,
|
|
property_name_p,
|
|
&prop_desc,
|
|
true),
|
|
ret_value);
|
|
ECMA_FINALIZE (define_own_prop_ret);
|
|
|
|
ecma_free_property_descriptor (&prop_desc);
|
|
}
|
|
|
|
ecma_free_values_collection (props_p, true);
|
|
|
|
if (ecma_is_value_empty (ret_value))
|
|
{
|
|
/* 3. */
|
|
ecma_set_object_extensible (obj_p, false);
|
|
|
|
/* 4. */
|
|
ret_value = ecma_copy_value (arg);
|
|
}
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_seal */
|
|
|
|
/**
|
|
* The Object object's 'freeze' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.9
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_freeze (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg) /**< routine's argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
/* 1. */
|
|
if (!ecma_is_value_object (arg))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
/* 2. */
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg);
|
|
|
|
ecma_collection_header_t *props_p = ecma_op_object_get_property_names (obj_p, false, false, false);
|
|
|
|
|
|
ecma_collection_iterator_t iter;
|
|
ecma_collection_iterator_init (&iter, props_p);
|
|
|
|
while (ecma_collection_iterator_next (&iter)
|
|
&& ecma_is_value_empty (ret_value))
|
|
{
|
|
ecma_string_t *property_name_p = ecma_get_string_from_value (*iter.current_value_p);
|
|
|
|
/* 2.a */
|
|
ecma_property_descriptor_t prop_desc;
|
|
|
|
if (!ecma_op_object_get_own_property_descriptor (obj_p, property_name_p, &prop_desc))
|
|
{
|
|
continue;
|
|
}
|
|
|
|
/* 2.b */
|
|
if (prop_desc.is_writable_defined && prop_desc.is_writable)
|
|
{
|
|
prop_desc.is_writable = false;
|
|
}
|
|
|
|
/* 2.c */
|
|
prop_desc.is_configurable = false;
|
|
|
|
/* 2.d */
|
|
ECMA_TRY_CATCH (define_own_prop_ret,
|
|
ecma_op_object_define_own_property (obj_p,
|
|
property_name_p,
|
|
&prop_desc,
|
|
true),
|
|
ret_value);
|
|
ECMA_FINALIZE (define_own_prop_ret);
|
|
|
|
ecma_free_property_descriptor (&prop_desc);
|
|
}
|
|
|
|
ecma_free_values_collection (props_p, true);
|
|
|
|
if (ecma_is_value_empty (ret_value))
|
|
{
|
|
/* 3. */
|
|
ecma_set_object_extensible (obj_p, false);
|
|
|
|
/* 4. */
|
|
ret_value = ecma_copy_value (arg);
|
|
}
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_freeze */
|
|
|
|
/**
|
|
* The Object object's 'preventExtensions' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.10
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_prevent_extensions (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg) /**< routine's argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
if (!ecma_is_value_object (arg))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg);
|
|
ecma_set_object_extensible (obj_p, false);
|
|
|
|
ret_value = ecma_copy_value (arg);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_prevent_extensions */
|
|
|
|
/**
|
|
* The Object object's 'isSealed' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.11
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_is_sealed (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg) /**< routine's argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
/* 1. */
|
|
if (!ecma_is_value_object (arg))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg);
|
|
|
|
bool is_sealed;
|
|
|
|
/* 3. */
|
|
if (ecma_get_object_extensible (obj_p))
|
|
{
|
|
is_sealed = false;
|
|
}
|
|
else
|
|
{
|
|
/* the value can be updated in the loop below */
|
|
is_sealed = true;
|
|
|
|
/* 2. */
|
|
ecma_collection_header_t *props_p = ecma_op_object_get_property_names (obj_p, false, false, false);
|
|
|
|
ecma_collection_iterator_t iter;
|
|
ecma_collection_iterator_init (&iter, props_p);
|
|
|
|
while (ecma_collection_iterator_next (&iter))
|
|
{
|
|
ecma_string_t *property_name_p = ecma_get_string_from_value (*iter.current_value_p);
|
|
|
|
/* 2.a */
|
|
ecma_property_t property = ecma_op_object_get_own_property (obj_p,
|
|
property_name_p,
|
|
NULL,
|
|
ECMA_PROPERTY_GET_NO_OPTIONS);
|
|
|
|
/* 2.b */
|
|
if (ecma_is_property_configurable (property))
|
|
{
|
|
is_sealed = false;
|
|
break;
|
|
}
|
|
}
|
|
|
|
ecma_free_values_collection (props_p, true);
|
|
}
|
|
|
|
/* 4. */
|
|
ret_value = ecma_make_simple_value (is_sealed ? ECMA_SIMPLE_VALUE_TRUE
|
|
: ECMA_SIMPLE_VALUE_FALSE);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_is_sealed */
|
|
|
|
/**
|
|
* The Object object's 'isFrozen' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.12
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_is_frozen (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg) /**< routine's argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
/* 1. */
|
|
if (!ecma_is_value_object (arg))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg);
|
|
|
|
bool is_frozen;
|
|
|
|
/* 3. */
|
|
if (ecma_get_object_extensible (obj_p))
|
|
{
|
|
is_frozen = false;
|
|
}
|
|
else
|
|
{
|
|
is_frozen = true;
|
|
|
|
/* 2. */
|
|
ecma_collection_header_t *props_p = ecma_op_object_get_property_names (obj_p, false, false, false);
|
|
|
|
ecma_collection_iterator_t iter;
|
|
ecma_collection_iterator_init (&iter, props_p);
|
|
|
|
while (ecma_collection_iterator_next (&iter))
|
|
{
|
|
ecma_string_t *property_name_p = ecma_get_string_from_value (*iter.current_value_p);
|
|
|
|
/* 2.a */
|
|
ecma_property_t property = ecma_op_object_get_own_property (obj_p,
|
|
property_name_p,
|
|
NULL,
|
|
ECMA_PROPERTY_GET_NO_OPTIONS);
|
|
|
|
/* 2.b */
|
|
if (ECMA_PROPERTY_GET_TYPE (property) != ECMA_PROPERTY_TYPE_NAMEDACCESSOR
|
|
&& ecma_is_property_writable (property))
|
|
{
|
|
is_frozen = false;
|
|
break;
|
|
}
|
|
|
|
/* 2.c */
|
|
if (ecma_is_property_configurable (property))
|
|
{
|
|
is_frozen = false;
|
|
break;
|
|
}
|
|
}
|
|
|
|
ecma_free_values_collection (props_p, true);
|
|
}
|
|
|
|
/* 4 */
|
|
ret_value = ecma_make_simple_value (is_frozen ? ECMA_SIMPLE_VALUE_TRUE
|
|
: ECMA_SIMPLE_VALUE_FALSE);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_is_frozen */
|
|
|
|
/**
|
|
* The Object object's 'isExtensible' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.13
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_is_extensible (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg) /**< routine's argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
if (!ecma_is_value_object (arg))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg);
|
|
|
|
bool extensible = ecma_get_object_extensible (obj_p);
|
|
|
|
ret_value = ecma_make_simple_value (extensible ? ECMA_SIMPLE_VALUE_TRUE
|
|
: ECMA_SIMPLE_VALUE_FALSE);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_is_extensible */
|
|
|
|
/**
|
|
* The Object object's 'keys' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.14
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_keys (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg) /**< routine's argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
if (!ecma_is_value_object (arg))
|
|
{
|
|
/* 1. */
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg);
|
|
/* 3-6. */
|
|
ret_value = ecma_builtin_helper_object_get_properties (obj_p, true);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_keys */
|
|
|
|
/**
|
|
* The Object object's 'getOwnPropertyDescriptor' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.3
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_get_own_property_descriptor (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg1, /**< routine's first argument */
|
|
ecma_value_t arg2) /**< routine's second argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
/* 1. */
|
|
if (!ecma_is_value_object (arg1))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
return ret_value;
|
|
}
|
|
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg1);
|
|
|
|
/* 2. */
|
|
ECMA_TRY_CATCH (name_str_value,
|
|
ecma_op_to_string (arg2),
|
|
ret_value);
|
|
|
|
ecma_string_t *name_str_p = ecma_get_string_from_value (name_str_value);
|
|
|
|
/* 3. */
|
|
ecma_property_descriptor_t prop_desc;
|
|
|
|
if (ecma_op_object_get_own_property_descriptor (obj_p, name_str_p, &prop_desc))
|
|
{
|
|
/* 4. */
|
|
ecma_object_t *desc_obj_p = ecma_op_from_property_descriptor (&prop_desc);
|
|
|
|
ecma_free_property_descriptor (&prop_desc);
|
|
|
|
ret_value = ecma_make_object_value (desc_obj_p);
|
|
}
|
|
else
|
|
{
|
|
ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_UNDEFINED);
|
|
}
|
|
|
|
ECMA_FINALIZE (name_str_value);
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_get_own_property_descriptor */
|
|
|
|
/**
|
|
* The Object object's 'create' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.5
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_create (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg1, /**< routine's first argument */
|
|
ecma_value_t arg2) /**< routine's second argument */
|
|
{
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
/* 1. */
|
|
if (!ecma_is_value_object (arg1) && !ecma_is_value_null (arg1))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
ecma_object_t *obj_p = NULL;
|
|
|
|
if (!ecma_is_value_null (arg1))
|
|
{
|
|
obj_p = ecma_get_object_from_value (arg1);
|
|
}
|
|
/* 2-3. */
|
|
ecma_object_t *result_obj_p = ecma_op_create_object_object_noarg_and_set_prototype (obj_p);
|
|
|
|
/* 4. */
|
|
if (!ecma_is_value_undefined (arg2))
|
|
{
|
|
ECMA_TRY_CATCH (obj,
|
|
ecma_builtin_object_object_define_properties (this_arg,
|
|
ecma_make_object_value (result_obj_p),
|
|
arg2),
|
|
ret_value);
|
|
ECMA_FINALIZE (obj);
|
|
}
|
|
|
|
/* 5. */
|
|
if (ecma_is_value_empty (ret_value))
|
|
{
|
|
ret_value = ecma_copy_value (ecma_make_object_value (result_obj_p));
|
|
}
|
|
|
|
ecma_deref_object (result_obj_p);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_create */
|
|
|
|
/**
|
|
* The Object object's 'defineProperties' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.7
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_define_properties (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg1, /**< routine's first argument */
|
|
ecma_value_t arg2) /**< routine's second argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
/* 1. */
|
|
if (!ecma_is_value_object (arg1))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg1);
|
|
|
|
/* 2. */
|
|
ECMA_TRY_CATCH (props,
|
|
ecma_op_to_object (arg2),
|
|
ret_value);
|
|
|
|
ecma_object_t *props_p = ecma_get_object_from_value (props);
|
|
/* 3. */
|
|
ecma_collection_header_t *prop_names_p = ecma_op_object_get_property_names (props_p, false, true, false);
|
|
uint32_t property_number = prop_names_p->unit_number;
|
|
|
|
ecma_collection_iterator_t iter;
|
|
ecma_collection_iterator_init (&iter, prop_names_p);
|
|
|
|
/* 4. */
|
|
JMEM_DEFINE_LOCAL_ARRAY (property_descriptors, property_number, ecma_property_descriptor_t);
|
|
|
|
uint32_t property_descriptor_number = 0;
|
|
|
|
while (ecma_collection_iterator_next (&iter)
|
|
&& ecma_is_value_empty (ret_value))
|
|
{
|
|
/* 5.a */
|
|
ECMA_TRY_CATCH (desc_obj,
|
|
ecma_op_object_get (props_p, ecma_get_string_from_value (*iter.current_value_p)),
|
|
ret_value);
|
|
|
|
/* 5.b */
|
|
ECMA_TRY_CATCH (conv_result,
|
|
ecma_op_to_property_descriptor (desc_obj,
|
|
&property_descriptors[property_descriptor_number]),
|
|
ret_value);
|
|
|
|
property_descriptor_number++;
|
|
|
|
ECMA_FINALIZE (conv_result);
|
|
ECMA_FINALIZE (desc_obj);
|
|
}
|
|
|
|
/* 6. */
|
|
ecma_collection_iterator_init (&iter, prop_names_p);
|
|
for (uint32_t index = 0;
|
|
index < property_number && ecma_is_value_empty (ret_value);
|
|
index++)
|
|
{
|
|
bool is_next = ecma_collection_iterator_next (&iter);
|
|
JERRY_ASSERT (is_next);
|
|
|
|
ECMA_TRY_CATCH (define_own_prop_ret,
|
|
ecma_op_object_define_own_property (obj_p,
|
|
ecma_get_string_from_value (*iter.current_value_p),
|
|
&property_descriptors[index],
|
|
true),
|
|
ret_value);
|
|
|
|
ECMA_FINALIZE (define_own_prop_ret);
|
|
}
|
|
|
|
/* Clean up. */
|
|
for (uint32_t index = 0;
|
|
index < property_descriptor_number;
|
|
index++)
|
|
{
|
|
ecma_free_property_descriptor (&property_descriptors[index]);
|
|
}
|
|
|
|
JMEM_FINALIZE_LOCAL_ARRAY (property_descriptors);
|
|
|
|
ecma_free_values_collection (prop_names_p, true);
|
|
|
|
/* 7. */
|
|
if (ecma_is_value_empty (ret_value))
|
|
{
|
|
ret_value = ecma_copy_value (arg1);
|
|
}
|
|
|
|
ECMA_FINALIZE (props);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_define_properties */
|
|
|
|
/**
|
|
* The Object object's 'defineProperty' routine
|
|
*
|
|
* See also:
|
|
* ECMA-262 v5, 15.2.3.6
|
|
*
|
|
* @return ecma value
|
|
* Returned value must be freed with ecma_free_value.
|
|
*/
|
|
static ecma_value_t
|
|
ecma_builtin_object_object_define_property (ecma_value_t this_arg, /**< 'this' argument */
|
|
ecma_value_t arg1, /**< routine's first argument */
|
|
ecma_value_t arg2, /**< routine's second argument */
|
|
ecma_value_t arg3) /**< routine's third argument */
|
|
{
|
|
JERRY_UNUSED (this_arg);
|
|
ecma_value_t ret_value = ecma_make_simple_value (ECMA_SIMPLE_VALUE_EMPTY);
|
|
|
|
if (!ecma_is_value_object (arg1))
|
|
{
|
|
ret_value = ecma_raise_type_error (ECMA_ERR_MSG ("Argument is not an object."));
|
|
}
|
|
else
|
|
{
|
|
ecma_object_t *obj_p = ecma_get_object_from_value (arg1);
|
|
|
|
ECMA_TRY_CATCH (name_str_value,
|
|
ecma_op_to_string (arg2),
|
|
ret_value);
|
|
|
|
ecma_string_t *name_str_p = ecma_get_string_from_value (name_str_value);
|
|
|
|
ecma_property_descriptor_t prop_desc;
|
|
|
|
ECMA_TRY_CATCH (conv_result,
|
|
ecma_op_to_property_descriptor (arg3, &prop_desc),
|
|
ret_value);
|
|
|
|
ECMA_TRY_CATCH (define_own_prop_ret,
|
|
ecma_op_object_define_own_property (obj_p,
|
|
name_str_p,
|
|
&prop_desc,
|
|
true),
|
|
ret_value);
|
|
|
|
ret_value = ecma_copy_value (arg1);
|
|
|
|
ECMA_FINALIZE (define_own_prop_ret);
|
|
ecma_free_property_descriptor (&prop_desc);
|
|
ECMA_FINALIZE (conv_result);
|
|
ECMA_FINALIZE (name_str_value);
|
|
}
|
|
|
|
return ret_value;
|
|
} /* ecma_builtin_object_object_define_property */
|
|
|
|
/**
|
|
* @}
|
|
* @}
|
|
* @}
|
|
*/
|