stoc.c revision 1.14 
1/*	$NetBSD: stoc.c,v 1.14 2022/05/15 22:00:11 rillig Exp $	*/
2
3/*
4 * Copyright (c) 1994
5 *	The Regents of the University of California.  All rights reserved.
6 *
7 * This code is derived from software contributed to Berkeley by
8 * Ralph Campbell.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in the
17 *    documentation and/or other materials provided with the distribution.
18 * 3. Neither the name of the University nor the names of its contributors
19 *    may be used to endorse or promote products derived from this software
20 *    without specific prior written permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
33 */
34
35#include <sys/cdefs.h>
36#ifndef lint
37#if 0
38static char sccsid[] = "@(#)stoc.c	8.1 (Berkeley) 7/24/94";
39#else
40__RCSID("$NetBSD: stoc.c,v 1.14 2022/05/15 22:00:11 rillig Exp $");
41#endif
42#endif /* not lint */
43
44#include <ctype.h>
45#include <stdlib.h>
46#include <string.h>
47#include "gomoku.h"
48
49const char	*letters	= "<ABCDEFGHJKLMNOPQRST>";
50
51struct mvstr {
52	int	m_code;
53	const char	*m_text;
54};
55static	const struct	mvstr	mv[] = {
56	{ RESIGN,	"resign" },
57	{ RESIGN,	"quit" },
58	{ SAVE,		"save" },
59	{ -1,		0 }
60};
61
62static int lton(int);
63
64
65/*
66 * Turn the spot number form of a move into the character form.
67 */
68const char *
69stoc(int s)
70{
71	static char buf[32];
72	int i;
73
74	for (i = 0; mv[i].m_code >= 0; i++)
75		if (s == mv[i].m_code)
76			return (mv[i].m_text);
77	snprintf(buf, sizeof(buf), "%c%d", letters[s % BSZ1], s / BSZ1);
78	return (buf);
79}
80
81/*
82 * Turn the character form of a move into the spot number form.
83 */
84int
85ctos(const char *mp)
86{
87	int i;
88
89	for (i = 0; mv[i].m_code >= 0; i++)
90		if (strcmp(mp, mv[i].m_text) == 0)
91			return (mv[i].m_code);
92	if (!isalpha((unsigned char)mp[0]))
93		return (ILLEGAL);
94	i = atoi(&mp[1]);
95	if (i < 1 || i > 19)
96		return (ILLEGAL);
97	return (PT(lton((unsigned char)mp[0]), i));
98}
99
100/*
101 * Turn a letter into a number.
102 */
103static int
104lton(int c)
105{
106	int i;
107
108	if (islower(c))
109		c = toupper(c);
110	for (i = 1; i <= BSZ && letters[i] != c; i++)
111		;
112	return (i);
113}
114