ngamelist.c

   1 /*
   2  * ngamelist.c -- Game list window, Xt-independent front-end code for XBoard
   3  *
   4  * Copyright 1995, 2009, 2010, 2011, 2012 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 static Option gamesOptions[] = {
  85 { 200,  LR|TB,     400, NULL, (void*) list,       "", NULL, ListBox, "" },
  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, 1))
 155         AddHandler(&gamesOptions[1], 4),
 156         AddHandler(&gamesOptions[0], 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);
 194         }
 195         lg->position = pos;
 196         lg = (ListGame *) lg->node.succ;
 197     }
 198 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"));
 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 GameListPopUp (FILE *fp, char *filename)
 225 {
 226     if (glc == NULL) {
 227         glc = (GameListClosure *) calloc(1, sizeof(GameListClosure));
 228         glc->x = glc->y = -1;
 229         glc->filename = NULL;
 230     }
 231
 232     GameListPrepare(False, False); // [HGM] filter: code put in separate routine
 233
 234     glc->fp = fp;
 235
 236     if (glc->filename != NULL) free(glc->filename);
 237     glc->filename = StrSave(filename);
 238
 239     if (!GameListCreate(filename))
 240         SetIconName(GameListDlg, filename);
 241
 242     page = 0;
 243     GameListReplace(0); // [HGM] filter: code put in separate routine, and also called to set title
 244     MarkMenu("View.GameList", GameListDlg);
 245 }
 246
 247 void
 248 GameListDestroy ()
 249 {
 250     if (glc == NULL) return;
 251     PopDown(GameListDlg);
 252     if (glc->strings != NULL) {
 253         char **st;
 254         st = glc->strings;
 255         while (*st) {
 256             free(*st++);
 257         }
 258         free(glc->strings);
 259     }
 260     free(glc);
 261     glc = NULL;
 262 }
 263
 264 void
 265 ShowGameListProc ()
 266 {
 267     if (glc == NULL) {
 268         DisplayError(_("There is no game list"), 0);
 269         return;
 270     }
 271     if (shellUp[GameListDlg]) {
 272         PopDown(GameListDlg);
 273         return;
 274     }
 275     GenericPopUp(NULL, NULL, GameListDlg, BoardWindow, NONMODAL, 1); // first two args ignored when shell exists!
 276     MarkMenu("View.GameList", GameListDlg);
 277     GameListHighlight(lastLoadGameNumber);
 278 }
 279
 280 int
 281 GameListClicks (int direction)
 282 {
 283     int index;
 284
 285     if (glc == NULL || listLength == 0) return 1;
 286     if(direction == 100) { FocusOnWidget(&gamesOptions[0], GameListDlg); return 1; }
 287     index = SelectedListBoxItem(&gamesOptions[0]);
 288
 289     if (index < 0) return 1;
 290     if(page && (index == 0 && direction < 1 || direction == -4)) {
 291         page -= 1000;
 292         if(page < 0) page = 0; // safety
 293         GameListReplace(page);
 294         return 1;
 295     }
 296     if(index == 1001 && direction >= 0 || listEnd == 1001 && direction == 4) {
 297         page += 1000;
 298         GameListReplace(page);
 299         return 1;
 300     }
 301
 302     if(direction != 0) {
 303         int doLoad = abs(direction) == 3;
 304         if(doLoad) direction /= 3;
 305         index += direction;
 306         if(direction < -1) index = 0;
 307         if(direction >  1) index = listEnd-1;
 308         if(index < 0 || index >= listEnd) return 1;
 309         HighlightWithScroll(&gamesOptions[0], index, listEnd);
 310         if(!doLoad) return 1;
 311     }
 312     index = atoi(list[index])-1; // [HGM] filter: read true index from sequence nr of line
 313     if (cmailMsgLoaded) {
 314         CmailLoadGame(glc->fp, index + 1, glc->filename, True);
 315     } else {
 316         LoadGame(glc->fp, index + 1, glc->filename, True);
 317     }
 318     return 0;
 319 }
 320
 321 void
 322 SetFilter ()
 323 {
 324         char *name;
 325         GetWidgetText(&gamesOptions[1], &name);
 326         safeStrCpy(filterString, name, sizeof(filterString)/sizeof(filterString[0]));
 327         GameListPrepare(False, False); GameListReplace(0);
 328         UnCaret(); // filter text-edit
 329         FocusOnWidget(&gamesOptions[0], GameListDlg); // listbox
 330 }
 331
 332 void
 333 GameListHighlight (int index)
 334 {
 335     int i=0; char **st;
 336     if (!shellUp[GameListDlg]) return;
 337     st = list;
 338     while(*st && atoi(*st)<index) st++,i++;
 339     HighlightWithScroll(&gamesOptions[0], i, listEnd);
 340 }
 341
 342 int
 343 SaveGameListAsText (FILE *f)
 344 {
 345     ListGame * lg = (ListGame *) gameList.head;
 346     int nItem;
 347
 348     if( !glc || ((ListGame *) gameList.tailPred)->number <= 0 ) {
 349       DisplayError(_("Game list not loaded or empty"), 0);
 350         return False;
 351     }
 352
 353     /* Copy the list into the global memory block */
 354     if( f != NULL ) {
 355
 356         lg = (ListGame *) gameList.head;
 357
 358         for (nItem = 0; nItem < ((ListGame *) gameList.tailPred)->number; nItem++){
 359             char * st = GameListLineFull(lg->number, &lg->gameInfo);
 360             char *line = GameListLine(lg->number, &lg->gameInfo);
 361             if(filterString[0] == NULLCHAR || SearchPattern( line, filterString ) )
 362                     fprintf( f, "%s\n", st );
 363             free(st); free(line);
 364             lg = (ListGame *) lg->node.succ;
 365         }
 366
 367         fclose(f);
 368         return True;
 369     }
 370     return False;
 371 }
 372