xref: /netbsd-src/games/mille/varpush.c (revision e77448e07be3174235c13f58032a0d6d0ab7638d)
1 /*	$NetBSD: varpush.c,v 1.8 2004/01/27 20:30:30 jsm Exp $	*/
2 
3 /*
4  * Copyright (c) 1982, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  */
31 
32 #include <sys/cdefs.h>
33 #ifndef lint
34 #if 0
35 static char sccsid[] = "@(#)varpush.c	8.1 (Berkeley) 5/31/93";
36 #else
37 __RCSID("$NetBSD: varpush.c,v 1.8 2004/01/27 20:30:30 jsm Exp $");
38 #endif
39 #endif /* not lint */
40 
41 # include	<paths.h>
42 # include	"mille.h"
43 
44 /*
45  * @(#)varpush.c	1.1 (Berkeley) 4/1/82
46  */
47 
48 /*
49  *	push variables around via the routine func() on the file
50  * channel file.  func() is either read or write.
51  */
52 bool
53 varpush(file, func)
54 	int	file;
55 	ssize_t	(*func)(int, const struct iovec *, int);
56 {
57 	int		temp;
58 	const struct iovec vec[] = {
59 		{ (void *) &Debug, sizeof Debug },
60 		{ (void *) &Finished, sizeof Finished },
61 		{ (void *) &Order, sizeof Order },
62 		{ (void *) &End, sizeof End },
63 		{ (void *) &On_exit, sizeof On_exit },
64 		{ (void *) &Handstart, sizeof Handstart },
65 		{ (void *) &Numgos, sizeof Numgos },
66 		{ (void *) Numseen, sizeof Numseen },
67 		{ (void *) &Play, sizeof Play },
68 		{ (void *) &Window, sizeof Window },
69 		{ (void *) Deck, sizeof Deck },
70 		{ (void *) &Discard, sizeof Discard },
71 		{ (void *) Player, sizeof Player }
72 	};
73 
74 	if (((func)(file, vec, sizeof(vec) / sizeof(vec[0]))) < 0) {
75 		error(strerror(errno));
76 		return FALSE;
77 	}
78 	if (func == readv) {
79 		if ((read(file, (void *) &temp, sizeof temp)) < 0) {
80 			error(strerror(errno));
81 			return FALSE;
82 		}
83 		Topcard = &Deck[temp];
84 #ifdef DEBUG
85 		if (Debug) {
86 			char	buf[80];
87 over:
88 			printf("Debug file:");
89 			gets(buf);
90 			if ((outf = fopen(buf, "w")) == NULL) {
91 				warn("%s", buf);
92 				goto over;
93 			}
94 			if (strcmp(buf, _PATH_DEVNULL) != 0)
95 				setbuf(outf, (char *)NULL);
96 		}
97 #endif
98 	} else {
99 		temp = Topcard - Deck;
100 		if ((write(file, (void *) &temp, sizeof temp)) < 0) {
101 			error(strerror(errno));
102 			return FALSE;
103 		}
104 	}
105 	return TRUE;
106 }
107