1425bb815Sopenharmony_ci/* Copyright JS Foundation and other contributors, http://js.foundation
2425bb815Sopenharmony_ci *
3425bb815Sopenharmony_ci * Licensed under the Apache License, Version 2.0 (the "License");
4425bb815Sopenharmony_ci * you may not use this file except in compliance with the License.
5425bb815Sopenharmony_ci * You may obtain a copy of the License at
6425bb815Sopenharmony_ci *
7425bb815Sopenharmony_ci *     http://www.apache.org/licenses/LICENSE-2.0
8425bb815Sopenharmony_ci *
9425bb815Sopenharmony_ci * Unless required by applicable law or agreed to in writing, software
10425bb815Sopenharmony_ci * distributed under the License is distributed on an "AS IS" BASIS
11425bb815Sopenharmony_ci * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12425bb815Sopenharmony_ci * See the License for the specific language governing permissions and
13425bb815Sopenharmony_ci * limitations under the License.
14425bb815Sopenharmony_ci */
15425bb815Sopenharmony_ci
16425bb815Sopenharmony_ci#include <stdlib.h>
17425bb815Sopenharmony_ci
18425bb815Sopenharmony_ci#include "jerryscript-port.h"
19425bb815Sopenharmony_ci#include "jerryscript-port-default.h"
20425bb815Sopenharmony_ci
21425bb815Sopenharmony_ci#ifdef JERRY_FOR_IAR_CONFIG
22425bb815Sopenharmony_ci#include "jcontext.h"
23425bb815Sopenharmony_ci
24425bb815Sopenharmony_ci#if !ENABLED (JERRY_EXTERNAL_CONTEXT)
25425bb815Sopenharmony_cistatic fatal_handler_t jerry_fatal_handler = NULL;
26425bb815Sopenharmony_ci#endif
27425bb815Sopenharmony_ci
28425bb815Sopenharmony_civoid jerry_port_default_set_fatal_handler (fatal_handler_t handler)
29425bb815Sopenharmony_ci{
30425bb815Sopenharmony_ci#if ENABLED (JERRY_EXTERNAL_CONTEXT)
31425bb815Sopenharmony_ci  JERRY_CONTEXT (jerry_fatal_handler) = handler;
32425bb815Sopenharmony_ci#else
33425bb815Sopenharmony_ci  jerry_fatal_handler = handler;
34425bb815Sopenharmony_ci#endif
35425bb815Sopenharmony_ci}
36425bb815Sopenharmony_ci
37425bb815Sopenharmony_ci/**
38425bb815Sopenharmony_ci * Default implementation of jerry_port_fatal. Calls 'abort' if exit code is
39425bb815Sopenharmony_ci * non-zero, 'exit' otherwise.
40425bb815Sopenharmony_ci */
41425bb815Sopenharmony_civoid jerry_port_fatal (jerry_fatal_code_t code) /**< cause of error */
42425bb815Sopenharmony_ci{
43425bb815Sopenharmony_ci#if ENABLED (JERRY_EXTERNAL_CONTEXT)
44425bb815Sopenharmony_ci  fatal_handler_t jerry_fatal_handler = JERRY_CONTEXT (jerry_fatal_handler);
45425bb815Sopenharmony_ci#endif
46425bb815Sopenharmony_ci  if (jerry_fatal_handler != NULL)
47425bb815Sopenharmony_ci  {
48425bb815Sopenharmony_ci    jerry_fatal_handler ((int) code);
49425bb815Sopenharmony_ci  }
50425bb815Sopenharmony_ci  if (code != 0
51425bb815Sopenharmony_ci      && code != ERR_OUT_OF_MEMORY)
52425bb815Sopenharmony_ci  {
53425bb815Sopenharmony_ci    abort ();
54425bb815Sopenharmony_ci  }
55425bb815Sopenharmony_ci
56425bb815Sopenharmony_ci  exit ((int) code);
57425bb815Sopenharmony_ci} /* jerry_port_fatal */
58425bb815Sopenharmony_ci
59425bb815Sopenharmony_ci#else // not defined JERRY_FOR_IAR_CONFIG
60425bb815Sopenharmony_ci
61425bb815Sopenharmony_cistatic fatal_handler_t jerry_fatal_handler = NULL;
62425bb815Sopenharmony_ci
63425bb815Sopenharmony_civoid jerry_port_default_set_fatal_handler (fatal_handler_t handler)
64425bb815Sopenharmony_ci{
65425bb815Sopenharmony_ci  jerry_fatal_handler = handler;
66425bb815Sopenharmony_ci}
67425bb815Sopenharmony_ci
68425bb815Sopenharmony_ci/**
69425bb815Sopenharmony_ci * Default implementation of jerry_port_fatal. Calls 'abort' if exit code is
70425bb815Sopenharmony_ci * non-zero, 'exit' otherwise.
71425bb815Sopenharmony_ci */
72425bb815Sopenharmony_civoid jerry_port_fatal (jerry_fatal_code_t code) /**< cause of error */
73425bb815Sopenharmony_ci{
74425bb815Sopenharmony_ci  if (jerry_fatal_handler != NULL)
75425bb815Sopenharmony_ci  {
76425bb815Sopenharmony_ci    jerry_fatal_handler ((int) code);
77425bb815Sopenharmony_ci  }
78425bb815Sopenharmony_ci  if (code != 0
79425bb815Sopenharmony_ci      && code != ERR_OUT_OF_MEMORY)
80425bb815Sopenharmony_ci  {
81425bb815Sopenharmony_ci    abort ();
82425bb815Sopenharmony_ci  }
83425bb815Sopenharmony_ci
84425bb815Sopenharmony_ci  exit ((int) code);
85425bb815Sopenharmony_ci} /* jerry_port_fatal */
86425bb815Sopenharmony_ci
87425bb815Sopenharmony_ci#endif
88