/* DMA unit test.
 *
 * Author: Steffen Vogel <post@steffenvogel.de>
 * SPDX-FileCopyrightText: 2017 Steffen Vogel <post@steffenvogel.de>
 * SPDX-License-Identifier: Apache-2.0
 */

#include <criterion/criterion.h>

#include <villas/log.hpp>
#include <villas/utils.hpp>
#include <villas/memory.hpp>
#include <villas/fpga/card.hpp>
#include <villas/fpga/ips/dma.hpp>
#include <villas/fpga/ips/bram.hpp>

#include "global.hpp"

using namespace villas;

// cppcheck-suppress unknownMacro
Test(fpga, dma, .description = "DMA")
{
	auto logger = logging.get("unit-test:dma");

	std::list<std::shared_ptr<fpga::ip::Dma>> dmaIps;

	for (auto &ip : state.cards.front()->ips) {
		if (*ip == fpga::Vlnv("xilinx.com:ip:axi_dma:")) {
			auto dma = std::dynamic_pointer_cast<fpga::ip::Dma>(ip);
			dmaIps.push_back(dma);
		}
	}

	size_t count = 0;
	for (auto &dma : dmaIps) {
		logger->info("Testing {}", *dma);

		if (not dma->loopbackPossible()) {
			logger->info("Loopback test not possible for {}", *dma);
			continue;
		}

		dma->connectLoopback();

		// Simple DMA can only transfer up to 4 kb due to PCIe page size burst
		// limitation
		size_t len = 4 * (1 << 10);

#if 0
		// Allocate memory to use with DMA
		auto src = HostDmaRam::getAllocator().allocate<char>(len);
		auto dst = HostDmaRam::getAllocator().allocate<char>(len);
#elif 0
		// ... only works with IOMMU enabled currently

		// Find a block RAM IP to write to
		auto bramIp = state.cards.front()->lookupIp(fpga::Vlnv("xilinx.com:ip:axi_bram_ctrl:"));
		auto bram = std::dynamic_pointer_cast<fpga::ip::Bram>(bramIp);
		cr_assert_not_null(bram, "Couldn't find BRAM");

		auto src = bram->getAllocator().allocate<char>(len);
		auto dst = bram->getAllocator().allocate<char>(len);
#else
		// ... only works with IOMMU enabled currently
		auto &alloc = villas::HostRam::getAllocator();
		const std::shared_ptr<villas::MemoryBlock> srcBlock = alloc.allocateBlock(len);
		const std::shared_ptr<villas::MemoryBlock> dstBlock = alloc.allocateBlock(len);
		villas::MemoryAccessor<char> src(*srcBlock);
		villas::MemoryAccessor<char> dst(*dstBlock);
#endif
		// Make sure memory is accessible for DMA
		dma->makeAccesibleFromVA(srcBlock);
		dma->makeAccesibleFromVA(dstBlock);

		// Get new random data
		const size_t lenRandom = utils::readRandom(&src, len);
		cr_assert(len == lenRandom, "Failed to get random data");

		// Start transfer
		cr_assert(dma->memcpy(src.getMemoryBlock(), dst.getMemoryBlock(), len),
		          "DMA ping pong failed");

		// Compare data
		cr_assert(memcmp(&src, &dst, len) == 0, "Data not equal");

		logger->info(CLR_GRN("Passed"));

		count++;
	}

	cr_assert(count > 0, "No DMA found");

	MemoryManager::get().getGraph().dump();
	fpga::ip::Node::getGraph().dump();
}