#include <inttypes.h>
#include <stdio.h>
#include <string.h>

#include "tweakey.h"

#include "helpers.h"


struct vector
{
    char *name;
    uint8_t key[KEY_BYTES];
    uint8_t tweak[TWEAK_BYTES];
    uint8_t last_rtk[TWEAKEY_BYTES];
};

typedef struct vector vector;


/* [0]: LSB */
const vector VECTORS[] = {
    {
        .name = "full",
        .tweak = {
            0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
            0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
            0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff
        },
        .key = {
            0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
            0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff
        },
        .last_rtk = {
            0x42, 0x5d, 0x5d, 0x5d, 0x5d, 0x5d, 0x5d, 0x5d
        }
    },
    {
        .name = "null",
        .tweak = {
            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
        },
        .key = {
            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
            0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
        },
        .last_rtk = {
            0x1f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
        }

    },
    {
        .name = "order",
        .tweak = {
            0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
            0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f,
            0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17
        },
        .key = {
            0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
            0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f
        },
        .last_rtk = {
            0xac, 0x92, 0x86, 0x9b, 0xae, 0xba, 0x8f, 0xa7
        }
    },
    {
        .name = "random",
        .tweak = {
            0xa8, 0x43, 0xf3, 0x10, 0x81, 0x11, 0x1c, 0x84,
            0xdf, 0xf8, 0x2e, 0xfa, 0x90, 0x90, 0x26, 0x21,
            0x7d, 0x8d, 0x43, 0x12, 0x2a, 0xb3, 0xd2, 0x4d
        },
        .key = {
            0xc1, 0x96, 0xc6, 0x0a, 0x02, 0x73, 0x91, 0x68,
            0x7f, 0xf4, 0x23, 0x4d, 0x3d, 0xd5, 0xf9, 0x9b
        },
        .last_rtk = {
            0xe6, 0xe3, 0x5e, 0x39, 0xf1, 0xf2, 0xa6, 0xac
        }
    }
};


int main(int argc, char const * const *argv)
{
    if (argc < 2)
    {
        fprintf(stderr, "usage: %s OUTPUT-FOLDER\n", argv[0]);
        return 1;
    }

    int diff = 0;

    for (const vector *v=VECTORS; v<ARRAY_END(VECTORS); v++)
    {
        FILE *dump = open_dump_file(argv[1], "tweakey", v->name);

        fprintf(dump, "Building Tweakey :\n");

        tweakey_state tk;
        tweakey_state_init(&tk, v->key, v->tweak, dump);

        fprintf(dump, "Tweakey Schedule\n");

        uint8_t rtk[ROUND_TWEAKEY_BYTES];
        tweakey_state_extract(&tk, rtk, 0);

        for (uint8_t i=1; i<ROUNDS; i++)
        {
            fprintf(dump, "     Round Tweakey  %"PRIu8"\n", i);
            tweakey_state_update(&tk);
            tweakey_state_extract(&tk, rtk, i);
        }

        if (memcmp(rtk, v->last_rtk, sizeof(rtk)) != 0)
        {
            REPORT_DIFFERENCE(v->name, "last RTK");
            diff++;
        }

        fclose(dump);
    }

    return diff;
}