Print progress during load / selection of game
[xboard.git] / winboard / wengineoutput.c
index cac4744..f2c0e56 100644 (file)
-/*
- * Engine output (PV)
- *
- * Author: Alessandro Scotti (Dec 2005)
- *
- * ------------------------------------------------------------------------
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- * ------------------------------------------------------------------------
- */
-#include "config.h"
-
-#include <windows.h> /* required for all Windows applications */
-#include <richedit.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <malloc.h>
-#include <commdlg.h>
-#include <dlgs.h>
-
-#include "common.h"
-#include "winboard.h"
-#include "frontend.h"
-#include "backend.h"
-
-#include "wsnap.h"
-
-VOID EngineOutputPopUp();
-VOID EngineOutputPopDown();
-BOOL EngineOutputIsUp();
-
-#define SHOW_PONDERING
-
-/* Imports from backend.c */
-char * SavePart(char *str);
-
-/* Imports from winboard.c */
-extern HWND engineOutputDialog;
-extern BOOLEAN engineOutputDialogUp;
-
-extern HINSTANCE hInst;
-extern HWND hwndMain;
-
-extern WindowPlacement wpEngineOutput;
-
-/* Module variables */
-#define H_MARGIN            2
-#define V_MARGIN            2
-#define LABEL_V_DISTANCE    1   /* Distance between label and memo */
-#define SPLITTER_SIZE       4   /* Distance between first memo and second label */
-
-#define ICON_SIZE           14
-
-#define STATE_UNKNOWN   -1
-#define STATE_THINKING   0
-#define STATE_IDLE       1
-#define STATE_PONDERING  2
-
-static int  windowMode = 1;
-
-static BOOL needInit = TRUE;
-
-static HICON hiColorBlack = NULL;
-static HICON hiColorWhite = NULL;
-static HICON hiColorUnknown = NULL;
-static HICON hiClear = NULL;
-static HICON hiPondering = NULL;
-static HICON hiThinking = NULL;
-
-static int  lastDepth[2] = { -1, -1 };
-static int  lastForwardMostMove[2] = { -1, -1 };
-static int  engineState[2] = { -1, -1 };
-
-typedef struct {
-    int which;
-    HWND hColorIcon;
-    HWND hLabel;
-    HWND hStateIcon;
-    HWND hStateData;
-    HWND hLabelNPS;
-    HWND hMemo;
-    char * name;
-    int depth;
-    unsigned long nodes;
-    int score;
-    int time;
-    char * pv;
-    char * hint;
-} EngineOutputData;
-
-static HICON LoadIconEx( int id )
-{
-    return LoadImage( hInst, MAKEINTRESOURCE(id), IMAGE_ICON, ICON_SIZE, ICON_SIZE, 0 );
-}
-
-static VOID InitializeEngineOutput()
-{
-    if( needInit ) {
-        hiColorBlack = LoadIconEx( IDI_BLACK_14 );
-        hiColorWhite = LoadIconEx( IDI_WHITE_14 );
-        hiColorUnknown = LoadIconEx( IDI_UNKNOWN_14 );
-        hiClear = LoadIconEx( IDI_TRANS_14 );
-        hiPondering = LoadIconEx( IDI_PONDER_14 );
-        hiThinking = LoadIconEx( IDI_CLOCK_14 );
-        needInit = FALSE;
-    }
-}
-
-static VOID SetControlPos( HWND hDlg, int id, int x, int y, int width, int height )
-{
-    HWND hControl = GetDlgItem( hDlg, id );
-
-    SetWindowPos( hControl, HWND_TOP, x, y, width, height, SWP_NOZORDER );
-}
-
-#define HIDDEN_X    20000
-#define HIDDEN_Y    20000
-
-static VOID HideControl( HWND hDlg, int id )
-{
-    HWND hControl = GetDlgItem( hDlg, id );
-    RECT rc;
-
-    GetWindowRect( hControl, &rc );
-
-    /*
-        Avoid hiding an already hidden control, because that causes many
-        unnecessary WM_ERASEBKGND messages!
-    */
-    if( rc.left != HIDDEN_X || rc.top != HIDDEN_Y ) {
-    SetControlPos( hDlg, id, 20000, 20000, 100, 100 );
-    }
-}
-
-static int GetControlWidth( HWND hDlg, int id )
-{
-    RECT rc;
-
-    GetWindowRect( GetDlgItem( hDlg, id ), &rc );
-
-    return rc.right - rc.left;
-}
-
-static int GetControlHeight( HWND hDlg, int id )
-{
-    RECT rc;
-
-    GetWindowRect( GetDlgItem( hDlg, id ), &rc );
-
-    return rc.bottom - rc.top;
-}
-
-static int GetHeaderHeight()
-{
-    int result = GetControlHeight( engineOutputDialog, IDC_EngineLabel1 );
-
-    if( result < ICON_SIZE ) result = ICON_SIZE;
-
-    return result;
-}
-
-#define ENGINE_COLOR_WHITE      'w'
-#define ENGINE_COLOR_BLACK      'b'
-#define ENGINE_COLOR_UNKNOWN    ' '
-
-char GetEngineColor( int which )
-{
-    char result = ENGINE_COLOR_UNKNOWN;
-
-    if( which == 0 || which == 1 ) {
-        ChessProgramState * cps;
-
-        switch (gameMode) {
-        case MachinePlaysBlack:
-        case IcsPlayingBlack:
-            result = ENGINE_COLOR_BLACK;
-            break;
-        case MachinePlaysWhite:
-        case IcsPlayingWhite:
-            result = ENGINE_COLOR_WHITE;
-            break;
-        case AnalyzeMode:
-        case AnalyzeFile:
-            result = WhiteOnMove(forwardMostMove) ? ENGINE_COLOR_WHITE : ENGINE_COLOR_BLACK;
-            break;
-        case TwoMachinesPlay:
-            cps = (which == 0) ? &first : &second;
-            result = cps->twoMachinesColor[0];
-            result = result == 'w' ? ENGINE_COLOR_WHITE : ENGINE_COLOR_BLACK;
-            break;
-        }
-    }
-
-    return result;
-}
-
-char GetActiveEngineColor()
-{
-    char result = ENGINE_COLOR_UNKNOWN;
-
-    if( gameMode == TwoMachinesPlay ) {
-        result = WhiteOnMove(forwardMostMove) ? ENGINE_COLOR_WHITE : ENGINE_COLOR_BLACK;
-    }
-
-    return result;
-}
-
-static VOID PositionControlSet( HWND hDlg, int x, int y, int clientWidth, int memoHeight, int idColor, int idEngineLabel, int idNPS, int idMemo, int idStateIcon, int idStateData )
-{
-    int label_x = x + ICON_SIZE + H_MARGIN;
-    int label_h = GetControlHeight( hDlg, IDC_EngineLabel1 );
-    int label_y = y + ICON_SIZE - label_h;
-    int nps_w = GetControlWidth( hDlg, IDC_Engine1_NPS );
-    int nps_x = clientWidth - H_MARGIN - nps_w;
-    int state_data_w = GetControlWidth( hDlg, IDC_StateData1 );
-    int state_data_x = nps_x - H_MARGIN - state_data_w;
-    int state_icon_x = state_data_x - ICON_SIZE - 2;
-    int max_w = clientWidth - 2*H_MARGIN;
-    int memo_y = y + ICON_SIZE + LABEL_V_DISTANCE;
-
-    SetControlPos( hDlg, idColor, x, y, ICON_SIZE, ICON_SIZE );
-    SetControlPos( hDlg, idEngineLabel, label_x, label_y, max_w / 2, label_h );
-    SetControlPos( hDlg, idStateIcon, state_icon_x, y, ICON_SIZE, ICON_SIZE );
-    SetControlPos( hDlg, idStateData, state_data_x, label_y, state_data_w, label_h );
-    SetControlPos( hDlg, idNPS, nps_x, label_y, nps_w, label_h );
-    SetControlPos( hDlg, idMemo, x, memo_y, max_w, memoHeight );
-}
-
-static VOID ResizeWindowControls( HWND hDlg, int mode )
-{
-    RECT rc;
-    int headerHeight = GetHeaderHeight();
-    int labelHeight = GetControlHeight( hDlg, IDC_EngineLabel1 );
-    int labelOffset = H_MARGIN + ICON_SIZE + H_MARGIN;
-    int labelDeltaY = ICON_SIZE - labelHeight;
-    int clientWidth;
-    int clientHeight;
-    int maxControlWidth;
-    int npsWidth;
-
-    /* Initialize variables */
-    GetClientRect( hDlg, &rc );
-
-    clientWidth = rc.right - rc.left;
-    clientHeight = rc.bottom - rc.top;
-
-    maxControlWidth = clientWidth - 2*H_MARGIN;
-
-    npsWidth = GetControlWidth( hDlg, IDC_Engine1_NPS );
-
-    /* Resize controls */
-    if( mode == 0 ) {
-        /* One engine */
-        PositionControlSet( hDlg, H_MARGIN, V_MARGIN,
-            clientWidth,
-            clientHeight - V_MARGIN - LABEL_V_DISTANCE - headerHeight- V_MARGIN,
-            IDC_Color1, IDC_EngineLabel1, IDC_Engine1_NPS, IDC_EngineMemo1, IDC_StateIcon1, IDC_StateData1 );
-
-        /* Hide controls for the second engine */
-        HideControl( hDlg, IDC_Color2 );
-        HideControl( hDlg, IDC_EngineLabel2 );
-        HideControl( hDlg, IDC_StateIcon2 );
-        HideControl( hDlg, IDC_StateData2 );
-        HideControl( hDlg, IDC_Engine2_NPS );
-        HideControl( hDlg, IDC_EngineMemo2 );
-        SendDlgItemMessage( hDlg, IDC_EngineMemo2, WM_SETTEXT, 0, (LPARAM) "" );
-        /* TODO: we should also hide/disable them!!! what about tab stops?!?! */
-    }
-    else {
-        /* Two engines */
-        int memo_h = (clientHeight - headerHeight*2 - V_MARGIN*2 - LABEL_V_DISTANCE*2 - SPLITTER_SIZE) / 2;
-        int header1_y = V_MARGIN;
-        int header2_y = V_MARGIN + headerHeight + LABEL_V_DISTANCE + memo_h + SPLITTER_SIZE;
-
-        PositionControlSet( hDlg, H_MARGIN, header1_y, clientWidth, memo_h,
-            IDC_Color1, IDC_EngineLabel1, IDC_Engine1_NPS, IDC_EngineMemo1, IDC_StateIcon1, IDC_StateData1 );
-
-        PositionControlSet( hDlg, H_MARGIN, header2_y, clientWidth, memo_h,
-            IDC_Color2, IDC_EngineLabel2, IDC_Engine2_NPS, IDC_EngineMemo2, IDC_StateIcon2, IDC_StateData2 );
-    }
-
-    InvalidateRect( GetDlgItem(hDlg,IDC_EngineMemo1), NULL, FALSE );
-    InvalidateRect( GetDlgItem(hDlg,IDC_EngineMemo2), NULL, FALSE );
-}
-
-static VOID SetDisplayMode( int mode )
-{
-    if( windowMode != mode ) {
-        windowMode = mode;
-
-        ResizeWindowControls( engineOutputDialog, mode );
-    }
-}
-
-static VOID VerifyDisplayMode()
-{
-    int mode;
-
-    /* Get proper mode for current game */
-    switch( gameMode ) {
-    case AnalyzeMode:
-    case AnalyzeFile:
-    case MachinePlaysWhite:
-    case MachinePlaysBlack:
-    case IcsPlayingWhite:
-    case IcsPlayingBlack:
-        mode = 0;
-        break;
-    case TwoMachinesPlay:
-        mode = 1;
-        break;
-    default:
-        /* Do not change */
-        return;
-    }
-
-    SetDisplayMode( mode );
-}
-
-static VOID InsertIntoMemo( HWND hMemo, char * text )
-{
-    SendMessage( hMemo, EM_SETSEL, 0, 0 );
-
-    SendMessage( hMemo, EM_REPLACESEL, (WPARAM) FALSE, (LPARAM) text );
-}
-
-static VOID SetIcon( HWND hControl, HICON hIcon )
-{
-    if( hIcon != NULL ) {
-        SendMessage( hControl, STM_SETICON, (WPARAM) hIcon, 0 );
-    }
-}
-
-static VOID SetEngineColorIcon( HWND hControl, int which )
-{
-    char color = GetEngineColor(which);
-    HICON hicon = NULL;
-
-    if( color == ENGINE_COLOR_BLACK )
-        hicon = hiColorBlack;
-    else if( color == ENGINE_COLOR_WHITE )
-        hicon = hiColorWhite;
-    else
-        hicon = hiColorUnknown;
-
-    SetIcon( hControl, hicon );
-}
-
-static SetEngineState( int which, int state, char * state_data )
-{
-    int x_which = 1 - which;
-    HWND hStateIcon = GetDlgItem( engineOutputDialog, which == 0 ? IDC_StateIcon1 : IDC_StateIcon2 );
-    HWND hStateData = GetDlgItem( engineOutputDialog, which == 0 ? IDC_StateData1 : IDC_StateData2 );
-
-    if( engineState[ which ] != state ) {
-        engineState[ which ] = state;
-
-        switch( state ) {
-        case STATE_THINKING:
-            SetIcon( hStateIcon, hiThinking );
-            if( engineState[ x_which ] == STATE_THINKING ) {
-                SetEngineState( x_which, STATE_IDLE, "" );
-            }
-            break;
-        case STATE_PONDERING:
-            SetIcon( hStateIcon, hiPondering );
-            break;
-        default:
-            SetIcon( hStateIcon, hiClear );
-            break;
-        }
-    }
-
-    if( state_data != 0 ) {
-        SetWindowText( hStateData, state_data );
-    }
-}
-
-#define MAX_NAME_LENGTH 32
-
-static VOID UpdateControls( EngineOutputData * ed )
-{
-    char s_label[MAX_NAME_LENGTH + 32];
-
-    char * name = ed->name;
-
-    /* Label */
-    if( name == 0 || *name == '\0' ) {
-        name = "?";
-    }
-
-    strncpy( s_label, name, MAX_NAME_LENGTH );
-    s_label[ MAX_NAME_LENGTH-1 ] = '\0';
-
-#ifdef SHOW_PONDERING
-    if( GetActiveEngineColor() != ENGINE_COLOR_UNKNOWN ) {
-        if( GetEngineColor(ed->which) != GetActiveEngineColor() ) {
-            char buf[8];
-
-            buf[0] = '\0';
-
-            if( ed->hint != 0 && *ed->hint != '\0' ) {
-                strncpy( buf, ed->hint, sizeof(buf) );
-                buf[sizeof(buf)-1] = '\0';
-            }
-            else if( ed->pv != 0 && *ed->pv != '\0' ) {
-                char * sep = strchr( ed->pv, ' ' );
-                int buflen = sizeof(buf);
-
-                if( sep != NULL ) {
-                    buflen = sep - ed->pv + 1;
-                    if( buflen > sizeof(buf) ) buflen = sizeof(buf);
-                }
-
-                strncpy( buf, ed->pv, buflen );
-                buf[ buflen-1 ] = '\0';
-            }
-
-            SetEngineState( ed->which, STATE_PONDERING, buf );
-        }
-        else {
-            SetEngineState( ed->which, STATE_THINKING, "" );
-        }
-    }
-    else {
-        SetEngineState( ed->which, STATE_IDLE, "" );
-    }
-#endif
-
-    SetWindowText( ed->hLabel, s_label );
-
-    s_label[0] = '\0';
-
-    if( ed->time > 0 && ed->nodes > 0 ) {
-        unsigned long nps_100 = ed->nodes / ed->time;
-
-        if( nps_100 < 100000 ) {
-            sprintf( s_label, "NPS: %lu", nps_100 * 100 );
-        }
-        else {
-            sprintf( s_label, "NPS: %.1fk", nps_100 / 10.0 );
-        }
-    }
-
-    SetWindowText( ed->hLabelNPS, s_label );
-
-    /* Memo */
-    if( ed->pv != 0 && *ed->pv != '\0' ) {
-        char s_nodes[24];
-        char s_score[16];
-        char s_time[24];
-        char buf[256];
-        int buflen;
-        int time_secs = ed->time / 100;
-        int time_cent = ed->time % 100;
-
-        /* Nodes */
-        if( ed->nodes < 1000000 ) {
-            sprintf( s_nodes, "%lu", ed->nodes );
-        }
-        else {
-            sprintf( s_nodes, "%.1fM", ed->nodes / 1000000.0 );
-        }
-
-        /* Score */
-        if( ed->score > 0 ) {
-            sprintf( s_score, "+%.2f", ed->score / 100.0 );
-        }
-        else {
-            sprintf( s_score, "%.2f", ed->score / 100.0 );
-        }
-
-        /* Time */
-        sprintf( s_time, "%d:%02d.%02d", time_secs / 60, time_secs % 60, time_cent );
-
-        /* Put all together... */
-        sprintf( buf, "%3d\t%s\t%s\t%s\t", ed->depth, s_score, s_nodes, s_time );
-
-        /* Add PV */
-        buflen = strlen(buf);
-
-        strncpy( buf + buflen, ed->pv, sizeof(buf) - buflen );
-
-        buf[ sizeof(buf) - 3 ] = '\0';
-
-        strcat( buf + buflen, "\r\n" );
-
-        /* Update memo */
-        InsertIntoMemo( ed->hMemo, buf );
-    }
-
-    /* Colors */
-    SetEngineColorIcon( ed->hColorIcon, ed->which );
-}
-
-LRESULT CALLBACK EngineOutputProc( HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam )
-{
-    static SnapData sd;
-
-    switch (message) {
-    case WM_INITDIALOG:
-        if( engineOutputDialog == NULL ) {
-            engineOutputDialog = hDlg;
-
-            RestoreWindowPlacement( hDlg, &wpEngineOutput ); /* Restore window placement */
-
-            ResizeWindowControls( hDlg, windowMode );
-
-            SetEngineState( 0, STATE_IDLE, "" );
-            SetEngineState( 1, STATE_IDLE, "" );
-        }
-
-        return FALSE;
-
-    case WM_COMMAND:
-        switch (LOWORD(wParam)) {
-        case IDOK:
-          EndDialog(hDlg, TRUE);
-          return TRUE;
-
-        case IDCANCEL:
-          EndDialog(hDlg, FALSE);
-          return TRUE;
-
-        default:
-          break;
-        }
-
-        break;
-
-    case WM_GETMINMAXINFO:
-        {
-            MINMAXINFO * mmi = (MINMAXINFO *) lParam;
-
-            mmi->ptMinTrackSize.x = 100;
-            mmi->ptMinTrackSize.y = 160;
-        }
-        break;
-
-    case WM_CLOSE:
-        EngineOutputPopDown();
-        break;
-
-    case WM_SIZE:
-        ResizeWindowControls( hDlg, windowMode );
-        break;
-
-    case WM_ENTERSIZEMOVE:
-        return OnEnterSizeMove( &sd, hDlg, wParam, lParam );
-
-    case WM_SIZING:
-        return OnSizing( &sd, hDlg, wParam, lParam );
-
-    case WM_MOVING:
-        return OnMoving( &sd, hDlg, wParam, lParam );
-
-    case WM_EXITSIZEMOVE:
-        return OnExitSizeMove( &sd, hDlg, wParam, lParam );
-    }
-
-    return FALSE;
-}
-
-VOID EngineOutputPopUp()
-{
-  FARPROC lpProc;
-
-  if( needInit ) {
-      InitializeEngineOutput();
-  }
-
-  CheckMenuItem(GetMenu(hwndMain), IDM_ShowEngineOutput, MF_CHECKED);
-
-  if( engineOutputDialog ) {
-    SendMessage( engineOutputDialog, WM_INITDIALOG, 0, 0 );
-
-    if( ! engineOutputDialogUp ) {
-        ShowWindow(engineOutputDialog, SW_SHOW);
-    }
-  }
-  else {
-    lpProc = MakeProcInstance( (FARPROC) EngineOutputProc, hInst );
-
-    /* Note to self: dialog must have the WS_VISIBLE style set, otherwise it's not shown! */
-    CreateDialog( hInst, MAKEINTRESOURCE(DLG_EngineOutput), hwndMain, (DLGPROC)lpProc );
-
-    FreeProcInstance(lpProc);
-  }
-
-  engineOutputDialogUp = TRUE;
-}
-
-VOID EngineOutputPopDown()
-{
-  CheckMenuItem(GetMenu(hwndMain), IDM_ShowEngineOutput, MF_UNCHECKED);
-
-  if( engineOutputDialog ) {
-      ShowWindow(engineOutputDialog, SW_HIDE);
-  }
-
-  engineOutputDialogUp = FALSE;
-}
-
-BOOL EngineOutputIsUp()
-{
-    return engineOutputDialogUp;
-}
-
-VOID EngineOutputUpdate( int which, int depth, unsigned long nodes, int score, int time, char * pv, char * hint )
-{
-    EngineOutputData ed;
-    BOOL clearMemo = FALSE;
-
-    if( which < 0 || which > 1 || depth < 0 || time < 0 || pv == 0 || *pv == '\0' ) {
-        return;
-    }
-
-    if( engineOutputDialog == NULL ) {
-        return;
-    }
-
-    VerifyDisplayMode();
-
-    ed.which = which;
-    ed.depth = depth;
-    ed.nodes = nodes;
-    ed.score = score;
-    ed.time = time;
-    ed.pv = pv;
-    ed.hint = hint;
-
-    /* Get target control */
-    if( which == 0 ) {
-        ed.hColorIcon = GetDlgItem( engineOutputDialog, IDC_Color1 );
-        ed.hLabel = GetDlgItem( engineOutputDialog, IDC_EngineLabel1 );
-        ed.hStateIcon = GetDlgItem( engineOutputDialog, IDC_StateIcon1 );
-        ed.hStateData = GetDlgItem( engineOutputDialog, IDC_StateData1 );
-        ed.hLabelNPS = GetDlgItem( engineOutputDialog, IDC_Engine1_NPS );
-        ed.hMemo  = GetDlgItem( engineOutputDialog, IDC_EngineMemo1 );
-        ed.name = first.tidy;
-    }
-    else {
-        ed.hColorIcon = GetDlgItem( engineOutputDialog, IDC_Color2 );
-        ed.hLabel = GetDlgItem( engineOutputDialog, IDC_EngineLabel2 );
-        ed.hStateIcon = GetDlgItem( engineOutputDialog, IDC_StateIcon2 );
-        ed.hStateData = GetDlgItem( engineOutputDialog, IDC_StateData2 );
-        ed.hLabelNPS = GetDlgItem( engineOutputDialog, IDC_Engine2_NPS );
-        ed.hMemo  = GetDlgItem( engineOutputDialog, IDC_EngineMemo2 );
-        ed.name = second.tidy;
-    }
-
-    /* Clear memo if needed */
-    if( lastDepth[which] > depth || (lastDepth[which] == depth && depth <= 1) ) {
-        clearMemo = TRUE;
-    }
-
-    if( lastForwardMostMove[which] != forwardMostMove ) {
-        clearMemo = TRUE;
-    }
-
-    if( clearMemo ) {
-        SendMessage( ed.hMemo, WM_SETTEXT, 0, (LPARAM) "" );
-    }
-
-    /* Update */
-    lastDepth[which] = depth;
-    lastForwardMostMove[which] = forwardMostMove;
-
-    if( pv[0] == ' ' ) {
-        if( strncmp( pv, " no PV", 6 ) == 0 ) { /* Hack on hack! :-O */
-            ed.pv = "";
-        }
-    }
-
-    UpdateControls( &ed );
-}
+/*\r
+ * wengineoutput.c - split-off front-end of Engine output (PV) by HGM\r
+ *\r
+ * Author: Alessandro Scotti (Dec 2005)\r
+ *\r
+ * Copyright 2005 Alessandro Scotti\r
+ *\r
+ * ------------------------------------------------------------------------\r
+ *\r
+ * GNU XBoard is free software: you can redistribute it and/or modify\r
+ * it under the terms of the GNU General Public License as published by\r
+ * the Free Software Foundation, either version 3 of the License, or (at\r
+ * your option) any later version.\r
+ *\r
+ * GNU XBoard is distributed in the hope that it will be useful, but\r
+ * WITHOUT ANY WARRANTY; without even the implied warranty of\r
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU\r
+ * General Public License for more details.\r
+ *\r
+ * You should have received a copy of the GNU General Public License\r
+ * along with this program. If not, see http://www.gnu.org/licenses/.  *\r
+ *\r
+ *------------------------------------------------------------------------\r
+ ** See the file ChangeLog for a revision history.  */\r
+\r
+#include "config.h"\r
+\r
+#include <windows.h> /* required for all Windows applications */\r
+#include <richedit.h>\r
+#include <stdio.h>\r
+#include <stdlib.h>\r
+#include <malloc.h>\r
+#include <commdlg.h>\r
+#include <dlgs.h>\r
+\r
+#include "common.h"\r
+#include "frontend.h"\r
+#include "backend.h"\r
+#include "winboard.h"\r
+\r
+#include "wsnap.h"\r
+#include "engineoutput.h"\r
+\r
+/* Module variables */\r
+int  windowMode = 1;\r
+static BOOLEAN engineOutputDialogUp = FALSE;\r
+HICON icons[8]; // [HGM] this front-end array translates back-end icon indicator to handle\r
+HWND outputField[2][7]; // [HGM] front-end array to translate output field to window handle\r
+\r
+// front end\r
+static HICON LoadIconEx( int id )\r
+{\r
+    return LoadImage( hInst, MAKEINTRESOURCE(id), IMAGE_ICON, ICON_SIZE, ICON_SIZE, 0 );\r
+}\r
+\r
+// [HGM] the platform-dependent way of indicating where output should go is now all\r
+// concentrated here, where a table of platform-dependent handles are initialized.\r
+// This cleanses most other routines of front-end stuff, so they can go into the back end.\r
+static void InitializeEngineOutput()\r
+{\r
+       // [HGM] made this into a table, rather than separate global variables\r
+        icons[nColorBlack]   = LoadIconEx( IDI_BLACK_14 );\r
+        icons[nColorWhite]   = LoadIconEx( IDI_WHITE_14 );\r
+        icons[nColorUnknown] = LoadIconEx( IDI_UNKNOWN_14 );\r
+        icons[nClear]        = LoadIconEx( IDI_TRANS_14 );\r
+        icons[nPondering]    = LoadIconEx( IDI_PONDER_14 );\r
+        icons[nThinking]     = LoadIconEx( IDI_CLOCK_14 );\r
+        icons[nAnalyzing]    = LoadIconEx( IDI_ANALYZE2_14 );\r
+\r
+       // [HGM] also make a table of handles to output controls\r
+       // Note that engineOutputDialog must be defined first!\r
+        outputField[0][nColorIcon] = GetDlgItem( engineOutputDialog, IDC_Color1 );\r
+        outputField[0][nLabel]     = GetDlgItem( engineOutputDialog, IDC_EngineLabel1 );\r
+        outputField[0][nStateIcon] = GetDlgItem( engineOutputDialog, IDC_StateIcon1 );\r
+        outputField[0][nStateData] = GetDlgItem( engineOutputDialog, IDC_StateData1 );\r
+        outputField[0][nLabelNPS]  = GetDlgItem( engineOutputDialog, IDC_Engine1_NPS );\r
+        outputField[0][nMemo]      = GetDlgItem( engineOutputDialog, IDC_EngineMemo1 );\r
+\r
+        outputField[1][nColorIcon] = GetDlgItem( engineOutputDialog, IDC_Color2 );\r
+        outputField[1][nLabel]     = GetDlgItem( engineOutputDialog, IDC_EngineLabel2 );\r
+        outputField[1][nStateIcon] = GetDlgItem( engineOutputDialog, IDC_StateIcon2 );\r
+        outputField[1][nStateData] = GetDlgItem( engineOutputDialog, IDC_StateData2 );\r
+        outputField[1][nLabelNPS]  = GetDlgItem( engineOutputDialog, IDC_Engine2_NPS );\r
+        outputField[1][nMemo]      = GetDlgItem( engineOutputDialog, IDC_EngineMemo2 );\r
+}\r
+\r
+// front end\r
+static void SetControlPos( HWND hDlg, int id, int x, int y, int width, int height )\r
+{\r
+    HWND hControl = GetDlgItem( hDlg, id );\r
+\r
+    SetWindowPos( hControl, HWND_TOP, x, y, width, height, SWP_NOZORDER );\r
+}\r
+\r
+#define HIDDEN_X    20000\r
+#define HIDDEN_Y    20000\r
+\r
+// front end\r
+static void HideControl( HWND hDlg, int id )\r
+{\r
+    HWND hControl = GetDlgItem( hDlg, id );\r
+    RECT rc;\r
+\r
+    GetWindowRect( hControl, &rc );\r
+\r
+    /* \r
+        Avoid hiding an already hidden control, because that causes many\r
+        unnecessary WM_ERASEBKGND messages!\r
+    */\r
+    if( rc.left != HIDDEN_X || rc.top != HIDDEN_Y ) {\r
+        SetControlPos( hDlg, id, 20000, 20000, 100, 100 );\r
+    }\r
+}\r
+\r
+// front end, although we might make GetWindowRect front end instead\r
+static int GetControlWidth( HWND hDlg, int id )\r
+{\r
+    RECT rc;\r
+\r
+    GetWindowRect( GetDlgItem( hDlg, id ), &rc );\r
+\r
+    return rc.right - rc.left;\r
+}\r
+\r
+// front end?\r
+static int GetControlHeight( HWND hDlg, int id )\r
+{\r
+    RECT rc;\r
+\r
+    GetWindowRect( GetDlgItem( hDlg, id ), &rc );\r
+\r
+    return rc.bottom - rc.top;\r
+}\r
+\r
+static int GetHeaderHeight()\r
+{\r
+    int result = GetControlHeight( engineOutputDialog, IDC_EngineLabel1 );\r
+\r
+    if( result < ICON_SIZE ) result = ICON_SIZE;\r
+\r
+    return result;\r
+}\r
+\r
+// The size calculations should be backend? If setControlPos is a platform-dependent way of doing things,\r
+// a platform-independent wrapper for it should be supplied.\r
+static void PositionControlSet( HWND hDlg, int x, int y, int clientWidth, int memoHeight, int idColor, int idEngineLabel, int idNPS, int idMemo, int idStateIcon, int idStateData )\r
+{\r
+    int label_x = x + ICON_SIZE + H_MARGIN;\r
+    int label_h = GetControlHeight( hDlg, IDC_EngineLabel1 );\r
+    int label_y = y + ICON_SIZE - label_h;\r
+    int nps_w = GetControlWidth( hDlg, IDC_Engine1_NPS );\r
+    int nps_x = clientWidth - H_MARGIN - nps_w;\r
+    int state_data_w = GetControlWidth( hDlg, IDC_StateData1 );\r
+    int state_data_x = nps_x - H_MARGIN - state_data_w;\r
+    int state_icon_x = state_data_x - ICON_SIZE - 2;\r
+    int max_w = clientWidth - 2*H_MARGIN;\r
+    int memo_y = y + ICON_SIZE + LABEL_V_DISTANCE;\r
+\r
+    SetControlPos( hDlg, idColor, x, y, ICON_SIZE, ICON_SIZE );\r
+    SetControlPos( hDlg, idEngineLabel, label_x, label_y, state_icon_x - label_x, label_h );\r
+    SetControlPos( hDlg, idStateIcon, state_icon_x, y, ICON_SIZE, ICON_SIZE );\r
+    SetControlPos( hDlg, idStateData, state_data_x, label_y, state_data_w, label_h );\r
+    SetControlPos( hDlg, idNPS, nps_x, label_y, nps_w, label_h );\r
+    SetControlPos( hDlg, idMemo, x, memo_y, max_w, memoHeight );\r
+}\r
+\r
+// Also here some of the size calculations should go to the back end, and their actual application to a front-end routine\r
+void ResizeWindowControls( int mode )\r
+{\r
+    HWND hDlg = engineOutputDialog; // [HGM] used to be parameter, but routine is called from back-end\r
+    RECT rc;\r
+    int headerHeight = GetHeaderHeight();\r
+//    int labelHeight = GetControlHeight( hDlg, IDC_EngineLabel1 );\r
+//    int labelOffset = H_MARGIN + ICON_SIZE + H_MARGIN;\r
+//    int labelDeltaY = ICON_SIZE - labelHeight;\r
+    int clientWidth;\r
+    int clientHeight;\r
+    int maxControlWidth;\r
+    int npsWidth;\r
+\r
+    /* Initialize variables */\r
+    GetClientRect( hDlg, &rc );\r
+\r
+    clientWidth = rc.right - rc.left;\r
+    clientHeight = rc.bottom - rc.top;\r
+\r
+    maxControlWidth = clientWidth - 2*H_MARGIN;\r
+\r
+    npsWidth = GetControlWidth( hDlg, IDC_Engine1_NPS );\r
+\r
+    /* Resize controls */\r
+    if( mode == 0 ) {\r
+        /* One engine */\r
+        PositionControlSet( hDlg, H_MARGIN, V_MARGIN, \r
+            clientWidth, \r
+            clientHeight - V_MARGIN - LABEL_V_DISTANCE - headerHeight- V_MARGIN,\r
+            IDC_Color1, IDC_EngineLabel1, IDC_Engine1_NPS, IDC_EngineMemo1, IDC_StateIcon1, IDC_StateData1 );\r
+\r
+        /* Hide controls for the second engine */\r
+        HideControl( hDlg, IDC_Color2 );\r
+        HideControl( hDlg, IDC_EngineLabel2 );\r
+        HideControl( hDlg, IDC_StateIcon2 );\r
+        HideControl( hDlg, IDC_StateData2 );\r
+        HideControl( hDlg, IDC_Engine2_NPS );\r
+        HideControl( hDlg, IDC_EngineMemo2 );\r
+        SendDlgItemMessage( hDlg, IDC_EngineMemo2, WM_SETTEXT, 0, (LPARAM) "" );\r
+        /* TODO: we should also hide/disable them!!! what about tab stops?!?! */\r
+    }\r
+    else {\r
+        /* Two engines */\r
+        int memo_h = (clientHeight - headerHeight*2 - V_MARGIN*2 - LABEL_V_DISTANCE*2 - SPLITTER_SIZE) / 2;\r
+        int header1_y = V_MARGIN;\r
+        int header2_y = V_MARGIN + headerHeight + LABEL_V_DISTANCE + memo_h + SPLITTER_SIZE;\r
+\r
+        PositionControlSet( hDlg, H_MARGIN, header1_y, clientWidth, memo_h,\r
+            IDC_Color1, IDC_EngineLabel1, IDC_Engine1_NPS, IDC_EngineMemo1, IDC_StateIcon1, IDC_StateData1 );\r
+\r
+        PositionControlSet( hDlg, H_MARGIN, header2_y, clientWidth, memo_h,\r
+            IDC_Color2, IDC_EngineLabel2, IDC_Engine2_NPS, IDC_EngineMemo2, IDC_StateIcon2, IDC_StateData2 );\r
+    }\r
+\r
+    InvalidateRect( GetDlgItem(hDlg,IDC_EngineMemo1), NULL, FALSE );\r
+    InvalidateRect( GetDlgItem(hDlg,IDC_EngineMemo2), NULL, FALSE );\r
+}\r
+\r
+static int currentPV, highTextStart[2], highTextEnd[2];\r
+extern RECT boardRect;\r
+\r
+VOID\r
+GetMemoLine(HWND hDlg, int x, int y)\r
+{      // [HGM] pv: translate click to PV line, and load it for display\r
+       char buf[10000];\r
+       int index, start, end, memo;\r
+       POINT pt;\r
+\r
+       pt.x = x; pt.y = y;\r
+       memo = currentPV ? IDC_EngineMemo2 : IDC_EngineMemo1;\r
+       index = SendDlgItemMessage( hDlg, memo, EM_CHARFROMPOS, 0, (LPARAM) &pt );\r
+       GetDlgItemText(hDlg, memo, buf, sizeof(buf));\r
+       if(LoadMultiPV(x, y, buf, index, &start, &end)) {\r
+           SetCapture(hDlg);\r
+           SendMessage( outputField[currentPV][nMemo], EM_SETSEL, (WPARAM)start, (LPARAM)end );\r
+           highTextStart[currentPV] = start; highTextEnd[currentPV] = end;\r
+           SetFocus(outputField[currentPV][nMemo]);\r
+       }\r
+}\r
+\r
+// front end. Actual printing of PV lines into the output field\r
+void InsertIntoMemo( int which, char * text, int where )\r
+{\r
+    SendMessage( outputField[which][nMemo], EM_SETSEL, where, where ); // [HGM] multivar: choose insertion point\r
+\r
+    SendMessage( outputField[which][nMemo], EM_REPLACESEL, (WPARAM) FALSE, (LPARAM) text );\r
+    if(where < highTextStart[which]) { // [HGM] multiPVdisplay: move highlighting\r
+       int len = strlen(text);\r
+       highTextStart[which] += len; highTextEnd[which] += len;\r
+       SendMessage( outputField[which][nMemo], EM_SETSEL, highTextStart[which], highTextEnd[which] );\r
+    }\r
+}\r
+\r
+// front end. Associates an icon with an output field ("control" in Windows jargon).\r
+// [HGM] let it find out the output field from the 'which' number by itself\r
+void SetIcon( int which, int field, int nIcon )\r
+{\r
+\r
+    if( nIcon != 0 ) {\r
+        SendMessage( outputField[which][field], STM_SETICON, (WPARAM) icons[nIcon], 0 );\r
+    }\r
+}\r
+\r
+// front end wrapper for SetWindowText, taking control number in stead of handle\r
+void DoSetWindowText(int which, int field, char *s_label)\r
+{\r
+    SetWindowText( outputField[which][field], s_label );\r
+}\r
+\r
+void SetEngineOutputTitle(char *title)\r
+{\r
+    SetWindowText( engineOutputDialog, title );\r
+}\r
+\r
+// This seems pure front end\r
+LRESULT CALLBACK EngineOutputProc( HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam )\r
+{\r
+    static SnapData sd;\r
+\r
+    switch (message) {\r
+    case WM_INITDIALOG:\r
+        if( engineOutputDialog == NULL ) {\r
+            engineOutputDialog = hDlg;\r
+\r
+            Translate(hDlg, DLG_EngineOutput);\r
+            RestoreWindowPlacement( hDlg, &wpEngineOutput ); /* Restore window placement */\r
+\r
+            ResizeWindowControls( windowMode );\r
+\r
+            SendDlgItemMessage( hDlg, IDC_EngineMemo1, EM_SETEVENTMASK, 0, ENM_MOUSEEVENTS );\r
+            SendDlgItemMessage( hDlg, IDC_EngineMemo2, EM_SETEVENTMASK, 0, ENM_MOUSEEVENTS );\r
+\r
+           /* Set font */\r
+           SendDlgItemMessage( engineOutputDialog, IDC_EngineMemo1, WM_SETFONT, (WPARAM)font[boardSize][MOVEHISTORY_FONT]->hf, MAKELPARAM(TRUE, 0 ));\r
+           SendDlgItemMessage( engineOutputDialog, IDC_EngineMemo2, WM_SETFONT, (WPARAM)font[boardSize][MOVEHISTORY_FONT]->hf, MAKELPARAM(TRUE, 0 ));\r
+\r
+            SetEngineState( 0, STATE_IDLE, "" );\r
+            SetEngineState( 1, STATE_IDLE, "" );\r
+        }\r
+\r
+        return FALSE;\r
+\r
+    case WM_COMMAND:\r
+        switch (LOWORD(wParam)) {\r
+        case IDOK:\r
+          EndDialog(hDlg, TRUE);\r
+          return TRUE;\r
+\r
+        case IDCANCEL:\r
+          EndDialog(hDlg, FALSE);\r
+          return TRUE;\r
+\r
+        default:\r
+          break;\r
+        }\r
+\r
+        break;\r
+\r
+    case WM_MOUSEMOVE:\r
+        MovePV(LOWORD(lParam) - boardRect.left, HIWORD(lParam) - boardRect.top, boardRect.bottom - boardRect.top);\r
+        break;\r
+\r
+    case WM_RBUTTONUP:\r
+        ReleaseCapture();\r
+        SendMessage( outputField[currentPV][nMemo], EM_SETSEL, 0, 0 );\r
+        highTextStart[currentPV] = highTextEnd[currentPV] = 0;\r
+        UnLoadPV();\r
+        break;\r
+\r
+    case WM_NOTIFY:\r
+        if( wParam == IDC_EngineMemo1 || wParam == IDC_EngineMemo2 ) {\r
+            MSGFILTER * lpMF = (MSGFILTER *) lParam;\r
+            if( lpMF->msg == WM_RBUTTONDOWN && (lpMF->wParam & (MK_CONTROL)) == 0 ) {\r
+               shiftKey = (lpMF->wParam & MK_SHIFT) != 0; // [HGM] remember last shift status\r
+                currentPV = (wParam == IDC_EngineMemo2);\r
+                GetMemoLine(hDlg, LOWORD(lpMF->lParam), HIWORD(lpMF->lParam));\r
+            }\r
+        }\r
+        break;\r
+\r
+    case WM_GETMINMAXINFO:\r
+        {\r
+            MINMAXINFO * mmi = (MINMAXINFO *) lParam;\r
+        \r
+            mmi->ptMinTrackSize.x = 100;\r
+            mmi->ptMinTrackSize.y = 160;\r
+        }\r
+        break;\r
+\r
+    case WM_CLOSE:\r
+        EngineOutputPopDown();\r
+        break;\r
+\r
+    case WM_SIZE:\r
+        ResizeWindowControls( windowMode );\r
+        break;\r
+\r
+    case WM_ENTERSIZEMOVE:\r
+        return OnEnterSizeMove( &sd, hDlg, wParam, lParam );\r
+\r
+    case WM_SIZING:\r
+        return OnSizing( &sd, hDlg, wParam, lParam );\r
+\r
+    case WM_MOVING:\r
+        return OnMoving( &sd, hDlg, wParam, lParam );\r
+\r
+    case WM_EXITSIZEMOVE:\r
+        return OnExitSizeMove( &sd, hDlg, wParam, lParam );\r
+    }\r
+\r
+    return FALSE;\r
+}\r
+\r
+// front end\r
+void EngineOutputPopUp()\r
+{\r
+  FARPROC lpProc;\r
+  static int  needInit = TRUE;\r
+  \r
+  CheckMenuItem(GetMenu(hwndMain), IDM_ShowEngineOutput, MF_CHECKED);\r
+\r
+  if( engineOutputDialog ) {\r
+    SendMessage( engineOutputDialog, WM_INITDIALOG, 0, 0 );\r
+\r
+    if( ! engineOutputDialogUp ) {\r
+        ShowWindow(engineOutputDialog, SW_SHOW);\r
+    }\r
+  }\r
+  else {\r
+    lpProc = MakeProcInstance( (FARPROC) EngineOutputProc, hInst );\r
+\r
+    /* Note to self: dialog must have the WS_VISIBLE style set, otherwise it's not shown! */\r
+    CreateDialog( hInst, MAKEINTRESOURCE(DLG_EngineOutput), hwndMain, (DLGPROC)lpProc );\r
+\r
+    FreeProcInstance(lpProc);\r
+  }\r
+\r
+  // [HGM] displaced to after creation of dialog, to allow initialization of output fields\r
+  if( needInit ) {\r
+      InitializeEngineOutput();\r
+      needInit = FALSE;\r
+  }\r
+\r
+  engineOutputDialogUp = TRUE;\r
+}\r
+\r
+// front end\r
+void EngineOutputPopDown()\r
+{\r
+  CheckMenuItem(GetMenu(hwndMain), IDM_ShowEngineOutput, MF_UNCHECKED);\r
+\r
+  if( engineOutputDialog ) {\r
+      ShowWindow(engineOutputDialog, SW_HIDE);\r
+  }\r
+\r
+  engineOutputDialogUp = FALSE;\r
+}\r
+\r
+// front end. [HGM] Takes handle of output control from table, so only number is passed\r
+void DoClearMemo(int which)\r
+{\r
+        SendMessage( outputField[which][nMemo], WM_SETTEXT, 0, (LPARAM) "" );\r
+}\r
+\r
+// front end (because only other front-end wants to know)\r
+int EngineOutputIsUp()\r
+{\r
+    return engineOutputDialogUp;\r
+}\r
+\r
+// front end, to give back-end access to engineOutputDialog\r
+int EngineOutputDialogExists()\r
+{\r
+    return engineOutputDialog != NULL;\r
+}\r