player.cc revision 1.3 1 1.3 rillig /* $NetBSD: player.cc,v 1.3 2021/12/05 09:22:45 rillig Exp $ */
2 1.1 christos
3 1.1 christos /*-
4 1.1 christos * Copyright (c) 2003 The NetBSD Foundation, Inc.
5 1.1 christos * All rights reserved.
6 1.1 christos *
7 1.1 christos * This code is derived from software contributed to The NetBSD Foundation
8 1.1 christos * by Christos Zoulas.
9 1.1 christos *
10 1.1 christos * Redistribution and use in source and binary forms, with or without
11 1.1 christos * modification, are permitted provided that the following conditions
12 1.1 christos * are met:
13 1.1 christos * 1. Redistributions of source code must retain the above copyright
14 1.1 christos * notice, this list of conditions and the following disclaimer.
15 1.1 christos * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 christos * notice, this list of conditions and the following disclaimer in the
17 1.1 christos * documentation and/or other materials provided with the distribution.
18 1.1 christos *
19 1.1 christos * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.1 christos * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 christos * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 christos * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.1 christos * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.1 christos * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.1 christos * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.1 christos * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 christos * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 christos * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 christos * POSSIBILITY OF SUCH DAMAGE.
30 1.1 christos */
31 1.1 christos
32 1.1 christos /*
33 1.3 rillig * Player base class
34 1.1 christos */
35 1.1 christos
36 1.1 christos #include "defs.h"
37 1.3 rillig RCSID("$NetBSD: player.cc,v 1.3 2021/12/05 09:22:45 rillig Exp $")
38 1.1 christos
39 1.1 christos #include "board.h"
40 1.1 christos #include "player.h"
41 1.1 christos
42 1.1 christos PLAYER::PLAYER(char who) :
43 1.1 christos _who(who),
44 1.1 christos _score(0),
45 1.1 christos _total(0),
46 1.1 christos _games(0),
47 1.1 christos _ties(0)
48 1.1 christos {
49 1.1 christos }
50 1.1 christos
51 1.1 christos void PLAYER::init(void)
52 1.1 christos {
53 1.1 christos _score = 0;
54 1.1 christos }
55 1.1 christos
56 1.1 christos void PLAYER::wl(size_t sc)
57 1.1 christos {
58 1.1 christos _total += _score;
59 1.1 christos _games += sc < _score;
60 1.1 christos _ties += sc == _score;
61 1.1 christos }
62 1.1 christos
63 1.1 christos int PLAYER::domove(BOARD& b)
64 1.1 christos {
65 1.1 christos size_t y, x;
66 1.1 christos int dir;
67 1.1 christos int score;
68 1.1 christos
69 1.1 christos for (;;) {
70 1.1 christos if (b.full())
71 1.1 christos return 0;
72 1.1 christos
73 1.1 christos play(b, y, x, dir);
74 1.1 christos
75 1.1 christos switch (score = b.domove(y, x, dir, _who)) {
76 1.1 christos case 0:
77 1.1 christos // No closure
78 1.1 christos return 1;
79 1.1 christos
80 1.1 christos case -1:
81 1.1 christos // Not a valid move
82 1.1 christos b.bell();
83 1.1 christos break;
84 1.1 christos
85 1.1 christos default:
86 1.1 christos // Closure, play again
87 1.1 christos _score += score;
88 1.1 christos break;
89 1.1 christos }
90 1.1 christos }
91 1.1 christos }
92