#if F_CPU >= 20000000
#include "usb_dev.h"
#include "usb_seremu.h"
#include "core_pins.h"
#ifdef SEREMU_INTERFACE
volatile uint8_t usb_seremu_transmit_flush_timer=0;
static usb_packet_t *rx_packet=NULL;
static usb_packet_t *tx_packet=NULL;
static volatile uint8_t tx_noautoflush=0;
#define TRANSMIT_FLUSH_TIMEOUT 5
int usb_seremu_getchar(void)
{
unsigned int i;
int c;
while (1) {
if (!usb_configuration) return -1;
if (!rx_packet) rx_packet = usb_rx(SEREMU_RX_ENDPOINT);
if (!rx_packet) return -1;
i = rx_packet->index;
c = rx_packet->buf[i++];
if (c) {
if (i >= rx_packet->len) {
usb_free(rx_packet);
rx_packet = NULL;
} else {
rx_packet->index = i;
}
return c;
}
usb_free(rx_packet);
rx_packet = NULL;
}
}
int usb_seremu_peekchar(void)
{
int c;
while (1) {
if (!usb_configuration) return -1;
if (!rx_packet) rx_packet = usb_rx(SEREMU_RX_ENDPOINT);
if (!rx_packet) return -1;
c = rx_packet->buf[rx_packet->index];
if (c) return c;
usb_free(rx_packet);
rx_packet = NULL;
}
}
int usb_seremu_available(void)
{
int i, len, count;
if (!rx_packet) {
if (usb_configuration) rx_packet = usb_rx(SEREMU_RX_ENDPOINT);
if (!rx_packet) return 0;
}
len = rx_packet->len;
i = rx_packet->index;
count = 0;
for (i = rx_packet->index; i < len; i++) {
if (rx_packet->buf[i] == 0) break;
count++;
}
if (count == 0) {
usb_free(rx_packet);
rx_packet = NULL;
}
return count;
}
void usb_seremu_flush_input(void)
{
usb_packet_t *rx;
if (!usb_configuration) return;
if (rx_packet) {
usb_free(rx_packet);
rx_packet = NULL;
}
while (1) {
rx = usb_rx(SEREMU_RX_ENDPOINT);
if (!rx) break;
usb_free(rx);
}
}
#define TX_PACKET_LIMIT 6
#define TX_TIMEOUT_MSEC 30
#if F_CPU == 240000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 1600)
#elif F_CPU == 216000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 1440)
#elif F_CPU == 192000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 1280)
#elif F_CPU == 180000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 1200)
#elif F_CPU == 168000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 1100)
#elif F_CPU == 144000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 932)
#elif F_CPU == 120000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 764)
#elif F_CPU == 96000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 596)
#elif F_CPU == 72000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 512)
#elif F_CPU == 48000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 428)
#elif F_CPU == 24000000
#define TX_TIMEOUT (TX_TIMEOUT_MSEC * 262)
#endif
static uint8_t transmit_previous_timeout=0;
int usb_seremu_putchar(uint8_t c)
{
return usb_seremu_write(&c, 1);
}
int usb_seremu_write(const void *buffer, uint32_t size)
{
#if 1
uint32_t len;
uint32_t wait_count;
const uint8_t *src = (const uint8_t *)buffer;
uint8_t *dest;
tx_noautoflush = 1;
while (size > 0) {
if (!tx_packet) {
wait_count = 0;
while (1) {
if (!usb_configuration) {
tx_noautoflush = 0;
return -1;
}
if (usb_tx_packet_count(SEREMU_TX_ENDPOINT) < TX_PACKET_LIMIT) {
tx_noautoflush = 1;
tx_packet = usb_malloc();
if (tx_packet) break;
}
if (++wait_count > TX_TIMEOUT || transmit_previous_timeout) {
transmit_previous_timeout = 1;
tx_noautoflush = 0;
return -1;
}
tx_noautoflush = 0;
yield();
tx_noautoflush = 1;
}
}
transmit_previous_timeout = 0;
len = SEREMU_TX_SIZE - tx_packet->index;
if (len > size) len = size;
dest = tx_packet->buf + tx_packet->index;
tx_packet->index += len;
size -= len;
while (len-- > 0) *dest++ = *src++;
if (tx_packet->index < SEREMU_TX_SIZE) {
usb_seremu_transmit_flush_timer = TRANSMIT_FLUSH_TIMEOUT;
} else {
tx_packet->len = SEREMU_TX_SIZE;
usb_seremu_transmit_flush_timer = 0;
usb_tx(SEREMU_TX_ENDPOINT, tx_packet);
tx_packet = NULL;
}
}
tx_noautoflush = 0;
return 0;
#endif
}
int usb_seremu_write_buffer_free(void)
{
uint32_t len;
tx_noautoflush = 1;
if (!tx_packet) {
if (!usb_configuration ||
usb_tx_packet_count(SEREMU_TX_ENDPOINT) >= TX_PACKET_LIMIT ||
(tx_packet = usb_malloc()) == NULL) {
tx_noautoflush = 0;
return 0;
}
}
len = SEREMU_TX_SIZE - tx_packet->index;
tx_noautoflush = 0;
return len;
}
void usb_seremu_flush_output(void)
{
int i;
if (!usb_configuration) return;
if (tx_packet && tx_packet->index > 0) {
usb_seremu_transmit_flush_timer = 0;
for (i = tx_packet->index; i < SEREMU_TX_SIZE; i++) {
tx_packet->buf[i] = 0;
}
tx_packet->len = SEREMU_TX_SIZE;
usb_tx(SEREMU_TX_ENDPOINT, tx_packet);
tx_packet = NULL;
}
}
void usb_seremu_flush_callback(void)
{
int i;
if (tx_noautoflush) return;
for (i = tx_packet->index; i < SEREMU_TX_SIZE; i++) {
tx_packet->buf[i] = 0;
}
tx_packet->len = SEREMU_TX_SIZE;
usb_tx(SEREMU_TX_ENDPOINT, tx_packet);
tx_packet = NULL;
}
#endif
#endif