Fix parser.c line endings
[xboard.git] / winboard / wsettings.c
index ac2c3b1..11de72b 100644 (file)
@@ -1,7 +1,7 @@
 /*\r
  * Engine-settings dialog. The complexity come from an attempt to present the engine-defined options\r
  * in a nicey formatted layout. To this end we first run a back-end pre-formatter, which will distribute\r
- * the controls over two columns (the minimum required, as some are double width). It also takes care of \r
+ * the controls over two columns (the minimum required, as some are double width). It also takes care of\r
  * grouping options that start with the same word (mainly for "Polyglot ..." options). It assigns relative\r
  * suitability to break points between lines, and in the end decides if and where to break up the list\r
  * for display in multiple (2*N) columns.\r
@@ -12,6 +12,7 @@
 #include "config.h"\r
 \r
 #include <windows.h>\r
+#include <Windowsx.h>\r
 #include <stdio.h>\r
 #include <string.h>\r
 #include "common.h"\r
@@ -21,6 +22,7 @@
 #include "backendz.h"\r
 \r
 #define _(s) T_(s)\r
+#define N_(s) s\r
 \r
 int layoutList[2*MAX_OPTIONS];\r
 int checkList[2*MAX_OPTIONS];\r
@@ -30,14 +32,26 @@ int boxList[2*MAX_OPTIONS];
 int groupNameList[2*MAX_OPTIONS];\r
 int breaks[MAX_OPTIONS];\r
 int checks, combos, buttons, layout, groups;\r
+char title[MSG_SIZ];\r
+char *engineName, *engineDir, *engineChoice, *engineLine, *nickName, *params;\r
+Boolean isUCI, hasBook, storeVariant, v1, addToList, useNick, isUCCI;\r
+extern Option installOptions[], matchOptions[];\r
+char *engineNr[] = { N_("First"), N_("Second"), NULL };\r
+char *engineList[1000] = {" "}, *engineMnemonic[1000] = {""};\r
+void (*okFunc)();\r
+ChessProgramState *activeCps;\r
+Option *activeList;\r
+int InstallOK P((void));\r
+typedef int ButtonCallback(HWND h);\r
+ButtonCallback *comboCallback;\r
 \r
 void\r
-PrintOpt(int i, int right, ChessProgramState *cps)\r
+PrintOpt(int i, int right, Option *optionList)\r
 {\r
     if(i<0) {\r
        if(!right) fprintf(debugFP, "%30s", "");\r
     } else {\r
-       Option opt = cps->option[i];\r
+       Option opt = optionList[i];\r
        switch(opt.type) {\r
            case Slider:\r
            case Spin:\r
@@ -48,6 +62,9 @@ PrintOpt(int i, int right, ChessProgramState *cps)
            case PathName:\r
                fprintf(debugFP, "%20.20s [______________________________________]", opt.name);\r
                break;\r
+           case Label:\r
+               fprintf(debugFP, "%41.41s", opt.name);\r
+               break;\r
            case CheckBox:\r
                fprintf(debugFP, "[x] %-26.25s", opt.name);\r
                break;\r
@@ -59,6 +76,7 @@ PrintOpt(int i, int right, ChessProgramState *cps)
            case ResetButton:\r
                fprintf(debugFP, "[ %26.26s ]", opt.name);\r
            case Message:\r
+           default:\r
                break;\r
        }\r
     }\r
@@ -66,13 +84,13 @@ PrintOpt(int i, int right, ChessProgramState *cps)
 }\r
 \r
 void\r
-CreateOptionDialogTest(int *list, int nr, ChessProgramState *cps)\r
+CreateOptionDialogTest(int *list, int nr, Option *optionList)\r
 {\r
     int line;\r
 \r
     for(line = 0; line < nr; line+=2) {\r
-       PrintOpt(list[line+1], 0, cps);\r
-       PrintOpt(list[line], 1, cps);\r
+       PrintOpt(list[line+1], 0, optionList);\r
+       PrintOpt(list[line], 1, optionList);\r
     }\r
 }\r
 \r
@@ -98,16 +116,18 @@ LayoutOptions(int firstOption, int endOption, char *groupName, Option *optionLis
                case FileName:\r
                case PathName:\r
                case Slider:\r
+               case Label:\r
                case Spin: stop++;\r
+               default:\r
                case Message: ; // cannot happen\r
            }\r
            nextOption++;\r
        }\r
        // We now must be at the end, or looking at a spin or textbox (in nextType)\r
-       if(!stop) \r
+       if(!stop)\r
            nextType = Button; // kudge to flush remaining checks and combos undistorted\r
        // Take a new line if a spin follows combos or checks, or when we encounter a textbox\r
-       if((combos+checks || nextType == TextBox) && layout&1) {\r
+       if((combos+checks || nextType == TextBox || nextType == FileName || nextType == PathName || nextType == Label) && layout&1) {\r
            layoutList[layout++] = -1;\r
        }\r
        // The last check or combo before a spin will be put on the same line as that spin (prefix)\r
@@ -119,10 +139,10 @@ LayoutOptions(int firstOption, int endOption, char *groupName, Option *optionLis
        }\r
        // if a combo is followed by a textbox, it must stay at the end of the combo/checks list to appear\r
        // immediately above the textbox, so treat it as check. (A check would automatically be and remain there.)\r
-       if(nextType == TextBox && lastType == ComboBox)\r
+       if((nextType == TextBox || nextType == FileName || nextType == PathName) && lastType == ComboBox)\r
            checkList[checks++] = comboList[--combos];\r
        // Now append the checks behind the (remaining) combos to treat them as one group\r
-       for(i=0; i< checks; i++) \r
+       for(i=0; i< checks; i++)\r
            comboList[combos++] = checkList[i];\r
        // emit the consecutive checks and combos in two columns\r
        right = combos/2; // rounded down if odd!\r
@@ -137,11 +157,15 @@ LayoutOptions(int firstOption, int endOption, char *groupName, Option *optionLis
            layoutList[layout++] = -1;\r
            layoutList[layout++] = comboList[2*right];\r
        }\r
-       if(nextType == TextBox) {\r
+       if(nextType == TextBox || nextType == FileName || nextType == PathName || nextType == Label) {\r
            // A textBox is double width, so must be left-adjusted, and the right column remains empty\r
            breaks[layout/2] = lastType == Button ? 0 : 100;\r
            layoutList[layout++] = -1;\r
            layoutList[layout++] = nextOption - 1;\r
+           for(i=optionList[nextOption-1].min; i>0; i--) { // extra high text edit\r
+               layoutList[layout++] = -1;\r
+               layoutList[layout++] = -1;\r
+           }\r
        } else if(nextType == Spin) {\r
            // A spin will go in the next available position (right to left!). If it had to be prefixed with\r
            // a check or combo, this next position must be to the right, and the prefix goes left to it.\r
@@ -171,44 +195,46 @@ EndMatch(char *s1, char *s2)
 }\r
 \r
 void\r
-DesignOptionDialog(ChessProgramState *cps)\r
+DesignOptionDialog(int nrOpt, Option *optionList)\r
 {\r
     int k=0, n=0;\r
     char buf[MSG_SIZ];\r
 \r
     layout = 0;\r
     buttons = groups = 0;\r
-    while(k < cps->nrOptions) { // k steps through 'solitary' options\r
+    while(k < nrOpt) { // k steps through 'solitary' options\r
        // look if we hit a group of options having names that start with the same word\r
        int groupSize = 1, groupNameLength = 50;\r
-       sscanf(cps->option[k].name, "%s", buf); // get first word of option name\r
-       while(k + groupSize < cps->nrOptions &&\r
-             strstr(cps->option[k+groupSize].name, buf) == cps->option[k+groupSize].name) {\r
+       sscanf(optionList[k].name, "%s", buf); // get first word of option name\r
+       while(k + groupSize < nrOpt &&\r
+             strstr(optionList[k+groupSize].name, buf) == optionList[k+groupSize].name) {\r
                int j;\r
                for(j=0; j<groupNameLength; j++) // determine common initial part of option names\r
-                   if( cps->option[k].name[j] != cps->option[k+groupSize].name[j]) break;\r
+                   if( optionList[k].name[j] != optionList[k+groupSize].name[j]) break;\r
                groupNameLength = j;\r
                groupSize++;\r
-               \r
+\r
        }\r
        if(groupSize > 3) {\r
                // We found a group to terminates the current section\r
-               LayoutOptions(n, k, "", cps->option); // flush all solitary options appearing before the group\r
+               LayoutOptions(n, k, "", optionList); // flush all solitary options appearing before the group\r
                groupNameList[groups] = groupNameLength;\r
                boxList[groups++] = layout; // group start in even entries\r
-               LayoutOptions(k, k+groupSize, buf, cps->option); // flush the group\r
+               LayoutOptions(k, k+groupSize, buf, optionList); // flush the group\r
                boxList[groups++] = layout; // group end in odd entries\r
                k = n = k + groupSize;\r
        } else k += groupSize; // small groups are grouped with the solitary options\r
     }\r
-    if(n != k) LayoutOptions(n, k, "", cps->option); // flush remaining solitary options\r
+    if(n != k) LayoutOptions(n, k, "", optionList); // flush remaining solitary options\r
     // decide if and where we break into two column pairs\r
-    \r
+\r
     // Emit buttons and add OK and cancel\r
 //    for(k=0; k<buttons; k++) layoutList[layout++] = buttonList[k];\r
-    // Create the dialog window\r
-    if(appData.debugMode) CreateOptionDialogTest(layoutList, layout, cps);\r
-//    CreateOptionDialog(layoutList, layout, cps);\r
\r
+   // Create the dialog window\r
+    if(appData.debugMode) CreateOptionDialogTest(layoutList, layout, optionList);\r
+//    CreateOptionDialog(layoutList, layout, optionList);\r
+    if(!activeCps) okFunc = optionList[nrOpt].target;\r
 }\r
 \r
 #include <windows.h>\r
@@ -236,42 +262,55 @@ struct {
     0x0000, 0x0000, L"Engine #1 Settings ", 8, L"MS Sans Serif"\r
 };\r
 \r
-ChessProgramState *activeCps;\r
+char *\r
+AddCR(char *s)\r
+{\r
+    char *p=s, *q;\r
+    int n=0;\r
+    while(p = strchr(p, '\n')) p++, n++; // count linefeeds\r
+    p = q = malloc(strlen(s) + n + 1);\r
+    while(*p++ = *s++) if(p[-1] == '\n') p[-1] = '\r', *p++ = '\n';\r
+    return q;\r
+}\r
 \r
 void\r
-SetOptionValues(HWND hDlg, ChessProgramState *cps)\r
+SetOptionValues(HWND hDlg, ChessProgramState *cps, Option *optionList)\r
 // Put all current option values in controls, and write option names next to them\r
 {\r
     HANDLE hwndCombo;\r
     int i, k;\r
-    char **choices, title[MSG_SIZ], *name;\r
+    char **choices, *name;\r
 \r
     for(i=0; i<layout+buttons; i++) {\r
        int j=layoutList[i];\r
        if(j == -2) SetDlgItemText( hDlg, 2000+2*i, ". . ." );\r
        if(j<0) continue;\r
-       name = cps->option[j].name;\r
+       name = cps ? optionList[j].name : _(optionList[j].name);\r
        if(strstr(name, "Polyglot ") == name) name += 9;\r
        SetDlgItemText( hDlg, 2000+2*i, name );\r
-//if(appData.debugMode) fprintf(debugFP, "# %s = %d\n",cps->option[j].name, cps->option[j].value );\r
-       switch(cps->option[j].type) {\r
+//if(appData.debugMode) fprintf(debugFP, "# %s = %d\n",optionList[j].name, optionList[j].value );\r
+       switch(optionList[j].type) {\r
            case Spin:\r
-               SetDlgItemInt( hDlg, 2001+2*i, cps->option[j].value, TRUE );\r
+               SetDlgItemInt( hDlg, 2001+2*i, cps ? optionList[j].value : *(int*)optionList[j].target, TRUE );\r
                break;\r
            case TextBox:\r
-               SetDlgItemText( hDlg, 2001+2*i, cps->option[j].textValue );\r
+           case FileName:\r
+           case PathName:\r
+               name = AddCR(cps ? optionList[j].textValue : *(char**)optionList[j].target); // stupid CR...\r
+               SetDlgItemText( hDlg, 2001+2*i, name);\r
+               free(name);\r
                break;\r
            case CheckBox:\r
-               CheckDlgButton( hDlg, 2000+2*i, cps->option[j].value != 0);\r
+               CheckDlgButton( hDlg, 2000+2*i, (cps ? optionList[j].value : *(Boolean*)optionList[j].target) != 0);\r
                break;\r
            case ComboBox:\r
-               choices = (char**) cps->option[j].textValue;\r
+               choices = (char**) optionList[j].textValue;\r
                hwndCombo = GetDlgItem(hDlg, 2001+2*i);\r
                SendMessage(hwndCombo, CB_RESETCONTENT, 0, 0);\r
-               for(k=0; k<cps->option[j].max; k++) {\r
+               for(k=0; k<optionList[j].max; k++) {\r
                    SendMessage(hwndCombo, CB_ADDSTRING, 0, (LPARAM) choices[k]);\r
                }\r
-               SendMessage(hwndCombo, CB_SELECTSTRING, (WPARAM) -1, (LPARAM) choices[cps->option[j].value]);\r
+               SendMessage(hwndCombo, CB_SELECTSTRING, (WPARAM) -1, (LPARAM) choices[optionList[j].value]);\r
                break;\r
            case Button:\r
            case SaveButton:\r
@@ -281,102 +320,126 @@ SetOptionValues(HWND hDlg, ChessProgramState *cps)
     }\r
     SetDlgItemText( hDlg, IDOK, _("OK") );\r
     SetDlgItemText( hDlg, IDCANCEL, _("Cancel") );\r
-    sprintf(title, _("%s Engine Settings (%s)"), T_(cps->which), cps->tidy); \r
     title[0] &= ~32; // capitalize\r
     SetWindowText( hDlg, title);\r
-    for(i=0; i<groups; i+=2) { \r
+    for(i=0; i<groups; i+=2) {\r
        int id, p; char buf[MSG_SIZ];\r
        id = k = boxList[i];\r
        if(layoutList[k] < 0) k++;\r
        if(layoutList[k] < 0) continue;\r
-       for(p=0; p<groupNameList[i]; p++) buf[p] = cps->option[layoutList[k]].name[p];\r
+       for(p=0; p<groupNameList[i]; p++) buf[p] = optionList[layoutList[k]].name[p];\r
        buf[p] = 0;\r
        SetDlgItemText( hDlg, 2000+2*(id+MAX_OPTIONS), buf );\r
     }\r
 }\r
 \r
 \r
-void\r
-GetOptionValues(HWND hDlg, ChessProgramState *cps)\r
+int\r
+GetOptionValues(HWND hDlg, ChessProgramState *cps, Option *optionList)\r
 // read out all controls, and if value is altered, remember it and send it to the engine\r
 {\r
     HANDLE hwndCombo;\r
-    int i, k, new=0, changed=0;\r
-    char **choices, newText[MSG_SIZ], buf[MSG_SIZ];\r
+    int i, k, new=0, changed=0, len;\r
+    char **choices, newText[MSG_SIZ], buf[MSG_SIZ], *text;\r
     BOOL success;\r
 \r
     for(i=0; i<layout; i++) {\r
        int j=layoutList[i];\r
        if(j<0) continue;\r
-       switch(cps->option[j].type) {\r
+       switch(optionList[j].type) {\r
            case Spin:\r
                new = GetDlgItemInt( hDlg, 2001+2*i, &success, TRUE );\r
                if(!success) break;\r
-               if(new < cps->option[j].min) new = cps->option[j].min;\r
-               if(new > cps->option[j].max) new = cps->option[j].max;\r
-               changed = 2*(cps->option[j].value != new);\r
-               cps->option[j].value = new;\r
+               if(new < optionList[j].min) new = optionList[j].min;\r
+               if(new > optionList[j].max) new = optionList[j].max;\r
+               if(!cps) { *(int*)optionList[j].target = new; break; }\r
+               changed = 2*(optionList[j].value != new);\r
+               optionList[j].value = new;\r
                break;\r
            case TextBox:\r
            case FileName:\r
            case PathName:\r
-               success = GetDlgItemText( hDlg, 2001+2*i, newText, MSG_SIZ - strlen(cps->option[j].name) - 9 );\r
-               if(!success) break;\r
-               changed = strcmp(cps->option[j].textValue, newText) != 0;\r
-               strcpy(cps->option[j].textValue, newText);\r
+               if(cps) len = MSG_SIZ - strlen(optionList[j].name) - 9, text = newText;\r
+               else    len = GetWindowTextLength(GetDlgItem(hDlg, 2001+2*i)) + 1, text = (char*) malloc(len);\r
+               success = GetDlgItemText( hDlg, 2001+2*i, text, len );\r
+               if(!success) text[0] = NULLCHAR; // empty string can be valid input\r
+               if(!cps) {\r
+                   char *p;\r
+                   p = (optionList[j].type != FileName ? strdup(text) : InterpretFileName(text, homeDir)); // all files relative to homeDir!\r
+                   FREE(*(char**)optionList[j].target); *(char**)optionList[j].target = p;
+                   free(text); text = p;\r
+                   while(*p++ = *text++) if(p[-1] == '\r') p--; // crush CR\r
+                   break;\r
+               }\r
+               changed = strcmp(optionList[j].textValue, newText) != 0;\r
+               safeStrCpy(optionList[j].textValue, newText, MSG_SIZ - (optionList[j].textValue - optionList[j].name) );\r
                break;\r
            case CheckBox:\r
                new = IsDlgButtonChecked( hDlg, 2000+2*i );\r
-               changed = 2*(cps->option[j].value != new);\r
-               cps->option[j].value = new;\r
+               if(!cps) { *(Boolean*)optionList[j].target = new; break; }\r
+               changed = 2*(optionList[j].value != new);\r
+               optionList[j].value = new;\r
                break;\r
            case ComboBox:\r
-               choices = (char**) cps->option[j].textValue;\r
+               choices = (char**) optionList[j].textValue;\r
                hwndCombo = GetDlgItem(hDlg, 2001+2*i);\r
                success = GetDlgItemText( hDlg, 2001+2*i, newText, MSG_SIZ );\r
                if(!success) break;\r
                new = -1;\r
-               for(k=0; k<cps->option[j].max; k++) {\r
+               for(k=0; k<optionList[j].max; k++) {\r
                    if(!strcmp(choices[k], newText)) new = k;\r
                }\r
-               changed = new >= 0 && (cps->option[j].value != new);\r
-               if(changed) cps->option[j].value = new;\r
+               if(!cps && new) {\r
+                   if(*(char**)optionList[j].target) free(*(char**)optionList[j].target);\r
+                   *(char**)optionList[j].target = strdup(optionList[j].choice[new]);\r
+                   break;\r
+               }\r
+               changed = new >= 0 && (optionList[j].value != new);\r
+               if(changed) optionList[j].value = new;\r
                break;\r
            case Button:\r
            default:\r
                break; // are treated instantly, so they have been sent already\r
        }\r
-       if(changed == 2) sprintf(buf, "option %s=%d\n", cps->option[j].name, new); else\r
-       if(changed == 1) sprintf(buf, "option %s=%s\n", cps->option[j].name, newText);\r
+       if(changed == 2)\r
+         snprintf(buf, MSG_SIZ, "option %s=%d\n", optionList[j].name, new); else\r
+       if(changed == 1)\r
+         snprintf(buf, MSG_SIZ, "option %s=%s\n", optionList[j].name, newText);\r
        if(changed) SendToProgram(buf, cps);\r
     }\r
+    if(!cps && okFunc) return ((ButtonCallback*) okFunc)(0);\r
+    return 1;\r
 }\r
 \r
+char *defaultExt[] = { NULL, "pgn", "fen", "exe", "trn", "bin", "log", "ini" };\r
+\r
 LRESULT CALLBACK SettingsProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)\r
 {\r
     char buf[MSG_SIZ];\r
-    int i, j;\r
+    int i, j, ext;\r
 \r
     switch( message )\r
     {\r
     case WM_INITDIALOG:\r
 \r
 //        CenterWindow(hDlg, GetWindow(hDlg, GW_OWNER));\r
-       SetOptionValues(hDlg, activeCps);\r
+       SetOptionValues(hDlg, activeCps, activeList);\r
 \r
-//        SetFocus(GetDlgItem(hDlg, IDC_NFG_Edit));\r
+        SetFocus(GetDlgItem(hDlg, IDCANCEL));\r
 \r
         break;\r
 \r
     case WM_COMMAND:\r
         switch( LOWORD(wParam) ) {\r
         case IDOK:\r
-           GetOptionValues(hDlg, activeCps);\r
+           if(!GetOptionValues(hDlg, activeCps, activeList)) return FALSE;\r
             EndDialog( hDlg, 0 );\r
+           comboCallback = NULL; activeCps = NULL;\r
             return TRUE;\r
 \r
         case IDCANCEL:\r
-            EndDialog( hDlg, 1 );   \r
+            EndDialog( hDlg, 1 );\r
+           comboCallback = NULL; activeCps = NULL;\r
             return TRUE;\r
 \r
        default:\r
@@ -385,19 +448,13 @@ LRESULT CALLBACK SettingsProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lPa
            if( i>=2000 &&  i < 2000+2*(layout+buttons)) {\r
                j = layoutList[(i - 2000)/2];\r
                if(j == -2) {\r
-                         char filter[] = \r
-                               "All files\0*.*\0BIN Files\0*.bin\0LOG Files\0*.log\0INI Files\0*.ini\0\0";\r
-/*\r
-{ \r
-                             'A','l','l',' ','F','i','l','e','s', 0,\r
-                             '*','.','*', 0,\r
-                             'B','I','N',' ','F','i','l','e','s', 0,\r
-                             '*','.','b','i','n', 0,\r
-                             0 };\r
-*/\r
+                         char filter[] =\r
+                               "All files\0*.*\0Game files\0*.pgn;*.gam\0Position files\0*.fen;*.epd;*.pos\0"\r
+                               "EXE files\0*.exe\0Tournament files (*.trn)\0*.trn\0"\r
+                               "BIN Files\0*.bin\0LOG Files\0*.log\0INI Files\0*.ini\0\0";\r
                          OPENFILENAME ofn;\r
 \r
