Damien George | 04b9147 | 2014-05-03 23:27:38 +0100 | [diff] [blame] | 1 | /* |
| 2 | * This file is part of the Micro Python project, http://micropython.org/ |
| 3 | * |
| 4 | * The MIT License (MIT) |
| 5 | * |
| 6 | * Copyright (c) 2013, 2014 Damien P. George |
Paul Sokolovsky | da9f092 | 2014-05-13 08:44:45 +0300 | [diff] [blame] | 7 | * Copyright (c) 2014 Paul Sokolovsky |
Damien George | 04b9147 | 2014-05-03 23:27:38 +0100 | [diff] [blame] | 8 | * |
| 9 | * Permission is hereby granted, free of charge, to any person obtaining a copy |
| 10 | * of this software and associated documentation files (the "Software"), to deal |
| 11 | * in the Software without restriction, including without limitation the rights |
| 12 | * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
| 13 | * copies of the Software, and to permit persons to whom the Software is |
| 14 | * furnished to do so, subject to the following conditions: |
| 15 | * |
| 16 | * The above copyright notice and this permission notice shall be included in |
| 17 | * all copies or substantial portions of the Software. |
| 18 | * |
| 19 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
| 20 | * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
| 21 | * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
| 22 | * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
| 23 | * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
| 24 | * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
| 25 | * THE SOFTWARE. |
| 26 | */ |
| 27 | |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 28 | #include <string.h> |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 29 | #include <assert.h> |
stijn | 49c47da | 2014-10-28 17:20:52 +0100 | [diff] [blame] | 30 | #include <stdint.h> |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 31 | |
Damien George | 51dfcb4 | 2015-01-01 20:27:54 +0000 | [diff] [blame] | 32 | #include "py/nlr.h" |
| 33 | #include "py/runtime0.h" |
| 34 | #include "py/runtime.h" |
| 35 | #include "py/binary.h" |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 36 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 37 | #if MICROPY_PY_ARRAY || MICROPY_PY_BUILTINS_BYTEARRAY || MICROPY_PY_BUILTINS_MEMORYVIEW |
Paul Sokolovsky | cb78f86 | 2014-06-27 20:39:09 +0300 | [diff] [blame] | 38 | |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 39 | // About memoryview object: We want to reuse as much code as possible from |
| 40 | // array, and keep the memoryview object 4 words in size so it fits in 1 GC |
| 41 | // block. Also, memoryview must keep a pointer to the base of the buffer so |
| 42 | // that the buffer is not GC'd if the original parent object is no longer |
| 43 | // around (we are assuming that all memoryview'able objects return a pointer |
| 44 | // which points to the start of a GC chunk). Given the above constraints we |
| 45 | // do the following: |
| 46 | // - typecode high bit is set if the buffer is read-write (else read-only) |
| 47 | // - free is the offset in elements to the first item in the memoryview |
| 48 | // - len is the length in elements |
| 49 | // - items points to the start of the original buffer |
| 50 | // Note that we don't handle the case where the original buffer might change |
| 51 | // size due to a resize of the original parent object. |
| 52 | |
| 53 | // make (& TYPECODE_MASK) a null operation if memorview not enabled |
| 54 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
| 55 | #define TYPECODE_MASK (0x7f) |
| 56 | #else |
Paul Sokolovsky | 16b1f5e | 2015-03-04 23:01:44 +0200 | [diff] [blame] | 57 | #define TYPECODE_MASK (~(mp_uint_t)0) |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 58 | #endif |
| 59 | |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 60 | typedef struct _mp_obj_array_t { |
| 61 | mp_obj_base_t base; |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 62 | mp_uint_t typecode : 8; |
Damien George | 5104775 | 2014-02-26 17:40:52 +0000 | [diff] [blame] | 63 | // free is number of unused elements after len used elements |
| 64 | // alloc size = len + free |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 65 | mp_uint_t free : (8 * sizeof(mp_uint_t) - 8); |
| 66 | mp_uint_t len; // in elements |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 67 | void *items; |
| 68 | } mp_obj_array_t; |
| 69 | |
Paul Sokolovsky | d5df6cd | 2014-02-12 18:15:40 +0200 | [diff] [blame] | 70 | STATIC mp_obj_t array_iterator_new(mp_obj_t array_in); |
Paul Sokolovsky | d5df6cd | 2014-02-12 18:15:40 +0200 | [diff] [blame] | 71 | STATIC mp_obj_t array_append(mp_obj_t self_in, mp_obj_t arg); |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 72 | STATIC mp_obj_t array_extend(mp_obj_t self_in, mp_obj_t arg_in); |
Damien George | 4d91723 | 2014-08-30 14:28:06 +0100 | [diff] [blame] | 73 | STATIC mp_int_t array_get_buffer(mp_obj_t o_in, mp_buffer_info_t *bufinfo, mp_uint_t flags); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 74 | |
| 75 | /******************************************************************************/ |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 76 | // array |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 77 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 78 | #if MICROPY_PY_BUILTINS_BYTEARRAY || MICROPY_PY_ARRAY |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 79 | STATIC void array_print(const mp_print_t *print, mp_obj_t o_in, mp_print_kind_t kind) { |
Damien George | ff8dd3f | 2015-01-20 12:47:20 +0000 | [diff] [blame] | 80 | (void)kind; |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 81 | mp_obj_array_t *o = o_in; |
| 82 | if (o->typecode == BYTEARRAY_TYPECODE) { |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 83 | mp_print_str(print, "bytearray(b"); |
| 84 | mp_str_print_quoted(print, o->items, o->len, true); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 85 | } else { |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 86 | mp_printf(print, "array('%c'", o->typecode); |
Paul Sokolovsky | 1801421 | 2014-01-28 03:40:48 +0200 | [diff] [blame] | 87 | if (o->len > 0) { |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 88 | mp_print_str(print, ", ["); |
Damien George | 42f3de9 | 2014-10-03 17:44:14 +0000 | [diff] [blame] | 89 | for (mp_uint_t i = 0; i < o->len; i++) { |
Paul Sokolovsky | 1801421 | 2014-01-28 03:40:48 +0200 | [diff] [blame] | 90 | if (i > 0) { |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 91 | mp_print_str(print, ", "); |
Paul Sokolovsky | 1801421 | 2014-01-28 03:40:48 +0200 | [diff] [blame] | 92 | } |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 93 | mp_obj_print_helper(print, mp_binary_get_val_array(o->typecode, o->items, i), PRINT_REPR); |
Paul Sokolovsky | 7e652af | 2014-01-28 03:14:20 +0200 | [diff] [blame] | 94 | } |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 95 | mp_print_str(print, "]"); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 96 | } |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 97 | } |
Damien George | 7f9d1d6 | 2015-04-09 23:56:15 +0100 | [diff] [blame] | 98 | mp_print_str(print, ")"); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 99 | } |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 100 | #endif |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 101 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 102 | #if MICROPY_PY_BUILTINS_BYTEARRAY || MICROPY_PY_ARRAY |
| 103 | STATIC mp_obj_array_t *array_new(char typecode, mp_uint_t n) { |
| 104 | int typecode_size = mp_binary_get_size('@', typecode, NULL); |
Kaspar Schleiser | f5dd6f7 | 2015-05-10 13:04:38 +0200 | [diff] [blame] | 105 | if (typecode_size == 0) { |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 106 | nlr_raise(mp_obj_new_exception_msg(&mp_type_ValueError, "bad typecode")); |
| 107 | } |
| 108 | mp_obj_array_t *o = m_new_obj(mp_obj_array_t); |
| 109 | #if MICROPY_PY_BUILTINS_BYTEARRAY && MICROPY_PY_ARRAY |
| 110 | o->base.type = (typecode == BYTEARRAY_TYPECODE) ? &mp_type_bytearray : &mp_type_array; |
| 111 | #elif MICROPY_PY_BUILTINS_BYTEARRAY |
| 112 | o->base.type = &mp_type_bytearray; |
| 113 | #else |
| 114 | o->base.type = &mp_type_array; |
| 115 | #endif |
| 116 | o->typecode = typecode; |
| 117 | o->free = 0; |
| 118 | o->len = n; |
Damien George | 4d77e1a | 2015-02-27 09:34:51 +0000 | [diff] [blame] | 119 | o->items = m_new(byte, typecode_size * o->len); |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 120 | return o; |
| 121 | } |
| 122 | #endif |
| 123 | |
| 124 | #if MICROPY_PY_BUILTINS_BYTEARRAY || MICROPY_PY_ARRAY |
Paul Sokolovsky | d5df6cd | 2014-02-12 18:15:40 +0200 | [diff] [blame] | 125 | STATIC mp_obj_t array_construct(char typecode, mp_obj_t initializer) { |
Damien George | 32ef3a3 | 2014-12-04 15:46:14 +0000 | [diff] [blame] | 126 | // bytearrays can be raw-initialised from anything with the buffer protocol |
| 127 | // other arrays can only be raw-initialised from bytes and bytearray objects |
| 128 | mp_buffer_info_t bufinfo; |
| 129 | if (((MICROPY_PY_BUILTINS_BYTEARRAY |
| 130 | && typecode == BYTEARRAY_TYPECODE) |
| 131 | || (MICROPY_PY_ARRAY |
| 132 | && (MP_OBJ_IS_TYPE(initializer, &mp_type_bytes) |
Damien George | 035deae | 2015-07-02 16:26:57 +0100 | [diff] [blame] | 133 | || (MICROPY_PY_BUILTINS_BYTEARRAY && MP_OBJ_IS_TYPE(initializer, &mp_type_bytearray))))) |
Damien George | 32ef3a3 | 2014-12-04 15:46:14 +0000 | [diff] [blame] | 134 | && mp_get_buffer(initializer, &bufinfo, MP_BUFFER_READ)) { |
| 135 | // construct array from raw bytes |
| 136 | // we round-down the len to make it a multiple of sz (CPython raises error) |
Kaspar Schleiser | f5dd6f7 | 2015-05-10 13:04:38 +0200 | [diff] [blame] | 137 | size_t sz = mp_binary_get_size('@', typecode, NULL); |
Damien George | 32ef3a3 | 2014-12-04 15:46:14 +0000 | [diff] [blame] | 138 | mp_uint_t len = bufinfo.len / sz; |
| 139 | mp_obj_array_t *o = array_new(typecode, len); |
| 140 | memcpy(o->items, bufinfo.buf, len * sz); |
| 141 | return o; |
| 142 | } |
| 143 | |
| 144 | mp_uint_t len; |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 145 | // Try to create array of exact len if initializer len is known |
| 146 | mp_obj_t len_in = mp_obj_len_maybe(initializer); |
| 147 | if (len_in == MP_OBJ_NULL) { |
| 148 | len = 0; |
| 149 | } else { |
| 150 | len = MP_OBJ_SMALL_INT_VALUE(len_in); |
| 151 | } |
| 152 | |
| 153 | mp_obj_array_t *array = array_new(typecode, len); |
| 154 | |
Damien George | d17926d | 2014-03-30 13:35:08 +0100 | [diff] [blame] | 155 | mp_obj_t iterable = mp_getiter(initializer); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 156 | mp_obj_t item; |
Damien George | 42f3de9 | 2014-10-03 17:44:14 +0000 | [diff] [blame] | 157 | mp_uint_t i = 0; |
Damien George | ea8d06c | 2014-04-17 23:19:36 +0100 | [diff] [blame] | 158 | while ((item = mp_iternext(iterable)) != MP_OBJ_STOP_ITERATION) { |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 159 | if (len == 0) { |
| 160 | array_append(array, item); |
| 161 | } else { |
Paul Sokolovsky | ef9124f | 2014-04-11 03:46:09 +0300 | [diff] [blame] | 162 | mp_binary_set_val_array(typecode, array->items, i++, item); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 163 | } |
| 164 | } |
| 165 | |
| 166 | return array; |
| 167 | } |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 168 | #endif |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 169 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 170 | #if MICROPY_PY_ARRAY |
Damien George | ecc88e9 | 2014-08-30 00:35:11 +0100 | [diff] [blame] | 171 | STATIC mp_obj_t array_make_new(mp_obj_t type_in, mp_uint_t n_args, mp_uint_t n_kw, const mp_obj_t *args) { |
Damien George | ff8dd3f | 2015-01-20 12:47:20 +0000 | [diff] [blame] | 172 | (void)type_in; |
Damien George | a3f94e0 | 2014-04-20 00:13:22 +0100 | [diff] [blame] | 173 | mp_arg_check_num(n_args, n_kw, 1, 2, false); |
Damien George | 32ca164 | 2014-04-18 22:04:06 +0100 | [diff] [blame] | 174 | |
| 175 | // get typecode |
Damien George | d182b98 | 2014-08-30 14:19:41 +0100 | [diff] [blame] | 176 | mp_uint_t l; |
Damien George | 698ec21 | 2014-02-08 18:17:23 +0000 | [diff] [blame] | 177 | const char *typecode = mp_obj_str_get_data(args[0], &l); |
Paul Sokolovsky | 11973b4 | 2014-01-28 02:31:52 +0200 | [diff] [blame] | 178 | |
Damien George | 32ca164 | 2014-04-18 22:04:06 +0100 | [diff] [blame] | 179 | if (n_args == 1) { |
| 180 | // 1 arg: make an empty array |
| 181 | return array_new(*typecode, 0); |
| 182 | } else { |
Damien George | 32ef3a3 | 2014-12-04 15:46:14 +0000 | [diff] [blame] | 183 | // 2 args: construct the array from the given object |
Damien George | 32ca164 | 2014-04-18 22:04:06 +0100 | [diff] [blame] | 184 | return array_construct(*typecode, args[1]); |
| 185 | } |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 186 | } |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 187 | #endif |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 188 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 189 | #if MICROPY_PY_BUILTINS_BYTEARRAY |
Damien George | ecc88e9 | 2014-08-30 00:35:11 +0100 | [diff] [blame] | 190 | STATIC mp_obj_t bytearray_make_new(mp_obj_t type_in, mp_uint_t n_args, mp_uint_t n_kw, const mp_obj_t *args) { |
Damien George | ff8dd3f | 2015-01-20 12:47:20 +0000 | [diff] [blame] | 191 | (void)type_in; |
Damien George | a3f94e0 | 2014-04-20 00:13:22 +0100 | [diff] [blame] | 192 | mp_arg_check_num(n_args, n_kw, 0, 1, false); |
Paul Sokolovsky | 4dcb605 | 2014-04-08 22:09:14 +0300 | [diff] [blame] | 193 | |
Damien George | 32ca164 | 2014-04-18 22:04:06 +0100 | [diff] [blame] | 194 | if (n_args == 0) { |
| 195 | // no args: construct an empty bytearray |
| 196 | return array_new(BYTEARRAY_TYPECODE, 0); |
Paul Sokolovsky | 343ca1e | 2015-01-04 17:19:16 +0200 | [diff] [blame] | 197 | } else if (MP_OBJ_IS_INT(args[0])) { |
Damien George | 32ca164 | 2014-04-18 22:04:06 +0100 | [diff] [blame] | 198 | // 1 arg, an integer: construct a blank bytearray of that length |
Paul Sokolovsky | 343ca1e | 2015-01-04 17:19:16 +0200 | [diff] [blame] | 199 | mp_uint_t len = mp_obj_get_int(args[0]); |
Paul Sokolovsky | b9cf3d3 | 2014-04-08 04:42:44 +0300 | [diff] [blame] | 200 | mp_obj_array_t *o = array_new(BYTEARRAY_TYPECODE, len); |
| 201 | memset(o->items, 0, len); |
| 202 | return o; |
Damien George | 32ca164 | 2014-04-18 22:04:06 +0100 | [diff] [blame] | 203 | } else { |
Damien George | 32ef3a3 | 2014-12-04 15:46:14 +0000 | [diff] [blame] | 204 | // 1 arg: construct the bytearray from that |
Damien George | 32ca164 | 2014-04-18 22:04:06 +0100 | [diff] [blame] | 205 | return array_construct(BYTEARRAY_TYPECODE, args[0]); |
Paul Sokolovsky | b9cf3d3 | 2014-04-08 04:42:44 +0300 | [diff] [blame] | 206 | } |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 207 | } |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 208 | #endif |
| 209 | |
| 210 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
Paul Sokolovsky | cb0fc06 | 2015-03-06 21:35:26 +0200 | [diff] [blame] | 211 | |
| 212 | mp_obj_t mp_obj_new_memoryview(byte typecode, mp_uint_t nitems, void *items) { |
| 213 | mp_obj_array_t *self = m_new_obj(mp_obj_array_t); |
| 214 | self->base.type = &mp_type_memoryview; |
| 215 | self->typecode = typecode; |
| 216 | self->free = 0; |
| 217 | self->len = nitems; |
| 218 | self->items = items; |
| 219 | return self; |
| 220 | } |
| 221 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 222 | STATIC mp_obj_t memoryview_make_new(mp_obj_t type_in, mp_uint_t n_args, mp_uint_t n_kw, const mp_obj_t *args) { |
Damien George | 2e2e404 | 2015-03-19 00:21:29 +0000 | [diff] [blame] | 223 | (void)type_in; |
| 224 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 225 | // TODO possibly allow memoryview constructor to take start/stop so that one |
| 226 | // can do memoryview(b, 4, 8) instead of memoryview(b)[4:8] (uses less RAM) |
| 227 | |
| 228 | mp_arg_check_num(n_args, n_kw, 1, 1, false); |
| 229 | |
| 230 | mp_buffer_info_t bufinfo; |
| 231 | mp_get_buffer_raise(args[0], &bufinfo, MP_BUFFER_READ); |
| 232 | |
Paul Sokolovsky | cb0fc06 | 2015-03-06 21:35:26 +0200 | [diff] [blame] | 233 | mp_obj_array_t *self = mp_obj_new_memoryview(bufinfo.typecode, |
| 234 | bufinfo.len / mp_binary_get_size('@', bufinfo.typecode, NULL), |
| 235 | bufinfo.buf); |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 236 | |
| 237 | // test if the object can be written to |
| 238 | if (mp_get_buffer(args[0], &bufinfo, MP_BUFFER_RW)) { |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 239 | self->typecode |= 0x80; // used to indicate writable buffer |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 240 | } |
| 241 | |
| 242 | return self; |
| 243 | } |
| 244 | #endif |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 245 | |
Damien George | ecc88e9 | 2014-08-30 00:35:11 +0100 | [diff] [blame] | 246 | STATIC mp_obj_t array_unary_op(mp_uint_t op, mp_obj_t o_in) { |
Paul Sokolovsky | c1d9bbc | 2014-01-30 04:37:19 +0200 | [diff] [blame] | 247 | mp_obj_array_t *o = o_in; |
| 248 | switch (op) { |
Damien George | d17926d | 2014-03-30 13:35:08 +0100 | [diff] [blame] | 249 | case MP_UNARY_OP_BOOL: return MP_BOOL(o->len != 0); |
| 250 | case MP_UNARY_OP_LEN: return MP_OBJ_NEW_SMALL_INT(o->len); |
Damien George | 6ac5dce | 2014-05-21 19:42:43 +0100 | [diff] [blame] | 251 | default: return MP_OBJ_NULL; // op not supported |
Paul Sokolovsky | c1d9bbc | 2014-01-30 04:37:19 +0200 | [diff] [blame] | 252 | } |
| 253 | } |
| 254 | |
Damien George | ecc88e9 | 2014-08-30 00:35:11 +0100 | [diff] [blame] | 255 | STATIC mp_obj_t array_binary_op(mp_uint_t op, mp_obj_t lhs_in, mp_obj_t rhs_in) { |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 256 | mp_obj_array_t *lhs = lhs_in; |
Paul Sokolovsky | 5f93033 | 2014-08-10 11:49:23 +0300 | [diff] [blame] | 257 | switch (op) { |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 258 | case MP_BINARY_OP_ADD: { |
Damien George | c7ca01a | 2014-11-30 14:01:33 +0000 | [diff] [blame] | 259 | // allow to add anything that has the buffer protocol (extension to CPython) |
| 260 | mp_buffer_info_t lhs_bufinfo; |
| 261 | mp_buffer_info_t rhs_bufinfo; |
| 262 | array_get_buffer(lhs_in, &lhs_bufinfo, MP_BUFFER_READ); |
| 263 | mp_get_buffer_raise(rhs_in, &rhs_bufinfo, MP_BUFFER_READ); |
| 264 | |
Kaspar Schleiser | f5dd6f7 | 2015-05-10 13:04:38 +0200 | [diff] [blame] | 265 | size_t sz = mp_binary_get_size('@', lhs_bufinfo.typecode, NULL); |
Damien George | c7ca01a | 2014-11-30 14:01:33 +0000 | [diff] [blame] | 266 | |
| 267 | // convert byte count to element count (in case rhs is not multiple of sz) |
| 268 | mp_uint_t rhs_len = rhs_bufinfo.len / sz; |
| 269 | |
| 270 | // note: lhs->len is element count of lhs, lhs_bufinfo.len is byte count |
| 271 | mp_obj_array_t *res = array_new(lhs_bufinfo.typecode, lhs->len + rhs_len); |
| 272 | mp_seq_cat((byte*)res->items, lhs_bufinfo.buf, lhs_bufinfo.len, rhs_bufinfo.buf, rhs_len * sz, byte); |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 273 | return res; |
| 274 | } |
| 275 | |
| 276 | case MP_BINARY_OP_INPLACE_ADD: { |
| 277 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
| 278 | if (lhs->base.type == &mp_type_memoryview) { |
| 279 | return MP_OBJ_NULL; // op not supported |
| 280 | } |
| 281 | #endif |
| 282 | array_extend(lhs, rhs_in); |
| 283 | return lhs; |
| 284 | } |
| 285 | |
Paul Sokolovsky | 5f93033 | 2014-08-10 11:49:23 +0300 | [diff] [blame] | 286 | case MP_BINARY_OP_EQUAL: { |
| 287 | mp_buffer_info_t lhs_bufinfo; |
| 288 | mp_buffer_info_t rhs_bufinfo; |
| 289 | array_get_buffer(lhs_in, &lhs_bufinfo, MP_BUFFER_READ); |
| 290 | if (!mp_get_buffer(rhs_in, &rhs_bufinfo, MP_BUFFER_READ)) { |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 291 | return mp_const_false; |
Paul Sokolovsky | 5f93033 | 2014-08-10 11:49:23 +0300 | [diff] [blame] | 292 | } |
| 293 | return MP_BOOL(mp_seq_cmp_bytes(op, lhs_bufinfo.buf, lhs_bufinfo.len, rhs_bufinfo.buf, rhs_bufinfo.len)); |
| 294 | } |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 295 | |
Paul Sokolovsky | 5f93033 | 2014-08-10 11:49:23 +0300 | [diff] [blame] | 296 | default: |
| 297 | return MP_OBJ_NULL; // op not supported |
| 298 | } |
| 299 | } |
| 300 | |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 301 | #if MICROPY_PY_BUILTINS_BYTEARRAY || MICROPY_PY_ARRAY |
Paul Sokolovsky | d5df6cd | 2014-02-12 18:15:40 +0200 | [diff] [blame] | 302 | STATIC mp_obj_t array_append(mp_obj_t self_in, mp_obj_t arg) { |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 303 | // self is not a memoryview, so we don't need to use (& TYPECODE_MASK) |
Damien George | 035deae | 2015-07-02 16:26:57 +0100 | [diff] [blame] | 304 | assert((MICROPY_PY_BUILTINS_BYTEARRAY && MP_OBJ_IS_TYPE(self_in, &mp_type_bytearray)) |
| 305 | || (MICROPY_PY_ARRAY && MP_OBJ_IS_TYPE(self_in, &mp_type_array))); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 306 | mp_obj_array_t *self = self_in; |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 307 | |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 308 | if (self->free == 0) { |
Kaspar Schleiser | f5dd6f7 | 2015-05-10 13:04:38 +0200 | [diff] [blame] | 309 | size_t item_sz = mp_binary_get_size('@', self->typecode, NULL); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 310 | // TODO: alloc policy |
| 311 | self->free = 8; |
Damien George | 4d77e1a | 2015-02-27 09:34:51 +0000 | [diff] [blame] | 312 | self->items = m_renew(byte, self->items, item_sz * self->len, item_sz * (self->len + self->free)); |
Paul Sokolovsky | a224067 | 2014-04-28 00:16:57 +0300 | [diff] [blame] | 313 | mp_seq_clear(self->items, self->len + 1, self->len + self->free, item_sz); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 314 | } |
Paul Sokolovsky | ef9124f | 2014-04-11 03:46:09 +0300 | [diff] [blame] | 315 | mp_binary_set_val_array(self->typecode, self->items, self->len++, arg); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 316 | self->free--; |
| 317 | return mp_const_none; // return None, as per CPython |
| 318 | } |
Paul Sokolovsky | d5df6cd | 2014-02-12 18:15:40 +0200 | [diff] [blame] | 319 | STATIC MP_DEFINE_CONST_FUN_OBJ_2(array_append_obj, array_append); |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 320 | |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 321 | STATIC mp_obj_t array_extend(mp_obj_t self_in, mp_obj_t arg_in) { |
| 322 | // self is not a memoryview, so we don't need to use (& TYPECODE_MASK) |
Damien George | 035deae | 2015-07-02 16:26:57 +0100 | [diff] [blame] | 323 | assert((MICROPY_PY_BUILTINS_BYTEARRAY && MP_OBJ_IS_TYPE(self_in, &mp_type_bytearray)) |
| 324 | || (MICROPY_PY_ARRAY && MP_OBJ_IS_TYPE(self_in, &mp_type_array))); |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 325 | mp_obj_array_t *self = self_in; |
| 326 | |
Damien George | c7ca01a | 2014-11-30 14:01:33 +0000 | [diff] [blame] | 327 | // allow to extend by anything that has the buffer protocol (extension to CPython) |
| 328 | mp_buffer_info_t arg_bufinfo; |
| 329 | mp_get_buffer_raise(arg_in, &arg_bufinfo, MP_BUFFER_READ); |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 330 | |
Kaspar Schleiser | f5dd6f7 | 2015-05-10 13:04:38 +0200 | [diff] [blame] | 331 | size_t sz = mp_binary_get_size('@', self->typecode, NULL); |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 332 | |
Damien George | c7ca01a | 2014-11-30 14:01:33 +0000 | [diff] [blame] | 333 | // convert byte count to element count |
| 334 | mp_uint_t len = arg_bufinfo.len / sz; |
| 335 | |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 336 | // make sure we have enough room to extend |
Damien George | c7ca01a | 2014-11-30 14:01:33 +0000 | [diff] [blame] | 337 | // TODO: alloc policy; at the moment we go conservative |
| 338 | if (self->free < len) { |
Damien George | 4d77e1a | 2015-02-27 09:34:51 +0000 | [diff] [blame] | 339 | self->items = m_renew(byte, self->items, (self->len + self->free) * sz, (self->len + len) * sz); |
Damien George | c7ca01a | 2014-11-30 14:01:33 +0000 | [diff] [blame] | 340 | self->free = 0; |
| 341 | } else { |
| 342 | self->free -= len; |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 343 | } |
| 344 | |
| 345 | // extend |
Damien George | c7ca01a | 2014-11-30 14:01:33 +0000 | [diff] [blame] | 346 | mp_seq_copy((byte*)self->items + self->len * sz, arg_bufinfo.buf, len * sz, byte); |
| 347 | self->len += len; |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 348 | |
| 349 | return mp_const_none; |
| 350 | } |
| 351 | STATIC MP_DEFINE_CONST_FUN_OBJ_2(array_extend_obj, array_extend); |
| 352 | #endif |
| 353 | |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 354 | STATIC mp_obj_t array_subscr(mp_obj_t self_in, mp_obj_t index_in, mp_obj_t value) { |
Damien George | f4c9b33 | 2014-04-08 21:32:29 +0100 | [diff] [blame] | 355 | if (value == MP_OBJ_NULL) { |
Damien George | 32ca164 | 2014-04-18 22:04:06 +0100 | [diff] [blame] | 356 | // delete item |
| 357 | // TODO implement |
Paul Sokolovsky | 2690525 | 2014-04-20 20:58:33 +0300 | [diff] [blame] | 358 | // TODO: confirmed that both bytearray and array.array support |
| 359 | // slice deletion |
Damien George | 6ac5dce | 2014-05-21 19:42:43 +0100 | [diff] [blame] | 360 | return MP_OBJ_NULL; // op not supported |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 361 | } else { |
| 362 | mp_obj_array_t *o = self_in; |
Damien George | c49ddb9 | 2014-06-01 13:49:35 +0100 | [diff] [blame] | 363 | if (0) { |
| 364 | #if MICROPY_PY_BUILTINS_SLICE |
| 365 | } else if (MP_OBJ_IS_TYPE(index_in, &mp_type_slice)) { |
Paul Sokolovsky | de4b932 | 2014-05-25 21:21:57 +0300 | [diff] [blame] | 366 | mp_bound_slice_t slice; |
| 367 | if (!mp_seq_get_fast_slice_indexes(o->len, index_in, &slice)) { |
Paul Sokolovsky | 5fd5af9 | 2014-05-25 22:12:56 +0300 | [diff] [blame] | 368 | nlr_raise(mp_obj_new_exception_msg(&mp_type_NotImplementedError, |
Damien George | 11de839 | 2014-06-05 18:57:38 +0100 | [diff] [blame] | 369 | "only slices with step=1 (aka None) are supported")); |
Paul Sokolovsky | d6e1272 | 2014-04-19 20:06:57 +0300 | [diff] [blame] | 370 | } |
Paul Sokolovsky | cefcbb2 | 2015-02-27 22:16:05 +0200 | [diff] [blame] | 371 | if (value != MP_OBJ_SENTINEL) { |
| 372 | #if MICROPY_PY_ARRAY_SLICE_ASSIGN |
| 373 | // Assign |
Paul Sokolovsky | 56beb01 | 2015-04-16 00:48:36 +0300 | [diff] [blame] | 374 | mp_uint_t src_len; |
| 375 | void *src_items; |
Delio Brignoli | 32aba40 | 2015-06-03 07:07:35 +0200 | [diff] [blame] | 376 | size_t item_sz = mp_binary_get_size('@', o->typecode & TYPECODE_MASK, NULL); |
Damien George | 4915c2b | 2015-07-20 16:12:26 +0100 | [diff] [blame] | 377 | if (MP_OBJ_IS_OBJ(value) && ((mp_obj_base_t*)value)->type->subscr == array_subscr) { |
| 378 | // value is array, bytearray or memoryview |
Paul Sokolovsky | 56beb01 | 2015-04-16 00:48:36 +0300 | [diff] [blame] | 379 | mp_obj_array_t *src_slice = value; |
Delio Brignoli | 32aba40 | 2015-06-03 07:07:35 +0200 | [diff] [blame] | 380 | if (item_sz != mp_binary_get_size('@', src_slice->typecode & TYPECODE_MASK, NULL)) { |
Paul Sokolovsky | 56beb01 | 2015-04-16 00:48:36 +0300 | [diff] [blame] | 381 | compat_error: |
Delio Brignoli | 32aba40 | 2015-06-03 07:07:35 +0200 | [diff] [blame] | 382 | nlr_raise(mp_obj_new_exception_msg(&mp_type_ValueError, "lhs and rhs should be compatible")); |
Paul Sokolovsky | 56beb01 | 2015-04-16 00:48:36 +0300 | [diff] [blame] | 383 | } |
| 384 | src_len = src_slice->len; |
| 385 | src_items = src_slice->items; |
Damien George | 4915c2b | 2015-07-20 16:12:26 +0100 | [diff] [blame] | 386 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
| 387 | if (MP_OBJ_IS_TYPE(value, &mp_type_memoryview)) { |
| 388 | src_items = (uint8_t*)src_items + (src_slice->free * item_sz); |
| 389 | } |
| 390 | #endif |
Paul Sokolovsky | 56beb01 | 2015-04-16 00:48:36 +0300 | [diff] [blame] | 391 | } else if (MP_OBJ_IS_TYPE(value, &mp_type_bytes)) { |
| 392 | if (item_sz != 1) { |
| 393 | goto compat_error; |
| 394 | } |
| 395 | mp_buffer_info_t bufinfo; |
| 396 | mp_get_buffer_raise(value, &bufinfo, MP_BUFFER_READ); |
| 397 | src_len = bufinfo.len; |
| 398 | src_items = bufinfo.buf; |
| 399 | } else { |
| 400 | mp_not_implemented("array/bytes required on right side"); |
Paul Sokolovsky | cefcbb2 | 2015-02-27 22:16:05 +0200 | [diff] [blame] | 401 | } |
| 402 | |
| 403 | // TODO: check src/dst compat |
Paul Sokolovsky | 56beb01 | 2015-04-16 00:48:36 +0300 | [diff] [blame] | 404 | mp_int_t len_adj = src_len - (slice.stop - slice.start); |
Delio Brignoli | 6a388aa | 2015-06-06 20:14:08 +0200 | [diff] [blame^] | 405 | uint8_t* dest_items = o->items; |
| 406 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
| 407 | if (o->base.type == &mp_type_memoryview) { |
| 408 | if (len_adj != 0) { |
Delio Brignoli | 32aba40 | 2015-06-03 07:07:35 +0200 | [diff] [blame] | 409 | goto compat_error; |
| 410 | } |
Delio Brignoli | 6a388aa | 2015-06-06 20:14:08 +0200 | [diff] [blame^] | 411 | dest_items += o->free * item_sz; |
| 412 | } |
| 413 | #endif |
| 414 | if (len_adj > 0) { |
Paul Sokolovsky | cefcbb2 | 2015-02-27 22:16:05 +0200 | [diff] [blame] | 415 | if (len_adj > o->free) { |
| 416 | // TODO: alloc policy; at the moment we go conservative |
Damien George | d891452 | 2015-02-27 09:54:12 +0000 | [diff] [blame] | 417 | o->items = m_renew(byte, o->items, (o->len + o->free) * item_sz, (o->len + len_adj) * item_sz); |
Paul Sokolovsky | cefcbb2 | 2015-02-27 22:16:05 +0200 | [diff] [blame] | 418 | o->free = 0; |
| 419 | } |
Delio Brignoli | 6a388aa | 2015-06-06 20:14:08 +0200 | [diff] [blame^] | 420 | mp_seq_replace_slice_grow_inplace(dest_items, o->len, |
Paul Sokolovsky | 56beb01 | 2015-04-16 00:48:36 +0300 | [diff] [blame] | 421 | slice.start, slice.stop, src_items, src_len, len_adj, item_sz); |
Paul Sokolovsky | cefcbb2 | 2015-02-27 22:16:05 +0200 | [diff] [blame] | 422 | } else { |
Delio Brignoli | 6a388aa | 2015-06-06 20:14:08 +0200 | [diff] [blame^] | 423 | mp_seq_replace_slice_no_grow(dest_items, o->len, |
| 424 | slice.start, slice.stop, src_items, src_len, item_sz); |
| 425 | // Clear "freed" elements at the end of list |
| 426 | // TODO: This is actually only needed for typecode=='O' |
| 427 | mp_seq_clear(dest_items, o->len + len_adj, o->len, item_sz); |
| 428 | // TODO: alloc policy after shrinking |
Paul Sokolovsky | cefcbb2 | 2015-02-27 22:16:05 +0200 | [diff] [blame] | 429 | } |
| 430 | o->len += len_adj; |
| 431 | return mp_const_none; |
| 432 | #else |
| 433 | return MP_OBJ_NULL; // op not supported |
| 434 | #endif |
| 435 | } |
| 436 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 437 | mp_obj_array_t *res; |
Kaspar Schleiser | f5dd6f7 | 2015-05-10 13:04:38 +0200 | [diff] [blame] | 438 | size_t sz = mp_binary_get_size('@', o->typecode & TYPECODE_MASK, NULL); |
Paul Sokolovsky | d6e1272 | 2014-04-19 20:06:57 +0300 | [diff] [blame] | 439 | assert(sz > 0); |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 440 | if (0) { |
| 441 | // dummy |
| 442 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
| 443 | } else if (o->base.type == &mp_type_memoryview) { |
| 444 | res = m_new_obj(mp_obj_array_t); |
| 445 | *res = *o; |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 446 | res->free += slice.start; |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 447 | res->len = slice.stop - slice.start; |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 448 | #endif |
| 449 | } else { |
| 450 | res = array_new(o->typecode, slice.stop - slice.start); |
stijn | 49c47da | 2014-10-28 17:20:52 +0100 | [diff] [blame] | 451 | memcpy(res->items, (uint8_t*)o->items + slice.start * sz, (slice.stop - slice.start) * sz); |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 452 | } |
Paul Sokolovsky | d6e1272 | 2014-04-19 20:06:57 +0300 | [diff] [blame] | 453 | return res; |
Damien George | c49ddb9 | 2014-06-01 13:49:35 +0100 | [diff] [blame] | 454 | #endif |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 455 | } else { |
Damien George | 42f3de9 | 2014-10-03 17:44:14 +0000 | [diff] [blame] | 456 | mp_uint_t index = mp_get_index(o->base.type, o->len, index_in, false); |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 457 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
| 458 | if (o->base.type == &mp_type_memoryview) { |
| 459 | index += o->free; |
| 460 | if (value != MP_OBJ_SENTINEL && (o->typecode & 0x80) == 0) { |
| 461 | // store to read-only memoryview |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 462 | return MP_OBJ_NULL; |
| 463 | } |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 464 | } |
| 465 | #endif |
| 466 | if (value == MP_OBJ_SENTINEL) { |
| 467 | // load |
| 468 | return mp_binary_get_val_array(o->typecode & TYPECODE_MASK, o->items, index); |
| 469 | } else { |
| 470 | // store |
| 471 | mp_binary_set_val_array(o->typecode & TYPECODE_MASK, o->items, index, value); |
Paul Sokolovsky | d6e1272 | 2014-04-19 20:06:57 +0300 | [diff] [blame] | 472 | return mp_const_none; |
| 473 | } |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 474 | } |
Damien George | f4c9b33 | 2014-04-08 21:32:29 +0100 | [diff] [blame] | 475 | } |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 476 | } |
| 477 | |
Damien George | 4d91723 | 2014-08-30 14:28:06 +0100 | [diff] [blame] | 478 | STATIC mp_int_t array_get_buffer(mp_obj_t o_in, mp_buffer_info_t *bufinfo, mp_uint_t flags) { |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 479 | mp_obj_array_t *o = o_in; |
Kaspar Schleiser | f5dd6f7 | 2015-05-10 13:04:38 +0200 | [diff] [blame] | 480 | size_t sz = mp_binary_get_size('@', o->typecode & TYPECODE_MASK, NULL); |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 481 | bufinfo->buf = o->items; |
| 482 | bufinfo->len = o->len * sz; |
| 483 | bufinfo->typecode = o->typecode & TYPECODE_MASK; |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 484 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 485 | if (o->base.type == &mp_type_memoryview) { |
| 486 | if ((o->typecode & 0x80) == 0 && (flags & MP_BUFFER_WRITE)) { |
| 487 | // read-only memoryview |
| 488 | return 1; |
| 489 | } |
stijn | 49c47da | 2014-10-28 17:20:52 +0100 | [diff] [blame] | 490 | bufinfo->buf = (uint8_t*)bufinfo->buf + (mp_uint_t)o->free * sz; |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 491 | } |
| 492 | #endif |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 493 | return 0; |
| 494 | } |
| 495 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 496 | #if MICROPY_PY_BUILTINS_BYTEARRAY || MICROPY_PY_ARRAY |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 497 | STATIC const mp_map_elem_t array_locals_dict_table[] = { |
| 498 | { MP_OBJ_NEW_QSTR(MP_QSTR_append), (mp_obj_t)&array_append_obj }, |
Damien George | b2e7311 | 2014-11-30 00:00:55 +0000 | [diff] [blame] | 499 | { MP_OBJ_NEW_QSTR(MP_QSTR_extend), (mp_obj_t)&array_extend_obj }, |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 500 | }; |
| 501 | |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 502 | STATIC MP_DEFINE_CONST_DICT(array_locals_dict, array_locals_dict_table); |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 503 | #endif |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 504 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 505 | #if MICROPY_PY_ARRAY |
Damien George | caac542 | 2014-03-25 14:18:18 +0000 | [diff] [blame] | 506 | const mp_obj_type_t mp_type_array = { |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 507 | { &mp_type_type }, |
Damien George | a71c83a | 2014-02-15 11:34:50 +0000 | [diff] [blame] | 508 | .name = MP_QSTR_array, |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 509 | .print = array_print, |
| 510 | .make_new = array_make_new, |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 511 | .getiter = array_iterator_new, |
Paul Sokolovsky | c1d9bbc | 2014-01-30 04:37:19 +0200 | [diff] [blame] | 512 | .unary_op = array_unary_op, |
Paul Sokolovsky | 5f93033 | 2014-08-10 11:49:23 +0300 | [diff] [blame] | 513 | .binary_op = array_binary_op, |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 514 | .subscr = array_subscr, |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 515 | .buffer_p = { .get_buffer = array_get_buffer }, |
Damien George | 9b196cd | 2014-03-26 21:47:19 +0000 | [diff] [blame] | 516 | .locals_dict = (mp_obj_t)&array_locals_dict, |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 517 | }; |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 518 | #endif |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 519 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 520 | #if MICROPY_PY_BUILTINS_BYTEARRAY |
Paul Sokolovsky | 4dcb605 | 2014-04-08 22:09:14 +0300 | [diff] [blame] | 521 | const mp_obj_type_t mp_type_bytearray = { |
| 522 | { &mp_type_type }, |
| 523 | .name = MP_QSTR_bytearray, |
| 524 | .print = array_print, |
| 525 | .make_new = bytearray_make_new, |
| 526 | .getiter = array_iterator_new, |
| 527 | .unary_op = array_unary_op, |
Paul Sokolovsky | 5f93033 | 2014-08-10 11:49:23 +0300 | [diff] [blame] | 528 | .binary_op = array_binary_op, |
Damien George | 729f7b4 | 2014-04-17 22:10:53 +0100 | [diff] [blame] | 529 | .subscr = array_subscr, |
Paul Sokolovsky | 4dcb605 | 2014-04-08 22:09:14 +0300 | [diff] [blame] | 530 | .buffer_p = { .get_buffer = array_get_buffer }, |
| 531 | .locals_dict = (mp_obj_t)&array_locals_dict, |
| 532 | }; |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 533 | #endif |
Paul Sokolovsky | 4dcb605 | 2014-04-08 22:09:14 +0300 | [diff] [blame] | 534 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 535 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
| 536 | const mp_obj_type_t mp_type_memoryview = { |
| 537 | { &mp_type_type }, |
| 538 | .name = MP_QSTR_memoryview, |
| 539 | .make_new = memoryview_make_new, |
| 540 | .getiter = array_iterator_new, |
| 541 | .unary_op = array_unary_op, |
| 542 | .binary_op = array_binary_op, |
| 543 | .subscr = array_subscr, |
| 544 | .buffer_p = { .get_buffer = array_get_buffer }, |
| 545 | }; |
| 546 | #endif |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 547 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 548 | /* unused |
Damien George | d182b98 | 2014-08-30 14:19:41 +0100 | [diff] [blame] | 549 | mp_uint_t mp_obj_array_len(mp_obj_t self_in) { |
Paul Sokolovsky | 3399668 | 2014-01-21 23:30:10 +0200 | [diff] [blame] | 550 | return ((mp_obj_array_t *)self_in)->len; |
| 551 | } |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 552 | */ |
Paul Sokolovsky | 3399668 | 2014-01-21 23:30:10 +0200 | [diff] [blame] | 553 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 554 | #if MICROPY_PY_BUILTINS_BYTEARRAY |
Damien George | 4abff75 | 2014-08-30 14:59:21 +0100 | [diff] [blame] | 555 | mp_obj_t mp_obj_new_bytearray(mp_uint_t n, void *items) { |
Paul Sokolovsky | 427905c | 2014-01-18 19:24:47 +0200 | [diff] [blame] | 556 | mp_obj_array_t *o = array_new(BYTEARRAY_TYPECODE, n); |
| 557 | memcpy(o->items, items, n); |
| 558 | return o; |
| 559 | } |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 560 | |
Paul Sokolovsky | 7f11c79 | 2014-01-29 00:21:41 +0200 | [diff] [blame] | 561 | // Create bytearray which references specified memory area |
Damien George | d182b98 | 2014-08-30 14:19:41 +0100 | [diff] [blame] | 562 | mp_obj_t mp_obj_new_bytearray_by_ref(mp_uint_t n, void *items) { |
Paul Sokolovsky | 7f11c79 | 2014-01-29 00:21:41 +0200 | [diff] [blame] | 563 | mp_obj_array_t *o = m_new_obj(mp_obj_array_t); |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 564 | o->base.type = &mp_type_bytearray; |
Paul Sokolovsky | 7f11c79 | 2014-01-29 00:21:41 +0200 | [diff] [blame] | 565 | o->typecode = BYTEARRAY_TYPECODE; |
| 566 | o->free = 0; |
| 567 | o->len = n; |
| 568 | o->items = items; |
| 569 | return o; |
| 570 | } |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 571 | #endif |
Paul Sokolovsky | 7f11c79 | 2014-01-29 00:21:41 +0200 | [diff] [blame] | 572 | |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 573 | /******************************************************************************/ |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 574 | // array iterator |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 575 | |
| 576 | typedef struct _mp_obj_array_it_t { |
| 577 | mp_obj_base_t base; |
| 578 | mp_obj_array_t *array; |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 579 | mp_uint_t offset; |
Damien George | 40f3c02 | 2014-07-03 13:25:24 +0100 | [diff] [blame] | 580 | mp_uint_t cur; |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 581 | } mp_obj_array_it_t; |
| 582 | |
Damien George | caac542 | 2014-03-25 14:18:18 +0000 | [diff] [blame] | 583 | STATIC mp_obj_t array_it_iternext(mp_obj_t self_in) { |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 584 | mp_obj_array_it_t *self = self_in; |
| 585 | if (self->cur < self->array->len) { |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 586 | return mp_binary_get_val_array(self->array->typecode & TYPECODE_MASK, self->array->items, self->offset + self->cur++); |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 587 | } else { |
Damien George | ea8d06c | 2014-04-17 23:19:36 +0100 | [diff] [blame] | 588 | return MP_OBJ_STOP_ITERATION; |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 589 | } |
| 590 | } |
| 591 | |
Paul Sokolovsky | d5df6cd | 2014-02-12 18:15:40 +0200 | [diff] [blame] | 592 | STATIC const mp_obj_type_t array_it_type = { |
Damien George | c596612 | 2014-02-15 16:10:44 +0000 | [diff] [blame] | 593 | { &mp_type_type }, |
Damien George | a71c83a | 2014-02-15 11:34:50 +0000 | [diff] [blame] | 594 | .name = MP_QSTR_iterator, |
Paul Sokolovsky | f7eaf60 | 2014-03-30 22:00:12 +0300 | [diff] [blame] | 595 | .getiter = mp_identity, |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 596 | .iternext = array_it_iternext, |
| 597 | }; |
| 598 | |
Damien George | caac542 | 2014-03-25 14:18:18 +0000 | [diff] [blame] | 599 | STATIC mp_obj_t array_iterator_new(mp_obj_t array_in) { |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 600 | mp_obj_array_t *array = array_in; |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 601 | mp_obj_array_it_t *o = m_new0(mp_obj_array_it_t, 1); |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 602 | o->base.type = &array_it_type; |
| 603 | o->array = array; |
Damien George | de3c806 | 2014-10-26 13:20:50 +0000 | [diff] [blame] | 604 | #if MICROPY_PY_BUILTINS_MEMORYVIEW |
| 605 | if (array->base.type == &mp_type_memoryview) { |
| 606 | o->offset = array->free; |
| 607 | } |
| 608 | #endif |
Paul Sokolovsky | 09ce059 | 2014-01-21 23:45:19 +0200 | [diff] [blame] | 609 | return o; |
| 610 | } |
Paul Sokolovsky | cb78f86 | 2014-06-27 20:39:09 +0300 | [diff] [blame] | 611 | |
Damien George | dd4f453 | 2014-10-23 13:34:35 +0100 | [diff] [blame] | 612 | #endif // MICROPY_PY_ARRAY || MICROPY_PY_BUILTINS_BYTEARRAY || MICROPY_PY_BUILTINS_MEMORYVIEW |