1 #ifndef PACHI_UCT_TREE_H
2 #define PACHI_UCT_TREE_H
4 /* Management of UCT trees. See diagram below for the node structure.
6 * Two allocation methods are supported for the tree nodes:
8 * - calloc/free: each node is allocated with one calloc.
9 * After a move, all nodes except the subtree rooted at
10 * the played move are freed one by one with free().
11 * Since this can be very slow (seen 9s and loss on time because
12 * of this) the nodes are freed in a background thread.
13 * We still reserve enough memory for the next move in case
14 * the background thread doesn't free nodes fast enough.
16 * - fast_alloc: a large buffer is allocated once, and each
17 * node allocation takes some of this buffer. After a move
18 * is played, no memory if freed if the buffer still has
19 * enough free space. Otherwise the subtree rooted at the
20 * played move is copied to a temporary buffer, pruning it
21 * if necessary to fit in this small buffer. We copy by
22 * preference nodes with largest number of playouts.
23 * Then the temporary buffer is copied back to the original
24 * buffer, which has now plenty of space.
25 * Once the fast_alloc mode is proven reliable, the
26 * calloc/free method will be removed. */
42 * +------+ v- sibling +------+
43 * | node | ------------ | node |
46 * +------+ +------+ +------+ +------+
47 * | node | - | node | | node | - | node |
48 * +------+ +------+ +------+ +------+
51 /* TODO: Performance would benefit from a reorganization:
52 * (i) Allocate all children of a node within a single block.
53 * (ii) Keep all u stats together, and all amaf stats together.
54 * Currently, rave_update is top source of cache misses, and
55 * there is large memory overhead for having all nodes separate. */
59 struct tree_node
*parent
, *sibling
, *children
;
61 /*** From here on, struct is saved/loaded from opening tbook */
63 unsigned short depth
; // just for statistics
65 /* Common Fate Graph distance from parent, but at most TREE_NODE_D_MAX+1 */
66 #define TREE_NODE_D_MAX 3
69 #define TREE_HINT_INVALID 1 // don't go to this node, invalid move
72 /* coord is usually coord_t, but this is very space-sensitive. */
75 /* In case multiple threads walk the tree, is_expanded is set
76 * atomically. Only the first thread setting it expands the node.
77 * The node goes through 3 states:
78 * 1) children == null, is_expanded == false: leaf node
79 * 2) children == null, is_expanded == true: one thread currently expanding
80 * 2) children != null, is_expanded == true: fully expanded node */
84 struct move_stats prior
;
85 /* XXX: Should be way for policies to add their own stats */
86 struct move_stats amaf
;
87 /* Stats before starting playout; used for distributed engine. */
89 /* Criticality information; information about final board owner
90 * of the tree coordinate corresponding to the node */
91 struct move_stats winner_owner
; // owner == winner
92 struct move_stats black_owner
; // owner == black
99 struct tree_node
*root
;
100 struct board_symmetry root_symmetry
;
101 enum stone root_color
;
103 /* Whether to use any extra komi during score counting. This is
104 * tree-specific variable since this can arbitrarily change between
107 /* The value of applied extra komi. For DYNKOMI_LINEAR, this value
108 * is only informative, the actual value is computed per simulation
109 * based on leaf node depth. */
110 floating_t extra_komi
;
112 /* We merge local (non-tenuki) sequences for both colors, occuring
113 * anywhere in the tree; nodes are created on-demand, special 'pass'
114 * nodes represent tenuki. Only u move_stats are used, prior and amaf
115 * is ignored. Values in root node are ignored. */
116 /* The values in the tree can be either "raw" or "tempered"
117 * (representing difference against parent node in the main tree),
118 * controlled by local_tree setting. */
119 struct tree_node
*ltree_black
;
120 // Of course even in white tree, winrates are from b's perspective
121 // as anywhere else. ltree_white has white-first sequences as children.
122 struct tree_node
*ltree_white
;
123 // Aging factor; 2 means halve all playout values after each turn.
124 // 1 means don't age at all.
125 floating_t ltree_aging
;
127 /* Hash table used when working as slave for the distributed engine.
128 * Maps coordinate path to tree node. */
129 struct tree_hash
*htable
;
134 volatile unsigned long nodes_size
; // byte size of all allocated nodes
135 unsigned long max_tree_size
; // maximum byte size for entire tree, > 0 only for fast_alloc
136 unsigned long max_pruned_size
;
137 unsigned long pruning_threshold
;
138 void *nodes
; // nodes buffer, only for fast_alloc
141 /* Warning: all functions below except tree_expand_node & tree_leaf_node are THREAD-UNSAFE! */
142 struct tree
*tree_init(struct board
*board
, enum stone color
, unsigned long max_tree_size
,
143 unsigned long max_pruned_size
, unsigned long pruning_threshold
, floating_t ltree_aging
, int hbits
);
144 void tree_done(struct tree
*tree
);
145 void tree_dump(struct tree
*tree
, int thres
);
146 void tree_save(struct tree
*tree
, struct board
*b
, int thres
);
147 void tree_load(struct tree
*tree
, struct board
*b
);
149 struct tree_node
*tree_get_node(struct tree
*tree
, struct tree_node
*node
, coord_t c
, bool create
);
150 struct tree_node
*tree_garbage_collect(struct tree
*tree
, struct tree_node
*node
);
151 void tree_promote_node(struct tree
*tree
, struct tree_node
**node
);
152 bool tree_promote_at(struct tree
*tree
, struct board
*b
, coord_t c
);
154 void tree_expand_node(struct tree
*tree
, struct tree_node
*node
, struct board
*b
, enum stone color
, struct uct
*u
, int parity
);
155 struct tree_node
*tree_lnode_for_node(struct tree
*tree
, struct tree_node
*ni
, struct tree_node
*lni
, int tenuki_d
);
157 static bool tree_leaf_node(struct tree_node
*node
);
159 #define tree_node_parity(tree, node) \
160 ((((node)->depth ^ (tree)->root->depth) & 1) ? -1 : 1)
162 /* Get black parity from parity within the tree. */
163 #define tree_parity(tree, parity) \
164 (tree->root_color == S_WHITE ? (parity) : -1 * (parity))
166 /* Get a 0..1 value to maximize; @parity is parity within the tree. */
167 #define tree_node_get_value(tree, parity, value) \
168 (tree_parity(tree, parity) > 0 ? value : 1 - value)
171 tree_leaf_node(struct tree_node
*node
)
173 return !(node
->children
);
176 static inline floating_t
177 tree_node_criticality(struct tree
*t
, struct tree_node
*node
)
179 /* cov(player_gets, player_wins) =
180 * [The argument: If 'gets' and 'wins' is uncorrelated, b_gets * b_wins
181 * is valid way to obtain winner_gets. The more correlated it is, the
182 * more distorted the result.]
183 * = winner_gets - (b_gets * b_wins + w_gets * w_wins)
184 * = winner_gets - (b_gets * b_wins + (1 - b_gets) * (1 - b_wins))
185 * = winner_gets - (b_gets * b_wins + 1 - b_gets - b_wins + b_gets * b_wins)
186 * = winner_gets - (2 * b_gets * b_wins - b_gets - b_wins + 1) */
187 return node
->winner_owner
.value
188 - (2 * node
->black_owner
.value
* node
->u
.value
189 - node
->black_owner
.value
- node
->u
.value
+ 1);