Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 1 | // All Micro Python objects are at least this type |
| 2 | // It must be of pointer size |
| 3 | |
| 4 | typedef machine_ptr_t mp_obj_t; |
| 5 | typedef machine_const_ptr_t mp_const_obj_t; |
| 6 | |
| 7 | // Integers that fit in a pointer have this type |
| 8 | // (do we need to expose this in the public API?) |
| 9 | |
| 10 | typedef machine_int_t mp_small_int_t; |
| 11 | |
Damien George | 97209d3 | 2014-01-07 15:58:30 +0000 | [diff] [blame] | 12 | // Anything that wants to be a Micro Python object must have |
| 13 | // mp_obj_base_t as its first member (except NULL and small ints) |
Damien | 660365e | 2013-12-17 18:27:24 +0000 | [diff] [blame] | 14 | |
ian-v | 7a16fad | 2014-01-06 09:52:29 -0800 | [diff] [blame] | 15 | struct _mp_obj_type_t; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 16 | struct _mp_obj_base_t { |
ian-v | 7a16fad | 2014-01-06 09:52:29 -0800 | [diff] [blame] | 17 | const struct _mp_obj_type_t *type; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 18 | }; |
ian-v | 7a16fad | 2014-01-06 09:52:29 -0800 | [diff] [blame] | 19 | typedef struct _mp_obj_base_t mp_obj_base_t; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 20 | |
| 21 | // The NULL object is used to indicate the absence of an object |
| 22 | // It *cannot* be used when an mp_obj_t is expected, except where explicitly allowed |
| 23 | |
| 24 | #define MP_OBJ_NULL ((mp_obj_t)NULL) |
| 25 | |
Damien George | 95004e5 | 2014-04-05 17:17:19 +0100 | [diff] [blame] | 26 | // The SENTINEL object is used for various internal purposes where one needs |
| 27 | // an object which is unique from all other objects, including MP_OBJ_NULL. |
| 28 | |
| 29 | #define MP_OBJ_SENTINEL ((mp_obj_t)8) |
| 30 | |
Damien George | 38a2da6 | 2014-01-08 17:33:12 +0000 | [diff] [blame] | 31 | // These macros check for small int, qstr or object, and access small int and qstr values |
| 32 | // - xxxx...xxx1: a small int, bits 1 and above are the value |
| 33 | // - xxxx...xx10: a qstr, bits 2 and above are the value |
| 34 | // - xxxx...xx00: a pointer to an mp_obj_base_t |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 35 | |
Paul Sokolovsky | 757ac81 | 2014-01-12 17:06:25 +0200 | [diff] [blame] | 36 | // In SMALL_INT, next-to-highest bits is used as sign, so both must match for value in range |
Damien George | 9d68e9c | 2014-03-12 15:38:15 +0000 | [diff] [blame] | 37 | #define MP_SMALL_INT_MIN ((mp_small_int_t)(((machine_int_t)WORD_MSBIT_HIGH) >> 1)) |
| 38 | #define MP_SMALL_INT_MAX ((mp_small_int_t)(~(MP_SMALL_INT_MIN))) |
Paul Sokolovsky | 757ac81 | 2014-01-12 17:06:25 +0200 | [diff] [blame] | 39 | #define MP_OBJ_FITS_SMALL_INT(n) ((((n) ^ ((n) << 1)) & WORD_MSBIT_HIGH) == 0) |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 40 | #define MP_OBJ_IS_SMALL_INT(o) ((((mp_small_int_t)(o)) & 1) != 0) |
Damien George | 38a2da6 | 2014-01-08 17:33:12 +0000 | [diff] [blame] | 41 | #define MP_OBJ_IS_QSTR(o) ((((mp_small_int_t)(o)) & 3) == 2) |
| 42 | #define MP_OBJ_IS_OBJ(o) ((((mp_small_int_t)(o)) & 3) == 0) |
Damien George | 7c9c667 | 2014-01-25 00:17:36 +0000 | [diff] [blame] | 43 | #define MP_OBJ_IS_TYPE(o, t) (MP_OBJ_IS_OBJ(o) && (((mp_obj_base_t*)(o))->type == (t))) // this does not work for checking a string, use below macro for that |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 44 | #define MP_OBJ_IS_INT(o) (MP_OBJ_IS_SMALL_INT(o) || MP_OBJ_IS_TYPE(o, &mp_type_int)) |
| 45 | #define MP_OBJ_IS_STR(o) (MP_OBJ_IS_QSTR(o) || MP_OBJ_IS_TYPE(o, &mp_type_str)) |
Damien George | 38a2da6 | 2014-01-08 17:33:12 +0000 | [diff] [blame] | 46 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 47 | #define MP_OBJ_SMALL_INT_VALUE(o) (((mp_small_int_t)(o)) >> 1) |
Damien George | 38a2da6 | 2014-01-08 17:33:12 +0000 | [diff] [blame] | 48 | #define MP_OBJ_NEW_SMALL_INT(small_int) ((mp_obj_t)(((small_int) << 1) | 1)) |
| 49 | |
| 50 | #define MP_OBJ_QSTR_VALUE(o) (((mp_small_int_t)(o)) >> 2) |
| 51 | #define MP_OBJ_NEW_QSTR(qstr) ((mp_obj_t)((((machine_uint_t)qstr) << 2) | 2)) |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 52 | |
| 53 | // These macros are used to declare and define constant function objects |
| 54 | // You can put "static" in front of the definitions to make them local |
| 55 | |
| 56 | #define MP_DECLARE_CONST_FUN_OBJ(obj_name) extern const mp_obj_fun_native_t obj_name |
| 57 | |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 58 | #define MP_DEFINE_CONST_FUN_OBJ_VOID_PTR(obj_name, is_kw, n_args_min, n_args_max, fun_name) const mp_obj_fun_native_t obj_name = {{&mp_type_fun_native}, is_kw, n_args_min, n_args_max, (void *)fun_name} |
John R. Lenton | 270112f | 2014-01-07 18:01:08 +0000 | [diff] [blame] | 59 | #define MP_DEFINE_CONST_FUN_OBJ_0(obj_name, fun_name) MP_DEFINE_CONST_FUN_OBJ_VOID_PTR(obj_name, false, 0, 0, (mp_fun_0_t)fun_name) |
| 60 | #define MP_DEFINE_CONST_FUN_OBJ_1(obj_name, fun_name) MP_DEFINE_CONST_FUN_OBJ_VOID_PTR(obj_name, false, 1, 1, (mp_fun_1_t)fun_name) |
| 61 | #define MP_DEFINE_CONST_FUN_OBJ_2(obj_name, fun_name) MP_DEFINE_CONST_FUN_OBJ_VOID_PTR(obj_name, false, 2, 2, (mp_fun_2_t)fun_name) |
| 62 | #define MP_DEFINE_CONST_FUN_OBJ_3(obj_name, fun_name) MP_DEFINE_CONST_FUN_OBJ_VOID_PTR(obj_name, false, 3, 3, (mp_fun_3_t)fun_name) |
Damien George | d5e8182 | 2014-02-26 17:47:05 +0000 | [diff] [blame] | 63 | #define MP_DEFINE_CONST_FUN_OBJ_VAR(obj_name, n_args_min, fun_name) MP_DEFINE_CONST_FUN_OBJ_VOID_PTR(obj_name, false, n_args_min, MP_OBJ_FUN_ARGS_MAX, (mp_fun_var_t)fun_name) |
John R. Lenton | 270112f | 2014-01-07 18:01:08 +0000 | [diff] [blame] | 64 | #define MP_DEFINE_CONST_FUN_OBJ_VAR_BETWEEN(obj_name, n_args_min, n_args_max, fun_name) MP_DEFINE_CONST_FUN_OBJ_VOID_PTR(obj_name, false, n_args_min, n_args_max, (mp_fun_var_t)fun_name) |
Damien George | d5e8182 | 2014-02-26 17:47:05 +0000 | [diff] [blame] | 65 | #define MP_DEFINE_CONST_FUN_OBJ_KW(obj_name, n_args_min, fun_name) MP_DEFINE_CONST_FUN_OBJ_VOID_PTR(obj_name, true, n_args_min, MP_OBJ_FUN_ARGS_MAX, (mp_fun_kw_t)fun_name) |
John R. Lenton | c06763a | 2014-01-07 17:29:16 +0000 | [diff] [blame] | 66 | |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 67 | // This macro is used to define constant dict objects |
| 68 | // You can put "static" in front of the definition to make it local |
| 69 | |
| 70 | #define MP_DEFINE_CONST_DICT(dict_name, table_name) \ |
| 71 | const mp_obj_dict_t dict_name = { \ |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 72 | .base = {&mp_type_dict}, \ |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 73 | .map = { \ |
| 74 | .all_keys_are_qstrs = 1, \ |
| 75 | .table_is_fixed_array = 1, \ |
| 76 | .used = sizeof(table_name) / sizeof(mp_map_elem_t), \ |
| 77 | .alloc = sizeof(table_name) / sizeof(mp_map_elem_t), \ |
| 78 | .table = (mp_map_elem_t*)table_name, \ |
| 79 | }, \ |
| 80 | } |
| 81 | |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 82 | // These macros are used to declare and define constant staticmethond and classmethod objects |
| 83 | // You can put "static" in front of the definitions to make them local |
| 84 | |
Damien George | 64131f3 | 2014-02-06 20:31:44 +0000 | [diff] [blame] | 85 | #define MP_DECLARE_CONST_STATICMETHOD_OBJ(obj_name) extern const mp_obj_static_class_method_t obj_name |
| 86 | #define MP_DECLARE_CONST_CLASSMETHOD_OBJ(obj_name) extern const mp_obj_static_class_method_t obj_name |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 87 | |
Damien George | 64131f3 | 2014-02-06 20:31:44 +0000 | [diff] [blame] | 88 | #define MP_DEFINE_CONST_STATICMETHOD_OBJ(obj_name, fun_name) const mp_obj_static_class_method_t obj_name = {{&mp_type_staticmethod}, fun_name} |
| 89 | #define MP_DEFINE_CONST_CLASSMETHOD_OBJ(obj_name, fun_name) const mp_obj_static_class_method_t obj_name = {{&mp_type_classmethod}, fun_name} |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 90 | |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 91 | // Underlying map/hash table implementation (not dict object or map function) |
| 92 | |
| 93 | typedef struct _mp_map_elem_t { |
| 94 | mp_obj_t key; |
| 95 | mp_obj_t value; |
| 96 | } mp_map_elem_t; |
| 97 | |
| 98 | // TODO maybe have a truncated mp_map_t for fixed tables, since alloc=used |
| 99 | // put alloc last in the structure, so the truncated version does not need it |
| 100 | // this would save 1 ROM word for all ROM objects that have a locals_dict |
| 101 | // would also need a trucated dict structure |
| 102 | |
| 103 | typedef struct _mp_map_t { |
| 104 | machine_uint_t all_keys_are_qstrs : 1; |
| 105 | machine_uint_t table_is_fixed_array : 1; |
| 106 | machine_uint_t used : (8 * sizeof(machine_uint_t) - 2); |
| 107 | machine_uint_t alloc; |
| 108 | mp_map_elem_t *table; |
| 109 | } mp_map_t; |
| 110 | |
Damien George | 95004e5 | 2014-04-05 17:17:19 +0100 | [diff] [blame] | 111 | // These can be or'd together |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 112 | typedef enum _mp_map_lookup_kind_t { |
| 113 | MP_MAP_LOOKUP, // 0 |
| 114 | MP_MAP_LOOKUP_ADD_IF_NOT_FOUND, // 1 |
| 115 | MP_MAP_LOOKUP_REMOVE_IF_FOUND, // 2 |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 116 | } mp_map_lookup_kind_t; |
| 117 | |
Damien George | 8b0535e | 2014-04-05 21:53:54 +0100 | [diff] [blame] | 118 | #define MP_MAP_SLOT_IS_FILLED(map, pos) ((map)->table[pos].key != MP_OBJ_NULL && (map)->table[pos].key != MP_OBJ_SENTINEL) |
| 119 | |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 120 | void mp_map_init(mp_map_t *map, int n); |
| 121 | void mp_map_init_fixed_table(mp_map_t *map, int n, const mp_obj_t *table); |
| 122 | mp_map_t *mp_map_new(int n); |
| 123 | void mp_map_deinit(mp_map_t *map); |
| 124 | void mp_map_free(mp_map_t *map); |
| 125 | mp_map_elem_t* mp_map_lookup(mp_map_t *map, mp_obj_t index, mp_map_lookup_kind_t lookup_kind); |
| 126 | void mp_map_clear(mp_map_t *map); |
Paul Sokolovsky | e3f58c8 | 2014-04-05 04:14:22 +0300 | [diff] [blame] | 127 | void mp_map_dump(mp_map_t *map); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 128 | |
| 129 | // Underlying set implementation (not set object) |
| 130 | |
| 131 | typedef struct _mp_set_t { |
| 132 | machine_uint_t alloc; |
| 133 | machine_uint_t used; |
| 134 | mp_obj_t *table; |
| 135 | } mp_set_t; |
| 136 | |
Damien George | 8b0535e | 2014-04-05 21:53:54 +0100 | [diff] [blame] | 137 | #define MP_SET_SLOT_IS_FILLED(set, pos) ((set)->table[pos] != MP_OBJ_NULL && (set)->table[pos] != MP_OBJ_SENTINEL) |
| 138 | |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 139 | void mp_set_init(mp_set_t *set, int n); |
| 140 | mp_obj_t mp_set_lookup(mp_set_t *set, mp_obj_t index, mp_map_lookup_kind_t lookup_kind); |
Damien George | 95004e5 | 2014-04-05 17:17:19 +0100 | [diff] [blame] | 141 | mp_obj_t mp_set_remove_first(mp_set_t *set); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 142 | void mp_set_clear(mp_set_t *set); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 143 | |
| 144 | // Type definitions for methods |
| 145 | |
| 146 | typedef mp_obj_t (*mp_fun_0_t)(void); |
| 147 | typedef mp_obj_t (*mp_fun_1_t)(mp_obj_t); |
| 148 | typedef mp_obj_t (*mp_fun_2_t)(mp_obj_t, mp_obj_t); |
John R. Lenton | 45a8744 | 2014-01-04 01:15:01 +0000 | [diff] [blame] | 149 | typedef mp_obj_t (*mp_fun_3_t)(mp_obj_t, mp_obj_t, mp_obj_t); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 150 | typedef mp_obj_t (*mp_fun_t)(void); |
Damien George | a11ceca | 2014-01-19 16:02:09 +0000 | [diff] [blame] | 151 | typedef mp_obj_t (*mp_fun_var_t)(uint n, const mp_obj_t *); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 152 | typedef mp_obj_t (*mp_fun_kw_t)(uint n, const mp_obj_t *, mp_map_t *); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 153 | |
Paul Sokolovsky | 76d982e | 2014-01-13 19:19:16 +0200 | [diff] [blame] | 154 | typedef enum { |
Paul Sokolovsky | a96d3d0 | 2014-03-31 01:10:10 +0300 | [diff] [blame] | 155 | PRINT_STR, |
| 156 | PRINT_REPR, |
| 157 | PRINT_EXC, // Special format for printing exception in unhandled exception message |
Paul Sokolovsky | 76d982e | 2014-01-13 19:19:16 +0200 | [diff] [blame] | 158 | } mp_print_kind_t; |
| 159 | |
| 160 | typedef void (*mp_print_fun_t)(void (*print)(void *env, const char *fmt, ...), void *env, mp_obj_t o, mp_print_kind_t kind); |
Damien George | 20006db | 2014-01-18 14:10:48 +0000 | [diff] [blame] | 161 | typedef mp_obj_t (*mp_make_new_fun_t)(mp_obj_t type_in, uint n_args, uint n_kw, const mp_obj_t *args); |
| 162 | typedef mp_obj_t (*mp_call_fun_t)(mp_obj_t fun, uint n_args, uint n_kw, const mp_obj_t *args); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 163 | typedef mp_obj_t (*mp_unary_op_fun_t)(int op, mp_obj_t); |
| 164 | typedef mp_obj_t (*mp_binary_op_fun_t)(int op, mp_obj_t, mp_obj_t); |
Damien George | 20006db | 2014-01-18 14:10:48 +0000 | [diff] [blame] | 165 | typedef void (*mp_load_attr_fun_t)(mp_obj_t self_in, qstr attr, mp_obj_t *dest); // for fail, do nothing; for attr, dest[0] = value; for method, dest[0] = method, dest[1] = self |
Damien George | f4c9b33 | 2014-04-08 21:32:29 +0100 | [diff] [blame] | 166 | typedef bool (*mp_store_attr_fun_t)(mp_obj_t self_in, qstr attr, mp_obj_t value); // return true if store succeeded; if value==MP_OBJ_NULL then delete |
| 167 | typedef bool (*mp_store_item_fun_t)(mp_obj_t self_in, mp_obj_t index, mp_obj_t value); // return true if store succeeded; if value==MP_OBJ_NULL then delete |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 168 | |
| 169 | typedef struct _mp_method_t { |
Damien George | c12b221 | 2014-03-26 20:15:40 +0000 | [diff] [blame] | 170 | qstr name; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 171 | mp_const_obj_t fun; |
| 172 | } mp_method_t; |
| 173 | |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 174 | // Buffer protocol |
| 175 | typedef struct _buffer_info_t { |
| 176 | // if we'd bother to support various versions of structure |
| 177 | // (with different number of fields), we can distinguish |
| 178 | // them with ver = sizeof(struct). Cons: overkill for *micro*? |
| 179 | //int ver; // ? |
| 180 | |
| 181 | void *buf; |
| 182 | machine_int_t len; |
| 183 | |
| 184 | // Rationale: have array.array and have SIMD operations on them |
| 185 | // Cons: users can pass item size to processing functions themselves, |
| 186 | // though that's not "plug&play" |
| 187 | // int itemsize; |
| 188 | |
| 189 | // Rationale: to load arbitrary-sized sprites directly to LCD |
| 190 | // Cons: a bit adhoc usecase |
| 191 | // int stride; |
| 192 | } buffer_info_t; |
| 193 | #define BUFFER_READ (1) |
| 194 | #define BUFFER_WRITE (2) |
| 195 | #define BUFFER_RW (BUFFER_READ | BUFFER_WRITE) |
| 196 | typedef struct _mp_buffer_p_t { |
| 197 | machine_int_t (*get_buffer)(mp_obj_t obj, buffer_info_t *bufinfo, int flags); |
| 198 | } mp_buffer_p_t; |
Paul Sokolovsky | 3aa8ee7 | 2014-04-09 00:25:28 +0300 | [diff] [blame] | 199 | bool mp_get_buffer(mp_obj_t obj, buffer_info_t *bufinfo); |
| 200 | void mp_get_buffer_raise(mp_obj_t obj, buffer_info_t *bufinfo); |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 201 | |
| 202 | // Stream protocol |
| 203 | typedef struct _mp_stream_p_t { |
| 204 | // On error, functions should return -1 and fill in *errcode (values are |
| 205 | // implementation-dependent, but will be exposed to user, e.g. via exception). |
| 206 | machine_int_t (*read)(mp_obj_t obj, void *buf, machine_uint_t size, int *errcode); |
| 207 | machine_int_t (*write)(mp_obj_t obj, const void *buf, machine_uint_t size, int *errcode); |
| 208 | // add seek() ? |
| 209 | } mp_stream_p_t; |
| 210 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 211 | struct _mp_obj_type_t { |
| 212 | mp_obj_base_t base; |
Damien George | a71c83a | 2014-02-15 11:34:50 +0000 | [diff] [blame] | 213 | qstr name; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 214 | mp_print_fun_t print; |
Damien George | 71c5181 | 2014-01-04 20:21:15 +0000 | [diff] [blame] | 215 | mp_make_new_fun_t make_new; // to make an instance of the type |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 216 | |
Damien George | 20006db | 2014-01-18 14:10:48 +0000 | [diff] [blame] | 217 | mp_call_fun_t call; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 218 | mp_unary_op_fun_t unary_op; // can return NULL if op not supported |
| 219 | mp_binary_op_fun_t binary_op; // can return NULL if op not supported |
| 220 | |
Damien George | a71c83a | 2014-02-15 11:34:50 +0000 | [diff] [blame] | 221 | mp_load_attr_fun_t load_attr; |
Damien George | 1d24ea5 | 2014-04-08 21:11:49 +0100 | [diff] [blame] | 222 | mp_store_attr_fun_t store_attr; // if value is MP_OBJ_NULL, then delete that attribute |
Damien George | f4c9b33 | 2014-04-08 21:32:29 +0100 | [diff] [blame] | 223 | |
| 224 | // Implements container[index] = val. If val == MP_OBJ_NULL, then it's a delete. |
| 225 | // Note that load_item is implemented by binary_op(RT_BINARY_OP_SUBSCR) |
Damien George | a71c83a | 2014-02-15 11:34:50 +0000 | [diff] [blame] | 226 | mp_store_item_fun_t store_item; |
| 227 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 228 | mp_fun_1_t getiter; |
Damien George | 66eaf84 | 2014-03-26 19:27:58 +0000 | [diff] [blame] | 229 | mp_fun_1_t iternext; // may return MP_OBJ_NULL as an optimisation instead of raising StopIteration() (with no args) |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 230 | |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 231 | // Alternatively, pointer(s) to interfaces to save space |
| 232 | // in mp_obj_type_t at the expense of extra pointer and extra dereference |
| 233 | // when actually used. |
| 234 | mp_buffer_p_t buffer_p; |
Damien George | 27e735f | 2014-04-05 23:02:23 +0100 | [diff] [blame] | 235 | const mp_stream_p_t *stream_p; |
Paul Sokolovsky | 5b15daf | 2014-01-07 20:12:26 +0200 | [diff] [blame] | 236 | |
Damien George | 004cdce | 2014-01-09 21:43:51 +0000 | [diff] [blame] | 237 | // these are for dynamically created types (classes) |
| 238 | mp_obj_t bases_tuple; |
| 239 | mp_obj_t locals_dict; |
Damien George | 062478e | 2014-01-09 20:57:50 +0000 | [diff] [blame] | 240 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 241 | /* |
| 242 | What we might need to add here: |
| 243 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 244 | store_subscr list dict |
| 245 | |
| 246 | len str tuple list map |
| 247 | abs float complex |
| 248 | hash bool int none str |
| 249 | equal int str |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 250 | |
| 251 | unpack seq list tuple |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 252 | */ |
| 253 | }; |
| 254 | |
ian-v | 7a16fad | 2014-01-06 09:52:29 -0800 | [diff] [blame] | 255 | typedef struct _mp_obj_type_t mp_obj_type_t; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 256 | |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 257 | // Constant types, globally accessible |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 258 | extern const mp_obj_type_t mp_type_type; |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 259 | extern const mp_obj_type_t mp_type_object; |
| 260 | extern const mp_obj_type_t mp_type_NoneType; |
| 261 | extern const mp_obj_type_t mp_type_bool; |
| 262 | extern const mp_obj_type_t mp_type_int; |
| 263 | extern const mp_obj_type_t mp_type_str; |
| 264 | extern const mp_obj_type_t mp_type_bytes; |
Paul Sokolovsky | 4dcb605 | 2014-04-08 22:09:14 +0300 | [diff] [blame] | 265 | extern const mp_obj_type_t mp_type_bytearray; |
Damien George | 3e1a5c1 | 2014-03-29 13:43:38 +0000 | [diff] [blame] | 266 | extern const mp_obj_type_t mp_type_float; |
| 267 | extern const mp_obj_type_t mp_type_complex; |
| 268 | extern const mp_obj_type_t mp_type_tuple; |
| 269 | extern const mp_obj_type_t mp_type_list; |
| 270 | extern const mp_obj_type_t mp_type_map; // map (the python builtin, not the dict implementation detail) |
| 271 | extern const mp_obj_type_t mp_type_enumerate; |
| 272 | extern const mp_obj_type_t mp_type_filter; |
| 273 | extern const mp_obj_type_t mp_type_dict; |
| 274 | extern const mp_obj_type_t mp_type_set; |
| 275 | extern const mp_obj_type_t mp_type_slice; |
| 276 | extern const mp_obj_type_t mp_type_zip; |
| 277 | extern const mp_obj_type_t mp_type_array; |
| 278 | extern const mp_obj_type_t mp_type_super; |
| 279 | extern const mp_obj_type_t mp_type_gen_instance; |
| 280 | extern const mp_obj_type_t mp_type_fun_native; |
| 281 | extern const mp_obj_type_t mp_type_fun_bc; |
| 282 | extern const mp_obj_type_t mp_type_module; |
| 283 | extern const mp_obj_type_t mp_type_staticmethod; |
| 284 | extern const mp_obj_type_t mp_type_classmethod; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 285 | |
| 286 | // Exceptions |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 287 | extern const mp_obj_type_t mp_type_BaseException; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 288 | extern const mp_obj_type_t mp_type_ArithmeticError; |
| 289 | extern const mp_obj_type_t mp_type_AssertionError; |
| 290 | extern const mp_obj_type_t mp_type_AttributeError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 291 | extern const mp_obj_type_t mp_type_EOFError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 292 | extern const mp_obj_type_t mp_type_Exception; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 293 | extern const mp_obj_type_t mp_type_GeneratorExit; |
| 294 | extern const mp_obj_type_t mp_type_IOError; |
| 295 | extern const mp_obj_type_t mp_type_ImportError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 296 | extern const mp_obj_type_t mp_type_IndentationError; |
| 297 | extern const mp_obj_type_t mp_type_IndexError; |
| 298 | extern const mp_obj_type_t mp_type_KeyError; |
| 299 | extern const mp_obj_type_t mp_type_LookupError; |
| 300 | extern const mp_obj_type_t mp_type_MemoryError; |
| 301 | extern const mp_obj_type_t mp_type_NameError; |
| 302 | extern const mp_obj_type_t mp_type_NotImplementedError; |
| 303 | extern const mp_obj_type_t mp_type_OSError; |
| 304 | extern const mp_obj_type_t mp_type_OverflowError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 305 | extern const mp_obj_type_t mp_type_RuntimeError; |
Damien George | ffb5cfc | 2014-03-25 14:29:40 +0000 | [diff] [blame] | 306 | extern const mp_obj_type_t mp_type_StopIteration; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 307 | extern const mp_obj_type_t mp_type_SyntaxError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 308 | extern const mp_obj_type_t mp_type_SystemError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 309 | extern const mp_obj_type_t mp_type_TypeError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 310 | extern const mp_obj_type_t mp_type_ValueError; |
Rachel Dowdall | 721c55d | 2014-03-22 15:28:16 +0000 | [diff] [blame] | 311 | extern const mp_obj_type_t mp_type_ZeroDivisionError; |
| 312 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 313 | // Constant objects, globally accessible |
Damien George | 07ddab5 | 2014-03-29 13:15:08 +0000 | [diff] [blame] | 314 | // The macros are for convenience only |
| 315 | #define mp_const_none ((mp_obj_t)&mp_const_none_obj) |
| 316 | #define mp_const_false ((mp_obj_t)&mp_const_false_obj) |
| 317 | #define mp_const_true ((mp_obj_t)&mp_const_true_obj) |
| 318 | #define mp_const_empty_tuple ((mp_obj_t)&mp_const_empty_tuple_obj) |
| 319 | extern const struct _mp_obj_none_t mp_const_none_obj; |
| 320 | extern const struct _mp_obj_bool_t mp_const_false_obj; |
| 321 | extern const struct _mp_obj_bool_t mp_const_true_obj; |
| 322 | extern const struct _mp_obj_tuple_t mp_const_empty_tuple_obj; |
| 323 | extern const struct _mp_obj_ellipsis_t mp_const_ellipsis_obj; |
Damien George | 6902eed | 2014-04-04 10:52:59 +0000 | [diff] [blame] | 324 | extern const struct _mp_obj_exception_t mp_const_MemoryError_obj; |
Damien George | 07ddab5 | 2014-03-29 13:15:08 +0000 | [diff] [blame] | 325 | extern const struct _mp_obj_exception_t mp_const_GeneratorExit_obj; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 326 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 327 | // General API for objects |
| 328 | |
Damien George | a71c83a | 2014-02-15 11:34:50 +0000 | [diff] [blame] | 329 | mp_obj_t mp_obj_new_type(qstr name, mp_obj_t bases_tuple, mp_obj_t locals_dict); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 330 | mp_obj_t mp_obj_new_none(void); |
| 331 | mp_obj_t mp_obj_new_bool(bool value); |
Damien George | 6baf76e | 2013-12-30 22:32:17 +0000 | [diff] [blame] | 332 | mp_obj_t mp_obj_new_cell(mp_obj_t obj); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 333 | mp_obj_t mp_obj_new_int(machine_int_t value); |
Paul Sokolovsky | 48b3572 | 2014-01-12 17:30:48 +0200 | [diff] [blame] | 334 | mp_obj_t mp_obj_new_int_from_uint(machine_uint_t value); |
| 335 | mp_obj_t mp_obj_new_int_from_long_str(const char *s); |
Damien George | 9d68e9c | 2014-03-12 15:38:15 +0000 | [diff] [blame] | 336 | mp_obj_t mp_obj_new_int_from_ll(long long val); // this must return a multi-precision integer object (or raise an overflow exception) |
Damien George | 5fa93b6 | 2014-01-22 14:35:10 +0000 | [diff] [blame] | 337 | mp_obj_t mp_obj_new_str(const byte* data, uint len, bool make_qstr_if_not_already); |
Paul Sokolovsky | 91fb1c9 | 2014-01-24 22:50:40 +0200 | [diff] [blame] | 338 | mp_obj_t mp_obj_new_bytes(const byte* data, uint len); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 339 | #if MICROPY_ENABLE_FLOAT |
| 340 | mp_obj_t mp_obj_new_float(mp_float_t val); |
| 341 | mp_obj_t mp_obj_new_complex(mp_float_t real, mp_float_t imag); |
| 342 | #endif |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 343 | mp_obj_t mp_obj_new_exception(const mp_obj_type_t *exc_type); |
Paul Sokolovsky | 962b1cd | 2014-03-23 21:48:29 +0200 | [diff] [blame] | 344 | mp_obj_t mp_obj_new_exception_args(const mp_obj_type_t *exc_type, uint n_args, const mp_obj_t *args); |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 345 | mp_obj_t mp_obj_new_exception_msg(const mp_obj_type_t *exc_type, const char *msg); |
| 346 | mp_obj_t mp_obj_new_exception_msg_varg(const mp_obj_type_t *exc_type, const char *fmt, ...); // counts args by number of % symbols in fmt, excluding %%; can only handle void* sizes (ie no float/double!) |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 347 | mp_obj_t mp_obj_new_range(int start, int stop, int step); |
| 348 | mp_obj_t mp_obj_new_range_iterator(int cur, int stop, int step); |
Damien George | bee17b0 | 2014-03-27 11:07:04 +0000 | [diff] [blame] | 349 | mp_obj_t mp_obj_new_fun_bc(uint scope_flags, qstr *args, uint n_args, mp_obj_t def_args, const byte *code); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 350 | mp_obj_t mp_obj_new_fun_asm(uint n_args, void *fun); |
Damien George | d0691cc | 2014-01-29 20:30:52 +0000 | [diff] [blame] | 351 | mp_obj_t mp_obj_new_gen_wrap(mp_obj_t fun); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 352 | mp_obj_t mp_obj_new_closure(mp_obj_t fun, mp_obj_t closure_tuple); |
John R. Lenton | c06763a | 2014-01-07 17:29:16 +0000 | [diff] [blame] | 353 | mp_obj_t mp_obj_new_tuple(uint n, const mp_obj_t *items); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 354 | mp_obj_t mp_obj_new_list(uint n, mp_obj_t *items); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 355 | mp_obj_t mp_obj_new_dict(int n_args); |
| 356 | mp_obj_t mp_obj_new_set(int n_args, mp_obj_t *items); |
Paul Sokolovsky | 1c6de11 | 2014-01-03 02:41:17 +0200 | [diff] [blame] | 357 | mp_obj_t mp_obj_new_slice(mp_obj_t start, mp_obj_t stop, mp_obj_t step); |
Damien George | 35e2a4e | 2014-02-05 00:51:47 +0000 | [diff] [blame] | 358 | mp_obj_t mp_obj_new_super(mp_obj_t type, mp_obj_t obj); |
Damien George | 20006db | 2014-01-18 14:10:48 +0000 | [diff] [blame] | 359 | mp_obj_t mp_obj_new_bound_meth(mp_obj_t meth, mp_obj_t self); |
Damien George | 7c9c667 | 2014-01-25 00:17:36 +0000 | [diff] [blame] | 360 | mp_obj_t mp_obj_new_getitem_iter(mp_obj_t *args); |
Damien George | 2870862 | 2014-01-02 21:30:26 +0000 | [diff] [blame] | 361 | mp_obj_t mp_obj_new_module(qstr module_name); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 362 | |
Damien George | 5fa93b6 | 2014-01-22 14:35:10 +0000 | [diff] [blame] | 363 | mp_obj_type_t *mp_obj_get_type(mp_obj_t o_in); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 364 | const char *mp_obj_get_type_str(mp_obj_t o_in); |
Damien George | 9e6e935 | 2014-03-26 18:37:06 +0000 | [diff] [blame] | 365 | bool mp_obj_is_subclass_fast(mp_const_obj_t object, mp_const_obj_t classinfo); // arguments should be type objects |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 366 | |
Paul Sokolovsky | 76d982e | 2014-01-13 19:19:16 +0200 | [diff] [blame] | 367 | void mp_obj_print_helper(void (*print)(void *env, const char *fmt, ...), void *env, mp_obj_t o_in, mp_print_kind_t kind); |
| 368 | void mp_obj_print(mp_obj_t o, mp_print_kind_t kind); |
Damien George | 136b149 | 2014-01-19 12:38:49 +0000 | [diff] [blame] | 369 | void mp_obj_print_exception(mp_obj_t exc); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 370 | |
Damien George | d17926d | 2014-03-30 13:35:08 +0100 | [diff] [blame] | 371 | int mp_obj_is_true(mp_obj_t arg); |
Damien George | b5fbd0b | 2014-04-09 19:55:33 +0100 | [diff] [blame] | 372 | bool mp_obj_is_integer(mp_obj_t o_in); // returns true if o_in is bool, small int, or long int |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 373 | bool mp_obj_is_callable(mp_obj_t o_in); |
| 374 | machine_int_t mp_obj_hash(mp_obj_t o_in); |
| 375 | bool mp_obj_equal(mp_obj_t o1, mp_obj_t o2); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 376 | |
| 377 | machine_int_t mp_obj_get_int(mp_obj_t arg); |
Damien George | 8270e38 | 2014-04-03 11:00:54 +0000 | [diff] [blame] | 378 | bool mp_obj_get_int_maybe(mp_obj_t arg, machine_int_t *value); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 379 | #if MICROPY_ENABLE_FLOAT |
| 380 | mp_float_t mp_obj_get_float(mp_obj_t self_in); |
| 381 | void mp_obj_get_complex(mp_obj_t self_in, mp_float_t *real, mp_float_t *imag); |
| 382 | #endif |
Damien George | 5fa93b6 | 2014-01-22 14:35:10 +0000 | [diff] [blame] | 383 | //qstr mp_obj_get_qstr(mp_obj_t arg); |
Damien George | 24ff063 | 2014-03-24 10:47:13 +0000 | [diff] [blame] | 384 | void mp_obj_get_array(mp_obj_t o, uint *len, mp_obj_t **items); |
| 385 | void mp_obj_get_array_fixed_n(mp_obj_t o, uint len, mp_obj_t **items); |
xbe | 9e1e8cd | 2014-03-12 22:57:16 -0700 | [diff] [blame] | 386 | uint mp_get_index(const mp_obj_type_t *type, machine_uint_t len, mp_obj_t index, bool is_slice); |
John R. Lenton | 4bee76e | 2014-01-10 11:25:03 +0000 | [diff] [blame] | 387 | mp_obj_t mp_obj_len_maybe(mp_obj_t o_in); /* may return NULL */ |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 388 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 389 | // bool |
John R. Lenton | b8698fc | 2014-01-11 00:58:59 +0000 | [diff] [blame] | 390 | #define MP_BOOL(x) (x ? mp_const_true : mp_const_false) |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 391 | |
| 392 | // cell |
| 393 | mp_obj_t mp_obj_cell_get(mp_obj_t self_in); |
| 394 | void mp_obj_cell_set(mp_obj_t self_in, mp_obj_t obj); |
| 395 | |
Damien George | 71c5181 | 2014-01-04 20:21:15 +0000 | [diff] [blame] | 396 | // int |
Paul Sokolovsky | d26b379 | 2014-01-18 16:07:16 +0200 | [diff] [blame] | 397 | // For long int, returns value truncated to machine_int_t |
| 398 | machine_int_t mp_obj_int_get(mp_obj_t self_in); |
Damien George | eabdf67 | 2014-03-22 20:54:01 +0000 | [diff] [blame] | 399 | #if MICROPY_ENABLE_FLOAT |
| 400 | mp_float_t mp_obj_int_as_float(mp_obj_t self_in); |
| 401 | #endif |
Paul Sokolovsky | d26b379 | 2014-01-18 16:07:16 +0200 | [diff] [blame] | 402 | // Will rains exception if value doesn't fit into machine_int_t |
| 403 | machine_int_t mp_obj_int_get_checked(mp_obj_t self_in); |
Damien George | 71c5181 | 2014-01-04 20:21:15 +0000 | [diff] [blame] | 404 | |
Damien | b86e3f9 | 2013-12-29 17:17:43 +0000 | [diff] [blame] | 405 | // exception |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 406 | bool mp_obj_is_exception_type(mp_obj_t self_in); |
| 407 | bool mp_obj_is_exception_instance(mp_obj_t self_in); |
Paul Sokolovsky | 962b1cd | 2014-03-23 21:48:29 +0200 | [diff] [blame] | 408 | bool mp_obj_exception_match(mp_obj_t exc, const mp_obj_type_t *exc_type); |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 409 | void mp_obj_exception_clear_traceback(mp_obj_t self_in); |
Damien George | 136b149 | 2014-01-19 12:38:49 +0000 | [diff] [blame] | 410 | void mp_obj_exception_add_traceback(mp_obj_t self_in, qstr file, machine_uint_t line, qstr block); |
| 411 | void mp_obj_exception_get_traceback(mp_obj_t self_in, machine_uint_t *n, machine_uint_t **values); |
Paul Sokolovsky | af1ae30 | 2014-03-26 19:17:20 +0200 | [diff] [blame] | 412 | mp_obj_t mp_obj_exception_get_value(mp_obj_t self_in); |
Damien | b86e3f9 | 2013-12-29 17:17:43 +0000 | [diff] [blame] | 413 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 414 | // str |
Paul Sokolovsky | 91fb1c9 | 2014-01-24 22:50:40 +0200 | [diff] [blame] | 415 | mp_obj_t mp_obj_str_builder_start(const mp_obj_type_t *type, uint len, byte **data); |
Damien George | 5fa93b6 | 2014-01-22 14:35:10 +0000 | [diff] [blame] | 416 | mp_obj_t mp_obj_str_builder_end(mp_obj_t o_in); |
| 417 | bool mp_obj_str_equal(mp_obj_t s1, mp_obj_t s2); |
| 418 | uint mp_obj_str_get_hash(mp_obj_t self_in); |
| 419 | uint mp_obj_str_get_len(mp_obj_t self_in); |
Damien George | b829b5c | 2014-01-25 13:51:19 +0000 | [diff] [blame] | 420 | qstr mp_obj_str_get_qstr(mp_obj_t self_in); // use this if you will anyway convert the string to a qstr |
Damien George | 5fa93b6 | 2014-01-22 14:35:10 +0000 | [diff] [blame] | 421 | const char *mp_obj_str_get_str(mp_obj_t self_in); // use this only if you need the string to be null terminated |
Damien George | 698ec21 | 2014-02-08 18:17:23 +0000 | [diff] [blame] | 422 | const char *mp_obj_str_get_data(mp_obj_t self_in, uint *len); |
Paul Sokolovsky | 0b7e29c | 2014-01-28 03:40:06 +0200 | [diff] [blame] | 423 | void mp_str_print_quoted(void (*print)(void *env, const char *fmt, ...), void *env, const byte *str_data, uint str_len); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 424 | |
| 425 | #if MICROPY_ENABLE_FLOAT |
| 426 | // float |
Damien George | 0c36da0 | 2014-03-08 15:24:39 +0000 | [diff] [blame] | 427 | typedef struct _mp_obj_float_t { |
| 428 | mp_obj_base_t base; |
| 429 | mp_float_t value; |
| 430 | } mp_obj_float_t; |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 431 | mp_float_t mp_obj_float_get(mp_obj_t self_in); |
Damien George | ae49105 | 2014-04-10 20:08:11 +0100 | [diff] [blame^] | 432 | mp_obj_t mp_obj_float_binary_op(int op, mp_float_t lhs_val, mp_obj_t rhs); // can return MP_OBJ_NULL |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 433 | |
| 434 | // complex |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 435 | void mp_obj_complex_get(mp_obj_t self_in, mp_float_t *real, mp_float_t *imag); |
Damien George | ae49105 | 2014-04-10 20:08:11 +0100 | [diff] [blame^] | 436 | mp_obj_t mp_obj_complex_binary_op(int op, mp_float_t lhs_real, mp_float_t lhs_imag, mp_obj_t rhs_in); // can return MP_OBJ_NULL |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 437 | #endif |
| 438 | |
| 439 | // tuple |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 440 | void mp_obj_tuple_get(mp_obj_t self_in, uint *len, mp_obj_t **items); |
John R. Lenton | 07205ec | 2014-01-13 02:31:00 +0000 | [diff] [blame] | 441 | void mp_obj_tuple_del(mp_obj_t self_in); |
Damien George | 7f8be59 | 2014-03-20 19:20:59 +0000 | [diff] [blame] | 442 | machine_int_t mp_obj_tuple_hash(mp_obj_t self_in); |
Paul Sokolovsky | 55ca075 | 2014-03-30 17:35:53 +0300 | [diff] [blame] | 443 | mp_obj_t mp_obj_tuple_make_new(mp_obj_t type_in, uint n_args, uint n_kw, const mp_obj_t *args); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 444 | |
| 445 | // list |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 446 | mp_obj_t mp_obj_list_append(mp_obj_t self_in, mp_obj_t arg); |
| 447 | void mp_obj_list_get(mp_obj_t self_in, uint *len, mp_obj_t **items); |
Damien George | 495d781 | 2014-04-08 17:51:47 +0100 | [diff] [blame] | 448 | void mp_obj_list_set_len(mp_obj_t self_in, uint len); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 449 | void mp_obj_list_store(mp_obj_t self_in, mp_obj_t index, mp_obj_t value); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 450 | mp_obj_t mp_obj_list_sort(uint n_args, const mp_obj_t *args, mp_map_t *kwargs); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 451 | |
| 452 | // dict |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 453 | typedef struct _mp_obj_dict_t { |
| 454 | mp_obj_base_t base; |
| 455 | mp_map_t map; |
| 456 | } mp_obj_dict_t; |
Damien George | 8b0535e | 2014-04-05 21:53:54 +0100 | [diff] [blame] | 457 | void mp_obj_dict_init(mp_obj_dict_t *dict, int n_args); |
Damien | dae7eb7 | 2013-12-29 22:32:51 +0000 | [diff] [blame] | 458 | uint mp_obj_dict_len(mp_obj_t self_in); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 459 | mp_obj_t mp_obj_dict_store(mp_obj_t self_in, mp_obj_t key, mp_obj_t value); |
Damien George | 66edc5d | 2014-04-05 13:25:13 +0100 | [diff] [blame] | 460 | mp_obj_t mp_obj_dict_delete(mp_obj_t self_in, mp_obj_t key); |
Damien George | df6567e | 2014-03-30 13:54:02 +0100 | [diff] [blame] | 461 | mp_map_t *mp_obj_dict_get_map(mp_obj_t self_in); |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 462 | |
| 463 | // set |
| 464 | void mp_obj_set_store(mp_obj_t self_in, mp_obj_t item); |
| 465 | |
Paul Sokolovsky | 1c6de11 | 2014-01-03 02:41:17 +0200 | [diff] [blame] | 466 | // slice |
Paul Sokolovsky | 1c6de11 | 2014-01-03 02:41:17 +0200 | [diff] [blame] | 467 | void mp_obj_slice_get(mp_obj_t self_in, machine_int_t *start, machine_int_t *stop, machine_int_t *step); |
| 468 | |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 469 | // array |
Paul Sokolovsky | 3399668 | 2014-01-21 23:30:10 +0200 | [diff] [blame] | 470 | uint mp_obj_array_len(mp_obj_t self_in); |
Paul Sokolovsky | 7f11c79 | 2014-01-29 00:21:41 +0200 | [diff] [blame] | 471 | mp_obj_t mp_obj_new_bytearray_by_ref(uint n, void *items); |
John R. Lenton | 07205ec | 2014-01-13 02:31:00 +0000 | [diff] [blame] | 472 | |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 473 | // functions |
Damien George | d5e8182 | 2014-02-26 17:47:05 +0000 | [diff] [blame] | 474 | #define MP_OBJ_FUN_ARGS_MAX (0xffff) // to set maximum value in n_args_max below |
Damien George | 66028ab | 2014-01-03 14:03:48 +0000 | [diff] [blame] | 475 | typedef struct _mp_obj_fun_native_t { // need this so we can define const objects (to go in ROM) |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 476 | mp_obj_base_t base; |
Damien George | 5104775 | 2014-02-26 17:40:52 +0000 | [diff] [blame] | 477 | bool is_kw : 1; |
Damien George | d5e8182 | 2014-02-26 17:47:05 +0000 | [diff] [blame] | 478 | uint n_args_min : 15; // inclusive |
| 479 | uint n_args_max : 16; // inclusive |
Damien | 660365e | 2013-12-17 18:27:24 +0000 | [diff] [blame] | 480 | void *fun; |
Damien George | 66028ab | 2014-01-03 14:03:48 +0000 | [diff] [blame] | 481 | // TODO add mp_map_t *globals |
| 482 | // for const function objects, make an empty, const map |
| 483 | // such functions won't be able to access the global scope, but that's probably okay |
Damien | d99b052 | 2013-12-21 18:17:45 +0000 | [diff] [blame] | 484 | } mp_obj_fun_native_t; |
Damien George | 97209d3 | 2014-01-07 15:58:30 +0000 | [diff] [blame] | 485 | |
Damien George | bee17b0 | 2014-03-27 11:07:04 +0000 | [diff] [blame] | 486 | void mp_obj_fun_bc_get(mp_obj_t self_in, int *n_args, const byte **code); |
Paul Sokolovsky | 7fafb28 | 2014-03-30 20:21:28 +0300 | [diff] [blame] | 487 | bool mp_obj_fun_prepare_simple_args(mp_obj_t self_in, uint n_args, uint n_kw, const mp_obj_t *args, |
| 488 | uint *out_args1_len, const mp_obj_t **out_args1, uint *out_args2_len, const mp_obj_t **out_args2); |
Damien | 660365e | 2013-12-17 18:27:24 +0000 | [diff] [blame] | 489 | |
Paul Sokolovsky | dff3f89 | 2014-01-20 18:37:30 +0200 | [diff] [blame] | 490 | mp_obj_t mp_identity(mp_obj_t self); |
Paul Sokolovsky | 557c9d5 | 2014-02-08 21:57:19 +0200 | [diff] [blame] | 491 | MP_DECLARE_CONST_FUN_OBJ(mp_identity_obj); |
Paul Sokolovsky | dff3f89 | 2014-01-20 18:37:30 +0200 | [diff] [blame] | 492 | |
Damien George | 2870862 | 2014-01-02 21:30:26 +0000 | [diff] [blame] | 493 | // module |
Damien George | 0c36da0 | 2014-03-08 15:24:39 +0000 | [diff] [blame] | 494 | typedef struct _mp_obj_module_t { |
| 495 | mp_obj_base_t base; |
| 496 | qstr name; |
Damien George | 8b0535e | 2014-04-05 21:53:54 +0100 | [diff] [blame] | 497 | mp_obj_dict_t *globals; |
Damien George | 0c36da0 | 2014-03-08 15:24:39 +0000 | [diff] [blame] | 498 | } mp_obj_module_t; |
Damien George | 8b0535e | 2014-04-05 21:53:54 +0100 | [diff] [blame] | 499 | mp_obj_dict_t *mp_obj_module_get_globals(mp_obj_t self_in); |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 500 | |
| 501 | // staticmethod and classmethod types; defined here so we can make const versions |
Damien George | 64131f3 | 2014-02-06 20:31:44 +0000 | [diff] [blame] | 502 | // this structure is used for instances of both staticmethod and classmethod |
| 503 | typedef struct _mp_obj_static_class_method_t { |
Damien George | eae1644 | 2014-01-11 19:22:29 +0000 | [diff] [blame] | 504 | mp_obj_base_t base; |
| 505 | mp_obj_t fun; |
Damien George | 64131f3 | 2014-02-06 20:31:44 +0000 | [diff] [blame] | 506 | } mp_obj_static_class_method_t; |
Paul Sokolovsky | 439542f | 2014-01-21 00:19:19 +0200 | [diff] [blame] | 507 | |
| 508 | // sequence helpers |
| 509 | void mp_seq_multiply(const void *items, uint item_sz, uint len, uint times, void *dest); |
Paul Sokolovsky | 7364af2 | 2014-02-02 02:38:22 +0200 | [diff] [blame] | 510 | bool m_seq_get_fast_slice_indexes(machine_uint_t len, mp_obj_t slice, machine_uint_t *begin, machine_uint_t *end); |
Paul Sokolovsky | ee4aaf7 | 2014-02-08 23:17:51 +0200 | [diff] [blame] | 511 | #define m_seq_copy(dest, src, len, item_t) memcpy(dest, src, len * sizeof(item_t)) |
Paul Sokolovsky | 55ca075 | 2014-03-30 17:35:53 +0300 | [diff] [blame] | 512 | #define m_seq_cat(dest, src1, len1, src2, len2, item_t) { memcpy(dest, src1, (len1) * sizeof(item_t)); memcpy(dest + (len1), src2, (len2) * sizeof(item_t)); } |
Paul Sokolovsky | 87e85b7 | 2014-02-02 08:24:07 +0200 | [diff] [blame] | 513 | bool mp_seq_cmp_bytes(int op, const byte *data1, uint len1, const byte *data2, uint len2); |
Paul Sokolovsky | 1a996c4 | 2014-02-08 22:49:46 +0200 | [diff] [blame] | 514 | bool mp_seq_cmp_objs(int op, const mp_obj_t *items1, uint len1, const mp_obj_t *items2, uint len2); |
Paul Sokolovsky | 0cd1dc0 | 2014-02-10 06:37:11 +0200 | [diff] [blame] | 515 | mp_obj_t mp_seq_index_obj(const mp_obj_t *items, uint len, uint n_args, const mp_obj_t *args); |
Paul Sokolovsky | ac0134d | 2014-02-10 07:10:55 +0200 | [diff] [blame] | 516 | mp_obj_t mp_seq_count_obj(const mp_obj_t *items, uint len, mp_obj_t value); |