Plug resource leak on rezising with pixmaps
[xboard.git] / draw.c
1 /*
2  * draw.c -- drawing routines for XBoard
3  *
4  * Copyright 1991 by Digital Equipment Corporation, Maynard,
5  * Massachusetts.
6  *
7  * Enhancements Copyright 1992-2001, 2002, 2003, 2004, 2005, 2006,
8  * 2007, 2008, 2009, 2010, 2011, 2012 Free Software Foundation, Inc.
9  *
10  * The following terms apply to Digital Equipment Corporation's copyright
11  * interest in XBoard:
12  * ------------------------------------------------------------------------
13  * All Rights Reserved
14  *
15  * Permission to use, copy, modify, and distribute this software and its
16  * documentation for any purpose and without fee is hereby granted,
17  * provided that the above copyright notice appear in all copies and that
18  * both that copyright notice and this permission notice appear in
19  * supporting documentation, and that the name of Digital not be
20  * used in advertising or publicity pertaining to distribution of the
21  * software without specific, written prior permission.
22  *
23  * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
24  * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
25  * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
26  * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
27  * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
28  * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
29  * SOFTWARE.
30  * ------------------------------------------------------------------------
31  *
32  * The following terms apply to the enhanced version of XBoard
33  * distributed by the Free Software Foundation:
34  * ------------------------------------------------------------------------
35  *
36  * GNU XBoard is free software: you can redistribute it and/or modify
37  * it under the terms of the GNU General Public License as published by
38  * the Free Software Foundation, either version 3 of the License, or (at
39  * your option) any later version.
40  *
41  * GNU XBoard is distributed in the hope that it will be useful, but
42  * WITHOUT ANY WARRANTY; without even the implied warranty of
43  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
44  * General Public License for more details.
45  *
46  * You should have received a copy of the GNU General Public License
47  * along with this program. If not, see http://www.gnu.org/licenses/.  *
48  *
49  *------------------------------------------------------------------------
50  ** See the file ChangeLog for a revision history.  */
51
52 #include "config.h"
53
54 #include <stdio.h>
55 #include <math.h>
56 #include <cairo/cairo.h>
57 #include <cairo/cairo-xlib.h>
58
59 #if STDC_HEADERS
60 # include <stdlib.h>
61 # include <string.h>
62 #else /* not STDC_HEADERS */
63 extern char *getenv();
64 # if HAVE_STRING_H
65 #  include <string.h>
66 # else /* not HAVE_STRING_H */
67 #  include <strings.h>
68 # endif /* not HAVE_STRING_H */
69 #endif /* not STDC_HEADERS */
70
71 #if ENABLE_NLS
72 #include <locale.h>
73 #endif
74
75
76 // [HGM] bitmaps: put before incuding the bitmaps / pixmaps, to know how many piece types there are.
77 #include "common.h"
78
79 #if HAVE_LIBXPM
80 #include "pixmaps/pixmaps.h"
81 #else
82 #include "bitmaps/bitmaps.h"
83 #endif
84
85 #include "frontend.h"
86 #include "backend.h"
87 #include "xevalgraph.h"
88 #include "board.h"
89 #include "menus.h"
90 #include "dialogs.h"
91 #include "gettext.h"
92 #include "draw.h"
93
94
95 #ifdef __EMX__
96 #ifndef HAVE_USLEEP
97 #define HAVE_USLEEP
98 #endif
99 #define usleep(t)   _sleep2(((t)+500)/1000)
100 #endif
101
102 #ifdef ENABLE_NLS
103 # define  _(s) gettext (s)
104 # define N_(s) gettext_noop (s)
105 #else
106 # define  _(s) (s)
107 # define N_(s)  s
108 #endif
109
110 #define SOLID 0
111 #define OUTLINE 1
112 Boolean cairoAnimate;
113 static cairo_surface_t *csBoardWindow, *csBoardBackup, *csDualBoard;
114 static cairo_surface_t *pngPieceBitmaps[2][(int)BlackPawn];    // scaled pieces as used
115 static cairo_surface_t *pngPieceBitmaps2[2][(int)BlackPawn+4]; // scaled pieces in store
116 static cairo_surface_t *pngBoardBitmap[2];
117 int useTexture, textureW[2], textureH[2];
118
119 #define pieceToSolid(piece) &pieceBitmap[SOLID][(piece) % (int)BlackPawn]
120 #define pieceToOutline(piece) &pieceBitmap[OUTLINE][(piece) % (int)BlackPawn]
121
122 #define White(piece) ((int)(piece) < (int)BlackPawn)
123
124 struct {
125   int x1, x2, y1, y2;
126 } gridSegments[BOARD_RANKS + BOARD_FILES + 2];
127
128 static int dual = 0;
129
130 void
131 SwitchWindow ()
132 {
133     cairo_surface_t *cstmp = csBoardWindow;
134     csBoardWindow = csDualBoard;
135     dual = !dual;
136     if(!csDualBoard) {
137         csBoardWindow = GetOutputSurface(&dualOptions[3], 0, 0);
138         dual = 1;
139     }
140     csDualBoard = cstmp;
141 }
142
143 void
144 NewSurfaces ()
145 {
146     // delete surfaces after size becomes invalid, so they will be recreated
147     if(csBoardWindow) cairo_surface_destroy(csBoardWindow);
148     if(csBoardBackup) cairo_surface_destroy(csBoardBackup);
149     if(csDualBoard) cairo_surface_destroy(csDualBoard);
150     csBoardWindow = csBoardBackup = csDualBoard = NULL;
151 }
152
153 #define BoardSize int
154 void
155 InitDrawingSizes (BoardSize boardSize, int flags)
156 {   // [HGM] resize is functional now, but for board format changes only (nr of ranks, files)
157     int boardWidth, boardHeight;
158     int i;
159     static int oldWidth, oldHeight;
160     static VariantClass oldVariant;
161     static int oldMono = -1, oldTwoBoards = 0;
162     extern Widget formWidget;
163
164     if(!formWidget) return;
165
166     if(oldTwoBoards && !twoBoards) PopDown(DummyDlg);
167     oldTwoBoards = twoBoards;
168
169     if(appData.overrideLineGap >= 0) lineGap = appData.overrideLineGap;
170     boardWidth = lineGap + BOARD_WIDTH * (squareSize + lineGap);
171     boardHeight = lineGap + BOARD_HEIGHT * (squareSize + lineGap);
172
173   if(boardWidth != oldWidth || boardHeight != oldHeight) { // do resizing stuff only if size actually changed
174
175     oldWidth = boardWidth; oldHeight = boardHeight;
176     CreateGrid();
177     NewSurfaces();
178
179     /*
180      * Inhibit shell resizing.
181      */
182     ResizeBoardWindow(boardWidth, boardHeight, 0);
183
184     DelayedDrag();
185   }
186
187     // [HGM] pieces: tailor piece bitmaps to needs of specific variant
188     // (only for xpm)
189
190   if(gameInfo.variant != oldVariant) { // and only if variant changed
191
192     for(i=0; i<2; i++) {
193         int p;
194         for(p=0; p<=(int)WhiteKing; p++)
195            pngPieceBitmaps[i][p] = pngPieceBitmaps2[i][p]; // defaults
196         if(gameInfo.variant == VariantShogi) {
197            pngPieceBitmaps[i][(int)WhiteCannon] = pngPieceBitmaps2[i][(int)WhiteKing+1];
198            pngPieceBitmaps[i][(int)WhiteNightrider] = pngPieceBitmaps2[i][(int)WhiteKing+2];
199            pngPieceBitmaps[i][(int)WhiteSilver] = pngPieceBitmaps2[i][(int)WhiteKing+3];
200            pngPieceBitmaps[i][(int)WhiteGrasshopper] = pngPieceBitmaps2[i][(int)WhiteKing+4];
201            pngPieceBitmaps[i][(int)WhiteQueen] = pngPieceBitmaps2[i][(int)WhiteLance];
202         }
203 #ifdef GOTHIC
204         if(gameInfo.variant == VariantGothic) {
205            pngPieceBitmaps[i][(int)WhiteMarshall] = pngPieceBitmaps2[i][(int)WhiteSilver];
206         }
207 #endif
208         if(gameInfo.variant == VariantSChess) {
209            pngPieceBitmaps[i][(int)WhiteAngel]    = pngPieceBitmaps2[i][(int)WhiteFalcon];
210            pngPieceBitmaps[i][(int)WhiteMarshall] = pngPieceBitmaps2[i][(int)WhiteAlfil];
211         }
212     }
213     oldMono = -10; // kludge to force recreation of animation masks
214     oldVariant = gameInfo.variant;
215   }
216   CreateAnimVars();
217   oldMono = appData.monoMode;
218 }
219
220 static void
221 CreatePNGBoard (char *s, int kind)
222 {
223     if(!appData.useBitmaps || s == NULL || *s == 0 || *s == '*') { useTexture &= ~(kind+1); return; }
224     if(strstr(s, ".png")) {
225         cairo_surface_t *img = cairo_image_surface_create_from_png (s);
226         if(img) {
227             useTexture |= kind + 1; pngBoardBitmap[kind] = img;
228             textureW[kind] = cairo_image_surface_get_width (img);
229             textureH[kind] = cairo_image_surface_get_height (img);
230         }
231     }
232 }
233
234 char *pngPieceNames[] = // must be in same order as internal piece encoding
235 { "Pawn", "Knight", "Bishop", "Rook", "Queen", "Advisor", "Elephant", "Archbishop", "Marshall", "Gold", "Commoner", 
236   "Canon", "Nightrider", "CrownedBishop", "CrownedRook", "Princess", "Chancellor", "Hawk", "Lance", "Cobra", "Unicorn", "King", 
237   "GoldKnight", "GoldLance", "GoldPawn", "GoldSilver", NULL
238 };
239
240 cairo_surface_t *
241 ConvertPixmap (int color, int piece)
242 {
243   int i, j, stride, f, colcode[10], w, b;
244   char ch[10];
245   cairo_surface_t *res;
246   XpmPieces *p = builtInXpms + 10;
247   char **pixels = p->xpm[piece % BlackPawn][2*color];
248   int *buf;
249   sscanf(pixels[0], "%*d %*d %d", &f);
250   sscanf(appData.whitePieceColor+1, "%x", &w);
251   sscanf(appData.blackPieceColor+1, "%x", &b);
252   res = cairo_image_surface_create(CAIRO_FORMAT_ARGB32, p->size, p->size);
253   stride = cairo_image_surface_get_stride(res);
254   buf = (int *) cairo_image_surface_get_data(res);
255   for(i=0; i<f; i++) {
256     ch[i] = pixels[i+1][0];
257     colcode[i] = 0;
258     if(strstr(pixels[i+1], "black")) colcode[i] = 0xFF000000 + (color ? b : 0);
259     if(strstr(pixels[i+1], "white")) colcode[i] = 0xFF000000 + w;
260   }
261   for(i=0; i<p->size; i++) {
262     for(j=0; j<p->size; j++) {
263       char c = pixels[i+f+1][j];
264       int k;
265       for(k=0; ch[k] != c && k < f; k++);
266       buf[i*p->size + j] = colcode[k];
267     }
268   }
269   cairo_surface_mark_dirty(res);
270   return res;
271 }
272
273 static void
274 ScaleOnePiece (char *name, int color, int piece)
275 {
276   float w, h;
277   char buf[MSG_SIZ];
278   cairo_surface_t *img, *cs;
279   cairo_t *cr;
280   static cairo_surface_t *pngPieceImages[2][(int)BlackPawn+4];   // png 256 x 256 images
281
282   if((img = pngPieceImages[color][piece]) == NULL) { // if PNG file for this piece was not yet read, read it now and store it
283     if(!*appData.pngDirectory) img = ConvertPixmap(color, piece); else {
284       snprintf(buf, MSG_SIZ, "%s/%s%s.png", appData.pngDirectory, color ? "Black" : "White", pngPieceNames[piece]);
285       img = cairo_image_surface_create_from_png (buf);
286       if(cairo_surface_status(img) != CAIRO_STATUS_SUCCESS) img = ConvertPixmap(color, piece);
287     }
288   }
289   pngPieceImages[color][piece] = img;
290   // create new bitmap to hold scaled piece image (and remove any old)
291   if(pngPieceBitmaps2[color][piece]) cairo_surface_destroy (pngPieceBitmaps2[color][piece]);
292   pngPieceBitmaps2[color][piece] = cs = cairo_image_surface_create (CAIRO_FORMAT_ARGB32, squareSize, squareSize);
293   if(piece <= WhiteKing) pngPieceBitmaps[color][piece] = cs;
294   // scaled copying of the raw png image
295   cr = cairo_create(cs);
296   w = cairo_image_surface_get_width (img);
297   h = cairo_image_surface_get_height (img);
298   cairo_scale(cr, squareSize/w, squareSize/h);
299   cairo_set_source_surface (cr, img, 0, 0);
300   cairo_paint (cr);
301   cairo_destroy (cr);
302 }
303
304 void
305 CreatePNGPieces ()
306 {
307   int p;
308
309   for(p=0; pngPieceNames[p]; p++) {
310     ScaleOnePiece(pngPieceNames[p], 0, p);
311     ScaleOnePiece(pngPieceNames[p], 1, p);
312   }
313 }
314
315 void
316 CreateAnyPieces ()
317 {   // [HGM] taken out of main
318     CreatePNGPieces();
319     CreatePNGBoard(appData.liteBackTextureFile, 1);
320     CreatePNGBoard(appData.darkBackTextureFile, 0);
321 }
322
323 void
324 InitDrawingParams ()
325 {
326     MakeColors();
327     CreateAnyPieces();
328 }
329
330 // [HGM] seekgraph: some low-level drawing routines (by JC, mostly)
331
332 float
333 Color (char *col, int n)
334 {
335   int c;
336   sscanf(col, "#%x", &c);
337   c = c >> 4*n & 255;
338   return c/255.;
339 }
340
341 void
342 SetPen (cairo_t *cr, float w, char *col, int dash)
343 {
344   static const double dotted[] = {4.0, 4.0};
345   static int len  = sizeof(dotted) / sizeof(dotted[0]);
346   cairo_set_line_width (cr, w);
347   cairo_set_source_rgba (cr, Color(col, 4), Color(col, 2), Color(col, 0), 1.0);
348   if(dash) cairo_set_dash (cr, dotted, len, 0.0);
349 }
350
351 void DrawSeekAxis( int x, int y, int xTo, int yTo )
352 {
353     cairo_t *cr;
354
355     /* get a cairo_t */
356     cr = cairo_create (csBoardWindow);
357
358     cairo_move_to (cr, x, y);
359     cairo_line_to(cr, xTo, yTo );
360
361     SetPen(cr, 2, "#000000", 0);
362     cairo_stroke(cr);
363
364     /* free memory */
365     cairo_destroy (cr);
366 }
367
368 void DrawSeekBackground( int left, int top, int right, int bottom )
369 {
370     cairo_t *cr = cairo_create (csBoardWindow);
371
372     cairo_rectangle (cr, left, top, right-left, bottom-top);
373
374     cairo_set_source_rgba(cr, 0.8, 0.8, 0.4,1.0);
375     cairo_fill(cr);
376
377     /* free memory */
378     cairo_destroy (cr);
379 }
380
381 void DrawSeekText(char *buf, int x, int y)
382 {
383     cairo_t *cr = cairo_create (csBoardWindow);
384
385     cairo_select_font_face (cr, "Sans",
386                             CAIRO_FONT_SLANT_NORMAL,
387                             CAIRO_FONT_WEIGHT_NORMAL);
388
389     cairo_set_font_size (cr, 12.0);
390
391     cairo_move_to (cr, x, y+4);
392     cairo_set_source_rgba(cr, 0, 0, 0,1.0);
393     cairo_show_text( cr, buf);
394
395     /* free memory */
396     cairo_destroy (cr);
397 }
398
399 void DrawSeekDot(int x, int y, int colorNr)
400 {
401     cairo_t *cr = cairo_create (csBoardWindow);
402     int square = colorNr & 0x80;
403     colorNr &= 0x7F;
404
405     if(square)
406         cairo_rectangle (cr, x-squareSize/9, y-squareSize/9, 2*(squareSize/9), 2*(squareSize/9));
407     else
408         cairo_arc(cr, x, y, squareSize/9, 0.0, 2*M_PI);
409
410     SetPen(cr, 2, "#000000", 0);
411     cairo_stroke_preserve(cr);
412     switch (colorNr) {
413       case 0: cairo_set_source_rgba(cr, 1.0, 0, 0,1.0); break;
414       case 1: cairo_set_source_rgba (cr, 0.0, 0.7, 0.2, 1.0); break;
415       default: cairo_set_source_rgba (cr, 1.0, 1.0, 0.0, 1.0); break;
416     }
417     cairo_fill(cr);
418
419     /* free memory */
420     cairo_destroy (cr);
421 }
422
423 void
424 DrawSeekOpen ()
425 {
426     int boardWidth = lineGap + BOARD_WIDTH * (squareSize + lineGap);
427     int boardHeight = lineGap + BOARD_HEIGHT * (squareSize + lineGap);
428     if(!csBoardWindow) {
429         csBoardWindow = GetOutputSurface(&mainOptions[W_BOARD], 0, 0);
430         csBoardBackup = cairo_image_surface_create (CAIRO_FORMAT_ARGB32, boardWidth, boardHeight);
431     }
432 }
433
434 void
435 DrawSeekClose ()
436 {
437 }
438
439 void
440 CreateGrid ()
441 {
442     int i, j;
443
444     if (lineGap == 0) return;
445
446     /* [HR] Split this into 2 loops for non-square boards. */
447
448     for (i = 0; i < BOARD_HEIGHT + 1; i++) {
449         gridSegments[i].x1 = 0;
450         gridSegments[i].x2 =
451           lineGap + BOARD_WIDTH * (squareSize + lineGap);
452         gridSegments[i].y1 = gridSegments[i].y2
453           = lineGap / 2 + (i * (squareSize + lineGap));
454     }
455
456     for (j = 0; j < BOARD_WIDTH + 1; j++) {
457         gridSegments[j + i].y1 = 0;
458         gridSegments[j + i].y2 =
459           lineGap + BOARD_HEIGHT * (squareSize + lineGap);
460         gridSegments[j + i].x1 = gridSegments[j + i].x2
461           = lineGap / 2 + (j * (squareSize + lineGap));
462     }
463 }
464
465 void
466 DoDrawGrid(cairo_surface_t *cs)
467 {
468   /* draws a grid starting around Nx, Ny squares starting at x,y */
469   int i;
470   cairo_t *cr;
471
472   DrawSeekOpen();
473   /* get a cairo_t */
474   cr = cairo_create (cs);
475
476   cairo_set_antialias (cr, CAIRO_ANTIALIAS_NONE);
477   SetPen(cr, lineGap, "#000000", 0);
478
479   /* lines in X */
480   for (i = 0; i < BOARD_WIDTH + BOARD_HEIGHT + 2; i++)
481     {
482       cairo_move_to (cr, gridSegments[i].x1, gridSegments[i].y1);
483       cairo_line_to (cr, gridSegments[i].x2, gridSegments[i].y2);
484       cairo_stroke (cr);
485     }
486
487   /* free memory */
488   cairo_destroy (cr);
489
490   return;
491 }
492
493 void
494 DrawGrid()
495 {
496   DoDrawGrid(csBoardWindow);
497   if(!dual) DoDrawGrid(csBoardBackup);
498 }
499
500 void
501 DoDrawBorder (cairo_surface_t *cs, int x, int y, int type)
502 {
503     cairo_t *cr;
504     DrawSeekOpen();
505     char *col;
506
507     switch(type) {
508         case 0: col = "#000000"; break;
509         case 1: col = appData.highlightSquareColor; break;
510         case 2: col = appData.premoveHighlightColor; break;
511     }
512     cr = cairo_create(cs);
513     cairo_set_antialias(cr, CAIRO_ANTIALIAS_NONE);
514     cairo_rectangle(cr, x, y, squareSize+lineGap, squareSize+lineGap);
515     SetPen(cr, lineGap, col, 0);
516     cairo_stroke(cr);
517 }
518
519 void
520 DrawBorder (int x, int y, int type)
521 {
522   DoDrawBorder(csBoardWindow, x, y, type);
523   if(!dual) DoDrawBorder(csBoardBackup, x, y, type);
524 }
525
526 static int
527 CutOutSquare (int x, int y, int *x0, int *y0, int  kind)
528 {
529     int W = BOARD_WIDTH, H = BOARD_HEIGHT;
530     int nx = x/(squareSize + lineGap), ny = y/(squareSize + lineGap);
531     *x0 = 0; *y0 = 0;
532     if(textureW[kind] < squareSize || textureH[kind] < squareSize) return 0;
533     if(textureW[kind] < W*squareSize)
534         *x0 = (textureW[kind] - squareSize) * nx/(W-1);
535     else
536         *x0 = textureW[kind]*nx / W + (textureW[kind] - W*squareSize) / (2*W);
537     if(textureH[kind] < H*squareSize)
538         *y0 = (textureH[kind] - squareSize) * ny/(H-1);
539     else
540         *y0 = textureH[kind]*ny / H + (textureH[kind] - H*squareSize) / (2*H);
541     return 1;
542 }
543
544 void
545 DrawLogo (void *handle, void *logo)
546 {
547     cairo_surface_t *img, *cs;
548     cairo_t *cr;
549     int w, h;
550
551     if(!logo || !handle) return;
552     cs = GetOutputSurface(handle, appData.logoSize, appData.logoSize/2);
553     img = cairo_image_surface_create_from_png (logo);
554     w = cairo_image_surface_get_width (img);
555     h = cairo_image_surface_get_height (img);
556     cr = cairo_create(cs);
557     cairo_scale(cr, (float)appData.logoSize/w, appData.logoSize/(2.*h));
558     cairo_set_source_surface (cr, img, 0, 0);
559     cairo_paint (cr);
560     cairo_destroy (cr);
561     cairo_surface_destroy (img);
562     cairo_surface_destroy (cs);
563 }
564
565 static void
566 BlankSquare (cairo_surface_t *dest, int x, int y, int color, ChessSquare piece, int fac)
567 {   // [HGM] extra param 'fac' for forcing destination to (0,0) for copying to animation buffer
568     int x0, y0;
569     cairo_t *cr;
570
571     cr = cairo_create (dest);
572
573     if ((useTexture & color+1) && CutOutSquare(x, y, &x0, &y0, color)) {
574             cairo_set_source_surface (cr, pngBoardBitmap[color], x*fac - x0, y*fac - y0);
575             cairo_set_antialias (cr, CAIRO_ANTIALIAS_NONE);
576             cairo_rectangle (cr, x*fac, y*fac, squareSize, squareSize);
577             cairo_fill (cr);
578             cairo_destroy (cr);
579     } else { // evenly colored squares
580         char *col;
581         switch (color) {
582           case 0: col = appData.darkSquareColor; break;
583           case 1: col = appData.lightSquareColor; break;
584           case 2: col = "#000000"; break;
585         }
586         SetPen(cr, 2.0, col, 0);
587         cairo_rectangle (cr, x, y, squareSize, squareSize);
588         cairo_fill (cr);
589         cairo_destroy (cr);
590     }
591 }
592
593 static void
594 pngDrawPiece (cairo_surface_t *dest, ChessSquare piece, int square_color, int x, int y)
595 {
596     int kind, p = piece;
597     cairo_t *cr;
598
599     if ((int)piece < (int) BlackPawn) {
600         kind = 0;
601     } else {
602         kind = 1;
603         piece -= BlackPawn;
604     }
605     if(appData.upsideDown && flipView) { p += p < BlackPawn ? BlackPawn : -BlackPawn; }// swap white and black pieces
606     BlankSquare(dest, x, y, square_color, piece, 1); // erase previous contents with background
607     cr = cairo_create (dest);
608     cairo_set_source_surface (cr, pngPieceBitmaps[kind][piece], x, y);
609     cairo_paint(cr);
610     cairo_destroy (cr);
611 }
612
613 void
614 DoDrawDot (cairo_surface_t *cs, int marker, int x, int y, int r)
615 {
616         cairo_t *cr;
617
618         cr = cairo_create(cs);
619         cairo_arc(cr, x+r/2, y+r/2, r/2, 0.0, 2*M_PI);
620         if(appData.monoMode) {
621             SetPen(cr, 2, marker == 2 ? "#000000" : "#FFFFFF", 0);
622             cairo_stroke_preserve(cr);
623             SetPen(cr, 2, marker == 2 ? "#FFFFFF" : "#000000", 0);
624         } else {
625             SetPen(cr, 2, marker == 2 ? "#FF0000" : "#FFFF00", 0);
626         }
627         cairo_fill(cr);
628
629         cairo_destroy(cr);
630 }
631
632 void
633 DrawDot (int marker, int x, int y, int r)
634 { // used for atomic captures; no need to draw on backup
635   DrawSeekOpen();
636   DoDrawDot(csBoardWindow, marker, x, y, r);
637 }
638
639 static void
640 DoDrawOneSquare (cairo_surface_t *dest, int x, int y, ChessSquare piece, int square_color, int marker, char *string, int align)
641 {   // basic front-end board-draw function: takes care of everything that can be in square:
642     // piece, background, coordinate/count, marker dot
643     cairo_t *cr;
644
645     if (piece == EmptySquare) {
646         BlankSquare(dest, x, y, square_color, piece, 1);
647     } else {
648         pngDrawPiece(dest, piece, square_color, x, y);
649     }
650
651     if(align) { // square carries inscription (coord or piece count)
652         int xx = x, yy = y;
653         cairo_text_extents_t te;
654
655         cr = cairo_create (dest);
656         cairo_select_font_face (cr, "Sans",
657                     CAIRO_FONT_SLANT_NORMAL,
658                     CAIRO_FONT_WEIGHT_BOLD);
659
660         cairo_set_font_size (cr, squareSize/4);
661         // calculate where it goes
662         cairo_text_extents (cr, string, &te);
663
664         if (align == 1) {
665             xx += squareSize - te.width - te.x_bearing - 1;
666             yy += squareSize - te.height - te.y_bearing - 1;
667         } else if (align == 2) {
668             xx += te.x_bearing + 1, yy += -te.y_bearing + 1;
669         } else if (align == 3) {
670             xx += squareSize - te.width -te.x_bearing - 1;
671             yy += -te.y_bearing + 3;
672         } else if (align == 4) {
673             xx += te.x_bearing + 1, yy += -te.y_bearing + 3;
674         }
675
676         cairo_move_to (cr, xx-1, yy);
677         if(align < 3) cairo_set_source_rgb (cr, 0.0, 0.0, 0.0);
678         else          cairo_set_source_rgb (cr, 1.0, 1.0, 1.0);
679         cairo_show_text (cr, string);
680         cairo_destroy (cr);
681     }
682
683     if(marker) { // print fat marker dot, if requested
684         DoDrawDot(dest, marker, x + squareSize/4, y+squareSize/4, squareSize/2);
685     }
686 }
687
688 void
689 DrawOneSquare (int x, int y, ChessSquare piece, int square_color, int marker, char *string, int align)
690 {
691   DrawSeekOpen();
692   DoDrawOneSquare (csBoardWindow, x, y, piece, square_color, marker, string, align);
693   if(!dual)
694   DoDrawOneSquare (csBoardBackup, x, y, piece, square_color, marker, string, align);
695 }
696
697 /****   Animation code by Hugh Fisher, DCS, ANU. ****/
698
699 /*      Masks for XPM pieces. Black and white pieces can have
700         different shapes, but in the interest of retaining my
701         sanity pieces must have the same outline on both light
702         and dark squares, and all pieces must use the same
703         background square colors/images.                */
704
705 static cairo_surface_t *c_animBufs[3*NrOfAnims]; // newBuf, saveBuf
706
707 static void
708 InitAnimState (AnimNr anr)
709 {
710     DrawSeekOpen(); // set cs to board widget
711     if(c_animBufs[anr]) cairo_surface_destroy (c_animBufs[anr]);
712     if(c_animBufs[anr+2]) cairo_surface_destroy (c_animBufs[anr+2]);
713     c_animBufs[anr+4] = csBoardWindow;
714     c_animBufs[anr+2] = cairo_image_surface_create (CAIRO_FORMAT_ARGB32, squareSize, squareSize);
715     c_animBufs[anr] = cairo_image_surface_create (CAIRO_FORMAT_ARGB32, squareSize, squareSize);
716 }
717
718 void
719 CreateAnimVars ()
720 {
721   InitAnimState(Game);
722   InitAnimState(Player);
723 }
724
725 static void
726 CairoOverlayPiece (ChessSquare piece, cairo_surface_t *dest)
727 {
728   static cairo_t *pieceSource;
729   pieceSource = cairo_create (dest);
730   cairo_set_source_surface (pieceSource, pngPieceBitmaps[!White(piece)][piece % BlackPawn], 0, 0);
731   if(doubleClick) cairo_paint_with_alpha (pieceSource, 0.6);
732   else cairo_paint(pieceSource);
733   cairo_destroy (pieceSource);
734 }
735
736 void
737 InsertPiece (AnimNr anr, ChessSquare piece)
738 {
739     CairoOverlayPiece(piece, c_animBufs[anr]);
740 }
741
742 void
743 DrawBlank (AnimNr anr, int x, int y, int startColor)
744 {
745     BlankSquare(c_animBufs[anr+2], x, y, startColor, EmptySquare, 0);
746 }
747
748 void CopyRectangle (AnimNr anr, int srcBuf, int destBuf,
749                  int srcX, int srcY, int width, int height, int destX, int destY)
750 {
751         cairo_t *cr;// = cairo_create (c_animBufs[anr+destBuf]);
752         cr = cairo_create (c_animBufs[anr+destBuf]);
753         if(c_animBufs[anr+srcBuf] == csBoardWindow)
754         cairo_set_source_surface (cr, csBoardBackup, destX - srcX, destY - srcY);
755         else
756         cairo_set_source_surface (cr, c_animBufs[anr+srcBuf], destX - srcX, destY - srcY);
757         cairo_rectangle (cr, destX, destY, width, height);
758         cairo_fill (cr);
759         cairo_destroy (cr);
760         if(c_animBufs[anr+destBuf] == csBoardWindow) {
761         cr = cairo_create (csBoardBackup); // also draw to backup
762         cairo_set_source_surface (cr, c_animBufs[anr+srcBuf], destX - srcX, destY - srcY);
763         cairo_rectangle (cr, destX, destY, width, height);
764         cairo_fill (cr);
765         cairo_destroy (cr);
766         }
767 }
768
769 void
770 SetDragPiece (AnimNr anr, ChessSquare piece)
771 {
772 }
773
774 /* [AS] Arrow highlighting support */
775
776 void
777 DoDrawPolygon (cairo_surface_t *cs, Pnt arrow[], int nr)
778 {
779     cairo_t *cr;
780     int i;
781     cr = cairo_create (cs);
782     cairo_move_to (cr, arrow[nr-1].x, arrow[nr-1].y);
783     for (i=0;i<nr;i++) {
784         cairo_line_to(cr, arrow[i].x, arrow[i].y);
785     }
786     if(appData.monoMode) { // should we always outline arrow?
787         cairo_line_to(cr, arrow[0].x, arrow[0].y);
788         SetPen(cr, 2, "#000000", 0);
789         cairo_stroke_preserve(cr);
790     }
791     SetPen(cr, 2, appData.highlightSquareColor, 0);
792     cairo_fill(cr);
793
794     /* free memory */
795     cairo_destroy (cr);
796 }
797
798 void
799 DrawPolygon (Pnt arrow[], int nr)
800 {
801     DoDrawPolygon(csBoardWindow, arrow, nr);
802     if(!dual) DoDrawPolygon(csBoardBackup, arrow, nr);
803 }
804
805