Initial import from FreeBSD RELENG_4:
[dragonfly.git] / games / robots / score.c
1 /*
2  * Copyright (c) 1980, 1993
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by the University of
16  *      California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33
34 #ifndef lint
35 #if 0
36 static char sccsid[] = "@(#)score.c     8.1 (Berkeley) 5/31/93";
37 #endif
38 static const char rcsid[] =
39  "$FreeBSD: src/games/robots/score.c,v 1.5 1999/11/30 03:49:20 billf Exp $";
40 #endif /* not lint */
41
42 # include       "robots.h"
43 # include       <sys/types.h>
44 # include       <pwd.h>
45 # include       "pathnames.h"
46
47 typedef struct {
48         int     s_uid;
49         int     s_score;
50         char    s_name[MAXNAME];
51 } SCORE;
52
53 typedef struct passwd   PASSWD;
54
55 char    *Scorefile = _PATH_SCORE;
56
57 int     Max_per_uid = MAX_PER_UID;
58
59 static SCORE    Top[MAXSCORES];
60
61 /*
62  * score:
63  *      Post the player's score, if reasonable, and then print out the
64  *      top list.
65  */
66 score()
67 {
68         int     inf;
69         SCORE   *scp;
70         int     uid;
71         bool    done_show = FALSE;
72         static int      numscores, max_uid;
73
74         Newscore = FALSE;
75         if ((inf = open(Scorefile, 2)) < 0) {
76                 perror(Scorefile);
77                 return;
78         }
79
80         if (read(inf, &max_uid, sizeof max_uid) == sizeof max_uid)
81                 read(inf, Top, sizeof Top);
82         else {
83                 for (scp = Top; scp < &Top[MAXSCORES]; scp++)
84                         scp->s_score = -1;
85                 max_uid = Max_per_uid;
86         }
87
88         uid = getuid();
89         if (Top[MAXSCORES-1].s_score <= Score) {
90                 numscores = 0;
91                 for (scp = Top; scp < &Top[MAXSCORES]; scp++)
92                         if (scp->s_score < 0 ||
93                             (scp->s_uid == uid && ++numscores == max_uid)) {
94                                 if (scp->s_score > Score)
95                                         break;
96                                 scp->s_score = Score;
97                                 scp->s_uid = uid;
98                                 set_name(scp);
99                                 Newscore = TRUE;
100                                 break;
101                         }
102                 if (scp == &Top[MAXSCORES]) {
103                         Top[MAXSCORES-1].s_score = Score;
104                         Top[MAXSCORES-1].s_uid = uid;
105                         set_name(&Top[MAXSCORES-1]);
106                         Newscore = TRUE;
107                 }
108                 if (Newscore)
109                         qsort(Top, MAXSCORES, sizeof Top[0], cmp_sc);
110         }
111
112         if (!Newscore) {
113                 Full_clear = FALSE;
114                 close(inf);
115                 return;
116         }
117         else
118                 Full_clear = TRUE;
119
120         for (scp = Top; scp < &Top[MAXSCORES]; scp++) {
121                 if (scp->s_score < 0)
122                         break;
123                 move((scp - Top) + 1, 15);
124                 if (!done_show && scp->s_uid == uid && scp->s_score == Score)
125                         standout();
126                 printw(" %d\t%d\t%-8.8s ", (scp - Top) + 1, scp->s_score, scp->s_name);
127                 if (!done_show && scp->s_uid == uid && scp->s_score == Score) {
128                         standend();
129                         done_show = TRUE;
130                 }
131         }
132         Num_scores = scp - Top;
133         refresh();
134
135         if (Newscore) {
136                 lseek(inf, 0L, 0);
137                 write(inf, &max_uid, sizeof max_uid);
138                 write(inf, Top, sizeof Top);
139         }
140         close(inf);
141 }
142
143 set_name(scp)
144 SCORE   *scp;
145 {
146         PASSWD  *pp;
147
148         if ((pp = getpwuid(scp->s_uid)) == NULL)
149                 pp->pw_name = "???";
150         strncpy(scp->s_name, pp->pw_name, MAXNAME);
151 }
152
153 /*
154  * cmp_sc:
155  *      Compare two scores.
156  */
157 cmp_sc(s1, s2)
158 SCORE   *s1, *s2;
159 {
160         return s2->s_score - s1->s_score;
161 }
162
163 /*
164  * show_score:
165  *      Show the score list for the '-s' option.
166  */
167 show_score()
168 {
169         SCORE   *scp;
170         int     inf;
171         static int      max_score;
172
173         if ((inf = open(Scorefile, 0)) < 0) {
174                 perror(Scorefile);
175                 return;
176         }
177
178         for (scp = Top; scp < &Top[MAXSCORES]; scp++)
179                 scp->s_score = -1;
180
181         read(inf, &max_score, sizeof max_score);
182         read(inf, Top, sizeof Top);
183         close(inf);
184         inf = 1;
185         for (scp = Top; scp < &Top[MAXSCORES]; scp++)
186                 if (scp->s_score >= 0)
187                         printf("%d\t%d\t%.*s\n", inf++, scp->s_score,
188                             (int)sizeof(scp->s_name), scp->s_name);
189 }