xref: /openbsd/games/mille/varpush.c (revision 404b540a)
1 /*	$OpenBSD: varpush.c,v 1.6 2003/06/03 03:01:40 millert Exp $	*/
2 /*	$NetBSD: varpush.c,v 1.4 1995/03/24 05:02:35 cgd Exp $	*/
3 
4 /*
5  * Copyright (c) 1982, 1993
6  *	The Regents of the University of California.  All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. Neither the name of the University nor the names of its contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32 
33 #ifndef lint
34 #if 0
35 static char sccsid[] = "@(#)varpush.c	8.1 (Berkeley) 5/31/93";
36 #else
37 static char rcsid[] = "$OpenBSD: varpush.c,v 1.6 2003/06/03 03:01:40 millert 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 
79 	if (func == readv) {
80 		if ((read(file, (void *) &temp, sizeof temp)) < 0) {
81 			error(strerror(errno));
82 			return FALSE;
83 		}
84 		Topcard = &Deck[temp];
85 #ifdef DEBUG
86 		if (Debug) {
87 			char	buf[80];
88 over:
89 			printf("Debug file:");
90 			fgets(buf, sizeof(buf), stdin);
91 			if ((outf = fopen(buf, "w")) == NULL) {
92 				warn("%s", buf);
93 				goto over;
94 			}
95 			if (strcmp(buf, _PATH_DEVNULL) != 0)
96 				setbuf(outf, (char *)NULL);
97 		}
98 #endif
99 	} else {
100 		temp = Topcard - Deck;
101 		if ((write(file, (void *) &temp, sizeof temp)) < 0) {
102 			error(strerror(errno));
103 			return FALSE;
104 		}
105 	}
106 	return TRUE;
107 }
108