#ifndef DEBUG_H
#define DEBUG_H

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


extern FILE *DUMP; /* Define this variable somewhere (eg with DUMP = stderr). */


static inline void debug_dump_lanes(const char *header, size_t len, const uint8_t buf[len], int indent)
{
    fprintf(DUMP, "%s\n", header);

    for (size_t line=0; line<len/8; line++)
    {
        fprintf(DUMP, "%*s", indent, "");
        for (size_t b=0; b<8; b++)
        {
            fprintf(DUMP, "%*s%02x", 5, "", buf[line*8+b]);
        }
        fprintf(DUMP, "\n");
    }
    fprintf(DUMP, "\n");
}

static inline void debug_dump_buffer(const char *header, size_t len, const uint8_t buf[len], int indent)
{
    fprintf(DUMP, "%*s%s\n", indent, "", header);

    for (size_t line=0; line<len/8; line++)
    {
        fprintf(DUMP, "%*s[0x%02zx] ", indent, "", line*8);
        for (size_t b=0; b<8; b++)
        {
            /* fprintf(DUMP, "[%zu / %zu => %zu]", line, b, line*8+b); */
            fprintf(DUMP, "%02x ", buf[line*8+b]);
        }
        fprintf(DUMP, "\n");
    }

    size_t rest = len%8;
    if (rest != 0)
    {
        fprintf(DUMP, "%*s[0x%02zx] ", indent, "", len-rest);
        for (size_t b=0; b<rest; b++)
        {
            fprintf(DUMP, "%02x ", buf[len-rest+b]);
        }
        fprintf(DUMP, "\n");
    }

    fprintf(DUMP, "\n");
}

static inline void debug_open_dump(const char *folder, const char *suite, const char *vector_name)
{
    size_t namelen = snprintf(
        NULL, 0, "%s/traces-%s-%s.txt", folder, suite, vector_name
    );
    char name[namelen+1];
    snprintf(name, sizeof(name), "%s/traces-%s-%s.txt", folder, suite, vector_name);
    DUMP = fopen(name, "w");
}


#endif /* DEBUG_H */