1 /* Copyright JS Foundation and other contributors, http://js.foundation
2 *
3 * Licensed under the Apache License, Version 2.0 (the "License");
4 * you may not use this file except in compliance with the License.
5 * You may obtain a copy of the License at
6 *
7 * http://www.apache.org/licenses/LICENSE-2.0
8 *
9 * Unless required by applicable law or agreed to in writing, software
10 * distributed under the License is distributed on an "AS IS" BASIS
11 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12 * See the License for the specific language governing permissions and
13 * limitations under the License.
14 */
15
16 #include "jerryscript.h"
17 #include "test-common.h"
18 #include "jerryscript-port.h"
19 #include "jerryscript-port-default.h"
20 #include <gtest/gtest.h>
21
22 static void
compare_str(jerry_value_t value,const jerry_char_t * str_p,size_t str_len)23 compare_str (jerry_value_t value, const jerry_char_t *str_p, size_t str_len)
24 {
25 jerry_size_t size = jerry_get_string_size (value);
26 TEST_ASSERT (str_len == size);
27 JERRY_VLA (jerry_char_t, str_buff, size);
28 jerry_string_to_utf8_char_buffer (value, str_buff, size);
29 TEST_ASSERT (!memcmp (str_p, str_buff, str_len));
30 } /* compare_str */
31 class ApiSetAndClearErrorFlagTest : public testing::Test{
32 public:
SetUpTestCase()33 static void SetUpTestCase()
34 {
35 GTEST_LOG_(INFO) << "ApiSetAndClearErrorFlagTest SetUpTestCase";
36 }
37
TearDownTestCase()38 static void TearDownTestCase()
39 {
40 GTEST_LOG_(INFO) << "ApiSetAndClearErrorFlagTest TearDownTestCase";
41 }
42
SetUp()43 void SetUp() override {}
TearDown()44 void TearDown() override {}
45
46 };
47
48 static constexpr size_t JERRY_SCRIPT_MEM_SIZE = 50 * 1024 * 1024;
context_alloc_fn(size_t size,void * cb_data)49 static void* context_alloc_fn(size_t size, void* cb_data)
50 {
51 (void)cb_data;
52 size_t newSize = size > JERRY_SCRIPT_MEM_SIZE ? JERRY_SCRIPT_MEM_SIZE : size;
53 return malloc(newSize);
54 }
55
56 HWTEST_F(ApiSetAndClearErrorFlagTest, Test001, testing::ext::TestSize.Level1)
57 {
58 jerry_context_t* ctx_p = jerry_create_context(1024 * 1024 * 50, context_alloc_fn, NULL);
59 jerry_port_default_set_current_context(ctx_p);
60
61 TEST_INIT ();
62
63 jerry_init (JERRY_INIT_EMPTY);
64
65 jerry_value_t obj_val = jerry_create_object ();
66 obj_val = jerry_create_error_from_value (obj_val, true);
67 jerry_value_t err_val = jerry_acquire_value (obj_val);
68
69 obj_val = jerry_get_value_from_error (err_val, true);
70
71 TEST_ASSERT (obj_val != err_val);
72 jerry_release_value (err_val);
73 jerry_release_value (obj_val);
74
75 const jerry_char_t pterodactylus[] = "Pterodactylus";
76 const size_t pterodactylus_size = sizeof (pterodactylus) - 1;
77
78 jerry_value_t str = jerry_create_string (pterodactylus);
79 jerry_value_t error = jerry_create_error_from_value (str, true);
80 str = jerry_get_value_from_error (error, true);
81
82 compare_str (str, pterodactylus, pterodactylus_size);
83 jerry_release_value (str);
84
85 str = jerry_create_string (pterodactylus);
86 error = jerry_create_error_from_value (str, false);
87 jerry_release_value (str);
88 str = jerry_get_value_from_error (error, true);
89
90 compare_str (str, pterodactylus, pterodactylus_size);
91 jerry_release_value (str);
92
93 str = jerry_create_string (pterodactylus);
94 error = jerry_create_abort_from_value (str, true);
95 str = jerry_get_value_from_error (error, true);
96
97 compare_str (str, pterodactylus, pterodactylus_size);
98 jerry_release_value (str);
99
100 str = jerry_create_string (pterodactylus);
101 error = jerry_create_abort_from_value (str, false);
102 jerry_release_value (str);
103 str = jerry_get_value_from_error (error, true);
104
105 compare_str (str, pterodactylus, pterodactylus_size);
106 jerry_release_value (str);
107
108 str = jerry_create_string (pterodactylus);
109 error = jerry_create_error_from_value (str, true);
110 error = jerry_create_abort_from_value (error, true);
111 TEST_ASSERT (jerry_value_is_abort (error));
112 str = jerry_get_value_from_error (error, true);
113
114 compare_str (str, pterodactylus, pterodactylus_size);
115 jerry_release_value (str);
116
117 str = jerry_create_string (pterodactylus);
118 error = jerry_create_error_from_value (str, true);
119 jerry_value_t error2 = jerry_create_abort_from_value (error, false);
120 TEST_ASSERT (jerry_value_is_abort (error2));
121 jerry_release_value (error);
122 str = jerry_get_value_from_error (error2, true);
123
124 compare_str (str, pterodactylus, pterodactylus_size);
125 jerry_release_value (str);
126
127 double test_num = 3.1415926;
128 jerry_value_t num = jerry_create_number (test_num);
129 jerry_value_t num2 = jerry_create_error_from_value (num, false);
130 TEST_ASSERT (jerry_value_is_error (num2));
131 jerry_release_value (num);
132 num2 = jerry_get_value_from_error (num2, true);
133 TEST_ASSERT (jerry_get_number_value (num2) == test_num);
134 jerry_release_value (num2);
135
136 num = jerry_create_number (test_num);
137 num2 = jerry_create_error_from_value (num, true);
138 TEST_ASSERT (jerry_value_is_error (num2));
139 num2 = jerry_get_value_from_error (num2, true);
140 TEST_ASSERT (jerry_get_number_value (num2) == test_num);
141 jerry_release_value (num2);
142
143 num = jerry_create_number (test_num);
144 num2 = jerry_create_error_from_value (num, false);
145 TEST_ASSERT (jerry_value_is_error (num2));
146 jerry_release_value (num);
147 jerry_value_t num3 = jerry_create_error_from_value (num2, false);
148 TEST_ASSERT (jerry_value_is_error (num3));
149 jerry_release_value (num2);
150 num2 = jerry_get_value_from_error (num3, true);
151 TEST_ASSERT (jerry_get_number_value (num2) == test_num);
152 jerry_release_value (num2);
153
154 num = jerry_create_number (test_num);
155 num2 = jerry_create_error_from_value (num, true);
156 TEST_ASSERT (jerry_value_is_error (num2));
157 num3 = jerry_create_error_from_value (num2, true);
158 TEST_ASSERT (jerry_value_is_error (num3));
159 num2 = jerry_get_value_from_error (num3, true);
160 TEST_ASSERT (jerry_get_number_value (num2) == test_num);
161 jerry_release_value (num2);
162
163 num = jerry_create_number (test_num);
164 error = jerry_create_abort_from_value (num, true);
165 TEST_ASSERT (jerry_value_is_abort (error));
166 num2 = jerry_create_error_from_value (error, true);
167 TEST_ASSERT (jerry_value_is_error (num2));
168 num = jerry_get_value_from_error (num2, true);
169 TEST_ASSERT (jerry_get_number_value (num) == test_num);
170 jerry_release_value (num);
171
172 num = jerry_create_number (test_num);
173 error = jerry_create_abort_from_value (num, false);
174 jerry_release_value (num);
175 TEST_ASSERT (jerry_value_is_abort (error));
176 num2 = jerry_create_error_from_value (error, true);
177 TEST_ASSERT (jerry_value_is_error (num2));
178 num = jerry_get_value_from_error (num2, true);
179 TEST_ASSERT (jerry_get_number_value (num) == test_num);
180 jerry_release_value (num);
181
182 num = jerry_create_number (test_num);
183 error = jerry_create_abort_from_value (num, true);
184 TEST_ASSERT (jerry_value_is_abort (error));
185 num2 = jerry_create_error_from_value (error, false);
186 jerry_release_value (error);
187 TEST_ASSERT (jerry_value_is_error (num2));
188 num = jerry_get_value_from_error (num2, true);
189 TEST_ASSERT (jerry_get_number_value (num) == test_num);
190 jerry_release_value (num);
191
192 num = jerry_create_number (test_num);
193 error = jerry_create_abort_from_value (num, false);
194 jerry_release_value (num);
195 TEST_ASSERT (jerry_value_is_abort (error));
196 num2 = jerry_create_error_from_value (error, false);
197 jerry_release_value (error);
198 TEST_ASSERT (jerry_value_is_error (num2));
199 num = jerry_get_value_from_error (num2, true);
200 TEST_ASSERT (jerry_get_number_value (num) == test_num);
201 jerry_release_value (num);
202
203 jerry_value_t value = jerry_create_number (42);
204 value = jerry_get_value_from_error (value, true);
205 jerry_release_value (value);
206
207 value = jerry_create_number (42);
208 jerry_value_t value2 = jerry_get_value_from_error (value, false);
209 jerry_release_value (value);
210 jerry_release_value (value2);
211
212 value = jerry_create_number (42);
213 error = jerry_create_error_from_value (value, true);
214 error = jerry_create_error_from_value (error, true);
215 jerry_release_value (error);
216
217 value = jerry_create_number (42);
218 error = jerry_create_abort_from_value (value, true);
219 error = jerry_create_abort_from_value (error, true);
220 jerry_release_value (error);
221
222 value = jerry_create_number (42);
223 error = jerry_create_error_from_value (value, true);
224 error2 = jerry_create_error_from_value (error, false);
225 jerry_release_value (error);
226 jerry_release_value (error2);
227
228 value = jerry_create_number (42);
229 error = jerry_create_abort_from_value (value, true);
230 error2 = jerry_create_abort_from_value (error, false);
231 jerry_release_value (error);
232 jerry_release_value (error2);
233
234 jerry_cleanup ();
235 free(ctx_p);
236 }
237