-                         strcpy( buf, "" );\r
+                         safeStrCpy( buf, "" , sizeof( buf)/sizeof( buf[0]) );\r
 \r
                          ZeroMemory( &ofn, sizeof(ofn) );\r
 \r
@@ -405,20 +462,31 @@ LRESULT CALLBACK SettingsProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lPa
                          ofn.hwndOwner = hDlg;\r
                          ofn.hInstance = hInst;\r
                          ofn.lpstrFilter = filter;\r
+                         ofn.nFilterIndex      = 1L + (ext = activeCps ? 0 : activeList[layoutList[(i-2000)/2+1]].max);\r
+                         ofn.lpstrDefExt       = defaultExt[ext];\r
                          ofn.lpstrFile = buf;\r
                          ofn.nMaxFile = sizeof(buf);\r
-                         ofn.lpstrTitle = _("Choose Book");\r
+                         ofn.lpstrTitle = _("Choose File");\r
                          ofn.Flags = OFN_FILEMUSTEXIST | OFN_LONGNAMES | OFN_HIDEREADONLY;\r
 \r
                          if( GetOpenFileName( &ofn ) ) {\r
                              SetDlgItemText( hDlg, i+3, buf );\r
                          }\r
+               } else\r
+               if(j == -3) {\r
+                   if( BrowseForFolder( _("Choose Folder:"), buf ) ) {\r
+                       SetDlgItemText( hDlg, i+3, buf );\r
+                   }\r
                }\r
                if(j < 0) break;\r
