Update sr.po translation
[xboard.git] / ngamelist.c
1 /*
2  * ngamelist.c -- Game list window, Xt-independent front-end code for XBoard
3  *
4  * Copyright 1995, 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016 Free Software Foundation, Inc.
5  * ------------------------------------------------------------------------
6  *
7  * GNU XBoard is free software: you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation, either version 3 of the License, or (at
10  * your option) any later version.
11  *
12  * GNU XBoard is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15  * General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program. If not, see http://www.gnu.org/licenses/.  *
19  *
20  *------------------------------------------------------------------------
21  ** See the file ChangeLog for a revision history.  */
22
23 #include "config.h"
24
25 #include <stdio.h>
26 #include <ctype.h>
27 #include <errno.h>
28 #include <sys/types.h>
29
30 #if STDC_HEADERS
31 # include <stdlib.h>
32 # include <string.h>
33 #else /* not STDC_HEADERS */
34 extern char *getenv();
35 # if HAVE_STRING_H
36 #  include <string.h>
37 # else /* not HAVE_STRING_H */
38 #  include <strings.h>
39 # endif /* not HAVE_STRING_H */
40 #endif /* not STDC_HEADERS */
41
42 #if HAVE_UNISTD_H
43 # include <unistd.h>
44 #endif
45
46 #include "common.h"
47 #include "frontend.h"
48 #include "backend.h"
49 #include "dialogs.h"
50 #include "menus.h"
51 #include "gettext.h"
52
53 #ifdef ENABLE_NLS
54 # define  _(s) gettext (s)
55 # define N_(s) gettext_noop (s)
56 #else
57 # define  _(s) (s)
58 # define N_(s)  s
59 #endif
60
61
62 static char filterString[MSG_SIZ];
63 static int listLength, wins, losses, draws, page;
64 int narrowFlag;
65
66
67 typedef struct {
68     short int x, y;
69     short int w, h;
70     FILE *fp;
71     char *filename;
72     char **strings;
73 } GameListClosure;
74 static GameListClosure *glc = NULL;
75
76 static char *filterPtr;
77 static char *list[1003];
78 static int listEnd;
79
80 static int GameListPrepare P((int byPos, int narrow));
81 static void GameListReplace P((int page));
82 static void GL_Button P((int n));
83
84 Option gamesOptions[] = {
85 { 200,  LR|TB,     400, NULL, (void*) list,       NULL, NULL, ListBox, "", &appData.gameListFont },
86 {   0,  0,         100, NULL, (void*) &filterPtr, "", NULL, TextBox, "" },
87 {   4,  SAME_ROW,    0, NULL, (void*) &GL_Button, NULL, NULL, Button, N_("find position") },
88 {   2,  SAME_ROW,    0, NULL, (void*) &GL_Button, NULL, NULL, Button, N_("narrow") }, // buttons referred to by ID in value (=first) field!
89 {   3,  SAME_ROW,    0, NULL, (void*) &GL_Button, NULL, NULL, Button, N_("thresholds") },
90 {   9,  SAME_ROW,    0, NULL, (void*) &GL_Button, NULL, NULL, Button, N_("tags") },
91 {   5,  SAME_ROW,    0, NULL, (void*) &GL_Button, NULL, NULL, Button, N_("next") },
92 {   6,  SAME_ROW,    0, NULL, (void*) &GL_Button, NULL, NULL, Button, N_("close") },
93 {   0,  SAME_ROW | NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
94 };
95
96 static void
97 GL_Button (int n)
98 {
99     int index;
100     n = gamesOptions[n].value; // use marker in option rather than n itself, for more easy adding/deletng of buttons
101     if (n == 6) { // close
102         PopDown(GameListDlg);
103         return;
104     }
105     if (n == 3) { // thresholds
106         LoadOptionsPopUp(GameListDlg);
107         return;
108     }
109     if (n == 9) { // tags
110         GameListOptionsPopUp(GameListDlg);
111         return;
112     }
113     index = SelectedListBoxItem(&gamesOptions[0]);
114     if (n == 7) { // load
115         if (index < 0) {
116             DisplayError(_("No game selected"), 0);
117             return;
118         }
119     } else if (n == 5) { // next
120         index++;
121         if (index >= listLength || !list[index]) {
122             DisplayError(_("Can't go forward any further"), 0);
123             return;
124         }
125         HighlightWithScroll(&gamesOptions[0], index, listEnd);
126     } else if (n == 8) { // prev
127         index--;
128         if (index < 0) {
129             DisplayError(_("Can't back up any further"), 0);
130             return;
131         }
132         HighlightWithScroll(&gamesOptions[0], index, listEnd);
133     } else if (n == 2 || // narrow
134                n == 4) { // find position
135         char *text;
136         GetWidgetText(&gamesOptions[1], &text);
137         safeStrCpy(filterString, text, sizeof(filterString)/sizeof(filterString[0]));
138         GameListPrepare(True, n == 2); GameListReplace(0);
139         return;
140     }
141
142     index = atoi(list[index])-1; // [HGM] filter: read true index from sequence nr of line
143     if (cmailMsgLoaded) {
144         CmailLoadGame(glc->fp, index + 1, glc->filename, True);
145     } else {
146         LoadGame(glc->fp, index + 1, glc->filename, True);
147     }
148 }
149
150 static int
151 GameListCreate (char *name)
152 {
153     int new;
154     if(new = GenericPopUp(gamesOptions, name, GameListDlg, BoardWindow, NONMODAL, appData.topLevel))
155         AddHandler(&gamesOptions[1], GameListDlg, 4),
156         AddHandler(&gamesOptions[0], GameListDlg, 5);
157     FocusOnWidget(&gamesOptions[0], GameListDlg);
158     return new;
159 }
160
161 static int
162 GameListPrepare (int byPos, int narrow)
163 {   // [HGM] filter: put in separate routine, to make callable from call-back
164     int nstrings;
165     ListGame *lg;
166     char **st, *line;
167     TimeMark t, t2;
168
169     GetTimeMark(&t);
170     if(st = glc->strings) while(*st) free(*st++);
171     nstrings = ((ListGame *) gameList.tailPred)->number;
172     glc->strings = (char **) malloc((nstrings + 1) * sizeof(char *));
173     st = glc->strings;
174     lg = (ListGame *) gameList.head;
175     listLength = wins = losses = draws = 0;
176     if(byPos) InitSearch();
177     while (nstrings--) {
178         int pos = -1;
179         if(!narrow || lg->position >= 0) { // only consider already selected positions when narrowing
180           line = GameListLine(lg->number, &lg->gameInfo);
181           if((filterString[0] == NULLCHAR || SearchPattern( line, filterString )) && (!byPos || (pos=GameContainsPosition(glc->fp, lg)) >= 0) ) {
182             *st++ = line; // [HGM] filter: make adding line conditional.
183             listLength++;
184             if( lg->gameInfo.result == WhiteWins ) wins++; else
185             if( lg->gameInfo.result == BlackWins ) losses++; else
186             if( lg->gameInfo.result == GameIsDrawn ) draws++;
187             if(!byPos) pos = 0; // indicate selected
188           }
189         }
190         if(lg->number % 2000 == 0) {
191             char buf[MSG_SIZ];
192             snprintf(buf, MSG_SIZ, _("Scanning through games (%d)"), lg->number);
193             DisplayTitle(buf); DoEvents();
194         }
195         lg->position = pos;
196         lg = (ListGame *) lg->node.succ;
197     }
198     if(appData.debugMode) { GetTimeMark(&t2);printf("GameListPrepare %ld msec\n", SubtractTimeMarks(&t2,&t)); }
199     DisplayTitle("XBoard");
200     *st = NULL;
201     return listLength;
202 }
203
204 static void
205 GameListReplace (int page)
206 {
207   // filter: put in separate routine, to make callable from call-back
208   char buf[MSG_SIZ], **st=list;
209   int i;
210
211   if(page) *st++ = _("previous page"); else if(listLength > 1000) *st++ = "";
212   for(i=0; i<1000; i++) if( !(*st++ = glc->strings[page+i]) ) { st--; break; }
213   listEnd = st - list;
214   if(page + 1000 <= listLength) *st++ = _("next page");
215   *st = NULL;
216
217   LoadListBox(&gamesOptions[0], _("no games matched your request"), -1, -1);
218   HighlightWithScroll(&gamesOptions[0], listEnd > 1000, listEnd);
219   snprintf(buf, MSG_SIZ, _("%s - %d/%d games (%d-%d-%d)"), glc->filename, listLength, ((ListGame *) gameList.tailPred)->number, wins, losses, draws);
220   SetDialogTitle(GameListDlg, buf);
221 }
222
223 void
224 GameListUpdate ()
225 {
226     if(!DialogExists(GameListDlg)) return;
227     GameListPrepare(False, False);
228     GameListReplace(0);
229 }
230
231 void
232 GameListPopUp (FILE *fp, char *filename)
233 {
234     if (glc == NULL) {
235         glc = (GameListClosure *) calloc(1, sizeof(GameListClosure));
236         glc->x = glc->y = -1;
237         glc->filename = NULL;
238     }
239
240     GameListPrepare(False, False); // [HGM] filter: code put in separate routine
241
242     glc->fp = fp;
243
244     if (glc->filename != NULL) free(glc->filename);
245     glc->filename = StrSave(filename);
246
247     if (!GameListCreate(filename))
248         SetIconName(GameListDlg, filename);
249
250     page = 0;
251     GameListReplace(0); // [HGM] filter: code put in separate routine, and also called to set title
252     MarkMenu("View.GameList", GameListDlg);
253     EnableNamedMenuItem("File.SaveSelected", TRUE);
254 }
255
256 FILE *
257 GameFile ()
258 {
259   return glc ? glc->fp : NULL;
260 }
261
262 void
263 GameListDestroy ()
264 {
265     if (glc == NULL) return;
266     EnableNamedMenuItem("File.SaveSelected", FALSE);
267     PopDown(GameListDlg);
268     if (glc->strings != NULL) {
269         char **st;
270         st = glc->strings;
271         while (*st) {
272             free(*st++);
273         }
274         free(glc->strings);
275     }
276     free(glc);
277     glc = NULL;
278 }
279
280 void
281 ShowGameListProc ()
282 {
283     if (glc == NULL) {
284         DisplayError(_("There is no game list"), 0);
285         return;
286     }
287     if (shellUp[GameListDlg]) {
288         PopDown(GameListDlg);
289         return;
290     }
291     GenericPopUp(NULL, NULL, GameListDlg, BoardWindow, NONMODAL, appData.topLevel); // first two args ignored when shell exists!
292     MarkMenu("View.GameList", GameListDlg);
293     GameListHighlight(lastLoadGameNumber);
294 }
295
296 int
297 GameListClicks (int direction)
298 {
299     int index;
300
301     if (glc == NULL || listLength == 0) return 1;
302     if(direction == 100) { FocusOnWidget(&gamesOptions[0], GameListDlg); return 1; }
303     index = SelectedListBoxItem(&gamesOptions[0]);
304
305     if (index < 0) return 1;
306     if(page && (index == 0 && direction < 1 || direction == -4)) {
307         page -= 1000;
308         if(page < 0) page = 0; // safety
309         GameListReplace(page);
310         return 1;
311     }
312     if(index == 1001 && direction >= 0 || listEnd == 1001 && direction == 4) {
313         page += 1000;
314         GameListReplace(page);
315         return 1;
316     }
317
318     if(direction != 0) {
319         int doLoad = abs(direction) == 3;
320         if(doLoad) direction /= 3;
321         index += direction;
322         if(direction < -1) index = 0;
323         if(direction >  1) index = listEnd-1;
324         if(index < 0 || index >= listEnd) return 1;
325         HighlightWithScroll(&gamesOptions[0], index, listEnd);
326         if(!doLoad) return 1;
327     }
328     index = atoi(list[index])-1; // [HGM] filter: read true index from sequence nr of line
329     if (cmailMsgLoaded) {
330         CmailLoadGame(glc->fp, index + 1, glc->filename, True);
331     } else {
332         LoadGame(glc->fp, index + 1, glc->filename, True);
333     }
334     return 0;
335 }
336
337 void
338 SetFilter ()
339 {
340         char *name;
341         GetWidgetText(&gamesOptions[1], &name);
342         safeStrCpy(filterString, name, sizeof(filterString)/sizeof(filterString[0]));
343         GameListPrepare(False, False); GameListReplace(0);
344         UnCaret(); // filter text-edit
345         FocusOnWidget(&gamesOptions[0], GameListDlg); // listbox
346 }
347
348 void
349 GameListHighlight (int index)
350 {
351     int i=0; char **st;
352     if (!shellUp[GameListDlg]) return;
353     st = list;
354     while(*st && atoi(*st)<index) st++,i++;
355     HighlightWithScroll(&gamesOptions[0], i, listEnd);
356 }
357
358 int
359 SaveGameListAsText (FILE *f)
360 {
361     ListGame * lg = (ListGame *) gameList.head;
362     int nItem;
363
364     if( !glc || ((ListGame *) gameList.tailPred)->number <= 0 ) {
365       DisplayError(_("Game list not loaded or empty"), 0);
366         return False;
367     }
368
369     /* Copy the list into the global memory block */
370     if( f != NULL ) {
371
372         lg = (ListGame *) gameList.head;
373
374         for (nItem = 0; nItem < ((ListGame *) gameList.tailPred)->number; nItem++){
375             char * st = GameListLineFull(lg->number, &lg->gameInfo);
376             char *line = GameListLine(lg->number, &lg->gameInfo);
377             if(filterString[0] == NULLCHAR || SearchPattern( line, filterString ) )
378                     fprintf( f, "%s\n", st );
379             free(st); free(line);
380             lg = (ListGame *) lg->node.succ;
381         }
382
383         fclose(f);
384         return True;
385     }
386     return False;
387 }