#ifndef BDL_DEBUG_H
#define BDL_DEBUG_H

#include "chunk.h"

void disassemble_chunk(Chunk *chunk, const char *name);
size_t disassemble_instruction(Chunk *chunk, size_t offset);

void
disassemble_chunk(Chunk *chunk, const char *name) {
    printf("== %s ==\n", name);
    printf("code:\n");
    size_t offset = 0;
    while (offset < array_size(chunk->code)) {
        offset = disassemble_instruction(chunk, offset);
    }
    printf("\nconstants:\n");
    offset = 0;
    while (offset < array_size(chunk->constants)) {
        printf("\t%04ld -> ", offset);
        display(chunk->constants[offset]);
        printf("\n");
        offset++;
    }
}

size_t
disassemble_instruction(Chunk *chunk, size_t offset) {
    printf("\t%04ld ", offset);
    if (offset > 0
            && chunk->lines[offset].line == chunk->lines[offset - 1].line
            && chunk->lines[offset].col == chunk->lines[offset - 1].col) {
        printf("%4s|%-4s ", " ", " ");
    } else {
        printf("%4ld:%-4ld ", chunk->lines[offset].line, chunk->lines[offset].col);
    }
    u8 instruction = chunk->code[offset];
    switch (instruction) {
        case OP_RETURN: {
            printf("OP_RETURN\n");
            return offset + 1;
        } break;
        case OP_CONSTANT: {
            u8 constant = chunk->code[offset + 1];
            printf("%-16s %4d (", "OP_CONSTANT", constant);
            display(chunk->constants[constant]);
            printf(")\n");
            return offset + 2;
        } break;
        default: {
            printf("Unknown OP: %d\n", instruction);
            return offset + 1;
        } break;
    }
}

#endif // BDL_DEBUG_H