/*
 * Copyright (C) 2018 Acutam Automation, LLC
 *
 * This file is subject to the terms and conditions of the GNU Lesser
 * General Public License v2.1. See the file LICENSE in the top level
 * directory for more details.
 */

/**
 * @ingroup     tests
 * @{
 *
 * @file
 * @brief       eepreg test application
 *
 * @author      Matthew Blue <matthew.blue.neuro@gmail.com>
 * @}
 */

#include <errno.h>
#include <stdint.h>
#include <stdio.h>
#include <string.h>

#include "eepreg.h"
#include "periph/eeprom.h"

#define DAT_START    (EEPROM_SIZE - EEPROM_RESERV_CPU_HI \
                      - EEPROM_RESERV_BOARD_HI - 1)

#define ENT1_NAME    "foo"
#define ENT1_SIZE    (12U)
#define ENT2_NAME    "bar"
#define ENT2_SIZE    (34U)
#define DATA         "spam and eggs"

int eepreg_iter_cb(char *name, void *arg)
{
    (void)arg;

    printf("%s ", name);

    return 0;
}

int main(void)
{
    int ret;
    uint32_t tmp1, tmp2, tmp3;
    char data[sizeof(DATA)];

    puts("EEPROM registry (eepreg) test routine");

    printf("Testing new registry creation: ");

    printf("reset ");
    ret = eepreg_reset();
    if (ret < 0) {
        puts("[FAILED]");
        return 1;
    }

    printf("check ");
    ret = eepreg_check();
    if (ret < 0) {
        puts("[FAILED]");
        return 1;
    }

    puts("[SUCCESS]");

    printf("Testing writing and reading entries: ");

    printf("add ");
    ret = eepreg_add(&tmp1, ENT1_NAME, ENT1_SIZE);
    if (ret < 0 || tmp1 != DAT_START - ENT1_SIZE) {
        puts("[FAILED]");
        return 1;
    }

    printf("write ");
    ret = eepreg_write(&tmp2, ENT2_NAME, ENT2_SIZE);
    if (ret < 0 || tmp2 != DAT_START - ENT1_SIZE - ENT2_SIZE) {
        puts("[FAILED]");
        return 1;
    }

    /* read via add */
    printf("add ");
    ret = eepreg_add(&tmp3, ENT1_NAME, ENT1_SIZE);
    if (ret < 0 || tmp1 != tmp3) {
        puts("[FAILED]");
        return 1;
    }

    printf("read ");
    ret = eepreg_read(&tmp1, ENT2_NAME);
    if (ret < 0 || tmp1 != tmp2) {
        puts("[FAILED]");
        return 1;
    }

    puts("[SUCCESS]");

    printf("Testing detection of conflicting size: ");

    printf("add ");
    ret = eepreg_add(&tmp1, ENT1_NAME, ENT1_SIZE + 1);
    if (ret != -EADDRINUSE) {
        puts("[FAILED]");
        return 1;
    }

    puts("[SUCCESS]");

    printf("Testing calculation of lengths: ");

    printf("len ");
    ret = eepreg_len(&tmp1, ENT1_NAME);
    if (ret < 0 || tmp1 != ENT1_SIZE) {
        puts("[FAILED]");
        return 1;
    }

    printf("len ");
    ret = eepreg_len(&tmp2, ENT2_NAME);
    if (ret < 0 || tmp2 != ENT2_SIZE) {
        puts("[FAILED]");
        return 1;
    }

    puts("[SUCCESS]");

    printf("Testing of successful data move after rm: ");

    printf("rm ");
    eepreg_read(&tmp1, ENT1_NAME);
    eepreg_read(&tmp2, ENT2_NAME);
    eeprom_write(tmp2, (uint8_t *)DATA, sizeof(DATA));
    ret = eepreg_rm(ENT1_NAME);
    if (ret < 0) {
        puts("[FAILED]");
        return 1;
    }

    printf("read ");
    ret = eepreg_read(&tmp3, ENT2_NAME);
    if (ret < 0 || tmp3 != (DAT_START - ENT2_SIZE)) {
        puts("[FAILED]");
        return 1;
    }

    printf("data ");
    eeprom_read(tmp3, (uint8_t *)data, sizeof(DATA));
    if (strcmp(data, DATA) != 0) {
        puts("[FAILED]");
        return 1;
    }

    puts("[SUCCESS]");

    printf("Testing of free space change after write: ");

    printf("free ");
    ret = eepreg_free(&tmp1);
    if (ret < 0) {
        puts("[FAILED]");
        return 1;
    }

    printf("add ");
    ret = eepreg_add(&tmp3, ENT1_NAME, ENT1_SIZE);
    if (ret < 0) {
        puts("[FAILED]");
        return 1;
    }

    printf("free ");
    ret = eepreg_free(&tmp2);
    if (ret < 0
        || tmp1 != (tmp2 + ENT1_SIZE + sizeof(ENT1_NAME) + EEPREG_PTR_LEN)) {

        puts("[FAILED]");
        return 1;
    }

    puts("[SUCCESS]");

    printf("Testing of iteration over registry: ");

    printf("iter ");
    ret = eepreg_iter(eepreg_iter_cb, NULL);
    if (ret < 0) {
        puts("[FAILED]");
        return 1;
    }

    puts("[SUCCESS]");

    puts("Tests complete!");

    return 0;
}