Fix promotion in Ai-Wok
[xboard.git] / winboard / wclipbrd.c
1 /*\r
2  * wclipbrd.c -- Clipboard routines for WinBoard\r
3  *\r
4  * Copyright 2000, 2009, 2010, 2011, 2012, 2013 Free Software Foundation, Inc.\r
5  *\r
6  * Enhancements Copyright 2005 Alessandro Scotti\r
7  *\r
8  * ------------------------------------------------------------------------\r
9  *\r
10  * GNU XBoard is free software: you can redistribute it and/or modify\r
11  * it under the terms of the GNU General Public License as published by\r
12  * the Free Software Foundation, either version 3 of the License, or (at\r
13  * your option) any later version.\r
14  *\r
15  * GNU XBoard is distributed in the hope that it will be useful, but\r
16  * WITHOUT ANY WARRANTY; without even the implied warranty of\r
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU\r
18  * General Public License for more details.\r
19  *\r
20  * You should have received a copy of the GNU General Public License\r
21  * along with this program. If not, see http://www.gnu.org/licenses/.  *\r
22  *\r
23  *------------------------------------------------------------------------\r
24  ** See the file ChangeLog for a revision history.  */\r
25 \r
26 #include "config.h"\r
27 \r
28 #include <windows.h>   /* required for all Windows applications */\r
29 #include <stdio.h>\r
30 #include <stdlib.h>\r
31 #include <malloc.h>\r
32 #include <sys/stat.h>\r
33 \r
34 #include "common.h"\r
35 #include "frontend.h"\r
36 #include "backend.h"\r
37 #include "winboard.h"\r
38 #include "wclipbrd.h"\r
39 \r
40 #define _(s) T_(s)\r
41 #define N_(s) s\r
42 \r
43 /* Imports from winboard.c */\r
44 extern HWND hwndMain;\r
45 \r
46 /* File globals */\r
47 static char *copyTemp;\r
48 static char *pasteTemp;\r
49 \r
50 VOID \r
51 CopyFENToClipboard()\r
52 {\r
53   char *fen = NULL;\r
54 \r
55   if(gameMode == EditPosition) EditPositionDone(TRUE); // [HGM] mak sure castling rights are set consistently\r
56   fen = PositionToFEN(currentMove, NULL, 1);\r
57   if (!fen) {\r
58     DisplayError(_("Unable to convert position to FEN."), 0);\r
59     return;\r
60   }\r
61   if (!CopyTextToClipboard(fen))\r
62       DisplayError(_("Unable to copy FEN to clipboard."), 0);\r
63   free(fen);\r
64 }\r
65 \r
66 /* [AS] */\r
67 HGLOBAL ExportGameListAsText();\r
68 \r
69 VOID CopyGameListToClipboard()\r
70 {\r
71     HGLOBAL hMem = ExportGameListAsText();\r
72     \r
73     if( hMem != NULL ) {\r
74         /* Assign memory block to clipboard */\r
75         BOOL ok = OpenClipboard( hwndMain );\r
76 \r
77         if( ok ) {\r
78             ok = EmptyClipboard();\r
79 \r
80             if( ok ) {\r
81                 if( hMem != SetClipboardData( CF_TEXT, hMem ) ) {\r
82                     ok = FALSE;\r
83                 }\r
84             }\r
85 \r
86             CloseClipboard();\r
87 \r
88             if( ! ok ) {\r
89                 GlobalFree( hMem );\r
90             }\r
91         }\r
92 \r
93         if( ! ok ) {\r
94             DisplayError( "Cannot copy list to clipboard.", 0 );\r
95         }\r
96     }\r
97 }\r
98 \r
99 VOID\r
100 CopyGameToClipboard()\r
101 {\r
102   /* A rather cheesy hack here. Write the game to a file, then read from the\r
103    * file into the clipboard.\r
104    */\r
105   char *buf = NULL;\r
106   FILE *f;\r
107   unsigned long size;\r
108   size_t len;\r
109   struct stat st;\r
110 \r
111   if (!copyTemp) {\r
112     copyTemp = tempnam(NULL, "wbcp");\r
113   }\r
114   if (!copyTemp) {\r
115       DisplayError(_("Cannot create temporary file name."),0);\r
116       return;\r
117   }\r
118   f = fopen(copyTemp, "w");\r
119   if (!f) {\r
120     DisplayError(_("Cannot open temporary file."), 0);\r
121     return;\r
122   }\r
123   if (!SaveGame(f,0,"")) {                      /* call into backend */\r
124     DisplayError(_("Cannot write to temporary file."), 0);\r
125     goto copy_game_to_clipboard_cleanup;\r
126   }\r
127   f = fopen(copyTemp, "rb");\r
128   if (!f) {\r
129     DisplayError(_("Cannot reopen temporary file."), 0);\r
130     goto copy_game_to_clipboard_cleanup;\r
131   }\r
132   if (fstat(fileno(f), &st) < 0) {\r
133     DisplayError(_(_("Cannot determine size of file.")), 0);\r
134     goto copy_game_to_clipboard_cleanup;\r
135   }\r
136   size = st.st_size;\r
137   if (size == -1) {\r
138     DisplayError(_(_("Cannot determine size of file.")), 0);\r
139     goto copy_game_to_clipboard_cleanup;\r
140   }\r
141   rewind(f);\r
142   buf = (char*)malloc(size+1);\r
143   if (!buf) {\r
144     DisplayError(_("Cannot allocate clipboard buffer."), 0);\r
145     goto copy_game_to_clipboard_cleanup;\r
146   }\r
147   len = fread(buf, sizeof(char), size, f);\r
148   if (len == -1) {\r
149     DisplayError(_("Cannot read from temporary file."), 0);\r
150     goto copy_game_to_clipboard_cleanup;\r
151   }\r
152   if ((unsigned long)size != (unsigned long)len) { /* sigh */ \r
153       DisplayError(_("Error reading from temporary file."), 0);\r
154       goto copy_game_to_clipboard_cleanup;\r
155   }\r
156   buf[size] = 0;\r
157   if (!CopyTextToClipboard(buf)) {\r
158       DisplayError(_("Cannot copy text to clipboard"), 0);\r
159   }\r
160 \r
161 copy_game_to_clipboard_cleanup:\r
162   if (buf) free(buf);\r
163   if (f) fclose(f);\r
164 }\r
165 \r
166 \r
167 int \r
168 CopyTextToClipboard(char *text)\r
169 {\r
170   /* some (most?) of the error checking may be overkill, \r
171    * but hey, this is Windows \r
172    */\r
173   HGLOBAL hGlobalMem;\r
174   LPVOID lpGlobalMem;\r
175   BOOL locked;\r
176   UINT lockCount;\r
177   DWORD err;\r
178 \r
179   hGlobalMem = GlobalAlloc(GHND, (DWORD)lstrlen(text)+1);\r
180   if (hGlobalMem == NULL) {\r
181     DisplayError(_("Unable to allocate memory for clipboard."), 0);\r
182     return FALSE;\r
183   }\r
184   lpGlobalMem = GlobalLock(hGlobalMem);\r
185   if (lpGlobalMem == NULL) {\r
186     DisplayError(_(_("Unable to lock clipboard memory.")), 0);\r
187     GlobalFree(hGlobalMem);\r
188     return FALSE;\r
189   }\r
190   safeStrCpy(lpGlobalMem, text, 1<<20);\r
191   if (appData.debugMode) {\r
192     lockCount = GlobalFlags(hGlobalMem) & GMEM_LOCKCOUNT;\r
193     fprintf(debugFP, "CopyTextToClipboard(): lock count %d\n", lockCount);\r
194   }\r
195   SetLastError(NO_ERROR);\r
196   locked = GlobalUnlock(hGlobalMem);\r
197   err = GetLastError();\r
198   if (appData.debugMode) {\r
199     lockCount = GlobalFlags(hGlobalMem) & GMEM_LOCKCOUNT;\r
200     fprintf(debugFP, "CopyTextToClipboard(): lock count %d\n", lockCount);\r
201   }\r
202   if (!locked) {\r
203     locked = !((err == NO_ERROR) || (err == ERROR_NOT_LOCKED));\r
204     if (appData.debugMode) {\r
205       fprintf(debugFP, \r
206               "CopyTextToClipboard(): err %d locked %d\n", (int)err, locked);\r
207     }\r
208   }\r
209   if (locked) {\r
210     DisplayError(_("Cannot unlock clipboard memory."), 0);\r
211     GlobalFree(hGlobalMem);\r
212     return FALSE;\r
213   }\r
214   if (!OpenClipboard(hwndMain)) {\r
215     DisplayError(_("Cannot open clipboard."), 0);\r
216     GlobalFree(hGlobalMem);\r
217     return FALSE;\r
218   }\r
219   if (!EmptyClipboard()) {\r
220     DisplayError(_("Cannot empty clipboard."), 0);\r
221     return FALSE;\r
222   }\r
223   if (hGlobalMem != SetClipboardData(CF_TEXT, hGlobalMem)) {\r
224     DisplayError(_("Cannot copy text to clipboard."), 0);\r
225     CloseClipboard();\r
226     GlobalFree(hGlobalMem);\r
227     return FALSE;\r
228   }\r
229   if (!CloseClipboard())\r
230     DisplayError(_("Cannot close clipboard."), 0);\r
231   \r
232   return TRUE;\r
233 }\r
234 \r
235 /* [AS] Reworked paste functions so they can work with strings too */\r
236 \r
237 VOID PasteFENFromString( char * fen )\r
238 {\r
239   if (appData.debugMode) {\r
240     fprintf(debugFP, "PasteFenFromString(): fen '%s'\n", fen);\r
241   }\r
242   EditPositionPasteFEN(fen); /* call into backend */\r
243   free(fen);\r
244 }\r
245 \r
246 \r
247 VOID\r
248 PasteFENFromClipboard()\r
249 {\r
250   char *fen = NULL;\r
251   if (!PasteTextFromClipboard(&fen)) {\r
252       DisplayError(_("Unable to paste FEN from clipboard."), 0);\r
253       return;\r
254   }\r
255   PasteFENFromString( fen );\r
256 }\r
257 \r
258 VOID PasteGameFromString( char * buf )\r
259 {\r
260   FILE *f;\r
261   size_t len;\r
262   if (!pasteTemp) {\r
263     pasteTemp = tempnam(NULL, "wbpt");\r
264   }\r
265   f = fopen(pasteTemp, "w");\r
266   if (!f) {\r
267     DisplayError(_("Unable to create temporary file."), 0);\r
268     free(buf); /* [AS] */\r
269     return;\r
270   }\r
271   len = fwrite(buf, sizeof(char), strlen(buf), f);\r
272   fclose(f);\r
273   if (len != strlen(buf)) {\r
274     DisplayError(_("Error writing to temporary file."), 0);\r
275     free(buf); /* [AS] */\r
276     return;\r
277   }\r
278   LoadGameFromFile(pasteTemp, 0, "Clipboard", TRUE);\r
279   free( buf ); /* [AS] */\r
280 }\r
281 \r
282 \r
283 VOID\r
284 PasteGameFromClipboard()\r
285 {\r
286   /* Write the clipboard to a temp file, then let LoadGameFromFile()\r
287    * do all the work.  */\r
288   char *buf;\r
289   if (!PasteTextFromClipboard(&buf)) {\r
290     return;\r
291   }\r
292   PasteGameFromString( buf );\r
293 }\r
294 \r
295 /* [AS] Try to detect whether the clipboard contains FEN or PGN data */\r
296 VOID PasteGameOrFENFromClipboard()\r
297 {\r
298   char *buf;\r
299 //  char *tmp;\r
300   Board dummyBoard; int dummy; // [HGM] paste any\r
301 \r
302   if (!PasteTextFromClipboard(&buf)) {\r
303     return;\r
304   }\r
305 \r
306   // [HGM] paste any: make still smarter, to allow pasting of games without tags, recognize FEN in stead\r
307   if(!ParseFEN(dummyBoard, &dummy, buf, 0) ) {\r
308       PasteGameFromString( buf );\r
309   }\r
310   else {\r
311       PasteFENFromString( buf );\r
312   }\r
313 }\r
314 \r
315 int \r
316 PasteTextFromClipboard(char **text)\r
317 {\r
318   /* some (most?) of the error checking may be overkill, \r
319    * but hey, this is Windows \r
320    */\r
321   HANDLE hClipMem;\r
322   LPVOID lpClipMem;\r
323   BOOL locked = FALSE;\r
324   DWORD err;\r
325   UINT lockCount;\r
326 \r
327   if (!OpenClipboard(hwndMain)) {\r
328     DisplayError(_("Unable to open clipboard."), 0);\r
329     return FALSE;\r
330   }\r
331   hClipMem = GetClipboardData(CF_TEXT);\r
332   if (hClipMem == NULL) {\r
333     CloseClipboard();\r
334     DisplayError(_("No text in clipboard."), 0);\r
335     return FALSE;\r
336   }\r
337   lpClipMem = GlobalLock(hClipMem);\r
338   if (lpClipMem == NULL) {\r
339     CloseClipboard();\r
340     DisplayError(_(_("Unable to lock clipboard memory.")), 0);\r
341     return FALSE;\r
342   }\r
343   *text = (char *) malloc(GlobalSize(hClipMem)+1);\r
344   if (!*text) {\r
345     DisplayError(_("Unable to allocate memory for text string."), 0);\r
346     CloseClipboard();\r
347     return FALSE;\r
348   }\r
349   safeStrCpy(*text, lpClipMem, 1<<20 );\r
350   if (appData.debugMode) {\r
351     lockCount = GlobalFlags(hClipMem) & GMEM_LOCKCOUNT;\r
352     fprintf(debugFP, "PasteTextFromClipboard(): lock count %d\n", lockCount);\r
353   }\r
354   SetLastError(NO_ERROR);\r
355   /*suggested by Wilkin Ng*/\r
356   lockCount = GlobalFlags(hClipMem) & GMEM_LOCKCOUNT;\r
357   if (lockCount) {\r
358     locked = GlobalUnlock(hClipMem);\r
359   }\r
360   err = GetLastError();\r
361   if (appData.debugMode) {\r
362     lockCount = GlobalFlags(hClipMem) & GMEM_LOCKCOUNT;\r
363     fprintf(debugFP, "PasteTextFromClipboard(): lock count %d\n", lockCount);\r
364   }\r
365   if (!locked) {\r
366     locked = !((err == NO_ERROR) || (err == ERROR_NOT_LOCKED));\r
367     if (appData.debugMode) {\r
368       fprintf(debugFP, \r
369               "PasteTextFromClipboard(): err %d locked %d\n", (int)err, locked);\r
370     }\r
371   }\r
372   if (locked) \r
373     DisplayError(_("Unable to unlock clipboard memory."), 0);\r
374   \r
375   if (!CloseClipboard())\r
376     DisplayError(_("Unable to close clipboard."), 0);\r
377   \r
378   return TRUE;\r
379 }\r
380 \r
381 VOID\r
382 DeleteClipboardTempFiles()\r
383 {\r
384   if (copyTemp) remove(copyTemp);\r
385   if (pasteTemp) remove(pasteTemp);\r
386 }\r