forked from xuos/xiuos
				
			
		
			
				
	
	
		
			259 lines
		
	
	
		
			8.7 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			259 lines
		
	
	
		
			8.7 KiB
		
	
	
	
		
			C
		
	
	
	
| /*
 | ||
|  * This file is part of the MicroPython project, http://micropython.org/
 | ||
|  *
 | ||
|  * The MIT License (MIT)
 | ||
|  *
 | ||
|  * Copyright (c) 2013, 2014 Damien P. George
 | ||
|  * Copyright (c) 2014-2017 Paul Sokolovsky
 | ||
|  *
 | ||
|  * 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/builtin.h"
 | ||
| #include "py/objlist.h"
 | ||
| #include "py/objtuple.h"
 | ||
| #include "py/objstr.h"
 | ||
| #include "py/objint.h"
 | ||
| #include "py/objtype.h"
 | ||
| #include "py/stream.h"
 | ||
| #include "py/smallint.h"
 | ||
| #include "py/runtime.h"
 | ||
| #include "py/persistentcode.h"
 | ||
| 
 | ||
| #if MICROPY_PY_SYS_SETTRACE
 | ||
| #include "py/objmodule.h"
 | ||
| #include "py/profile.h"
 | ||
| #endif
 | ||
| 
 | ||
| #if MICROPY_PY_SYS
 | ||
| 
 | ||
| // 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 && MICROPY_PY_SYS_STDFILES
 | ||
| const mp_print_t mp_sys_stdout_print = {&mp_sys_stdout_obj, mp_stream_write_adaptor};
 | ||
| #endif
 | ||
| 
 | ||
| // version - Python language version that this implementation conforms to, as a string
 | ||
| STATIC const MP_DEFINE_STR_OBJ(mp_sys_version_obj, "3.4.0");
 | ||
| 
 | ||
| // 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_PERSISTENT_CODE_LOAD
 | ||
| #define SYS_IMPLEMENTATION_ELEMS \
 | ||
|     MP_ROM_QSTR(MP_QSTR_micropython), \
 | ||
|     MP_ROM_PTR(&mp_sys_implementation_version_info_obj), \
 | ||
|     MP_ROM_INT(MPY_FILE_HEADER_INT)
 | ||
| #else
 | ||
| #define SYS_IMPLEMENTATION_ELEMS \
 | ||
|     MP_ROM_QSTR(MP_QSTR_micropython), \
 | ||
|     MP_ROM_PTR(&mp_sys_implementation_version_info_obj)
 | ||
| #endif
 | ||
| #if MICROPY_PY_ATTRTUPLE
 | ||
| STATIC const qstr impl_fields[] = {
 | ||
|     MP_QSTR_name,
 | ||
|     MP_QSTR_version,
 | ||
|     #if MICROPY_PERSISTENT_CODE_LOAD
 | ||
|     MP_QSTR_mpy,
 | ||
|     #endif
 | ||
| };
 | ||
| STATIC MP_DEFINE_ATTRTUPLE(
 | ||
|     mp_sys_implementation_obj,
 | ||
|     impl_fields,
 | ||
|     2 + MICROPY_PERSISTENT_CODE_LOAD,
 | ||
|     SYS_IMPLEMENTATION_ELEMS
 | ||
|     );
 | ||
| #else
 | ||
| STATIC const mp_rom_obj_tuple_t mp_sys_implementation_obj = {
 | ||
|     {&mp_type_tuple},
 | ||
|     2 + MICROPY_PERSISTENT_CODE_LOAD,
 | ||
|     {
 | ||
|         SYS_IMPLEMENTATION_ELEMS
 | ||
|     }
 | ||
| };
 | ||
| #endif
 | ||
| 
 | ||
| #undef I
 | ||
| 
 | ||
| #ifdef MICROPY_PY_SYS_PLATFORM
 | ||
| // platform - the platform that MicroPython is running on
 | ||
| STATIC const MP_DEFINE_STR_OBJ(mp_sys_platform_obj, MICROPY_PY_SYS_PLATFORM);
 | ||
| #endif
 | ||
| 
 | ||
| // exit([retval]): raise SystemExit, with optional argument given to the exception
 | ||
| STATIC mp_obj_t mp_sys_exit(size_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(size_t n_args, const mp_obj_t *args) {
 | ||
|     #if MICROPY_PY_IO && MICROPY_PY_SYS_STDFILES
 | ||
|     void *stream_obj = &mp_sys_stdout_obj;
 | ||
|     if (n_args > 1) {
 | ||
|         mp_get_stream_raise(args[1], MP_STREAM_OP_WRITE);
 | ||
|         stream_obj = MP_OBJ_TO_PTR(args[1]);
 | ||
|     }
 | ||
| 
 | ||
|     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
 | ||
| 
 | ||
| #if MICROPY_PY_SYS_GETSIZEOF
 | ||
| STATIC mp_obj_t mp_sys_getsizeof(mp_obj_t obj) {
 | ||
|     return mp_unary_op(MP_UNARY_OP_SIZEOF, obj);
 | ||
| }
 | ||
| STATIC MP_DEFINE_CONST_FUN_OBJ_1(mp_sys_getsizeof_obj, mp_sys_getsizeof);
 | ||
| #endif
 | ||
| 
 | ||
| #if MICROPY_PY_SYS_ATEXIT
 | ||
| // atexit(callback): Callback is called when sys.exit is called.
 | ||
| STATIC mp_obj_t mp_sys_atexit(mp_obj_t obj) {
 | ||
|     mp_obj_t old = MP_STATE_VM(sys_exitfunc);
 | ||
|     MP_STATE_VM(sys_exitfunc) = obj;
 | ||
|     return old;
 | ||
| }
 | ||
| STATIC MP_DEFINE_CONST_FUN_OBJ_1(mp_sys_atexit_obj, mp_sys_atexit);
 | ||
| #endif
 | ||
| 
 | ||
| #if MICROPY_PY_SYS_SETTRACE
 | ||
| // settrace(tracefunc): Set the system’s trace function.
 | ||
| STATIC mp_obj_t mp_sys_settrace(mp_obj_t obj) {
 | ||
|     return mp_prof_settrace(obj);
 | ||
| }
 | ||
| MP_DEFINE_CONST_FUN_OBJ_1(mp_sys_settrace_obj, mp_sys_settrace);
 | ||
| #endif // MICROPY_PY_SYS_SETTRACE
 | ||
| 
 | ||
| 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(&mp_sys_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(&mp_sys_platform_obj) },
 | ||
|     #endif
 | ||
|     #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
 | ||
|     // Maximum mp_int_t value is not representable as small int, so we have
 | ||
|     // little choice but to use MP_SMALL_INT_MAX. Apps also should be careful
 | ||
|     // to not try to compare sys.maxsize to some literal number (as this
 | ||
|     // number might not fit in available int size), but instead count number
 | ||
|     // of "one" bits in sys.maxsize.
 | ||
|     { MP_ROM_QSTR(MP_QSTR_maxsize), MP_ROM_INT(MP_SMALL_INT_MAX) },
 | ||
|     #else
 | ||
|     { MP_ROM_QSTR(MP_QSTR_maxsize), MP_ROM_PTR(&mp_sys_maxsize_obj) },
 | ||
|     #endif
 | ||
|     #endif
 | ||
| 
 | ||
|     #if MICROPY_PY_SYS_EXIT
 | ||
|     { MP_ROM_QSTR(MP_QSTR_exit), MP_ROM_PTR(&mp_sys_exit_obj) },
 | ||
|     #endif
 | ||
| 
 | ||
|     #if MICROPY_PY_SYS_SETTRACE
 | ||
|     { MP_ROM_QSTR(MP_QSTR_settrace), MP_ROM_PTR(&mp_sys_settrace_obj) },
 | ||
|     #endif
 | ||
| 
 | ||
|     #if MICROPY_PY_SYS_STDFILES
 | ||
|     { 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
 | ||
|     #if MICROPY_PY_SYS_GETSIZEOF
 | ||
|     { MP_ROM_QSTR(MP_QSTR_getsizeof), MP_ROM_PTR(&mp_sys_getsizeof_obj) },
 | ||
|     #endif
 | ||
| 
 | ||
|     /*
 | ||
|      * Extensions to CPython
 | ||
|      */
 | ||
| 
 | ||
|     { MP_ROM_QSTR(MP_QSTR_print_exception), MP_ROM_PTR(&mp_sys_print_exception_obj) },
 | ||
|     #if MICROPY_PY_SYS_ATEXIT
 | ||
|     { MP_ROM_QSTR(MP_QSTR_atexit), MP_ROM_PTR(&mp_sys_atexit_obj) },
 | ||
|     #endif
 | ||
| };
 | ||
| 
 | ||
| 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 },
 | ||
|     .globals = (mp_obj_dict_t *)&mp_module_sys_globals,
 | ||
| };
 | ||
| 
 | ||
| #endif
 |