aboutsummaryrefslogtreecommitdiff
path: root/src/match.c
blob: 6ae9fa72060d8861f082d62d653d4ef8751ba387 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
/*
  match, one game of candidate weights against the candidate weights

  Copyright (C) 2026, tslil clingman

  This program is free software: you can redistribute it and/or modify
  it under the terms of the GNU General Public License as published by
  the Free Software Foundation, either version 3 of the License, or
  (at your option) any later version.

  This program is distributed in the hope that it will be useful, but
  WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  General Public License for more details.

  You should have received a copy of the GNU General Public License
  along with ctak. If not, see <https://www.gnu.org/licenses/>.
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
#include <unistd.h>

#include "actions.h"
#include "negamax.h"
#include "nn.h"
#include "tak.h"
#include "xorshift64.h"

// a little gymnastics to insert candidate neural networks
#include "weights_5.h"
#include "weights_6.h"
#include "cand_weights_5.c"
#include "cand_weights_6.c"

static inline float five_cand(tak_state_p state) {
  static float cur_board[FIVE_INP_NUM] NN_ALIGNED;

  nn_prepare_input(cur_board, state, cand_five_embedding);
  return eval_net(cur_board, FIVE_INP_NUM, &cand_five_dense_weights[0][0],
                  cand_five_dense_biases, cand_five_logit_weights, cand_five_logit_bias,
                  FIVE_DENSE_NUM);
}

static inline float six_cand(tak_state_p state) {
  static float cur_board[SIX_INP_NUM] NN_ALIGNED;

  nn_prepare_input(cur_board, state, cand_six_embedding);
  return eval_net(cur_board, SIX_INP_NUM, &cand_six_dense_weights[0][0],
                  cand_six_dense_biases, cand_six_logit_weights, cand_six_logit_bias,
                  SIX_DENSE_NUM);
}


#define MAX_PLY 255

static tak_state_p state;

void negamax_display_progress(const uint8_t cur_depth,
                              const uint8_t init_depth,
                              const uint32_t length) {
  (void)(cur_depth);
  (void)(init_depth);
  (void)(length);
}

// ===================================================================
// Game driver
// ===================================================================

static int play_game(const nn_function current_fn, const nn_function cand_fn,
                     const enum COLOUR current_fn_colour,
                     const uint8_t random_opening_length) {
  reset_state(state, state->board_size);
  char ptn[16];

  for (uint32_t ply = 0; ply + negamax_search_depth < MAX_PLY; ply++) {
    if (ply < random_opening_length) {
      uint32_t n_actions;
      action_t *actions = actions_generate(state, &n_actions);
      action_to_ptn(actions[rand32() % n_actions], ptn);
    } else {
      const nn_function fn =
        (state->current_colour == current_fn_colour) ? current_fn : cand_fn;
      negamax_set_evaluator(fn);
      negamax_generate(state);
      strcpy(ptn, negamax_ptn);
    }

      const enum ACT_RESULT r = do_ptn(state, ptn);
      if (r == GAME_END)
      break;
    if (r != ACT_OK) {
      fprintf(stderr, "match: unexpected result %d for ptn %s\n", r, ptn);
      return -2;
    }
  }

  switch (state->won) {
  case WIN_DRAW:
  return -1;
    case WIN_FLAT_BLACK:
  case WIN_ROAD_BLACK:
    return C_BLACK;
  case WIN_FLAT_WHITE:
  case WIN_ROAD_WHITE:
    return C_WHITE;
  default:
    // ply cap reached with no winner: a draw
    return -1;
  }
}

void do_game(const uint8_t size, const uint8_t random_opening_length, const enum COLOUR current_fn_colour) {
  state = new_tak_state(size);
  negamax_init(size);

  const nn_function current_fn =
    (size == 5) ? &five_nn_fn : &six_nn_fn;
  const nn_function cand_fn = (size == 5) ? &five_cand : &six_cand;

  const int winner = play_game(current_fn, cand_fn, current_fn_colour, random_opening_length);

  const char *name;
  if (winner == -1)
    name = "draw";
  else if (winner == (int)current_fn_colour)
    name = "current";
  else
    name = "candidate";
  printf("%s %u\n", name, state->ply);

  negamax_free();
  free_tak_state(state);
}

  // ===================================================================
  // Main
  // ===================================================================

  const char *usage =
  "match, one Tak game of the current weights against the candidate.\n\n\
usage: match <size> <random_opening_length> <depth>\n\n\
This binary is linked with both the include/weight_* files and the include/cand_weight_* files. It plays a single <size>x<size> game, with a random side choice and both sides using <random_opening_length> random moves at the start of the game. The result format is:\n\n\
\t<current|candidate|draw> <plies>\n\n\
nn_train.py runs many of these in parallel to score the candidate against the current weights.\n\n\
Copyright (C) 2026, tslil clingman\n\n\
This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.";

int main(int argc, char **argv) {
  if (argc != 4) {
    puts(usage);
    return EXIT_FAILURE;
  }

  const uint8_t size = (uint8_t)atoi(argv[1]);
  const uint8_t random_opening_length = (uint8_t)atoi(argv[2]);
  negamax_search_depth = (uint8_t)atoi(argv[3]);

  if (size != 5 && size != 6) {
    fprintf(stderr, "match: size must be 5 or 6\n");
    return EXIT_FAILURE;
  }
  xors = ((uint64_t)time(NULL) ^ ((uint64_t)getpid() << 32)) *
    0x9E3779B97F4A7C15ULL +
    0xC0FFEE;

  do_game(size, random_opening_length, C_BLACK);
  do_game(size, random_opening_length, C_WHITE);

  return EXIT_SUCCESS;
}