1 /* $NetBSD: save.c,v 1.12 2006/03/18 23:25:30 christos Exp $ */ 2 3 /* 4 * Copyright (c) 1980, 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[] = "@(#)save.c 8.1 (Berkeley) 5/31/93"; 36 #else 37 __RCSID("$NetBSD: save.c,v 1.12 2006/03/18 23:25:30 christos Exp $"); 38 #endif 39 #endif /* not lint */ 40 41 #include <errno.h> 42 43 #include "back.h" 44 45 static const char confirm[] = "Are you sure you want to leave now?"; 46 static const char prompt[] = "Enter a file name: "; 47 static const char exist1[] = "The file '"; 48 static const char exist2[] = 49 "' already exists.\nAre you sure you want to use this file?"; 50 static const char cantuse[] = "\nCan't use "; 51 static const char saved[] = "This game has been saved on the file '"; 52 static const char type[] = "'.\nType \"backgammon "; 53 static const char rec[] = "\" to recover your game.\n\n"; 54 static const char cantrec[] = "Can't recover file: "; 55 56 void 57 save(int n) 58 { 59 int fdesc; 60 char *fs; 61 char fname[50]; 62 63 if (n) { 64 if (tflag) { 65 curmove(20, 0); 66 clend(); 67 } else 68 writec('\n'); 69 writel(confirm); 70 if (!yorn(0)) 71 return; 72 } 73 cflag = 1; 74 for (;;) { 75 writel(prompt); 76 fs = fname; 77 while ((*fs = readc()) != '\n') { 78 if (*fs == old.c_cc[VERASE]) { 79 if (fs > fname) { 80 fs--; 81 if (tflag) 82 curmove(curr, curc - 1); 83 else 84 writec(*fs); 85 } else 86 writec('\007'); 87 continue; 88 } 89 writec(*fs++); 90 } 91 *fs = '\0'; 92 if ((fdesc = open(fname, O_RDWR)) == -1 && errno == ENOENT) { 93 if ((fdesc = creat(fname, 0600)) != -1) 94 break; 95 } 96 if (fdesc != -1) { 97 if (tflag) { 98 curmove(18, 0); 99 clend(); 100 } else 101 writec('\n'); 102 writel(exist1); 103 writel(fname); 104 writel(exist2); 105 cflag = 0; 106 close(fdesc); 107 if (yorn(0)) { 108 unlink(fname); 109 fdesc = creat(fname, 0600); 110 break; 111 } else { 112 cflag = 1; 113 continue; 114 } 115 } 116 writel(cantuse); 117 writel(fname); 118 writel(".\n"); 119 cflag = 1; 120 } 121 write(fdesc, board, sizeof board); 122 write(fdesc, off, sizeof off); 123 write(fdesc, in, sizeof in); 124 write(fdesc, dice, sizeof dice); 125 write(fdesc, &cturn, sizeof cturn); 126 write(fdesc, &dlast, sizeof dlast); 127 write(fdesc, &pnum, sizeof pnum); 128 write(fdesc, &rscore, sizeof rscore); 129 write(fdesc, &wscore, sizeof wscore); 130 write(fdesc, &gvalue, sizeof gvalue); 131 write(fdesc, &raflag, sizeof raflag); 132 close(fdesc); 133 if (tflag) 134 curmove(18, 0); 135 writel(saved); 136 writel(fname); 137 writel(type); 138 writel(fname); 139 writel(rec); 140 if (tflag) 141 clend(); 142 getout(0); 143 } 144 145 void 146 recover(const char *s) 147 { 148 int fdesc; 149 150 if ((fdesc = open(s, O_RDONLY)) == -1) 151 norec(s); 152 read(fdesc, board, sizeof board); 153 read(fdesc, off, sizeof off); 154 read(fdesc, in, sizeof in); 155 read(fdesc, dice, sizeof dice); 156 read(fdesc, &cturn, sizeof cturn); 157 read(fdesc, &dlast, sizeof dlast); 158 read(fdesc, &pnum, sizeof pnum); 159 read(fdesc, &rscore, sizeof rscore); 160 read(fdesc, &wscore, sizeof wscore); 161 read(fdesc, &gvalue, sizeof gvalue); 162 read(fdesc, &raflag, sizeof raflag); 163 close(fdesc); 164 rflag = 1; 165 } 166 167 void 168 norec(const char *s) 169 { 170 const char *c; 171 172 tflag = 0; 173 writel(cantrec); 174 c = s; 175 while (*c != '\0') 176 writec(*c++); 177 getout(0); 178 } 179