Numworks Epsilon  1.4.1
Graphing Calculator Operating System
stackctrl.c
Go to the documentation of this file.
1 /*
2  * This file is part of the Micro Python project, http://micropython.org/
3  *
4  * The MIT License (MIT)
5  *
6  * Copyright (c) 2014 Paul Sokolovsky
7  *
8  * Permission is hereby granted, free of charge, to any person obtaining a copy
9  * of this software and associated documentation files (the "Software"), to deal
10  * in the Software without restriction, including without limitation the rights
11  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
12  * copies of the Software, and to permit persons to whom the Software is
13  * furnished to do so, subject to the following conditions:
14  *
15  * The above copyright notice and this permission notice shall be included in
16  * all copies or substantial portions of the Software.
17  *
18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
21  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
24  * THE SOFTWARE.
25  */
26 
27 #include "py/mpstate.h"
28 #include "py/nlr.h"
29 #include "py/obj.h"
30 #include "py/runtime.h"
31 #include "py/stackctrl.h"
32 
33 void mp_stack_ctrl_init(void) {
34  volatile int stack_dummy;
35  MP_STATE_THREAD(stack_top) = (char*)&stack_dummy;
36 }
37 
38 void mp_stack_set_top(void *top) {
39  MP_STATE_THREAD(stack_top) = top;
40 }
41 
43  /* Micropython's stackctrl.c assumes that the stack is in descending order,
44  * which is not always the case for us. */
45  volatile int stack_dummy;
46  if (MP_STATE_THREAD(stack_top) > (char*)&stack_dummy) {
47  return MP_STATE_THREAD(stack_top) - (char*)&stack_dummy;
48  } else {
49  return (char*)&stack_dummy - MP_STATE_THREAD(stack_top);
50  }
51 }
52 
53 #if MICROPY_STACK_CHECK
54 
55 void mp_stack_set_limit(mp_uint_t limit) {
56  MP_STATE_THREAD(stack_limit) = limit;
57 }
58 
59 void mp_exc_recursion_depth(void) {
61  MP_OBJ_NEW_QSTR(MP_QSTR_maximum_space_recursion_space_depth_space_exceeded)));
62 }
63 
64 void mp_stack_check(void) {
65  if (mp_stack_usage() >= MP_STATE_THREAD(stack_limit)) {
67  }
68 }
69 
70 #endif // MICROPY_STACK_CHECK
uintptr_t mp_uint_t
Definition: mpconfigport.h:74
mp_uint_t mp_stack_usage(void)
Definition: stackctrl.c:42
#define MP_OBJ_NEW_QSTR(qst)
Definition: obj.h:92
#define MP_STATE_THREAD(x)
Definition: mpstate.h:248
NORETURN void mp_exc_recursion_depth(void)
#define mp_stack_set_limit(limit)
Definition: stackctrl.h:43
mp_obj_t mp_obj_new_exception_arg1(const mp_obj_type_t *exc_type, mp_obj_t arg)
Definition: objexcept.c:334
void mp_stack_ctrl_init(void)
Definition: stackctrl.c:33
#define nlr_raise(val)
Definition: nlr.h:89
void mp_stack_set_top(void *top)
Definition: stackctrl.c:38
const mp_obj_type_t mp_type_RuntimeError