fixed pan-view drawing
[geeqie.git] / src / renderer-tiles.c
1 /*
2  * Geeqie
3  * (C) 2006 John Ellis
4  * Copyright (C) 2008 - 2012 The Geeqie Team
5  *
6  * Author: John Ellis
7  * Author: Vladimir Nadvornik
8  *
9  * This software is released under the GNU General Public License (GNU GPL).
10  * Please read the included file COPYING for more information.
11  * This software comes with no warranty of any kind, use at your own risk!
12  */
13
14 #include <stdio.h>
15 #include <stdlib.h>
16 #include <string.h>
17 #include <math.h>
18
19 #include "main.h"
20 #include "pixbuf-renderer.h"
21 #include "renderer-tiles.h"
22
23 #include "intl.h"
24 #include "layout.h"
25
26 #include <gtk/gtk.h>
27
28
29 /* comment this out if not using this from within Geeqie
30  * defining GQ_BUILD does these things:
31  *   - Sets the shift-click scroller pixbuf to a nice icon instead of a black box
32  */
33 #define GQ_BUILD 1
34
35 #ifdef GQ_BUILD
36 #include "main.h"
37 #include "pixbuf_util.h"
38 #include "exif.h"
39 #else
40 typedef enum {
41         EXIF_ORIENTATION_UNKNOWN        = 0,
42         EXIF_ORIENTATION_TOP_LEFT       = 1,
43         EXIF_ORIENTATION_TOP_RIGHT      = 2,
44         EXIF_ORIENTATION_BOTTOM_RIGHT   = 3,
45         EXIF_ORIENTATION_BOTTOM_LEFT    = 4,
46         EXIF_ORIENTATION_LEFT_TOP       = 5,
47         EXIF_ORIENTATION_RIGHT_TOP      = 6,
48         EXIF_ORIENTATION_RIGHT_BOTTOM   = 7,
49         EXIF_ORIENTATION_LEFT_BOTTOM    = 8
50 } ExifOrientationType;
51 #endif
52
53
54 /* size to use when breaking up image pane for rendering */
55 #define PR_TILE_SIZE 128
56
57 typedef struct _ImageTile ImageTile;
58 typedef struct _QueueData QueueData;
59
60 struct _ImageTile
61 {
62         cairo_surface_t *surface;       /* off screen buffer */
63         GdkPixbuf *pixbuf;      /* pixbuf area for zooming */
64         gint x;                 /* x offset into image */
65         gint y;                 /* y offset into image */
66         gint w;                 /* width that is visible (may be less if at edge of image) */
67         gint h;                 /* height '' */
68
69         gboolean blank;
70
71 /* render_todo: (explanation)
72         NONE    do nothing
73         AREA    render area of tile, usually only used when loading an image
74                 note: will jump to an ALL if render_done is not ALL.
75         ALL     render entire tile, if never done before w/ ALL, for expose events *only*
76 */
77
78         ImageRenderType render_todo;    /* what to do (see above) */
79         ImageRenderType render_done;    /* highest that has been done before on tile */
80
81         QueueData *qd;
82         QueueData *qd2;
83
84         guint size;             /* est. memory used by pixmap and pixbuf */
85 };
86
87 struct _QueueData
88 {
89         ImageTile *it;
90         gint x;
91         gint y;
92         gint w;
93         gint h;
94         gboolean new_data;
95 };
96
97 typedef struct _OverlayData OverlayData;
98 struct _OverlayData
99 {
100         gint id;
101
102         GdkPixbuf *pixbuf;
103         GdkWindow *window;
104
105         gint x;
106         gint y;
107
108         OverlayRendererFlags flags;
109 };
110
111 typedef struct _RendererTiles RendererTiles;
112
113 struct _RendererTiles
114 {
115         RendererFuncs f;
116         PixbufRenderer *pr;
117
118         gint tile_cache_max;            /* max mb to use for offscreen buffer */
119
120         gint tile_width;
121         gint tile_height;
122         gint tile_cols;         /* count of tile columns */
123         GList *tiles;           /* list of buffer tiles */
124         gint tile_cache_size;   /* allocated size of pixmaps/pixbufs */
125         GList *draw_queue;      /* list of areas to redraw */
126         GList *draw_queue_2pass;/* list when 2 pass is enabled */
127
128         GList *overlay_list;
129         cairo_surface_t *overlay_buffer;
130         
131         guint draw_idle_id; /* event source id */
132
133         GdkPixbuf *spare_tile;
134         
135         gint stereo_mode;
136         gint stereo_off_x;
137         gint stereo_off_y;
138         
139         gint x_scroll;  /* allow local adjustment and mirroring */
140         gint y_scroll;
141         
142 };
143
144
145
146 static void rt_border_draw(RendererTiles *rt, gint x, gint y, gint w, gint h);
147 static void rt_overlay_draw(RendererTiles *rt, gint x, gint y, gint w, gint h, ImageTile *it);
148
149
150 static void rt_tile_free_all(RendererTiles *rt);
151 static void rt_tile_invalidate_region(RendererTiles *rt, gint x, gint y, gint w, gint h);
152 static gboolean rt_tile_is_visible(RendererTiles *rt, ImageTile *it);
153 static void rt_queue_clear(RendererTiles *rt);
154 static void rt_queue_merge(QueueData *parent, QueueData *qd);
155 static void rt_queue(RendererTiles *rt, gint x, gint y, gint w, gint h,
156                      gint clamp, ImageRenderType render, gboolean new_data, gboolean only_existing);
157
158 static void rt_hierarchy_changed_cb(GtkWidget *widget, GtkWidget *previous_toplevel, gpointer data);
159 static gint rt_queue_draw_idle_cb(gpointer data);
160 static void renderer_redraw(void *renderer, gint x, gint y, gint w, gint h,
161                      gint clamp, ImageRenderType render, gboolean new_data, gboolean only_existing);
162
163 #define GET_RIGHT_PIXBUF_OFFSET(rt) \
164         (( (rt->stereo_mode & PR_STEREO_RIGHT) && !(rt->stereo_mode & PR_STEREO_SWAP)) || \
165          (!(rt->stereo_mode & PR_STEREO_RIGHT) &&  (rt->stereo_mode & PR_STEREO_SWAP)) ?  \
166           rt->pr->stereo_pixbuf_offset_right : rt->pr->stereo_pixbuf_offset_left )
167
168 #define GET_LEFT_PIXBUF_OFFSET(rt) \
169         ((!(rt->stereo_mode & PR_STEREO_RIGHT) && !(rt->stereo_mode & PR_STEREO_SWAP)) || \
170          ( (rt->stereo_mode & PR_STEREO_RIGHT) &&  (rt->stereo_mode & PR_STEREO_SWAP)) ?  \
171           rt->pr->stereo_pixbuf_offset_right : rt->pr->stereo_pixbuf_offset_left )
172
173
174 static void rt_sync_scroll(RendererTiles *rt)
175 {
176         PixbufRenderer *pr = rt->pr;
177         
178         rt->x_scroll = (rt->stereo_mode & PR_STEREO_MIRROR) ? 
179                        pr->width - pr->vis_width - pr->x_scroll 
180                        : pr->x_scroll;
181         
182         rt->y_scroll = (rt->stereo_mode & PR_STEREO_FLIP) ? 
183                        pr->height - pr->vis_height - pr->y_scroll 
184                        : pr->y_scroll;
185 }
186
187 /*
188  *-------------------------------------------------------------------
189  * borders
190  *-------------------------------------------------------------------
191  */
192
193 static void rt_border_draw(RendererTiles *rt, gint x, gint y, gint w, gint h)
194 {
195         PixbufRenderer *pr = rt->pr;
196         GtkWidget *box;
197         GdkWindow *window;
198         gint rx, ry, rw, rh;
199         cairo_t *cr;
200
201         box = GTK_WIDGET(pr);
202         window = gtk_widget_get_window(box);
203
204         if (!window) return;
205
206         cr = gdk_cairo_create(window);
207
208
209         if (!pr->pixbuf && !pr->source_tiles_enabled)
210                 {
211                 if (pr_clip_region(x, y, w, h,
212                                    0, 0,
213                                    pr->viewport_width, pr->viewport_height,
214                                    &rx, &ry, &rw, &rh))
215                         {
216                         cairo_set_source_rgb(cr, 0, 0, 0);
217                         cairo_rectangle(cr, rx + rt->stereo_off_x, ry + rt->stereo_off_y, rw, rh);
218                         cairo_fill(cr);
219                         cairo_destroy(cr);
220                         rt_overlay_draw(rt, rx, ry, rw, rh, NULL);
221                         }
222                 return;
223                 }
224
225         if (pr->vis_width < pr->viewport_width)
226                 {
227                 if (pr->x_offset > 0 &&
228                     pr_clip_region(x, y, w, h,
229                                    0, 0,
230                                    pr->x_offset, pr->viewport_height,
231                                    &rx, &ry, &rw, &rh))
232                         {
233                         cairo_set_source_rgb(cr, 0, 0, 0);
234                         cairo_rectangle(cr, rx + rt->stereo_off_x, ry + rt->stereo_off_y, rw, rh);
235                         cairo_fill(cr);
236                         rt_overlay_draw(rt, rx, ry, rw, rh, NULL);
237                         }
238                 if (pr->viewport_width - pr->vis_width - pr->x_offset > 0 &&
239                     pr_clip_region(x, y, w, h,
240                                    pr->x_offset + pr->vis_width, 0,
241                                    pr->viewport_width - pr->vis_width - pr->x_offset, pr->viewport_height,
242                                    &rx, &ry, &rw, &rh))
243                         {
244                         cairo_set_source_rgb(cr, 0, 0, 0);
245                         cairo_rectangle(cr, rx + rt->stereo_off_x, ry + rt->stereo_off_y, rw, rh);
246                         cairo_fill(cr);
247                         rt_overlay_draw(rt, rx, ry, rw, rh, NULL);
248                         }
249                 }
250         if (pr->vis_height < pr->viewport_height)
251                 {
252                 if (pr->y_offset > 0 &&
253                     pr_clip_region(x, y, w, h,
254                                    pr->x_offset, 0,
255                                    pr->vis_width, pr->y_offset,
256                                    &rx, &ry, &rw, &rh))
257                         {
258                         cairo_set_source_rgb(cr, 0, 0, 0);
259                         cairo_rectangle(cr, rx + rt->stereo_off_x, ry + rt->stereo_off_y, rw, rh);
260                         cairo_fill(cr);
261                         rt_overlay_draw(rt, rx, ry, rw, rh, NULL);
262                         }
263                 if (pr->viewport_height - pr->vis_height - pr->y_offset > 0 &&
264                     pr_clip_region(x, y, w, h,
265                                    pr->x_offset, pr->y_offset + pr->vis_height,
266                                    pr->vis_width, pr->viewport_height - pr->vis_height - pr->y_offset,
267                                    &rx, &ry, &rw, &rh))
268                         {
269                         cairo_set_source_rgb(cr, 0, 0, 0);
270                         cairo_rectangle(cr, rx + rt->stereo_off_x, ry + rt->stereo_off_y, rw, rh);
271                         cairo_fill(cr);
272                         rt_overlay_draw(rt, rx, ry, rw, rh, NULL);
273                         }
274                 }
275         cairo_destroy(cr);
276 }
277
278 static void rt_border_clear(RendererTiles *rt)
279 {
280         PixbufRenderer *pr = rt->pr;
281         rt_border_draw(rt, 0, 0, pr->viewport_width, pr->viewport_height);
282 }
283
284
285 /*
286  *-------------------------------------------------------------------
287  * display tiles
288  *-------------------------------------------------------------------
289  */
290
291 static ImageTile *rt_tile_new(gint x, gint y, gint width, gint height)
292 {
293         ImageTile *it;
294
295         it = g_new0(ImageTile, 1);
296
297         it->x = x;
298         it->y = y;
299         it->w = width;
300         it->h = height;
301
302         it->render_done = TILE_RENDER_NONE;
303
304         return it;
305 }
306
307 static void rt_tile_free(ImageTile *it)
308 {
309         if (!it) return;
310
311         if (it->pixbuf) g_object_unref(it->pixbuf);
312         if (it->surface) cairo_surface_destroy(it->surface);
313
314         g_free(it);
315 }
316
317 static void rt_tile_free_all(RendererTiles *rt)
318 {
319         GList *work;
320
321         work = rt->tiles;
322         while (work)
323                 {
324                 ImageTile *it;
325
326                 it = work->data;
327                 work = work->next;
328
329                 rt_tile_free(it);
330                 }
331
332         g_list_free(rt->tiles);
333         rt->tiles = NULL;
334         rt->tile_cache_size = 0;
335 }
336
337 static ImageTile *rt_tile_add(RendererTiles *rt, gint x, gint y)
338 {
339         PixbufRenderer *pr = rt->pr;
340         ImageTile *it;
341
342         it = rt_tile_new(x, y, rt->tile_width, rt->tile_height);
343
344         if (it->x + it->w > pr->width) it->w = pr->width - it->x;
345         if (it->y + it->h > pr->height) it->h = pr->height - it->y;
346
347         rt->tiles = g_list_prepend(rt->tiles, it);
348         rt->tile_cache_size += it->size;
349
350         return it;
351 }
352
353 static void rt_tile_remove(RendererTiles *rt, ImageTile *it)
354 {
355         if (it->qd)
356                 {
357                 QueueData *qd = it->qd;
358
359                 it->qd = NULL;
360                 rt->draw_queue = g_list_remove(rt->draw_queue, qd);
361                 g_free(qd);
362                 }
363
364         if (it->qd2)
365                 {
366                 QueueData *qd = it->qd2;
367
368                 it->qd2 = NULL;
369                 rt->draw_queue_2pass = g_list_remove(rt->draw_queue_2pass, qd);
370                 g_free(qd);
371                 }
372
373         rt->tiles = g_list_remove(rt->tiles, it);
374         rt->tile_cache_size -= it->size;
375
376         rt_tile_free(it);
377 }
378
379 static void rt_tile_free_space(RendererTiles *rt, guint space, ImageTile *it)
380 {
381         PixbufRenderer *pr = rt->pr;
382         GList *work;
383         guint tile_max;
384
385         work = g_list_last(rt->tiles);
386
387         if (pr->source_tiles_enabled && pr->scale < 1.0)
388                 {
389                 gint tiles;
390
391                 tiles = (pr->vis_width / rt->tile_width + 1) * (pr->vis_height / rt->tile_height + 1);
392                 tile_max = MAX(tiles * rt->tile_width * rt->tile_height * 3,
393                                (gint)((gdouble)rt->tile_cache_max * 1048576.0 * pr->scale));
394                 }
395         else
396                 {
397                 tile_max = rt->tile_cache_max * 1048576;
398                 }
399
400         while (work && rt->tile_cache_size + space > tile_max)
401                 {
402                 ImageTile *needle;
403
404                 needle = work->data;
405                 work = work->prev;
406                 if (needle != it &&
407                     ((!needle->qd && !needle->qd2) || !rt_tile_is_visible(rt, needle))) rt_tile_remove(rt, needle);
408                 }
409 }
410
411 static void rt_tile_invalidate_all(RendererTiles *rt)
412 {
413         PixbufRenderer *pr = rt->pr;
414         GList *work;
415
416         work = rt->tiles;
417         while (work)
418                 {
419                 ImageTile *it;
420
421                 it = work->data;
422                 work = work->next;
423
424                 it->render_done = TILE_RENDER_NONE;
425                 it->render_todo = TILE_RENDER_ALL;
426                 it->blank = FALSE;
427
428                 it->w = MIN(rt->tile_width, pr->width - it->x);
429                 it->h = MIN(rt->tile_height, pr->height - it->y);
430                 }
431 }
432
433 static void rt_tile_invalidate_region(RendererTiles *rt, gint x, gint y, gint w, gint h)
434 {
435         gint x1, x2;
436         gint y1, y2;
437         GList *work;
438
439         x1 = ROUND_DOWN(x, rt->tile_width);
440         x2 = ROUND_UP(x + w, rt->tile_width);
441
442         y1 = ROUND_DOWN(y, rt->tile_height);
443         y2 = ROUND_UP(y + h, rt->tile_height);
444
445         work = rt->tiles;
446         while (work)
447                 {
448                 ImageTile *it;
449
450                 it = work->data;
451                 work = work->next;
452
453                 if (it->x < x2 && it->x + it->w > x1 &&
454                     it->y < y2 && it->y + it->h > y1)
455                         {
456                         it->render_done = TILE_RENDER_NONE;
457                         it->render_todo = TILE_RENDER_ALL;
458                         }
459                 }
460 }
461
462 static ImageTile *rt_tile_get(RendererTiles *rt, gint x, gint y, gboolean only_existing)
463 {
464         GList *work;
465
466         work = rt->tiles;
467         while (work)
468                 {
469                 ImageTile *it;
470
471                 it = work->data;
472                 if (it->x == x && it->y == y)
473                         {
474                         rt->tiles = g_list_delete_link(rt->tiles, work);
475                         rt->tiles = g_list_prepend(rt->tiles, it);
476                         return it;
477                         }
478
479                 work = work->next;
480                 }
481
482         if (only_existing) return NULL;
483
484         return rt_tile_add(rt, x, y);
485 }
486
487 static gint pixmap_calc_size(cairo_surface_t *surface)
488 {
489 //      gint w, h, d;
490
491 //      d = gdk_drawable_get_depth(pixmap);
492 //      gdk_drawable_get_size(pixmap, &w, &h);
493         return PR_TILE_SIZE * PR_TILE_SIZE * 4 / 8;
494 }
495
496 static void rt_tile_prepare(RendererTiles *rt, ImageTile *it)
497 {
498         PixbufRenderer *pr = rt->pr;
499         if (!it->surface)
500                 {
501                 cairo_surface_t *surface;
502                 guint size;
503
504                 surface = gdk_window_create_similar_surface(gtk_widget_get_window((GtkWidget *)pr),
505                                                             CAIRO_CONTENT_COLOR,
506                                                             rt->tile_width, rt->tile_height);
507
508                 size = pixmap_calc_size(surface);
509                 rt_tile_free_space(rt, size, it);
510
511                 it->surface = surface;
512                 it->size += size;
513                 rt->tile_cache_size += size;
514                 }
515
516         if (!it->pixbuf)
517                 {
518                 GdkPixbuf *pixbuf;
519                 guint size;
520                 pixbuf = gdk_pixbuf_new(GDK_COLORSPACE_RGB, FALSE, 8, rt->tile_width, rt->tile_height);
521
522                 size = gdk_pixbuf_get_rowstride(pixbuf) * rt->tile_height;
523                 rt_tile_free_space(rt, size, it);
524
525                 it->pixbuf = pixbuf;
526                 it->size += size;
527                 rt->tile_cache_size += size;
528                 }
529 }
530
531 /*
532  *-------------------------------------------------------------------
533  * overlays
534  *-------------------------------------------------------------------
535  */
536
537 static void rt_overlay_get_position(RendererTiles *rt, OverlayData *od,
538                                     gint *x, gint *y, gint *w, gint *h)
539 {
540         PixbufRenderer *pr = rt->pr;
541         gint px, py, pw, ph;
542
543         pw = gdk_pixbuf_get_width(od->pixbuf);
544         ph = gdk_pixbuf_get_height(od->pixbuf);
545         px = od->x;
546         py = od->y;
547
548         if (od->flags & OVL_RELATIVE)
549                 {
550                 if (px < 0) px = pr->viewport_width - pw + px;
551                 if (py < 0) py = pr->viewport_height - ph + py;
552                 }
553
554         if (x) *x = px;
555         if (y) *y = py;
556         if (w) *w = pw;
557         if (h) *h = ph;
558 }
559
560 static void rt_overlay_init_window(RendererTiles *rt, OverlayData *od)
561 {
562         PixbufRenderer *pr = rt->pr;
563         gint px, py, pw, ph;
564         GdkWindowAttr attributes;
565         gint attributes_mask;
566
567         rt_overlay_get_position(rt, od, &px, &py, &pw, &ph);
568
569         attributes.window_type = GDK_WINDOW_CHILD;
570         attributes.wclass = GDK_INPUT_OUTPUT;
571         attributes.width = pw;
572         attributes.height = ph;
573         attributes.event_mask = GDK_EXPOSURE_MASK;
574         attributes_mask = 0;
575
576         od->window = gdk_window_new(gtk_widget_get_window(GTK_WIDGET(pr)), &attributes, attributes_mask);
577         gdk_window_set_user_data(od->window, pr);
578         gdk_window_move(od->window, px + rt->stereo_off_x, py + rt->stereo_off_y);
579         gdk_window_show(od->window);
580 }
581
582 static void rt_overlay_draw(RendererTiles *rt, gint x, gint y, gint w, gint h,
583                             ImageTile *it)
584 {
585         PixbufRenderer *pr = rt->pr;
586         GtkWidget *box;
587         GList *work;
588
589         box = GTK_WIDGET(pr);
590
591         work = rt->overlay_list;
592         while (work)
593                 {
594                 OverlayData *od;
595                 gint px, py, pw, ph;
596                 gint rx, ry, rw, rh;
597
598                 od = work->data;
599                 work = work->next;
600
601                 if (!od->window) rt_overlay_init_window(rt, od);
602                 
603                 rt_overlay_get_position(rt, od, &px, &py, &pw, &ph);
604                 if (pr_clip_region(x, y, w, h, px, py, pw, ph, &rx, &ry, &rw, &rh))
605                         {
606                         if (!rt->overlay_buffer)
607                                 {
608                                 rt->overlay_buffer = gdk_window_create_similar_surface(gtk_widget_get_window((GtkWidget *)pr),
609                                                             CAIRO_CONTENT_COLOR,
610                                                             rt->tile_width, rt->tile_height);
611                                 }
612
613                         if (it)
614                                 {
615                                 cairo_t *cr;
616
617                                 cr = cairo_create(rt->overlay_buffer);
618                                 cairo_set_source_surface(cr, it->surface, (pr->x_offset + (it->x - rt->x_scroll)) - rx, (pr->y_offset + (it->y - rt->y_scroll)) - ry);
619                                 cairo_rectangle(cr, 0, 0, rw, rh);
620                                 cairo_fill_preserve(cr);
621                                 
622                                 gdk_cairo_set_source_pixbuf(cr, od->pixbuf, px - rx, py - ry);
623                                 cairo_fill (cr);
624                                 cairo_destroy (cr);
625                                 
626                                 cr = gdk_cairo_create(od->window);
627                                 cairo_set_source_surface(cr, rt->overlay_buffer, rx - px, ry - py);
628                                 cairo_rectangle (cr, rx - px, ry - py, rw, rh);
629                                 cairo_fill (cr);
630                                 cairo_destroy (cr);
631
632 #if 0
633                                 
634                                 
635 #if GTK_CHECK_VERSION(2,20,0)
636                                 gdk_draw_drawable(rt->overlay_buffer, box->style->fg_gc[gtk_widget_get_state(box)],
637 #else
638                                 gdk_draw_drawable(rt->overlay_buffer, box->style->fg_gc[GTK_WIDGET_STATE(box)],
639 #endif
640                                                   it->pixmap,
641                                                   rx - (pr->x_offset + (it->x - rt->x_scroll)),
642                                                   ry - (pr->y_offset + (it->y - rt->y_scroll)),
643                                                   0, 0, rw, rh);
644                                 gdk_draw_pixbuf(rt->overlay_buffer,
645 #if GTK_CHECK_VERSION(2,20,0)
646                                                 box->style->fg_gc[gtk_widget_get_state(box)],
647 #else
648                                                 box->style->fg_gc[GTK_WIDGET_STATE(box)],
649 #endif
650                                                 od->pixbuf,
651                                                 rx - px, ry - py,
652                                                 0, 0, rw, rh,
653                                                 pr->dither_quality, rx, ry);
654 #if GTK_CHECK_VERSION(2,20,0)
655                                 gdk_draw_drawable(od->window, box->style->fg_gc[gtk_widget_get_state(box)],
656 #else
657                                 gdk_draw_drawable(od->window, box->style->fg_gc[GTK_WIDGET_STATE(box)],
658 #endif
659                                                   rt->overlay_buffer,
660                                                   0, 0,
661                                                   rx - px, ry - py, rw, rh);
662 #endif
663                                 }
664                         else
665                                 {
666                                 /* no ImageTile means region may be larger than our scratch buffer */
667                                 gint sx, sy;
668
669                                 for (sx = rx; sx < rx + rw; sx += rt->tile_width)
670                                     for (sy = ry; sy < ry + rh; sy += rt->tile_height)
671                                         {
672                                         gint sw, sh;
673                                         cairo_t *cr;
674
675                                         sw = MIN(rx + rw - sx, rt->tile_width);
676                                         sh = MIN(ry + rh - sy, rt->tile_height);
677
678                                         cr = cairo_create(rt->overlay_buffer);
679                                         cairo_set_source_rgb(cr, 0, 0, 0);
680                                         cairo_rectangle(cr, 0, 0, sw, sh);
681                                         cairo_fill_preserve(cr);
682                                 
683                                         gdk_cairo_set_source_pixbuf(cr, od->pixbuf, px - sx, py - sy);
684                                         cairo_fill (cr);
685                                         cairo_destroy (cr);
686                                 
687                                         cr = gdk_cairo_create(od->window);
688                                         cairo_set_source_surface(cr, rt->overlay_buffer, sx - px, sy - py);
689                                         cairo_rectangle (cr, sx - px, sy - py, sw, sh);
690                                         cairo_fill(cr);
691                                         cairo_destroy(cr);
692
693 #if 0
694                                         gdk_draw_rectangle(rt->overlay_buffer,
695 #if GTK_CHECK_VERSION(2,20,0)
696                                                            box->style->bg_gc[gtk_widget_get_state(box)], TRUE,
697 #else
698                                                            box->style->bg_gc[GTK_WIDGET_STATE(box)], TRUE,
699 #endif
700                                                            0, 0, sw, sh);
701                                         gdk_draw_pixbuf(rt->overlay_buffer,
702 #if GTK_CHECK_VERSION(2,20,0)
703                                                         box->style->fg_gc[gtk_widget_get_state(box)],
704 #else
705                                                         box->style->fg_gc[GTK_WIDGET_STATE(box)],
706 #endif
707                                                         od->pixbuf,
708                                                         sx - px, sy - py,
709                                                         0, 0, sw, sh,
710                                                         pr->dither_quality, sx, sy);
711 #if GTK_CHECK_VERSION(2,20,0)
712                                         gdk_draw_drawable(od->window, box->style->fg_gc[gtk_widget_get_state(box)],
713 #else
714                                         gdk_draw_drawable(od->window, box->style->fg_gc[GTK_WIDGET_STATE(box)],
715 #endif
716                                                           rt->overlay_buffer,
717                                                           0, 0,
718                                                           sx - px, sy - py, sw, sh);
719 #endif
720                                         }
721                                 }
722                         }
723                 }
724 }
725
726 static void rt_overlay_queue_draw(RendererTiles *rt, OverlayData *od, gint x1, gint y1, gint x2, gint y2)
727 {
728         PixbufRenderer *pr = rt->pr;
729         gint x, y, w, h;
730
731         rt_overlay_get_position(rt, od, &x, &y, &w, &h);
732         
733         /* add borders */
734         x -= x1;
735         y -= y1;
736         w += x1 + x2;
737         h += y1 + y2;
738         
739         rt_queue(rt, rt->x_scroll - pr->x_offset + x,
740                  rt->y_scroll - pr->y_offset + y,
741                  w, h,
742                  FALSE, TILE_RENDER_ALL, FALSE, FALSE);
743
744         rt_border_draw(rt, x, y, w, h);
745 }
746
747 static void rt_overlay_queue_all(RendererTiles *rt, gint x1, gint y1, gint x2, gint y2)
748 {
749         GList *work;
750
751         work = rt->overlay_list;
752         while (work)
753                 {
754                 OverlayData *od = work->data;
755                 work = work->next;
756
757                 rt_overlay_queue_draw(rt, od, x1, y1, x2, y2);
758                 }
759 }
760
761 static void rt_overlay_update_sizes(RendererTiles *rt)
762 {
763         GList *work;
764
765         work = rt->overlay_list;
766         while (work)
767                 {
768                 OverlayData *od = work->data;
769                 work = work->next;
770                 
771                 if (!od->window) rt_overlay_init_window(rt, od);
772                 
773                 if (od->flags & OVL_RELATIVE)
774                         {
775                         gint x, y, w, h;
776
777                         rt_overlay_get_position(rt, od, &x, &y, &w, &h);
778                         gdk_window_move_resize(od->window, x + rt->stereo_off_x, y + rt->stereo_off_y, w, h);
779                         }
780                 }
781 }
782
783 static OverlayData *rt_overlay_find(RendererTiles *rt, gint id)
784 {
785         GList *work;
786
787         work = rt->overlay_list;
788         while (work)
789                 {
790                 OverlayData *od = work->data;
791                 work = work->next;
792
793                 if (od->id == id) return od;
794                 }
795
796         return NULL;
797 }
798
799
800 gint renderer_tiles_overlay_add(RendererTiles *rt, GdkPixbuf *pixbuf, gint x, gint y,
801                                  OverlayRendererFlags flags)
802 {
803         PixbufRenderer *pr = rt->pr;
804         OverlayData *od;
805         gint id;
806
807         g_return_val_if_fail(IS_PIXBUF_RENDERER(pr), -1);
808         g_return_val_if_fail(pixbuf != NULL, -1);
809
810         id = 1;
811         while (rt_overlay_find(rt, id)) id++;
812
813         od = g_new0(OverlayData, 1);
814         od->id = id;
815         od->pixbuf = pixbuf;
816         g_object_ref(G_OBJECT(od->pixbuf));
817         od->x = x;
818         od->y = y;
819         od->flags = flags;
820
821         rt_overlay_init_window(rt, od);
822         
823         rt->overlay_list = g_list_append(rt->overlay_list, od);
824
825         rt_overlay_queue_draw(rt, od, 0, 0, 0, 0);
826
827         return od->id;
828 }
829
830 static void rt_overlay_free(RendererTiles *rt, OverlayData *od)
831 {
832         rt->overlay_list = g_list_remove(rt->overlay_list, od);
833
834         if (od->pixbuf) g_object_unref(G_OBJECT(od->pixbuf));
835         if (od->window) gdk_window_destroy(od->window);
836         g_free(od);
837
838         if (!rt->overlay_list && rt->overlay_buffer)
839                 {
840                 cairo_surface_destroy(rt->overlay_buffer);
841                 rt->overlay_buffer = NULL;
842                 }
843 }
844
845 static void rt_overlay_list_clear(RendererTiles *rt)
846 {
847         while (rt->overlay_list)
848                 {
849                 OverlayData *od;
850
851                 od = rt->overlay_list->data;
852                 rt_overlay_free(rt, od);
853                 }
854 }
855
856 static void rt_overlay_list_reset_window(RendererTiles *rt)
857 {
858         GList *work;
859
860         if (rt->overlay_buffer) cairo_surface_destroy(rt->overlay_buffer);
861         rt->overlay_buffer = NULL;
862
863         work = rt->overlay_list;
864         while (work)
865                 {
866                 OverlayData *od = work->data;
867                 work = work->next;
868                 if (od->window) gdk_window_destroy(od->window);
869                 od->window = NULL;
870                 }
871 }
872
873 void renderer_tiles_overlay_set(RendererTiles *rt, gint id, GdkPixbuf *pixbuf, gint x, gint y)
874 {
875         PixbufRenderer *pr = rt->pr;
876         OverlayData *od;
877
878         g_return_if_fail(IS_PIXBUF_RENDERER(pr));
879
880         od = rt_overlay_find(rt, id);
881         if (!od) return;
882
883         if (pixbuf)
884                 {
885                 gint px, py, pw, ph;
886
887                 g_object_ref(G_OBJECT(pixbuf));
888                 g_object_unref(G_OBJECT(od->pixbuf));
889                 od->pixbuf = pixbuf;
890
891                 od->x = x;
892                 od->y = y;
893
894                 if (!od->window) rt_overlay_init_window(rt, od);
895
896                 rt_overlay_queue_draw(rt, od, 0, 0, 0, 0);
897                 rt_overlay_get_position(rt, od, &px, &py, &pw, &ph);
898                 gdk_window_move_resize(od->window, px + rt->stereo_off_x, py + rt->stereo_off_y, pw, ph);
899                 }
900         else
901                 {
902                 rt_overlay_queue_draw(rt, od, 0, 0, 0, 0);
903                 rt_overlay_free(rt, od);
904                 }
905 }
906
907 gboolean renderer_tiles_overlay_get(RendererTiles *rt, gint id, GdkPixbuf **pixbuf, gint *x, gint *y)
908 {
909         PixbufRenderer *pr = rt->pr;
910         OverlayData *od;
911
912         g_return_val_if_fail(IS_PIXBUF_RENDERER(pr), FALSE);
913
914         od = rt_overlay_find(rt, id);
915         if (!od) return FALSE;
916
917         if (pixbuf) *pixbuf = od->pixbuf;
918         if (x) *x = od->x;
919         if (y) *y = od->y;
920
921         return TRUE;
922 }
923
924 static void rt_hierarchy_changed_cb(GtkWidget *widget, GtkWidget *previous_toplevel, gpointer data)
925 {
926         RendererTiles *rt = data;
927         rt_overlay_list_reset_window(rt);
928 }
929
930 /*
931  *-------------------------------------------------------------------
932  * drawing
933  *-------------------------------------------------------------------
934  */
935
936 static GdkPixbuf *rt_get_spare_tile(RendererTiles *rt)
937 {
938         if (!rt->spare_tile) rt->spare_tile = gdk_pixbuf_new(GDK_COLORSPACE_RGB, FALSE, 8, rt->tile_width, rt->tile_height);
939         return rt->spare_tile;
940 }
941
942 #define COLOR_BYTES 3   /* rgb */
943
944 static void rt_tile_rotate_90_clockwise(RendererTiles *rt, GdkPixbuf **tile, gint x, gint y, gint w, gint h)
945 {
946         GdkPixbuf *src = *tile;
947         GdkPixbuf *dest;
948         gint srs, drs;
949         guchar *s_pix, *d_pix;
950         guchar *sp, *dp;
951         guchar *ip, *spi, *dpi;
952         gint i, j;
953         gint tw = rt->tile_width;
954
955         srs = gdk_pixbuf_get_rowstride(src);
956         s_pix = gdk_pixbuf_get_pixels(src);
957         spi = s_pix + (x * COLOR_BYTES);
958
959         dest = rt_get_spare_tile(rt);
960         drs = gdk_pixbuf_get_rowstride(dest);
961         d_pix = gdk_pixbuf_get_pixels(dest);
962         dpi = d_pix + (tw - 1) * COLOR_BYTES;
963
964         for (i = y; i < y + h; i++)
965                 {
966                 sp = spi + (i * srs);
967                 ip = dpi - (i * COLOR_BYTES);
968                 for (j = x; j < x + w; j++)
969                         {
970                         dp = ip + (j * drs);
971                         memcpy(dp, sp, COLOR_BYTES);
972                         sp += COLOR_BYTES;
973                         }
974                 }
975
976         rt->spare_tile = src;
977         *tile = dest;
978 }
979
980 static void rt_tile_rotate_90_counter_clockwise(RendererTiles *rt, GdkPixbuf **tile, gint x, gint y, gint w, gint h)
981 {
982         GdkPixbuf *src = *tile;
983         GdkPixbuf *dest;
984         gint srs, drs;
985         guchar *s_pix, *d_pix;
986         guchar *sp, *dp;
987         guchar *ip, *spi, *dpi;
988         gint i, j;
989         gint th = rt->tile_height;
990
991         srs = gdk_pixbuf_get_rowstride(src);
992         s_pix = gdk_pixbuf_get_pixels(src);
993         spi = s_pix + (x * COLOR_BYTES);
994
995         dest = rt_get_spare_tile(rt);
996         drs = gdk_pixbuf_get_rowstride(dest);
997         d_pix = gdk_pixbuf_get_pixels(dest);
998         dpi = d_pix + (th - 1) * drs;
999
1000         for (i = y; i < y + h; i++)
1001                 {
1002                 sp = spi + (i * srs);
1003                 ip = dpi + (i * COLOR_BYTES);
1004                 for (j = x; j < x + w; j++)
1005                         {
1006                         dp = ip - (j * drs);
1007                         memcpy(dp, sp, COLOR_BYTES);
1008                         sp += COLOR_BYTES;
1009                         }
1010                 }
1011
1012         rt->spare_tile = src;
1013         *tile = dest;
1014 }
1015
1016 static void rt_tile_mirror_only(RendererTiles *rt, GdkPixbuf **tile, gint x, gint y, gint w, gint h)
1017 {
1018         GdkPixbuf *src = *tile;
1019         GdkPixbuf *dest;
1020         gint srs, drs;
1021         guchar *s_pix, *d_pix;
1022         guchar *sp, *dp;
1023         guchar *spi, *dpi;
1024         gint i, j;
1025
1026         gint tw = rt->tile_width;
1027
1028         srs = gdk_pixbuf_get_rowstride(src);
1029         s_pix = gdk_pixbuf_get_pixels(src);
1030         spi = s_pix + (x * COLOR_BYTES);
1031
1032         dest = rt_get_spare_tile(rt);
1033         drs = gdk_pixbuf_get_rowstride(dest);
1034         d_pix = gdk_pixbuf_get_pixels(dest);
1035         dpi =  d_pix + (tw - x - 1) * COLOR_BYTES;
1036
1037         for (i = y; i < y + h; i++)
1038                 {
1039                 sp = spi + (i * srs);
1040                 dp = dpi + (i * drs);
1041                 for (j = 0; j < w; j++)
1042                         {
1043                         memcpy(dp, sp, COLOR_BYTES);
1044                         sp += COLOR_BYTES;
1045                         dp -= COLOR_BYTES;
1046                         }
1047                 }
1048
1049         rt->spare_tile = src;
1050         *tile = dest;
1051 }
1052
1053 static void rt_tile_mirror_and_flip(RendererTiles *rt, GdkPixbuf **tile, gint x, gint y, gint w, gint h)
1054 {
1055         GdkPixbuf *src = *tile;
1056         GdkPixbuf *dest;
1057         gint srs, drs;
1058         guchar *s_pix, *d_pix;
1059         guchar *sp, *dp;
1060         guchar *spi, *dpi;
1061         gint i, j;
1062         gint tw = rt->tile_width;
1063         gint th = rt->tile_height;
1064
1065         srs = gdk_pixbuf_get_rowstride(src);
1066         s_pix = gdk_pixbuf_get_pixels(src);
1067         spi = s_pix + (x * COLOR_BYTES);
1068
1069         dest = rt_get_spare_tile(rt);
1070         drs = gdk_pixbuf_get_rowstride(dest);
1071         d_pix = gdk_pixbuf_get_pixels(dest);
1072         dpi = d_pix + (th - 1) * drs + (tw - 1) * COLOR_BYTES;
1073
1074         for (i = y; i < y + h; i++)
1075                 {
1076                 sp = s_pix + (i * srs) + (x * COLOR_BYTES);
1077                 dp = dpi - (i * drs) - (x * COLOR_BYTES);
1078                 for (j = 0; j < w; j++)
1079                         {
1080                         memcpy(dp, sp, COLOR_BYTES);
1081                         sp += COLOR_BYTES;
1082                         dp -= COLOR_BYTES;
1083                         }
1084                 }
1085
1086         rt->spare_tile = src;
1087         *tile = dest;
1088 }
1089
1090 static void rt_tile_flip_only(RendererTiles *rt, GdkPixbuf **tile, gint x, gint y, gint w, gint h)
1091 {
1092         GdkPixbuf *src = *tile;
1093         GdkPixbuf *dest;
1094         gint srs, drs;
1095         guchar *s_pix, *d_pix;
1096         guchar *sp, *dp;
1097         guchar *spi, *dpi;
1098         gint i;
1099         gint th = rt->tile_height;
1100
1101         srs = gdk_pixbuf_get_rowstride(src);
1102         s_pix = gdk_pixbuf_get_pixels(src);
1103         spi = s_pix + (x * COLOR_BYTES);
1104
1105         dest = rt_get_spare_tile(rt);
1106         drs = gdk_pixbuf_get_rowstride(dest);
1107         d_pix = gdk_pixbuf_get_pixels(dest);
1108         dpi = d_pix + (th - 1) * drs + (x * COLOR_BYTES);
1109
1110         for (i = y; i < y + h; i++)
1111                 {
1112                 sp = spi + (i * srs);
1113                 dp = dpi - (i * drs);
1114                 memcpy(dp, sp, w * COLOR_BYTES);
1115                 }
1116
1117         rt->spare_tile = src;
1118         *tile = dest;
1119 }
1120
1121 static void rt_tile_apply_orientation(RendererTiles *rt, gint orientation, GdkPixbuf **pixbuf, gint x, gint y, gint w, gint h)
1122 {
1123         switch (orientation)
1124                 {
1125                 case EXIF_ORIENTATION_TOP_LEFT:
1126                         /* normal -- nothing to do */
1127                         break;
1128                 case EXIF_ORIENTATION_TOP_RIGHT:
1129                         /* mirrored */
1130                         {
1131                                 rt_tile_mirror_only(rt, pixbuf, x, y, w, h);
1132                         }
1133                         break;
1134                 case EXIF_ORIENTATION_BOTTOM_RIGHT:
1135                         /* upside down */
1136                         {
1137                                 rt_tile_mirror_and_flip(rt, pixbuf, x, y, w, h);
1138                         }
1139                         break;
1140                 case EXIF_ORIENTATION_BOTTOM_LEFT:
1141                         /* flipped */
1142                         {
1143                                 rt_tile_flip_only(rt, pixbuf, x, y, w, h);
1144                         }
1145                         break;
1146                 case EXIF_ORIENTATION_LEFT_TOP:
1147                         {
1148                                 rt_tile_flip_only(rt, pixbuf, x, y, w, h);
1149                                 rt_tile_rotate_90_clockwise(rt, pixbuf, x, rt->tile_height - y - h, w, h);
1150                         }
1151                         break;
1152                 case EXIF_ORIENTATION_RIGHT_TOP:
1153                         /* rotated -90 (270) */
1154                         {
1155                                 rt_tile_rotate_90_clockwise(rt, pixbuf, x, y, w, h);
1156                         }
1157                         break;
1158                 case EXIF_ORIENTATION_RIGHT_BOTTOM:
1159                         {
1160                                 rt_tile_flip_only(rt, pixbuf, x, y, w, h);
1161                                 rt_tile_rotate_90_counter_clockwise(rt, pixbuf, x, rt->tile_height - y - h, w, h);
1162                         }
1163                         break;
1164                 case EXIF_ORIENTATION_LEFT_BOTTOM:
1165                         /* rotated 90 */
1166                         {
1167                                 rt_tile_rotate_90_counter_clockwise(rt, pixbuf, x, y, w, h);
1168                         }
1169                         break;
1170                 default:
1171                         /* The other values are out of range */
1172                         break;
1173                 }
1174 }
1175
1176 static gboolean rt_source_tile_render(RendererTiles *rt, ImageTile *it,
1177                                       gint x, gint y, gint w, gint h,
1178                                       gboolean new_data, gboolean fast)
1179 {
1180         PixbufRenderer *pr = rt->pr;
1181         GtkWidget *box;
1182         GList *list;
1183         GList *work;
1184         gboolean draw = FALSE;
1185
1186         box = GTK_WIDGET(pr);
1187
1188         if (pr->zoom == 1.0 || pr->scale == 1.0)
1189                 {
1190                 list = pr_source_tile_compute_region(pr, it->x + x, it->y + y, w, h, TRUE);
1191                 work = list;
1192                 while (work)
1193                         {
1194                         SourceTile *st;
1195                         gint rx, ry, rw, rh;
1196
1197                         st = work->data;
1198                         work = work->next;
1199
1200                         if (pr_clip_region(st->x, st->y, pr->source_tile_width, pr->source_tile_height,
1201                                            it->x + x, it->y + y, w, h,
1202                                            &rx, &ry, &rw, &rh))
1203                                 {
1204                                 cairo_t *cr;
1205                                 cr = cairo_create(it->surface);
1206                                 cairo_rectangle (cr, rx - it->x, ry - it->y, rw, rh);
1207
1208                                 if (st->blank)
1209                                         {
1210                                         cairo_set_source_rgb(cr, 0, 0, 0);
1211 #if 0
1212                                         gdk_draw_rectangle(it->pixmap, box->style->black_gc, TRUE,
1213                                                            rx - st->x, ry - st->y, rw, rh);
1214 #endif
1215                                         }
1216                                 else /* (pr->zoom == 1.0 || pr->scale == 1.0) */
1217                                         {
1218                                         gdk_cairo_set_source_pixbuf(cr, st->pixbuf, -it->x + st->x, -it->y + st->y);
1219 #if 0
1220                                         gdk_draw_pixbuf(it->pixmap,
1221 #if GTK_CHECK_VERSION(2,20,0)
1222                                                         box->style->fg_gc[gtk_widget_get_state(box)],
1223 #else
1224                                                         box->style->fg_gc[GTK_WIDGET_STATE(box)],
1225 #endif
1226                                                         st->pixbuf,
1227                                                         rx - st->x, ry - st->y,
1228                                                         rx - it->x, ry - it->y,
1229                                                         rw, rh,
1230                                                         pr->dither_quality, rx, ry);
1231 #endif
1232                                         }
1233                                 cairo_fill (cr);
1234                                 cairo_destroy (cr);
1235                                 }
1236                         }
1237                 }
1238         else
1239                 {
1240                 gdouble scale_x, scale_y;
1241                 gint sx, sy, sw, sh;
1242
1243                 if (pr->image_width == 0 || pr->image_height == 0) return FALSE;
1244                 scale_x = (gdouble)pr->width / pr->image_width;
1245                 scale_y = (gdouble)pr->height / pr->image_height;
1246
1247                 sx = (gdouble)(it->x + x) / scale_x;
1248                 sy = (gdouble)(it->y + y) / scale_y;
1249                 sw = (gdouble)w / scale_x;
1250                 sh = (gdouble)h / scale_y;
1251
1252                 if (pr->width < PR_MIN_SCALE_SIZE || pr->height < PR_MIN_SCALE_SIZE) fast = TRUE;
1253
1254 #if 0
1255                 /* draws red over draw region, to check for leaks (regions not filled) */
1256                 pixbuf_set_rect_fill(it->pixbuf, x, y, w, h, 255, 0, 0, 255);
1257 #endif
1258
1259                 list = pr_source_tile_compute_region(pr, sx, sy, sw, sh, TRUE);
1260                 work = list;
1261                 while (work)
1262                         {
1263                         SourceTile *st;
1264                         gint rx, ry, rw, rh;
1265                         gint stx, sty, stw, sth;
1266
1267                         st = work->data;
1268                         work = work->next;
1269
1270                         stx = floor((gdouble)st->x * scale_x);
1271                         sty = floor((gdouble)st->y * scale_y);
1272                         stw = ceil((gdouble)(st->x + pr->source_tile_width) * scale_x) - stx;
1273                         sth = ceil((gdouble)(st->y + pr->source_tile_height) * scale_y) - sty;
1274
1275                         if (pr_clip_region(stx, sty, stw, sth,
1276                                            it->x + x, it->y + y, w, h,
1277                                            &rx, &ry, &rw, &rh))
1278                                 {
1279
1280                                 if (st->blank)
1281                                         {
1282                                         cairo_t *cr;
1283                                         cr = cairo_create(it->surface);
1284                                         cairo_rectangle (cr, rx - st->x, ry - st->y, rw, rh);
1285                                         cairo_set_source_rgb(cr, 0, 0, 0);
1286                                         cairo_fill (cr);
1287                                         cairo_destroy (cr);
1288 #if 0                                   
1289                                         gdk_draw_rectangle(it->pixmap, box->style->black_gc, TRUE,
1290                                                            rx - st->x, ry - st->y, rw, rh);
1291 #endif
1292                                         }
1293                                 else
1294                                         {
1295                                         gdouble offset_x;
1296                                         gdouble offset_y;
1297
1298                                         /* may need to use unfloored stx,sty values here */
1299                                         offset_x = (gdouble)(stx - it->x);
1300                                         offset_y = (gdouble)(sty - it->y);
1301
1302                                         gdk_pixbuf_scale(st->pixbuf, it->pixbuf, rx - it->x, ry - it->y, rw, rh,
1303                                                  (gdouble) 0.0 + offset_x,
1304                                                  (gdouble) 0.0 + offset_y,
1305                                                  scale_x, scale_y,
1306                                                  (fast) ? GDK_INTERP_NEAREST : pr->zoom_quality);
1307                                         draw = TRUE;
1308                                         }
1309                                 }
1310                         }
1311                 }
1312
1313         g_list_free(list);
1314
1315         return draw;
1316 }
1317
1318 static void rt_tile_get_region(gboolean has_alpha, 
1319                                const GdkPixbuf *src, GdkPixbuf *dest,
1320                                int pb_x, int pb_y, int pb_w, int pb_h,
1321                                double offset_x, double offset_y, double scale_x, double scale_y,
1322                                GdkInterpType interp_type,
1323                                int check_x, int check_y)
1324 {
1325         if (!has_alpha)
1326                 {
1327                 if (scale_x == 1.0 && scale_y == 1.0)
1328                         {
1329                         gdk_pixbuf_copy_area(src,
1330                                              -offset_x + pb_x, -offset_y + pb_y,
1331                                              pb_w, pb_h,
1332                                              dest,
1333                                              pb_x, pb_y);
1334                         } 
1335                 else
1336                         {
1337                         gdk_pixbuf_scale(src, dest, 
1338                                          pb_x, pb_y, pb_w, pb_h,
1339                                          offset_x,
1340                                          offset_y,
1341                                          scale_x, scale_y,
1342                                          interp_type);
1343                         }
1344                 }
1345         else
1346                 {
1347                 gdk_pixbuf_composite_color(src, dest, 
1348                                          pb_x, pb_y, pb_w, pb_h,
1349                                          offset_x,
1350                                          offset_y,
1351                                          scale_x, scale_y,
1352                                          interp_type,
1353                                          255, check_x, check_y,
1354                                          PR_ALPHA_CHECK_SIZE, PR_ALPHA_CHECK1, PR_ALPHA_CHECK2);
1355                 }
1356 }
1357
1358
1359 static gint rt_get_orientation(RendererTiles *rt)
1360 {
1361         PixbufRenderer *pr = rt->pr;
1362
1363         gint orientation = pr->orientation;
1364         static const gint mirror[]       = {1,   2, 1, 4, 3, 6, 5, 8, 7};
1365         static const gint flip[]         = {1,   4, 3, 2, 1, 8, 7, 6, 5};
1366
1367         if (rt->stereo_mode & PR_STEREO_MIRROR) orientation = mirror[orientation];
1368         if (rt->stereo_mode & PR_STEREO_FLIP) orientation = flip[orientation];
1369         return orientation;
1370 }
1371
1372
1373 static void rt_tile_render(RendererTiles *rt, ImageTile *it,
1374                            gint x, gint y, gint w, gint h,
1375                            gboolean new_data, gboolean fast)
1376 {
1377         PixbufRenderer *pr = rt->pr;
1378         GtkWidget *box;
1379         gboolean has_alpha;
1380         gboolean draw = FALSE;
1381         gint orientation = rt_get_orientation(rt);
1382
1383         if (it->render_todo == TILE_RENDER_NONE && it->surface && !new_data) return;
1384
1385         if (it->render_done != TILE_RENDER_ALL)
1386                 {
1387                 x = 0;
1388                 y = 0;
1389                 w = it->w;
1390                 h = it->h;
1391                 if (!fast) it->render_done = TILE_RENDER_ALL;
1392                 }
1393         else if (it->render_todo != TILE_RENDER_AREA)
1394                 {
1395                 if (!fast) it->render_todo = TILE_RENDER_NONE;
1396                 return;
1397                 }
1398
1399         if (!fast) it->render_todo = TILE_RENDER_NONE;
1400
1401         if (new_data) it->blank = FALSE;
1402
1403         rt_tile_prepare(rt, it);
1404         has_alpha = (pr->pixbuf && gdk_pixbuf_get_has_alpha(pr->pixbuf));
1405
1406         box = GTK_WIDGET(pr);
1407
1408         /* FIXME checker colors for alpha should be configurable,
1409          * also should be drawn for blank = TRUE
1410          */
1411
1412         if (it->blank)
1413                 {
1414                 /* no data, do fast rect fill */
1415                 cairo_t *cr;
1416                 cr = cairo_create(it->surface);
1417                 cairo_rectangle (cr, 0, 0, it->w, it->h);
1418                 cairo_set_source_rgb(cr, 0, 0, 0);
1419                 cairo_fill (cr);
1420                 cairo_destroy (cr);
1421 #if 0
1422                 gdk_draw_rectangle(it->pixmap, box->style->black_gc, TRUE,
1423                                    0, 0, it->w, it->h);
1424 #endif
1425                 }
1426         else if (pr->source_tiles_enabled)
1427                 {
1428                 draw = rt_source_tile_render(rt, it, x, y, w, h, new_data, fast);
1429                 }
1430         else if ((pr->zoom == 1.0 || pr->scale == 1.0) &&
1431                  pr->aspect_ratio == 1.0 &&
1432                  !has_alpha &&
1433                  orientation == EXIF_ORIENTATION_TOP_LEFT && 
1434                  !(pr->func_post_process && !(pr->post_process_slow && fast)) &&
1435                  !(rt->stereo_mode & PR_STEREO_ANAGLYPH))
1436                 {
1437                 /* special case: faster, simple, scale 1.0, base orientation, no postprocessing */
1438                 cairo_t *cr;
1439                 cr = cairo_create(it->surface);
1440                 cairo_rectangle (cr, x, y, w, h);
1441                 gdk_cairo_set_source_pixbuf(cr, pr->pixbuf, -it->x - GET_RIGHT_PIXBUF_OFFSET(rt), -it->y);
1442                 cairo_fill (cr);
1443                 cairo_destroy (cr);
1444
1445 #if 0
1446                 gdk_draw_pixbuf(it->pixmap, 
1447 #if GTK_CHECK_VERSION(2,20,0)
1448                                 box->style->fg_gc[gtk_widget_get_state(box)],
1449 #else
1450                                 box->style->fg_gc[GTK_WIDGET_STATE(box)],
1451 #endif
1452                                 pr->pixbuf,
1453                                 it->x + x + GET_RIGHT_PIXBUF_OFFSET(rt), it->y + y,
1454                                 x, y,
1455                                 w, h,
1456                                 pr->dither_quality, it->x + x, it->y + y);
1457 #endif
1458                 }
1459         else
1460                 {
1461                 gdouble scale_x, scale_y;
1462                 gdouble src_x, src_y;
1463                 gint pb_x, pb_y;
1464                 gint pb_w, pb_h;
1465
1466                 if (pr->image_width == 0 || pr->image_height == 0) return;
1467
1468                 scale_x = (gdouble)pr->width / pr->image_width;
1469                 scale_y = (gdouble)pr->height / pr->image_height;
1470
1471                 pr_tile_coords_map_orientation(orientation, it->x, it->y,
1472                                             pr->width, pr->height,
1473                                             rt->tile_width, rt->tile_height,
1474                                             &src_x, &src_y);
1475                 pr_tile_region_map_orientation(orientation, x, y,
1476                                             rt->tile_width, rt->tile_height,
1477                                             w, h,
1478                                             &pb_x, &pb_y,
1479                                             &pb_w, &pb_h);
1480
1481                 switch (orientation)
1482                         {
1483                         gdouble tmp;
1484                         case EXIF_ORIENTATION_LEFT_TOP:
1485                         case EXIF_ORIENTATION_RIGHT_TOP:
1486                         case EXIF_ORIENTATION_RIGHT_BOTTOM:
1487                         case EXIF_ORIENTATION_LEFT_BOTTOM:
1488                                 tmp = scale_x;
1489                                 scale_x = scale_y;
1490                                 scale_y = tmp;
1491                                 break;
1492                         default:
1493                                 /* nothing to do */
1494                                 break;
1495                         }
1496                 
1497                 /* HACK: The pixbuf scalers get kinda buggy(crash) with extremely
1498                  * small sizes for anything but GDK_INTERP_NEAREST
1499                  */
1500                 if (pr->width < PR_MIN_SCALE_SIZE || pr->height < PR_MIN_SCALE_SIZE) fast = TRUE;
1501
1502                 rt_tile_get_region(has_alpha,
1503                                    pr->pixbuf, it->pixbuf, pb_x, pb_y, pb_w, pb_h,
1504                                    (gdouble) 0.0 - src_x - GET_RIGHT_PIXBUF_OFFSET(rt) * scale_x,
1505                                    (gdouble) 0.0 - src_y,
1506                                    scale_x, scale_y,
1507                                    (fast) ? GDK_INTERP_NEAREST : pr->zoom_quality,
1508                                    it->x + pb_x, it->y + pb_y);
1509                 if (rt->stereo_mode & PR_STEREO_ANAGLYPH && 
1510                     (pr->stereo_pixbuf_offset_right > 0 || pr->stereo_pixbuf_offset_left > 0))
1511                         {
1512                         GdkPixbuf *right_pb = rt_get_spare_tile(rt);
1513                         rt_tile_get_region(has_alpha,
1514                                            pr->pixbuf, right_pb, pb_x, pb_y, pb_w, pb_h,
1515                                            (gdouble) 0.0 - src_x - GET_LEFT_PIXBUF_OFFSET(rt) * scale_x,
1516                                            (gdouble) 0.0 - src_y,
1517                                            scale_x, scale_y,
1518                                            (fast) ? GDK_INTERP_NEAREST : pr->zoom_quality,
1519                                            it->x + pb_x, it->y + pb_y);
1520                         pr_create_anaglyph(rt->stereo_mode, it->pixbuf, right_pb, pb_x, pb_y, pb_w, pb_h);
1521                         /* do not care about freeing spare_tile, it will be reused */
1522                         }
1523                 rt_tile_apply_orientation(rt, orientation, &it->pixbuf, pb_x, pb_y, pb_w, pb_h);
1524                 draw = TRUE;
1525                 }
1526
1527         if (draw && it->pixbuf && !it->blank)
1528                 {
1529                 cairo_t *cr;
1530
1531                 if (pr->func_post_process && !(pr->post_process_slow && fast))
1532                         pr->func_post_process(pr, &it->pixbuf, x, y, w, h, pr->post_process_user_data);
1533
1534                 cr = cairo_create(it->surface);
1535                 cairo_rectangle (cr, x, y, w, h);
1536                 gdk_cairo_set_source_pixbuf(cr, it->pixbuf, 0, 0);
1537                 cairo_fill (cr);
1538                 cairo_destroy (cr);
1539 #if 0
1540                 gdk_draw_pixbuf(it->pixmap,
1541 #if GTK_CHECK_VERSION(2,20,0)
1542                                 box->style->fg_gc[gtk_widget_get_state(box)],
1543 #else
1544                                 box->style->fg_gc[GTK_WIDGET_STATE(box)],
1545 #endif
1546                                 it->pixbuf,
1547                                 x, y,
1548                                 x, y,
1549                                 w, h,
1550                                 pr->dither_quality, it->x + x, it->y + y);
1551 #endif
1552                 }
1553
1554 #if 0
1555         /* enable this line for debugging the edges of tiles */
1556         gdk_draw_rectangle(it->pixmap, box->style->white_gc,
1557                            FALSE, 0, 0, it->w, it->h);
1558         gdk_draw_rectangle(it->pixmap, box->style->white_gc,
1559                            FALSE, x, y, w, h);
1560 #endif
1561 }
1562
1563
1564 static void rt_tile_expose(RendererTiles *rt, ImageTile *it,
1565                            gint x, gint y, gint w, gint h,
1566                            gboolean new_data, gboolean fast)
1567 {
1568         PixbufRenderer *pr = rt->pr;
1569         GtkWidget *box;
1570         GdkWindow *window;
1571         cairo_t *cr;
1572
1573         /* clamp to visible */
1574         if (it->x + x < rt->x_scroll)
1575                 {
1576                 w -= rt->x_scroll - it->x - x;
1577                 x = rt->x_scroll - it->x;
1578                 }
1579         if (it->x + x + w > rt->x_scroll + pr->vis_width)
1580                 {
1581                 w = rt->x_scroll + pr->vis_width - it->x - x; 
1582                 }
1583         if (w < 1) return;
1584         if (it->y + y < rt->y_scroll)
1585                 {
1586                 h -= rt->y_scroll - it->y - y;
1587                 y = rt->y_scroll - it->y;
1588                 }
1589         if (it->y + y + h > rt->y_scroll + pr->vis_height)
1590                 {
1591                 h = rt->y_scroll + pr->vis_height - it->y - y; 
1592                 }
1593         if (h < 1) return;
1594
1595         rt_tile_render(rt, it, x, y, w, h, new_data, fast);
1596
1597         box = GTK_WIDGET(pr);
1598         window = gtk_widget_get_window(box);
1599
1600         cr = gdk_cairo_create(window);
1601         cairo_set_source_surface(cr, it->surface, pr->x_offset + (it->x - rt->x_scroll) + rt->stereo_off_x, pr->y_offset + (it->y - rt->y_scroll) + rt->stereo_off_y);
1602         cairo_rectangle (cr, pr->x_offset + (it->x - rt->x_scroll) + x + rt->stereo_off_x, pr->y_offset + (it->y - rt->y_scroll) + y + rt->stereo_off_y, w, h);
1603         cairo_fill (cr);
1604         cairo_destroy (cr);
1605
1606 #if 0
1607 #if GTK_CHECK_VERSION(2,20,0)
1608         gdk_draw_drawable(window, box->style->fg_gc[gtk_widget_get_state(box)],
1609 #else
1610         gdk_draw_drawable(window, box->style->fg_gc[GTK_WIDGET_STATE(box)],
1611 #endif
1612                           it->pixmap, x, y,
1613                           pr->x_offset + (it->x - rt->x_scroll) + x + rt->stereo_off_x, pr->y_offset + (it->y - rt->y_scroll) + y + rt->stereo_off_y, w, h);
1614 #endif
1615
1616         if (rt->overlay_list)
1617                 {
1618                 rt_overlay_draw(rt, pr->x_offset + (it->x - rt->x_scroll) + x,
1619                                 pr->y_offset + (it->y - rt->y_scroll) + y,
1620                                 w, h,
1621                                 it);
1622                 }
1623 }
1624
1625
1626 static gboolean rt_tile_is_visible(RendererTiles *rt, ImageTile *it)
1627 {
1628         PixbufRenderer *pr = rt->pr;
1629         return (it->x + it->w >= rt->x_scroll && it->x < rt->x_scroll + pr->vis_width &&
1630                 it->y + it->h >= rt->y_scroll && it->y < rt->y_scroll + pr->vis_height);
1631 }
1632
1633 /*
1634  *-------------------------------------------------------------------
1635  * draw queue
1636  *-------------------------------------------------------------------
1637  */
1638
1639 static gint rt_get_queued_area(GList *work)
1640 {
1641         gint area = 0;
1642         
1643         while (work) 
1644                 {
1645                 QueueData *qd = work->data;
1646                 area += qd->w * qd->h;
1647                 work = work->next;
1648                 }
1649         return area;
1650 }
1651
1652
1653 static gboolean rt_queue_schedule_next_draw(RendererTiles *rt, gboolean force_set)
1654 {
1655         PixbufRenderer *pr = rt->pr;
1656         gfloat percent;
1657         gint visible_area = pr->vis_width * pr->vis_height;
1658         
1659         if (!pr->loading)
1660                 {
1661                 /* 2pass prio */ 
1662                 DEBUG_2("redraw priority: 2pass");
1663                 rt->draw_idle_id = g_idle_add_full(G_PRIORITY_DEFAULT_IDLE, rt_queue_draw_idle_cb, rt, NULL);
1664                 return FALSE;
1665                 }
1666         
1667         if (visible_area == 0)
1668                 {
1669                 /* not known yet */
1670                 percent = 100.0;
1671                 }
1672         else
1673                 {
1674                 percent = 100.0 * rt_get_queued_area(rt->draw_queue) / visible_area;
1675                 }
1676         
1677         if (percent > 10.0)
1678                 {
1679                 /* we have enough data for starting intensive redrawing */
1680                 DEBUG_2("redraw priority: high %.2f %%", percent);
1681                 rt->draw_idle_id = g_idle_add_full(GDK_PRIORITY_REDRAW, rt_queue_draw_idle_cb, rt, NULL);
1682                 return FALSE;
1683                 }
1684         
1685         if (percent < 1.0 || force_set)
1686                 {
1687                 /* queue is (almost) empty, wait  50 ms*/
1688                 DEBUG_2("redraw priority: wait %.2f %%", percent);
1689                 rt->draw_idle_id = g_timeout_add_full(G_PRIORITY_DEFAULT_IDLE, 50, rt_queue_draw_idle_cb, rt, NULL);
1690                 return FALSE;
1691                 }
1692         
1693         /* keep the same priority as before */
1694         DEBUG_2("redraw priority: no change %.2f %%", percent);
1695         return TRUE;
1696 }
1697                 
1698
1699 static gboolean rt_queue_draw_idle_cb(gpointer data)
1700 {
1701         RendererTiles *rt = data;
1702         PixbufRenderer *pr = rt->pr;
1703         QueueData *qd;
1704         gboolean fast;
1705
1706
1707         if ((!pr->pixbuf && !pr->source_tiles_enabled) ||
1708             (!rt->draw_queue && !rt->draw_queue_2pass) ||
1709             !rt->draw_idle_id)
1710                 {
1711                 pr_render_complete_signal(pr);
1712
1713                 rt->draw_idle_id = 0;
1714                 return FALSE;
1715                 }
1716
1717         if (rt->draw_queue)
1718                 {
1719                 qd = rt->draw_queue->data;
1720                 fast = (pr->zoom_2pass && ((pr->zoom_quality != GDK_INTERP_NEAREST && pr->scale != 1.0) || pr->post_process_slow));
1721                 }
1722         else
1723                 {
1724                 if (pr->loading)
1725                         {
1726                         /* still loading, wait till done (also drops the higher priority) */
1727
1728                         return rt_queue_schedule_next_draw(rt, FALSE);
1729                         }
1730
1731                 qd = rt->draw_queue_2pass->data;
1732                 fast = FALSE;
1733                 }
1734
1735 #if GTK_CHECK_VERSION(2,20,0)
1736         if (gtk_widget_get_realized(pr))
1737 #else
1738         if (GTK_WIDGET_REALIZED(pr))
1739 #endif
1740                 {
1741                 if (rt_tile_is_visible(rt, qd->it))
1742                         {
1743                         rt_tile_expose(rt, qd->it, qd->x, qd->y, qd->w, qd->h, qd->new_data, fast);
1744                         }
1745                 else if (qd->new_data)
1746                         {
1747                         /* if new pixel data, and we already have a pixmap, update the tile */
1748                         qd->it->blank = FALSE;
1749                         if (qd->it->surface && qd->it->render_done == TILE_RENDER_ALL)
1750                                 {
1751                                 rt_tile_render(rt, qd->it, qd->x, qd->y, qd->w, qd->h, qd->new_data, fast);
1752                                 }
1753                         }
1754                 }
1755
1756         if (rt->draw_queue)
1757                 {
1758                 qd->it->qd = NULL;
1759                 rt->draw_queue = g_list_remove(rt->draw_queue, qd);
1760                 if (fast)
1761                         {
1762                         if (qd->it->qd2)
1763                                 {
1764                                 rt_queue_merge(qd->it->qd2, qd);
1765                                 g_free(qd);
1766                                 }
1767                         else
1768                                 {
1769                                 qd->it->qd2 = qd;
1770                                 rt->draw_queue_2pass = g_list_append(rt->draw_queue_2pass, qd);
1771                                 }
1772                         }
1773                 else
1774                         {
1775                         g_free(qd);
1776                         }
1777                 }
1778         else
1779                 {
1780                 qd->it->qd2 = NULL;
1781                 rt->draw_queue_2pass = g_list_remove(rt->draw_queue_2pass, qd);
1782                 g_free(qd);
1783                 }
1784
1785         if (!rt->draw_queue && !rt->draw_queue_2pass)
1786                 {
1787                 pr_render_complete_signal(pr);
1788
1789                 rt->draw_idle_id = 0;
1790                 return FALSE;
1791                 }
1792
1793                 return rt_queue_schedule_next_draw(rt, FALSE);
1794 }
1795
1796 static void rt_queue_list_free(GList *list)
1797 {
1798         GList *work;
1799
1800         work = list;
1801         while (work)
1802                 {
1803                 QueueData *qd;
1804
1805                 qd = work->data;
1806                 work = work->next;
1807
1808                 qd->it->qd = NULL;
1809                 qd->it->qd2 = NULL;
1810                 g_free(qd);
1811                 }
1812
1813         g_list_free(list);
1814 }
1815
1816 static void rt_queue_clear(RendererTiles *rt)
1817 {
1818         rt_queue_list_free(rt->draw_queue);
1819         rt->draw_queue = NULL;
1820
1821         rt_queue_list_free(rt->draw_queue_2pass);
1822         rt->draw_queue_2pass = NULL;
1823
1824         if (rt->draw_idle_id)
1825                 {
1826                 g_source_remove(rt->draw_idle_id);
1827                 rt->draw_idle_id = 0;
1828                 }
1829         rt_sync_scroll(rt);
1830 }
1831
1832 static void rt_queue_merge(QueueData *parent, QueueData *qd)
1833 {
1834         if (parent->x + parent->w < qd->x + qd->w)
1835                 {
1836                 parent->w += (qd->x + qd->w) - (parent->x + parent->w);
1837                 }
1838         if (parent->x > qd->x)
1839                 {
1840                 parent->w += parent->x - qd->x;
1841                 parent->x = qd->x;
1842                 }
1843
1844         if (parent->y + parent->h < qd->y + qd->h)
1845                 {
1846                 parent->h += (qd->y + qd->h) - (parent->y + parent->h);
1847                 }
1848         if (parent->y > qd->y)
1849                 {
1850                 parent->h += parent->y - qd->y;
1851                 parent->y = qd->y;
1852                 }
1853
1854         parent->new_data |= qd->new_data;
1855 }
1856
1857 static gboolean rt_clamp_to_visible(RendererTiles *rt, gint *x, gint *y, gint *w, gint *h)
1858 {
1859         PixbufRenderer *pr = rt->pr;
1860         gint nx, ny;
1861         gint nw, nh;
1862         gint vx, vy;
1863         gint vw, vh;
1864
1865         vw = pr->vis_width;
1866         vh = pr->vis_height;
1867
1868         vx = rt->x_scroll;
1869         vy = rt->y_scroll;
1870
1871         if (*x + *w < vx || *x > vx + vw || *y + *h < vy || *y > vy + vh) return FALSE;
1872
1873         /* now clamp it */
1874         nx = CLAMP(*x, vx, vx + vw);
1875         nw = CLAMP(*w - (nx - *x), 1, vw);
1876
1877         ny = CLAMP(*y, vy, vy + vh);
1878         nh = CLAMP(*h - (ny - *y), 1, vh);
1879
1880         *x = nx;
1881         *y = ny;
1882         *w = nw;
1883         *h = nh;
1884
1885         return TRUE;
1886 }
1887
1888 static gboolean rt_queue_to_tiles(RendererTiles *rt, gint x, gint y, gint w, gint h,
1889                                   gboolean clamp, ImageRenderType render,
1890                                   gboolean new_data, gboolean only_existing)
1891 {
1892         PixbufRenderer *pr = rt->pr;
1893         gint i, j;
1894         gint x1, x2;
1895         gint y1, y2;
1896
1897         if (clamp && !rt_clamp_to_visible(rt, &x, &y, &w, &h)) return FALSE;
1898
1899         x1 = ROUND_DOWN(x, rt->tile_width);
1900         x2 = ROUND_UP(x + w, rt->tile_width);
1901
1902         y1 = ROUND_DOWN(y, rt->tile_height);
1903         y2 = ROUND_UP(y + h, rt->tile_height);
1904
1905         for (j = y1; j <= y2; j += rt->tile_height)
1906                 {
1907                 for (i = x1; i <= x2; i += rt->tile_width)
1908                         {
1909                         ImageTile *it;
1910
1911                         it = rt_tile_get(rt, i, j,
1912                                          (only_existing &&
1913                                           (i + rt->tile_width < rt->x_scroll ||
1914                                            i > rt->x_scroll + pr->vis_width ||
1915                                            j + rt->tile_height < rt->y_scroll ||
1916                                            j > rt->y_scroll + pr->vis_height)));
1917                         if (it)
1918                                 {
1919                                 QueueData *qd;
1920
1921                                 if ((render == TILE_RENDER_ALL && it->render_done != TILE_RENDER_ALL) ||
1922                                     (render == TILE_RENDER_AREA && it->render_todo != TILE_RENDER_ALL))
1923                                         {
1924                                         it->render_todo = render;
1925                                         }
1926
1927                                 qd = g_new(QueueData, 1);
1928                                 qd->it = it;
1929                                 qd->new_data = new_data;
1930
1931                                 if (i < x)
1932                                         {
1933                                         qd->x = x - i;
1934                                         }
1935                                 else
1936                                         {
1937                                         qd->x = 0;
1938                                         }
1939                                 qd->w = x + w - i - qd->x;
1940                                 if (qd->x + qd->w > rt->tile_width) qd->w = rt->tile_width - qd->x;
1941
1942                                 if (j < y)
1943                                         {
1944                                         qd->y = y - j;
1945                                         }
1946                                 else
1947                                         {
1948                                         qd->y = 0;
1949                                         }
1950                                 qd->h = y + h - j - qd->y;
1951                                 if (qd->y + qd->h > rt->tile_height) qd->h = rt->tile_height - qd->y;
1952
1953                                 if (qd->w < 1 || qd->h < 1)
1954                                         {
1955                                         g_free(qd);
1956                                         }
1957                                 else if (it->qd)
1958                                         {
1959                                         rt_queue_merge(it->qd, qd);
1960                                         g_free(qd);
1961                                         }
1962                                 else
1963                                         {
1964                                         it->qd = qd;
1965                                         rt->draw_queue = g_list_append(rt->draw_queue, qd);
1966                                         }
1967                                 }
1968                         }
1969                 }
1970
1971         return TRUE;
1972 }
1973
1974 static void rt_queue(RendererTiles *rt, gint x, gint y, gint w, gint h,
1975                      gboolean clamp, ImageRenderType render,
1976                      gboolean new_data, gboolean only_existing)
1977 {
1978         PixbufRenderer *pr = rt->pr;
1979         gint nx, ny;
1980
1981         rt_sync_scroll(rt);
1982
1983         nx = CLAMP(x, 0, pr->width - 1);
1984         ny = CLAMP(y, 0, pr->height - 1);
1985         w -= (nx - x);
1986         h -= (ny - y);
1987         w = CLAMP(w, 0, pr->width - nx);
1988         h = CLAMP(h, 0, pr->height - ny);
1989         if (w < 1 || h < 1) return;
1990
1991         if (rt_queue_to_tiles(rt, nx, ny, w, h, clamp, render, new_data, only_existing) &&
1992             ((!rt->draw_queue && !rt->draw_queue_2pass) || !rt->draw_idle_id))
1993                 {
1994                 if (rt->draw_idle_id)
1995                         {
1996                         g_source_remove(rt->draw_idle_id);
1997                         rt->draw_idle_id = 0;
1998                         }
1999                 rt_queue_schedule_next_draw(rt, TRUE);
2000                 }
2001 }
2002
2003 static void rt_scroll(RendererTiles *rt, gint x_off, gint y_off)
2004 {
2005         PixbufRenderer *pr = rt->pr;
2006
2007         rt_sync_scroll(rt);
2008         if (rt->stereo_mode & PR_STEREO_MIRROR) x_off = -x_off;
2009         if (rt->stereo_mode & PR_STEREO_FLIP) y_off = -y_off; 
2010
2011         gint w = pr->vis_width - abs(x_off);
2012         gint h = pr->vis_height - abs(y_off);
2013
2014         if (w < 1 || h < 1)
2015                 {
2016                 /* scrolled completely to new material */
2017                 rt_queue(rt, 0, 0, pr->width, pr->height, TRUE, TILE_RENDER_ALL, FALSE, FALSE);
2018                 return;
2019                 }
2020         else
2021                 {
2022                 gint x1, y1;
2023                 gint x2, y2;
2024                 GtkWidget *box;
2025                 GdkWindow *window;
2026 //              GdkGC *gc;
2027                 GdkEvent *event;
2028                 cairo_t *cr;
2029                 cairo_surface_t *surface;
2030
2031                 if (x_off < 0)
2032                         {
2033                         x1 = abs(x_off);
2034                         x2 = 0;
2035                         }
2036                 else
2037                         {
2038                         x1 = 0;
2039                         x2 = abs(x_off);
2040                         }
2041
2042                 if (y_off < 0)
2043                         {
2044                         y1 = abs(y_off);
2045                         y2 = 0;
2046                         }
2047                 else
2048                         {
2049                         y1 = 0;
2050                         y2 = abs(y_off);
2051                         }
2052
2053                 box = GTK_WIDGET(pr);
2054                 window = gtk_widget_get_window(box);
2055
2056                 cr = gdk_cairo_create(window);
2057                 surface = cairo_get_target(cr);
2058                 /* clipping restricts the intermediate surface's size, so it's a good idea
2059                  * to use it. */
2060                 cairo_rectangle(cr, x1 + pr->x_offset + rt->stereo_off_x, y1 + pr->y_offset + rt->stereo_off_y, w, h);
2061                 cairo_clip (cr);
2062                 /* Now push a group to change the target */
2063                 cairo_push_group (cr);
2064                 cairo_set_source_surface(cr, surface, x1 - x2, y1 - y2);
2065                 cairo_paint(cr);
2066                 /* Now copy the intermediate target back */
2067                 cairo_pop_group_to_source(cr);
2068                 cairo_paint(cr);
2069                 cairo_destroy(cr);
2070 #if 0
2071                 gc = gdk_gc_new(window);
2072                 gdk_gc_set_exposures(gc, TRUE);
2073                 gdk_draw_drawable(window, gc,
2074                                   window,
2075                                   x2 + pr->x_offset + rt->stereo_off_x, y2 + pr->y_offset + rt->stereo_off_y,
2076                                   x1 + pr->x_offset + rt->stereo_off_x, y1 + pr->y_offset + rt->stereo_off_y, w, h);
2077                 g_object_unref(gc);
2078 #endif
2079
2080                 rt_overlay_queue_all(rt, x2, y2, x1, y1);
2081
2082                 w = pr->vis_width - w;
2083                 h = pr->vis_height - h;
2084
2085                 if (w > 0)
2086                         {
2087                         rt_queue(rt,
2088                                     x_off > 0 ? rt->x_scroll + (pr->vis_width - w) : rt->x_scroll, rt->y_scroll,
2089                                     w, pr->vis_height, TRUE, TILE_RENDER_ALL, FALSE, FALSE);
2090                         }
2091                 if (h > 0)
2092                         {
2093                         /* FIXME, to optimize this, remove overlap */
2094                         rt_queue(rt,
2095                                     rt->x_scroll, y_off > 0 ? rt->y_scroll + (pr->vis_height - h) : rt->y_scroll,
2096                                     pr->vis_width, h, TRUE, TILE_RENDER_ALL, FALSE, FALSE);
2097                         }
2098
2099                 /* process exposures here, "expose_event" seems to miss a few with obstructed windows */
2100 #if ! GTK_CHECK_VERSION(2,18,0)
2101                 while ((event = gdk_event_get_graphics_expose(window)) != NULL)
2102                         {
2103                         renderer_redraw((void *) rt, event->expose.area.x, event->expose.area.y, event->expose.area.width, event->expose.area.height,
2104                               FALSE, TILE_RENDER_ALL, FALSE, FALSE);
2105  
2106                         if (event->expose.count == 0)
2107                                 {
2108                                 gdk_event_free(event);
2109                                 break;
2110                                 }
2111                         gdk_event_free(event);
2112                         }
2113 #endif
2114                 }
2115 }
2116
2117 static void renderer_area_changed(void *renderer, gint src_x, gint src_y, gint src_w, gint src_h)
2118 {
2119         RendererTiles *rt = (RendererTiles *)renderer;
2120         PixbufRenderer *pr = rt->pr;
2121         gint x, y, width, height,  x1, y1, x2, y2;
2122
2123         gint orientation = rt_get_orientation(rt);
2124         pr_coords_map_orientation_reverse(orientation,
2125                                      src_x - GET_RIGHT_PIXBUF_OFFSET(rt), src_y,
2126                                      pr->image_width, pr->image_height,
2127                                      src_w, src_h,
2128                                      &x, &y,
2129                                      &width, &height);
2130
2131         if (pr->scale != 1.0 && pr->zoom_quality != GDK_INTERP_NEAREST)
2132                 {
2133                 /* increase region when using a zoom quality that may access surrounding pixels */
2134                 y -= 1;
2135                 height += 2;
2136                 }
2137
2138         x1 = (gint)floor((gdouble)x * pr->scale);
2139         y1 = (gint)floor((gdouble)y * pr->scale * pr->aspect_ratio);
2140         x2 = (gint)ceil((gdouble)(x + width) * pr->scale);
2141         y2 = (gint)ceil((gdouble)(y + height) * pr->scale * pr->aspect_ratio);
2142
2143         rt_queue(rt, x1, y1, x2 - x1, y2 - y1, FALSE, TILE_RENDER_AREA, TRUE, TRUE);
2144 }
2145
2146 static void renderer_redraw(void *renderer, gint x, gint y, gint w, gint h,
2147                      gint clamp, ImageRenderType render, gboolean new_data, gboolean only_existing)
2148 {
2149         RendererTiles *rt = (RendererTiles *)renderer;
2150         PixbufRenderer *pr = rt->pr;
2151
2152         x -= rt->stereo_off_x;
2153         y -= rt->stereo_off_y;
2154         
2155         rt_border_draw(rt, x, y, w, h);
2156
2157         x = MAX(0, x - pr->x_offset + pr->x_scroll);
2158         y = MAX(0, y - pr->y_offset + pr->y_scroll);
2159
2160         rt_queue(rt,
2161                  x, y,
2162                  MIN(w, pr->width - x),
2163                  MIN(h, pr->height - y),
2164                  clamp, render, new_data, only_existing);
2165 }
2166
2167 static void renderer_queue_clear(void *renderer)
2168 {
2169         rt_queue_clear((RendererTiles *)renderer);
2170 }
2171
2172 static void renderer_border_clear(void *renderer)
2173 {
2174         rt_border_clear((RendererTiles *)renderer);
2175 }
2176
2177
2178 static void renderer_invalidate_all(void *renderer)
2179 {
2180         rt_tile_invalidate_all((RendererTiles *)renderer);
2181 }
2182
2183 static void renderer_invalidate_region(void *renderer, gint x, gint y, gint w, gint h)
2184 {
2185         rt_tile_invalidate_region((RendererTiles *)renderer, x, y, w, h);
2186 }
2187
2188 static void renderer_overlay_draw(void *renderer, gint x, gint y, gint w, gint h)
2189 {
2190         rt_overlay_draw((RendererTiles *)renderer, x, y, w, h, NULL);
2191 }
2192
2193 static void renderer_update_sizes(void *renderer)
2194 {
2195         RendererTiles *rt = (RendererTiles *)renderer;
2196
2197         rt->stereo_off_x = 0;
2198         rt->stereo_off_y = 0;
2199         
2200         if (rt->stereo_mode & PR_STEREO_RIGHT) 
2201                 {
2202                 if (rt->stereo_mode & PR_STEREO_HORIZ) 
2203                         {
2204                         rt->stereo_off_x = rt->pr->viewport_width;
2205                         }
2206                 else if (rt->stereo_mode & PR_STEREO_VERT) 
2207                         {
2208                         rt->stereo_off_y = rt->pr->viewport_height;
2209                         }
2210                 else if (rt->stereo_mode & PR_STEREO_FIXED) 
2211                         {
2212                         rt->stereo_off_x = rt->pr->stereo_fixed_x_right;
2213                         rt->stereo_off_y = rt->pr->stereo_fixed_y_right;
2214                         }
2215                 }
2216         else
2217                 {
2218                 if (rt->stereo_mode & PR_STEREO_FIXED) 
2219                         {
2220                         rt->stereo_off_x = rt->pr->stereo_fixed_x_left;
2221                         rt->stereo_off_y = rt->pr->stereo_fixed_y_left;
2222                         }
2223                 }
2224         DEBUG_1("update size: %p  %d %d   %d %d", rt, rt->stereo_off_x, rt->stereo_off_y, rt->pr->viewport_width, rt->pr->viewport_height);
2225         rt_sync_scroll(rt);
2226         rt_overlay_update_sizes(rt);
2227 }
2228
2229 static void renderer_stereo_set(void *renderer, gint stereo_mode)
2230 {
2231         RendererTiles *rt = (RendererTiles *)renderer;
2232
2233         rt->stereo_mode = stereo_mode;
2234 }
2235
2236 static void renderer_free(void *renderer)
2237 {
2238         RendererTiles *rt = (RendererTiles *)renderer;
2239         rt_queue_clear(rt);
2240         rt_tile_free_all(rt);
2241         if (rt->spare_tile) g_object_unref(rt->spare_tile);
2242         if (rt->overlay_buffer) g_object_unref(rt->overlay_buffer);
2243         rt_overlay_list_clear(rt);
2244         /* disconnect "hierarchy-changed" */
2245         g_signal_handlers_disconnect_matched(G_OBJECT(rt->pr), G_SIGNAL_MATCH_DATA,
2246                                                      0, 0, 0, NULL, rt);
2247         g_free(rt);
2248 }
2249
2250 RendererFuncs *renderer_tiles_new(PixbufRenderer *pr)
2251 {
2252         RendererTiles *rt = g_new0(RendererTiles, 1);
2253         
2254         rt->pr = pr;
2255         
2256         rt->f.redraw = renderer_redraw;
2257         rt->f.area_changed = renderer_area_changed;
2258         rt->f.queue_clear = renderer_queue_clear;
2259         rt->f.border_clear = renderer_border_clear;
2260         rt->f.free = renderer_free;
2261         rt->f.invalidate_all = renderer_invalidate_all;
2262         rt->f.invalidate_region = renderer_invalidate_region;
2263         rt->f.scroll = rt_scroll;
2264         rt->f.update_sizes = renderer_update_sizes;
2265
2266
2267         rt->f.overlay_add = renderer_tiles_overlay_add;
2268         rt->f.overlay_set = renderer_tiles_overlay_set;
2269         rt->f.overlay_get = renderer_tiles_overlay_get;
2270         rt->f.overlay_draw = renderer_overlay_draw;
2271
2272         rt->f.stereo_set = renderer_stereo_set;
2273         
2274         rt->tile_width = PR_TILE_SIZE;
2275         rt->tile_height = PR_TILE_SIZE;
2276
2277         rt->tiles = NULL;
2278         rt->tile_cache_size = 0;
2279
2280         rt->tile_cache_max = PR_CACHE_SIZE_DEFAULT;
2281
2282         rt->draw_idle_id = 0;
2283         
2284         rt->stereo_mode = 0;
2285         rt->stereo_off_x = 0;
2286         rt->stereo_off_y = 0;
2287
2288         g_signal_connect(G_OBJECT(pr), "hierarchy-changed",
2289                          G_CALLBACK(rt_hierarchy_changed_cb), rt);
2290
2291         return (RendererFuncs *) rt;
2292 }
2293
2294
2295 /* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */