175 lines
8.1 KiB
C
175 lines
8.1 KiB
C
/*
|
||
* This file is part of the Micro Python project, http://micropython.org/
|
||
*
|
||
* The MIT License (MIT)
|
||
*
|
||
* Copyright (c) 2021 microDev
|
||
*
|
||
* Permission is hereby granted, free of charge, to any person obtaining a copy
|
||
* of this software and associated documentation files (the "Software"), to deal
|
||
* in the Software without restriction, including without limitation the rights
|
||
* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
||
* copies of the Software, and to permit persons to whom the Software is
|
||
* furnished to do so, subject to the following conditions:
|
||
*
|
||
* The above copyright notice and this permission notice shall be included in
|
||
* all copies or substantial portions of the Software.
|
||
*
|
||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||
* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||
* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||
* AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||
* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
||
* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
|
||
* THE SOFTWARE.
|
||
*/
|
||
|
||
#include "py/stream.h"
|
||
#include "py/runtime.h"
|
||
|
||
#include "shared-module/traceback/__init__.h"
|
||
|
||
//| """Traceback Module
|
||
//|
|
||
//| This module provides a standard interface to print stack traces of programs.
|
||
//| This is useful when you want to print stack traces under program control.
|
||
//|
|
||
//| """
|
||
//| ...
|
||
//|
|
||
|
||
STATIC void traceback_exception_common(mp_print_t *print, mp_obj_t value, mp_obj_t tb_obj, mp_obj_t limit_obj) {
|
||
if (!mp_obj_is_exception_instance(value)) {
|
||
mp_raise_TypeError(translate("invalid exception"));
|
||
}
|
||
|
||
mp_int_t limit = 0;
|
||
bool print_tb = true;
|
||
if (limit_obj != mp_const_none) {
|
||
limit = mp_obj_get_int(limit_obj);
|
||
print_tb = (limit != 0);
|
||
}
|
||
|
||
mp_obj_exception_t *exc = mp_obj_exception_get_native(value);
|
||
mp_obj_traceback_t *trace_backup = exc->traceback;
|
||
|
||
if (tb_obj != mp_const_none && print_tb) {
|
||
exc->traceback = mp_arg_validate_type(tb_obj, &mp_type_traceback, MP_QSTR_tb);
|
||
} else {
|
||
exc->traceback = (mp_obj_traceback_t *)&mp_const_empty_traceback_obj;
|
||
}
|
||
|
||
shared_module_traceback_print_exception(MP_OBJ_TO_PTR(value), print, limit);
|
||
exc->traceback = trace_backup;
|
||
}
|
||
|
||
//| def format_exception(etype: Type[BaseException], value: BaseException, tb: TracebackType,
|
||
//| limit: Optional[int] = None, chain: Optional[bool] = True) -> None:
|
||
//| """Format a stack trace and the exception information.
|
||
//|
|
||
//| The arguments have the same meaning as the corresponding arguments
|
||
//| to print_exception(). The return value is a list of strings, each
|
||
//| ending in a newline and some containing internal newlines. When
|
||
//| these lines are concatenated and printed, exactly the same text is
|
||
//| printed as does print_exception().
|
||
//|
|
||
//| .. note:: Setting ``chain`` will have no effect as chained exceptions are not yet implemented.
|
||
//|
|
||
//| :param Type[BaseException] etype: This is ignored and inferred from the type of ``value``.
|
||
//| :param BaseException value: The exception. Must be an instance of `BaseException`.
|
||
//| :param TracebackType tb: The traceback object. If `None`, the traceback will not be printed.
|
||
//| :param int limit: Print up to limit stack trace entries (starting from the caller’s frame) if limit is positive.
|
||
//| Otherwise, print the last ``abs(limit)`` entries. If limit is omitted or None, all entries are printed.
|
||
//| :param bool chain: If `True` then chained exceptions will be printed (note: not yet implemented).
|
||
//|
|
||
//| """
|
||
//| ...
|
||
//|
|
||
STATIC mp_obj_t traceback_format_exception(size_t n_args, const mp_obj_t *pos_args, mp_map_t *kw_args) {
|
||
enum { ARG_etype, ARG_value, ARG_tb, ARG_limit, ARG_chain };
|
||
static const mp_arg_t allowed_args[] = {
|
||
{ MP_QSTR_etype, MP_ARG_OBJ | MP_ARG_REQUIRED, {.u_obj = MP_OBJ_NULL} },
|
||
{ MP_QSTR_value, MP_ARG_OBJ | MP_ARG_REQUIRED, {.u_obj = MP_OBJ_NULL} },
|
||
{ MP_QSTR_tb, MP_ARG_OBJ | MP_ARG_REQUIRED, {.u_obj = MP_OBJ_NULL} },
|
||
{ MP_QSTR_limit, MP_ARG_OBJ, {.u_obj = mp_const_none} },
|
||
{ MP_QSTR_chain, MP_ARG_BOOL, {.u_bool = true} },
|
||
};
|
||
|
||
mp_arg_val_t args[MP_ARRAY_SIZE(allowed_args)];
|
||
mp_arg_parse_all(n_args, pos_args, kw_args, MP_ARRAY_SIZE(allowed_args), allowed_args, args);
|
||
|
||
mp_print_t print;
|
||
vstr_t vstr;
|
||
vstr_init_print(&vstr, 0, &print);
|
||
traceback_exception_common(&print, args[ARG_value].u_obj, args[ARG_tb].u_obj, args[ARG_limit].u_obj);
|
||
return mp_obj_new_str_from_vstr(&mp_type_str, &vstr);
|
||
}
|
||
|
||
STATIC MP_DEFINE_CONST_FUN_OBJ_KW(traceback_format_exception_obj, 0, traceback_format_exception);
|
||
|
||
//| def print_exception(etype: Type[BaseException], value: BaseException, tb: TracebackType,
|
||
//| limit: Optional[int] = None, file: Optional[io.FileIO] = None, chain: Optional[bool] = True) -> None:
|
||
//|
|
||
//| """Prints exception information and stack trace entries.
|
||
//|
|
||
//| .. note:: Setting ``chain`` will have no effect as chained exceptions are not yet implemented.
|
||
//|
|
||
//| :param Type[BaseException] etype: This is ignored and inferred from the type of ``value``.
|
||
//| :param BaseException value: The exception. Must be an instance of `BaseException`.
|
||
//| :param TracebackType tb: The traceback object. If `None`, the traceback will not be printed.
|
||
//| :param int limit: Print up to limit stack trace entries (starting from the caller’s frame) if limit is positive.
|
||
//| Otherwise, print the last ``abs(limit)`` entries. If limit is omitted or None, all entries are printed.
|
||
//| :param io.FileIO file: If file is omitted or `None`, the output goes to `sys.stderr`; otherwise it should be an open
|
||
//| file or file-like object to receive the output.
|
||
//| :param bool chain: If `True` then chained exceptions will be printed (note: not yet implemented).
|
||
//|
|
||
//| """
|
||
//| ...
|
||
//|
|
||
|
||
STATIC mp_obj_t traceback_print_exception(size_t n_args, const mp_obj_t *pos_args, mp_map_t *kw_args) {
|
||
enum { ARG_etype, ARG_value, ARG_tb, ARG_limit, ARG_file, ARG_chain };
|
||
static const mp_arg_t allowed_args[] = {
|
||
{ MP_QSTR_etype, MP_ARG_OBJ | MP_ARG_REQUIRED, {.u_obj = MP_OBJ_NULL} },
|
||
{ MP_QSTR_value, MP_ARG_OBJ | MP_ARG_REQUIRED, {.u_obj = MP_OBJ_NULL} },
|
||
{ MP_QSTR_tb, MP_ARG_OBJ | MP_ARG_REQUIRED, {.u_obj = MP_OBJ_NULL} },
|
||
{ MP_QSTR_limit, MP_ARG_OBJ, {.u_obj = mp_const_none} },
|
||
{ MP_QSTR_file, MP_ARG_OBJ, {.u_obj = mp_const_none} },
|
||
{ MP_QSTR_chain, MP_ARG_BOOL, {.u_bool = true} },
|
||
};
|
||
|
||
mp_arg_val_t args[MP_ARRAY_SIZE(allowed_args)];
|
||
mp_arg_parse_all(n_args, pos_args, kw_args, MP_ARRAY_SIZE(allowed_args), allowed_args, args);
|
||
|
||
mp_print_t print = mp_plat_print;
|
||
if (args[ARG_file].u_obj != mp_const_none) {
|
||
#if MICROPY_PY_IO && MICROPY_PY_SYS_STDFILES
|
||
mp_get_stream_raise(args[ARG_file].u_obj, MP_STREAM_OP_WRITE);
|
||
print.data = MP_OBJ_TO_PTR(args[ARG_file].u_obj);
|
||
print.print_strn = mp_stream_write_adaptor;
|
||
#else
|
||
mp_raise_NotImplementedError(translate("file write is not available"));
|
||
#endif
|
||
}
|
||
|
||
traceback_exception_common(&print, args[ARG_value].u_obj, args[ARG_tb].u_obj, args[ARG_limit].u_obj);
|
||
return mp_const_none;
|
||
}
|
||
STATIC MP_DEFINE_CONST_FUN_OBJ_KW(traceback_print_exception_obj, 0, traceback_print_exception);
|
||
|
||
STATIC const mp_rom_map_elem_t traceback_module_globals_table[] = {
|
||
// module name
|
||
{ MP_ROM_QSTR(MP_QSTR___name__), MP_ROM_QSTR(MP_QSTR_traceback) },
|
||
// module functions
|
||
{ MP_ROM_QSTR(MP_QSTR_format_exception), MP_ROM_PTR(&traceback_format_exception_obj) },
|
||
{ MP_ROM_QSTR(MP_QSTR_print_exception), MP_ROM_PTR(&traceback_print_exception_obj) },
|
||
};
|
||
STATIC MP_DEFINE_CONST_DICT(traceback_module_globals, traceback_module_globals_table);
|
||
|
||
const mp_obj_module_t traceback_module = {
|
||
.base = { &mp_type_module },
|
||
.globals = (mp_obj_dict_t *)&traceback_module_globals,
|
||
};
|
||
|
||
MP_REGISTER_MODULE(MP_QSTR_traceback, traceback_module, CIRCUITPY_TRACEBACK);
|