|
|
@@ -36,6 +36,13 @@
|
|
|
|
|
|
STATIC const mp_obj_type_t machine_hard_i2c_type;
|
|
|
|
|
|
+STATIC const mp_arg_t machine_i2c_mem_allowed_args[] = {
|
|
|
+ { MP_QSTR_addr, MP_ARG_REQUIRED | MP_ARG_INT, {.u_int = 0} },
|
|
|
+ { MP_QSTR_memaddr, MP_ARG_REQUIRED | MP_ARG_INT, {.u_int = 0} },
|
|
|
+ { MP_QSTR_arg, MP_ARG_REQUIRED | MP_ARG_OBJ, {.u_obj = MP_OBJ_NULL} },
|
|
|
+ { MP_QSTR_addrsize, MP_ARG_KW_ONLY | MP_ARG_INT, {.u_int = 8} },
|
|
|
+};
|
|
|
+
|
|
|
typedef struct _machine_hard_i2c_obj_t {
|
|
|
mp_obj_base_t base;
|
|
|
struct rt_i2c_bus_device *i2c_bus;
|
|
|
@@ -53,12 +60,66 @@ STATIC void machine_hard_i2c_print(const mp_print_t *print, mp_obj_t self_in, mp
|
|
|
return;
|
|
|
}
|
|
|
|
|
|
-int machine_hard_i2c_readfrom(mp_obj_base_t *self_in, uint16_t addr, uint8_t *dest, size_t len, bool stop) {
|
|
|
+STATIC int write_mem(mp_obj_t self_in, uint16_t addr, uint32_t memaddr, uint8_t addrsize, const uint8_t *buf, size_t len) {
|
|
|
+ machine_hard_i2c_obj_t *self = (machine_hard_i2c_obj_t*)MP_OBJ_TO_PTR(self_in);
|
|
|
+
|
|
|
+ // Create buffer with memory address
|
|
|
+ size_t memaddr_len = 0;
|
|
|
+ uint8_t memaddr_buf[4];
|
|
|
+ for (int16_t i = addrsize - 8; i >= 0; i -= 8) {
|
|
|
+ memaddr_buf[memaddr_len++] = memaddr >> i;
|
|
|
+ }
|
|
|
+
|
|
|
+ struct rt_i2c_msg msg[2];
|
|
|
+
|
|
|
+ msg[0].buf = memaddr_buf;
|
|
|
+ msg[0].len = (addrsize + 7)/8;
|
|
|
+ msg[0].flags = RT_I2C_WR;
|
|
|
+ msg[0].addr = addr;
|
|
|
+
|
|
|
+ msg[1].buf = (rt_uint8_t*)buf;
|
|
|
+ msg[1].len = len;
|
|
|
+ msg[1].flags = RT_I2C_WR;
|
|
|
+ msg[1].addr = addr;
|
|
|
+
|
|
|
+ if (rt_i2c_transfer(self->i2c_bus, msg, 2) != 2)
|
|
|
+ return -MP_EIO;
|
|
|
+
|
|
|
+ return len;
|
|
|
+}
|
|
|
+
|
|
|
+STATIC int read_mem(mp_obj_t self_in, uint16_t addr, uint32_t memaddr, uint8_t addrsize, uint8_t *buf, size_t len) {
|
|
|
+ machine_hard_i2c_obj_t *self = (machine_hard_i2c_obj_t*)MP_OBJ_TO_PTR(self_in);
|
|
|
+ uint8_t memaddr_buf[4];
|
|
|
+ size_t memaddr_len = 0;
|
|
|
+ for (int16_t i = addrsize - 8; i >= 0; i -= 8) {
|
|
|
+ memaddr_buf[memaddr_len++] = memaddr >> i;
|
|
|
+ }
|
|
|
+
|
|
|
+ struct rt_i2c_msg msg[2];
|
|
|
+
|
|
|
+ msg[0].buf = memaddr_buf;
|
|
|
+ msg[0].len = (addrsize + 7)/8;
|
|
|
+ msg[0].flags = RT_I2C_WR;
|
|
|
+ msg[0].addr = addr;
|
|
|
+
|
|
|
+ msg[1].buf = buf;
|
|
|
+ msg[1].len = len;
|
|
|
+ msg[1].flags = RT_I2C_RD;
|
|
|
+ msg[1].addr = addr;
|
|
|
+
|
|
|
+ if (rt_i2c_transfer(self->i2c_bus, msg, 2) != 2)
|
|
|
+ return -MP_EIO;
|
|
|
+
|
|
|
+ return len;
|
|
|
+}
|
|
|
+
|
|
|
+STATIC int mp_machine_i2c_readfrom(mp_obj_base_t *self_in, uint16_t addr, uint8_t *dest, size_t len, bool stop) {
|
|
|
machine_hard_i2c_obj_t *self = MP_OBJ_TO_PTR(self_in);
|
|
|
return rt_i2c_master_recv(self->i2c_bus, addr, 0, dest, len);
|
|
|
}
|
|
|
|
|
|
-int machine_hard_i2c_writeto(mp_obj_base_t *self_in, uint16_t addr, const uint8_t *src, size_t len, bool stop) {
|
|
|
+STATIC int mp_machine_i2c_writeto(mp_obj_base_t *self_in, uint16_t addr, const uint8_t *src, size_t len, bool stop) {
|
|
|
uint8_t buf[1] = {0};
|
|
|
machine_hard_i2c_obj_t *self = MP_OBJ_TO_PTR(self_in);
|
|
|
if (len == 0){
|
|
|
@@ -73,6 +134,188 @@ int machine_hard_i2c_writeto(mp_obj_base_t *self_in, uint16_t addr, const uint8_
|
|
|
return rt_i2c_master_send(self->i2c_bus, addr, 0, src, len);
|
|
|
}
|
|
|
|
|
|
+STATIC mp_obj_t machine_i2c_scan(mp_obj_t self_in) {
|
|
|
+ mp_obj_base_t *self = MP_OBJ_TO_PTR(self_in);
|
|
|
+ mp_obj_t list = mp_obj_new_list(0, NULL);
|
|
|
+ // 7-bit addresses 0b0000xxx and 0b1111xxx are reserved
|
|
|
+ for (int addr = 0x08; addr < 0x78; ++addr) {
|
|
|
+ int ret = mp_machine_i2c_writeto(self, addr, NULL, 0, true);
|
|
|
+ if (ret == 0) {
|
|
|
+ mp_obj_list_append(list, MP_OBJ_NEW_SMALL_INT(addr));
|
|
|
+ }
|
|
|
+ }
|
|
|
+ return list;
|
|
|
+}
|
|
|
+STATIC MP_DEFINE_CONST_FUN_OBJ_1(machine_i2c_scan_obj, machine_i2c_scan);
|
|
|
+
|
|
|
+STATIC mp_obj_t machine_i2c_readfrom(size_t n_args, const mp_obj_t *args) {
|
|
|
+ mp_obj_base_t *self = (mp_obj_base_t*)MP_OBJ_TO_PTR(args[0]);
|
|
|
+ mp_int_t addr = mp_obj_get_int(args[1]);
|
|
|
+ vstr_t vstr;
|
|
|
+ vstr_init_len(&vstr, mp_obj_get_int(args[2]));
|
|
|
+ bool stop = (n_args == 3) ? true : mp_obj_is_true(args[3]);
|
|
|
+ int ret = mp_machine_i2c_readfrom(self, addr, (uint8_t*)vstr.buf, vstr.len, stop);
|
|
|
+ if (ret < 0) {
|
|
|
+ mp_raise_OSError(-ret);
|
|
|
+ }
|
|
|
+ return mp_obj_new_str_from_vstr(&mp_type_bytes, &vstr);
|
|
|
+}
|
|
|
+STATIC MP_DEFINE_CONST_FUN_OBJ_VAR_BETWEEN(machine_i2c_readfrom_obj, 3, 4, machine_i2c_readfrom);
|
|
|
+
|
|
|
+STATIC mp_obj_t machine_i2c_readfrom_into(size_t n_args, const mp_obj_t *args) {
|
|
|
+ mp_obj_base_t *self = (mp_obj_base_t*)MP_OBJ_TO_PTR(args[0]);
|
|
|
+ mp_int_t addr = mp_obj_get_int(args[1]);
|
|
|
+ mp_buffer_info_t bufinfo;
|
|
|
+ mp_get_buffer_raise(args[2], &bufinfo, MP_BUFFER_WRITE);
|
|
|
+ bool stop = (n_args == 3) ? true : mp_obj_is_true(args[3]);
|
|
|
+ int ret = mp_machine_i2c_readfrom(self, addr, bufinfo.buf, bufinfo.len, stop);
|
|
|
+ if (ret < 0) {
|
|
|
+ mp_raise_OSError(-ret);
|
|
|
+ }
|
|
|
+ return mp_const_none;
|
|
|
+}
|
|
|
+STATIC MP_DEFINE_CONST_FUN_OBJ_VAR_BETWEEN(machine_i2c_readfrom_into_obj, 3, 4, machine_i2c_readfrom_into);
|
|
|
+
|
|
|
+STATIC mp_obj_t machine_i2c_writeto(size_t n_args, const mp_obj_t *args) {
|
|
|
+ mp_obj_base_t *self = (mp_obj_base_t*)MP_OBJ_TO_PTR(args[0]);
|
|
|
+ mp_int_t addr = mp_obj_get_int(args[1]);
|
|
|
+ mp_buffer_info_t bufinfo;
|
|
|
+ mp_get_buffer_raise(args[2], &bufinfo, MP_BUFFER_READ);
|
|
|
+ bool stop = (n_args == 3) ? true : mp_obj_is_true(args[3]);
|
|
|
+ int ret = mp_machine_i2c_writeto(self, addr, bufinfo.buf, bufinfo.len, stop);
|
|
|
+ if (ret < 0) {
|
|
|
+ mp_raise_OSError(-ret);
|
|
|
+ }
|
|
|
+ // return number of acks received
|
|
|
+ return MP_OBJ_NEW_SMALL_INT(ret);
|
|
|
+}
|
|
|
+STATIC MP_DEFINE_CONST_FUN_OBJ_VAR_BETWEEN(machine_i2c_writeto_obj, 3, 4, machine_i2c_writeto);
|
|
|
+
|
|
|
+STATIC mp_obj_t machine_i2c_writevto(size_t n_args, const mp_obj_t *args) {
|
|
|
+ mp_obj_base_t *self = (mp_obj_base_t*)MP_OBJ_TO_PTR(args[0]);
|
|
|
+ mp_int_t addr = mp_obj_get_int(args[1]);
|
|
|
+
|
|
|
+ // Get the list of data buffer(s) to write
|
|
|
+ size_t nitems;
|
|
|
+ const mp_obj_t *items;
|
|
|
+ mp_obj_get_array(args[2], &nitems, (mp_obj_t**)&items);
|
|
|
+
|
|
|
+ // Get the stop argument
|
|
|
+ bool stop = (n_args == 3) ? true : mp_obj_is_true(args[3]);
|
|
|
+
|
|
|
+ // Extract all buffer data, skipping zero-length buffers
|
|
|
+ size_t alloc = nitems == 0 ? 1 : nitems;
|
|
|
+ size_t nbufs = 0;
|
|
|
+ struct rt_i2c_msg *bufs = mp_local_alloc(alloc * sizeof(struct rt_i2c_msg));
|
|
|
+ for (; nitems--; ++items) {
|
|
|
+ mp_buffer_info_t bufinfo;
|
|
|
+ mp_get_buffer_raise(*items, &bufinfo, MP_BUFFER_READ);
|
|
|
+ if (bufinfo.len > 0) {
|
|
|
+ bufs[nbufs].addr = addr;
|
|
|
+ bufs[nbufs].flags = RT_I2C_WR;
|
|
|
+ bufs[nbufs].len = bufinfo.len;
|
|
|
+ bufs[nbufs++].buf = bufinfo.buf;
|
|
|
+ }
|
|
|
+ }
|
|
|
+
|
|
|
+ // Make sure there is at least one buffer, empty if needed
|
|
|
+ if (nbufs == 0) {
|
|
|
+ bufs[0].len = 0;
|
|
|
+ bufs[0].buf = NULL;
|
|
|
+ nbufs = 1;
|
|
|
+ }
|
|
|
+
|
|
|
+ // Do the I2C transfer
|
|
|
+ machine_hard_i2c_obj_t *i2c_p = (machine_hard_i2c_obj_t*)self;
|
|
|
+ int ret = rt_i2c_transfer(i2c_p->i2c_bus, bufs, nbufs);
|
|
|
+ mp_local_free(bufs);
|
|
|
+
|
|
|
+ if (ret < 0) {
|
|
|
+ mp_raise_OSError(-ret);
|
|
|
+ }
|
|
|
+
|
|
|
+ // Return number of acks received
|
|
|
+ return MP_OBJ_NEW_SMALL_INT(ret);
|
|
|
+}
|
|
|
+STATIC MP_DEFINE_CONST_FUN_OBJ_VAR_BETWEEN(machine_i2c_writevto_obj, 3, 4, machine_i2c_writevto);
|
|
|
+
|
|
|
+STATIC mp_obj_t machine_i2c_readfrom_mem(size_t n_args, const mp_obj_t *pos_args, mp_map_t *kw_args) {
|
|
|
+ enum { ARG_addr, ARG_memaddr, ARG_n, ARG_addrsize };
|
|
|
+ mp_arg_val_t args[MP_ARRAY_SIZE(machine_i2c_mem_allowed_args)];
|
|
|
+ mp_arg_parse_all(n_args - 1, pos_args + 1, kw_args,
|
|
|
+ MP_ARRAY_SIZE(machine_i2c_mem_allowed_args), machine_i2c_mem_allowed_args, args);
|
|
|
+
|
|
|
+ // create the buffer to store data into
|
|
|
+ vstr_t vstr;
|
|
|
+ vstr_init_len(&vstr, mp_obj_get_int(args[ARG_n].u_obj));
|
|
|
+
|
|
|
+ // do the transfer
|
|
|
+ int ret = read_mem(pos_args[0], args[ARG_addr].u_int, args[ARG_memaddr].u_int,
|
|
|
+ args[ARG_addrsize].u_int, (uint8_t*)vstr.buf, vstr.len);
|
|
|
+ if (ret < 0) {
|
|
|
+ mp_raise_OSError(-ret);
|
|
|
+ }
|
|
|
+
|
|
|
+ return mp_obj_new_str_from_vstr(&mp_type_bytes, &vstr);
|
|
|
+}
|
|
|
+STATIC MP_DEFINE_CONST_FUN_OBJ_KW(machine_i2c_readfrom_mem_obj, 1, machine_i2c_readfrom_mem);
|
|
|
+
|
|
|
+STATIC mp_obj_t machine_i2c_readfrom_mem_into(size_t n_args, const mp_obj_t *pos_args, mp_map_t *kw_args) {
|
|
|
+ enum { ARG_addr, ARG_memaddr, ARG_buf, ARG_addrsize };
|
|
|
+ mp_arg_val_t args[MP_ARRAY_SIZE(machine_i2c_mem_allowed_args)];
|
|
|
+ mp_arg_parse_all(n_args - 1, pos_args + 1, kw_args,
|
|
|
+ MP_ARRAY_SIZE(machine_i2c_mem_allowed_args), machine_i2c_mem_allowed_args, args);
|
|
|
+
|
|
|
+ // get the buffer to store data into
|
|
|
+ mp_buffer_info_t bufinfo;
|
|
|
+ mp_get_buffer_raise(args[ARG_buf].u_obj, &bufinfo, MP_BUFFER_WRITE);
|
|
|
+
|
|
|
+ // do the transfer
|
|
|
+ int ret = read_mem(pos_args[0], args[ARG_addr].u_int, args[ARG_memaddr].u_int,
|
|
|
+ args[ARG_addrsize].u_int, bufinfo.buf, bufinfo.len);
|
|
|
+ if (ret < 0) {
|
|
|
+ mp_raise_OSError(-ret);
|
|
|
+ }
|
|
|
+ return mp_const_none;
|
|
|
+}
|
|
|
+STATIC MP_DEFINE_CONST_FUN_OBJ_KW(machine_i2c_readfrom_mem_into_obj, 1, machine_i2c_readfrom_mem_into);
|
|
|
+
|
|
|
+STATIC mp_obj_t machine_i2c_writeto_mem(size_t n_args, const mp_obj_t *pos_args, mp_map_t *kw_args) {
|
|
|
+ enum { ARG_addr, ARG_memaddr, ARG_buf, ARG_addrsize };
|
|
|
+ mp_arg_val_t args[MP_ARRAY_SIZE(machine_i2c_mem_allowed_args)];
|
|
|
+ mp_arg_parse_all(n_args - 1, pos_args + 1, kw_args,
|
|
|
+ MP_ARRAY_SIZE(machine_i2c_mem_allowed_args), machine_i2c_mem_allowed_args, args);
|
|
|
+
|
|
|
+ // get the buffer to write the data from
|
|
|
+ mp_buffer_info_t bufinfo;
|
|
|
+ mp_get_buffer_raise(args[ARG_buf].u_obj, &bufinfo, MP_BUFFER_READ);
|
|
|
+
|
|
|
+ // do the transfer
|
|
|
+ int ret = write_mem(pos_args[0], args[ARG_addr].u_int, args[ARG_memaddr].u_int,
|
|
|
+ args[ARG_addrsize].u_int, bufinfo.buf, bufinfo.len);
|
|
|
+ if (ret < 0) {
|
|
|
+ mp_raise_OSError(-ret);
|
|
|
+ }
|
|
|
+
|
|
|
+ return mp_const_none;
|
|
|
+}
|
|
|
+STATIC MP_DEFINE_CONST_FUN_OBJ_KW(machine_i2c_writeto_mem_obj, 1, machine_i2c_writeto_mem);
|
|
|
+
|
|
|
+STATIC const mp_rom_map_elem_t machine_i2c_locals_dict_table[] = {
|
|
|
+ { MP_ROM_QSTR(MP_QSTR_scan), MP_ROM_PTR(&machine_i2c_scan_obj) },
|
|
|
+
|
|
|
+ // standard bus operations
|
|
|
+ { MP_ROM_QSTR(MP_QSTR_readfrom), MP_ROM_PTR(&machine_i2c_readfrom_obj) },
|
|
|
+ { MP_ROM_QSTR(MP_QSTR_readfrom_into), MP_ROM_PTR(&machine_i2c_readfrom_into_obj) },
|
|
|
+ { MP_ROM_QSTR(MP_QSTR_writeto), MP_ROM_PTR(&machine_i2c_writeto_obj) },
|
|
|
+ { MP_ROM_QSTR(MP_QSTR_writevto), MP_ROM_PTR(&machine_i2c_writevto_obj) },
|
|
|
+
|
|
|
+ // memory operations
|
|
|
+ { MP_ROM_QSTR(MP_QSTR_readfrom_mem), MP_ROM_PTR(&machine_i2c_readfrom_mem_obj) },
|
|
|
+ { MP_ROM_QSTR(MP_QSTR_readfrom_mem_into), MP_ROM_PTR(&machine_i2c_readfrom_mem_into_obj) },
|
|
|
+ { MP_ROM_QSTR(MP_QSTR_writeto_mem), MP_ROM_PTR(&machine_i2c_writeto_mem_obj) },
|
|
|
+};
|
|
|
+
|
|
|
/******************************************************************************/
|
|
|
/* MicroPython bindings for machine API */
|
|
|
|
|
|
@@ -94,6 +337,8 @@ mp_obj_t machine_hard_i2c_make_new(const mp_obj_type_t *type, size_t n_args, siz
|
|
|
return (mp_obj_t) self;
|
|
|
}
|
|
|
|
|
|
+MP_DEFINE_CONST_DICT(mp_machine_hard_i2c_locals_dict, machine_i2c_locals_dict_table);
|
|
|
+
|
|
|
STATIC const mp_machine_i2c_p_t machine_hard_i2c_p = {
|
|
|
.start = NULL,
|
|
|
.stop = NULL,
|
|
|
@@ -109,7 +354,7 @@ STATIC const mp_obj_type_t machine_hard_i2c_type = {
|
|
|
.print = machine_hard_i2c_print,
|
|
|
.make_new = machine_hard_i2c_make_new,
|
|
|
.protocol = &machine_hard_i2c_p,
|
|
|
- .locals_dict = (mp_obj_dict_t*)&mp_machine_soft_i2c_locals_dict,
|
|
|
+ .locals_dict = (mp_obj_dict_t*)&mp_machine_hard_i2c_locals_dict,
|
|
|
};
|
|
|
|
|
|
#endif // MICROPYTHON_USING_MACHINE_I2C
|