Hack to bypass timeseal decoder
[capablanca.git] / lasker-2.2.3 / src / gics.c
1 /*
2    This program is free software; you can redistribute it and/or modify
3    it under the terms of the GNU General Public License as published by
4    the Free Software Foundation; either version 2 of the License, or
5    (at your option) any later version.
6    
7    This program is distributed in the hope that it will be useful,
8    but WITHOUT ANY WARRANTY; without even the implied warranty of
9    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
10    GNU General Public License for more details.
11    
12    You should have received a copy of the GNU General Public License
13    along with this program; if not, write to the Free Software
14    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
15 */
16
17 /*
18  * FICS-Extensions used at GICS chess.unix-ag.uni-kl.de 5000
19  * (c) 1995/1996 by Ulrich Schlechte <Ulrich.Schlechte@ipp.tu-clausthal.de>
20  *                  Klaus Knopper <Knopper@unix-ag.uni-kl.de>
21  *
22  *
23 */
24
25 #include "includes.h"
26
27
28 void init_userstat(void)
29 {
30         FILE *fp;
31         int i;
32
33         if ((fp = fopen_s(STATS_DIR "/user.stats", "r")) == NULL) {
34                 bzero((char *) &gics_globals.userstat, sizeof(gics_globals.userstat));
35                 return;
36         }
37
38         for (i = 0; i < 48; i++) {
39                 fscanf(fp, "%d\n", &gics_globals.userstat.users[i]);
40         }
41         fscanf(fp, "%d\n", &gics_globals.userstat.usermax);
42         fscanf(fp, "%d\n", (int *) &gics_globals.userstat.usermaxtime);
43         fscanf(fp, "%d\n", &gics_globals.userstat.logins);
44         fscanf(fp, "%d\n", &gics_globals.userstat.games);
45         fscanf(fp, "%d\n", &gics_globals.userstat.gamemax);
46         fscanf(fp, "%d\n", (int *) &gics_globals.userstat.gamemaxtime);
47         fclose(fp);
48 }
49
50 void save_userstat(void)
51 {
52         FILE *fp;
53         int i;
54         
55         if ((fp = fopen_s(STATS_DIR "/user.stats", "w")) == NULL)
56                 return;
57         for (i = 0; i < 48; i++)
58                 fprintf(fp, "%d\n", gics_globals.userstat.users[i]);
59         fprintf(fp, "%d\n%d\n%d\n", 
60                 gics_globals.userstat.usermax, gics_globals.userstat.usermaxtime, gics_globals.userstat.logins);
61         fprintf(fp, "%d\n%d\n%d\n", 
62                 gics_globals.userstat.games, gics_globals.userstat.gamemax, gics_globals.userstat.gamemaxtime);
63         fclose(fp);
64 }
65
66 #if 0
67 int com_ping(int p, param_list param)
68 {
69   int p1;
70   struct timeval timeState;
71   struct timezone tz;
72
73   if ((p1 = player_find_bylogin(param[0].val.word)) < 0) {
74     pprintf(p, "Player \"%s\" not logged on!\n", param[0].val.word);
75     return COM_OK;
76   }
77   if ((!con[player_globals.parray[p1].socket].timeseal) || (con[player_globals.parray[p1].socket].method)) {
78     pprintf(p, "%s is not using timeseal or uses an old client.\n", player_globals.parray[p1].name);
79     return COM_OK;
80   }
81   pprintf(p1, "\n[P]\n");
82   gettimeofday(&timeState, &tz);
83   con[player_globals.parray[p1].socket].pingtime = (((int) timeState.tv_sec % 10000) * 1000) + ((int) timeState.tv_usec / 1000);
84   con[player_globals.parray[p1].socket].pingplayer = p;
85   return COM_OK;
86 }
87 #endif
88
89 void game_save_playerratio(char *file, char *Opponent, int Result, int rated)
90 {
91   FILE *fp, *fp1;
92   char Name[32], file1[256];
93   int win, loss, draw, flag = 0, inc = 1;
94
95   if (!rated)
96     inc = 100000;
97
98   sprintf(file1, "%s.new", file);
99   if ((fp = fopen_s(file, "r")) != NULL) {
100     fp1 = fopen_s(file1, "w");
101     while (!feof(fp)) {
102       if (fscanf(fp, "%s %d %d %d\n", Name, &win, &draw, &loss) != 4) {
103         break;
104       }
105       if (strcasecmp(Name, Opponent) == 0) {
106         if (Result == 1)
107           win += inc;
108         if (Result == 0)
109           loss += inc;
110         if (Result == -1)
111           draw += inc;
112         flag++;
113       }
114       fprintf(fp1, "%s %d %d %d\n", Name, win, draw, loss);
115     }
116     fclose(fp);
117     if (!flag) {
118       win = loss = draw = 0;
119       if (Result == 1)
120         win += inc;
121       if (Result == 0)
122         loss += inc;
123       if (Result == -1)
124         draw += inc;
125       fprintf(fp1, "%s %d %d %d\n", Opponent, win, draw, loss);
126     }
127     fclose(fp1);
128     unlink(file);
129     if (rename(file1, file) != 0) {
130       d_printf("CHESSD: Problems rename %s to %s : %d\n", file1, file, errno);
131       return;
132     }
133     return;
134   } else {
135     fp = fopen_s(file, "w");
136     if(fp == NULL) {
137         perror("fopen");
138         d_printf("Unable to open %s - very bad, info not saved\n",file);
139         return;
140     }
141     win = loss = draw = 0;
142     if (Result == 1)
143       win += inc;
144     if (Result == 0)
145       loss += inc;
146     if (Result == -1)
147       draw += inc;
148     fprintf(fp, "%s %d %d %d\n", Opponent, win, draw, loss);
149     fclose(fp);
150   }
151 }
152
153 int com_pstat(int p, param_list param)
154 {
155   struct player *pp = &player_globals.parray[p];
156   int p1 = p, p2, ptemp, pflag=0;
157   int p1_connected = 1, p2_connected = 1;
158   int win = 0, draw = 0, loss = 0, flag = 0;
159   FILE *fp;
160   char Name[32], fname[256];
161
162   if (param[0].type == TYPE_NULL) {
163     if (pp->game < 0) {
164       pprintf(p, "You are not playing a game.\n");
165       return COM_OK;
166     }
167     if (game_globals.garray[pp->game].status == GAME_EXAMINE) {
168       pprintf(p, "You are examining a game please specify variables.\n");
169       return COM_OK;
170     }
171     p2 = pp->opponent;
172   } else {
173     if (!FindPlayer(p, param[0].val.word, &p2, &p2_connected)) {
174       pprintf(p, "No user named \"%s\" is logged in.\n", param[0].val.word);
175       return COM_OK;
176     }
177     if (param[1].type != TYPE_NULL) {
178       if (!FindPlayer(p, param[1].val.word, &p1, &p1_connected)) {
179         pprintf(p, "No user named \"%s\" is logged in.\n", param[1].val.word);
180         if (!p2_connected)
181           player_remove(p2);
182         return COM_OK;
183       }
184       ptemp = p2;
185       p2 = p1;
186       p1 = ptemp;
187       pflag = 1;
188     }
189   }
190   if (p1 == p2) {
191     pprintf(p, "You have not played against yourself ;-)\n");
192     if (!p1_connected)
193       player_remove(p1);
194     if (!p2_connected)
195       player_remove(p2);
196     return COM_OK;
197   }
198   sprintf(fname, "%s/player_data/%c/%s.gstats", STATS_DIR, player_globals.parray[p1].login[0], player_globals.parray[p1].login);
199   if ((fp = fopen_s(fname, "r")) != NULL) {
200     while (!feof(fp)) {
201       if (fscanf(fp, "%s %d %d %d\n", Name, &win, &draw, &loss) != 4) {
202         win = loss = draw = 0;
203         break;
204       }
205       if (strcasecmp(Name, player_globals.parray[p2].name) == 0) {
206         flag++;
207         break;
208       }
209     }
210     fclose(fp);
211   }
212   if (!flag)
213     win = loss = draw = 0;
214   pprintf(p, "Record for %s vs. %s:\n", player_globals.parray[p1].name, player_globals.parray[p2].name);
215   pprintf(p, "                            wins     losses     draws\n");
216   pprintf(p, "                rated       %4d       %4d      %4d\n", win % 100000, loss % 100000, draw % 100000);
217   pprintf(p, "              unrated       %4d       %4d      %4d\n", win / 100000, loss / 100000, draw / 100000);
218   /*  pprintf(p, "Ratio of %s vs. %s (r/u): %d/%d wins %d/%d draws %d/%d losses\n", player_globals.parray[p1].name, player_globals.parray[p2].name,
219    *      win % 100000, win / 100000, draw % 100000, draw / 100000, loss % 100000, loss / 100000);
220    */
221   if (pflag) {
222     ptemp = p1;
223     p1 = p2;
224     p2 = ptemp;
225   }
226   if (!p1_connected)
227     player_remove(p1);
228   if (!p2_connected)
229     player_remove(p2);
230   return COM_OK;
231 }
232
233
234
235
236
237
238
239
240