xoptions.c

   1 /*
   2  * xoptions.c -- Move list window, part of X front end for XBoard
   3  *
   4  * Copyright 2000, 2009, 2010, 2011 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 <X11/Intrinsic.h>
  51 #include <X11/StringDefs.h>
  52 #include <X11/Shell.h>
  53 #include <X11/Xaw/Dialog.h>
  54 #include <X11/Xaw/Form.h>
  55 #include <X11/Xaw/List.h>
  56 #include <X11/Xaw/Label.h>
  57 #include <X11/Xaw/SimpleMenu.h>
  58 #include <X11/Xaw/SmeBSB.h>
  59 #include <X11/Xaw/SmeLine.h>
  60 #include <X11/Xaw/Box.h>
  61 #include <X11/Xaw/Paned.h>
  62 #include <X11/Xaw/MenuButton.h>
  63 #include <X11/cursorfont.h>
  64 #include <X11/Xaw/Text.h>
  65 #include <X11/Xaw/AsciiText.h>
  66 #include <X11/Xaw/Viewport.h>
  67 #include <X11/Xaw/Toggle.h>
  68
  69 #include "common.h"
  70 #include "backend.h"
  71 #include "xboard.h"
  72 #include "gettext.h"
  73
  74 #ifdef ENABLE_NLS
  75 # define  _(s) gettext (s)
  76 # define N_(s) gettext_noop (s)
  77 #else
  78 # define  _(s) (s)
  79 # define N_(s)  s
  80 #endif
  81
  82 extern void SendToProgram P((char *message, ChessProgramState *cps));
  83 FILE * XsraSelFile P((Widget w, char *prompt, char *ok, char *cancel, char *failed,
  84                 char *init_path, char *mode, int (*show_entry)(), char **name_return));
  85
  86 extern Widget formWidget, shellWidget, boardWidget, menuBarWidget;
  87 extern Display *xDisplay;
  88 extern int squareSize;
  89 extern Pixmap xMarkPixmap;
  90 extern char *layoutName;
  91 extern Window xBoardWindow;
  92 extern Arg layoutArgs[2], formArgs[2];
  93 Pixel timerForegroundPixel, timerBackgroundPixel;
  94 extern int searchTime;
  95 extern int lineGap;
  96
  97 // [HGM] the following code for makng menu popups was cloned from the FileNamePopUp routines
  98
  99 static Widget previous = NULL;
 100
 101 void SetFocus(Widget w, XtPointer data, XEvent *event, Boolean *b)
 102 {
 103     Arg args[2];
 104     char *s;
 105
 106     if(previous) {
 107         XtSetArg(args[0], XtNdisplayCaret, False);
 108         XtSetValues(previous, args, 1);
 109     }
 110     XtSetArg(args[0], XtNstring, &s);
 111     XtGetValues(w, args, 1);
 112     XtSetArg(args[0], XtNdisplayCaret, True);
 113     XtSetArg(args[1], XtNinsertPosition, strlen(s));
 114     XtSetValues(w, args, 2);
 115     XtSetKeyboardFocus((Widget) data, w);
 116     previous = w;
 117 }
 118
 119 //--------------------------- New Shuffle Game --------------------------------------------
 120 extern int shuffleOpenings;
 121 extern int startedFromPositionFile;
 122 int shuffleUp;
 123 Widget shuffleShell;
 124
 125 void ShufflePopDown()
 126 {
 127     if (!shuffleUp) return;
 128     XtPopdown(shuffleShell);
 129     XtDestroyWidget(shuffleShell);
 130     shuffleUp = False;
 131     ModeHighlight();
 132 }
 133
 134 void ShuffleCallback(w, client_data, call_data)
 135      Widget w;
 136      XtPointer client_data, call_data;
 137 {
 138     String name;
 139     Widget w2;
 140     Arg args[16];
 141     char buf[MSG_SIZ];
 142
 143     XtSetArg(args[0], XtNlabel, &name);
 144     XtGetValues(w, args, 1);
 145
 146     if (strcmp(name, _("cancel")) == 0) {
 147         ShufflePopDown();
 148         return;
 149     }
 150     if (strcmp(name, _("off")) == 0) {
 151         ShufflePopDown();
 152         shuffleOpenings = False; // [HGM] should be moved to New Variant menu, once we have it!
 153         ResetGameEvent();
 154         return;
 155     }
 156     if (strcmp(name, _("random")) == 0) {
 157       snprintf(buf, MSG_SIZ,  "%d", rand());
 158         XtSetArg(args[0],XtNvalue, buf); // erase bad (non-numeric) value
 159         XtSetValues(XtParent(w), args, 1);
 160         return;
 161     }
 162     if (strcmp(name, _("ok")) == 0) {
 163         int nr; String name;
 164         name = XawDialogGetValueString(w2 = XtParent(w));
 165         if(sscanf(name ,"%d",&nr) != 1) {
 166           snprintf(buf, MSG_SIZ,  "%d", appData.defaultFrcPosition);
 167             XtSetArg(args[0],XtNvalue, buf); // erase bad (non-numeric) value
 168             XtSetValues(w2, args, 1);
 169             return;
 170         }
 171         appData.defaultFrcPosition = nr;
 172         shuffleOpenings = True;
 173         ShufflePopDown();
 174         ResetGameEvent();
 175         return;
 176     }
 177 }
 178
 179 void ShufflePopUp()
 180 {
 181     Arg args[16];
 182     Widget popup, layout, dialog, edit;
 183     Window root, child;
 184     int x, y, i;
 185     int win_x, win_y;
 186     unsigned int mask;
 187     char def[MSG_SIZ];
 188
 189     i = 0;
 190     XtSetArg(args[i], XtNresizable, True); i++;
 191     XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;
 192     shuffleShell = popup =
 193       XtCreatePopupShell(_("New Shuffle Game"), transientShellWidgetClass,
 194                          shellWidget, args, i);
 195
 196     layout =
 197       XtCreateManagedWidget(layoutName, formWidgetClass, popup,
 198                             layoutArgs, XtNumber(layoutArgs));
 199
 200     snprintf(def, MSG_SIZ,  "%d\n", appData.defaultFrcPosition);
 201     i = 0;
 202     XtSetArg(args[i], XtNlabel, _("Start-position number:")); i++;
 203     XtSetArg(args[i], XtNvalue, def); i++;
 204     XtSetArg(args[i], XtNborderWidth, 0); i++;
 205     dialog = XtCreateManagedWidget(_("Shuffle"), dialogWidgetClass,
 206                                    layout, args, i);
 207
 208 //    XtSetArg(args[0], XtNeditType, XawtextEdit);  // [HGM] can't get edit to work decently
 209 //    XtSetArg(args[1], XtNuseStringInPlace, False);
 210 //    XtSetValues(dialog, args, 2);
 211
 212     XawDialogAddButton(dialog, _("ok"), ShuffleCallback, (XtPointer) dialog);
 213     XawDialogAddButton(dialog, _("cancel"), ShuffleCallback, (XtPointer) dialog);
 214     XawDialogAddButton(dialog, _("random"), ShuffleCallback, (XtPointer) dialog);
 215     XawDialogAddButton(dialog, _("off"), ShuffleCallback, (XtPointer) dialog);
 216
 217     XtRealizeWidget(popup);
 218     CatchDeleteWindow(popup, "ShufflePopDown");
 219
 220     XQueryPointer(xDisplay, xBoardWindow, &root, &child,
 221                   &x, &y, &win_x, &win_y, &mask);
 222
 223     XtSetArg(args[0], XtNx, x - 10);
 224     XtSetArg(args[1], XtNy, y - 30);
 225     XtSetValues(popup, args, 2);
 226
 227     XtPopup(popup, XtGrabExclusive);
 228     shuffleUp = True;
 229
 230     edit = XtNameToWidget(dialog, "*value");
 231
 232     XtSetKeyboardFocus(popup, edit);
 233 }
 234
 235 void ShuffleMenuProc(w, event, prms, nprms)
 236      Widget w;
 237      XEvent *event;
 238      String *prms;
 239      Cardinal *nprms;
 240 {
 241 //    if (gameMode == AnalyzeMode || gameMode == AnalyzeFile) {
 242 //      Reset(FALSE, TRUE);
 243 //    }
 244     ShufflePopUp();
 245 }
 246
 247 //--------------------------- Time-Control Menu Popup ----------------------------------
 248 int TimeControlUp;
 249 Widget TimeControlShell;
 250 int tcInc;
 251 Widget tcMess1, tcMess2, tcData, tcTime, tcOdds1, tcOdds2;
 252 int tcIncrement, tcMoves;
 253
 254 void TimeControlPopDown()
 255 {
 256     if (!TimeControlUp) return;
 257     previous = NULL;
 258     XtPopdown(TimeControlShell);
 259     XtDestroyWidget(TimeControlShell);
 260     TimeControlUp = False;
 261     ModeHighlight();
 262 }
 263
 264 void TimeControlCallback(w, client_data, call_data)
 265      Widget w;
 266      XtPointer client_data, call_data;
 267 {
 268     String name, txt;
 269     Arg args[16];
 270     char buf[MSG_SIZ];
 271     int j;
 272
 273     XtSetArg(args[0], XtNlabel, &name);
 274     XtGetValues(w, args, 1);
 275
 276     if (strcmp(name, _("classical")) == 0) {
 277         if(tcInc == 0) return;
 278         j=0;
 279         XtSetArg(args[j], XtNlabel, _("minutes for each")); j++;
 280         XtSetValues(tcMess1, args, j);
 281         j=0;
 282         XtSetArg(args[j], XtNlabel, _("moves")); j++;
 283         XtSetValues(tcMess2, args, j);
 284         if(tcInc == 1) {
 285             j=0;
 286             XtSetArg(args[j], XtNstring, &name); j++;
 287             XtGetValues(tcData, args, j);
 288             tcIncrement = 0; sscanf(name, "%d", &tcIncrement);
 289         }
 290         snprintf(buf, MSG_SIZ,  "%d", tcMoves);
 291         j=0;
 292         XtSetArg(args[j], XtNstring, buf); j++;
 293         XtSetValues(tcData, args, j);
 294         tcInc = 0;
 295         return;
 296     }
 297     if (strcmp(name, _("incremental")) == 0) {
 298         if(tcInc == 1) return;
 299         j=0;
 300         XtSetArg(args[j], XtNlabel, _("minutes, plus")); j++;
 301         XtSetValues(tcMess1, args, j);
 302         j=0;
 303         XtSetArg(args[j], XtNlabel, _("sec/move")); j++;
 304         XtSetValues(tcMess2, args, j);
 305         if(tcInc == 0) {
 306             j=0;
 307             XtSetArg(args[j], XtNstring, &name); j++;
 308             XtGetValues(tcData, args, j);
 309             tcMoves = appData.movesPerSession; sscanf(name, "%d", &tcMoves);
 310         }
 311         snprintf(buf, MSG_SIZ,  "%d", tcIncrement);
 312         j=0;
 313         XtSetArg(args[j], XtNstring, buf); j++;
 314         XtSetValues(tcData, args, j);
 315         tcInc = 1;
 316         return;
 317     }
 318     if (strcmp(name, _("fixed time")) == 0) {
 319         if(tcInc == 2) return;
 320         j=0;
 321         XtSetArg(args[j], XtNlabel, _("sec/move (max)")); j++;
 322         XtSetValues(tcMess1, args, j);
 323         j=0;
 324         XtSetArg(args[j], XtNlabel, _("")); j++;
 325         XtSetValues(tcMess2, args, j);
 326         j=0;
 327         XtSetArg(args[j], XtNstring, ""); j++;
 328         XtSetValues(tcData, args, j);
 329         tcInc = 2;
 330         return;
 331     }
 332     if (strcmp(name, _(" OK ")) == 0) {
 333         int inc, mps, ok;
 334         XtSetArg(args[0], XtNstring, &txt);
 335         XtGetValues(tcData, args, 1);
 336         switch(tcInc) {
 337           case 1:
 338             ok = sscanf(txt, "%d", &inc); mps = 0;
 339             if(!ok && txt[0] == 0) { inc = 0; ok = 1; } // accept empty string as zero
 340             ok &= (inc >= 0);
 341             break;
 342           case 0:
 343             ok = sscanf(txt, "%d", &mps); inc = -1;
 344             ok &= (mps > 0);
 345             break;
 346           case 2:
 347             ok = 1; inc = -1; mps = 40;
 348         }
 349         if(ok != 1) {
 350             XtSetArg(args[0], XtNstring, ""); // erase any offending input
 351             XtSetValues(tcData, args, 1);
 352             return;
 353         }
 354         XtSetArg(args[0], XtNstring, &txt);
 355         XtGetValues(tcTime, args, 1);
 356         if(tcInc == 2) {
 357             if(sscanf(txt, "%d", &inc) != 1) {
 358                 XtSetArg(args[0], XtNstring, ""); // erase any offending input
 359                 XtSetValues(tcTime, args, 1);
 360                 DisplayError(_("Bad Time-Control String"), 0);
 361                 return;
 362             }
 363             searchTime = inc;
 364         } else {
 365             if(!ParseTimeControl(txt, inc, mps)) {
 366                 XtSetArg(args[0], XtNstring, ""); // erase any offending input
 367                 XtSetValues(tcTime, args, 1);
 368                 DisplayError(_("Bad Time-Control String"), 0);
 369                 return;
 370             }
 371             searchTime = 0;
 372             appData.movesPerSession = mps;
 373             appData.timeIncrement = inc;
 374             appData.timeControl = strdup(txt);
 375         }
 376         XtSetArg(args[0], XtNstring, &txt);
 377         XtGetValues(tcOdds1, args, 1);
 378         appData.firstTimeOdds = first.timeOdds
 379                 = (sscanf(txt, "%d", &j) == 1 && j > 0) ? j : 1;
 380         XtGetValues(tcOdds2, args, 1);
 381         appData.secondTimeOdds = second.timeOdds
 382                 = (sscanf(txt, "%d", &j) == 1 && j > 0) ? j : 1;
 383
 384         Reset(True, True);
 385         TimeControlPopDown();
 386         return;
 387     }
 388 }
 389
 390 void TimeControlPopUp()
 391 {
 392     Arg args[16];
 393     Widget popup, layout, form,  b_ok, b_cancel, b_clas, b_inc, mess;
 394     Window root, child;
 395     int x, y, i, j;
 396     int win_x, win_y;
 397     unsigned int mask;
 398     char def[MSG_SIZ];
 399
 400     tcInc = searchTime > 0 ? 2 : (appData.timeIncrement >= 0);
 401     tcMoves = appData.movesPerSession; tcIncrement = appData.timeIncrement;
 402     if(!tcInc) tcIncrement = 0;
 403     snprintf(def, MSG_SIZ,  "%d", tcInc ? tcIncrement : tcMoves);
 404
 405     i = 0;
 406     XtSetArg(args[i], XtNresizable, True); i++;
 407 //    XtSetArg(args[i], XtNwidth, DIALOG_SIZE); i++;
 408     TimeControlShell = popup =
 409       XtCreatePopupShell(_("TimeControl Menu"), transientShellWidgetClass,
 410                          shellWidget, args, i);
 411
 412     layout =
 413       XtCreateManagedWidget(layoutName, formWidgetClass, popup,
 414                             layoutArgs, XtNumber(layoutArgs));
 415
 416     form =
 417       XtCreateManagedWidget(layoutName, formWidgetClass, layout,
 418                             formArgs, XtNumber(formArgs));
 419
 420     j = 0;
 421 //    XtSetArg(args[j], XtNwidth,     (XtArgVal) 300); j++;
 422 //    XtSetArg(args[j], XtNheight,    (XtArgVal) 85); j++;
 423     XtSetValues(popup, args, j);
 424
 425     j= 0;
 426     XtSetArg(args[j], XtNborderWidth, 1); j++;
 427     XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
 428     XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
 429     XtSetArg(args[j], XtNstring, appData.timeControl);  j++;
 430     XtSetArg(args[j], XtNdisplayCaret, False);  j++;
 431     XtSetArg(args[j], XtNtop, XtChainTop);  j++;
 432     XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
 433     XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
 434     XtSetArg(args[j], XtNright, XtChainRight);  j++;
 435     XtSetArg(args[j], XtNresizable, True);  j++;
 436     XtSetArg(args[j], XtNwidth,  85);  j++;
 437     XtSetArg(args[j], XtNinsertPosition, 9999);  j++;
 438     tcTime = XtCreateManagedWidget("TC", asciiTextWidgetClass, form, args, j);
 439     XtAddEventHandler(tcTime, ButtonPressMask, False, SetFocus, (XtPointer) popup);
 440
 441     j= 0;
 442     XtSetArg(args[j], XtNlabel, tcInc ? tcInc == 2 ? _("sec/move (max)   ") : _("   minutes, plus   ") : _("minutes for each")); j++;
 443     XtSetArg(args[j], XtNborderWidth, 0); j++;
 444     XtSetArg(args[j], XtNfromHoriz, tcTime); j++;
 445     XtSetArg(args[j], XtNtop, XtChainTop);  j++;
 446     XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
 447     XtSetArg(args[j], XtNleft, XtChainRight);  j++;
 448     XtSetArg(args[j], XtNright, XtChainRight);  j++;
 449   //  XtSetArg(args[j], XtNwidth,  100);  j++;
 450   //  XtSetArg(args[j], XtNheight, 20);  j++;
 451     tcMess1 = XtCreateManagedWidget("TCtext", labelWidgetClass, form, args, j);
 452
 453     j= 0;
 454     XtSetArg(args[j], XtNborderWidth, 1); j++;
 455     XtSetArg(args[j], XtNfromHoriz, tcMess1); j++;
 456     XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
 457     XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
 458     XtSetArg(args[j], XtNstring, def);  j++;
 459     XtSetArg(args[j], XtNdisplayCaret, False);  j++;
 460     XtSetArg(args[j], XtNtop, XtChainTop);  j++;
 461     XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
 462     XtSetArg(args[j], XtNleft, XtChainRight);  j++;
 463     XtSetArg(args[j], XtNright, XtChainRight);  j++;
 464     XtSetArg(args[j], XtNresizable, True);  j++;
 465     XtSetArg(args[j], XtNwidth,  40);  j++;
 466 //    XtSetArg(args[j], XtNheight, 20);  j++;
 467     tcData = XtCreateManagedWidget("MPS", asciiTextWidgetClass, form, args, j);
 468     XtAddEventHandler(tcData, ButtonPressMask, False, SetFocus, (XtPointer) popup);
 469
 470     j= 0;
 471     XtSetArg(args[j], XtNlabel, tcInc ? tcInc == 2 ? _("             ") : _("sec/move") : _("moves     ")); j++;
 472     XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;
 473     XtSetArg(args[j], XtNborderWidth, 0); j++;
 474     XtSetArg(args[j], XtNfromHoriz, tcData); j++;
 475     XtSetArg(args[j], XtNtop, XtChainTop);  j++;
 476     XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
 477     XtSetArg(args[j], XtNleft, XtChainRight);  j++;
 478     XtSetArg(args[j], XtNright, XtChainRight);  j++;
 479 //    XtSetArg(args[j], XtNwidth,  80);  j++;
 480 //    XtSetArg(args[j], XtNheight, 20);  j++;
 481     tcMess2 = XtCreateManagedWidget("MPStext", labelWidgetClass,
 482                                    form, args, j);
 483
 484     j= 0;
 485     XtSetArg(args[j], XtNborderWidth, 1); j++;
 486     XtSetArg(args[j], XtNfromVert, tcTime); j++;
 487     XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
 488     XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
 489     XtSetArg(args[j], XtNstring, "1");  j++;
 490     XtSetArg(args[j], XtNdisplayCaret, False);  j++;
 491     XtSetArg(args[j], XtNtop, XtChainTop);  j++;
 492     XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
 493     XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
 494     XtSetArg(args[j], XtNright, XtChainLeft);  j++;
 495     XtSetArg(args[j], XtNresizable, True);  j++;
 496     XtSetArg(args[j], XtNwidth,  40);  j++;
 497 //    XtSetArg(args[j], XtNheight, 20);  j++;
 498     tcOdds1 = XtCreateManagedWidget("Odds1", asciiTextWidgetClass, form, args, j);
 499     XtAddEventHandler(tcOdds1, ButtonPressMask, False, SetFocus, (XtPointer) popup);
 500
 501     j= 0;
 502     XtSetArg(args[j], XtNborderWidth, 1); j++;
 503     XtSetArg(args[j], XtNfromVert, tcTime); j++;
 504     XtSetArg(args[j], XtNfromHoriz, tcOdds1); j++;
 505     XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
 506     XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
 507     XtSetArg(args[j], XtNstring, "1");  j++;
 508     XtSetArg(args[j], XtNdisplayCaret, False);  j++;
 509     XtSetArg(args[j], XtNtop, XtChainTop);  j++;
 510     XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
 511     XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
 512     XtSetArg(args[j], XtNright, XtChainLeft);  j++;
 513     XtSetArg(args[j], XtNresizable, True);  j++;
 514     XtSetArg(args[j], XtNwidth,  40);  j++;
 515 //    XtSetArg(args[j], XtNheight, 20);  j++;
 516     tcOdds2 = XtCreateManagedWidget("Odds2", asciiTextWidgetClass, form, args, j);
 517     XtAddEventHandler(tcOdds2, ButtonPressMask, False, SetFocus, (XtPointer) popup);
 518
 519     j= 0;
 520     XtSetArg(args[j], XtNlabel, _("Engine #1 and #2 Time-Odds Factors")); j++;
 521     XtSetArg(args[j], XtNjustify, XtJustifyLeft); j++;
 522     XtSetArg(args[j], XtNborderWidth, 0); j++;
 523     XtSetArg(args[j], XtNfromVert, tcTime); j++;
 524     XtSetArg(args[j], XtNfromHoriz, tcOdds2); j++;
 525     XtSetArg(args[j], XtNtop, XtChainTop);  j++;
 526     XtSetArg(args[j], XtNbottom, XtChainTop);  j++;
 527     XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
 528     XtSetArg(args[j], XtNright, XtChainRight);  j++;
 529 //    XtSetArg(args[j], XtNwidth,  200);  j++;
 530 //    XtSetArg(args[j], XtNheight, 20);  j++;
 531     mess = XtCreateManagedWidget("Oddstext", labelWidgetClass,
 532                                    form, args, j);
 533     j=0;
 534     XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;
 535     XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
 536     XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
 537     XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
 538     XtSetArg(args[j], XtNright, XtChainLeft);  j++;
 539     XtSetArg(args[j], XtNstate, tcInc==0); j++;
 540     b_clas= XtCreateManagedWidget(_("classical"), toggleWidgetClass,
 541                                    form, args, j);
 542     XtAddCallback(b_clas, XtNcallback, TimeControlCallback, (XtPointer) 0);
 543
 544     j=0;
 545     XtSetArg(args[j], XtNradioGroup, b_clas); j++;
 546     XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;
 547     XtSetArg(args[j], XtNfromHoriz, b_clas);  j++;
 548     XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
 549     XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
 550     XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
 551     XtSetArg(args[j], XtNright, XtChainLeft);  j++;
 552     XtSetArg(args[j], XtNstate, tcInc==1); j++;
 553     b_inc = XtCreateManagedWidget(_("incremental"), toggleWidgetClass,
 554                                    form, args, j);
 555     XtAddCallback(b_inc, XtNcallback, TimeControlCallback, (XtPointer) 0);
 556
 557     j=0;
 558     XtSetArg(args[j], XtNradioGroup, b_inc); j++;
 559     XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;
 560     XtSetArg(args[j], XtNfromHoriz, b_inc);  j++;
 561     XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
 562     XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
 563     XtSetArg(args[j], XtNleft, XtChainLeft);  j++;
 564     XtSetArg(args[j], XtNright, XtChainLeft);  j++;
 565     XtSetArg(args[j], XtNstate, tcInc==2); j++;
 566     b_inc = XtCreateManagedWidget(_("fixed time"), toggleWidgetClass,
 567                                    form, args, j);
 568     XtAddCallback(b_inc, XtNcallback, TimeControlCallback, (XtPointer) 0);
 569
 570     j=0;
 571     XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;
 572     XtSetArg(args[j], XtNfromHoriz, tcData);  j++;
 573     XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
 574     XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
 575     XtSetArg(args[j], XtNleft, XtChainRight);  j++;
 576     XtSetArg(args[j], XtNright, XtChainRight);  j++;
 577     b_ok= XtCreateManagedWidget(_(" OK "), commandWidgetClass,
 578                                    form, args, j);
 579     XtAddCallback(b_ok, XtNcallback, TimeControlCallback, (XtPointer) 0);
 580
 581     j=0;
 582     XtSetArg(args[j], XtNfromVert, tcOdds1);  j++;
 583     XtSetArg(args[j], XtNfromHoriz, b_ok);  j++;
 584     XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
 585     XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
 586     XtSetArg(args[j], XtNleft, XtChainRight);  j++;
 587     XtSetArg(args[j], XtNright, XtChainRight);  j++;
 588     b_cancel= XtCreateManagedWidget(_("cancel"), commandWidgetClass,
 589                                    form, args, j);
 590     XtAddCallback(b_cancel, XtNcallback, TimeControlPopDown, (XtPointer) 0);
 591
 592     XtRealizeWidget(popup);
 593     CatchDeleteWindow(popup, "TimeControlPopDown");
 594
 595     XQueryPointer(xDisplay, xBoardWindow, &root, &child,
 596                   &x, &y, &win_x, &win_y, &mask);
 597
 598     XtSetArg(args[0], XtNx, x - 10);
 599     XtSetArg(args[1], XtNy, y - 30);
 600     XtSetValues(popup, args, 2);
 601
 602     XtPopup(popup, XtGrabExclusive);
 603     TimeControlUp = True;
 604
 605     previous = NULL;
 606     SetFocus(tcTime, popup, (XEvent*) NULL, False);
 607 //    XtSetKeyboardFocus(popup, tcTime);
 608 }
 609
 610 void TimeControlProc(w, event, prms, nprms)
 611      Widget w;
 612      XEvent *event;
 613      String *prms;
 614      Cardinal *nprms;
 615 {
 616    TimeControlPopUp();
 617 }
 618
 619 //--------------------------- Engine-specific options menu ----------------------------------
 620
 621 int SettingsUp;
 622 Widget SettingsShell;
 623 int values[MAX_OPTIONS];
 624 ChessProgramState *currentCps;
 625
 626 void SettingsPopDown()
 627 {
 628     if (!SettingsUp) return;
 629     previous = NULL;
 630     XtPopdown(SettingsShell);
 631     XtDestroyWidget(SettingsShell);
 632     SettingsUp = False;
 633     ModeHighlight();
 634 }
 635
 636 void SpinCallback(w, client_data, call_data)
 637      Widget w;
 638      XtPointer client_data, call_data;
 639 {
 640     String name, val;
 641     Arg args[16];
 642     char buf[MSG_SIZ], *p;
 643     int j;
 644     int data = (intptr_t) client_data;
 645
 646     XtSetArg(args[0], XtNlabel, &name);
 647     XtGetValues(w, args, 1);
 648
 649     j = 0;
 650     XtSetArg(args[0], XtNstring, &val);
 651     XtGetValues(currentCps->option[data].handle, args, 1);
 652     sscanf(val, "%d", &j);
 653     if (strcmp(name, "browse") == 0) {
 654         if(XsraSelFile(SettingsShell, currentCps->option[data].name, NULL, NULL, "", "",
 655                                   currentCps->option[data].type == PathName ? "p" : "f", NULL, &p)) {
 656                 int len = strlen(p);
 657                 if(len && p[len-1] == '/') p[len-1] = NULLCHAR;
 658                 XtSetArg(args[0], XtNstring, p);
 659                 XtSetValues(currentCps->option[data].handle, args, 1);
 660         }
 661         SetFocus(currentCps->option[data].handle, SettingsShell, (XEvent*) NULL, False);
 662         return;
 663     } else
 664     if (strcmp(name, "+") == 0) {
 665         if(++j > currentCps->option[data].max) return;
 666     } else
 667     if (strcmp(name, "-") == 0) {
 668         if(--j < currentCps->option[data].min) return;
 669     } else return;
 670     snprintf(buf, MSG_SIZ,  "%d", j);
 671     XtSetArg(args[0], XtNstring, buf);
 672     XtSetValues(currentCps->option[data].handle, args, 1);
 673 }
 674
 675 void SettingsCallback(w, client_data, call_data)
 676      Widget w;
 677      XtPointer client_data, call_data;
 678 {
 679     String name, val;
 680     Arg args[16];
 681     char buf[MSG_SIZ];
 682     int i, j;
 683     int data = (intptr_t) client_data;
 684
 685     XtSetArg(args[0], XtNlabel, &name);
 686     XtGetValues(w, args, 1);
 687
 688     if (strcmp(name, _("cancel")) == 0) {
 689         SettingsPopDown();
 690         return;
 691     }
 692     if (strcmp(name, _("OK")) == 0 || data) { // save buttons imply OK
 693         for(i=0; i<currentCps->nrOptions; i++) { // send all options that had to be OK-ed to engine
 694             switch(currentCps->option[i].type) {
 695                 case TextBox:
 696                     XtSetArg(args[0], XtNstring, &val);
 697                     XtGetValues(currentCps->option[i].handle, args, 1);
 698                     if(strcmp(currentCps->option[i].textValue, val)) {
 699                       safeStrCpy(currentCps->option[i].textValue, val, MSG_SIZ - (currentCps->option[i].textValue - currentCps->option[i].name) );
 700                       snprintf(buf, MSG_SIZ,  "option %s=%s\n", currentCps->option[i].name, val);
 701                       SendToProgram(buf, currentCps);
 702                     }
 703                     break;
 704                 case Spin:
 705                     XtSetArg(args[0], XtNstring, &val);
 706                     XtGetValues(currentCps->option[i].handle, args, 1);
 707                     sscanf(val, "%d", &j);
 708                     if(j > currentCps->option[i].max) j = currentCps->option[i].max;
 709                     if(j < currentCps->option[i].min) j = currentCps->option[i].min;
 710                     if(currentCps->option[i].value != j) {
 711                         currentCps->option[i].value = j;
 712                         snprintf(buf, MSG_SIZ,  "option %s=%d\n", currentCps->option[i].name, j);
 713                         SendToProgram(buf, currentCps);
 714                     }
 715                     break;
 716                 case CheckBox:
 717                     j = 0;
 718                     XtSetArg(args[0], XtNstate, &j);
 719                     XtGetValues(currentCps->option[i].handle, args, 1);
 720                     if(currentCps->option[i].value != j) {
 721                         currentCps->option[i].value = j;
 722                         snprintf(buf, MSG_SIZ,  "option %s=%d\n", currentCps->option[i].name, j);
 723                         SendToProgram(buf, currentCps);
 724                     }
 725                     break;
 726                 case ComboBox:
 727                     if(currentCps->option[i].value != values[i]) {
 728                         currentCps->option[i].value = values[i];
 729                         snprintf(buf, MSG_SIZ,  "option %s=%s\n", currentCps->option[i].name,
 730                                 ((char**)currentCps->option[i].textValue)[values[i]]);
 731                         SendToProgram(buf, currentCps);
 732                     }
 733                     break;
 734             default:
 735               if( appData.debugMode )
 736                 fprintf(debugFP, "SettingsPopUp: unexpected case in switch.\n");
 737               break;
 738             }
 739         }
 740         if(data) { // send save-button command to engine
 741           snprintf(buf, MSG_SIZ,  "option %s\n", name);
 742           SendToProgram(buf, currentCps);
 743         }
 744         SettingsPopDown();
 745         return;
 746     }
 747     snprintf(buf, MSG_SIZ,  "option %s\n", name);
 748     SendToProgram(buf, currentCps);
 749 }
 750
 751 void ComboSelect(w, addr, index) // callback for all combo items
 752      Widget w;
 753      caddr_t addr;
 754      caddr_t index;
 755 {
 756     Arg args[16];
 757     int i = ((intptr_t)addr)>>8;
 758     int j = 255 & (intptr_t) addr;
 759
 760     values[i] = j; // store in temporary, for transfer at OK
 761     XtSetArg(args[0], XtNlabel, ((char**)currentCps->option[i].textValue)[j]);
 762     XtSetValues(currentCps->option[i].handle, args, 1);
 763 }
 764
 765 void CreateComboPopup(parent, name, n, mb)
 766      Widget parent;
 767      String name;
 768      int n;
 769      char *mb[];
 770 {
 771     int i=0, j;
 772     Widget menu, entry;
 773     Arg args[16];
 774
 775     menu = XtCreatePopupShell(name, simpleMenuWidgetClass,
 776                               parent, NULL, 0);
 777     j = 0;
 778     XtSetArg(args[j], XtNwidth, 100);  j++;
 779 //    XtSetArg(args[j], XtNright, XtChainRight);  j++;
 780     while (mb[i] != NULL) {
 781             entry = XtCreateManagedWidget(mb[i], smeBSBObjectClass,
 782                                           menu, args, j);
 783             XtAddCallback(entry, XtNcallback,
 784                           (XtCallbackProc) ComboSelect,
 785                           (caddr_t)(intptr_t) (256*n+i));
 786         i++;
 787     }
 788 }
 789
 790 void
 791 SettingsPopUp(ChessProgramState *cps)
 792 {
 793     Arg args[16];
 794     Widget popup, layout, dialog, edit=NULL, form,  last, b_ok, b_cancel, leftMargin = NULL, textField = NULL;
 795     Window root, child;
 796     int x, y, i, j, height, width, h, c;
 797     int win_x, win_y, maxWidth, maxTextWidth;
 798     unsigned int mask;
 799     char def[MSG_SIZ];
 800     static char pane[6] = "paneX";
 801     Widget texts[100], forelast = NULL, anchor, widest;
 802
 803     // to do: start up second engine if needed
 804     if(!cps->initDone || !cps->nrOptions) return; // nothing to be done
 805     currentCps = cps;
 806
 807     if(cps->nrOptions > 50) width = 4; else if(cps->nrOptions>24) width = 2; else width = 1;
 808     height = cps->nrOptions / width + 1;
 809      i = 0;
 810     XtSetArg(args[i], XtNresizable, True); i++;
 811     SettingsShell = popup =
 812       XtCreatePopupShell(_("Settings Menu"), transientShellWidgetClass,
 813                          shellWidget, args, i);
 814
 815     layout =
 816       XtCreateManagedWidget(layoutName, formWidgetClass, popup,
 817                             layoutArgs, XtNumber(layoutArgs));
 818   for(c=0; c<width; c++) {
 819     pane[4] = 'A'+c;
 820     form =
 821       XtCreateManagedWidget(pane, formWidgetClass, layout,
 822                             formArgs, XtNumber(formArgs));
 823     j=0;
 824     XtSetArg(args[j], XtNfromHoriz, leftMargin);  j++;
 825     XtSetValues(form, args, j);
 826     leftMargin = form;
 827
 828     last = widest = NULL; anchor = forelast;
 829     for(h=0; h<height; h++) {
 830         forelast = last;
 831         i = h + c*height;
 832         if(i >= cps->nrOptions) break;
 833         switch(cps->option[i].type) {
 834           case Spin:
 835             snprintf(def, MSG_SIZ,  "%d", cps->option[i].value);
 836           case TextBox:
 837             j=0;
 838             XtSetArg(args[j], XtNfromVert, last);  j++;
 839             XtSetArg(args[j], XtNborderWidth, 0);  j++;
 840             XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;
 841             texts[h] =
 842             dialog = XtCreateManagedWidget(cps->option[i].name, labelWidgetClass, form, args, j);
 843             j=0;
 844             XtSetArg(args[j], XtNfromVert, last);  j++;
 845             XtSetArg(args[j], XtNfromHoriz, dialog);  j++;
 846             XtSetArg(args[j], XtNborderWidth, 1); j++;
 847             XtSetArg(args[j], XtNwidth, cps->option[i].type == Spin ? 40 : 175); j++;
 848             XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
 849             XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
 850             XtSetArg(args[j], XtNdisplayCaret, False);  j++;
 851             XtSetArg(args[j], XtNright, XtChainRight);  j++;
 852             XtSetArg(args[j], XtNresizable, True);  j++;
 853             XtSetArg(args[j], XtNstring, cps->option[i].type==Spin ? def : cps->option[i].textValue);  j++;
 854             XtSetArg(args[j], XtNinsertPosition, 9999);  j++;
 855             edit = last;
 856             cps->option[i].handle = (void*)
 857                 (textField = last = XtCreateManagedWidget("text", asciiTextWidgetClass, form, args, j));
 858             XtAddEventHandler(last, ButtonPressMask, False, SetFocus, (XtPointer) popup);
 859             if(cps->option[i].type == TextBox) break;
 860
 861             // add increment and decrement controls for spin
 862             j=0;
 863             XtSetArg(args[j], XtNfromVert, edit);  j++;
 864             XtSetArg(args[j], XtNfromHoriz, last);  j++;
 865             XtSetArg(args[j], XtNheight, 10);  j++;
 866             XtSetArg(args[j], XtNwidth, 20);  j++;
 867             edit = XtCreateManagedWidget("+", commandWidgetClass, form, args, j);
 868             XtAddCallback(edit, XtNcallback, SpinCallback,
 869                           (XtPointer)(intptr_t) i);
 870
 871             j=0;
 872             XtSetArg(args[j], XtNfromVert, edit);  j++;
 873             XtSetArg(args[j], XtNfromHoriz, last);  j++;
 874             XtSetArg(args[j], XtNheight, 10);  j++;
 875             XtSetArg(args[j], XtNwidth, 20);  j++;
 876             last = XtCreateManagedWidget("-", commandWidgetClass, form, args, j);
 877             XtAddCallback(last, XtNcallback, SpinCallback,
 878                           (XtPointer)(intptr_t) i);
 879             break;
 880           case CheckBox:
 881             j=0;
 882             XtSetArg(args[j], XtNfromVert, last);  j++;
 883             XtSetArg(args[j], XtNwidth, 10);  j++;
 884             XtSetArg(args[j], XtNheight, 10);  j++;
 885             XtSetArg(args[j], XtNstate, cps->option[i].value);  j++;
 886             cps->option[i].handle = (void*)
 887                 (dialog = XtCreateManagedWidget(" ", toggleWidgetClass, form, args, j));
 888             j=0;
 889             XtSetArg(args[j], XtNfromVert, last);  j++;
 890             XtSetArg(args[j], XtNfromHoriz, dialog);  j++;
 891             XtSetArg(args[j], XtNborderWidth, 0);  j++;
 892             XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;
 893             last = XtCreateManagedWidget(cps->option[i].name, labelWidgetClass, form, args, j);
 894             break;
 895           case SaveButton:
 896           case Button:
 897             j=0;
 898             XtSetArg(args[j], XtNfromVert, last);  j++;
 899             XtSetArg(args[j], XtNstate, cps->option[i].value);  j++;
 900             cps->option[i].handle = (void*)
 901                 (dialog = last = XtCreateManagedWidget(cps->option[i].name, commandWidgetClass, form, args, j));
 902             XtAddCallback(last, XtNcallback, SettingsCallback,
 903                           (XtPointer)(intptr_t) (cps->option[i].type == SaveButton));
 904             break;
 905           case ComboBox:
 906             j=0;
 907             XtSetArg(args[j], XtNfromVert, last);  j++;
 908             XtSetArg(args[j], XtNborderWidth, 0);  j++;
 909             XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;
 910             dialog = XtCreateManagedWidget(cps->option[i].name, labelWidgetClass, form, args, j);
 911
 912             j=0;
 913             XtSetArg(args[j], XtNfromVert, last);  j++;
 914             XtSetArg(args[j], XtNfromHoriz, dialog);  j++;
 915             XtSetArg(args[j], XtNwidth, 100);  j++;
 916             XtSetArg(args[j], XtNmenuName, XtNewString(cps->option[i].name));  j++;
 917             XtSetArg(args[j], XtNlabel, ((char**)cps->option[i].textValue)[cps->option[i].value]);  j++;
 918             cps->option[i].handle = (void*)
 919                 (last = XtCreateManagedWidget(" ", menuButtonWidgetClass, form, args, j));
 920             CreateComboPopup(last, cps->option[i].name, i, (char **) cps->option[i].textValue);
 921             values[i] = cps->option[i].value;
 922             break;
 923         default:
 924           if( appData.debugMode )
 925             fprintf(debugFP, "SettingsPopUp: unexpected case in switch.\n");
 926           break;
 927         }
 928     }
 929
 930     // make an attempt to align all spins and textbox controls
 931     maxWidth = maxTextWidth = 0;
 932     for(h=0; h<height; h++) {
 933         i = h + c*height;
 934         if(i >= cps->nrOptions) break;
 935         if(cps->option[i].type == Spin || cps->option[i].type == TextBox) {
 936             Dimension w;
 937             j=0;
 938             XtSetArg(args[j], XtNwidth, &w);  j++;
 939             XtGetValues(texts[h], args, j);
 940             if(cps->option[i].type == Spin) {
 941                 if(w > maxWidth) maxWidth = w;
 942                 widest = texts[h];
 943             } else {
 944                 if(w > maxTextWidth) maxTextWidth = w;
 945                 if(!widest) widest = texts[h];
 946             }
 947         }
 948     }
 949     if(maxTextWidth + 110 < maxWidth)
 950          maxTextWidth = maxWidth - 110;
 951     else maxWidth = maxTextWidth + 110;
 952     for(h=0; h<height; h++) {
 953         i = h + c*height;
 954         if(i >= cps->nrOptions) break;
 955         j=0;
 956         if(cps->option[i].type == Spin) {
 957             XtSetArg(args[j], XtNwidth, maxWidth);  j++;
 958             XtSetValues(texts[h], args, j);
 959         } else
 960         if(cps->option[i].type == TextBox) {
 961             XtSetArg(args[j], XtNwidth, maxTextWidth);  j++;
 962             XtSetValues(texts[h], args, j);
 963         }
 964     }
 965   }
 966     j=0;
 967     XtSetArg(args[j], XtNfromVert, anchor ? anchor : last);  j++;
 968     XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
 969     XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
 970     XtSetArg(args[j], XtNleft, XtChainRight);  j++;
 971     XtSetArg(args[j], XtNright, XtChainRight);  j++;
 972     XtSetArg(args[j], XtNfromHoriz, widest ? widest : dialog);  j++;
 973     b_ok = XtCreateManagedWidget(_("OK"), commandWidgetClass, form, args, j);
 974     XtAddCallback(b_ok, XtNcallback, SettingsCallback, (XtPointer) 0);
 975
 976     XtSetArg(args[j-1], XtNfromHoriz, b_ok);
 977     b_cancel = XtCreateManagedWidget(_("cancel"), commandWidgetClass, form, args, j);
 978     XtAddCallback(b_cancel, XtNcallback, SettingsPopDown, (XtPointer) 0);
 979
 980     XtRealizeWidget(popup);
 981     CatchDeleteWindow(popup, "SettingsPopDown");
 982
 983     XQueryPointer(xDisplay, xBoardWindow, &root, &child,
 984                   &x, &y, &win_x, &win_y, &mask);
 985
 986     XtSetArg(args[0], XtNx, x - 10);
 987     XtSetArg(args[1], XtNy, y - 30);
 988     XtSetValues(popup, args, 2);
 989
 990     XtPopup(popup, XtGrabExclusive);
 991     SettingsUp = True;
 992
 993     previous = NULL;
 994     if(textField)SetFocus(textField, popup, (XEvent*) NULL, False);
 995 }
 996
 997 void FirstSettingsProc(w, event, prms, nprms)
 998      Widget w;
 999      XEvent *event;
1000      String *prms;
1001      Cardinal *nprms;
1002 {
1003    SettingsPopUp(&first);
1004 }
1005
1006 void SecondSettingsProc(w, event, prms, nprms)
1007      Widget w;
1008      XEvent *event;
1009      String *prms;
1010      Cardinal *nprms;
1011 {
1012    if(WaitForSecond(SettingsMenuIfReady)) return;
1013    SettingsPopUp(&second);
1014 }
1015
1016 //----------------------------Generic dialog --------------------------------------------
1017
1018 // cloned from Engine Settings dialog
1019
1020 typedef void ButtonCallback(int n);
1021
1022 char *trialSound;
1023 static Option *currentOption;
1024 static int oldCores, oldPonder;
1025 int MakeColors P((void));
1026 void CreateGCs P((int redo));
1027 void CreateXPMBoard P((char *s, int kind));
1028 void CreateXPMPieces P((void));
1029 void GenericReadout();
1030
1031 void Pick(int n)
1032 {
1033         VariantClass v = currentOption[n].value;
1034         if(!appData.noChessProgram) {
1035             char *name = VariantName(v), buf[MSG_SIZ];
1036             if (first.protocolVersion > 1 && StrStr(first.variants, name) == NULL) {
1037                 /* [HGM] in protocol 2 we check if variant is suported by engine */
1038               snprintf(buf, MSG_SIZ,  _("Variant %s not supported by %s"), name, first.tidy);
1039                 DisplayError(buf, 0);
1040                 return; /* ignore OK if first engine does not support it */
1041             } else
1042             if (second.initDone && second.protocolVersion > 1 && StrStr(second.variants, name) == NULL) {
1043               snprintf(buf, MSG_SIZ,  _("Warning: second engine (%s) does not support this!"), second.tidy);
1044                 DisplayError(buf, 0);   /* use of second engine is optional; only warn user */
1045             }
1046         }
1047
1048         GenericReadout(); // make sure ranks and file settings are read
1049
1050         gameInfo.variant = v;
1051         appData.variant = VariantName(v);
1052
1053         shuffleOpenings = FALSE; /* [HGM] shuffle: possible shuffle reset when we switch */
1054         startedFromPositionFile = FALSE; /* [HGM] loadPos: no longer valid in new variant */
1055         appData.pieceToCharTable = NULL;
1056         appData.pieceNickNames = "";
1057         appData.colorNickNames = "";
1058         Reset(True, True);
1059         SettingsPopDown();
1060         return;
1061 }
1062
1063 Option variantDescriptors[] = {
1064 { VariantNormal, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("normal")},
1065 { VariantFairy, 1, 135, NULL, (void*) &Pick, "#BFBFBF", NULL, Button, N_("fairy")},
1066 { VariantFischeRandom, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("FRC")},
1067 { VariantSChess, 1, 135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("Seirawan")},
1068 { VariantWildCastle, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("wild castle")},
1069 { VariantSuper, 1, 135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("Superchess")},
1070 { VariantNoCastle, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("no castle")},
1071 { VariantCrazyhouse, 1, 135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("crazyhouse")},
1072 { VariantKnightmate, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("knightmate")},
1073 { VariantBughouse, 1, 135, NULL, (void*) &Pick, "#FFBFBF", NULL, Button, N_("bughouse")},
1074 { VariantBerolina, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("berolina")},
1075 { VariantShogi, 1, 135, NULL, (void*) &Pick, "#BFFFFF", NULL, Button, N_("shogi (9x9)")},
1076 { VariantCylinder, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("cylinder")},
1077 { VariantXiangqi, 1, 135, NULL, (void*) &Pick, "#BFFFFF", NULL, Button, N_("xiangqi (9x10)")},
1078 { VariantShatranj, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("shatranj")},
1079 { VariantCourier, 1, 135, NULL, (void*) &Pick, "#BFFFBF", NULL, Button, N_("courier (12x8)")},
1080 { VariantMakruk, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("makruk")},
1081 { VariantGreat, 1, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("Great Shatranj (10x8)")},
1082 { VariantAtomic, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("atomic")},
1083 { VariantCapablanca, 1, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("Capablanca (10x8)")},
1084 { VariantTwoKings, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("two kings")},
1085 { VariantGothic, 1, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("Gothic (10x8)")},
1086 { Variant3Check, 0, 135, NULL, (void*) &Pick, "#FFFFFF", NULL, Button, N_("3-checks")},
1087 { VariantJanus, 1, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("janus (10x8)")},
1088 { VariantSuicide, 0, 135, NULL, (void*) &Pick, "#FFFFBF", NULL, Button, N_("suicide")},
1089 { VariantCapaRandom, 1, 135, NULL, (void*) &Pick, "#BFBFFF", NULL, Button, N_("CRC (10x8)")},
1090 { VariantGiveaway, 0, 135, NULL, (void*) &Pick, "#FFFFBF", NULL, Button, N_("give-away")},
1091 { VariantSpartan, 1, 135, NULL, (void*) &Pick, "#FF0000", NULL, Button, N_("Spartan")},
1092 { VariantLosers, 0, 135, NULL, (void*) &Pick, "#FFFFBF", NULL, Button, N_("losers")},
1093 { 0, 0, 0, NULL, NULL, NULL, NULL, Label, _("Board size ( -1 = default for selected variant):")},
1094 { 0, -1, BOARD_RANKS-1, NULL, (void*) &appData.NrRanks, "", NULL, Spin, N_("Number of Board Ranks:") },
1095 { 0, -1, BOARD_FILES, NULL, (void*) &appData.NrFiles, "", NULL, Spin, N_("Number of Board Files:") },
1096 { 0, -1, BOARD_RANKS-1, NULL, (void*) &appData.holdingsSize, "", NULL, Spin, N_("Holdings Size:") },
1097 { 0, 0, 0, NULL, NULL, NULL, NULL, Label,
1098                                 _("WARNING: variants with un-orthodox\n"
1099                                   "pieces only have built-in bitmaps\n"
1100                                   "for -boardSize middling, bulky and\n"
1101                                   "petite, and substitute king or amazon\n"
1102                                   "for missing bitmaps. (See manual.)")},
1103 { 0, 2, 0, NULL, NULL, "", NULL, EndMark , "" }
1104 };
1105
1106 void CommonOptionsOK(int n)
1107 {
1108         int newPonder = appData.ponderNextMove;
1109         // make sure changes are sent to first engine by re-initializing it
1110         // if it was already started pre-emptively at end of previous game
1111         if(gameMode == BeginningOfGame) Reset(True, True); else {
1112             // Some changed setting need immediate sending always.
1113             if(oldCores != appData.smpCores)
1114                 NewSettingEvent(False, &(first.maxCores), "cores", appData.smpCores);
1115             appData.ponderNextMove = oldPonder;
1116             PonderNextMoveEvent(newPonder);
1117         }
1118 }
1119
1120 Option commonEngineOptions[] = {
1121 { 0,     0, 0, NULL, (void*) &appData.ponderNextMove, "", NULL, CheckBox, _("Ponder Next Move") },
1122 { 0,  0, 1000, NULL, (void*) &appData.smpCores, "", NULL, Spin, _("Maximum Number of CPUs per Engine:") },
1123 { 0,     0, 0, NULL, (void*) &appData.polyglotDir, "", NULL, PathName, _("Polygot Directory:") },
1124 { 0, 0, 16000, NULL, (void*) &appData.defaultHashSize, "", NULL, Spin, _("Hash-Table Size (MB):") },
1125 { 0,     0, 0, NULL, (void*) &appData.defaultPathEGTB, "", NULL, PathName, _("Nalimov EGTB Path:") },
1126 { 0,  0, 1000, NULL, (void*) &appData.defaultCacheSizeEGTB, "", NULL, Spin, _("EGTB Cache Size (MB):") },
1127 { 0,     0, 0, NULL, (void*) &appData.usePolyglotBook, "", NULL, CheckBox, _("Use GUI Book") },
1128 { 0,     0, 0, NULL, (void*) &appData.polyglotBook, "", NULL, FileName, _("Opening-Book Filename:") },
1129 { 0,   0, 100, NULL, (void*) &appData.bookDepth, "", NULL, Spin, _("Book Depth (moves):") },
1130 { 0,   0, 100, NULL, (void*) &appData.bookStrength, "", NULL, Spin, _("Book Variety (0) vs. Strength (100):") },
1131 { 0,     0, 0, NULL, (void*) &appData.firstHasOwnBookUCI, "", NULL, CheckBox, _("Engine #1 Has Own Book") },
1132 { 0,     0, 0, NULL, (void*) &appData.secondHasOwnBookUCI, "", NULL, CheckBox, _("Engine #2 Has Own Book          ") },
1133 { 0,     1, 0, NULL, (void*) &CommonOptionsOK, "", NULL, EndMark , "" }
1134 };
1135
1136 Option adjudicationOptions[] = {
1137 { 0, 0,    0, NULL, (void*) &appData.checkMates, "", NULL, CheckBox, _("Detect all Mates") },
1138 { 0, 0,    0, NULL, (void*) &appData.testClaims, "", NULL, CheckBox, _("Verify Engine Result Claims") },
1139 { 0, 0,    0, NULL, (void*) &appData.materialDraws, "", NULL, CheckBox, _("Draw if Insufficient Mating Material") },
1140 { 0, 0,    0, NULL, (void*) &appData.trivialDraws, "", NULL, CheckBox, _("Adjudicate Trivial Draws (3-Move Delay)") },
1141 { 0, 0,  100, NULL, (void*) &appData.ruleMoves, "", NULL, Spin, _("N-Move Rule:") },
1142 { 0, 0,    6, NULL, (void*) &appData.drawRepeats, "", NULL, Spin, _("N-fold Repeats:") },
1143 { 0, 0, 1000, NULL, (void*) &appData.adjudicateDrawMoves, "", NULL, Spin, _("Draw after N Moves Total:") },
1144 { 0,-5000, 0, NULL, (void*) &appData.adjudicateLossThreshold, "", NULL, Spin, _("Win / Loss Threshold:") },
1145 { 0, 0,    0, NULL, (void*) &first.scoreIsAbsolute, "", NULL, CheckBox, _("Negate Score of Engine #1") },
1146 { 0, 0,    0, NULL, (void*) &second.scoreIsAbsolute, "", NULL, CheckBox, _("Negate Score of Engine #2") },
1147 { 0, 1,    0, NULL, NULL, "", NULL, EndMark , "" }
1148 };
1149
1150 void IcsOptionsOK(int n)
1151 {
1152     ParseIcsTextColors();
1153 }
1154
1155 Option icsOptions[] = {
1156 { 0, 0, 0, NULL, (void*) &appData.autoKibitz, "",  NULL, CheckBox, _("Auto-Kibitz") },
1157 { 0, 0, 0, NULL, (void*) &appData.autoComment, "", NULL, CheckBox, _("Auto-Comment") },
1158 { 0, 0, 0, NULL, (void*) &appData.autoObserve, "", NULL, CheckBox, _("Auto-Observe") },
1159 { 0, 0, 0, NULL, (void*) &appData.autoRaiseBoard, "", NULL, CheckBox, _("Auto-Raise Board") },
1160 { 0, 0, 0, NULL, (void*) &appData.bgObserve, "",   NULL, CheckBox, _("Background Observe while Playing") },
1161 { 0, 0, 0, NULL, (void*) &appData.dualBoard, "",   NULL, CheckBox, _("Dual Board for Background-Observed Game") },
1162 { 0, 0, 0, NULL, (void*) &appData.getMoveList, "", NULL, CheckBox, _("Get Move List") },
1163 { 0, 0, 0, NULL, (void*) &appData.quietPlay, "",   NULL, CheckBox, _("Quiet Play") },
1164 { 0, 0, 0, NULL, (void*) &appData.seekGraph, "",   NULL, CheckBox, _("Seek Graph") },
1165 { 0, 0, 0, NULL, (void*) &appData.autoRefresh, "", NULL, CheckBox, _("Auto-Refresh Seek Graph") },
1166 { 0, 0, 0, NULL, (void*) &appData.premove, "",     NULL, CheckBox, _("Premove") },
1167 { 0, 0, 0, NULL, (void*) &appData.premoveWhite, "", NULL, CheckBox, _("Premove for White") },
1168 { 0, 0, 0, NULL, (void*) &appData.premoveWhiteText, "", NULL, TextBox, _("First White Move:") },
1169 { 0, 0, 0, NULL, (void*) &appData.premoveBlack, "", NULL, CheckBox, _("Premove for Black") },
1170 { 0, 0, 0, NULL, (void*) &appData.premoveBlackText, "", NULL, TextBox, _("First Black Move:") },
1171 { 0, 0, 0, NULL, NULL, NULL, NULL, Break, "" },
1172 { 0, 0, 0, NULL, (void*) &appData.icsAlarm, "", NULL, CheckBox, _("Alarm") },
1173 { 0, 0, 100000000, NULL, (void*) &appData.icsAlarmTime, "", NULL, Spin, _("Alarm Time (msec):") },
1174 //{ 0, 0, 0, NULL, (void*) &appData.chatBoxes, "", NULL, TextBox, _("Startup Chat Boxes:") },
1175 { 0, 0, 0, NULL, (void*) &appData.colorize, "", NULL, CheckBox, _("Colorize Messages") },
1176 { 0, 0, 0, NULL, (void*) &appData.colorShout, "", NULL, TextBox, _("Shout Text Colors:") },
1177 { 0, 0, 0, NULL, (void*) &appData.colorSShout, "", NULL, TextBox, _("S-Shout Text Colors:") },
1178 { 0, 0, 0, NULL, (void*) &appData.colorChannel1, "", NULL, TextBox, _("Channel #1 Text Colors:") },
1179 { 0, 0, 0, NULL, (void*) &appData.colorChannel, "", NULL, TextBox, _("Other Channel Text Colors:") },
1180 { 0, 0, 0, NULL, (void*) &appData.colorKibitz, "", NULL, TextBox, _("Kibitz Text Colors:") },
1181 { 0, 0, 0, NULL, (void*) &appData.colorTell, "", NULL, TextBox, _("Tell Text Colors:") },
1182 { 0, 0, 0, NULL, (void*) &appData.colorChallenge, "", NULL, TextBox, _("Challenge Text Colors:") },
1183 { 0, 0, 0, NULL, (void*) &appData.colorRequest, "", NULL, TextBox, _("Request Text Colors:") },
1184 { 0, 0, 0, NULL, (void*) &appData.colorSeek, "", NULL, TextBox, _("Seek Text Colors:") },
1185 { 0, 0, 0, NULL, (void*) &IcsOptionsOK, "", NULL, EndMark , "" }
1186 };
1187
1188 Option loadOptions[] = {
1189 { 0, 0, 0, NULL, (void*) &appData.autoDisplayTags, "", NULL, CheckBox, _("Auto-Display Tags") },
1190 { 0, 0, 0, NULL, (void*) &appData.autoDisplayComment, "", NULL, CheckBox, _("Auto-Display Comment") },
1191 { 0, 0, 0, NULL, NULL, NULL, NULL, Label, _("Auto-Play speed of loaded games\n(0 = instant, -1 = off):") },
1192 { 0, -1, 10000000, NULL, (void*) &appData.timeDelay, "", NULL, Fractional, _("Seconds per Move:") },
1193 { 0,  0, 0, NULL, NULL, "", NULL, EndMark , "" }
1194 };
1195
1196 Option saveOptions[] = {
1197 { 0, 0, 0, NULL, (void*) &appData.autoSaveGames, "", NULL, CheckBox, _("Auto-Save Games") },
1198 { 0, 0, 0, NULL, (void*) &appData.saveGameFile, "", NULL, FileName,  _("Save Games on File:") },
1199 { 0, 0, 0, NULL, (void*) &appData.savePositionFile, "", NULL, FileName,  _("Save Final Positions on File:") },
1200 { 0, 0, 0, NULL, (void*) &appData.pgnEventHeader, "", NULL, TextBox,  _("PGN Event Header:") },
1201 { 0, 0, 0, NULL, (void*) &appData.oldSaveStyle, "", NULL, CheckBox, _("Old Save Style (as opposed to PGN)") },
1202 { 0, 0, 0, NULL, (void*) &appData.saveExtendedInfoInPGN, "", NULL, CheckBox, _("Save Score/Depth Info in PGN") },
1203 { 0, 0, 0, NULL, (void*) &appData.saveOutOfBookInfo, "", NULL, CheckBox, _("Save Out-of-Book Info in PGN           ") },
1204 { 0, 1, 0, NULL, NULL, "", NULL, EndMark , "" }
1205 };
1206
1207 char *soundNames[] = {
1208         N_("No Sound"),
1209         N_("Default Beep"),
1210         N_("Above WAV File"),
1211         N_("Ching"),
1212         N_("Click"),
1213         N_("Ding"),
1214         N_("Gong"),
1215         N_("Laser"),
1216         N_("Penalty"),
1217         N_("Phone"),
1218         N_("Thud"),
1219         N_("Challenge"),
1220         N_("Tell"),
1221         NULL,
1222         N_("User File")
1223 };
1224
1225 char *soundFiles[] = { // sound files corresponding to above names
1226         "",
1227         "$",
1228         "*", // kludge alert: as first thing in the dialog readout this is replaced with the user-given .WAV filename
1229         "ching.wav",
1230         "click.wav",
1231         "ding1.wav",
1232         "gong.wav",
1233         "laser.wav",
1234         "penalty.wav",
1235         "phone.wav",
1236         "thud.wav",
1237         "challenge.wav",
1238         "tell.wav",
1239         NULL,
1240         NULL
1241 };
1242
1243 void Test(int n)
1244 {
1245     if(soundFiles[values[3]]) PlaySound(soundFiles[values[3]]);
1246 }
1247
1248 Option soundOptions[] = {
1249 { 0, 0, 0, NULL, (void*) &appData.soundProgram, "", NULL, TextBox, _("Sound Program:") },
1250 { 0, 0, 0, NULL, (void*) &appData.soundDirectory, "", NULL, PathName, _("Sounds Directory:") },
1251 { 0, 0, 0, NULL, (void*) (soundFiles+2) /* kludge! */, "", NULL, FileName, _("User WAV File:") },
1252 { 0, 0, 0, NULL, (void*) &trialSound, (char*) soundNames, soundFiles, ComboBox, _("Try-Out Sound:") },
1253 { 0, 1, 0, NULL, (void*) &Test, NULL, NULL, Button, _("Play") },
1254 { 0, 0, 0, NULL, (void*) &appData.soundMove, (char*) soundNames, soundFiles, ComboBox, _("Move:") },
1255 { 0, 0, 0, NULL, (void*) &appData.soundIcsWin, (char*) soundNames, soundFiles, ComboBox, _("Win:") },
1256 { 0, 0, 0, NULL, (void*) &appData.soundIcsLoss, (char*) soundNames, soundFiles, ComboBox, _("Lose:") },
1257 { 0, 0, 0, NULL, (void*) &appData.soundIcsDraw, (char*) soundNames, soundFiles, ComboBox, _("Draw:") },
1258 { 0, 0, 0, NULL, (void*) &appData.soundIcsUnfinished, (char*) soundNames, soundFiles, ComboBox, _("Unfinished:") },
1259 { 0, 0, 0, NULL, (void*) &appData.soundIcsAlarm, (char*) soundNames, soundFiles, ComboBox, _("Alarm:") },
1260 { 0, 0, 0, NULL, (void*) &appData.soundShout, (char*) soundNames, soundFiles, ComboBox, _("Shout:") },
1261 { 0, 0, 0, NULL, (void*) &appData.soundSShout, (char*) soundNames, soundFiles, ComboBox, _("S-Shout:") },
1262 { 0, 0, 0, NULL, (void*) &appData.soundChannel, (char*) soundNames, soundFiles, ComboBox, _("Channel:") },
1263 { 0, 0, 0, NULL, (void*) &appData.soundChannel1, (char*) soundNames, soundFiles, ComboBox, _("Channel 1:") },
1264 { 0, 0, 0, NULL, (void*) &appData.soundTell, (char*) soundNames, soundFiles, ComboBox, _("Tell:") },
1265 { 0, 0, 0, NULL, (void*) &appData.soundKibitz, (char*) soundNames, soundFiles, ComboBox, _("Kibitz:") },
1266 { 0, 0, 0, NULL, (void*) &appData.soundChallenge, (char*) soundNames, soundFiles, ComboBox, _("Challenge:") },
1267 { 0, 0, 0, NULL, (void*) &appData.soundRequest, (char*) soundNames, soundFiles, ComboBox, _("Request:") },
1268 { 0, 0, 0, NULL, (void*) &appData.soundSeek, (char*) soundNames, soundFiles, ComboBox, _("Seek:") },
1269 { 0, 1, 0, NULL, NULL, "", NULL, EndMark , "" }
1270 };
1271
1272 void SetColor(char *colorName, Widget box)
1273 {
1274         Arg args[5];
1275         Pixel buttonColor;
1276         XrmValue vFrom, vTo;
1277         if (!appData.monoMode) {
1278             vFrom.addr = (caddr_t) colorName;
1279             vFrom.size = strlen(colorName);
1280             XtConvert(shellWidget, XtRString, &vFrom, XtRPixel, &vTo);
1281             if (vTo.addr == NULL) {
1282                 buttonColor = (Pixel) -1;
1283             } else {
1284                 buttonColor = *(Pixel *) vTo.addr;
1285             }
1286         }
1287         XtSetArg(args[0], XtNbackground, buttonColor);;
1288         XtSetValues(box, args, 1);
1289 }
1290
1291 void AdjustColor(int i)
1292 {
1293     int n = currentOption[i].value, col, j, r, g, b, step = 10;
1294     char *s, buf[MSG_SIZ]; // color string
1295     Arg args[5];
1296     XtSetArg(args[0], XtNstring, &s);
1297     XtGetValues(currentOption[i-n-1].handle, args, 1);
1298     if(sscanf(s, "#%x", &col) != 1) return;   // malformed
1299     b = col & 0xFF; g = col & 0xFF00; r = col & 0xFF0000;
1300     switch(n) {
1301         case 1: g -= 0x100*step; b -= step; break;
1302         case 2: r -= 0x10000*step; b -= step; break;
1303         case 3: g -= 0x100*step; r -= 0x10000*step; break;
1304         case 4: r += 0x10000*step; g += 0x100*step; b += step; break;
1305     }
1306     if(r < 0) r = 0; if(g < 0) g = 0; if(b < 0) b = 0;
1307     if(r > 0xFF0000) r = 0xFF0000; if(g > 0xFF00) g = 0xFF00; if(b > 0xFF) b = 0xFF;
1308     col = r | g | b;
1309     snprintf(buf, MSG_SIZ, "#%06x", col);
1310     for(j=1; j<7; j++) if(buf[j] >= 'a') buf[j] -= 32; // capitalize
1311     SetColor(buf, currentOption[i-n].handle);
1312     XtSetArg(args[0], XtNstring, buf);
1313     XtSetValues(currentOption[i-n-1].handle, args, 1);
1314 }
1315
1316 void BoardOptionsOK(int n)
1317 {
1318     if(appData.overrideLineGap >= 0) lineGap = appData.overrideLineGap;
1319     MakeColors(); CreateGCs(True);
1320     CreateXPMPieces();
1321     CreateXPMBoard(appData.liteBackTextureFile, 1);
1322     CreateXPMBoard(appData.darkBackTextureFile, 0);
1323     InitDrawingSizes(-1, 0);
1324     DrawPosition(True, NULL);
1325 }
1326
1327 Option boardOptions[] = {
1328 { 0,   0, 70, NULL, (void*) &appData.whitePieceColor, "", NULL, TextBox, _("White Piece Color:") },
1329 { 1000, 1, 0, NULL, NULL, NULL, NULL, Button, "      " },
1330 {    1, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "R" },
1331 {    2, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "G" },
1332 {    3, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "B" },
1333 {    4, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "W" },
1334 { 0,   0, 70, NULL, (void*) &appData.blackPieceColor, "", NULL, TextBox, _("Black Piece Color:") },
1335 { 1000, 1, 0, NULL, NULL, NULL, NULL, Button, "      " },
1336 {    1, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "R" },
1337 {    2, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "G" },
1338 {    3, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "B" },
1339 {    4, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "W" },
1340 { 0,   0, 70, NULL, (void*) &appData.lightSquareColor, "", NULL, TextBox, _("Light Square Color:") },
1341 { 1000, 1, 0, NULL, NULL, NULL, NULL, Button, "      " },
1342 {    1, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "R" },
1343 {    2, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "G" },
1344 {    3, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "B" },
1345 {    4, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "W" },
1346 { 0,   0, 70, NULL, (void*) &appData.darkSquareColor, "", NULL, TextBox, _("Dark Square Color:") },
1347 { 1000, 1, 0, NULL, NULL, NULL, NULL, Button, "      " },
1348 {    1, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "R" },
1349 {    2, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "G" },
1350 {    3, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "B" },
1351 {    4, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "W" },
1352 { 0,   0, 70, NULL, (void*) &appData.highlightSquareColor, "", NULL, TextBox, _("Highlight Color:") },
1353 { 1000, 1, 0, NULL, NULL, NULL, NULL, Button, "      " },
1354 {    1, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "R" },
1355 {    2, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "G" },
1356 {    3, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "B" },
1357 {    4, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "W" },
1358 { 0,   0, 70, NULL, (void*) &appData.premoveHighlightColor, "", NULL, TextBox, _("Premove Highlight Color:") },
1359 { 1000, 1, 0, NULL, NULL, NULL, NULL, Button, "      " },
1360 {    1, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "R" },
1361 {    2, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "G" },
1362 {    3, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "B" },
1363 {    4, 1, 0, NULL, (void*) &AdjustColor, NULL, NULL, Button, "W" },
1364 { 0, 0, 0, NULL, (void*) &appData.upsideDown, "", NULL, CheckBox, _("Flip Pieces Shogi Style") },
1365 { 0, 0, 0, NULL, (void*) &appData.allWhite, "", NULL, CheckBox, _("Use Outline Pieces for Black") },
1366 { 0, 0, 0, NULL, (void*) &appData.monoMode, "", NULL, CheckBox, _("Mono Mode") },
1367 { 0,-1, 5, NULL, (void*) &appData.overrideLineGap, "", NULL, Spin, _("Line Gap ( -1 = default for board size):") },
1368 { 0, 0, 0, NULL, (void*) &appData.liteBackTextureFile, "", NULL, FileName, _("Light-Squares Texture File:") },
1369 { 0, 0, 0, NULL, (void*) &appData.darkBackTextureFile, "", NULL, FileName, _("Dark-Squares Texture File:") },
1370 { 0, 0, 0, NULL, (void*) &appData.bitmapDirectory, "", NULL, PathName, _("Directory with Bitmap Pieces:") },
1371 { 0, 0, 0, NULL, (void*) &appData.pixmapDirectory, "", NULL, PathName, _("Directory with Pixmap Pieces:") },
1372 { 0, 0, 0, NULL, (void*) &BoardOptionsOK, "", NULL, EndMark , "" }
1373 };
1374
1375 void GenericReadout()
1376 {
1377     int i, j;
1378     String name, val;
1379     Arg args[16];
1380     char buf[MSG_SIZ];
1381     float x;
1382         for(i=0; ; i++) { // send all options that had to be OK-ed to engine
1383             switch(currentOption[i].type) {
1384                 case TextBox:
1385                 case FileName:
1386                 case PathName:
1387                     XtSetArg(args[0], XtNstring, &val);
1388                     XtGetValues(currentOption[i].handle, args, 1);
1389                     if(*(char**) currentOption[i].target == NULL || strcmp(*(char**) currentOption[i].target, val)) {
1390                         safeStrCpy(currentOption[i].name + 100, val, MSG_SIZ-100); // text value kept in pivate storage for each option
1391                         *(char**) currentOption[i].target = currentOption[i].name + 100; // option gets to point to that
1392                     }
1393                     break;
1394                 case Spin:
1395                 case Fractional:
1396                     XtSetArg(args[0], XtNstring, &val);
1397                     XtGetValues(currentOption[i].handle, args, 1);
1398                     sscanf(val, "%f", &x);
1399                     if(x > currentOption[i].max) x = currentOption[i].max;
1400                     if(x < currentOption[i].min) x = currentOption[i].min;
1401                     if(currentOption[i].value != x) {
1402                         currentOption[i].value = x;
1403                         if(currentOption[i].type == Spin) *(int*) currentOption[i].target = x;
1404                         else *(float*) currentOption[i].target = x;
1405                     }
1406                     break;
1407                 case CheckBox:
1408                     j = 0;
1409                     XtSetArg(args[0], XtNstate, &j);
1410                     XtGetValues(currentOption[i].handle, args, 1);
1411                     if(currentOption[i].value != j) {
1412                         currentOption[i].value = j;
1413                         *(Boolean*) currentOption[i].target = j;
1414                     }
1415                     break;
1416                 case ComboBox:
1417                     val = ((char**)currentOption[i].choice)[values[i]];
1418                     if(val && (*(char**) currentOption[i].target == NULL || strcmp(*(char**) currentOption[i].target, val))) {
1419                       if(*(char**) currentOption[i].target) free(*(char**) currentOption[i].target);
1420                       *(char**) currentOption[i].target = strdup(val);
1421                     }
1422                     break;
1423                 case EndMark:
1424                     if(currentOption[i].target) // callback for implementing necessary actions on OK (like redraw)
1425                         ((ButtonCallback*) currentOption[i].target)(i);
1426                     break;
1427             default:
1428                 printf("GenericReadout: unexpected case in switch.\n");
1429                 case Button:
1430                 case Label:
1431               break;
1432             }
1433             if(currentOption[i].type == EndMark) break;
1434         }
1435 }
1436
1437 void GenericCallback(w, client_data, call_data)
1438      Widget w;
1439      XtPointer client_data, call_data;
1440 {
1441     String name, val;
1442     Arg args[16];
1443     char buf[MSG_SIZ];
1444     int i, j;
1445     int data = (intptr_t) client_data;
1446
1447     XtSetArg(args[0], XtNlabel, &name);
1448     XtGetValues(w, args, 1);
1449
1450     if (strcmp(name, _("cancel")) == 0) {
1451         SettingsPopDown();
1452         return;
1453     }
1454     if (strcmp(name, _("OK")) == 0) { // save buttons imply OK
1455         GenericReadout();
1456         SettingsPopDown();
1457         return;
1458     }
1459     if(currentOption[data].textValue);
1460     ((ButtonCallback*) currentOption[data].target)(data);
1461 }
1462
1463 void
1464 GenericPopUp(Option *option, char *title)
1465 {
1466     Arg args[16];
1467     Widget popup, layout, dialog, edit=NULL, form,  last, b_ok, b_cancel, leftMargin = NULL, textField = NULL;
1468     Window root, child;
1469     int x, y, i, j, height=999, width=1, h, c, w;
1470     int win_x, win_y, maxWidth, maxTextWidth;
1471     unsigned int mask;
1472     char def[MSG_SIZ], *msg;
1473     static char pane[6] = "paneX";
1474     Widget texts[100], forelast = NULL, anchor, widest, lastrow = NULL;
1475
1476     currentOption = option; // make available to callback
1477     // kludge: fake address of a ChessProgramState struct that contains the options, so Spin and Combo callbacks work on it
1478     currentCps = (ChessProgramState *) ((char *) option - ((char *)&first.option - (char *)&first));
1479
1480 //    if(cps->nrOptions > 50) width = 4; else if(cps->nrOptions>24) width = 2; else width = 1;
1481 //    height = cps->nrOptions / width + 1;
1482      i = 0;
1483     XtSetArg(args[i], XtNresizable, True); i++;
1484     SettingsShell = popup =
1485       XtCreatePopupShell(title, transientShellWidgetClass,
1486                          shellWidget, args, i);
1487
1488     layout =
1489       XtCreateManagedWidget(layoutName, formWidgetClass, popup,
1490                             layoutArgs, XtNumber(layoutArgs));
1491   for(c=0; c<width; c++) {
1492     pane[4] = 'A'+c;
1493     form =
1494       XtCreateManagedWidget(pane, formWidgetClass, layout,
1495                             formArgs, XtNumber(formArgs));
1496     j=0;
1497     XtSetArg(args[j], XtNfromHoriz, leftMargin);  j++;
1498     XtSetValues(form, args, j);
1499     leftMargin = form;
1500
1501     last = widest = NULL; anchor = lastrow;
1502     for(h=0; h<height; h++) {
1503         i = h + c*height;
1504         if(option[i].type == EndMark) break;
1505         lastrow = forelast;
1506         forelast = last;
1507         switch(option[i].type) {
1508           case Fractional:
1509             snprintf(def, MSG_SIZ,  "%.2f", *(float*)option[i].target);
1510             option[i].value = *(float*)option[i].target;
1511             goto tBox;
1512           case Spin:
1513             snprintf(def, MSG_SIZ,  "%d", option[i].value = *(int*)option[i].target);
1514           case TextBox:
1515           case FileName:
1516           case PathName:
1517           tBox:
1518             if(option[i].name[0]) {
1519             j=0;
1520             XtSetArg(args[j], XtNfromVert, last);  j++;
1521             XtSetArg(args[j], XtNleft, XtChainLeft); j++;
1522             XtSetArg(args[j], XtNright, XtChainLeft); j++;
1523             XtSetArg(args[j], XtNborderWidth, 0);  j++;
1524             XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;
1525             texts[h] =
1526             dialog = XtCreateManagedWidget(option[i].name, labelWidgetClass, form, args, j);
1527             } else texts[h] = dialog = NULL;
1528             w = option[i].type == Spin || option[i].type == Fractional ? 70 : option[i].max ? option[i].max : 205;
1529             if(option[i].type == FileName || option[i].type == PathName) w -= 55;
1530             j=0;
1531             XtSetArg(args[j], XtNfromVert, last);  j++;
1532             XtSetArg(args[j], XtNfromHoriz, dialog);  j++;
1533             XtSetArg(args[j], XtNborderWidth, 1); j++;
1534             XtSetArg(args[j], XtNwidth, w); j++;
1535             if(option[i].type == TextBox && option[i].min) XtSetArg(args[j], XtNheight, option[i].min); j++;
1536             XtSetArg(args[j], XtNleft, XtChainLeft); j++;
1537             XtSetArg(args[j], XtNeditType, XawtextEdit);  j++;
1538             XtSetArg(args[j], XtNuseStringInPlace, False);  j++;
1539             XtSetArg(args[j], XtNdisplayCaret, False);  j++;
1540             XtSetArg(args[j], XtNright, XtChainRight);  j++;
1541             XtSetArg(args[j], XtNresizable, True);  j++;
1542             XtSetArg(args[j], XtNstring, option[i].type==Spin || option[i].type==Fractional ? def : *(char**)option[i].target);  j++;
1543             XtSetArg(args[j], XtNinsertPosition, 9999);  j++;
1544             edit = last;
1545             option[i].handle = (void*)
1546                 (textField = last = XtCreateManagedWidget("text", asciiTextWidgetClass, form, args, j));
1547             XtAddEventHandler(last, ButtonPressMask, False, SetFocus, (XtPointer) popup);
1548
1549             if(option[i].type == TextBox || option[i].type == Fractional) break;
1550
1551             // add increment and decrement controls for spin
1552             j=0;
1553             XtSetArg(args[j], XtNfromVert, edit);  j++;
1554             XtSetArg(args[j], XtNfromHoriz, last);  j++;
1555             XtSetArg(args[j], XtNleft, XtChainRight); j++;
1556             XtSetArg(args[j], XtNright, XtChainRight); j++;
1557             if(option[i].type == FileName || option[i].type == PathName) {
1558                 w = 50; msg = "browse";
1559             } else {
1560                 XtSetArg(args[j], XtNheight, 10);  j++;
1561                 w = 20; msg = "+";
1562             }
1563             XtSetArg(args[j], XtNwidth, w);  j++;
1564             edit = XtCreateManagedWidget(msg, commandWidgetClass, form, args, j);
1565             XtAddCallback(edit, XtNcallback, SpinCallback,
1566                           (XtPointer)(intptr_t) i);
1567
1568             if(option[i].type != Spin) break;
1569
1570             j=0;
1571             XtSetArg(args[j], XtNfromVert, edit);  j++;
1572             XtSetArg(args[j], XtNfromHoriz, last);  j++;
1573             XtSetArg(args[j], XtNheight, 10);  j++;
1574             XtSetArg(args[j], XtNwidth, 20);  j++;
1575             XtSetArg(args[j], XtNleft, XtChainRight); j++;
1576             XtSetArg(args[j], XtNright, XtChainRight); j++;
1577             last = XtCreateManagedWidget("-", commandWidgetClass, form, args, j);
1578             XtAddCallback(last, XtNcallback, SpinCallback,
1579                           (XtPointer)(intptr_t) i);
1580             break;
1581           case CheckBox:
1582             j=0;
1583             XtSetArg(args[j], XtNfromVert, last);  j++;
1584             XtSetArg(args[j], XtNwidth, 10);  j++;
1585             XtSetArg(args[j], XtNheight, 10);  j++;
1586             XtSetArg(args[j], XtNleft, XtChainLeft); j++;
1587             XtSetArg(args[j], XtNright, XtChainLeft); j++;
1588             XtSetArg(args[j], XtNstate, option[i].value = *(Boolean*)option[i].target);  j++;
1589             option[i].handle = (void*)
1590                 (dialog = XtCreateManagedWidget(" ", toggleWidgetClass, form, args, j));
1591           case Label:
1592             msg = option[i].name;
1593             if(*msg == NULLCHAR) msg = option[i].textValue;
1594             if(!msg) break;
1595             j=0;
1596             XtSetArg(args[j], XtNfromVert, last);  j++;
1597             XtSetArg(args[j], XtNfromHoriz, option[i].type != Label ? dialog : NULL);  j++;
1598             XtSetArg(args[j], XtNleft, XtChainLeft); j++;
1599             XtSetArg(args[j], XtNborderWidth, 0);  j++;
1600             XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;
1601             last = XtCreateManagedWidget(msg, labelWidgetClass, form, args, j);
1602             break;
1603           case Button:
1604             j=0;
1605             XtSetArg(args[j], XtNfromVert, option[i].min & 1 ? lastrow : last);  j++;
1606             if(option[i].min & 1) { XtSetArg(args[j], XtNfromHoriz, last);  j++; }
1607             else  { XtSetArg(args[j], XtNfromHoriz, NULL);  j++; lastrow = forelast; }
1608             if(option[i].max) XtSetArg(args[j], XtNwidth, option[i].max);  j++;
1609             if(option[i].textValue) { // special for buttons of New Variant dialog
1610                 XtSetArg(args[j], XtNsensitive, appData.noChessProgram || option[i].value < 0
1611                                          || strstr(first.variants, VariantName(option[i].value))); j++;
1612                 XtSetArg(args[j], XtNborderWidth, (gameInfo.variant == option[i].value)+1); j++;
1613             }
1614             option[i].handle = (void*)
1615                 (dialog = last = XtCreateManagedWidget(option[i].name, commandWidgetClass, form, args, j));
1616             if(option[i].target == NULL) SetColor( *(char**) option[i-1].target, last); else
1617             XtAddCallback(last, XtNcallback, GenericCallback,
1618                           (XtPointer)(intptr_t) i);
1619             if(option[i].textValue) SetColor( option[i].textValue, last);
1620             forelast = lastrow; // next button can go on same row
1621             break;
1622           case ComboBox:
1623             j=0;
1624             XtSetArg(args[j], XtNfromVert, last);  j++;
1625             XtSetArg(args[j], XtNleft, XtChainLeft); j++;
1626             XtSetArg(args[j], XtNright, XtChainLeft); j++;
1627             XtSetArg(args[j], XtNborderWidth, 0);  j++;
1628             XtSetArg(args[j], XtNjustify, XtJustifyLeft);  j++;
1629             texts[h] = dialog = XtCreateManagedWidget(option[i].name, labelWidgetClass, form, args, j);
1630
1631             for(j=0; option[i].choice[j]; j++)
1632                 if(*(char**)option[i].target && !strcmp(*(char**)option[i].target, option[i].choice[j])) break;
1633             option[i].value = j + (option[i].choice[j] == NULL);
1634
1635             j=0;
1636             XtSetArg(args[j], XtNfromVert, last);  j++;
1637             XtSetArg(args[j], XtNfromHoriz, dialog);  j++;
1638             XtSetArg(args[j], XtNwidth, option[i].max ? option[i].max : 100);  j++;
1639             XtSetArg(args[j], XtNleft, XtChainLeft); j++;
1640             XtSetArg(args[j], XtNmenuName, XtNewString(option[i].name));  j++;
1641             XtSetArg(args[j], XtNlabel, ((char**)option[i].textValue)[option[i].value]);  j++;
1642             option[i].handle = (void*)
1643                 (last = XtCreateManagedWidget(" ", menuButtonWidgetClass, form, args, j));
1644             CreateComboPopup(last, option[i].name, i, (char **) option[i].textValue);
1645             values[i] = option[i].value;
1646             break;
1647           case Break:
1648             width++;
1649             height = i+1;
1650             break;
1651         default:
1652             printf("GenericPopUp: unexpected case in switch.\n");
1653             break;
1654         }
1655     }
1656
1657     // make an attempt to align all spins and textbox controls
1658     maxWidth = maxTextWidth = 0;
1659     for(h=0; h<height; h++) {
1660         i = h + c*height;
1661         if(option[i].type == EndMark) break;
1662         if(option[i].type == Spin || option[i].type == TextBox || option[i].type == ComboBox
1663                                   || option[i].type == PathName || option[i].type == FileName) {
1664             Dimension w;
1665             if(!texts[h]) continue;
1666             j=0;
1667             XtSetArg(args[j], XtNwidth, &w);  j++;
1668             XtGetValues(texts[h], args, j);
1669             if(option[i].type == Spin) {
1670                 if(w > maxWidth) maxWidth = w;
1671                 widest = texts[h];
1672             } else {
1673                 if(w > maxTextWidth) maxTextWidth = w;
1674                 if(!widest) widest = texts[h];
1675             }
1676         }
1677     }
1678     if(maxTextWidth + 110 < maxWidth)
1679          maxTextWidth = maxWidth - 110;
1680     else maxWidth = maxTextWidth + 110;
1681     for(h=0; h<height; h++) {
1682         i = h + c*height;
1683         if(option[i].type == EndMark) break;
1684         if(!texts[h]) continue;
1685         j=0;
1686         if(option[i].type == Spin) {
1687             XtSetArg(args[j], XtNwidth, maxWidth);  j++;
1688             XtSetValues(texts[h], args, j);
1689         } else
1690         if(option[i].type == TextBox || option[i].type == ComboBox || option[i].type == PathName || option[i].type == FileName) {
1691             XtSetArg(args[j], XtNwidth, maxTextWidth);  j++;
1692             XtSetValues(texts[h], args, j);
1693         }
1694     }
1695   }
1696
1697   if(!(option[i].min & 2)) {
1698     j=0;
1699     if(option[i].min & 1) { XtSetArg(args[j], XtNfromHoriz, last); last = forelast; } else
1700     XtSetArg(args[j], XtNfromHoriz, widest ? widest : dialog);  j++;
1701     XtSetArg(args[j], XtNfromVert, anchor ? anchor : last);  j++;
1702     XtSetArg(args[j], XtNbottom, XtChainBottom);  j++;
1703     XtSetArg(args[j], XtNtop, XtChainBottom);  j++;
1704     XtSetArg(args[j], XtNleft, XtChainRight);  j++;
1705     XtSetArg(args[j], XtNright, XtChainRight);  j++;
1706     b_ok = XtCreateManagedWidget(_("OK"), commandWidgetClass, form, args, j);
1707     XtAddCallback(b_ok, XtNcallback, GenericCallback, (XtPointer) 0);
1708
1709     XtSetArg(args[0], XtNfromHoriz, b_ok);
1710     b_cancel = XtCreateManagedWidget(_("cancel"), commandWidgetClass, form, args, j);
1711     XtAddCallback(b_cancel, XtNcallback, SettingsPopDown, (XtPointer) 0);
1712   }
1713
1714     XtRealizeWidget(popup);
1715     CatchDeleteWindow(popup, "SettingsPopDown");
1716
1717     XQueryPointer(xDisplay, xBoardWindow, &root, &child,
1718                   &x, &y, &win_x, &win_y, &mask);
1719
1720     XtSetArg(args[0], XtNx, x - 10);
1721     XtSetArg(args[1], XtNy, y - 30);
1722     XtSetValues(popup, args, 2);
1723
1724     XtPopup(popup, XtGrabExclusive);
1725     SettingsUp = True;
1726
1727     previous = NULL;
1728     if(textField)SetFocus(textField, popup, (XEvent*) NULL, False);
1729 }
1730
1731
1732 void IcsOptionsProc(w, event, prms, nprms)
1733      Widget w;
1734      XEvent *event;
1735      String *prms;
1736      Cardinal *nprms;
1737 {
1738    GenericPopUp(icsOptions, _("ICS Options"));
1739 }
1740
1741 void LoadOptionsProc(w, event, prms, nprms)
1742      Widget w;
1743      XEvent *event;
1744      String *prms;
1745      Cardinal *nprms;
1746 {
1747    GenericPopUp(loadOptions, _("Load Game Options"));
1748 }
1749
1750 void SaveOptionsProc(w, event, prms, nprms)
1751      Widget w;
1752      XEvent *event;
1753      String *prms;
1754      Cardinal *nprms;
1755 {
1756    GenericPopUp(saveOptions, _("Save Game Options"));
1757 }
1758
1759 void SoundOptionsProc(w, event, prms, nprms)
1760      Widget w;
1761      XEvent *event;
1762      String *prms;
1763      Cardinal *nprms;
1764 {
1765    soundFiles[2] = "*";
1766    GenericPopUp(soundOptions, _("Sound Options"));
1767 }
1768
1769 void BoardOptionsProc(w, event, prms, nprms)
1770      Widget w;
1771      XEvent *event;
1772      String *prms;
1773      Cardinal *nprms;
1774 {
1775    GenericPopUp(boardOptions, _("Board Options"));
1776 }
1777
1778 void EngineMenuProc(w, event, prms, nprms)
1779      Widget w;
1780      XEvent *event;
1781      String *prms;
1782      Cardinal *nprms;
1783 {
1784    GenericPopUp(adjudicationOptions, "Adjudicate non-ICS Games");
1785 }
1786
1787 void UciMenuProc(w, event, prms, nprms)
1788      Widget w;
1789      XEvent *event;
1790      String *prms;
1791      Cardinal *nprms;
1792 {
1793    oldCores = appData.smpCores;
1794    oldPonder = appData.ponderNextMove;
1795    GenericPopUp(commonEngineOptions, _("Common Engine Settings"));
1796 }
1797
1798 void NewVariantProc(w, event, prms, nprms)
1799      Widget w;
1800      XEvent *event;
1801      String *prms;
1802      Cardinal *nprms;
1803 {
1804    GenericPopUp(variantDescriptors, _("New Variant"));
1805 }
1806
1807 //---------------------------- Chat Windows ----------------------------------------------
1808
1809 void OutputChatMessage(int partner, char *mess)
1810 {
1811     return; // dummy
1812 }
1813