/*
 * This file is part of the MicroPython project, http://micropython.org/
 *
 * The MIT License (MIT)
 *
 * Copyright (c) 2019 Jim Mussared
 * Copyright (c) 2020 Damien P. George
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */

#include "py/runtime.h"
#include "py/mperrno.h"
#include "py/mphal.h"

#if MICROPY_PY_BLUETOOTH && MICROPY_BLUETOOTH_NIMBLE

#include "transport/uart/ble_hci_uart.h"
#include "host/ble_hs.h"

#include "extmod/modbluetooth_hci.h"
#include "extmod/nimble/modbluetooth_nimble.h"
#include "extmod/nimble/nimble/nimble_hci_uart.h"

extern void os_eventq_run_all(void);
extern void os_callout_process(void);

void mp_bluetooth_hci_poll(void) {
    if (mp_bluetooth_nimble_ble_state == MP_BLUETOOTH_NIMBLE_BLE_STATE_OFF) {
        return;
    }

    mp_bluetooth_nimble_hci_uart_process();
    os_callout_process();
    os_eventq_run_all();
}

void mp_bluetooth_nimble_port_preinit(void) {
    MP_STATE_PORT(bluetooth_nimble_memory) = NULL;
    ble_hci_uart_init();
}

void mp_bluetooth_nimble_port_postinit(void) {
}

void mp_bluetooth_nimble_port_deinit(void) {
    mp_bluetooth_hci_controller_deactivate();
}

void mp_bluetooth_nimble_port_start(void) {
    ble_hs_start();
}

#if defined(STM32WB)

#include "rfcore.h"

void mp_bluetooth_nimble_hci_uart_rx(hal_uart_rx_cb_t rx_cb, void *rx_arg) {
    // Protect in case it's called from ble_npl_sem_pend at thread-level
    MICROPY_PY_LWIP_ENTER
    rfcore_ble_check_msg(rx_cb, rx_arg);
    MICROPY_PY_LWIP_EXIT
}

#else

#include "uart.h"

void mp_bluetooth_nimble_hci_uart_rx(hal_uart_rx_cb_t rx_cb, void *rx_arg) {
    bool host_wake = mp_bluetooth_hci_controller_woken();

    while (uart_rx_any(&mp_bluetooth_hci_uart_obj)) {
        uint8_t data = uart_rx_char(&mp_bluetooth_hci_uart_obj);
        //printf("UART RX: %02x\n", data);
        rx_cb(rx_arg, data);
    }

    if (host_wake) {
        mp_bluetooth_hci_controller_sleep_maybe();
    }
}

#endif // defined(STM32WB)

void mp_bluetooth_nimble_hci_uart_tx_strn(const char *str, uint len) {
    mp_bluetooth_hci_uart_write((const uint8_t *)str, len);
}

#endif // MICROPY_PY_BLUETOOTH && MICROPY_BLUETOOTH_NIMBLE