Make generic memo-event handler, and connect history callback
[xboard.git] / nhistory.c
1 /*
2  * New (WinBoard-style) Move history for XBoard
3  *
4  * Copyright 2009, 2010, 2011, 2012 Free Software Foundation, Inc.
5  * ------------------------------------------------------------------------
6  *
7  * GNU XBoard is free software: you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation, either version 3 of the License, or (at
10  * your option) any later version.
11  *
12  * GNU XBoard is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15  * General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program. If not, see http://www.gnu.org/licenses/. 
19  *
20  * ------------------------------------------------------------------------
21  ** See the file ChangeLog for a revision history.  */
22
23 #include "config.h"
24
25 #include <stdio.h>
26 #include <stdlib.h>
27
28 #include "common.h"
29 #include "backend.h"
30 #include "xhistory.h"
31 #include "dialogs.h"
32 #include "gettext.h"
33
34 #ifdef ENABLE_NLS
35 # define  _(s) gettext (s)
36 # define N_(s) gettext_noop (s)
37 #else
38 # define  _(s) (s)
39 # define N_(s)  s
40 #endif
41
42 // templates for calls into back-end (= history.c; should be moved to history.h header shared with it!)
43 void RefreshMemoContent P((void));
44 void MemoContentUpdated P((void));
45
46 // variables in xoptions.c
47 extern Option historyOptions[];
48
49 // ------------- low-level front-end actions called by MoveHistory back-end -----------------
50
51 void
52 ClearHistoryMemo ()
53 {
54     SetWidgetText(&historyOptions[0], "", HistoryDlg);
55 }
56
57 // the bold argument says 0 = normal, 1 = bold typeface
58 // the colorNr argument says 0 = font-default, 1 = gray
59 int
60 AppendToHistoryMemo (char * text, int bold, int colorNr)
61 {
62     return AppendText(&historyOptions[0], text); // for now ignore bold & color stuff, as Xaw cannot handle that
63 }
64
65 char *historyText;
66
67 int
68 SelectMove (Option *opt, int n, int x, int y, char *text, int index)
69 {
70         if(n != 3 && n != 1) return FALSE; // only on button-1 and 3 press
71         FindMoveByCharIndex( index ); // [HGM] also does the actual moving to it, now
72         return (n == 3);  // suppress context menu for button 3, but allow selection with button 1
73 }
74
75 Option historyOptions[] = {
76 { 200, T_VSCRL | T_FILL | T_WRAP | T_TOP, 400, NULL, (void*) &historyText, NULL, (char**) &SelectMove, TextBox, "" },
77 {   0,           NO_OK,             0, NULL, (void*) NULL, "", NULL, EndMark , "" }
78 };
79
80 // ------------ standard entry points into MoveHistory code -----------
81
82 Boolean
83 MoveHistoryIsUp ()
84 {
85     return shellUp[HistoryDlg];
86 }
87
88 Boolean
89 MoveHistoryDialogExists ()
90 {
91     return DialogExists(HistoryDlg);
92 }
93
94 void
95 HistoryPopUp ()
96 {
97     if(GenericPopUp(historyOptions, _("Move list"), HistoryDlg, BoardWindow, NONMODAL, 1))
98         AddHandler(&historyOptions[0], 0);
99     MarkMenu("View.MoveHistory", HistoryDlg);
100 }
101
102 void
103 HistoryShowProc ()
104 {
105   if (!shellUp[HistoryDlg]) {
106     ASSIGN(historyText, "");
107     HistoryPopUp();
108     RefreshMemoContent();
109     MemoContentUpdated();
110   } else PopDown(HistoryDlg);
111   ToNrEvent(currentMove);
112 }