dialogs.c

   1 /*
   2  * dialogs.c -- platform-independent code for dialogs of XBoard
   3  *
   4  * Copyright 2000, 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 // [HGM] this file is the counterpart of woptions.c, containing xboard popup menus
  24 // similar to those of WinBoard, to set the most common options interactively.
  25
  26 #include "config.h"
  27
  28 #include <stdio.h>
  29 #include <ctype.h>
  30 #include <errno.h>
  31 #include <sys/types.h>
  32
  33 #if STDC_HEADERS
  34 # include <stdlib.h>
  35 # include <string.h>
  36 #else /* not STDC_HEADERS */
  37 extern char *getenv();
  38 # if HAVE_STRING_H
  39 #  include <string.h>
  40 # else /* not HAVE_STRING_H */
  41 #  include <strings.h>
  42 # endif /* not HAVE_STRING_H */
  43 #endif /* not STDC_HEADERS */
  44
  45 #if HAVE_UNISTD_H
  46 # include <unistd.h>
  47 #endif
  48 #include <stdint.h>
  49
  50 #include "common.h"
  51 #include "backend.h"
  52 #include "xboard.h"
  53 #include "menus.h"
  54 #include "dialogs.h"
  55 #include "gettext.h"
  56
  57 #ifdef ENABLE_NLS
  58 # define  _(s) gettext (s)
  59 # define N_(s) gettext_noop (s)
  60 #else
  61 # define  _(s) (s)
  62 # define N_(s)  s
  63 #endif
  64
  65
  66 int values[MAX_OPTIONS];
  67 ChessProgramState *currentCps;
  68
  69 //----------------------------Generic dialog --------------------------------------------
  70
  71 // cloned from Engine Settings dialog (and later merged with it)
  72
  73 char *marked[NrOfDialogs];
  74 Boolean shellUp[NrOfDialogs];
  75
  76 void
  77 MarkMenu (char *item, int dlgNr)
  78 {
  79     MarkMenuItem(marked[dlgNr] = item, True);
  80 }
  81
  82 void
  83 AddLine (Option *opt, char *s)
  84 {
  85     AppendText(opt, s);
  86     AppendText(opt, "\n");
  87 }
  88
  89 //---------------------------------------------- Update dialog controls ------------------------------------
  90
  91 int
  92 SetCurrentComboSelection (Option *opt)
  93 {
  94     int j;
  95     if(!opt->textValue) opt->value = *(int*)opt->target; /* numeric */else {
  96         for(j=0; opt->choice[j]; j++) // look up actual value in list of possible values, to get selection nr
  97             if(*(char**)opt->target && !strcmp(*(char**)opt->target, ((char**)opt->textValue)[j])) break;
  98         opt->value = j + (opt->choice[j] == NULL);
  99     }
 100     return opt->value;
 101 }
 102
 103 void
 104 GenericUpdate (Option *opts, int selected)
 105 {
 106     int i, j;
 107     char buf[MSG_SIZ];
 108     float x;
 109         for(i=0; ; i++) {
 110             if(selected >= 0) { if(i < selected) continue; else if(i > selected) break; }
 111             switch(opts[i].type) {
 112                 case TextBox:
 113                 case FileName:
 114                 case PathName:
 115                     SetWidgetText(&opts[i],  *(char**) opts[i].target, -1);
 116                     break;
 117                 case Spin:
 118                     sprintf(buf, "%d", *(int*) opts[i].target);
 119                     SetWidgetText(&opts[i], buf, -1);
 120                     break;
 121                 case Fractional:
 122                     sprintf(buf, "%4.2f", *(float*) opts[i].target);
 123                     SetWidgetText(&opts[i], buf, -1);
 124                     break;
 125                 case CheckBox:
 126                     SetWidgetState(&opts[i],  *(Boolean*) opts[i].target);
 127                     break;
 128                 case ComboBox:
 129                   if(opts[i].min & COMBO_CALLBACK) break;
 130                   SetCurrentComboSelection(opts+i);
 131                     // TODO: actually display this (but it is never used that way...)
 132                     break;
 133                 case EndMark:
 134                     return;
 135             default:
 136                 printf("GenericUpdate: unexpected case in switch.\n");
 137                 case ListBox:
 138                 case Button:
 139                 case SaveButton:
 140                 case Label:
 141                 case Break:
 142               break;
 143             }
 144         }
 145 }
 146
 147 //------------------------------------------- Read out dialog controls ------------------------------------
 148
 149 int
 150 GenericReadout (Option *opts, int selected)
 151 {
 152     int i, j, res=1;
 153     char *val;
 154     char buf[MSG_SIZ], **dest;
 155     float x;
 156         for(i=0; ; i++) { // send all options that had to be OK-ed to engine
 157             if(selected >= 0) { if(i < selected) continue; else if(i > selected) break; }
 158             switch(opts[i].type) {
 159                 case TextBox:
 160                 case FileName:
 161                 case PathName:
 162                     GetWidgetText(&opts[i], &val);
 163                     dest = currentCps ? &(opts[i].textValue) : (char**) opts[i].target;
 164                     if(*dest == NULL || strcmp(*dest, val)) {
 165                         if(currentCps) {
 166                             snprintf(buf, MSG_SIZ,  "option %s=%s\n", opts[i].name, val);
 167                             SendToProgram(buf, currentCps);
 168                         } else {
 169                             if(*dest) free(*dest);
 170                             *dest = malloc(strlen(val)+1);
 171                         }
 172                         safeStrCpy(*dest, val, MSG_SIZ - (*dest - opts[i].name)); // copy text there
 173                     }
 174                     break;
 175                 case Spin:
 176                 case Fractional:
 177                     GetWidgetText(&opts[i], &val);
 178                     x = 0.0; // Initialise because sscanf() will fail if non-numeric text is entered
 179                     sscanf(val, "%f", &x);
 180                     if(x > opts[i].max) x = opts[i].max;
 181                     if(x < opts[i].min) x = opts[i].min;
 182                     if(opts[i].type == Fractional)
 183                         *(float*) opts[i].target = x; // engines never have float options!
 184                     else if(opts[i].value != x) {
 185                         opts[i].value = x;
 186                         if(currentCps) {
 187                             snprintf(buf, MSG_SIZ,  "option %s=%.0f\n", opts[i].name, x);
 188                             SendToProgram(buf, currentCps);
 189                         } else *(int*) opts[i].target = x;
 190                     }
 191                     break;
 192                 case CheckBox:
 193                     j = 0;
 194                     GetWidgetState(&opts[i], &j);
 195                     if(opts[i].value != j) {
 196                         opts[i].value = j;
 197                         if(currentCps) {
 198                             snprintf(buf, MSG_SIZ,  "option %s=%d\n", opts[i].name, j);
 199                             SendToProgram(buf, currentCps);
 200                         } else *(Boolean*) opts[i].target = j;
 201                     }
 202                     break;
 203                 case ComboBox:
 204                     if(opts[i].min & COMBO_CALLBACK) break;
 205                     if(!opts[i].textValue) { *(int*)opts[i].target == opts[i].value; break; } // numeric
 206                     val = ((char**)opts[i].textValue)[values[i]];
 207                     if(currentCps) {
 208                         if(opts[i].value == values[i]) break; // not changed
 209                         opts[i].value = values[i];
 210                         snprintf(buf, MSG_SIZ,  "option %s=%s\n", opts[i].name, opts[i].choice[values[i]]);
 211                         SendToProgram(buf, currentCps);
 212                     } else if(val && (*(char**) opts[i].target == NULL || strcmp(*(char**) opts[i].target, val))) {
 213                       if(*(char**) opts[i].target) free(*(char**) opts[i].target);
 214                       *(char**) opts[i].target = strdup(val);
 215                     }
 216                     break;
 217                 case EndMark:
 218                     if(opts[i].target) // callback for implementing necessary actions on OK (like redraw)
 219                         res = ((OKCallback*) opts[i].target)(i);
 220                     break;
 221             default:
 222                 printf("GenericReadout: unexpected case in switch.\n");
 223                 case ListBox:
 224                 case Button:
 225                 case SaveButton:
 226                 case Label:
 227                 case Break:
 228               break;
 229             }
 230             if(opts[i].type == EndMark) break;
 231         }
 232         return res;
 233 }
 234
 235 //------------------------------------------- Match Options ------------------------------------------------------
 236
 237 char *engineName, *engineChoice, *tfName;
 238 char *engineList[MAXENGINES] = {" "}, *engineMnemonic[MAXENGINES] = {""};
 239
 240 static void AddToTourney P((int n));
 241 static void CloneTourney P((void));
 242 static void ReplaceParticipant P((void));
 243 static void UpgradeParticipant P((void));
 244
 245 static int
 246 MatchOK (int n)
 247 {
 248     ASSIGN(appData.participants, engineName);
 249     if(!CreateTourney(tfName) || matchMode) return matchMode || !appData.participants[0];
 250     PopDown(TransientDlg); // early popdown to prevent FreezeUI called through MatchEvent from causing XtGrab warning
 251     MatchEvent(2); // start tourney
 252     return FALSE;  // no double PopDown!
 253 }
 254
 255 static Option matchOptions[] = {
 256 { 0,  0,          0, NULL, (void*) &tfName, ".trn", NULL, FileName, N_("Tournament file:") },
 257 { 0,  0,          0, NULL, (void*) &appData.roundSync, "", NULL, CheckBox, N_("Sync after round    (for concurrent playing of a single") },
 258 { 0,  0,          0, NULL, (void*) &appData.cycleSync, "", NULL, CheckBox, N_("Sync after cycle      tourney with multiple XBoards)") },
 259 { 150, T_VSCRL | T_FILL | T_WRAP,
 260                   0, NULL, (void*) &engineName, "", NULL, TextBox, N_("Tourney participants:") },
 261 { 0,  COMBO_CALLBACK | NO_GETTEXT,
 262                   0, NULL, (void*) &AddToTourney, (char*) (engineMnemonic+1), (engineMnemonic+1), ComboBox, N_("Select Engine:") },
 263 { 0,  0,         10, NULL, (void*) &appData.tourneyType, "", NULL, Spin, N_("Tourney type (0 = round-robin, 1 = gauntlet):") },
 264 { 0,  1, 1000000000, NULL, (void*) &appData.tourneyCycles, "", NULL, Spin, N_("Number of tourney cycles (or Swiss rounds):") },
 265 { 0,  1, 1000000000, NULL, (void*) &appData.defaultMatchGames, "", NULL, Spin, N_("Default Number of Games in Match (or Pairing):") },
 266 { 0,  0, 1000000000, NULL, (void*) &appData.matchPause, "", NULL, Spin, N_("Pause between Match Games (msec):") },
 267 { 0,  0,          0, NULL, (void*) &appData.saveGameFile, ".pgn", NULL, FileName, N_("Save Tourney Games on:") },
 268 { 0,  0,          0, NULL, (void*) &appData.loadGameFile, ".pgn", NULL, FileName, N_("Game File with Opening Lines:") },
 269 { 0, -2, 1000000000, NULL, (void*) &appData.loadGameIndex, "", NULL, Spin, N_("Game Number (-1 or -2 = Auto-Increment):") },
 270 { 0,  0,          0, NULL, (void*) &appData.loadPositionFile, ".fen", NULL, FileName, N_("File with Start Positions:") },
 271 { 0, -2, 1000000000, NULL, (void*) &appData.loadPositionIndex, "", NULL, Spin, N_("Position Number (-1 or -2 = Auto-Increment):") },
 272 { 0,  0, 1000000000, NULL, (void*) &appData.rewindIndex, "", NULL, Spin, N_("Rewind Index after this many Games (0 = never):") },
 273 { 0,  0,          0, NULL, (void*) &appData.defNoBook, "", NULL, CheckBox, N_("Disable own engine books by default") },
 274 { 0,  0,          0, NULL, (void*) &ReplaceParticipant, NULL, NULL, Button, N_("Replace Engine") },
 275 { 0, SAME_ROW,    0, NULL, (void*) &UpgradeParticipant, NULL, NULL, Button, N_("Upgrade Engine") },
 276 { 0, SAME_ROW,    0, NULL, (void*) &CloneTourney, NULL, NULL, Button, N_("Clone Tourney") },
 277 { 0, SAME_ROW,    0, NULL, (void*) &MatchOK, "", NULL, EndMark , "" }
 278 };
 279
 280 static void
 281 ReplaceParticipant ()
 282 {
 283     GenericReadout(matchOptions, 3);
 284     Substitute(strdup(engineName), True);
 285 }
 286
 287 static void
 288 UpgradeParticipant ()
 289 {
 290     GenericReadout(matchOptions, 3);
 291     Substitute(strdup(engineName), False);
 292 }
 293
 294 static void
 295 CloneTourney ()
 296 {
 297     FILE *f;
 298     char *name;
 299     GetWidgetText(matchOptions, &name);
 300     if(name && name[0] && (f = fopen(name, "r")) ) {
 301         char *saveSaveFile;
 302         saveSaveFile = appData.saveGameFile; appData.saveGameFile = NULL; // this is a persistent option, protect from change
 303         ParseArgsFromFile(f);
 304         engineName = appData.participants; GenericUpdate(matchOptions, -1);
 305         FREE(appData.saveGameFile); appData.saveGameFile = saveSaveFile;
 306     } else DisplayError(_("First you must specify an existing tourney file to clone"), 0);
 307 }
 308
 309 static void
 310 AddToTourney (int n)
 311 {
 312     AddLine(&matchOptions[3], engineMnemonic[values[4]+1]);
 313 }
 314
 315 void
 316 MatchOptionsProc ()
 317 {
 318    NamesToList(firstChessProgramNames, engineList, engineMnemonic, "all");
 319    matchOptions[5].min = -(appData.pairingEngine[0] != NULLCHAR); // with pairing engine, allow Swiss
 320    ASSIGN(tfName, appData.tourneyFile[0] ? appData.tourneyFile : MakeName(appData.defName));
 321    ASSIGN(engineName, appData.participants);
 322    GenericPopUp(matchOptions, _("Match Options"), TransientDlg, BoardWindow, MODAL, 0);
 323 }
 324
 325 // ------------------------------------------- General Options --------------------------------------------------
 326
 327 static int oldShow, oldBlind, oldPonder;
 328
 329 static int
 330 GeneralOptionsOK (int n)
 331 {
 332         int newPonder = appData.ponderNextMove;
 333         appData.ponderNextMove = oldPonder;
 334         PonderNextMoveEvent(newPonder);
 335         if(!appData.highlightLastMove) ClearHighlights(), ClearPremoveHighlights();
 336         if(oldShow != appData.showCoords || oldBlind != appData.blindfold) DrawPosition(TRUE, NULL);
 337         return 1;
 338 }
 339
 340 static Option generalOptions[] = {
 341 { 0,  0, 0, NULL, (void*) &appData.whitePOV, "", NULL, CheckBox, N_("Absolute Analysis Scores") },
 342 { 0,  0, 0, NULL, (void*) &appData.sweepSelect, "", NULL, CheckBox, N_("Almost Always Queen (Detour Under-Promote)") },
 343 { 0,  0, 0, NULL, (void*) &appData.animateDragging, "", NULL, CheckBox, N_("Animate Dragging") },
 344 { 0,  0, 0, NULL, (void*) &appData.animate, "", NULL, CheckBox, N_("Animate Moving") },
 345 { 0,  0, 0, NULL, (void*) &appData.autoCallFlag, "", NULL, CheckBox, N_("Auto Flag") },
 346 { 0,  0, 0, NULL, (void*) &appData.autoFlipView, "", NULL, CheckBox, N_("Auto Flip View") },
 347 { 0,  0, 0, NULL, (void*) &appData.blindfold, "", NULL, CheckBox, N_("Blindfold") },
 348 { 0,  0, 0, NULL, (void*) &appData.dropMenu, "", NULL, CheckBox, N_("Drop Menu") },
 349 { 0,  0, 0, NULL, (void*) &appData.hideThinkingFromHuman, "", NULL, CheckBox, N_("Hide Thinking from Human") },
 350 { 0,  0, 0, NULL, (void*) &appData.highlightLastMove, "", NULL, CheckBox, N_("Highlight Last Move") },
 351 { 0,  0, 0, NULL, (void*) &appData.highlightMoveWithArrow, "", NULL, CheckBox, N_("Highlight with Arrow") },
 352 { 0,  0, 0, NULL, (void*) &appData.ringBellAfterMoves, "", NULL, CheckBox, N_("Move Sound") },
 353 { 0,  0, 0, NULL, (void*) &appData.oneClick, "", NULL, CheckBox, N_("One-Click Moving") },
 354 { 0,  0, 0, NULL, (void*) &appData.periodicUpdates, "", NULL, CheckBox, N_("Periodic Updates (in Analysis Mode)") },
 355 { 0,  0, 0, NULL, (void*) &appData.ponderNextMove, "", NULL, CheckBox, N_("Ponder Next Move") },
 356 { 0,  0, 0, NULL, (void*) &appData.popupExitMessage, "", NULL, CheckBox, N_("Popup Exit Messages") },
 357 { 0,  0, 0, NULL, (void*) &appData.popupMoveErrors, "", NULL, CheckBox, N_("Popup Move Errors") },
 358 { 0,  0, 0, NULL, (void*) &appData.showEvalInMoveHistory, "", NULL, CheckBox, N_("Scores in Move List") },
 359 { 0,  0, 0, NULL, (void*) &appData.showCoords, "", NULL, CheckBox, N_("Show Coordinates") },
 360 { 0,  0, 0, NULL, (void*) &appData.markers, "", NULL, CheckBox, N_("Show Target Squares") },
 361 { 0,  0, 0, NULL, (void*) &appData.useStickyWindows, "", NULL, CheckBox, N_("Sticky Windows") },
 362 { 0,  0, 0, NULL, (void*) &appData.testLegality, "", NULL, CheckBox, N_("Test Legality") },
 363 { 0,  0, 0, NULL, (void*) &appData.topLevel, "", NULL, CheckBox, N_("Top-Level Dialogs") },
 364 { 0, 0,10,  NULL, (void*) &appData.flashCount, "", NULL, Spin, N_("Flash Moves (0 = no flashing):") },
 365 { 0, 1,10,  NULL, (void*) &appData.flashRate, "", NULL, Spin, N_("Flash Rate (high = fast):") },
 366 { 0, 5,100, NULL, (void*) &appData.animSpeed, "", NULL, Spin, N_("Animation Speed (high = slow):") },
 367 { 0, 1,5,   NULL, (void*) &appData.zoom, "", NULL, Spin, N_("Zoom factor in Evaluation Graph:") },
 368 { 0,  0, 0, NULL, (void*) &GeneralOptionsOK, "", NULL, EndMark , "" }
 369 };
 370
 371 void
 372 OptionsProc ()
 373 {
 374    oldPonder = appData.ponderNextMove;
 375    oldShow = appData.showCoords; oldBlind = appData.blindfold;
 376    GenericPopUp(generalOptions, _("General Options"), TransientDlg, BoardWindow, MODAL, 0);
 377 }
 378
 379 //---------------------------------------------- New Variant ------------------------------------------------
 380
 381 static void Pick P((int n));
 382
 383 static Option variantDescriptors[] = {
 384 { VariantNormal,        0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("normal")},
 385 { VariantFairy,  SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFBF", NULL, Button, N_("fairy")},
 386 { VariantFischeRandom,  0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("FRC")},
 387 { VariantSChess, SAME_ROW, 135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("Seirawan")},
 388 { VariantWildCastle,    0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("wild castle")},
 389 { VariantSuper,  SAME_ROW, 135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("Superchess")},
 390 { VariantNoCastle,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("no castle")},
 391 { VariantCrazyhouse,SAME_ROW,135,NULL,(void*) &Pick, "#FFBFBF", NULL, Button, N_("crazyhouse")},
 392 { VariantKnightmate,    0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("knightmate")},
 393 { VariantBughouse,SAME_ROW,135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("bughouse")},
 394 { VariantBerolina,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("berolina")},
 395 { VariantShogi,  SAME_ROW, 135, NULL, (void*) &Pick, "#BFFFFF", NULL, Button, N_("shogi (9x9)")},
 396 { VariantCylinder,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("cylinder")},
 397 { VariantXiangqi, SAME_ROW,135, NULL, (void*) &Pick, "#BFFFFF", NULL, Button, N_("xiangqi (9x10)")},
 398 { VariantShatranj,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("shatranj")},
 399 { VariantCourier, SAME_ROW,135, NULL, (void*) &Pick, "#BFFFBF", NULL, Button, N_("courier (12x8)")},
 400 { VariantMakruk,        0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("makruk")},
 401 { VariantGreat,  SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("Great Shatranj (10x8)")},
 402 { VariantAtomic,        0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("atomic")},
 403 { VariantFalcon, SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("falcon (10x8)")},
 404 { VariantTwoKings,      0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("two kings")},
 405 { VariantCapablanca,SAME_ROW,135,NULL,(void*) &Pick, "#BFBFFF", NULL, Button, N_("Capablanca (10x8)")},
 406 { Variant3Check,        0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("3-checks")},
 407 { VariantGothic, SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("Gothic (10x8)")},
 408 { VariantSuicide,       0, 135, NULL, (void*) &Pick, "#FFFFBF", NULL, Button, N_("suicide")},
 409 { VariantJanus,  SAME_ROW, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("janus (10x8)")},
 410 { VariantGiveaway,      0, 135, NULL, (void*) &Pick, "#FFFFBF", NULL, Button, N_("give-away")},
 411 { VariantCapaRandom,SAME_ROW,135,NULL,(void*) &Pick, "#BFBFFF", NULL, Button, N_("CRC (10x8)")},
 412 { VariantLosers,        0, 135, NULL, (void*) &Pick, "#FFFFBF", NULL, Button, N_("losers")},
 413 { VariantGrand,  SAME_ROW, 135, NULL, (void*) &Pick, "#5070FF", NULL, Button, N_("grand (10x10)")},
 414 { VariantSpartan,       0, 135, NULL, (void*) &Pick, "#FF0000", NULL, Button, N_("Spartan")},
 415 { 0, 0, 0, NULL, NULL, NULL, NULL, Label, N_("Board size ( -1 = default for selected variant):")},
 416 { 0, -1, BOARD_RANKS-1, NULL, (void*) &appData.NrRanks, "", NULL, Spin, N_("Number of Board Ranks:") },
 417 { 0, -1, BOARD_FILES, NULL, (void*) &appData.NrFiles, "", NULL, Spin, N_("Number of Board Files:") },
 418 { 0, -1, BOARD_RANKS-1, NULL, (void*) &appData.holdingsSize, "", NULL, Spin, N_("Holdings Size:") },
 419 { 0, 0, 0, NULL, NULL, NULL, NULL, Label,
 420                                 N_("WARNING: variants with un-orthodox\n"
 421                                   "pieces only have built-in bitmaps\n"
 422                                   "for -boardSize middling, bulky and\n"
 423                                   "petite, and substitute king or amazon\n"
 424                                   "for missing bitmaps. (See manual.)")},
 425 { 0, NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
 426 };
 427
 428 static void
 429 Pick (int n)
 430 {
 431         VariantClass v = variantDescriptors[n].value;
 432         if(!appData.noChessProgram) {
 433             char *name = VariantName(v), buf[MSG_SIZ];
 434             if (first.protocolVersion > 1 && StrStr(first.variants, name) == NULL) {
 435                 /* [HGM] in protocol 2 we check if variant is suported by engine */
 436               snprintf(buf, MSG_SIZ,  _("Variant %s not supported by %s"), name, first.tidy);
 437                 DisplayError(buf, 0);
 438                 return; /* ignore OK if first engine does not support it */
 439             } else
 440             if (second.initDone && second.protocolVersion > 1 && StrStr(second.variants, name) == NULL) {
 441               snprintf(buf, MSG_SIZ,  _("Warning: second engine (%s) does not support this!"), second.tidy);
 442                 DisplayError(buf, 0);   /* use of second engine is optional; only warn user */
 443             }
 444         }
 445
 446         GenericReadout(variantDescriptors, -1); // make sure ranks and file settings are read
 447
 448         gameInfo.variant = v;
 449         appData.variant = VariantName(v);
 450
 451         shuffleOpenings = FALSE; /* [HGM] shuffle: possible shuffle reset when we switch */
 452         startedFromPositionFile = FALSE; /* [HGM] loadPos: no longer valid in new variant */
 453         appData.pieceToCharTable = NULL;
 454         appData.pieceNickNames = "";
 455         appData.colorNickNames = "";
 456         Reset(True, True);
 457         PopDown(TransientDlg);
 458         return;
 459 }
 460
 461 void
 462 NewVariantProc ()
 463 {
 464    GenericPopUp(variantDescriptors, _("New Variant"), TransientDlg, BoardWindow, MODAL, 0);
 465 }
 466
 467 //------------------------------------------- Common Engine Options -------------------------------------
 468
 469 static int oldCores;
 470
 471 static int
 472 CommonOptionsOK (int n)
 473 {
 474         int newPonder = appData.ponderNextMove;
 475         // make sure changes are sent to first engine by re-initializing it
 476         // if it was already started pre-emptively at end of previous game
 477         if(gameMode == BeginningOfGame) Reset(True, True); else {
 478             // Some changed setting need immediate sending always.
 479             if(oldCores != appData.smpCores)
 480                 NewSettingEvent(False, &(first.maxCores), "cores", appData.smpCores);
 481             appData.ponderNextMove = oldPonder;
 482             PonderNextMoveEvent(newPonder);
 483         }
 484         return 1;
 485 }
 486
 487 static Option commonEngineOptions[] = {
 488 { 0,  0,    0, NULL, (void*) &appData.ponderNextMove, "", NULL, CheckBox, N_("Ponder Next Move") },
 489 { 0,  0, 1000, NULL, (void*) &appData.smpCores, "", NULL, Spin, N_("Maximum Number of CPUs per Engine:") },
 490 { 0,  0,    0, NULL, (void*) &appData.polyglotDir, "", NULL, PathName, N_("Polygot Directory:") },
 491 { 0,  0,16000, NULL, (void*) &appData.defaultHashSize, "", NULL, Spin, N_("Hash-Table Size (MB):") },
 492 { 0,  0,    0, NULL, (void*) &appData.defaultPathEGTB, "", NULL, PathName, N_("Nalimov EGTB Path:") },
 493 { 0,  0, 1000, NULL, (void*) &appData.defaultCacheSizeEGTB, "", NULL, Spin, N_("EGTB Cache Size (MB):") },
 494 { 0,  0,    0, NULL, (void*) &appData.usePolyglotBook, "", NULL, CheckBox, N_("Use GUI Book") },
 495 { 0,  0,    0, NULL, (void*) &appData.polyglotBook, ".bin", NULL, FileName, N_("Opening-Book Filename:") },
 496 { 0,  0,  100, NULL, (void*) &appData.bookDepth, "", NULL, Spin, N_("Book Depth (moves):") },
 497 { 0,  0,  100, NULL, (void*) &appData.bookStrength, "", NULL, Spin, N_("Book Variety (0) vs. Strength (100):") },
 498 { 0,  0,    0, NULL, (void*) &appData.firstHasOwnBookUCI, "", NULL, CheckBox, N_("Engine #1 Has Own Book") },
 499 { 0,  0,    0, NULL, (void*) &appData.secondHasOwnBookUCI, "", NULL, CheckBox, N_("Engine #2 Has Own Book          ") },
 500 { 0,SAME_ROW,0,NULL, (void*) &CommonOptionsOK, "", NULL, EndMark , "" }
 501 };
 502
 503 void
 504 UciMenuProc ()
 505 {
 506    oldCores = appData.smpCores;
 507    oldPonder = appData.ponderNextMove;
 508    GenericPopUp(commonEngineOptions, _("Common Engine Settings"), TransientDlg, BoardWindow, MODAL, 0);
 509 }
 510
 511 //------------------------------------------ Adjudication Options --------------------------------------
 512
 513 static Option adjudicationOptions[] = {
 514 { 0, 0,    0, NULL, (void*) &appData.checkMates, "", NULL, CheckBox, N_("Detect all Mates") },
 515 { 0, 0,    0, NULL, (void*) &appData.testClaims, "", NULL, CheckBox, N_("Verify Engine Result Claims") },
 516 { 0, 0,    0, NULL, (void*) &appData.materialDraws, "", NULL, CheckBox, N_("Draw if Insufficient Mating Material") },
 517 { 0, 0,    0, NULL, (void*) &appData.trivialDraws, "", NULL, CheckBox, N_("Adjudicate Trivial Draws (3-Move Delay)") },
 518 { 0, 0,100,   NULL, (void*) &appData.ruleMoves, "", NULL, Spin, N_("N-Move Rule:") },
 519 { 0, 0,    6, NULL, (void*) &appData.drawRepeats, "", NULL, Spin, N_("N-fold Repeats:") },
 520 { 0, 0,1000,  NULL, (void*) &appData.adjudicateDrawMoves, "", NULL, Spin, N_("Draw after N Moves Total:") },
 521 { 0, -5000,0, NULL, (void*) &appData.adjudicateLossThreshold, "", NULL, Spin, N_("Win / Loss Threshold:") },
 522 { 0, 0,    0, NULL, (void*) &first.scoreIsAbsolute, "", NULL, CheckBox, N_("Negate Score of Engine #1") },
 523 { 0, 0,    0, NULL, (void*) &second.scoreIsAbsolute, "", NULL, CheckBox, N_("Negate Score of Engine #2") },
 524 { 0,SAME_ROW, 0, NULL, NULL, "", NULL, EndMark , "" }
 525 };
 526
 527 void
 528 EngineMenuProc ()
 529 {
 530    GenericPopUp(adjudicationOptions, _("Adjudicate non-ICS Games"), TransientDlg, BoardWindow, MODAL, 0);
 531 }
 532
 533 //--------------------------------------------- ICS Options ---------------------------------------------
 534
 535 static int
 536 IcsOptionsOK (int n)
 537 {
 538     ParseIcsTextColors();
 539     return 1;
 540 }
 541
 542 Option icsOptions[] = {
 543 { 0, 0, 0, NULL, (void*) &appData.autoKibitz, "",  NULL, CheckBox, N_("Auto-Kibitz") },
 544 { 0, 0, 0, NULL, (void*) &appData.autoComment, "", NULL, CheckBox, N_("Auto-Comment") },
 545 { 0, 0, 0, NULL, (void*) &appData.autoObserve, "", NULL, CheckBox, N_("Auto-Observe") },
 546 { 0, 0, 0, NULL, (void*) &appData.autoRaiseBoard, "", NULL, CheckBox, N_("Auto-Raise Board") },
 547 { 0, 0, 0, NULL, (void*) &appData.bgObserve, "",   NULL, CheckBox, N_("Background Observe while Playing") },
 548 { 0, 0, 0, NULL, (void*) &appData.dualBoard, "",   NULL, CheckBox, N_("Dual Board for Background-Observed Game") },
 549 { 0, 0, 0, NULL, (void*) &appData.getMoveList, "", NULL, CheckBox, N_("Get Move List") },
 550 { 0, 0, 0, NULL, (void*) &appData.quietPlay, "",   NULL, CheckBox, N_("Quiet Play") },
 551 { 0, 0, 0, NULL, (void*) &appData.seekGraph, "",   NULL, CheckBox, N_("Seek Graph") },
 552 { 0, 0, 0, NULL, (void*) &appData.autoRefresh, "", NULL, CheckBox, N_("Auto-Refresh Seek Graph") },
 553 { 0, 0, 0, NULL, (void*) &appData.premove, "",     NULL, CheckBox, N_("Premove") },
 554 { 0, 0, 0, NULL, (void*) &appData.premoveWhite, "", NULL, CheckBox, N_("Premove for White") },
 555 { 0, 0, 0, NULL, (void*) &appData.premoveWhiteText, "", NULL, TextBox, N_("First White Move:") },
 556 { 0, 0, 0, NULL, (void*) &appData.premoveBlack, "", NULL, CheckBox, N_("Premove for Black") },
 557 { 0, 0, 0, NULL, (void*) &appData.premoveBlackText, "", NULL, TextBox, N_("First Black Move:") },
 558 { 0, SAME_ROW, 0, NULL, NULL, NULL, NULL, Break, "" },
 559 { 0, 0, 0, NULL, (void*) &appData.icsAlarm, "", NULL, CheckBox, N_("Alarm") },
 560 { 0, 0, 100000000, NULL, (void*) &appData.icsAlarmTime, "", NULL, Spin, N_("Alarm Time (msec):") },
 561 //{ 0, 0, 0, NULL, (void*) &appData.chatBoxes, "", NULL, TextBox, N_("Startup Chat Boxes:") },
 562 { 0, 0, 0, NULL, (void*) &appData.colorize, "", NULL, CheckBox, N_("Colorize Messages") },
 563 { 0, 0, 0, NULL, (void*) &appData.colorShout, "", NULL, TextBox, N_("Shout Text Colors:") },
 564 { 0, 0, 0, NULL, (void*) &appData.colorSShout, "", NULL, TextBox, N_("S-Shout Text Colors:") },
 565 { 0, 0, 0, NULL, (void*) &appData.colorChannel1, "", NULL, TextBox, N_("Channel #1 Text Colors:") },
 566 { 0, 0, 0, NULL, (void*) &appData.colorChannel, "", NULL, TextBox, N_("Other Channel Text Colors:") },
 567 { 0, 0, 0, NULL, (void*) &appData.colorKibitz, "", NULL, TextBox, N_("Kibitz Text Colors:") },
 568 { 0, 0, 0, NULL, (void*) &appData.colorTell, "", NULL, TextBox, N_("Tell Text Colors:") },
 569 { 0, 0, 0, NULL, (void*) &appData.colorChallenge, "", NULL, TextBox, N_("Challenge Text Colors:") },
 570 { 0, 0, 0, NULL, (void*) &appData.colorRequest, "", NULL, TextBox, N_("Request Text Colors:") },
 571 { 0, 0, 0, NULL, (void*) &appData.colorSeek, "", NULL, TextBox, N_("Seek Text Colors:") },
 572 { 0, 0, 0, NULL, (void*) &IcsOptionsOK, "", NULL, EndMark , "" }
 573 };
 574
 575 void
 576 IcsOptionsProc ()
 577 {
 578    GenericPopUp(icsOptions, _("ICS Options"), TransientDlg, BoardWindow, MODAL, 0);
 579 }
 580
 581 //-------------------------------------------- Load Game Options ---------------------------------
 582
 583 static char *modeNames[] = { N_("Exact position match"), N_("Shown position is subset"), N_("Same material with exactly same Pawn chain"),
 584                       N_("Same material"), N_("Material range (top board half optional)"), N_("Material difference (optional stuff balanced)"), NULL };
 585 static char *modeValues[] = { "1", "2", "3", "4", "5", "6" };
 586 static char *searchMode;
 587
 588 static int
 589 LoadOptionsOK ()
 590 {
 591     appData.searchMode = atoi(searchMode);
 592     return 1;
 593 }
 594
 595 static Option loadOptions[] = {
 596 { 0,  0, 0,     NULL, (void*) &appData.autoDisplayTags, "", NULL, CheckBox, N_("Auto-Display Tags") },
 597 { 0,  0, 0,     NULL, (void*) &appData.autoDisplayComment, "", NULL, CheckBox, N_("Auto-Display Comment") },
 598 { 0, LR, 0,     NULL, NULL, NULL, NULL, Label, N_("Auto-Play speed of loaded games\n(0 = instant, -1 = off):") },
 599 { 0, -1,10000000, NULL, (void*) &appData.timeDelay, "", NULL, Fractional, N_("Seconds per Move:") },
 600 { 0, LR, 0,     NULL, NULL, NULL, NULL, Label,  N_("\noptions to use in game-viewer mode:") },
 601 { 0, 0,300,     NULL, (void*) &appData.viewerOptions, "", NULL, TextBox,  "" },
 602 { 0, LR,  0,    NULL, NULL, NULL, NULL, Label,  N_("\nThresholds for position filtering in game list:") },
 603 { 0, 0,5000,    NULL, (void*) &appData.eloThreshold1, "", NULL, Spin, N_("Elo of strongest player at least:") },
 604 { 0, 0,5000,    NULL, (void*) &appData.eloThreshold2, "", NULL, Spin, N_("Elo of weakest player at least:") },
 605 { 0, 0,5000,    NULL, (void*) &appData.dateThreshold, "", NULL, Spin, N_("No games before year:") },
 606 { 0, 1,50,      NULL, (void*) &appData.stretch, "", NULL, Spin, N_("Minimum nr consecutive positions:") },
 607 { 0, 0,205,     NULL, (void*) &searchMode, (char*) modeValues, modeNames, ComboBox, N_("Search mode:") },
 608 { 0, 0, 0,      NULL, (void*) &appData.ignoreColors, "", NULL, CheckBox, N_("Also match reversed colors") },
 609 { 0, 0, 0,      NULL, (void*) &appData.findMirror, "", NULL, CheckBox, N_("Also match left-right flipped position") },
 610 { 0,  0, 0,     NULL, (void*) &LoadOptionsOK, "", NULL, EndMark , "" }
 611 };
 612
 613 void
 614 LoadOptionsPopUp (DialogClass parent)
 615 {
 616    ASSIGN(searchMode, modeValues[appData.searchMode-1]);
 617    GenericPopUp(loadOptions, _("Load Game Options"), TransientDlg, parent, MODAL, 0);
 618 }
 619
 620 void
 621 LoadOptionsProc ()
 622 {   // called from menu
 623     LoadOptionsPopUp(BoardWindow);
 624 }
 625
 626 //------------------------------------------- Save Game Options --------------------------------------------
 627
 628 static Option saveOptions[] = {
 629 { 0, 0, 0, NULL, (void*) &appData.autoSaveGames, "", NULL, CheckBox, N_("Auto-Save Games") },
 630 { 0, 0, 0, NULL, (void*) &appData.saveGameFile, ".pgn", NULL, FileName,  N_("Save Games on File:") },
 631 { 0, 0, 0, NULL, (void*) &appData.savePositionFile, ".fen", NULL, FileName,  N_("Save Final Positions on File:") },
 632 { 0, 0, 0, NULL, (void*) &appData.pgnEventHeader, "", NULL, TextBox,  N_("PGN Event Header:") },
 633 { 0, 0, 0, NULL, (void*) &appData.oldSaveStyle, "", NULL, CheckBox, N_("Old Save Style (as opposed to PGN)") },
 634 { 0, 0, 0, NULL, (void*) &appData.numberTag, "", NULL, CheckBox, N_("Include Number Tag in tourney PGN") },
 635 { 0, 0, 0, NULL, (void*) &appData.saveExtendedInfoInPGN, "", NULL, CheckBox, N_("Save Score/Depth Info in PGN") },
 636 { 0, 0, 0, NULL, (void*) &appData.saveOutOfBookInfo, "", NULL, CheckBox, N_("Save Out-of-Book Info in PGN           ") },
 637 { 0, SAME_ROW, 0, NULL, NULL, "", NULL, EndMark , "" }
 638 };
 639
 640 void
 641 SaveOptionsProc ()
 642 {
 643    GenericPopUp(saveOptions, _("Save Game Options"), TransientDlg, BoardWindow, MODAL, 0);
 644 }
 645
 646 //----------------------------------------------- Sound Options ---------------------------------------------
 647
 648 static void Test P((int n));
 649 static char *trialSound;
 650
 651 static char *soundNames[] = {
 652         N_("No Sound"),
 653         N_("Default Beep"),
 654         N_("Above WAV File"),
 655         N_("Car Horn"),
 656         N_("Cymbal"),
 657         N_("Ding"),
 658         N_("Gong"),
 659         N_("Laser"),
 660         N_("Penalty"),
 661         N_("Phone"),
 662         N_("Pop"),
 663         N_("Slap"),
 664         N_("Wood Thunk"),
 665         NULL,
 666         N_("User File")
 667 };
 668
 669 static char *soundFiles[] = { // sound files corresponding to above names
 670         "",
 671         "$",
 672         NULL, // kludge alert: as first thing in the dialog readout this is replaced with the user-given .WAV filename
 673         "honkhonk.wav",
 674         "cymbal.wav",
 675         "ding1.wav",
 676         "gong.wav",
 677         "laser.wav",
 678         "penalty.wav",
 679         "phone.wav",
 680         "pop2.wav",
 681         "slap.wav",
 682         "woodthunk.wav",
 683         NULL,
 684         NULL
 685 };
 686
 687 static Option soundOptions[] = {
 688 { 0, 0, 0, NULL, (void*) &appData.soundProgram, "", NULL, TextBox, N_("Sound Program:") },
 689 { 0, 0, 0, NULL, (void*) &appData.soundDirectory, "", NULL, PathName, N_("Sounds Directory:") },
 690 { 0, 0, 0, NULL, (void*) (soundFiles+2) /* kludge! */, ".wav", NULL, FileName, N_("User WAV File:") },
 691 { 0, 0, 0, NULL, (void*) &trialSound, (char*) soundFiles, soundNames, ComboBox, N_("Try-Out Sound:") },
 692 { 0, SAME_ROW, 0, NULL, (void*) &Test, NULL, NULL, Button, N_("Play") },
 693 { 0, 0, 0, NULL, (void*) &appData.soundMove, (char*) soundFiles, soundNames, ComboBox, N_("Move:") },
 694 { 0, 0, 0, NULL, (void*) &appData.soundIcsWin, (char*) soundFiles, soundNames, ComboBox, N_("Win:") },
 695 { 0, 0, 0, NULL, (void*) &appData.soundIcsLoss, (char*) soundFiles, soundNames, ComboBox, N_("Lose:") },
 696 { 0, 0, 0, NULL, (void*) &appData.soundIcsDraw, (char*) soundFiles, soundNames, ComboBox, N_("Draw:") },
 697 { 0, 0, 0, NULL, (void*) &appData.soundIcsUnfinished, (char*) soundFiles, soundNames, ComboBox, N_("Unfinished:") },
 698 { 0, 0, 0, NULL, (void*) &appData.soundIcsAlarm, (char*) soundFiles, soundNames, ComboBox, N_("Alarm:") },
 699 { 0, 0, 0, NULL, (void*) &appData.soundShout, (char*) soundFiles, soundNames, ComboBox, N_("Shout:") },
 700 { 0, 0, 0, NULL, (void*) &appData.soundSShout, (char*) soundFiles, soundNames, ComboBox, N_("S-Shout:") },
 701 { 0, 0, 0, NULL, (void*) &appData.soundChannel, (char*) soundFiles, soundNames, ComboBox, N_("Channel:") },
 702 { 0, 0, 0, NULL, (void*) &appData.soundChannel1, (char*) soundFiles, soundNames, ComboBox, N_("Channel 1:") },
 703 { 0, 0, 0, NULL, (void*) &appData.soundTell, (char*) soundFiles, soundNames, ComboBox, N_("Tell:") },
 704 { 0, 0, 0, NULL, (void*) &appData.soundKibitz, (char*) soundFiles, soundNames, ComboBox, N_("Kibitz:") },
 705 { 0, 0, 0, NULL, (void*) &appData.soundChallenge, (char*) soundFiles, soundNames, ComboBox, N_("Challenge:") },
 706 { 0, 0, 0, NULL, (void*) &appData.soundRequest, (char*) soundFiles, soundNames, ComboBox, N_("Request:") },
 707 { 0, 0, 0, NULL, (void*) &appData.soundSeek, (char*) soundFiles, soundNames, ComboBox, N_("Seek:") },
 708 { 0, SAME_ROW, 0, NULL, NULL, "", NULL, EndMark , "" }
 709 };
 710
 711 static void
 712 Test (int n)
 713 {
 714     GenericReadout(soundOptions, 2);
 715     if(soundFiles[values[3]]) PlaySound(soundFiles[values[3]]);
 716 }
 717
 718 void
 719 SoundOptionsProc ()
 720 {
 721    free(soundFiles[2]);
 722    soundFiles[2] = strdup("*");
 723    GenericPopUp(soundOptions, _("Sound Options"), TransientDlg, BoardWindow, MODAL, 0);
 724 }
 725
 726 //--------------------------------------------- Board Options --------------------------------------
 727
 728 static void DefColor P((int n));
 729 static void AdjustColor P((int i));
 730
 731 static int
 732 BoardOptionsOK (int n)
 733 {
 734     if(appData.overrideLineGap >= 0) lineGap = appData.overrideLineGap; else lineGap = defaultLineGap;
 735     useImages = useImageSqs = 0;
 736     InitDrawingParams();
 737     InitDrawingSizes(-1, 0);
 738     DrawPosition(True, NULL);
 739     return 1;
 740 }
 741
 742 static Option boardOptions[] = {
 743 { 0,          0, 70, NULL, (void*) &appData.whitePieceColor, "", NULL, TextBox, N_("White Piece Color:") },
 744 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#FFFFCC", Button, "      " },
 745 /* TRANSLATORS: R = single letter for the color red */
 746 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 747 /* TRANSLATORS: G = single letter for the color green */
 748 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 749 /* TRANSLATORS: B = single letter for the color blue */
 750 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 751 /* TRANSLATORS: D = single letter to make a color darker */
 752 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 753 { 0,          0, 70, NULL, (void*) &appData.blackPieceColor, "", NULL, TextBox, N_("Black Piece Color:") },
 754 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#202020", Button, "      " },
 755 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 756 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 757 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 758 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 759 { 0,          0, 70, NULL, (void*) &appData.lightSquareColor, "", NULL, TextBox, N_("Light Square Color:") },
 760 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#C8C365", Button, "      " },
 761 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 762 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 763 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 764 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 765 { 0,          0, 70, NULL, (void*) &appData.darkSquareColor, "", NULL, TextBox, N_("Dark Square Color:") },
 766 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#77A26D", Button, "      " },
 767 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 768 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 769 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 770 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 771 { 0,          0, 70, NULL, (void*) &appData.highlightSquareColor, "", NULL, TextBox, N_("Highlight Color:") },
 772 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#FFFF00", Button, "      " },
 773 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 774 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 775 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 776 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 777 { 0,          0, 70, NULL, (void*) &appData.premoveHighlightColor, "", NULL, TextBox, N_("Premove Highlight Color:") },
 778 { 1000, SAME_ROW, 0, NULL, (void*) &DefColor, NULL, (char**) "#FF0000", Button, "      " },
 779 {    1, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("R") },
 780 {    2, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("G") },
 781 {    3, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("B") },
 782 {    4, SAME_ROW, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, N_("D") },
 783 { 0, 0, 0, NULL, (void*) &appData.upsideDown, "", NULL, CheckBox, N_("Flip Pieces Shogi Style        (Colored buttons restore default)") },
 784 //{ 0, 0, 0, NULL, (void*) &appData.allWhite, "", NULL, CheckBox, N_("Use Outline Pieces for Black") },
 785 { 0, 0, 0, NULL, (void*) &appData.monoMode, "", NULL, CheckBox, N_("Mono Mode") },
 786 { 0,-1, 5, NULL, (void*) &appData.overrideLineGap, "", NULL, Spin, N_("Line Gap ( -1 = default for board size):") },
 787 { 0, 0, 0, NULL, (void*) &appData.useBitmaps, "", NULL, CheckBox, N_("Use Board Textures") },
 788 { 0, 0, 0, NULL, (void*) &appData.liteBackTextureFile, ".xpm", NULL, FileName, N_("Light-Squares Texture File:") },
 789 { 0, 0, 0, NULL, (void*) &appData.darkBackTextureFile, ".xpm", NULL, FileName, N_("Dark-Squares Texture File:") },
 790 { 0, 0, 0, NULL, (void*) &appData.bitmapDirectory, "", NULL, PathName, N_("Directory with Bitmap Pieces:") },
 791 { 0, 0, 0, NULL, (void*) &appData.pixmapDirectory, "", NULL, PathName, N_("Directory with Pixmap Pieces:") },
 792 { 0, 0, 0, NULL, (void*) &BoardOptionsOK, "", NULL, EndMark , "" }
 793 };
 794
 795 static void
 796 SetColorText (int n, char *buf)
 797 {
 798     SetWidgetText(&boardOptions[n-1], buf, TransientDlg);
 799     SetColor(buf, &boardOptions[n]);
 800 }
 801
 802 static void
 803 DefColor (int n)
 804 {
 805     SetColorText(n, (char*) boardOptions[n].choice);
 806 }
 807
 808 void
 809 RefreshColor (int source, int n)
 810 {
 811     int col, j, r, g, b, step = 10;
 812     char *s, buf[MSG_SIZ]; // color string
 813     GetWidgetText(&boardOptions[source], &s);
 814     if(sscanf(s, "#%x", &col) != 1) return;   // malformed
 815     b = col & 0xFF; g = col & 0xFF00; r = col & 0xFF0000;
 816     switch(n) {
 817         case 1: r += 0x10000*step;break;
 818         case 2: g += 0x100*step;  break;
 819         case 3: b += step;        break;
 820         case 4: r -= 0x10000*step; g -= 0x100*step; b -= step; break;
 821     }
 822     if(r < 0) r = 0; if(g < 0) g = 0; if(b < 0) b = 0;
 823     if(r > 0xFF0000) r = 0xFF0000; if(g > 0xFF00) g = 0xFF00; if(b > 0xFF) b = 0xFF;
 824     col = r | g | b;
 825     snprintf(buf, MSG_SIZ, "#%06x", col);
 826     for(j=1; j<7; j++) if(buf[j] >= 'a') buf[j] -= 32; // capitalize
 827     SetColorText(source+1, buf);
 828 }
 829
 830 static void
 831 AdjustColor (int i)
 832 {
 833     int n = boardOptions[i].value;
 834     RefreshColor(i-n-1, n);
 835 }
 836
 837 void
 838 BoardOptionsProc ()
 839 {
 840    GenericPopUp(boardOptions, _("Board Options"), TransientDlg, BoardWindow, MODAL, 0);
 841 }
 842
 843 //-------------------------------------------- ICS Text Menu Options ------------------------------
 844
 845 Option textOptions[100];
 846 static void PutText P((char *text, int pos));
 847
 848 void
 849 SendString (char *p)
 850 {
 851     char buf[MSG_SIZ], *q;
 852     if(q = strstr(p, "$input")) {
 853         if(!shellUp[TextMenuDlg]) return;
 854         strncpy(buf, p, MSG_SIZ);
 855         strncpy(buf + (q-p), q+6, MSG_SIZ-(q-p));
 856         PutText(buf, q-p);
 857         return;
 858     }
 859     snprintf(buf, MSG_SIZ, "%s\n", p);
 860     SendToICS(buf);
 861 }
 862
 863 void
 864 IcsTextProc ()
 865 {
 866    int i=0, j;
 867    char *p, *q, *r;
 868    if((p = icsTextMenuString) == NULL) return;
 869    do {
 870         q = r = p; while(*p && *p != ';') p++;
 871         for(j=0; j<p-q; j++) textOptions[i].name[j] = *r++;
 872         textOptions[i].name[j++] = 0;
 873         if(!*p) break;
 874         if(*++p == '\n') p++; // optional linefeed after button-text terminating semicolon
 875         q = p;
 876         textOptions[i].choice = (char**) (r = textOptions[i].name + j);
 877         while(*p && (*p != ';' || p[1] != '\n')) textOptions[i].name[j++] = *p++;
 878         textOptions[i].name[j++] = 0;
 879         if(*p) p += 2;
 880         textOptions[i].max = 135;
 881         textOptions[i].min = i&1;
 882         textOptions[i].handle = NULL;
 883         textOptions[i].target = &SendText;
 884         textOptions[i].textValue = strstr(r, "$input") ? "#80FF80" : strstr(r, "$name") ? "#FF8080" : "#FFFFFF";
 885         textOptions[i].type = Button;
 886    } while(++i < 99 && *p);
 887    if(i == 0) return;
 888    textOptions[i].type = EndMark;
 889    textOptions[i].target = NULL;
 890    textOptions[i].min = 2;
 891    MarkMenu("ICStex", TextMenuDlg);
 892    GenericPopUp(textOptions, _("ICS text menu"), TextMenuDlg, BoardWindow, NONMODAL, 1);
 893 }
 894
 895 //---------------------------------------------------- Edit Comment -----------------------------------
 896
 897 static char *commentText;
 898 static int commentIndex;
 899 static void ClearComment P((int n));
 900 static void SaveChanges P((int n));
 901
 902 static int
 903 NewComCallback (int n)
 904 {
 905     ReplaceComment(commentIndex, commentText);
 906     return 1;
 907 }
 908
 909 Option commentOptions[] = {
 910 { 200, T_VSCRL | T_FILL | T_WRAP | T_TOP, 250, NULL, (void*) &commentText, "", NULL, TextBox, "" },
 911 { 0,     0,     50, NULL, (void*) &ClearComment, NULL, NULL, Button, N_("clear") },
 912 { 0, SAME_ROW, 100, NULL, (void*) &SaveChanges, NULL, NULL, Button, N_("save changes") },
 913 { 0, SAME_ROW,  0,  NULL, (void*) &NewComCallback, "", NULL, EndMark , "" }
 914 };
 915
 916 static void
 917 SaveChanges (int n)
 918 {
 919     GenericReadout(commentOptions, 0);
 920     ReplaceComment(commentIndex, commentText);
 921 }
 922
 923 static void
 924 ClearComment (int n)
 925 {
 926     SetWidgetText(&commentOptions[0], "", CommentDlg);
 927 }
 928
 929 void
 930 NewCommentPopup (char *title, char *text, int index)
 931 {
 932     if(DialogExists(CommentDlg)) { // if already exists, alter title and content
 933         SetDialogTitle(CommentDlg, title);
 934         SetWidgetText(&commentOptions[0], text, CommentDlg);
 935     }
 936     if(commentText) free(commentText); commentText = strdup(text);
 937     commentIndex = index;
 938     MarkMenu("Show Comments", CommentDlg);
 939     if(GenericPopUp(commentOptions, title, CommentDlg, BoardWindow, NONMODAL, 1))
 940         AddHandler(&commentOptions[0], 1);
 941 }
 942
 943 void
 944 EditCommentProc ()
 945 {
 946     int j;
 947     if (PopDown(CommentDlg)) { // popdown succesful
 948         MarkMenuItem("Edit Comment", False);
 949         MarkMenuItem("Show Comments", False);
 950     } else // was not up
 951         EditCommentEvent();
 952 }
 953
 954 //------------------------------------------------------ Edit Tags ----------------------------------
 955
 956 static void changeTags P((int n));
 957 static char *tagsText;
 958
 959 static int
 960 NewTagsCallback (int n)
 961 {
 962     ReplaceTags(tagsText, &gameInfo);
 963     return 1;
 964 }
 965
 966 static Option tagsOptions[] = {
 967 {   0,   0,   0, NULL, NULL, NULL, NULL, Label,  NULL },
 968 { 200, T_VSCRL | T_FILL | T_WRAP | T_TOP, 200, NULL, (void*) &tagsText, "", NULL, TextBox, "" },
 969 {   0,   0, 100, NULL, (void*) &changeTags, NULL, NULL, Button, N_("save changes") },
 970 { 0,SAME_ROW, 0, NULL, (void*) &NewTagsCallback, "", NULL, EndMark , "" }
 971 };
 972
 973 static void
 974 changeTags (int n)
 975 {
 976     GenericReadout(tagsOptions, 1);
 977     if(bookUp) SaveToBook(tagsText); else
 978     ReplaceTags(tagsText, &gameInfo);
 979 }
 980
 981 void
 982 NewTagsPopup (char *text, char *msg)
 983 {
 984     char *title = bookUp ? _("Edit book") : _("Tags");
 985
 986     if(DialogExists(TagsDlg)) { // if already exists, alter title and content
 987         SetWidgetText(&tagsOptions[1], text, TagsDlg);
 988         SetDialogTitle(TagsDlg, title);
 989     }
 990     if(tagsText) free(tagsText); tagsText = strdup(text);
 991     tagsOptions[0].name = msg;
 992     MarkMenu("Show Tags", TagsDlg);
 993     GenericPopUp(tagsOptions, title, TagsDlg, BoardWindow, NONMODAL, 1);
 994 }
 995
 996 //---------------------------------------------- ICS Input Box ----------------------------------
 997
 998 char *icsText;
 999
1000 // [HGM] code borrowed from winboard.c (which should thus go to backend.c!)
1001 #define HISTORY_SIZE 64
1002 static char *history[HISTORY_SIZE];
1003 static int histIn = 0, histP = 0;
1004
1005 static void
1006 SaveInHistory (char *cmd)
1007 {
1008   if (history[histIn] != NULL) {
1009     free(history[histIn]);
1010     history[histIn] = NULL;
1011   }
1012   if (*cmd == NULLCHAR) return;
1013   history[histIn] = StrSave(cmd);
1014   histIn = (histIn + 1) % HISTORY_SIZE;
1015   if (history[histIn] != NULL) {
1016     free(history[histIn]);
1017     history[histIn] = NULL;
1018   }
1019   histP = histIn;
1020 }
1021
1022 static char *
1023 PrevInHistory (char *cmd)
1024 {
1025   int newhp;
1026   if (histP == histIn) {
1027     if (history[histIn] != NULL) free(history[histIn]);
1028     history[histIn] = StrSave(cmd);
1029   }
1030   newhp = (histP - 1 + HISTORY_SIZE) % HISTORY_SIZE;
1031   if (newhp == histIn || history[newhp] == NULL) return NULL;
1032   histP = newhp;
1033   return history[histP];
1034 }
1035
1036 static char *
1037 NextInHistory ()
1038 {
1039   if (histP == histIn) return NULL;
1040   histP = (histP + 1) % HISTORY_SIZE;
1041   return history[histP];
1042 }
1043 // end of borrowed code
1044
1045 Option boxOptions[] = {
1046 {  30,  0,  400, NULL, (void*) &icsText, "", NULL, TextBox, "" },
1047 {  0,SAME_ROW | NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
1048 };
1049
1050 void
1051 ICSInputSendText ()
1052 {
1053     char *val;
1054
1055     GetWidgetText(&boxOptions[0], &val);
1056     SaveInHistory(val);
1057     SendMultiLineToICS(val);
1058     SetWidgetText(&boxOptions[0], val, InputBoxDlg);
1059 }
1060
1061 void
1062 IcsKey (int n)
1063 {   // [HGM] input: let up-arrow recall previous line from history
1064     char *val;
1065
1066     if (!shellUp[InputBoxDlg]) return;
1067     switch(n) {
1068       case 0:
1069         ICSInputSendText();
1070         return;
1071       case 1:
1072         GetWidgetText(&boxOptions[0], &val);
1073         val = PrevInHistory(val);
1074         break;
1075       case -1:
1076         val = NextInHistory();
1077     }
1078     SetWidgetText(&boxOptions[0], val ? val : "", InputBoxDlg);
1079 }
1080
1081 static void
1082 PutText (char *text, int pos)
1083 {
1084     char buf[MSG_SIZ], *p;
1085
1086     if(strstr(text, "$add ") == text) {
1087         GetWidgetText(&boxOptions[0], &p);
1088         snprintf(buf, MSG_SIZ, "%s%s", p, text+5); text = buf;
1089         pos += strlen(p) - 5;
1090     }
1091     SetWidgetText(&boxOptions[0], text, TextMenuDlg);
1092     SetInsertPos(&boxOptions[0], pos);
1093 }
1094
1095 void
1096 ICSInputBoxPopUp ()
1097 {
1098     MarkMenu("ICS Input Box", InputBoxDlg);
1099     if(GenericPopUp(boxOptions, _("ICS input box"), InputBoxDlg, BoardWindow, NONMODAL, 0))
1100         AddHandler(&boxOptions[0], 3);
1101 }
1102
1103 void
1104 IcsInputBoxProc ()
1105 {
1106     if (!PopDown(InputBoxDlg)) ICSInputBoxPopUp();
1107 }
1108
1109 //--------------------------------------------- Move Type In ------------------------------------------
1110
1111 static int TypeInOK P((int n));
1112
1113 Option typeOptions[] = {
1114 { 30,  0,            400, NULL, (void*) &icsText, "", NULL, TextBox, "" },
1115 { 0, SAME_ROW | NO_OK, 0, NULL, (void*) &TypeInOK, "", NULL, EndMark , "" }
1116 };
1117
1118 static int
1119 TypeInOK (int n)
1120 {
1121     TypeInDoneEvent(icsText);
1122     return TRUE;
1123 }
1124
1125 void
1126 PopUpMoveDialog (char firstchar)
1127 {
1128     static char buf[2];
1129     buf[0] = firstchar; ASSIGN(icsText, buf);
1130     if(GenericPopUp(typeOptions, _("Type a move"), TransientDlg, BoardWindow, MODAL, 0))
1131         AddHandler(&typeOptions[0], 2);
1132 }
1133
1134 void
1135 BoxAutoPopUp (char *buf)
1136 {
1137         if(appData.icsActive) { // text typed to board in ICS mode: divert to ICS input box
1138             if(DialogExists(InputBoxDlg)) { // box already exists: append to current contents
1139                 char *p, newText[MSG_SIZ];
1140                 GetWidgetText(&boxOptions[0], &p);
1141                 snprintf(newText, MSG_SIZ, "%s%c", p, *buf);
1142                 SetWidgetText(&boxOptions[0], newText, InputBoxDlg);
1143                 if(shellUp[InputBoxDlg]) HardSetFocus (&boxOptions[0]); //why???
1144             } else icsText = buf; // box did not exist: make sure it pops up with char in it
1145             ICSInputBoxPopUp();
1146         } else PopUpMoveDialog(*buf);
1147 }
1148
1149 //------------------------------------------ Engine Settings ------------------------------------
1150
1151 void
1152 SettingsPopUp (ChessProgramState *cps)
1153 {
1154    currentCps = cps;
1155    GenericPopUp(cps->option, _("Engine Settings"), TransientDlg, BoardWindow, MODAL, 0);
1156 }
1157
1158 void
1159 FirstSettingsProc ()
1160 {
1161     SettingsPopUp(&first);
1162 }
1163
1164 void
1165 SecondSettingsProc ()
1166 {
1167    if(WaitForEngine(&second, SettingsMenuIfReady)) return;
1168    SettingsPopUp(&second);
1169 }
1170
1171 //----------------------------------------------- Load Engine --------------------------------------
1172
1173 char *engineDir, *engineLine, *nickName, *params;
1174 Boolean isUCI, hasBook, storeVariant, v1, addToList, useNick;
1175 static char *engineNr[] = { N_("First Engine"), N_("Second Engine"), NULL };
1176
1177 static int
1178 InstallOK (int n)
1179 {
1180     PopDown(TransientDlg); // early popdown, to allow FreezeUI to instate grab
1181     if(engineChoice[0] == engineNr[0][0])  Load(&first, 0); else Load(&second, 1);
1182     return FALSE; // no double PopDown!
1183 }
1184
1185 static Option installOptions[] = {
1186 {   0,  NO_GETTEXT, 0, NULL, (void*) &engineLine, (char*) engineList, engineMnemonic, ComboBox, N_("Select engine from list:") },
1187 {   0,  LR,   0, NULL, NULL, NULL, NULL, Label, N_("or specify one below:") },
1188 {   0,  0,    0, NULL, (void*) &nickName, NULL, NULL, TextBox, N_("Nickname (optional):") },
1189 {   0,  0,    0, NULL, (void*) &useNick, NULL, NULL, CheckBox, N_("Use nickname in PGN player tags of engine-engine games") },
1190 {   0,  0,    0, NULL, (void*) &engineDir, NULL, NULL, PathName, N_("Engine Directory:") },
1191 {   0,  0,    0, NULL, (void*) &engineName, NULL, NULL, FileName, N_("Engine Command:") },
1192 {   0,  LR,   0, NULL, NULL, NULL, NULL, Label, N_("(Directory will be derived from engine path when empty)") },
1193 {   0,  0,    0, NULL, (void*) &isUCI, NULL, NULL, CheckBox, N_("UCI") },
1194 {   0,  0,    0, NULL, (void*) &v1, NULL, NULL, CheckBox, N_("WB protocol v1 (do not wait for engine features)") },
1195 {   0,  0,    0, NULL, (void*) &hasBook, NULL, NULL, CheckBox, N_("Must not use GUI book") },
1196 {   0,  0,    0, NULL, (void*) &addToList, NULL, NULL, CheckBox, N_("Add this engine to the list") },
1197 {   0,  0,    0, NULL, (void*) &storeVariant, NULL, NULL, CheckBox, N_("Force current variant with this engine") },
1198 {   0,  0,    0, NULL, (void*) &engineChoice, (char*) engineNr, engineNr, ComboBox, N_("Load mentioned engine as") },
1199 { 0,SAME_ROW, 0, NULL, (void*) &InstallOK, "", NULL, EndMark , "" }
1200 };
1201
1202 void
1203 LoadEngineProc ()
1204 {
1205    isUCI = storeVariant = v1 = useNick = False; addToList = hasBook = True; // defaults
1206    if(engineChoice) free(engineChoice); engineChoice = strdup(engineNr[0]);
1207    if(engineLine)   free(engineLine);   engineLine = strdup("");
1208    if(engineDir)    free(engineDir);    engineDir = strdup("");
1209    if(nickName)     free(nickName);     nickName = strdup("");
1210    if(params)       free(params);       params = strdup("");
1211    NamesToList(firstChessProgramNames, engineList, engineMnemonic, "all");
1212    GenericPopUp(installOptions, _("Load engine"), TransientDlg, BoardWindow, MODAL, 0);
1213 }
1214
1215 //----------------------------------------------------- Edit Book -----------------------------------------
1216
1217 void
1218 EditBookProc ()
1219 {
1220     EditBookEvent();
1221 }
1222
1223 //--------------------------------------------------- New Shuffle Game ------------------------------
1224
1225 static void SetRandom P((int n));
1226
1227 static int
1228 ShuffleOK (int n)
1229 {
1230     ResetGameEvent();
1231     return 1;
1232 }
1233
1234 static Option shuffleOptions[] = {
1235   {   0,  0,   50, NULL, (void*) &shuffleOpenings, NULL, NULL, CheckBox, N_("shuffle") },
1236   { 0,-1,2000000000, NULL, (void*) &appData.defaultFrcPosition, "", NULL, Spin, N_("Start-position number:") },
1237   {   0,  0,    0, NULL, (void*) &SetRandom, NULL, NULL, Button, N_("randomize") },
1238   {   0,  SAME_ROW,    0, NULL, (void*) &SetRandom, NULL, NULL, Button, N_("pick fixed") },
1239   { 0,SAME_ROW, 0, NULL, (void*) &ShuffleOK, "", NULL, EndMark , "" }
1240 };
1241
1242 static void
1243 SetRandom (int n)
1244 {
1245     int r = n==2 ? -1 : random() & (1<<30)-1;
1246     char buf[MSG_SIZ];
1247     snprintf(buf, MSG_SIZ,  "%d", r);
1248     SetWidgetText(&shuffleOptions[1], buf, TransientDlg);
1249     SetWidgetState(&shuffleOptions[0], True);
1250 }
1251
1252 void
1253 ShuffleMenuProc ()
1254 {
1255     GenericPopUp(shuffleOptions, _("New Shuffle Game"), TransientDlg, BoardWindow, MODAL, 0);
1256 }
1257
1258 //------------------------------------------------------ Time Control -----------------------------------
1259
1260 static int TcOK P((int n));
1261 int tmpMoves, tmpTc, tmpInc, tmpOdds1, tmpOdds2, tcType;
1262
1263 static void
1264 ShowTC (int n)
1265 {
1266 }
1267
1268 static void SetTcType P((int n));
1269
1270 static char *
1271 Value (int n)
1272 {
1273         static char buf[MSG_SIZ];
1274         snprintf(buf, MSG_SIZ, "%d", n);
1275         return buf;
1276 }
1277
1278 static Option tcOptions[] = {
1279 {   0,  0,    0, NULL, (void*) &SetTcType, NULL, NULL, Button, N_("classical") },
1280 {   0,SAME_ROW,0,NULL, (void*) &SetTcType, NULL, NULL, Button, N_("incremental") },
1281 {   0,SAME_ROW,0,NULL, (void*) &SetTcType, NULL, NULL, Button, N_("fixed max") },
1282 {   0,  0,  200, NULL, (void*) &tmpMoves, NULL, NULL, Spin, N_("Moves per session:") },
1283 {   0,  0,10000, NULL, (void*) &tmpTc,    NULL, NULL, Spin, N_("Initial time (min):") },
1284 {   0, 0, 10000, NULL, (void*) &tmpInc,   NULL, NULL, Spin, N_("Increment or max (sec/move):") },
1285 {   0,  0,    0, NULL, NULL, NULL, NULL, Label, N_("Time-Odds factors:") },
1286 {   0,  1, 1000, NULL, (void*) &tmpOdds1, NULL, NULL, Spin, N_("Engine #1") },
1287 {   0,  1, 1000, NULL, (void*) &tmpOdds2, NULL, NULL, Spin, N_("Engine #2 / Human") },
1288 {   0,  0,    0, NULL, (void*) &TcOK, "", NULL, EndMark , "" }
1289 };
1290
1291 static int
1292 TcOK (int n)
1293 {
1294     char *tc;
1295     if(tcType == 0 && tmpMoves <= 0) return 0;
1296     if(tcType == 2 && tmpInc <= 0) return 0;
1297     GetWidgetText(&tcOptions[4], &tc); // get original text, in case it is min:sec
1298     searchTime = 0;
1299     switch(tcType) {
1300       case 0:
1301         if(!ParseTimeControl(tc, -1, tmpMoves)) return 0;
1302         appData.movesPerSession = tmpMoves;
1303         ASSIGN(appData.timeControl, tc);
1304         appData.timeIncrement = -1;
1305         break;
1306       case 1:
1307         if(!ParseTimeControl(tc, tmpInc, 0)) return 0;
1308         ASSIGN(appData.timeControl, tc);
1309         appData.timeIncrement = tmpInc;
1310         break;
1311       case 2:
1312         searchTime = tmpInc;
1313     }
1314     appData.firstTimeOdds = first.timeOdds = tmpOdds1;
1315     appData.secondTimeOdds = second.timeOdds = tmpOdds2;
1316     Reset(True, True);
1317     return 1;
1318 }
1319
1320 static void
1321 SetTcType (int n)
1322 {
1323     switch(tcType = n) {
1324       case 0:
1325         SetWidgetText(&tcOptions[3], Value(tmpMoves), TransientDlg);
1326         SetWidgetText(&tcOptions[4], Value(tmpTc), TransientDlg);
1327         SetWidgetText(&tcOptions[5], _("Unused"), TransientDlg);
1328         break;
1329       case 1:
1330         SetWidgetText(&tcOptions[3], _("Unused"), TransientDlg);
1331         SetWidgetText(&tcOptions[4], Value(tmpTc), TransientDlg);
1332         SetWidgetText(&tcOptions[5], Value(tmpInc), TransientDlg);
1333         break;
1334       case 2:
1335         SetWidgetText(&tcOptions[3], _("Unused"), TransientDlg);
1336         SetWidgetText(&tcOptions[4], _("Unused"), TransientDlg);
1337         SetWidgetText(&tcOptions[5], Value(tmpInc), TransientDlg);
1338     }
1339 }
1340
1341 void
1342 TimeControlProc ()
1343 {
1344    tmpMoves = appData.movesPerSession;
1345    tmpInc = appData.timeIncrement; if(tmpInc < 0) tmpInc = 0;
1346    tmpOdds1 = tmpOdds2 = 1; tcType = 0;
1347    tmpTc = atoi(appData.timeControl);
1348    GenericPopUp(tcOptions, _("Time Control"), TransientDlg, BoardWindow, MODAL, 0);
1349 }
1350
1351 //------------------------------- Ask Question -----------------------------------------
1352
1353 int SendReply P((int n));
1354 char pendingReplyPrefix[MSG_SIZ];
1355 ProcRef pendingReplyPR;
1356 char *answer;
1357
1358 Option askOptions[] = {
1359 { 0, 0, 0, NULL, NULL, NULL, NULL, Label,  NULL },
1360 { 0, 0, 0, NULL, (void*) &answer, "", NULL, TextBox, "" },
1361 { 0, 0, 0, NULL, (void*) &SendReply, "", NULL, EndMark , "" }
1362 };
1363
1364 int
1365 SendReply (int n)
1366 {
1367     char buf[MSG_SIZ];
1368     int err;
1369     char *reply=answer;
1370 //    GetWidgetText(&askOptions[1], &reply);
1371     safeStrCpy(buf, pendingReplyPrefix, sizeof(buf)/sizeof(buf[0]) );
1372     if (*buf) strncat(buf, " ", MSG_SIZ - strlen(buf) - 1);
1373     strncat(buf, reply, MSG_SIZ - strlen(buf) - 1);
1374     strncat(buf, "\n",  MSG_SIZ - strlen(buf) - 1);
1375     OutputToProcess(pendingReplyPR, buf, strlen(buf), &err); // does not go into debug file??? => bug
1376     if (err) DisplayFatalError(_("Error writing to chess program"), err, 0);
1377     return TRUE;
1378 }
1379
1380 void
1381 AskQuestion (char *title, char *question, char *replyPrefix, ProcRef pr)
1382 {
1383     safeStrCpy(pendingReplyPrefix, replyPrefix, sizeof(pendingReplyPrefix)/sizeof(pendingReplyPrefix[0]) );
1384     pendingReplyPR = pr;
1385     ASSIGN(answer, "");
1386     askOptions[0].name = question;
1387     if(GenericPopUp(askOptions, title, AskDlg, BoardWindow, MODAL, 0))
1388         AddHandler(&askOptions[1], 2);
1389 }
1390
1391 //---------------------------- Promotion Popup --------------------------------------
1392
1393 static int count;
1394
1395 static void PromoPick P((int n));
1396
1397 static Option promoOptions[] = {
1398 {   0,         0,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1399 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1400 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1401 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1402 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1403 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1404 {   0,  SAME_ROW,    0, NULL, (void*) &PromoPick, NULL, NULL, Button, "" },
1405 {   0, SAME_ROW | NO_OK, 0, NULL, NULL, "", NULL, EndMark , "" }
1406 };
1407
1408 static void
1409 PromoPick (int n)
1410 {
1411     int promoChar = promoOptions[n+count].value;
1412
1413     PopDown(PromoDlg);
1414
1415     if (promoChar == 0) fromX = -1;
1416     if (fromX == -1) return;
1417
1418     if (! promoChar) {
1419         fromX = fromY = -1;
1420         ClearHighlights();
1421         return;
1422     }
1423     UserMoveEvent(fromX, fromY, toX, toY, promoChar);
1424
1425     if (!appData.highlightLastMove || gotPremove) ClearHighlights();
1426     if (gotPremove) SetPremoveHighlights(fromX, fromY, toX, toY);
1427     fromX = fromY = -1;
1428 }
1429
1430 static void
1431 SetPromo (char *name, int nr, char promoChar)
1432 {
1433     safeStrCpy(promoOptions[nr].name, name, MSG_SIZ);
1434     promoOptions[nr].value = promoChar;
1435 }
1436
1437 void
1438 PromotionPopUp ()
1439 { // choice depends on variant: prepare dialog acordingly
1440   count = 7;
1441   SetPromo(_("Cancel"), --count, 0); // Beware: GenericPopUp cannot handle user buttons named "cancel" (lowe case)!
1442   if(gameInfo.variant != VariantShogi) {
1443     if (!appData.testLegality || gameInfo.variant == VariantSuicide ||
1444         gameInfo.variant == VariantSpartan && !WhiteOnMove(currentMove) ||
1445         gameInfo.variant == VariantGiveaway) {
1446       SetPromo(_("King"), --count, 'k');
1447     }
1448     if(gameInfo.variant == VariantSpartan && !WhiteOnMove(currentMove)) {
1449       SetPromo(_("Captain"), --count, 'c');
1450       SetPromo(_("Lieutenant"), --count, 'l');
1451       SetPromo(_("General"), --count, 'g');
1452       SetPromo(_("Warlord"), --count, 'w');
1453     } else {
1454       SetPromo(_("Knight"), --count, 'n');
1455       SetPromo(_("Bishop"), --count, 'b');
1456       SetPromo(_("Rook"), --count, 'r');
1457       if(gameInfo.variant == VariantCapablanca ||
1458          gameInfo.variant == VariantGothic ||
1459          gameInfo.variant == VariantCapaRandom) {
1460         SetPromo(_("Archbishop"), --count, 'a');
1461         SetPromo(_("Chancellor"), --count, 'c');
1462       }
1463       SetPromo(_("Queen"), --count, 'q');
1464     }
1465   } else // [HGM] shogi
1466   {
1467       SetPromo(_("Defer"), --count, '=');
1468       SetPromo(_("Promote"), --count, '+');
1469   }
1470   GenericPopUp(promoOptions + count, "Promotion", PromoDlg, BoardWindow, NONMODAL, 0);
1471 }
1472
1473 //---------------------------- Chat Windows ----------------------------------------------
1474
1475 void
1476 OutputChatMessage (int partner, char *mess)
1477 {
1478     return; // dummy
1479 }
1480
1481 //--------------------------------- Game-List options dialog ------------------------------------------
1482
1483 char *strings[LPUSERGLT_SIZE];
1484 int stringPtr;
1485
1486 void
1487 GLT_ClearList ()
1488 {
1489     strings[0] = NULL;
1490     stringPtr = 0;
1491 }
1492
1493 void
1494 GLT_AddToList (char *name)
1495 {
1496     strings[stringPtr++] = name;
1497     strings[stringPtr] = NULL;
1498 }
1499
1500 Boolean
1501 GLT_GetFromList (int index, char *name)
1502 {
1503   safeStrCpy(name, strings[index], MSG_SIZ);
1504   return TRUE;
1505 }
1506
1507 void
1508 GLT_DeSelectList ()
1509 {
1510 }
1511
1512 static void GLT_Button P((int n));
1513 static int GLT_OK P((int n));
1514
1515 static Option listOptions[] = {
1516 { 0, LR|TB,  200, NULL, (void*) strings, "", NULL, ListBox, "" },
1517 { 0,    0,     0, NULL, (void*) &GLT_Button, NULL, NULL, Button, N_("factory") },
1518 { 0, SAME_ROW, 0, NULL, (void*) &GLT_Button, NULL, NULL, Button, N_("up") },
1519 { 0, SAME_ROW, 0, NULL, (void*) &GLT_Button, NULL, NULL, Button, N_("down") },
1520 { 0, SAME_ROW, 0, NULL, (void*) &GLT_OK, "", NULL, EndMark , "" }
1521 };
1522
1523 static int
1524 GLT_OK (int n)
1525 {
1526     GLT_ParseList();
1527     appData.gameListTags = strdup(lpUserGLT);
1528     return 1;
1529 }
1530
1531 static void
1532 GLT_Button (int n)
1533 {
1534     int index = SelectedListBoxItem (&listOptions[0]);
1535     char *p;
1536     if (index < 0) {
1537         DisplayError(_("No tag selected"), 0);
1538         return;
1539     }
1540     p = strings[index];
1541     if (n == 3) {
1542         if(index >= strlen(GLT_ALL_TAGS)) return;
1543         strings[index] = strings[index+1];
1544         strings[++index] = p;
1545     } else
1546     if (n == 2) {
1547         if(index == 0) return;
1548         strings[index] = strings[index-1];
1549         strings[--index] = p;
1550     } else
1551     if (n == 1) {
1552       safeStrCpy(lpUserGLT, GLT_DEFAULT_TAGS, LPUSERGLT_SIZE);
1553       GLT_TagsToList(lpUserGLT);
1554       index = 0;
1555       LoadListBox(&listOptions[0], "?"); // Note: the others don't need this, as the highlight switching redraws the change items
1556     }
1557     HighlightListBoxItem(&listOptions[0], index);
1558 }
1559
1560 void
1561 GameListOptionsPopUp (DialogClass parent)
1562 {
1563     safeStrCpy(lpUserGLT, appData.gameListTags, LPUSERGLT_SIZE);
1564     GLT_TagsToList(lpUserGLT);
1565
1566     GenericPopUp(listOptions, _("Game-list options"), TransientDlg, parent, MODAL, 0);
1567 }
1568
1569 void
1570 GameListOptionsProc ()
1571 {
1572     GameListOptionsPopUp(BoardWindow);
1573 }
1574
1575 //----------------------------- Error popup in various uses -----------------------------
1576
1577 /*
1578  * [HGM] Note:
1579  * XBoard has always had some pathologic behavior with multiple simultaneous error popups,
1580  * (which can occur even for modal popups when asynchrounous events, e.g. caused by engine, request a popup),
1581  * and this new implementation reproduces that as well:
1582  * Only the shell of the last instance is remembered in shells[ErrorDlg] (which replaces errorShell),
1583  * so that PopDowns ordered from the code always refer to that instance, and once that is down,
1584  * have no clue as to how to reach the others. For the Delete Window button calling PopDown this
1585  * has now been repaired, as the action routine assigned to it gets the shell passed as argument.
1586  */
1587
1588 int errorUp = False;
1589
1590 void
1591 ErrorPopDown ()
1592 {
1593     if (!errorUp) return;
1594     dialogError = errorUp = False;
1595     PopDown(ErrorDlg); PopDown(FatalDlg); // on explicit request we pop down any error dialog
1596     if (errorExitStatus != -1) ExitEvent(errorExitStatus);
1597 }
1598
1599 static int
1600 ErrorOK (int n)
1601 {
1602     dialogError = errorUp = False;
1603     PopDown(n == 1 ? FatalDlg : ErrorDlg); // kludge: non-modal dialogs have one less (dummy) option
1604     if (errorExitStatus != -1) ExitEvent(errorExitStatus);
1605     return FALSE; // prevent second Popdown !
1606 }
1607
1608 static Option errorOptions[] = {
1609 {   0,  0,    0, NULL, NULL, NULL, NULL, Label,  NULL }, // dummy option: will never be displayed
1610 {   0,  0,    0, NULL, NULL, NULL, NULL, Label,  NULL }, // textValue field will be set before popup
1611 { 0,NO_CANCEL,0, NULL, (void*) &ErrorOK, "", NULL, EndMark , "" }
1612 };
1613
1614 void
1615 ErrorPopUp (char *title, char *label, int modal)
1616 {
1617     errorUp = True;
1618     errorOptions[1].name = label;
1619     if(dialogError = shellUp[TransientDlg])
1620         GenericPopUp(errorOptions+1, title, FatalDlg, TransientDlg, MODAL, 0); // pop up as daughter of the transient dialog
1621     else
1622         GenericPopUp(errorOptions+modal, title, modal ? FatalDlg: ErrorDlg, BoardWindow, modal, 0); // kludge: option start address indicates modality
1623 }
1624
1625 void
1626 DisplayError (String message, int error)
1627 {
1628     char buf[MSG_SIZ];
1629
1630     if (error == 0) {
1631         if (appData.debugMode || appData.matchMode) {
1632             fprintf(stderr, "%s: %s\n", programName, message);
1633         }
1634     } else {
1635         if (appData.debugMode || appData.matchMode) {
1636             fprintf(stderr, "%s: %s: %s\n",
1637                     programName, message, strerror(error));
1638         }
1639         snprintf(buf, sizeof(buf), "%s: %s", message, strerror(error));
1640         message = buf;
1641     }
1642     ErrorPopUp(_("Error"), message, FALSE);
1643 }
1644
1645
1646 void
1647 DisplayMoveError (String message)
1648 {
1649     fromX = fromY = -1;
1650     ClearHighlights();
1651     DrawPosition(FALSE, NULL);
1652     if (appData.debugMode || appData.matchMode) {
1653         fprintf(stderr, "%s: %s\n", programName, message);
1654     }
1655     if (appData.popupMoveErrors) {
1656         ErrorPopUp(_("Error"), message, FALSE);
1657     } else {
1658         DisplayMessage(message, "");
1659     }
1660 }
1661
1662
1663 void
1664 DisplayFatalError (String message, int error, int status)
1665 {
1666     char buf[MSG_SIZ];
1667
1668     errorExitStatus = status;
1669     if (error == 0) {
1670         fprintf(stderr, "%s: %s\n", programName, message);
1671     } else {
1672         fprintf(stderr, "%s: %s: %s\n",
1673                 programName, message, strerror(error));
1674         snprintf(buf, sizeof(buf), "%s: %s", message, strerror(error));
1675         message = buf;
1676     }
1677     if (appData.popupExitMessage && boardWidget && XtIsRealized(boardWidget)) {
1678       ErrorPopUp(status ? _("Fatal Error") : _("Exiting"), message, TRUE);
1679     } else {
1680       ExitEvent(status);
1681     }
1682 }
1683
1684 void
1685 DisplayInformation (String message)
1686 {
1687     ErrorPopDown();
1688     ErrorPopUp(_("Information"), message, TRUE);
1689 }
1690
1691 void
1692 DisplayNote (String message)
1693 {
1694     ErrorPopDown();
1695     ErrorPopUp(_("Note"), message, FALSE);
1696 }
1697
1698 void
1699 DisplayTitle (char *text)
1700 {
1701     char title[MSG_SIZ];
1702     char icon[MSG_SIZ];
1703
1704     if (text == NULL) text = "";
1705
1706     if (*text != NULLCHAR) {
1707       safeStrCpy(icon, text, sizeof(icon)/sizeof(icon[0]) );
1708       safeStrCpy(title, text, sizeof(title)/sizeof(title[0]) );
1709     } else if (appData.icsActive) {
1710         snprintf(icon, sizeof(icon), "%s", appData.icsHost);
1711         snprintf(title, sizeof(title), "%s: %s", programName, appData.icsHost);
1712     } else if (appData.cmailGameName[0] != NULLCHAR) {
1713         snprintf(icon, sizeof(icon), "%s", "CMail");
1714         snprintf(title,sizeof(title), "%s: %s", programName, "CMail");
1715 #ifdef GOTHIC
1716     // [HGM] license: This stuff should really be done in back-end, but WinBoard already had a pop-up for it
1717     } else if (gameInfo.variant == VariantGothic) {
1718       safeStrCpy(icon,  programName, sizeof(icon)/sizeof(icon[0]) );
1719       safeStrCpy(title, GOTHIC,     sizeof(title)/sizeof(title[0]) );
1720 #endif
1721 #ifdef FALCON
1722     } else if (gameInfo.variant == VariantFalcon) {
1723       safeStrCpy(icon, programName, sizeof(icon)/sizeof(icon[0]) );
1724       safeStrCpy(title, FALCON, sizeof(title)/sizeof(title[0]) );
1725 #endif
1726     } else if (appData.noChessProgram) {
1727       safeStrCpy(icon, programName, sizeof(icon)/sizeof(icon[0]) );
1728       safeStrCpy(title, programName, sizeof(title)/sizeof(title[0]) );
1729     } else {
1730       safeStrCpy(icon, first.tidy, sizeof(icon)/sizeof(icon[0]) );
1731         snprintf(title,sizeof(title), "%s: %s", programName, first.tidy);
1732     }
1733     SetWindowTitle(text, title, icon);
1734 }
1735
1736