211 lines
7.3 KiB
C
211 lines
7.3 KiB
C
/*
|
|
* This file is part of the Micro Python project, http://micropython.org/
|
|
*
|
|
* The MIT License (MIT)
|
|
*
|
|
* Copyright (c) 2013, 2014 Damien P. George
|
|
*
|
|
* 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/mpstate.h"
|
|
#include "py/nlr.h"
|
|
#include "py/builtin.h"
|
|
#include "py/objlist.h"
|
|
#include "py/objtuple.h"
|
|
#include "py/objstr.h"
|
|
#include "py/objint.h"
|
|
#include "py/stream.h"
|
|
|
|
#if MICROPY_PY_SYS
|
|
|
|
#include "genhdr/mpversion.h"
|
|
|
|
/// \module sys - system specific functions
|
|
|
|
// defined per port; type of these is irrelevant, just need pointer
|
|
extern struct _mp_dummy_t mp_sys_stdin_obj;
|
|
extern struct _mp_dummy_t mp_sys_stdout_obj;
|
|
extern struct _mp_dummy_t mp_sys_stderr_obj;
|
|
|
|
#if MICROPY_PY_IO
|
|
const mp_print_t mp_sys_stdout_print = {&mp_sys_stdout_obj, mp_stream_write_adaptor};
|
|
#endif
|
|
|
|
/// \constant version - Python language version that this implementation conforms to, as a string
|
|
STATIC const MP_DEFINE_STR_OBJ(version_obj, "3.4.0");
|
|
|
|
/// \constant version_info - Python language version that this implementation conforms to, as a tuple of ints
|
|
#define I(n) MP_OBJ_NEW_SMALL_INT(n)
|
|
// TODO: CPython is now at 5-element array, but save 2 els so far...
|
|
STATIC const mp_obj_tuple_t mp_sys_version_info_obj = {{&mp_type_tuple}, 3, {I(3), I(4), I(0)}};
|
|
|
|
// sys.implementation object
|
|
// this holds the MicroPython version
|
|
STATIC const mp_obj_tuple_t mp_sys_implementation_version_info_obj = {
|
|
{&mp_type_tuple},
|
|
3,
|
|
{ I(MICROPY_VERSION_MAJOR), I(MICROPY_VERSION_MINOR), I(MICROPY_VERSION_MICRO) }
|
|
};
|
|
#if MICROPY_PY_ATTRTUPLE
|
|
STATIC const qstr impl_fields[] = { MP_QSTR_name, MP_QSTR_version };
|
|
STATIC MP_DEFINE_ATTRTUPLE(
|
|
mp_sys_implementation_obj,
|
|
impl_fields,
|
|
2,
|
|
MP_ROM_QSTR(MP_QSTR_micropython),
|
|
MP_ROM_PTR(&mp_sys_implementation_version_info_obj)
|
|
);
|
|
#else
|
|
STATIC const mp_obj_tuple_t mp_sys_implementation_obj = {
|
|
{&mp_type_tuple},
|
|
2,
|
|
{
|
|
MP_OBJ_NEW_QSTR(MP_QSTR_micropython),
|
|
(mp_obj_t)&mp_sys_implementation_version_info_obj,
|
|
}
|
|
};
|
|
#endif
|
|
|
|
#undef I
|
|
|
|
#ifdef MICROPY_PY_SYS_PLATFORM
|
|
/// \constant platform - the platform that Micro Python is running on
|
|
STATIC const MP_DEFINE_STR_OBJ(platform_obj, MICROPY_PY_SYS_PLATFORM);
|
|
#endif
|
|
|
|
/// \function exit([retval])
|
|
/// Raise a `SystemExit` exception. If an argument is given, it is the
|
|
/// value given to `SystemExit`.
|
|
STATIC mp_obj_t mp_sys_exit(mp_uint_t n_args, const mp_obj_t *args) {
|
|
mp_obj_t exc;
|
|
if (n_args == 0) {
|
|
exc = mp_obj_new_exception(&mp_type_SystemExit);
|
|
} else {
|
|
exc = mp_obj_new_exception_arg1(&mp_type_SystemExit, args[0]);
|
|
}
|
|
nlr_raise(exc);
|
|
}
|
|
MP_DEFINE_CONST_FUN_OBJ_VAR_BETWEEN(mp_sys_exit_obj, 0, 1, mp_sys_exit);
|
|
|
|
STATIC mp_obj_t mp_sys_print_exception(mp_uint_t n_args, const mp_obj_t *args) {
|
|
#if MICROPY_PY_IO
|
|
void *stream_obj = &mp_sys_stdout_obj;
|
|
if (n_args > 1) {
|
|
stream_obj = MP_OBJ_TO_PTR(args[1]); // XXX may fail
|
|
}
|
|
|
|
mp_print_t print = {stream_obj, mp_stream_write_adaptor};
|
|
mp_obj_print_exception(&print, args[0]);
|
|
#else
|
|
(void)n_args;
|
|
mp_obj_print_exception(&mp_plat_print, args[0]);
|
|
#endif
|
|
|
|
return mp_const_none;
|
|
}
|
|
MP_DEFINE_CONST_FUN_OBJ_VAR_BETWEEN(mp_sys_print_exception_obj, 1, 2, mp_sys_print_exception);
|
|
|
|
#if MICROPY_PY_SYS_EXC_INFO
|
|
STATIC mp_obj_t mp_sys_exc_info(void) {
|
|
mp_obj_t cur_exc = MP_OBJ_FROM_PTR(MP_STATE_VM(cur_exception));
|
|
mp_obj_tuple_t *t = MP_OBJ_TO_PTR(mp_obj_new_tuple(3, NULL));
|
|
|
|
if (cur_exc == MP_OBJ_NULL) {
|
|
t->items[0] = mp_const_none;
|
|
t->items[1] = mp_const_none;
|
|
t->items[2] = mp_const_none;
|
|
return MP_OBJ_FROM_PTR(t);
|
|
}
|
|
|
|
t->items[0] = MP_OBJ_FROM_PTR(mp_obj_get_type(cur_exc));
|
|
t->items[1] = cur_exc;
|
|
t->items[2] = mp_const_none;
|
|
return MP_OBJ_FROM_PTR(t);
|
|
}
|
|
MP_DEFINE_CONST_FUN_OBJ_0(mp_sys_exc_info_obj, mp_sys_exc_info);
|
|
#endif
|
|
|
|
STATIC const mp_rom_map_elem_t mp_module_sys_globals_table[] = {
|
|
{ MP_ROM_QSTR(MP_QSTR___name__), MP_ROM_QSTR(MP_QSTR_sys) },
|
|
|
|
{ MP_ROM_QSTR(MP_QSTR_path), MP_ROM_PTR(&MP_STATE_VM(mp_sys_path_obj)) },
|
|
{ MP_ROM_QSTR(MP_QSTR_argv), MP_ROM_PTR(&MP_STATE_VM(mp_sys_argv_obj)) },
|
|
{ MP_ROM_QSTR(MP_QSTR_version), MP_ROM_PTR(&version_obj) },
|
|
{ MP_ROM_QSTR(MP_QSTR_version_info), MP_ROM_PTR(&mp_sys_version_info_obj) },
|
|
{ MP_ROM_QSTR(MP_QSTR_implementation), MP_ROM_PTR(&mp_sys_implementation_obj) },
|
|
#ifdef MICROPY_PY_SYS_PLATFORM
|
|
{ MP_ROM_QSTR(MP_QSTR_platform), MP_ROM_PTR(&platform_obj) },
|
|
#endif
|
|
/// \constant byteorder - the byte order of the system ("little" or "big")
|
|
#if MP_ENDIANNESS_LITTLE
|
|
{ MP_ROM_QSTR(MP_QSTR_byteorder), MP_ROM_QSTR(MP_QSTR_little) },
|
|
#else
|
|
{ MP_ROM_QSTR(MP_QSTR_byteorder), MP_ROM_QSTR(MP_QSTR_big) },
|
|
#endif
|
|
|
|
#if MICROPY_PY_SYS_MAXSIZE
|
|
#if MICROPY_LONGINT_IMPL == MICROPY_LONGINT_IMPL_NONE
|
|
// INT_MAX is not representable as small int, as we know that small int
|
|
// takes one bit for tag. So, we have little choice but to provide this
|
|
// value. Apps also should be careful to not try to compare sys.maxsize
|
|
// with some number (which may not fit in available int size), but instead
|
|
// count number of significant bits in sys.maxsize.
|
|
{ MP_ROM_QSTR(MP_QSTR_maxsize), MP_OBJ_NEW_SMALL_INT(INT_MAX >> 1) },
|
|
#else
|
|
{ MP_ROM_QSTR(MP_QSTR_maxsize), MP_ROM_PTR(&mp_maxsize_obj) },
|
|
#endif
|
|
#endif
|
|
|
|
#if MICROPY_PY_SYS_EXIT
|
|
// documented per-port
|
|
{ MP_ROM_QSTR(MP_QSTR_exit), MP_ROM_PTR(&mp_sys_exit_obj) },
|
|
#endif
|
|
|
|
#if MICROPY_PY_SYS_STDFILES
|
|
// documented per-port
|
|
{ MP_ROM_QSTR(MP_QSTR_stdin), MP_ROM_PTR(&mp_sys_stdin_obj) },
|
|
{ MP_ROM_QSTR(MP_QSTR_stdout), MP_ROM_PTR(&mp_sys_stdout_obj) },
|
|
{ MP_ROM_QSTR(MP_QSTR_stderr), MP_ROM_PTR(&mp_sys_stderr_obj) },
|
|
#endif
|
|
|
|
#if MICROPY_PY_SYS_MODULES
|
|
{ MP_ROM_QSTR(MP_QSTR_modules), MP_ROM_PTR(&MP_STATE_VM(mp_loaded_modules_dict)) },
|
|
#endif
|
|
#if MICROPY_PY_SYS_EXC_INFO
|
|
{ MP_ROM_QSTR(MP_QSTR_exc_info), MP_ROM_PTR(&mp_sys_exc_info_obj) },
|
|
#endif
|
|
|
|
/*
|
|
* Extensions to CPython
|
|
*/
|
|
|
|
{ MP_ROM_QSTR(MP_QSTR_print_exception), MP_ROM_PTR(&mp_sys_print_exception_obj) },
|
|
};
|
|
|
|
STATIC MP_DEFINE_CONST_DICT(mp_module_sys_globals, mp_module_sys_globals_table);
|
|
|
|
const mp_obj_module_t mp_module_sys = {
|
|
.base = { &mp_type_module },
|
|
.name = MP_QSTR_sys,
|
|
.globals = (mp_obj_dict_t*)&mp_module_sys_globals,
|
|
};
|
|
|
|
#endif
|