-               if( activeCps->option[j].type  == SaveButton)\r
-                    GetOptionValues(hDlg, activeCps);\r
-               else if( activeCps->option[j].type  != Button) break;\r
-               sprintf(buf, "option %s\n", activeCps->option[j].name);\r
+               if(comboCallback && activeList[j].type == ComboBox && HIWORD(wParam) == CBN_SELCHANGE) {\r
+                   (*comboCallback)(hDlg);\r
+                   break;\r
+               } else\r
+               if( activeList[j].type  == SaveButton)\r
+                    GetOptionValues(hDlg, activeCps, activeList);\r
+               else if( activeList[j].type  != Button) break;\r
+               snprintf(buf, MSG_SIZ, "option %s\n", activeList[j].name);\r
                SendToProgram(buf, activeCps);\r
            }\r
            break;\r
@@ -451,6 +519,7 @@ void AddControl(int x, int y, int w, int h, int type, int style, int n)
 \r
 void AddOption(int x, int y, Control type, int i)\r
 {\r
+    int extra;\r
 \r
     switch(type) {\r
        case Slider:\r
@@ -458,86 +527,95 @@ void AddOption(int x, int y, Control type, int i)
            AddControl(x, y+1, 95, 9, 0x0082, SS_ENDELLIPSIS | WS_VISIBLE | WS_CHILD, i);\r
            AddControl(x+95, y, 50, 11, 0x0081, ES_AUTOHSCROLL | ES_NUMBER | WS_BORDER | WS_VISIBLE | WS_CHILD | WS_TABSTOP, i+1);\r
            break;\r
-//     case TextBox:\r
+       case TextBox:\r
            AddControl(x, y+1, 95, 9, 0x0082, SS_ENDELLIPSIS | WS_VISIBLE | WS_CHILD, i);\r
-           AddControl(x+95, y, 190, 11, 0x0081, ES_AUTOHSCROLL | WS_BORDER | WS_VISIBLE | WS_CHILD | WS_TABSTOP, i+1);\r
+           extra = 13*activeList[layoutList[i/2]].min;\r
+           AddControl(x+95, y, 200, 11+extra, 0x0081, ES_AUTOHSCROLL | WS_BORDER | WS_VISIBLE | WS_CHILD | WS_TABSTOP | \r
+                                                               (extra ? ES_MULTILINE | ES_WANTRETURN | WS_VSCROLL :0), i+1);\r
+           break;\r
+       case Label:\r
+           extra = activeList[layoutList[i/2]].value;\r
+           AddControl(x+extra, y+1, 290-extra, 9, 0x0082, SS_ENDELLIPSIS | WS_VISIBLE | WS_CHILD | WS_TABSTOP, i);\r
            break;\r
-       case TextBox:  // For now all text edits get a browse button, as long as -file and -path options are not yet implemented\r
        case FileName:\r
        case PathName:\r
            AddControl(x, y+1, 95, 9, 0x0082, SS_ENDELLIPSIS | WS_VISIBLE | WS_CHILD, i);\r
            AddControl(x+95, y, 180, 11, 0x0081, ES_AUTOHSCROLL | WS_BORDER | WS_VISIBLE | WS_CHILD | WS_TABSTOP, i+1);\r
            AddControl(x+275, y, 20, 12, 0x0080, BS_PUSHBUTTON | WS_VISIBLE | WS_CHILD | WS_TABSTOP, i-2);\r
-           layoutList[i/2-1] = -2;\r
+           layoutList[i/2-1] = -2 - (type == PathName);\r
            break;\r
        case CheckBox:\r
            AddControl(x, y, 145, 11, 0x0080, BS_AUTOCHECKBOX | WS_VISIBLE | WS_CHILD | WS_TABSTOP, i);\r
            break;\r
        case ComboBox:\r
            AddControl(x, y+1, 95, 9, 0x0082, SS_ENDELLIPSIS | WS_VISIBLE | WS_CHILD, i);\r
-           AddControl(x+95, y-1, 50, 500, 0x0085, CBS_AUTOHSCROLL | CBS_DROPDOWN | WS_VISIBLE | WS_CHILD | WS_TABSTOP, i+1);\r
+           AddControl(x+95, y-1, !activeCps && x<10 ? 120 : 50, 500, 0x0085,\r
+                       CBS_AUTOHSCROLL | CBS_DROPDOWN | WS_VISIBLE | WS_CHILD | WS_TABSTOP | WS_VSCROLL, i+1);\r
            break;\r
        case Button:\r
        case ResetButton:\r
        case SaveButton:\r
-           AddControl(x-2, y, 65, 13, 0x0080, BS_PUSHBUTTON | WS_VISIBLE | WS_CHILD, i);\r
+           AddControl(x-2, y, 65, 13, 0x0080, BS_PUSHBUTTON | WS_VISIBLE | WS_CHILD | WS_TABSTOP, i);\r
        case Message:\r
+       default:\r
            break;\r
     }\r
-    \r
+\r
 }\r
 \r
 void\r
