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