2014-03-13 01:06:26 +00:00
|
|
|
#include <stdio.h>
|
|
|
|
#include <string.h>
|
|
|
|
|
2014-03-25 23:40:54 +00:00
|
|
|
#include "stm32f4xx_hal.h"
|
|
|
|
|
|
|
|
#include "nlr.h"
|
2014-03-13 01:06:26 +00:00
|
|
|
#include "misc.h"
|
|
|
|
#include "mpconfig.h"
|
|
|
|
#include "qstr.h"
|
|
|
|
#include "obj.h"
|
|
|
|
#include "usart.h"
|
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
struct _pyb_usart_obj_t {
|
|
|
|
mp_obj_base_t base;
|
|
|
|
pyb_usart_t usart_id;
|
|
|
|
bool is_enabled;
|
|
|
|
UART_HandleTypeDef handle;
|
|
|
|
};
|
2014-03-13 01:06:26 +00:00
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
pyb_usart_obj_t *pyb_usart_global_debug = NULL;
|
2014-03-13 01:06:26 +00:00
|
|
|
|
2014-04-14 01:45:58 +01:00
|
|
|
bool usart_init(pyb_usart_obj_t *usart_obj, uint32_t baudrate) {
|
2014-03-13 01:06:26 +00:00
|
|
|
USART_TypeDef *USARTx=NULL;
|
|
|
|
|
|
|
|
uint32_t GPIO_Pin=0;
|
|
|
|
uint8_t GPIO_AF_USARTx=0;
|
|
|
|
GPIO_TypeDef* GPIO_Port=NULL;
|
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
switch (usart_obj->usart_id) {
|
2014-04-14 01:45:58 +01:00
|
|
|
// USART1 is on PA9/PA10, PB6/PB7
|
2014-03-13 01:06:26 +00:00
|
|
|
case PYB_USART_1:
|
|
|
|
USARTx = USART1;
|
2014-04-14 01:45:58 +01:00
|
|
|
GPIO_AF_USARTx = GPIO_AF7_USART1;
|
2014-03-13 01:06:26 +00:00
|
|
|
|
2014-04-14 01:45:58 +01:00
|
|
|
#if defined(PYBV10)
|
|
|
|
GPIO_Port = GPIOB;
|
|
|
|
GPIO_Pin = GPIO_PIN_6 | GPIO_PIN_7;
|
|
|
|
#else
|
2014-03-13 01:06:26 +00:00
|
|
|
GPIO_Port = GPIOA;
|
|
|
|
GPIO_Pin = GPIO_PIN_9 | GPIO_PIN_10;
|
2014-04-14 01:45:58 +01:00
|
|
|
#endif
|
2014-03-13 01:06:26 +00:00
|
|
|
|
|
|
|
__USART1_CLK_ENABLE();
|
|
|
|
break;
|
2014-04-14 01:45:58 +01:00
|
|
|
|
|
|
|
#if !defined(PYBV10)
|
|
|
|
// USART2 is on PA2/PA3, PD5/PD6
|
2014-03-13 01:06:26 +00:00
|
|
|
case PYB_USART_2:
|
|
|
|
USARTx = USART2;
|
2014-04-14 01:45:58 +01:00
|
|
|
GPIO_AF_USARTx = GPIO_AF7_USART2;
|
2014-03-13 01:06:26 +00:00
|
|
|
|
|
|
|
GPIO_Port = GPIOD;
|
|
|
|
GPIO_Pin = GPIO_PIN_5 | GPIO_PIN_6;
|
|
|
|
|
|
|
|
__USART2_CLK_ENABLE();
|
|
|
|
break;
|
2014-04-14 01:45:58 +01:00
|
|
|
#endif
|
|
|
|
|
|
|
|
// USART3 is on PB10/PB11, PC10/PC11, PD8/PD9
|
2014-03-13 01:06:26 +00:00
|
|
|
case PYB_USART_3:
|
|
|
|
USARTx = USART3;
|
2014-04-14 01:45:58 +01:00
|
|
|
GPIO_AF_USARTx = GPIO_AF7_USART3;
|
2014-03-13 01:06:26 +00:00
|
|
|
|
2014-04-14 01:45:58 +01:00
|
|
|
#if defined(PYBV3) || defined(PYBV4) | defined(PYBV10)
|
2014-03-13 01:06:26 +00:00
|
|
|
GPIO_Port = GPIOB;
|
|
|
|
GPIO_Pin = GPIO_PIN_10 | GPIO_PIN_11;
|
|
|
|
#else
|
|
|
|
GPIO_Port = GPIOD;
|
|
|
|
GPIO_Pin = GPIO_PIN_8 | GPIO_PIN_9;
|
|
|
|
#endif
|
|
|
|
__USART3_CLK_ENABLE();
|
|
|
|
break;
|
2014-04-14 01:45:58 +01:00
|
|
|
|
|
|
|
// USART4 is on PA0/PA1, PC10/PC11
|
|
|
|
case PYB_USART_4:
|
|
|
|
USARTx = UART4;
|
|
|
|
GPIO_AF_USARTx = GPIO_AF8_UART4;
|
|
|
|
|
|
|
|
GPIO_Port = GPIOA;
|
|
|
|
GPIO_Pin = GPIO_PIN_0 | GPIO_PIN_1;
|
|
|
|
|
|
|
|
__UART4_CLK_ENABLE();
|
|
|
|
break;
|
|
|
|
|
|
|
|
// USART6 is on PC6/PC7
|
2014-03-13 01:06:26 +00:00
|
|
|
case PYB_USART_6:
|
|
|
|
USARTx = USART6;
|
2014-04-14 01:45:58 +01:00
|
|
|
GPIO_AF_USARTx = GPIO_AF8_USART6;
|
2014-03-13 01:06:26 +00:00
|
|
|
|
|
|
|
GPIO_Port = GPIOC;
|
|
|
|
GPIO_Pin = GPIO_PIN_6 | GPIO_PIN_7;
|
|
|
|
|
|
|
|
__USART6_CLK_ENABLE();
|
|
|
|
break;
|
2014-04-14 01:45:58 +01:00
|
|
|
|
|
|
|
default:
|
|
|
|
return false;
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
|
2014-03-25 23:40:54 +00:00
|
|
|
// Initialize USARTx
|
|
|
|
|
2014-03-13 01:06:26 +00:00
|
|
|
GPIO_InitTypeDef GPIO_InitStructure;
|
|
|
|
GPIO_InitStructure.Pin = GPIO_Pin;
|
|
|
|
GPIO_InitStructure.Speed = GPIO_SPEED_HIGH;
|
|
|
|
GPIO_InitStructure.Mode = GPIO_MODE_AF_PP;
|
|
|
|
GPIO_InitStructure.Pull = GPIO_PULLUP;
|
|
|
|
GPIO_InitStructure.Alternate = GPIO_AF_USARTx;
|
|
|
|
HAL_GPIO_Init(GPIO_Port, &GPIO_InitStructure);
|
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
UART_HandleTypeDef *uh = &usart_obj->handle;
|
|
|
|
memset(uh, 0, sizeof(*uh));
|
|
|
|
uh->Instance = USARTx;
|
|
|
|
uh->Init.BaudRate = baudrate;
|
|
|
|
uh->Init.WordLength = USART_WORDLENGTH_8B;
|
|
|
|
uh->Init.StopBits = USART_STOPBITS_1;
|
|
|
|
uh->Init.Parity = USART_PARITY_NONE;
|
|
|
|
uh->Init.Mode = USART_MODE_TX_RX;
|
|
|
|
uh->Init.HwFlowCtl = UART_HWCONTROL_NONE;
|
|
|
|
uh->Init.OverSampling = UART_OVERSAMPLING_16;
|
|
|
|
HAL_UART_Init(uh);
|
2014-04-14 01:45:58 +01:00
|
|
|
|
|
|
|
return true;
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
bool usart_rx_any(pyb_usart_obj_t *usart_obj) {
|
|
|
|
return __HAL_UART_GET_FLAG(&usart_obj->handle, USART_FLAG_RXNE);
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
int usart_rx_char(pyb_usart_obj_t *usart_obj) {
|
2014-03-13 01:06:26 +00:00
|
|
|
uint8_t ch;
|
2014-03-16 07:22:22 +00:00
|
|
|
if (HAL_UART_Receive(&usart_obj->handle, &ch, 1, 0) != HAL_OK) {
|
2014-03-13 01:06:26 +00:00
|
|
|
ch = 0;
|
|
|
|
}
|
|
|
|
return ch;
|
|
|
|
}
|
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
void usart_tx_char(pyb_usart_obj_t *usart_obj, int c) {
|
2014-03-13 01:06:26 +00:00
|
|
|
uint8_t ch = c;
|
2014-03-16 07:22:22 +00:00
|
|
|
HAL_UART_Transmit(&usart_obj->handle, &ch, 1, 100000);
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
void usart_tx_str(pyb_usart_obj_t *usart_obj, const char *str) {
|
2014-03-13 01:06:26 +00:00
|
|
|
for (; *str; str++) {
|
2014-03-16 07:22:22 +00:00
|
|
|
usart_tx_char(usart_obj, *str);
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
void usart_tx_strn(pyb_usart_obj_t *usart_obj, const char *str, uint len) {
|
2014-03-15 14:33:09 +00:00
|
|
|
for (; len > 0; str++, len--) {
|
2014-03-16 07:22:22 +00:00
|
|
|
usart_tx_char(usart_obj, *str);
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2014-03-16 07:22:22 +00:00
|
|
|
void usart_tx_strn_cooked(pyb_usart_obj_t *usart_obj, const char *str, uint len) {
|
2014-03-13 01:06:26 +00:00
|
|
|
for (const char *top = str + len; str < top; str++) {
|
|
|
|
if (*str == '\n') {
|
2014-03-16 07:22:22 +00:00
|
|
|
usart_tx_char(usart_obj, '\r');
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
2014-03-16 07:22:22 +00:00
|
|
|
usart_tx_char(usart_obj, *str);
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/******************************************************************************/
|
|
|
|
/* Micro Python bindings */
|
|
|
|
|
2014-03-25 23:40:54 +00:00
|
|
|
STATIC void usart_obj_print(void (*print)(void *env, const char *fmt, ...), void *env, mp_obj_t self_in, mp_print_kind_t kind) {
|
|
|
|
pyb_usart_obj_t *self = self_in;
|
2014-04-18 22:38:09 +01:00
|
|
|
print(env, "<USART %lu>", self->usart_id);
|
2014-03-25 23:40:54 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
STATIC mp_obj_t usart_obj_make_new(mp_obj_t type_in, uint n_args, uint n_kw, const mp_obj_t *args) {
|
|
|
|
// check arguments
|
|
|
|
if (!(n_args == 2 && n_kw == 0)) {
|
2014-04-18 22:38:09 +01:00
|
|
|
nlr_raise(mp_obj_new_exception_msg(&mp_type_ValueError, "USART accepts 2 arguments"));
|
2014-03-25 23:40:54 +00:00
|
|
|
}
|
|
|
|
|
2014-04-14 01:45:58 +01:00
|
|
|
// create object
|
2014-03-25 23:40:54 +00:00
|
|
|
pyb_usart_obj_t *o = m_new_obj(pyb_usart_obj_t);
|
|
|
|
o->base.type = &pyb_usart_type;
|
|
|
|
|
2014-04-14 01:45:58 +01:00
|
|
|
// work out port
|
|
|
|
o->usart_id = 0;
|
|
|
|
if (MP_OBJ_IS_STR(args[0])) {
|
|
|
|
const char *port = mp_obj_str_get_str(args[0]);
|
2014-04-15 11:52:47 +01:00
|
|
|
if (0) {
|
|
|
|
#if defined(PYBV10)
|
|
|
|
} else if (strcmp(port, "XA") == 0) {
|
2014-04-14 01:45:58 +01:00
|
|
|
o->usart_id = PYB_USART_XA;
|
|
|
|
} else if (strcmp(port, "XB") == 0) {
|
|
|
|
o->usart_id = PYB_USART_XB;
|
|
|
|
} else if (strcmp(port, "YA") == 0) {
|
|
|
|
o->usart_id = PYB_USART_YA;
|
|
|
|
} else if (strcmp(port, "YB") == 0) {
|
|
|
|
o->usart_id = PYB_USART_YB;
|
2014-04-15 11:52:47 +01:00
|
|
|
#endif
|
2014-04-14 01:45:58 +01:00
|
|
|
} else {
|
2014-04-18 22:38:09 +01:00
|
|
|
nlr_raise(mp_obj_new_exception_msg_varg(&mp_type_ValueError, "USART port %s does not exist", port));
|
2014-04-14 01:45:58 +01:00
|
|
|
}
|
2014-04-15 11:52:47 +01:00
|
|
|
} else {
|
2014-04-14 01:45:58 +01:00
|
|
|
o->usart_id = mp_obj_get_int(args[0]);
|
|
|
|
}
|
|
|
|
|
|
|
|
// init USART (if it fails, it's because the port doesn't exist)
|
|
|
|
if (!usart_init(o, mp_obj_get_int(args[1]))) {
|
2014-04-18 22:38:09 +01:00
|
|
|
nlr_raise(mp_obj_new_exception_msg_varg(&mp_type_ValueError, "USART port %d does not exist", o->usart_id));
|
2014-04-14 01:45:58 +01:00
|
|
|
}
|
|
|
|
|
|
|
|
o->is_enabled = true;
|
2014-03-25 23:40:54 +00:00
|
|
|
|
|
|
|
return o;
|
|
|
|
}
|
|
|
|
|
|
|
|
STATIC mp_obj_t usart_obj_status(mp_obj_t self_in) {
|
2014-03-13 01:06:26 +00:00
|
|
|
pyb_usart_obj_t *self = self_in;
|
2014-03-16 07:22:22 +00:00
|
|
|
if (usart_rx_any(self)) {
|
2014-03-13 01:06:26 +00:00
|
|
|
return mp_const_true;
|
|
|
|
} else {
|
|
|
|
return mp_const_false;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2014-03-25 23:40:54 +00:00
|
|
|
STATIC mp_obj_t usart_obj_rx_char(mp_obj_t self_in) {
|
2014-03-13 01:06:26 +00:00
|
|
|
mp_obj_t ret = mp_const_none;
|
|
|
|
pyb_usart_obj_t *self = self_in;
|
|
|
|
|
|
|
|
if (self->is_enabled) {
|
2014-03-16 07:22:22 +00:00
|
|
|
ret = mp_obj_new_int(usart_rx_char(self));
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
2014-03-25 23:40:54 +00:00
|
|
|
STATIC mp_obj_t usart_obj_tx_char(mp_obj_t self_in, mp_obj_t c) {
|
2014-03-13 01:06:26 +00:00
|
|
|
pyb_usart_obj_t *self = self_in;
|
|
|
|
uint len;
|
|
|
|
const char *str = mp_obj_str_get_data(c, &len);
|
|
|
|
if (len == 1 && self->is_enabled) {
|
2014-03-16 07:22:22 +00:00
|
|
|
usart_tx_char(self, str[0]);
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
return mp_const_none;
|
|
|
|
}
|
|
|
|
|
2014-03-25 23:40:54 +00:00
|
|
|
STATIC mp_obj_t usart_obj_tx_str(mp_obj_t self_in, mp_obj_t s) {
|
2014-03-13 01:06:26 +00:00
|
|
|
pyb_usart_obj_t *self = self_in;
|
|
|
|
if (self->is_enabled) {
|
|
|
|
if (MP_OBJ_IS_STR(s)) {
|
|
|
|
uint len;
|
|
|
|
const char *data = mp_obj_str_get_data(s, &len);
|
2014-03-16 07:22:22 +00:00
|
|
|
usart_tx_strn(self, data, len);
|
2014-03-13 01:06:26 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
return mp_const_none;
|
|
|
|
}
|
|
|
|
|
2014-03-25 23:40:54 +00:00
|
|
|
STATIC MP_DEFINE_CONST_FUN_OBJ_1(usart_obj_status_obj, usart_obj_status);
|
|
|
|
STATIC MP_DEFINE_CONST_FUN_OBJ_1(usart_obj_rx_char_obj, usart_obj_rx_char);
|
|
|
|
STATIC MP_DEFINE_CONST_FUN_OBJ_2(usart_obj_tx_char_obj, usart_obj_tx_char);
|
|
|
|
STATIC MP_DEFINE_CONST_FUN_OBJ_2(usart_obj_tx_str_obj, usart_obj_tx_str);
|
2014-03-13 01:06:26 +00:00
|
|
|
|
2014-03-26 21:47:19 +00:00
|
|
|
STATIC const mp_map_elem_t usart_locals_dict_table[] = {
|
|
|
|
{ MP_OBJ_NEW_QSTR(MP_QSTR_status), (mp_obj_t)&usart_obj_status_obj },
|
|
|
|
{ MP_OBJ_NEW_QSTR(MP_QSTR_recv_chr), (mp_obj_t)&usart_obj_rx_char_obj },
|
|
|
|
{ MP_OBJ_NEW_QSTR(MP_QSTR_send_chr), (mp_obj_t)&usart_obj_tx_char_obj },
|
|
|
|
{ MP_OBJ_NEW_QSTR(MP_QSTR_send), (mp_obj_t)&usart_obj_tx_str_obj },
|
2014-03-13 01:06:26 +00:00
|
|
|
};
|
|
|
|
|
2014-03-26 21:47:19 +00:00
|
|
|
STATIC MP_DEFINE_CONST_DICT(usart_locals_dict, usart_locals_dict_table);
|
|
|
|
|
2014-03-25 23:40:54 +00:00
|
|
|
const mp_obj_type_t pyb_usart_type = {
|
2014-03-13 01:06:26 +00:00
|
|
|
{ &mp_type_type },
|
2014-04-18 22:38:09 +01:00
|
|
|
.name = MP_QSTR_USART,
|
2014-03-13 01:06:26 +00:00
|
|
|
.print = usart_obj_print,
|
2014-03-25 23:40:54 +00:00
|
|
|
.make_new = usart_obj_make_new,
|
2014-03-26 21:47:19 +00:00
|
|
|
.locals_dict = (mp_obj_t)&usart_locals_dict,
|
2014-03-13 01:06:26 +00:00
|
|
|
};
|