-CreateDialogTemplate(int *layoutList, int nr, ChessProgramState *cps)\r
+CreateDialogTemplate(int *layoutList, int nr, Option *optionList)\r
 {\r
-    int i, j, x=1, y=0, buttonRows, breakPoint = -1, k=0;\r
+    int i, ii, j, x=1, y=0, buttonRows, breakPoint = -1, k=0;\r
 \r
     template.header.cdit = 0;\r
     template.header.cx = 307;\r
     buttonRows = (buttons + 1 + 3)/4; // 4 per row, rounded up\r
-    if(nr > 50) { \r
+    if(nr > 50) {\r
        breakPoint = (nr+2*buttonRows+1)/2 & ~1;\r
        template.header.cx = 625;\r
     }\r
 \r
-    for(i=0; i<nr; i++) {\r
-       if(k < groups && i == boxList[k]) {\r
+    for(ii=0; ii<nr; ii++) {\r
+       i = ii^1; if(i == nr) i = ii; // if two on one line, swap order of treatment, to get good (left to right) tabbing order.\r
+       if(k < groups && ii == boxList[k]) {\r
            y += 10;\r
-           AddControl(x+2, y+13*(i>>1)-2, 301, 13*(boxList[k+1]-boxList[k]>>1)+8, \r
+           AddControl(x+2, y+13*(i>>1)-2, 301, 13*(boxList[k+1]-boxList[k]>>1)+8,\r
                                                0x0082, WS_VISIBLE | WS_CHILD | SS_BLACKFRAME, 2400);\r
-           AddControl(x+60, y+13*(i>>1)-6, 10*groupNameList[k]/3, 10, \r
-                                               0x0082, SS_ENDELLIPSIS | WS_VISIBLE | WS_CHILD, 2*(i+MAX_OPTIONS));\r
+           AddControl(x+60, y+13*(i>>1)-6, 10*groupNameList[k]/3, 10,\r
+                                               0x0082, SS_ENDELLIPSIS | WS_VISIBLE | WS_CHILD, 2*(ii+MAX_OPTIONS));\r
        }\r
        j = layoutList[i];\r
        if(j >= 0)\r
-           AddOption(x+155-150*(i&1), y+13*(i>>1)+5, cps->option[j].type, 2*i);\r
-       if(k < groups && i+1 == boxList[k+1]) {\r
+           AddOption(x+155-150*(i&1), y+13*(i>>1)+5, optionList[j].type, 2*i);\r
+       if(k < groups && ii+1 == boxList[k+1]) {\r
            k += 2; y += 4;\r
        }\r
-       if(i+1 == breakPoint) { x += 318; y = -13*(breakPoint>>1); }\r
+       if(ii+1 == breakPoint) { x += 318; y = -13*(breakPoint>>1); }\r
     }\r
     // add butons at the bottom of dialog window\r
     y += 13*(nr>>1)+5;\r
 \r
-    AddControl(x+275, y+18*(buttonRows-1), 25, 15, 0x0080, BS_PUSHBUTTON | WS_VISIBLE | WS_CHILD, IDOK-2000);\r
-    AddControl(x+235, y+18*(buttonRows-1), 35, 15, 0x0080, BS_PUSHBUTTON | WS_VISIBLE | WS_CHILD, IDCANCEL-2000);\r
     for(i=0; i<buttons; i++) {\r
-       AddControl(x+70*(i%4)+5, y+18*(i/4), 65, 15, 0x0080, BS_PUSHBUTTON | WS_VISIBLE | WS_CHILD, 2*(nr+i));\r
+       AddControl(x+70*(i%4)+5, y+18*(i/4), 65, 15, 0x0080, BS_PUSHBUTTON | WS_VISIBLE | WS_CHILD | WS_TABSTOP, 2*(nr+i));\r
        layoutList[nr+i] = buttonList[i];\r
     }\r
-    template.title[8] = cps == &first ? '1' :  '2';\r
+    AddControl(x+225, y+18*(buttonRows-1), 30, 15, 0x0080, BS_PUSHBUTTON | WS_VISIBLE | WS_CHILD | WS_TABSTOP, IDOK-2000);\r
+    AddControl(x+260, y+18*(buttonRows-1), 40, 15, 0x0080, BS_PUSHBUTTON | WS_VISIBLE | WS_CHILD | WS_TABSTOP, IDCANCEL-2000);\r
+    template.title[8] = optionList == first.option ? '1' :  '2';\r
     template.header.cy = y += 18*buttonRows+2;\r
     template.header.style &= ~WS_VSCROLL;\r
 }\r
 \r
-void \r
+void\r
 EngineOptionsPopup(HWND hwnd, ChessProgramState *cps)\r
 {\r
     FARPROC lpProc = MakeProcInstance( (FARPROC) SettingsProc, hInst );\r
 \r
-    activeCps = cps;\r
-    DesignOptionDialog(cps);\r
-    CreateDialogTemplate(layoutList, layout, cps);\r
+    activeCps = cps; activeList = cps->option;\r
+    snprintf(title, MSG_SIZ, _("%s Engine Settings (%s)"), T_(cps->which), cps->tidy);\r
+    DesignOptionDialog(cps->nrOptions, cps->option);\r
+    CreateDialogTemplate(layoutList, layout, cps->option);\r
 \r
 \r
     DialogBoxIndirect( hInst, &template.header, hwnd, (DLGPROC)lpProc );\r
@@ -547,4 +625,126 @@ EngineOptionsPopup(HWND hwnd, ChessProgramState *cps)
     return;\r
 }\r
 \r
+int InstallOK()\r
+{\r
+    if(isUCCI) isUCI = 2;\r
+    if(engineChoice[0] == engineNr[0][0])  Load(&first, 0); else Load(&second, 1);\r
+    return 1;\r
+}\r
 \r
+Option installOptions[] = {\r
+  {   0,  0,    0, NULL, (void*) &engineLine, (char*) engineMnemonic, engineList, ComboBox, N_("Select engine from list:") },\r
+  {   0,  0,    0, NULL, NULL, NULL, NULL, Label, N_("or specify one below:") },\r
+  {   0,  0,    0, NULL, (void*) &nickName, NULL, NULL, TextBox, N_("Nickname (optional):") },\r
+  {   0,  0,    0, NULL, (void*) &useNick, NULL, NULL, CheckBox, N_("Use nickname in PGN tag") },\r
+  {   0,  0,    3, NULL, (void*) &engineName, NULL, NULL, FileName, N_("Engine (*.exe):") },\r
+  {   0,  0,    0, NULL, (void*) &params, NULL, NULL, TextBox, N_("command-line parameters:") },\r
+  {   0,  0,    0, NULL, (void*) &engineDir, NULL, NULL, PathName, N_("directory:") },\r
+  {  95,  0,    0, NULL, NULL, NULL, NULL, Label, N_("(Directory will be derived from engine path when left empty)") },\r
+  {   0,  0,    0, NULL, (void*) &addToList, NULL, NULL, CheckBox, N_("Add this engine to the list") },\r
+  {   0,  0,    0, NULL, (void*) &hasBook, NULL, NULL, CheckBox, N_("Must not use GUI book") },\r
+  {   0,  0,    0, NULL, (void*) &isUCI, NULL, NULL, CheckBox, N_("UCI") },\r
+  {   0,  0,    0, NULL, (void*) &v1, NULL, NULL, CheckBox, N_("WB protocol v1 (skip waiting for features)") },\r
+  {   0,  0,    0, NULL, (void*) &isUCCI, NULL, NULL, CheckBox, N_("UCCI / USI (uses specified /uxiAdapter)") },\r
+  {   0,  0,    0, NULL, (void*) &storeVariant, NULL, NULL, CheckBox, N_("Force current variant with this engine") },\r
+  {   0,  0,    2, NULL, (void*) &engineChoice, (char*) engineNr, engineNr, ComboBox, N_("Load mentioned engine as") },\r
+  {   0,  1,    0, NULL, (void*) &InstallOK, "", NULL, EndMark , "" }\r
+};\r
+\r
+void\r
+GenericPopup(HWND hwnd, Option *optionList)\r
+{\r
+    FARPROC lpProc = MakeProcInstance( (FARPROC) SettingsProc, hInst );\r
+    int n=0;\r
+\r
+    while(optionList[n].type != EndMark) n++;\r
+    activeCps = NULL; activeList = optionList;\r
+    DesignOptionDialog(n, optionList);\r
+    CreateDialogTemplate(layoutList, layout, optionList);\r
+\r
+    DialogBoxIndirect( hInst, &template.header, hwnd, (DLGPROC)lpProc );\r
+\r
+    FreeProcInstance(lpProc);\r
+\r
+    return;\r
+}\r
+\r
+void LoadEnginePopUp(HWND hwnd)\r
+{\r
+    int n=0;\r
+\r
+    isUCI = isUCCI = storeVariant = v1 = useNick = FALSE; addToList = hasBook = TRUE; // defaults\r
+    if(engineDir)    free(engineDir);    engineDir = strdup("");\r
+    if(params)       free(params);       params = strdup("");\r
+    if(nickName)     free(nickName);     nickName = strdup("");\r
+    if(engineChoice) free(engineChoice); engineChoice = strdup(engineNr[0]);\r
+    if(engineLine)   free(engineLine);   engineLine = strdup("");\r
+    if(engineName)   free(engineName);   engineName = strdup("");\r
+    NamesToList(firstChessProgramNames, engineList, engineMnemonic);\r
+    while(engineList[n]) n++; installOptions[0].max = n;\r
+    snprintf(title, MSG_SIZ, _("Load Engine"));\r
+\r
+    GenericPopup(hwnd, installOptions);\r
+}\r
+\r
+Boolean autoinc, twice, swiss;\r
+char *tfName;\r
+\r
+int MatchOK()\r
+{\r
+    if(autoinc) appData.loadGameIndex = appData.loadPositionIndex = -(twice + 1);\r
+    if(swiss) { appData.defaultMatchGames = 1; appData.tourneyType = -1; }\r
+    if(CreateTourney(tfName)) MatchEvent(2); else return !appData.participants[0];\r
+    return 1;\r
+}\r
+\r
+Option tourneyOptions[] = {\r
+  { 0,  0,          4, NULL, (void*) &tfName, "", NULL, FileName, N_("Tournament file:") },\r
+  { 30, 0,          0, NULL, NULL, NULL, NULL, Label, N_("If you specify an existing file, the rest of this dialog will be ignored.") },\r
+  { 30, 0,          0, NULL, NULL, NULL, NULL, Label, N_("Otherwise, the file will be created, with the settings you specify below:") },\r
+  { 0,  1,          0, NULL, (void*) &engineChoice, (char*) (engineMnemonic+1), (engineMnemonic+1), ComboBox, N_("Select Engine:") },\r
+  { 0xD, 7,         0, NULL, (void*) &appData.participants, "", NULL, TextBox, N_("Tourney participants:") },\r
+  { 0,  0,          0, NULL, (void*) &swiss, "", NULL, CheckBox, N_("Use Swiss pairing engine (cycles = rounds)") },\r
+  { 0,  0,         10, NULL, (void*) &appData.tourneyType, "", NULL, Spin, N_("Tourney type (0=RR, 1=gauntlet):") },\r
+  { 0,  0,          0, NULL, (void*) &appData.cycleSync, "", NULL, CheckBox, N_("Sync after cycle") },\r
+  { 0,  1, 1000000000, NULL, (void*) &appData.tourneyCycles, "", NULL, Spin, N_("Number of tourney cycles:") },\r
+  { 0,  0,          0, NULL, (void*) &appData.roundSync, "", NULL, CheckBox, N_("Sync after round") },\r
+  { 0,  1, 1000000000, NULL, (void*) &appData.defaultMatchGames, "", NULL, Spin, N_("Games per Match / Pairing:") },\r
+  { 0,  0,          1, NULL, (void*) &appData.saveGameFile, "", NULL, FileName, N_("File for saving tourney games:") },\r
+  { 0,  0,          1, NULL, (void*) &appData.loadGameFile, "", NULL, FileName, N_("Game File with Opening Lines:") },\r
+  { 0, -2, 1000000000, NULL, (void*) &appData.loadGameIndex, "", NULL, Spin, N_("Game Number:") },\r
+  { 0,  0,          2, NULL, (void*) &appData.loadPositionFile, "", NULL, FileName, N_("File with Start Positions:") },\r
+  { 0, -2, 1000000000, NULL, (void*) &appData.loadPositionIndex, "", NULL, Spin, N_("Position Number:") },\r
+  { 0,  0,          0, NULL, (void*) &autoinc, "", NULL, CheckBox, N_("Step through lines/positions in file") },\r
+  { 0,  0, 1000000000, NULL, (void*) &appData.rewindIndex, "", NULL, Spin, N_("Rewind after (0 = never):") },\r
+  { 0,  0,          0, NULL, (void*) &twice, "", NULL, CheckBox, N_("Use each line/position twice") },\r
+  { 0,  0, 1000000000, NULL, (void*) &appData.matchPause, "", NULL, Spin, N_("Pause between Games (ms):") },\r
+  { 0, 0, 0, NULL, (void*) &MatchOK, "", NULL, EndMark , "" }\r
+};\r
+\r
+int AddToTourney(HWND hDlg)\r
+{\r
+    char buf[MSG_SIZ];\r
+//    GetDlgItemText( hDlg, 2001+2*7, buf, MSG_SIZ-3 ); // this gives the previous selection !!!\r
+//    strncat(buf, "\r\n", MSG_SIZ);\r
+    int i = ComboBox_GetCurSel(GetDlgItem(hDlg, 2001+2*7));\r
+    snprintf(buf, MSG_SIZ, "%s\r\n", engineMnemonic[i+1]);\r
+    SendMessage( GetDlgItem(hDlg, 2001+2*9), EM_SETSEL, 99999, 99999 );\r
+    SendMessage( GetDlgItem(hDlg, 2001+2*9), EM_REPLACESEL, (WPARAM) FALSE, (LPARAM) buf );\r
+    return 0;\r
+}\r
+\r
+void TourneyPopup(HWND hwnd)\r
+{\r
+    int n=0;\r
+\r
+    NamesToList(firstChessProgramNames, engineList, engineMnemonic);\r
+    comboCallback = &AddToTourney;\r
+    autoinc = appData.loadGameIndex < 0 || appData.loadPositionIndex < 0;\r
+    twice = TRUE; swiss = appData.tourneyType < 0;\r
+    while(engineList[n]) n++; tourneyOptions[3].max = n-1;\r
+    snprintf(title, MSG_SIZ, _("Tournament and Match Options"));\r
+    ASSIGN(tfName, appData.tourneyFile[0] ? appData.tourneyFile : MakeName(appData.defName));\r
+\r
+    GenericPopup(hwnd, tourneyOptions);\r
+}\r