/*
 * Authors (alphabetical order)
 * - Andre Bernet <bernet.andre@gmail.com>
 * - Andreas Weitl
 * - Bertrand Songis <bsongis@gmail.com>
 * - Bryan J. Rentoul (Gruvin) <gruvin@gmail.com>
 * - Cameron Weeks <th9xer@gmail.com>
 * - Erez Raviv
 * - Gabriel Birkus
 * - Jean-Pierre Parisy
 * - Karl Szmutny
 * - Michael Blandford
 * - Michal Hlavinka
 * - Pat Mackenzie
 * - Philip Moss
 * - Rob Thomson
 * - Romolo Manfredini <romolo.manfredini@gmail.com>
 * - Thomas Husterer
 *
 * opentx is based on code named
 * gruvin9x by Bryan J. Rentoul: http://code.google.com/p/gruvin9x/,
 * er9x by Erez Raviv: http://code.google.com/p/er9x/,
 * and the original (and ongoing) project by
 * Thomas Husterer, th9x: http://code.google.com/p/th9x/
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 */

#include "../../opentx.h"

extern Fifo<512> telemetryFifo;

void telemetryPortInit(uint32_t baudrate)
{
  if (baudrate == 0) {
    USART_DeInit(SPORT_USART);
    return;
  }

  USART_InitTypeDef USART_InitStructure;
  GPIO_InitTypeDef GPIO_InitStructure;

  RCC_AHB1PeriphClockCmd(RCC_AHB1Periph_GPIO_SPORT, ENABLE);

  GPIO_PinAFConfig(GPIO_PIN_SPORT_TXRX, GPIO_PinSource_SPORT_RX, GPIO_AF_SPORT);
  GPIO_PinAFConfig(GPIO_PIN_SPORT_TXRX, GPIO_PinSource_SPORT_TX, GPIO_AF_SPORT);

  GPIO_InitStructure.GPIO_Pin = PIN_SPORT_TX | PIN_SPORT_RX;
  GPIO_InitStructure.GPIO_Mode = GPIO_Mode_AF;
  GPIO_InitStructure.GPIO_OType = GPIO_OType_PP;
  GPIO_InitStructure.GPIO_PuPd = GPIO_PuPd_UP;
  GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;
  GPIO_Init(GPIO_PIN_SPORT_TXRX, &GPIO_InitStructure);
  
  GPIO_InitStructure.GPIO_Pin = PIN_SPORT_ON;
  GPIO_InitStructure.GPIO_Mode = GPIO_Mode_OUT;
  GPIO_InitStructure.GPIO_OType = GPIO_OType_PP;
  GPIO_InitStructure.GPIO_PuPd = GPIO_PuPd_NOPULL;
  GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;
  GPIO_Init(GPIO_PIN_SPORT_ON, &GPIO_InitStructure);
  
  GPIO_ResetBits(GPIO_PIN_SPORT_ON, PIN_SPORT_ON);
  
  RCC_APB1PeriphClockCmd(RCC_APB1Periph_SPORT, ENABLE);
  
  USART_InitStructure.USART_BaudRate = baudrate;
  USART_InitStructure.USART_WordLength = USART_WordLength_8b;
  USART_InitStructure.USART_StopBits = USART_StopBits_1;
  USART_InitStructure.USART_Parity = USART_Parity_No;
  USART_InitStructure.USART_HardwareFlowControl = USART_HardwareFlowControl_None;
  USART_InitStructure.USART_Mode = USART_Mode_Tx | USART_Mode_Rx;
  
  USART_Init(SPORT_USART, &USART_InitStructure);
  USART_Cmd(SPORT_USART, ENABLE);
  USART_ITConfig(SPORT_USART, USART_IT_RXNE, ENABLE);

  NVIC_SetPriority(SPORT_IRQn, 6);
  NVIC_EnableIRQ(SPORT_IRQn);
}

struct SportTxBuffer
{
  uint8_t *ptr;
  uint32_t count;
} sportTxBuffer;

void sportSendBuffer(uint8_t *buffer, uint32_t count)
{
  sportTxBuffer.ptr = buffer ;
  sportTxBuffer.count = count ;
  GPIO_PIN_SPORT_ON->BSRRL = PIN_SPORT_ON ;     // output enable
  SPORT_USART->CR1 &= ~USART_CR1_RE ;           // turn off receiver
  SPORT_USART->CR1 |= USART_CR1_TXEIE ;
}

#if !defined(SIMU)
#define USART_FLAG_ERRORS (USART_FLAG_ORE | USART_FLAG_NE | USART_FLAG_FE | USART_FLAG_PE)

extern "C" void SPORT_IRQHandler()
{
  uint32_t status;
  uint8_t data;

  status = SPORT_USART->SR;

  if (status & USART_SR_TXE) {
    if (sportTxBuffer.count) {
      SPORT_USART->DR = *sportTxBuffer.ptr++;
      if (--sportTxBuffer.count == 0) {
        SPORT_USART->CR1 &= ~USART_CR1_TXEIE;   // stop Tx interrupt
        SPORT_USART->CR1 |= USART_CR1_TCIE;     // enable complete interrupt
      }
    }
  }
	
  if ((status & USART_SR_TC) && (SPORT_USART->CR1 & USART_CR1_TCIE)) {
    SPORT_USART->CR1 &= ~USART_CR1_TCIE ;	// stop Complete interrupt
    GPIO_PIN_SPORT_ON->BSRRH = PIN_SPORT_ON ;	// output disable
    SPORT_USART->CR1 |= USART_CR1_RE ;
    while (status & (USART_FLAG_RXNE)) {
      status = SPORT_USART->DR;
      status = SPORT_USART->SR ;
    }
  }
	
  while (status & (USART_FLAG_RXNE | USART_FLAG_ERRORS)) {
    data = SPORT_USART->DR;
    if (!(status & USART_FLAG_ERRORS)) {
      telemetryFifo.push(data);
    }
    status = SPORT_USART->SR;
  }
}
#endif