mirror of
https://github.com/google/pebble.git
synced 2025-05-19 01:44:53 +00:00
Import of the watch repository from Pebble
This commit is contained in:
Matthieu Jeanson
Katharine Berry
commit
3b92768480
10334 changed files with 2564465 additions and 0 deletions
831
third_party/jerryscript/tests/unit/test-api.c
vendored
Normal file
831
third_party/jerryscript/tests/unit/test-api.c
vendored
Normal file
|
|
@ -0,0 +1,831 @@
|
|||
/* Copyright 2015-2016 Samsung Electronics Co., Ltd.
|
||||
* Copyright 2016 University of Szeged.
|
||||
*
|
||||
* 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 "config.h"
|
||||
#include "jerry-api.h"
|
||||
|
||||
#include "test-common.h"
|
||||
|
||||
const char *test_source = (
|
||||
"function assert (arg) { "
|
||||
" if (!arg) { "
|
||||
" throw Error('Assert failed');"
|
||||
" } "
|
||||
"} "
|
||||
"this.t = 1; "
|
||||
"function f () { "
|
||||
"return this.t; "
|
||||
"} "
|
||||
"this.foo = f; "
|
||||
"this.bar = function (a) { "
|
||||
"return a + t; "
|
||||
"}; "
|
||||
"function A () { "
|
||||
"this.t = 12; "
|
||||
"} "
|
||||
"this.A = A; "
|
||||
"this.a = new A (); "
|
||||
"function call_external () { "
|
||||
" return this.external ('1', true); "
|
||||
"} "
|
||||
"function call_throw_test() { "
|
||||
" var catched = false; "
|
||||
" try { "
|
||||
" this.throw_test(); "
|
||||
" } catch (e) { "
|
||||
" catched = true; "
|
||||
" assert(e.name == 'TypeError'); "
|
||||
" assert(e.message == 'error'); "
|
||||
" } "
|
||||
" assert(catched); "
|
||||
"} "
|
||||
"function throw_reference_error() { "
|
||||
" throw new ReferenceError ();"
|
||||
"} "
|
||||
"p = {'alpha':32, 'bravo':false, 'charlie':{}, 'delta':123.45, 'echo':'foobar'};"
|
||||
"np = {}; Object.defineProperty (np, 'foxtrot', { "
|
||||
"get: function() { throw 'error'; }, enumerable: true }) "
|
||||
);
|
||||
|
||||
bool test_api_is_free_callback_was_called = false;
|
||||
|
||||
static jerry_value_t
|
||||
handler (const jerry_value_t func_obj_val, /**< function object */
|
||||
const jerry_value_t this_val, /**< this value */
|
||||
const jerry_value_t args_p[], /**< arguments list */
|
||||
const jerry_length_t args_cnt) /**< arguments length */
|
||||
{
|
||||
char buffer[32];
|
||||
jerry_size_t sz;
|
||||
|
||||
printf ("ok %u %u %p %u\n",
|
||||
(unsigned int) func_obj_val, (unsigned int) this_val, (void *) args_p, (unsigned int) args_cnt);
|
||||
|
||||
TEST_ASSERT (args_cnt == 2);
|
||||
|
||||
TEST_ASSERT (jerry_value_is_string (args_p[0]));
|
||||
sz = jerry_get_string_size (args_p[0]);
|
||||
TEST_ASSERT (sz == 1);
|
||||
sz = jerry_string_to_char_buffer (args_p[0],
|
||||
(jerry_char_t *) buffer,
|
||||
sz);
|
||||
TEST_ASSERT (sz == 1);
|
||||
TEST_ASSERT (!strncmp (buffer, "1", (size_t) sz));
|
||||
|
||||
TEST_ASSERT (jerry_value_is_boolean (args_p[1]));
|
||||
|
||||
return jerry_create_string ((jerry_char_t *) "string from handler");
|
||||
} /* handler */
|
||||
|
||||
static jerry_value_t
|
||||
handler_throw_test (const jerry_value_t func_obj_val, /**< function object */
|
||||
const jerry_value_t this_val, /**< this value */
|
||||
const jerry_value_t args_p[], /**< arguments list */
|
||||
const jerry_length_t args_cnt) /**< arguments length */
|
||||
{
|
||||
printf ("ok %u %u %p %u\n",
|
||||
(unsigned int) func_obj_val, (unsigned int) this_val, (void *) args_p, (unsigned int) args_cnt);
|
||||
|
||||
return jerry_create_error (JERRY_ERROR_TYPE, (jerry_char_t *) "error");
|
||||
} /* handler_throw_test */
|
||||
|
||||
static void
|
||||
handler_construct_freecb (uintptr_t native_p)
|
||||
{
|
||||
TEST_ASSERT (native_p == (uintptr_t) 0x0012345678abcdefull);
|
||||
printf ("ok object free callback\n");
|
||||
|
||||
test_api_is_free_callback_was_called = true;
|
||||
} /* handler_construct_freecb */
|
||||
|
||||
static jerry_value_t
|
||||
handler_construct (const jerry_value_t func_obj_val, /**< function object */
|
||||
const jerry_value_t this_val, /**< this value */
|
||||
const jerry_value_t args_p[], /**< arguments list */
|
||||
const jerry_length_t args_cnt) /**< arguments length */
|
||||
{
|
||||
printf ("ok construct %u %u %p %u\n",
|
||||
(unsigned int) func_obj_val, (unsigned int) this_val, (void *) args_p, (unsigned int) args_cnt);
|
||||
|
||||
TEST_ASSERT (jerry_value_is_object (this_val));
|
||||
|
||||
TEST_ASSERT (args_cnt == 1);
|
||||
TEST_ASSERT (jerry_value_is_boolean (args_p[0]));
|
||||
TEST_ASSERT (jerry_get_boolean_value (args_p[0]) == true);
|
||||
|
||||
jerry_value_t field_name = jerry_create_string ((jerry_char_t *) "value_field");
|
||||
jerry_set_property (this_val, field_name, args_p[0]);
|
||||
jerry_release_value (field_name);
|
||||
|
||||
jerry_set_object_native_handle (this_val,
|
||||
(uintptr_t) 0x0000000000000000ull,
|
||||
handler_construct_freecb);
|
||||
|
||||
uintptr_t ptr = (uintptr_t) NULL;
|
||||
bool is_ok = jerry_get_object_native_handle (this_val, &ptr);
|
||||
TEST_ASSERT (is_ok && ptr == (uintptr_t) 0x0000000000000000ull);
|
||||
|
||||
/* check if setting handle for second time is handled correctly */
|
||||
jerry_set_object_native_handle (this_val,
|
||||
(uintptr_t) 0x0012345678abcdefull,
|
||||
handler_construct_freecb);
|
||||
|
||||
return jerry_create_boolean (true);
|
||||
} /* handler_construct */
|
||||
|
||||
/**
|
||||
* Extended Magic Strings
|
||||
*/
|
||||
#define JERRY_MAGIC_STRING_ITEMS \
|
||||
JERRY_MAGIC_STRING_DEF (GLOBAL, global) \
|
||||
JERRY_MAGIC_STRING_DEF (CONSOLE, console)
|
||||
|
||||
|
||||
#define JERRY_MAGIC_STRING_DEF(NAME, STRING) \
|
||||
static const char jerry_magic_string_ex_ ## NAME[] = # STRING;
|
||||
|
||||
JERRY_MAGIC_STRING_ITEMS
|
||||
|
||||
#undef JERRY_MAGIC_STRING_DEF
|
||||
|
||||
const jerry_length_t magic_string_lengths[] =
|
||||
{
|
||||
#define JERRY_MAGIC_STRING_DEF(NAME, STRING) \
|
||||
(jerry_length_t) (sizeof (jerry_magic_string_ex_ ## NAME) - 1u),
|
||||
|
||||
JERRY_MAGIC_STRING_ITEMS
|
||||
|
||||
#undef JERRY_MAGIC_STRING_DEF
|
||||
};
|
||||
|
||||
const jerry_char_ptr_t magic_string_items[] =
|
||||
{
|
||||
#define JERRY_MAGIC_STRING_DEF(NAME, STRING) \
|
||||
(const jerry_char_ptr_t) jerry_magic_string_ex_ ## NAME,
|
||||
|
||||
JERRY_MAGIC_STRING_ITEMS
|
||||
|
||||
#undef JERRY_MAGIC_STRING_DEF
|
||||
};
|
||||
|
||||
static bool
|
||||
foreach (const jerry_value_t name, /**< field name */
|
||||
const jerry_value_t value, /**< field value */
|
||||
void *user_data) /**< user data */
|
||||
{
|
||||
char str_buf_p[128];
|
||||
jerry_size_t sz = jerry_string_to_char_buffer (name, (jerry_char_t *) str_buf_p, 128);
|
||||
str_buf_p[sz] = '\0';
|
||||
|
||||
TEST_ASSERT (!strncmp ((const char *) user_data, "user_data", 9));
|
||||
TEST_ASSERT (sz > 0);
|
||||
|
||||
if (!strncmp (str_buf_p, "alpha", (size_t) sz))
|
||||
{
|
||||
TEST_ASSERT (jerry_value_is_number (value));
|
||||
TEST_ASSERT (jerry_get_number_value (value) == 32.0);
|
||||
return true;
|
||||
}
|
||||
else if (!strncmp (str_buf_p, "bravo", (size_t) sz))
|
||||
{
|
||||
TEST_ASSERT (jerry_value_is_boolean (value));
|
||||
TEST_ASSERT (jerry_get_boolean_value (value) == false);
|
||||
return true;
|
||||
}
|
||||
else if (!strncmp (str_buf_p, "charlie", (size_t) sz))
|
||||
{
|
||||
TEST_ASSERT (jerry_value_is_object (value));
|
||||
return true;
|
||||
}
|
||||
else if (!strncmp (str_buf_p, "delta", (size_t) sz))
|
||||
{
|
||||
TEST_ASSERT (jerry_value_is_number (value));
|
||||
TEST_ASSERT (jerry_get_number_value (value) == 123.45);
|
||||
return true;
|
||||
}
|
||||
else if (!strncmp (str_buf_p, "echo", (size_t) sz))
|
||||
{
|
||||
TEST_ASSERT (jerry_value_is_string (value));
|
||||
jerry_size_t echo_sz = jerry_string_to_char_buffer (value,
|
||||
(jerry_char_t *) str_buf_p,
|
||||
128);
|
||||
str_buf_p[echo_sz] = '\0';
|
||||
TEST_ASSERT (!strncmp (str_buf_p, "foobar", (size_t) echo_sz));
|
||||
return true;
|
||||
}
|
||||
|
||||
TEST_ASSERT (false);
|
||||
return false;
|
||||
|
||||
|
||||
} /* foreach */
|
||||
|
||||
static bool
|
||||
foreach_exception (const jerry_value_t name, /**< field name */
|
||||
const jerry_value_t value, /**< field value */
|
||||
void *user_data) /**< user data */
|
||||
{
|
||||
JERRY_UNUSED (value);
|
||||
JERRY_UNUSED (user_data);
|
||||
char str_buf_p[128];
|
||||
jerry_size_t sz = jerry_string_to_char_buffer (name, (jerry_char_t *) str_buf_p, 128);
|
||||
str_buf_p[sz] = '\0';
|
||||
|
||||
if (!strncmp (str_buf_p, "foxtrot", (size_t) sz))
|
||||
{
|
||||
TEST_ASSERT (false);
|
||||
}
|
||||
|
||||
return true;
|
||||
} /* foreach_exception */
|
||||
|
||||
static bool
|
||||
foreach_subset (const jerry_value_t name, /**< field name */
|
||||
const jerry_value_t value, /**< field value */
|
||||
void *user_data) /**< user data */
|
||||
{
|
||||
JERRY_UNUSED (name);
|
||||
JERRY_UNUSED (value);
|
||||
int *count_p = (int *) (user_data);
|
||||
|
||||
if (*count_p == 3)
|
||||
{
|
||||
return false;
|
||||
}
|
||||
(*count_p)++;
|
||||
return true;
|
||||
} /* foreach_subset */
|
||||
|
||||
static jerry_value_t
|
||||
get_property (const jerry_value_t obj_val, /**< object value */
|
||||
const char *str_p) /**< property name */
|
||||
{
|
||||
jerry_value_t prop_name_val = jerry_create_string ((const jerry_char_t *) str_p);
|
||||
jerry_value_t ret_val = jerry_get_property (obj_val, prop_name_val);
|
||||
jerry_release_value (prop_name_val);
|
||||
return ret_val;
|
||||
} /* get_property */
|
||||
|
||||
static jerry_value_t
|
||||
set_property (const jerry_value_t obj_val, /**< object value */
|
||||
const char *str_p, /**< property name */
|
||||
const jerry_value_t val) /**< value to set */
|
||||
{
|
||||
jerry_value_t prop_name_val = jerry_create_string ((const jerry_char_t *) str_p);
|
||||
jerry_value_t ret_val = jerry_set_property (obj_val, prop_name_val, val);
|
||||
jerry_release_value (prop_name_val);
|
||||
return ret_val;
|
||||
} /* set_property */
|
||||
|
||||
static bool
|
||||
test_run_simple (const char *script_p) /**< source code to run */
|
||||
{
|
||||
size_t script_size = strlen (script_p);
|
||||
|
||||
return jerry_run_simple ((const jerry_char_t *) script_p, script_size, JERRY_INIT_EMPTY);
|
||||
} /* test_run_simple */
|
||||
|
||||
int
|
||||
main (void)
|
||||
{
|
||||
TEST_INIT ();
|
||||
|
||||
bool is_ok;
|
||||
jerry_size_t sz;
|
||||
jerry_value_t val_t, val_foo, val_bar, val_A, val_A_prototype, val_a, val_a_foo, val_value_field, val_p, val_np;
|
||||
jerry_value_t val_call_external;
|
||||
jerry_value_t global_obj_val, obj_val;
|
||||
jerry_value_t external_func_val, external_construct_val;
|
||||
jerry_value_t throw_test_handler_val;
|
||||
jerry_value_t parsed_code_val, proto_val, prim_val;
|
||||
jerry_value_t res, args[2];
|
||||
double number_val;
|
||||
char buffer[32];
|
||||
|
||||
is_ok = test_run_simple ("print ('Hello, World!');");
|
||||
TEST_ASSERT (is_ok);
|
||||
|
||||
is_ok = test_run_simple ("throw 'Hello World';");
|
||||
TEST_ASSERT (!is_ok);
|
||||
|
||||
jerry_init (JERRY_INIT_EMPTY);
|
||||
|
||||
parsed_code_val = jerry_parse ((jerry_char_t *) test_source, strlen (test_source), false);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (parsed_code_val));
|
||||
|
||||
res = jerry_run (parsed_code_val);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
jerry_release_value (res);
|
||||
jerry_release_value (parsed_code_val);
|
||||
|
||||
global_obj_val = jerry_get_global_object ();
|
||||
|
||||
// Test corner case for jerry_string_to_char_buffer
|
||||
args[0] = jerry_create_string ((jerry_char_t *) "");
|
||||
sz = jerry_get_string_size (args[0]);
|
||||
TEST_ASSERT (sz == 0);
|
||||
jerry_release_value (args[0]);
|
||||
|
||||
// Get global.boo (non-existing field)
|
||||
val_t = get_property (global_obj_val, "boo");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_t));
|
||||
TEST_ASSERT (jerry_value_is_undefined (val_t));
|
||||
|
||||
// Get global.t
|
||||
val_t = get_property (global_obj_val, "t");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_t));
|
||||
TEST_ASSERT (jerry_value_is_number (val_t)
|
||||
&& jerry_get_number_value (val_t) == 1.0);
|
||||
jerry_release_value (val_t);
|
||||
|
||||
// Get global.foo
|
||||
val_foo = get_property (global_obj_val, "foo");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_foo));
|
||||
TEST_ASSERT (jerry_value_is_object (val_foo));
|
||||
|
||||
// Call foo (4, 2)
|
||||
args[0] = jerry_create_number (4);
|
||||
args[1] = jerry_create_number (2);
|
||||
res = jerry_call_function (val_foo, jerry_create_undefined (), args, 2);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_number (res)
|
||||
&& jerry_get_number_value (res) == 1.0);
|
||||
jerry_release_value (res);
|
||||
|
||||
// Get global.bar
|
||||
val_bar = get_property (global_obj_val, "bar");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_bar));
|
||||
TEST_ASSERT (jerry_value_is_object (val_bar));
|
||||
|
||||
// Call bar (4, 2)
|
||||
res = jerry_call_function (val_bar, jerry_create_undefined (), args, 2);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_number (res)
|
||||
&& jerry_get_number_value (res) == 5.0);
|
||||
jerry_release_value (res);
|
||||
jerry_release_value (val_bar);
|
||||
|
||||
// Set global.t = "abcd"
|
||||
jerry_release_value (args[0]);
|
||||
args[0] = jerry_create_string ((jerry_char_t *) "abcd");
|
||||
res = set_property (global_obj_val, "t", args[0]);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_get_boolean_value (res));
|
||||
jerry_release_value (res);
|
||||
|
||||
// Call foo (4, 2)
|
||||
res = jerry_call_function (val_foo, jerry_create_undefined (), args, 2);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_string (res));
|
||||
sz = jerry_get_string_size (res);
|
||||
TEST_ASSERT (sz == 4);
|
||||
sz = jerry_string_to_char_buffer (res, (jerry_char_t *) buffer, sz);
|
||||
TEST_ASSERT (sz == 4);
|
||||
jerry_release_value (res);
|
||||
TEST_ASSERT (!strncmp (buffer, "abcd", (size_t) sz));
|
||||
jerry_release_value (args[0]);
|
||||
jerry_release_value (args[1]);
|
||||
|
||||
// Get global.A
|
||||
val_A = get_property (global_obj_val, "A");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_A));
|
||||
TEST_ASSERT (jerry_value_is_object (val_A));
|
||||
|
||||
// Get A.prototype
|
||||
is_ok = jerry_value_is_constructor (val_A);
|
||||
TEST_ASSERT (is_ok);
|
||||
val_A_prototype = get_property (val_A, "prototype");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_A_prototype));
|
||||
TEST_ASSERT (jerry_value_is_object (val_A_prototype));
|
||||
jerry_release_value (val_A);
|
||||
|
||||
// Set A.prototype.foo = global.foo
|
||||
res = set_property (val_A_prototype, "foo", val_foo);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_get_boolean_value (res));
|
||||
jerry_release_value (res);
|
||||
jerry_release_value (val_A_prototype);
|
||||
jerry_release_value (val_foo);
|
||||
|
||||
// Get global.a
|
||||
val_a = get_property (global_obj_val, "a");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_a));
|
||||
TEST_ASSERT (jerry_value_is_object (val_a));
|
||||
|
||||
// Get a.t
|
||||
res = get_property (val_a, "t");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_number (res)
|
||||
&& jerry_get_number_value (res) == 12.0);
|
||||
jerry_release_value (res);
|
||||
|
||||
// foreach properties
|
||||
val_p = get_property (global_obj_val, "p");
|
||||
is_ok = jerry_foreach_object_property (val_p, foreach, (void *) "user_data");
|
||||
TEST_ASSERT (is_ok);
|
||||
|
||||
// break foreach at third element
|
||||
int count = 0;
|
||||
is_ok = jerry_foreach_object_property (val_p, foreach_subset, &count);
|
||||
TEST_ASSERT (is_ok);
|
||||
TEST_ASSERT (count == 3);
|
||||
jerry_release_value (val_p);
|
||||
|
||||
// foreach with throw test
|
||||
val_np = get_property (global_obj_val, "np");
|
||||
is_ok = !jerry_foreach_object_property (val_np, foreach_exception, NULL);
|
||||
TEST_ASSERT (is_ok);
|
||||
jerry_release_value (val_np);
|
||||
|
||||
// Get a.foo
|
||||
val_a_foo = get_property (val_a, "foo");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_a_foo));
|
||||
TEST_ASSERT (jerry_value_is_object (val_a_foo));
|
||||
|
||||
// Call a.foo ()
|
||||
res = jerry_call_function (val_a_foo, val_a, NULL, 0);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_number (res)
|
||||
&& jerry_get_number_value (res) == 12.0);
|
||||
jerry_release_value (res);
|
||||
jerry_release_value (val_a_foo);
|
||||
|
||||
jerry_release_value (val_a);
|
||||
|
||||
// Create native handler bound function object and set it to 'external' variable
|
||||
external_func_val = jerry_create_external_function (handler);
|
||||
TEST_ASSERT (jerry_value_is_function (external_func_val)
|
||||
&& jerry_value_is_constructor (external_func_val));
|
||||
|
||||
res = set_property (global_obj_val, "external", external_func_val);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_get_boolean_value (res));
|
||||
jerry_release_value (external_func_val);
|
||||
|
||||
// Call 'call_external' function that should call external function created above
|
||||
val_call_external = get_property (global_obj_val, "call_external");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_call_external));
|
||||
TEST_ASSERT (jerry_value_is_object (val_call_external));
|
||||
res = jerry_call_function (val_call_external, global_obj_val, NULL, 0);
|
||||
jerry_release_value (val_call_external);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_string (res));
|
||||
sz = jerry_get_string_size (res);
|
||||
TEST_ASSERT (sz == 19);
|
||||
sz = jerry_string_to_char_buffer (res, (jerry_char_t *) buffer, sz);
|
||||
TEST_ASSERT (sz == 19);
|
||||
jerry_release_value (res);
|
||||
TEST_ASSERT (!strncmp (buffer, "string from handler", (size_t) sz));
|
||||
|
||||
// Create native handler bound function object and set it to 'external_construct' variable
|
||||
external_construct_val = jerry_create_external_function (handler_construct);
|
||||
TEST_ASSERT (jerry_value_is_function (external_construct_val)
|
||||
&& jerry_value_is_constructor (external_construct_val));
|
||||
|
||||
res = set_property (global_obj_val, "external_construct", external_construct_val);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_get_boolean_value (res));
|
||||
jerry_release_value (res);
|
||||
|
||||
// Call external function created above, as constructor
|
||||
args[0] = jerry_create_boolean (true);
|
||||
res = jerry_construct_object (external_construct_val, args, 1);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_object (res));
|
||||
val_value_field = get_property (res, "value_field");
|
||||
|
||||
// Get 'value_field' of constructed object
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_value_field));
|
||||
TEST_ASSERT (jerry_value_is_boolean (val_value_field)
|
||||
&& jerry_get_boolean_value (val_value_field));
|
||||
jerry_release_value (val_value_field);
|
||||
jerry_release_value (external_construct_val);
|
||||
|
||||
uintptr_t ptr = (uintptr_t) NULL;
|
||||
is_ok = jerry_get_object_native_handle (res, &ptr);
|
||||
TEST_ASSERT (is_ok
|
||||
&& ptr == (uintptr_t) 0x0012345678abcdefull);
|
||||
|
||||
jerry_release_value (res);
|
||||
|
||||
// Test: Throwing exception from native handler.
|
||||
throw_test_handler_val = jerry_create_external_function (handler_throw_test);
|
||||
TEST_ASSERT (jerry_value_is_function (throw_test_handler_val));
|
||||
|
||||
res = set_property (global_obj_val, "throw_test", throw_test_handler_val);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_get_boolean_value (res));
|
||||
jerry_release_value (res);
|
||||
jerry_release_value (throw_test_handler_val);
|
||||
|
||||
val_t = get_property (global_obj_val, "call_throw_test");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_t));
|
||||
TEST_ASSERT (jerry_value_is_object (val_t));
|
||||
|
||||
res = jerry_call_function (val_t, global_obj_val, NULL, 0);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
jerry_release_value (val_t);
|
||||
jerry_release_value (res);
|
||||
|
||||
// Test: Unhandled exception in called function
|
||||
val_t = get_property (global_obj_val, "throw_reference_error");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_t));
|
||||
TEST_ASSERT (jerry_value_is_object (val_t));
|
||||
|
||||
res = jerry_call_function (val_t, global_obj_val, NULL, 0);
|
||||
|
||||
TEST_ASSERT (jerry_value_has_error_flag (res));
|
||||
jerry_release_value (val_t);
|
||||
|
||||
// 'res' should contain exception object
|
||||
TEST_ASSERT (jerry_value_is_object (res));
|
||||
jerry_release_value (res);
|
||||
|
||||
// Test: Call of non-function
|
||||
obj_val = jerry_create_object ();
|
||||
res = jerry_call_function (obj_val, global_obj_val, NULL, 0);
|
||||
TEST_ASSERT (jerry_value_has_error_flag (res));
|
||||
|
||||
// 'res' should contain exception object
|
||||
TEST_ASSERT (jerry_value_is_object (res));
|
||||
jerry_release_value (res);
|
||||
|
||||
jerry_release_value (obj_val);
|
||||
|
||||
// Test: Unhandled exception in function called, as constructor
|
||||
val_t = get_property (global_obj_val, "throw_reference_error");
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_t));
|
||||
TEST_ASSERT (jerry_value_is_object (val_t));
|
||||
|
||||
res = jerry_construct_object (val_t, NULL, 0);
|
||||
TEST_ASSERT (jerry_value_has_error_flag (res));
|
||||
jerry_release_value (val_t);
|
||||
|
||||
// 'res' should contain exception object
|
||||
TEST_ASSERT (jerry_value_is_object (res));
|
||||
jerry_release_value (res);
|
||||
|
||||
// Test: Call of non-function as constructor
|
||||
obj_val = jerry_create_object ();
|
||||
res = jerry_construct_object (obj_val, NULL, 0);
|
||||
TEST_ASSERT (jerry_value_has_error_flag (res));
|
||||
|
||||
// 'res' should contain exception object
|
||||
TEST_ASSERT (jerry_value_is_object (res));
|
||||
jerry_release_value (res);
|
||||
|
||||
jerry_release_value (obj_val);
|
||||
|
||||
// Test: Array Object API
|
||||
jerry_value_t array_obj_val = jerry_create_array (10);
|
||||
TEST_ASSERT (jerry_value_is_array (array_obj_val));
|
||||
TEST_ASSERT (jerry_get_array_length (array_obj_val) == 10);
|
||||
|
||||
jerry_value_t v_in = jerry_create_number (10.5);
|
||||
jerry_set_property_by_index (array_obj_val, 5, v_in);
|
||||
jerry_value_t v_out = jerry_get_property_by_index (array_obj_val, 5);
|
||||
|
||||
TEST_ASSERT (jerry_value_is_number (v_out)
|
||||
&& jerry_get_number_value (v_out) == 10.5);
|
||||
|
||||
jerry_release_value (v_in);
|
||||
jerry_release_value (v_out);
|
||||
jerry_release_value (array_obj_val);
|
||||
|
||||
// Test: init property descriptor
|
||||
jerry_property_descriptor_t prop_desc;
|
||||
jerry_init_property_descriptor_fields (&prop_desc);
|
||||
TEST_ASSERT (prop_desc.is_value_defined == false);
|
||||
TEST_ASSERT (jerry_value_is_undefined (prop_desc.value));
|
||||
TEST_ASSERT (prop_desc.is_writable_defined == false);
|
||||
TEST_ASSERT (prop_desc.is_writable == false);
|
||||
TEST_ASSERT (prop_desc.is_enumerable_defined == false);
|
||||
TEST_ASSERT (prop_desc.is_enumerable == false);
|
||||
TEST_ASSERT (prop_desc.is_configurable_defined == false);
|
||||
TEST_ASSERT (prop_desc.is_configurable == false);
|
||||
TEST_ASSERT (prop_desc.is_get_defined == false);
|
||||
TEST_ASSERT (jerry_value_is_undefined (prop_desc.getter));
|
||||
TEST_ASSERT (prop_desc.is_set_defined == false);
|
||||
TEST_ASSERT (jerry_value_is_undefined (prop_desc.setter));
|
||||
|
||||
// Test: define own properties
|
||||
jerry_value_t prop_name = jerry_create_string ((const jerry_char_t *) "my_defined_property");
|
||||
prop_desc.is_value_defined = true;
|
||||
prop_desc.value = jerry_acquire_value (prop_name);
|
||||
res = jerry_define_own_property (global_obj_val, prop_name, &prop_desc);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_boolean (res));
|
||||
TEST_ASSERT (jerry_get_boolean_value (res));
|
||||
jerry_release_value (res);
|
||||
jerry_free_property_descriptor_fields (&prop_desc);
|
||||
|
||||
// Test: get own property descriptor
|
||||
is_ok = jerry_get_own_property_descriptor (global_obj_val, prop_name, &prop_desc);
|
||||
TEST_ASSERT (is_ok);
|
||||
TEST_ASSERT (prop_desc.is_value_defined == true);
|
||||
TEST_ASSERT (jerry_value_is_string (prop_desc.value));
|
||||
TEST_ASSERT (prop_desc.is_writable == false);
|
||||
TEST_ASSERT (prop_desc.is_enumerable == false);
|
||||
TEST_ASSERT (prop_desc.is_configurable == false);
|
||||
TEST_ASSERT (prop_desc.is_get_defined == false);
|
||||
TEST_ASSERT (jerry_value_is_undefined (prop_desc.getter));
|
||||
TEST_ASSERT (prop_desc.is_set_defined == false);
|
||||
TEST_ASSERT (jerry_value_is_undefined (prop_desc.setter));
|
||||
jerry_release_value (prop_name);
|
||||
jerry_free_property_descriptor_fields (&prop_desc);
|
||||
|
||||
// Test: object keys
|
||||
res = jerry_get_object_keys (global_obj_val);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_array (res));
|
||||
jerry_release_value (res);
|
||||
|
||||
// Test: jerry_value_to_primitive
|
||||
obj_val = jerry_eval ((jerry_char_t *) "new String ('hello')", 20, false);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (obj_val));
|
||||
TEST_ASSERT (jerry_value_is_object (obj_val));
|
||||
TEST_ASSERT (!jerry_value_is_string (obj_val));
|
||||
prim_val = jerry_value_to_primitive (obj_val);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (prim_val));
|
||||
TEST_ASSERT (jerry_value_is_string (prim_val));
|
||||
jerry_release_value (prim_val);
|
||||
|
||||
// Test: jerry_get_prototype
|
||||
proto_val = jerry_get_prototype (obj_val);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (proto_val));
|
||||
TEST_ASSERT (jerry_value_is_object (proto_val));
|
||||
jerry_release_value (obj_val);
|
||||
|
||||
// Test: jerry_set_prototype
|
||||
obj_val = jerry_create_object ();
|
||||
res = jerry_set_prototype (obj_val, jerry_create_null ());
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_boolean (res));
|
||||
TEST_ASSERT (jerry_get_boolean_value (res));
|
||||
|
||||
res = jerry_set_prototype (obj_val, jerry_create_object ());
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_boolean (res));
|
||||
TEST_ASSERT (jerry_get_boolean_value (res));
|
||||
proto_val = jerry_get_prototype (obj_val);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (proto_val));
|
||||
TEST_ASSERT (jerry_value_is_object (proto_val));
|
||||
jerry_release_value (proto_val);
|
||||
jerry_release_value (obj_val);
|
||||
|
||||
// Test: eval
|
||||
const char *eval_code_src_p = "(function () { return 123; })";
|
||||
val_t = jerry_eval ((jerry_char_t *) eval_code_src_p, strlen (eval_code_src_p), true);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (val_t));
|
||||
TEST_ASSERT (jerry_value_is_object (val_t));
|
||||
TEST_ASSERT (jerry_value_is_function (val_t));
|
||||
|
||||
res = jerry_call_function (val_t, jerry_create_undefined (), NULL, 0);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_number (res)
|
||||
&& jerry_get_number_value (res) == 123.0);
|
||||
jerry_release_value (res);
|
||||
|
||||
jerry_release_value (val_t);
|
||||
|
||||
// cleanup.
|
||||
jerry_release_value (global_obj_val);
|
||||
|
||||
// Test: run gc.
|
||||
jerry_gc ();
|
||||
|
||||
// Test: number
|
||||
val_t = jerry_create_number (6.25);
|
||||
number_val = jerry_get_number_value (val_t);
|
||||
TEST_ASSERT (number_val * 3 == 18.75);
|
||||
jerry_release_value (val_t);
|
||||
|
||||
val_t = jerry_create_number_infinity (true);
|
||||
number_val = jerry_get_number_value (val_t);
|
||||
TEST_ASSERT (number_val * 3 == number_val && number_val != 0.0);
|
||||
jerry_release_value (val_t);
|
||||
|
||||
val_t = jerry_create_number_nan ();
|
||||
number_val = jerry_get_number_value (val_t);
|
||||
TEST_ASSERT (number_val != number_val);
|
||||
jerry_release_value (val_t);
|
||||
|
||||
jerry_cleanup ();
|
||||
|
||||
TEST_ASSERT (test_api_is_free_callback_was_called);
|
||||
|
||||
// Test: parser error location
|
||||
jerry_init (JERRY_INIT_SHOW_OPCODES);
|
||||
|
||||
const char *parser_err_src_p = "b = 'hello';\nvar a = (;";
|
||||
parsed_code_val = jerry_parse ((jerry_char_t *) parser_err_src_p,
|
||||
strlen (parser_err_src_p),
|
||||
false);
|
||||
TEST_ASSERT (jerry_value_has_error_flag (parsed_code_val));
|
||||
jerry_value_clear_error_flag (&parsed_code_val);
|
||||
jerry_value_t err_str_val = jerry_value_to_string (parsed_code_val);
|
||||
jerry_size_t err_str_size = jerry_get_string_size (err_str_val);
|
||||
jerry_char_t err_str_buf[256];
|
||||
sz = jerry_string_to_char_buffer (err_str_val, err_str_buf, err_str_size);
|
||||
err_str_buf[sz] = 0;
|
||||
|
||||
jerry_release_value (err_str_val);
|
||||
jerry_release_value (parsed_code_val);
|
||||
|
||||
TEST_ASSERT (!strcmp ((char *) err_str_buf,
|
||||
"SyntaxError: Primary expression expected. [line: 2, column: 10]"));
|
||||
jerry_cleanup ();
|
||||
|
||||
// External Magic String
|
||||
jerry_init (JERRY_INIT_SHOW_OPCODES);
|
||||
|
||||
uint32_t num_magic_string_items = (uint32_t) (sizeof (magic_string_items) / sizeof (jerry_char_ptr_t));
|
||||
jerry_register_magic_strings (magic_string_items,
|
||||
num_magic_string_items,
|
||||
magic_string_lengths);
|
||||
|
||||
const char *ms_code_src_p = "var global = {}; var console = [1]; var process = 1;";
|
||||
parsed_code_val = jerry_parse ((jerry_char_t *) ms_code_src_p, strlen (ms_code_src_p), false);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (parsed_code_val));
|
||||
|
||||
res = jerry_run (parsed_code_val);
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
jerry_release_value (res);
|
||||
jerry_release_value (parsed_code_val);
|
||||
|
||||
jerry_cleanup ();
|
||||
|
||||
// Dump / execute snapshot
|
||||
if (true)
|
||||
{
|
||||
static uint8_t global_mode_snapshot_buffer[1024];
|
||||
static uint8_t eval_mode_snapshot_buffer[1024];
|
||||
|
||||
const char *code_to_snapshot_p = "(function () { return 'string from snapshot'; }) ();";
|
||||
|
||||
jerry_init (JERRY_INIT_SHOW_OPCODES);
|
||||
size_t global_mode_snapshot_size = jerry_parse_and_save_snapshot ((jerry_char_t *) code_to_snapshot_p,
|
||||
strlen (code_to_snapshot_p),
|
||||
true,
|
||||
false,
|
||||
global_mode_snapshot_buffer,
|
||||
sizeof (global_mode_snapshot_buffer));
|
||||
TEST_ASSERT (global_mode_snapshot_size != 0);
|
||||
jerry_cleanup ();
|
||||
|
||||
jerry_init (JERRY_INIT_SHOW_OPCODES);
|
||||
size_t eval_mode_snapshot_size = jerry_parse_and_save_snapshot ((jerry_char_t *) code_to_snapshot_p,
|
||||
strlen (code_to_snapshot_p),
|
||||
false,
|
||||
false,
|
||||
eval_mode_snapshot_buffer,
|
||||
sizeof (eval_mode_snapshot_buffer));
|
||||
TEST_ASSERT (eval_mode_snapshot_size != 0);
|
||||
jerry_cleanup ();
|
||||
|
||||
jerry_init (JERRY_INIT_SHOW_OPCODES);
|
||||
|
||||
res = jerry_exec_snapshot (global_mode_snapshot_buffer,
|
||||
global_mode_snapshot_size,
|
||||
false);
|
||||
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_string (res));
|
||||
sz = jerry_get_string_size (res);
|
||||
TEST_ASSERT (sz == 20);
|
||||
sz = jerry_string_to_char_buffer (res, (jerry_char_t *) buffer, sz);
|
||||
TEST_ASSERT (sz == 20);
|
||||
jerry_release_value (res);
|
||||
TEST_ASSERT (!strncmp (buffer, "string from snapshot", (size_t) sz));
|
||||
|
||||
res = jerry_exec_snapshot (eval_mode_snapshot_buffer,
|
||||
eval_mode_snapshot_size,
|
||||
false);
|
||||
|
||||
TEST_ASSERT (!jerry_value_has_error_flag (res));
|
||||
TEST_ASSERT (jerry_value_is_string (res));
|
||||
sz = jerry_get_string_size (res);
|
||||
TEST_ASSERT (sz == 20);
|
||||
sz = jerry_string_to_char_buffer (res, (jerry_char_t *) buffer, sz);
|
||||
TEST_ASSERT (sz == 20);
|
||||
jerry_release_value (res);
|
||||
TEST_ASSERT (!strncmp (buffer, "string from snapshot", (size_t) sz));
|
||||
|
||||
jerry_cleanup ();
|
||||
}
|
||||
|
||||
return 0;
|
||||
} /* main */
|
||||
Loading…
Add table
Add a link
Reference in a new issue