/* movedo-test.c - basic movedo/undo tests.
 *
 * Copyright (C) 2024 Bruno Raoult ("br")
 * Licensed under the GNU General Public License v3.0 or later.
 * Some rights reserved. See COPYING.
 *
 * You should have received a copy of the GNU General Public License along with this
 * program. If not, see <https://www.gnu.org/licenses/gpl-3.0-standalone.html>.
 *
 * SPDX-License-Identifier: GPL-3.0-or-later <https://spdx.org/licenses/GPL-3.0-or-later.html>
 *
 */

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

#include "chessdefs.h"
#include "fen.h"
#include "position.h"
#include "move.h"
#include "move-do.h"
#include "move-gen.h"

#include "common-test.h"

int main(int __unused ac, __unused char**av)
{
    int i = 1;
    char *fen, movebuf[8];;
    pos_t *pos, *savepos;
    move_t move;

    setlinebuf(stdout);                           /* line-buffered stdout */

    bitboard_init();
    hyperbola_init();

    while ((fen = next_fen(MOVEGEN | MOVEDO))) {
        if (!(pos = fen2pos(NULL, fen))) {
            printf("wrong fen %d: [%s]\n", i, fen);
            continue;
        }
        pos_gen_pseudomoves(pos);
        savepos = pos_dup(pos);
        if (pos_cmp(pos, savepos) != true) {
            printf("*** positions differ 1\n");
            exit(0);
        }
        int tmp = 0, j = 1;
        while ((move = pos_next_legal(pos, &tmp)) != MOVE_NONE) {
            state_t state;

            pos_print(pos);
            printf("i=%d j=%d  turn=%d move=[%s]\n", i, j, pos->turn,
                   move_str(movebuf, move, 0));
            //move_p
            move_do(pos, move, &state);
            pos_print(pos);
            fflush(stdout);
            pos_check(pos, true);
            printf("%d/%d move_do check ok\n", i, j);
            move_undo(pos, move, &state);
            if (pos_cmp(pos, savepos) != true) {
                printf("*** positions differ 2\n");
                exit(0);
            }
            fflush(stdout);
            pos_check(pos, true);
            printf("%d/%d move_undo check ok\n", i, j);

            if (j++ == 1000)
                exit(0);
        }
        pos_del(savepos);
        pos_del(pos);
        i++;
    }
    return 0;
}