/****************************************************************
 *                                                              *
 *                      MFBSP_LPORT_DMA                         *
 *                                                              *
 *  Демонстрирует простой обмен данными по MFBSP в режиме       *
 *  линкового порта с использованием DMA (с ожиданием по опросу)*
 *  Массив OutputArray заполняется числами,                     *
 *  затем пересылается из MFBSP0 в MFBSP1.                      *
 *  Элементы входного массива InputArray проверяются            *
 *  на совпадение их значений с порядковыми номерами,           *
 *  возвращаемое значение этой фунции копируется в переменную   *
 *  Flag_Corr.                                                *
 *  Чтобы программа работала на отладочной плате -              *
 *  необходимо физически соединить MFBSP0 и MFBSP1.             *
 *  Соединяются они "пин в пин".                                *
 *                                                              *
 ****************************************************************/

#include "mcom_runtime/risc_mfbsp.h"
#include "mcom_runtime/mcom02.h"

// Частота LPORT в Гц
#define LPORT_FRQ 50000000

// длина массива в 32-разрядных словах
#define ARRAY_LEN 1000

unsigned int Flag_Corr = 0;  // флаг корректности полученных данных

// Адреса массивов должны быть выравнены по границе 64-разрядного слова,
// если они будут пересылаться по DMA
unsigned int OutputArray[ARRAY_LEN] __attribute__ ((aligned (8)));
unsigned int InputArray[ARRAY_LEN] __attribute__ ((aligned (8)));

// функция заполнения массива числами от 0 до len
void FillArray(unsigned int *array, unsigned int len) {
        unsigned int i;

        for (i=0;i<len;i++) {
                array[i] = i;
        }
}

// функция вычисляет контрольную сумму массива
unsigned int CRC32(unsigned int len, unsigned int* buf)  // CRC32 checksum
{
  unsigned int crc_table[256];
  unsigned int crc, i, j;

        for (i = 0; i < 256; i++)
        {
          crc = i;
          for (j = 0; j < 8; j++)
                crc = crc & 1 ? (crc >> 1) ^ 0xedb88320ul : crc >> 1;
          crc_table[i] = crc;
        };
        crc = 0xfffffffful;
        while (len--)
                crc = crc_table[(crc ^ *buf++) & 0xff] ^ (crc >> 8);
        return crc ^ 0xfffffffful;
}

// функция заполняет массив нулями
void ZeroArray(unsigned int *array, unsigned int len) {
        unsigned int i;

        for (i=0;i<len;i++) {
                array[i] = 0;
        }
}


int main() {

    GATE_SYS_CTR = 0xffffffff;

    ZeroArray(InputArray,ARRAY_LEN);
    FillArray(OutputArray,ARRAY_LEN);
    Flag_Corr = 0;

    unsigned int output_crc = CRC32(ARRAY_LEN, OutputArray);

    //настройка портов LPORT0(передача), LPORT1(прием)
    mfbsp_lport_configure(0, 1, 1, LPORT_FRQ);
    mfbsp_lport_configure(1, 0, 1, LPORT_FRQ);
    //настройка DMA каналов портов LPORT0(передача), LPORT1(прием)
    mfbsp_dma_configure(0, (void*)OutputArray, ARRAY_LEN/2, 1);
    mfbsp_dma_configure(1, (void*)InputArray, ARRAY_LEN/2, 0);

    // запускаем передачу данных путём запуска их DMA каналов
    mfbsp_dma_run(1,0);
    mfbsp_dma_run(0,1);

    // Ждем окончания приема данных,
    // то есть момента, когда канал DMA_MFBSP_RX_CH1 закончит работу.
    mfbsp_dma_wait(1,0);

    unsigned int input_crc = CRC32(ARRAY_LEN, InputArray);   // проверяем содержимое входного массива
    if (input_crc == output_crc) Flag_Corr = 1;

    return 0;
}