#include "sudoku.h"

#include <stdio.h>
#include <stdlib.h>

#define INPUT_PATTERN "%1d %1d %1d %1d %1d %1d %1d %1d %1d\n"

bool parse_grid_file(struct sudoku *grid, FILE *input) {
    if (!input || !grid)
        return false;

    for (size_t i = 0; i < 9; ++i) {
        int *line = grid->grid[i];

        if (fscanf(input, INPUT_PATTERN, &line[0], &line[1], &line[2], &line[3],
                   &line[4], &line[5], &line[6], &line[7], &line[8])
            < 9)
            return false;
    }

    return true;
}

bool parse_grid_str(struct sudoku *grid, const char *input) {
    if (!input || !grid)
        return false;

    for (size_t i = 0; i < 9; ++i) {
        int *line = grid->grid[i];

        if (sscanf(input, INPUT_PATTERN, &line[0], &line[1], &line[2], &line[3],
                   &line[4], &line[5], &line[6], &line[7], &line[8])
            < 9)
            return false;
    }

    return true;
}

bool parse_line_file(struct sudoku *grid, FILE *input) {
    if (!input || !grid)
        return false;

    char *line = NULL;
    if (getline(&line, NULL, input) < 0)
        return false;

    bool ret = parse_line_str(grid, line);

    free(line);

    return ret;
}

bool parse_line_str(struct sudoku *grid, const char *input) {
    if (!input || !grid)
        return false;

    for (size_t i = 0; i < 9; ++i) {
        for (size_t j = 0; j < 9; ++j) {
            char c = *(input++);
            if (c >= '1' && c <= '9')
                grid->grid[i][j] = c - '0';
            else if (c == '.' || c == '0')
                grid->grid[i][j] = 0;
            else
                return false;
        }
    }

    return true;
}

bool print_grid(const struct sudoku *grid, FILE *output) {
    if (!output || !grid)
        return false;

    for (size_t i = 0; i < 9; ++i) {
        const int *line = grid->grid[i];

        if (fprintf(output, INPUT_PATTERN, line[0], line[1], line[2], line[3],
                    line[4], line[5], line[6], line[7], line[8])
            < 18)
            return false;
    }

    return true;
}

bool print_line(const struct sudoku *grid, FILE *output) {
    if (!output || !grid)
        return false;

    for (size_t i = 0; i < 9; ++i) {
        for (size_t j = 0; j < 9; ++j) {
            if (fputc(grid->grid[i][j] ? '0' + grid->grid[i][j] : '.', output)
                == EOF)
                return false;
        }
    }

    if (fputc('\n', output) == EOF)
        return false;

    return true;
}