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
|
/*
* This file is part of Freecell Solver. It is subject to the license terms in
* the COPYING.txt file found in the top-level directory of this distribution
* and at http://fc-solve.shlomifish.org/docs/distro/COPYING.html . No part of
* Freecell Solver, including this file, may be copied, modified, propagated,
* or distributed except according to the terms contained in the COPYING file.
*
* Copyright (c) 2000 Shlomi Fish
*/
// move.c - move and move stacks routines for Freecell Solver
#include "move.h"
#include "state.h"
#include "freecell-solver/fcs_enums.h"
#ifdef FCS_WITH_MOVES
#ifdef FCS_USE_COMPACT_MOVE_TOKENS
const fcs_internal_move fc_solve_empty_move = {0, 0, 0, 0};
#else
const fcs_internal_move fc_solve_empty_move = {"\0\0\0\0"};
#endif
/*
* This function performs a given move on a state
*/
void fc_solve_apply_move(fcs_state *const ptr_state_key,
fcs_state_locs_struct *const locs,
const fcs_internal_move move FREECELLS_AND_STACKS_ARGS())
{
fcs_cards_column col;
const int src = fcs_int_move_get_src(move);
const int dest = fcs_int_move_get_dest(move);
#define state_key (ptr_state_key)
switch (fcs_int_move_get_type(move))
{
case FCS_MOVE_TYPE_STACK_TO_STACK:
{
fcs_col_transfer_cards(fcs_state_get_col(*state_key, dest),
fcs_state_get_col(*state_key, src),
fcs_int_move_get_num_cards_in_seq(move));
}
break;
#if MAX_NUM_FREECELLS > 0
case FCS_MOVE_TYPE_FREECELL_TO_STACK:
fcs_state_push(state_key, dest, fcs_freecell_card(*state_key, src));
fcs_empty_freecell(*state_key, src);
break;
case FCS_MOVE_TYPE_FREECELL_TO_FREECELL:
{
fcs_card card = fcs_freecell_card(*state_key, src);
fcs_put_card_in_freecell(*state_key, dest, card);
fcs_empty_freecell(*state_key, src);
}
break;
case FCS_MOVE_TYPE_STACK_TO_FREECELL:
{
col = fcs_state_get_col(*state_key, src);
fcs_card card;
fcs_col_pop_card(col, card);
fcs_put_card_in_freecell(*state_key, dest, card);
}
break;
#endif
case FCS_MOVE_TYPE_STACK_TO_FOUNDATION:
col = fcs_state_get_col(*state_key, src);
fcs_col_pop_top(col);
fcs_increment_foundation(*state_key, dest);
break;
#if MAX_NUM_FREECELLS > 0
case FCS_MOVE_TYPE_FREECELL_TO_FOUNDATION:
fcs_empty_freecell(*state_key, src);
fcs_increment_foundation(*state_key, dest);
break;
#endif
#ifndef FCS_FREECELL_ONLY
case FCS_MOVE_TYPE_SEQ_TO_FOUNDATION:
col = fcs_state_get_col(*state_key, src);
for (int i = 0; i < 13; i++)
{
fcs_col_pop_top(col);
fcs_increment_foundation(*state_key, dest);
}
break;
#endif
case FCS_MOVE_TYPE_CANONIZE:
if (locs)
{
fc_solve_canonize_state_with_locs(state_key,
locs PASS_FREECELLS(freecells_num) PASS_STACKS(stacks_num));
}
else
{
fc_solve_canonize_state(state_key PASS_FREECELLS(freecells_num)
PASS_STACKS(stacks_num));
}
break;
}
#undef state_key
}
#endif
#define DERIVED_STATES_LIST_GROW_BY 16
void fc_solve_derived_states_list_add_state(fcs_derived_states_list *const list,
fcs_collectible_state *const state, const int context)
{
if ((!((list->num_states + (list->states != NULL)) &
(DERIVED_STATES_LIST_GROW_BY - 1))))
{
list->states =
SREALLOC(list->states, list->num_states + (list->states != NULL) +
DERIVED_STATES_LIST_GROW_BY);
}
list->states[list->num_states++] = (fcs_derived_states_list_item){
.state_ptr = state, .context.i = context};
}
|
