2010-02-10 [colin] 3.7.5cvs16
[claws.git] / src / printing.c
1 /* Claws Mail -- a GTK+ based, lightweight, and fast e-mail client
2  * Copyright (C) 2007-2009 Holger Berndt <hb@claws-mail.org>,
3  * Colin Leroy <colin@colino.net>, and the Claws Mail team
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 3 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program. If not, see <http://www.gnu.org/licenses/>.
17  * 
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #  include "config.h"
22 #endif
23
24 #include "defs.h"
25
26 #include "printing.h"
27 #include "image_viewer.h"
28
29 #include "gtkutils.h"
30 #include "toolbar.h"
31 #include "prefs_common.h"
32
33 #include <glib/gi18n.h>
34 #include <gdk/gdkkeysyms.h>
35 #include <gtk/gtk.h>
36 #include <pango/pango.h>
37 #include <string.h>
38 #include <math.h>
39
40 struct _PrintData {
41         PrintRenderer *renderer;
42         gpointer renderer_data;
43         PangoLayout *layout;
44         PangoContext *pango_context;
45         gpointer to_print;
46         GList *page_breaks;
47         guint npages;
48         gint sel_start;
49         gint sel_end;
50         GHashTable *images;
51         gint img_cnt;
52         gdouble zoom;
53         gdouble ypos_line;
54 };
55
56 typedef struct {
57         GtkPrintOperation *op;
58         GtkPrintOperationPreview *preview;
59         GtkWidget         *dialog;
60         GtkWidget         *scrolled_window;
61         GtkWidget         *area;
62         PrintData         *print_data;
63         GtkWidget         *page_nr_label;
64         GList             *pages_to_print;
65         GList             *current_page;
66         GtkWidget *first;
67         GtkWidget *next;
68         GtkWidget *previous;
69         GtkWidget *last;
70         GtkWidget *close;
71         GtkWidget *zoom_100;
72         GtkWidget *zoom_fit;
73         GtkWidget *zoom_in;
74         GtkWidget *zoom_out;
75         gboolean rendering;
76         gint page_width;
77         gint page_height;
78         GtkPrintContext *context;
79 } PreviewData;
80
81 /* callbacks */
82 static void     printing_textview_cb_begin_print(GtkPrintOperation*,
83                                                  GtkPrintContext*, gpointer);
84 static void     printing_textview_cb_draw_page(GtkPrintOperation*, 
85                                                GtkPrintContext*, gint,
86                                                gpointer);
87 static gboolean cb_preview(GtkPrintOperation*, GtkPrintOperationPreview*,
88                            GtkPrintContext*, GtkWindow*, gpointer);
89 static void     cb_preview_destroy(GtkWindow*, gpointer);
90 static gboolean cb_preview_close(GtkWidget*, GdkEventAny*, gpointer);
91 static void     cb_preview_size_allocate(GtkWidget*, GtkAllocation*);
92 static void     cb_preview_ready(GtkPrintOperationPreview*,
93                                  GtkPrintContext*, gpointer);
94 static gboolean cb_preview_expose(GtkWidget*, GdkEventExpose*, gpointer);
95 static void     cb_preview_got_page_size(GtkPrintOperationPreview*,
96                                          GtkPrintContext*,
97                                          GtkPageSetup*, gpointer);
98 static void     cb_preview_go_first(GtkButton*, gpointer);
99 static void     cb_preview_go_previous(GtkButton*, gpointer);
100 static void     cb_preview_go_next(GtkButton*, gpointer);
101 static void     cb_preview_go_last(GtkButton*, gpointer);
102 static void     cb_preview_btn_close(GtkButton*, gpointer);
103 static void     cb_preview_zoom_100(GtkButton*, gpointer);
104 static void     cb_preview_zoom_fit(GtkButton*, gpointer);
105 static void     cb_preview_zoom_in(GtkButton*, gpointer);
106 static void     cb_preview_zoom_out(GtkButton*, gpointer);
107 static void     cb_preview_request_page_setup(GtkPrintOperation*,
108                                               GtkPrintContext*,
109                                               gint,GtkPageSetup*,gpointer);
110
111 static void     printing_preview_update_zoom_sensitivity(PreviewData*);
112
113 /* variables */
114 static GtkPrintSettings *settings   = NULL;
115 static GtkPageSetup     *page_setup = NULL;
116
117 /* other static functions */
118 static void     printing_layout_set_text_attributes(PrintData*, GtkPrintContext *, gboolean *);
119 static gboolean printing_is_pango_gdk_color_equal(PangoColor*, GdkColor*); 
120 static gint     printing_text_iter_get_offset_bytes(PrintData *, const GtkTextIter*);
121
122 #define PAGE_MARGIN_STORAGE_UNIT GTK_UNIT_MM
123 #define PREVIEW_SCALE 72
124 #define PREVIEW_SHADOW_OFFSET 3
125 #define PREVIEW_ZOOM_FAC 1.41
126 #define PREVIEW_ZOOM_MAX 10.
127 #define PREVIEW_ZOOM_MIN 0.2
128
129 static void free_pixbuf(gpointer key, gpointer value, gpointer data)
130 {
131         PangoAttrShape *attr = (PangoAttrShape *) value;
132         g_object_unref(G_OBJECT(attr->data));
133 }
134
135 gpointer printing_get_renderer_data(PrintData *print_data)
136 {
137         if (!print_data)
138                 return NULL;
139         return print_data->renderer_data;
140 }
141
142 gdouble printing_get_zoom(PrintData *print_data)
143 {
144         if (!print_data)
145                 return 1.0;
146         return print_data->zoom;
147 }
148
149 void printing_set_n_pages(PrintData *print_data, gint n_pages)
150 {
151         if (!print_data)
152                 return;
153         print_data->npages = n_pages;
154 }
155
156 GtkPrintSettings *printing_get_settings(void)
157 {
158         if (settings == NULL) {
159                 settings = gtk_print_settings_new();
160                 gtk_print_settings_set_use_color(settings, prefs_common.print_use_color);
161                 gtk_print_settings_set_collate(settings, prefs_common.print_use_collate);
162                 gtk_print_settings_set_reverse(settings, prefs_common.print_use_reverse);
163                 gtk_print_settings_set_duplex(settings, prefs_common.print_use_duplex);
164         }
165         return settings;
166 }
167
168 void printing_store_settings(GtkPrintSettings *new_settings)
169 {
170         if (settings != NULL)
171                 g_object_unref(settings);
172
173         settings = g_object_ref(new_settings);
174         prefs_common.print_use_color = gtk_print_settings_get_use_color(settings);
175         prefs_common.print_use_collate = gtk_print_settings_get_collate(settings);
176         prefs_common.print_use_reverse = gtk_print_settings_get_reverse(settings);
177         prefs_common.print_use_duplex = gtk_print_settings_get_duplex(settings);
178 }
179
180 GtkPageSetup *printing_get_page_setup(void)
181 {
182         if (page_setup == NULL) {
183                 gboolean read_from_file;
184                 char *page_setup_filename;
185                 GKeyFile *keyfile;
186                 gboolean key_file_read;
187
188                 page_setup = gtk_page_setup_new();
189
190                 read_from_file = FALSE;
191
192 #if GTK_CHECK_VERSION(2,14,0)
193                 /* try reading the page setup from file */
194                 page_setup_filename = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, 
195                                                   PRINTING_PAGE_SETUP_STORAGE_FILE, NULL);
196                 keyfile = g_key_file_new();
197                 key_file_read = g_key_file_load_from_file(keyfile, page_setup_filename,
198                                                           0, NULL);
199                 g_free(page_setup_filename);
200
201                 if (key_file_read)
202                         read_from_file = gtk_page_setup_load_key_file(page_setup, keyfile,
203                                                                       NULL, NULL);
204                 g_key_file_free(keyfile);
205
206                 if (read_from_file) {
207                         debug_print("Printing: Read page setup from key file\n");
208                 } else {
209                         debug_print("Printing: Could not read page setup from key file\n");
210                 }
211 #else
212                 key_file_read = FALSE;
213                 keyfile = NULL;
214                 page_setup_filename = NULL;
215 #endif
216
217                 /* if reading from file did not work, or has not been tried (GTK+ < 2.14), use prefs */
218                 if (!read_from_file) {
219                         /* paper size */
220                         if (prefs_common.print_paper_type &&
221                             *prefs_common.print_paper_type) {
222                                 GtkPaperSize *paper = gtk_paper_size_new(prefs_common.print_paper_type);
223                                 gtk_page_setup_set_paper_size(page_setup, paper);
224                                 gtk_paper_size_free(paper);
225                         }
226                         /* orientation */
227                         gtk_page_setup_set_orientation(page_setup,
228                                                        prefs_common.print_paper_orientation);
229                         /* margins */
230                         if (prefs_common.print_margin_top != -1)
231                                 gtk_page_setup_set_top_margin(page_setup,
232                                                               0.01*prefs_common.print_margin_top,
233                                                               PAGE_MARGIN_STORAGE_UNIT);
234                         if (prefs_common.print_margin_bottom != -1)
235                                 gtk_page_setup_set_bottom_margin(page_setup,
236                                                                  0.01*prefs_common.print_margin_bottom,
237                                                                  PAGE_MARGIN_STORAGE_UNIT);
238                         if (prefs_common.print_margin_left != -1)
239                                 gtk_page_setup_set_left_margin(page_setup,
240                                                                0.01*prefs_common.print_margin_left,
241                                                                PAGE_MARGIN_STORAGE_UNIT);
242                         if (prefs_common.print_margin_right != -1)
243                                 gtk_page_setup_set_right_margin(page_setup,
244                                                                 0.01*prefs_common.print_margin_right,
245                                                                 PAGE_MARGIN_STORAGE_UNIT);
246                 }
247         }
248         return page_setup;
249 }
250
251 void printing_print_full(GtkWindow *parent, PrintRenderer *renderer, gpointer renderer_data, 
252                          gint sel_start, gint sel_end)
253 {                        
254         GtkPrintOperation *op;
255         GtkPrintOperationResult res;
256         PrintData *print_data;
257
258         op = gtk_print_operation_new();
259
260         print_data = g_new0(PrintData,1);
261
262         print_data->renderer = renderer;
263         print_data->renderer_data = renderer_data;
264         print_data->sel_start = sel_start;
265         print_data->sel_end = sel_end;
266
267         print_data->zoom = 1.;
268
269         print_data->images = g_hash_table_new(g_direct_hash, g_direct_equal);
270
271         print_data->pango_context = renderer->get_pango_context(renderer_data);
272
273         print_data->to_print = renderer->get_data_to_print(renderer_data, sel_start, sel_end);
274
275         printing_get_settings();
276         printing_get_page_setup();
277
278         /* Config for printing */
279         gtk_print_operation_set_print_settings(op, settings);
280         gtk_print_operation_set_default_page_setup(op, page_setup);
281 #if GTK_CHECK_VERSION(2, 18, 0)
282         /* enable Page Size and Orientation in the print dialog */
283         gtk_print_operation_set_embed_page_setup(op, TRUE);
284 #endif
285
286         /* signals */
287         g_signal_connect(op, "begin_print", G_CALLBACK(renderer->cb_begin_print), print_data);
288         g_signal_connect(op, "draw_page", G_CALLBACK(renderer->cb_draw_page), print_data);
289         g_signal_connect(op, "preview", G_CALLBACK(cb_preview), print_data);
290
291         /* Start printing process */
292         res = gtk_print_operation_run(op, GTK_PRINT_OPERATION_ACTION_PRINT_DIALOG,
293                                       parent, NULL);
294
295         if (res == GTK_PRINT_OPERATION_RESULT_ERROR) {
296                 GError *error = NULL;
297                 gtk_print_operation_get_error(op, &error);
298                 debug_print("Error printing message: %s\n",
299                             error ? error->message : "no details");
300         } else if (res == GTK_PRINT_OPERATION_RESULT_APPLY) {
301                 /* store settings for next printing session */
302                 printing_store_settings(gtk_print_operation_get_print_settings(op));
303         }
304
305         g_hash_table_foreach(print_data->images, free_pixbuf, NULL);
306         g_hash_table_destroy(print_data->images);
307         if (print_data->to_print)
308                 g_free(print_data->to_print);
309         g_list_free(print_data->page_breaks);
310         if (print_data->layout)
311                 g_object_unref(print_data->layout);
312
313         g_free(print_data);
314
315         g_object_unref(op);
316         debug_print("printing_print finished\n");
317 }
318
319 static PangoContext *printing_textview_get_pango_context(gpointer data)
320 {
321         return gtk_widget_get_pango_context(GTK_WIDGET(data));
322 }
323
324 static gpointer printing_textview_get_data_to_print(gpointer data, gint sel_start, gint sel_end)
325 {
326         GtkTextView *text_view = GTK_TEXT_VIEW(data);
327         GtkTextBuffer *buffer = gtk_text_view_get_buffer(text_view);
328         GtkTextIter start, end;
329
330         if (sel_start < 0 || sel_end <= sel_start) {
331                 gtk_text_buffer_get_start_iter(buffer, &start);
332                 gtk_text_buffer_get_end_iter(buffer, &end);
333         } else {
334                 gtk_text_buffer_get_iter_at_offset(buffer, &start, sel_start);
335                 gtk_text_buffer_get_iter_at_offset(buffer, &end, sel_end);
336         }
337
338         return gtk_text_buffer_get_text(buffer, &start, &end, FALSE);
339 }
340
341 void printing_print(GtkTextView *text_view, GtkWindow *parent, gint sel_start, gint sel_end)
342 {
343         PrintRenderer *textview_renderer = g_new0(PrintRenderer, 1);
344         
345         textview_renderer->get_pango_context = printing_textview_get_pango_context;
346         textview_renderer->get_data_to_print = printing_textview_get_data_to_print;
347         textview_renderer->cb_begin_print    = printing_textview_cb_begin_print;
348         textview_renderer->cb_draw_page      = printing_textview_cb_draw_page;
349
350         printing_print_full(parent, textview_renderer, text_view, sel_start, sel_end);
351         
352         g_free(textview_renderer);
353 }
354
355 void printing_page_setup(GtkWindow *parent)
356 {
357         GtkPageSetup *new_page_setup;
358         char *keyfile;
359
360         keyfile = NULL;
361
362         printing_get_settings();
363         printing_get_page_setup();
364
365         new_page_setup = gtk_print_run_page_setup_dialog(parent,page_setup,settings);
366
367         if (page_setup)
368                 g_object_unref(page_setup);
369
370         page_setup = new_page_setup;
371
372         g_free(prefs_common.print_paper_type);
373         prefs_common.print_paper_type = g_strdup(gtk_paper_size_get_name(
374                                                 gtk_page_setup_get_paper_size(page_setup)));
375         prefs_common.print_paper_orientation = gtk_page_setup_get_orientation(page_setup);
376         /* store 100th millimeters */
377         prefs_common.print_margin_top    = (int) (100*gtk_page_setup_get_top_margin(page_setup, 
378                                                                 PAGE_MARGIN_STORAGE_UNIT));
379         prefs_common.print_margin_bottom = (int) (100*gtk_page_setup_get_bottom_margin(page_setup,
380                                                                 PAGE_MARGIN_STORAGE_UNIT));
381         prefs_common.print_margin_left   = (int) (100*gtk_page_setup_get_left_margin(page_setup,
382                                                                 PAGE_MARGIN_STORAGE_UNIT));
383         prefs_common.print_margin_right  = (int) (100*gtk_page_setup_get_right_margin(page_setup,
384                                                                 PAGE_MARGIN_STORAGE_UNIT));
385
386 #if GTK_CHECK_VERSION(2,14,0)
387         /* save to file */
388         keyfile = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S,
389                               PRINTING_PAGE_SETUP_STORAGE_FILE, NULL);
390         if (!gtk_page_setup_to_file(page_setup, keyfile, NULL)) {
391                 debug_print("Printing: Could not store page setup in file `%s'\n", keyfile);
392         }
393         g_free(keyfile);
394 #endif
395 }
396
397 static gboolean cb_preview(GtkPrintOperation        *operation,
398                            GtkPrintOperationPreview *preview,
399                            GtkPrintContext          *context,
400                            GtkWindow                *parent,
401                            gpointer                 data)
402 {
403         PrintData *print_data;
404         cairo_t *cr;
405         PreviewData *preview_data;
406         GtkWidget *vbox;
407         GtkWidget *toolbar;
408         GtkWidget *da;
409         GtkWidget *sw;
410         GtkWidget *page;
411         GtkToolItem *separator;
412         static GdkGeometry geometry;
413         GtkWidget *dialog = NULL;
414         GtkWidget *statusbar = gtk_hbox_new(2, FALSE);
415         CLAWS_TIP_DECL();
416
417         debug_print("Creating internal print preview\n");
418
419         print_data = (PrintData*) data;
420
421         preview_data = g_new0(PreviewData,1);
422         preview_data->print_data = print_data;
423         preview_data->op = g_object_ref(operation);
424         preview_data->preview = preview;
425
426         /* Window */
427         dialog = gtkut_window_new(GTK_WINDOW_TOPLEVEL, "print_preview");
428         preview_data->dialog = dialog;
429         if (!geometry.min_height) {
430                 geometry.min_width = 600;
431                 geometry.min_height = 400;
432         }
433         gtk_window_set_geometry_hints(GTK_WINDOW(dialog), NULL, &geometry,
434                                       GDK_HINT_MIN_SIZE);
435         gtk_widget_set_size_request(dialog, prefs_common.print_previewwin_width,
436                                     prefs_common.print_previewwin_height);
437         gtk_window_set_title(GTK_WINDOW(dialog), _("Print preview"));
438
439         /* vbox */
440         vbox = gtk_vbox_new(FALSE, 0);
441         gtk_container_add(GTK_CONTAINER(dialog), vbox);
442   
443         /* toolbar */
444         toolbar = gtk_toolbar_new();
445 #if (GTK_CHECK_VERSION(2,16,0))
446         gtk_orientable_set_orientation(GTK_ORIENTABLE(toolbar), GTK_ORIENTATION_HORIZONTAL);
447 #else
448         gtk_toolbar_set_orientation(GTK_TOOLBAR(toolbar), GTK_ORIENTATION_HORIZONTAL);
449 #endif
450         switch (prefs_common.toolbar_style) {
451                 case TOOLBAR_ICON:
452                         gtk_toolbar_set_style(GTK_TOOLBAR(toolbar), GTK_TOOLBAR_ICONS);
453                         break;
454                 case TOOLBAR_TEXT:
455                         gtk_toolbar_set_style(GTK_TOOLBAR(toolbar), GTK_TOOLBAR_TEXT);
456                         break;
457                 case TOOLBAR_BOTH_HORIZ:
458                         gtk_toolbar_set_style(GTK_TOOLBAR(toolbar), GTK_TOOLBAR_BOTH_HORIZ);
459                         break;
460                 case TOOLBAR_BOTH:
461                         default:          
462                         gtk_toolbar_set_style(GTK_TOOLBAR(toolbar), GTK_TOOLBAR_BOTH);
463         }
464         gtk_toolbar_set_show_arrow(GTK_TOOLBAR(toolbar), TRUE);
465
466         gtk_box_pack_start(GTK_BOX(vbox), toolbar, FALSE, FALSE, 0);
467
468 #if !(GTK_CHECK_VERSION(2,12,0))
469 #define CLAWS_SET_TOOL_ITEM_TIP(widget,tip) { \
470         gtk_tool_item_set_tooltip(GTK_TOOL_ITEM(widget), GTK_TOOLTIPS(tips),                    \
471                         tip, NULL);                                                             \
472 }
473 #else
474 #define CLAWS_SET_TOOL_ITEM_TIP(widget,tip) { \
475         gtk_tool_item_set_tooltip_text(GTK_TOOL_ITEM(widget), tip);                             \
476 }
477 #endif  
478
479 #define TOOLBAR_ITEM(item,text,tooltip,cb,cbdata) {                                                             \
480         item = GTK_WIDGET(gtk_tool_button_new_from_stock(text));                                        \
481         gtk_tool_item_set_homogeneous(GTK_TOOL_ITEM(item), FALSE);                                      \
482         gtk_tool_item_set_is_important(GTK_TOOL_ITEM(item), TRUE);                                      \
483         gtk_toolbar_insert(GTK_TOOLBAR(toolbar), GTK_TOOL_ITEM(item), -1);                              \
484         g_signal_connect (G_OBJECT(item), "clicked", G_CALLBACK(cb), cbdata);                           \
485         CLAWS_SET_TOOL_ITEM_TIP(GTK_TOOL_ITEM(item),            \
486                         tooltip);                                                                       \
487 }
488
489         TOOLBAR_ITEM(preview_data->first, GTK_STOCK_GOTO_FIRST,
490                      _("First page"), cb_preview_go_first, preview_data);
491         TOOLBAR_ITEM(preview_data->previous, GTK_STOCK_GO_BACK,
492                      _("Previous page"), cb_preview_go_previous, preview_data);
493
494         page = gtk_label_new("");
495         gtk_widget_set_size_request(page, 100, -1);
496         preview_data->page_nr_label = page;
497
498         TOOLBAR_ITEM(preview_data->next, GTK_STOCK_GO_FORWARD,
499                      _("Next page"), cb_preview_go_next, preview_data);
500         TOOLBAR_ITEM(preview_data->last, GTK_STOCK_GOTO_LAST,
501                      _("Last page"), cb_preview_go_last, preview_data);
502
503         separator = gtk_separator_tool_item_new();
504         gtk_toolbar_insert(GTK_TOOLBAR(toolbar), GTK_TOOL_ITEM(separator), -1);
505
506         TOOLBAR_ITEM(preview_data->zoom_100, GTK_STOCK_ZOOM_100,
507                      _("Zoom 100%"), cb_preview_zoom_100, preview_data);
508         TOOLBAR_ITEM(preview_data->zoom_fit, GTK_STOCK_ZOOM_FIT,
509                      _("Zoom fit"), cb_preview_zoom_fit, preview_data);
510         TOOLBAR_ITEM(preview_data->zoom_in, GTK_STOCK_ZOOM_IN,
511                      _("Zoom in"), cb_preview_zoom_in, preview_data);
512         TOOLBAR_ITEM(preview_data->zoom_out, GTK_STOCK_ZOOM_OUT,
513                      _("Zoom out"), cb_preview_zoom_out, preview_data);
514
515         separator = gtk_separator_tool_item_new();
516         gtk_toolbar_insert(GTK_TOOLBAR(toolbar), GTK_TOOL_ITEM(separator), -1);
517
518         /* tooltip has to be NULL else it triggers an expose_event */
519         TOOLBAR_ITEM(preview_data->close, GTK_STOCK_CLOSE, NULL,
520                      cb_preview_btn_close, preview_data);
521
522         gtk_widget_show(statusbar);
523         gtk_box_pack_start(GTK_BOX(vbox), statusbar, FALSE, FALSE, 0);
524         gtk_box_pack_start(GTK_BOX(statusbar), page, FALSE, FALSE, 0);
525         /* Drawing area */
526         sw = gtk_scrolled_window_new(NULL, NULL);
527         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(sw),
528                                        GTK_POLICY_AUTOMATIC,
529                                        GTK_POLICY_AUTOMATIC);
530         gtk_box_pack_start(GTK_BOX(vbox), sw, TRUE, TRUE, 0);
531         da = gtk_drawing_area_new();
532         gtk_widget_set_double_buffered(da, FALSE);
533         gtk_scrolled_window_add_with_viewport(GTK_SCROLLED_WINDOW(sw),
534                                               da);
535         gtk_widget_realize(da);
536         preview_data->scrolled_window = sw;
537         preview_data->area = da;
538
539         /* cairo context */
540         cr = gdk_cairo_create(da->window);
541         gtk_print_context_set_cairo_context(context, cr, PREVIEW_SCALE, PREVIEW_SCALE);
542         cairo_destroy(cr);
543
544         /* signals */
545         g_signal_connect(dialog, "key_press_event",
546                          G_CALLBACK(cb_preview_close), preview_data);
547         g_signal_connect(dialog, "size_allocate",
548                          G_CALLBACK(cb_preview_size_allocate), NULL);
549         g_signal_connect(dialog, "destroy",G_CALLBACK(cb_preview_destroy),
550                          preview_data);
551         g_signal_connect(preview, "ready", G_CALLBACK(cb_preview_ready),
552                          preview_data);
553         g_signal_connect(preview, "got-page-size",
554                          G_CALLBACK(cb_preview_got_page_size), preview_data);
555
556         g_signal_connect(operation, "request-page-setup",
557                          G_CALLBACK(cb_preview_request_page_setup), preview_data);
558
559         gtk_widget_show_all(dialog);
560         return TRUE;
561 }
562
563 static void cb_preview_destroy(GtkWindow *window, gpointer data)
564 {
565         PreviewData *preview_data;
566         preview_data = (PreviewData*) data;
567
568         if (preview_data->rendering)
569                 return;
570         debug_print("Preview window destroyed\n");
571
572         gtk_print_operation_preview_end_preview(preview_data->preview);
573         g_object_unref(preview_data->op);
574         g_list_free(preview_data->pages_to_print);
575
576         g_free(preview_data);
577 }
578
579 static gboolean cb_preview_close(GtkWidget *widget, GdkEventAny *event,
580                                  gpointer data)
581 {
582         PreviewData *preview_data = (PreviewData *)data;
583         if (event->type == GDK_KEY_PRESS)
584                  if (((GdkEventKey *)event)->keyval != GDK_Escape)
585                         return FALSE;
586         if (preview_data->rendering)
587                 return FALSE; 
588         gtk_widget_destroy(widget);
589         return FALSE;
590 }
591
592 static void cb_preview_size_allocate(GtkWidget *widget,
593                                      GtkAllocation *allocation)
594 {
595         cm_return_if_fail(allocation != NULL);
596
597         prefs_common.print_previewwin_width = allocation->width;
598         prefs_common.print_previewwin_height = allocation->height;
599 }
600
601 static void cb_preview_ready(GtkPrintOperationPreview *preview,
602                              GtkPrintContext          *context,
603                              gpointer                  data)
604 {
605         PreviewData *preview_data;
606         gint iPage;
607         preview_data = (PreviewData*) data;
608         debug_print("preview_ready %d\n", preview_data->print_data->npages);
609
610         for (iPage = 0; iPage < (preview_data->print_data->npages); iPage++) {
611                 if (gtk_print_operation_preview_is_selected(preview_data->preview, iPage)) {
612                         preview_data->pages_to_print = 
613                                 g_list_prepend(preview_data->pages_to_print,
614                                                GINT_TO_POINTER(iPage));
615                         debug_print("want to print page %d\n",iPage+1);
616                 }
617         }
618
619         preview_data->pages_to_print = g_list_reverse(preview_data->pages_to_print);
620         preview_data->current_page = preview_data->pages_to_print;
621         preview_data->context = context;
622
623         g_signal_connect(preview_data->area, "expose_event",
624                          G_CALLBACK(cb_preview_expose),
625                          preview_data);
626
627         gtk_widget_queue_draw(preview_data->area);
628 }
629
630 static void cb_preview_got_page_size(GtkPrintOperationPreview *preview,
631                                      GtkPrintContext          *context,
632                                      GtkPageSetup             *page_setup,
633                                      gpointer                  data)
634 {
635         PreviewData *preview_data;
636         GtkPageOrientation orientation;
637         GtkPaperSize *paper_size;
638         gint paper_width;
639         gint paper_height;
640
641         preview_data = (PreviewData*) data;
642         debug_print("got_page_size\n");
643         orientation  = gtk_page_setup_get_orientation(page_setup);
644         paper_size   = gtk_page_setup_get_paper_size(page_setup);
645         paper_width  = (gint)(gtk_paper_size_get_width(paper_size, GTK_UNIT_INCH)  
646                               * PREVIEW_SCALE);
647         paper_height = (gint)(gtk_paper_size_get_height(paper_size,  GTK_UNIT_INCH)
648                               * PREVIEW_SCALE);
649
650         preview_data->page_width  = paper_width;
651         preview_data->page_height = paper_height;
652
653         debug_print("w/h %d/%d\n", paper_width, paper_height);
654         gtk_widget_set_size_request(GTK_WIDGET(preview_data->area), 
655                                     paper_width, paper_height);
656 }
657
658 static gboolean cb_preview_expose(GtkWidget *widget, GdkEventExpose *event,
659                                   gpointer data)
660 {
661         PreviewData *preview_data = data;
662         GdkGC *gc;
663         GdkColor white;
664         GdkColor black;
665         GdkColor gray;
666         cairo_t *cr;
667
668         debug_print("preview_expose (current %p)\n", preview_data->current_page);
669         gdk_window_clear(preview_data->area->window);
670
671         white.red   = 65535;
672         white.green = 65535;
673         white.blue  = 65535;
674         black.red   = 0;
675         black.green = 0;
676         black.blue  = 0;
677         gray.red   = 32700;
678         gray.green = 32700;
679         gray.blue  = 32700;
680
681         gc = gdk_gc_new(GDK_DRAWABLE(preview_data->area->window));
682
683         /* background */
684         gdk_gc_set_rgb_fg_color(gc, &gray);
685         gdk_draw_rectangle(preview_data->area->window, gc, TRUE, 0, 0,
686                            preview_data->area->allocation.width,
687                            preview_data->area->allocation.height);
688
689         /* shadow */
690         gdk_gc_set_rgb_fg_color(gc, &black);
691         gdk_draw_rectangle(preview_data->area->window, gc, TRUE,
692                            PREVIEW_SHADOW_OFFSET, PREVIEW_SHADOW_OFFSET,
693                            preview_data->page_width+PREVIEW_SHADOW_OFFSET,
694                            preview_data->page_height+PREVIEW_SHADOW_OFFSET);
695
696         /* paper */
697         gdk_gc_set_rgb_fg_color(gc, &white);
698         gdk_draw_rectangle(preview_data->area->window, gc, TRUE, 0, 0,
699                            preview_data->page_width,
700                            preview_data->page_height);
701
702         g_object_unref(gc);
703
704         cr = gdk_cairo_create(preview_data->area->window);
705         gtk_print_context_set_cairo_context(preview_data->context, cr, PREVIEW_SCALE, PREVIEW_SCALE);
706         cairo_destroy(cr);
707
708         if (preview_data->current_page) {
709                 preview_data->rendering = TRUE;
710                 gtk_widget_set_sensitive(preview_data->close, FALSE);
711                 int cur = GPOINTER_TO_INT(preview_data->current_page->data);
712                 gchar *str;
713                 str = g_strdup_printf(_("Page %d"), cur+1);
714                 gtk_label_set_text(GTK_LABEL(preview_data->page_nr_label), str);
715                 g_free(str);
716                 gtk_print_operation_preview_render_page(preview_data->preview,
717                                                         GPOINTER_TO_INT
718                                                         (preview_data->current_page->data));
719
720                 gtk_widget_set_sensitive(preview_data->first,
721                                          preview_data->current_page->prev != NULL);
722                 gtk_widget_set_sensitive(preview_data->previous,
723                                          preview_data->current_page->prev != NULL);
724                 gtk_widget_set_sensitive(preview_data->next,
725                                          preview_data->current_page->next != NULL);
726                 gtk_widget_set_sensitive(preview_data->last,
727                                          preview_data->current_page->next != NULL);
728                 gtk_widget_set_sensitive(preview_data->close, TRUE);
729                 preview_data->rendering = FALSE;
730         }
731         return TRUE;
732 }
733
734 static void cb_preview_go_first(GtkButton *button, gpointer data)
735 {
736         PreviewData *preview_data = (PreviewData*) data;
737         preview_data->current_page = preview_data->pages_to_print;
738         gtk_widget_queue_draw(preview_data->area);
739 }
740
741 static void cb_preview_go_previous(GtkButton *button, gpointer data)
742 {
743         GList *next;
744         PreviewData *preview_data = (PreviewData*) data;
745         next = g_list_previous(preview_data->current_page);
746         if (next)
747                 preview_data->current_page = next;
748         gtk_widget_queue_draw(preview_data->area);
749 }
750
751 static void cb_preview_go_next(GtkButton *button, gpointer data)
752 {
753         GList *next;
754         PreviewData *preview_data = (PreviewData*) data;
755         next = g_list_next(preview_data->current_page);
756         if (next)
757                 preview_data->current_page = next;
758         gtk_widget_queue_draw(preview_data->area);
759 }
760
761 static void cb_preview_go_last(GtkButton *button, gpointer data)
762 {
763         PreviewData *preview_data = (PreviewData*) data;
764         preview_data->current_page = g_list_last(preview_data->current_page);
765         gtk_widget_queue_draw(preview_data->area);
766 }
767
768 static void cb_preview_btn_close(GtkButton *button, gpointer data)
769 {
770         PreviewData *preview_data = (PreviewData *)data;
771         if (preview_data->rendering)
772                 return; 
773         gtk_widget_destroy(preview_data->dialog);
774 }
775
776 static void cb_preview_zoom_100(GtkButton *button, gpointer data)
777 {
778         PreviewData *preview_data = (PreviewData*) data;
779         if (preview_data->print_data->zoom != 1.) {
780                 preview_data->print_data->zoom = 1.;
781                 gtk_widget_queue_draw(preview_data->area);
782                 printing_preview_update_zoom_sensitivity(preview_data);
783         }
784 }
785
786 static void cb_preview_zoom_fit(GtkButton *button, gpointer data)
787 {
788         PreviewData *preview_data = (PreviewData*) data;
789         gdouble zoom_w;
790         gdouble zoom_h;
791
792         zoom_w = ((gdouble)preview_data->scrolled_window->allocation.width) /
793                  ((gdouble)preview_data->page_width/preview_data->print_data->zoom +
794                   PREVIEW_SHADOW_OFFSET);
795         zoom_h = ((gdouble)preview_data->scrolled_window->allocation.height) /
796                  ((gdouble)preview_data->page_height/preview_data->print_data->zoom +
797                   PREVIEW_SHADOW_OFFSET);
798
799         preview_data->print_data->zoom = MIN(zoom_w,zoom_h) - 0.01;
800
801         if (preview_data->print_data->zoom > PREVIEW_ZOOM_MAX)
802                 preview_data->print_data->zoom = PREVIEW_ZOOM_MAX;
803         else if (preview_data->print_data->zoom < PREVIEW_ZOOM_MIN)
804                 preview_data->print_data->zoom = PREVIEW_ZOOM_MIN;
805
806         printing_preview_update_zoom_sensitivity(preview_data);
807         gtk_widget_queue_draw(preview_data->area);
808 }
809
810 static void cb_preview_zoom_in(GtkButton *button, gpointer data)
811 {
812         PreviewData *preview_data = (PreviewData*) data;
813         gdouble new_zoom;
814         new_zoom =  preview_data->print_data->zoom * PREVIEW_ZOOM_FAC;
815         if (new_zoom <= PREVIEW_ZOOM_MAX) {
816                 preview_data->print_data->zoom = new_zoom;
817                 printing_preview_update_zoom_sensitivity(preview_data);
818                 gtk_widget_queue_draw(preview_data->area);
819         }
820 }
821
822 static void cb_preview_zoom_out(GtkButton *button, gpointer data)
823 {
824         PreviewData *preview_data = (PreviewData*) data;
825         gdouble new_zoom;
826         new_zoom =  preview_data->print_data->zoom / PREVIEW_ZOOM_FAC;
827         if (new_zoom >= PREVIEW_ZOOM_MIN) {
828                 preview_data->print_data->zoom = new_zoom;
829                 printing_preview_update_zoom_sensitivity(preview_data);
830                 gtk_widget_queue_draw(preview_data->area);
831         }
832 }
833
834 static void cb_preview_request_page_setup(GtkPrintOperation *op,
835                                           GtkPrintContext *context,
836                                           gint page_nr,
837                                           GtkPageSetup *setup,gpointer data)
838 {
839         GtkPaperSize *paper_size;
840         GtkPaperSize *old_size;
841         gdouble width;
842         gdouble height;
843         gdouble top_margin;
844         gdouble bottom_margin;
845         gdouble left_margin;
846         gdouble right_margin;
847
848         PreviewData *preview_data = (PreviewData*) data;
849
850         old_size = gtk_page_setup_get_paper_size(setup);
851         width  = gtk_paper_size_get_width(old_size,GTK_UNIT_INCH);
852         height = gtk_paper_size_get_height(old_size,GTK_UNIT_INCH);
853
854         top_margin    = gtk_page_setup_get_top_margin(setup,GTK_UNIT_INCH);
855         bottom_margin = gtk_page_setup_get_bottom_margin(setup,GTK_UNIT_INCH);
856         left_margin   = gtk_page_setup_get_left_margin(setup,GTK_UNIT_INCH);
857         right_margin  = gtk_page_setup_get_right_margin(setup,GTK_UNIT_INCH);
858
859         paper_size = gtk_paper_size_new_custom("preview paper", "preview_paper",
860                                                width*preview_data->print_data->zoom,
861                                                height*preview_data->print_data->zoom,
862                                                GTK_UNIT_INCH);
863         gtk_page_setup_set_paper_size(setup, paper_size);
864         gtk_paper_size_free(paper_size);
865
866         gtk_page_setup_set_top_margin(setup,top_margin*preview_data->print_data->zoom,
867                                       GTK_UNIT_INCH);
868         gtk_page_setup_set_bottom_margin(setup,bottom_margin*preview_data->print_data->zoom,
869                                          GTK_UNIT_INCH);
870         gtk_page_setup_set_left_margin(setup,left_margin*preview_data->print_data->zoom,
871                                        GTK_UNIT_INCH);
872         gtk_page_setup_set_right_margin(setup,right_margin*preview_data->print_data->zoom,
873                                         GTK_UNIT_INCH);
874 }
875
876 static void printing_textview_cb_begin_print(GtkPrintOperation *op, GtkPrintContext *context,
877                            gpointer user_data)
878 {
879         double width, height;
880         int num_lines;
881         double page_height;
882         GList *page_breaks;
883         PrintData *print_data;
884         PangoFontDescription *desc;
885         int start, ii;
886         PangoLayoutIter *iter;
887         double start_pos;
888         gint header_end_pos;
889         gint num_header_lines;
890         gint dummy;
891         gboolean header_done;
892         gboolean has_headers = FALSE;
893         const gchar *text;
894         double line_height =0.;
895
896         print_data = (PrintData*) user_data;
897
898         debug_print("Preparing print job...\n");
899
900         width  = gtk_print_context_get_width(context);
901         height = gtk_print_context_get_height(context);
902
903         if (print_data->layout == NULL)
904                 print_data->layout = gtk_print_context_create_pango_layout(context);
905
906         if (prefs_common.use_different_print_font)
907                 desc = pango_font_description_from_string(prefs_common.printfont);
908         else
909                 desc = pango_font_description_copy(
910         pango_context_get_font_description(print_data->pango_context));
911
912         pango_layout_set_font_description(print_data->layout, desc);
913         pango_font_description_free(desc);
914
915         pango_layout_set_width(print_data->layout, width * PANGO_SCALE);
916         pango_layout_set_text(print_data->layout, (char *)print_data->to_print, -1);
917
918         printing_layout_set_text_attributes(print_data, context, &has_headers);
919
920         num_lines = pango_layout_get_line_count(print_data->layout);
921
922         page_breaks = NULL;
923         page_height = 0;
924         start = 0;
925         ii = 0;
926         start_pos = 0.;
927         iter = pango_layout_get_iter(print_data->layout);
928
929         /* find the last character of the header */
930         header_end_pos = 0;
931         header_done = FALSE;
932         text = pango_layout_get_text(print_data->layout);
933
934         if (has_headers) {
935                 if (text && *text && *text != '\n') {
936                         do {
937                                 if (text[0] == '\n' && (text[1] != '\0') && (text[1] == '\n'))
938                                         header_done = TRUE;
939                                 else
940                                         header_end_pos++;
941                                 text++;
942                         } while(*text && !header_done);
943                 }
944                 /* find line number for header end */
945                 pango_layout_index_to_line_x(print_data->layout, header_end_pos, 1,
946                                              &num_header_lines, &dummy);
947                 /* line count is zero-based */
948                 num_header_lines++;
949         } else {
950                 print_data->ypos_line = -1.0;
951         }
952
953         do {
954                 PangoRectangle logical_rect;
955                 PangoLayoutLine *line;
956                 PangoAttrShape *attr = NULL;
957                 int baseline;
958
959                 if (ii >= start) {
960                         line = pango_layout_iter_get_line(iter);
961
962                         pango_layout_iter_get_line_extents(iter, NULL, &logical_rect);
963                         baseline = pango_layout_iter_get_baseline(iter);
964
965                         if ((attr = g_hash_table_lookup(print_data->images,
966                                                 GINT_TO_POINTER(pango_layout_iter_get_index(iter)))) != NULL) {
967                                 line_height = (double)gdk_pixbuf_get_height(GDK_PIXBUF(attr->data));
968                         } else {
969                                 line_height = ((double)logical_rect.height) / PANGO_SCALE;
970                         }
971                 }
972                 if ((page_height + line_height) > height) {
973                         page_breaks = g_list_prepend(page_breaks, GINT_TO_POINTER(ii));
974                         page_height = 0;
975                 }
976
977                 if (has_headers && ii == num_header_lines) {
978                         int y0, y1;
979                         pango_layout_iter_get_line_yrange(iter,&y0,&y1);
980                         print_data->ypos_line = (double)y0 + 1./3.*((double)(y1 - y0))/2.;
981                 }
982
983                 page_height += line_height;
984                 ii++;
985         } while(ii < num_lines && pango_layout_iter_next_line(iter));
986         pango_layout_iter_free(iter);
987
988         page_breaks = g_list_reverse(page_breaks);
989         print_data->npages = g_list_length(page_breaks) + 1;    
990         print_data->page_breaks = page_breaks;
991
992         gtk_print_operation_set_n_pages(op, print_data->npages);
993
994         debug_print("Starting print job...\n");
995 }
996
997 static cairo_surface_t *pixbuf_to_surface(GdkPixbuf *pixbuf)
998 {
999           cairo_surface_t *surface;
1000           cairo_format_t format;
1001           static const cairo_user_data_key_t key;
1002           guchar *pixels = g_malloc(
1003                                 4*
1004                                 gdk_pixbuf_get_width(pixbuf)*
1005                                 gdk_pixbuf_get_height(pixbuf));
1006           guchar *src_pixels = gdk_pixbuf_get_pixels (pixbuf);
1007           gint width = gdk_pixbuf_get_width(pixbuf);
1008           gint height = gdk_pixbuf_get_height(pixbuf);
1009           gint nchans = gdk_pixbuf_get_n_channels (pixbuf);
1010           gint stride = gdk_pixbuf_get_rowstride (pixbuf);
1011           gint j;
1012
1013           if (nchans == 3)
1014             format = CAIRO_FORMAT_RGB24;
1015           else
1016             format = CAIRO_FORMAT_ARGB32;
1017           surface = cairo_image_surface_create_for_data (pixels,         
1018                                                 format, width, height, 4*width);
1019           cairo_surface_set_user_data (surface, &key, 
1020                 pixels, (cairo_destroy_func_t)g_free);
1021
1022           for (j = height; j; j--) {
1023                 guchar *p = src_pixels;
1024                 guchar *q = pixels;
1025
1026                 if (nchans == 3) {
1027                         guchar *end = p + 3 * width;
1028
1029                         while (p < end) {
1030 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
1031                                 q[0] = p[2];
1032                                 q[1] = p[1];
1033                                 q[2] = p[0];
1034 #else
1035                                 q[1] = p[0];
1036                                 q[2] = p[1];
1037                                 q[3] = p[2];
1038 #endif
1039                                 p += 3;
1040                                 q += 4;
1041                         }
1042                 } else {
1043                         guchar *end = p + 4 * width;
1044                         guint t1,t2,t3;
1045
1046 #define MULT(d,c,a,t) G_STMT_START { t = c * a + 0x7f; d = ((t >> 8) + t) >> 8; } G_STMT_END
1047
1048                         while (p < end) {
1049 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
1050                                 MULT(q[0], p[2], p[3], t1);
1051                                 MULT(q[1], p[1], p[3], t2);
1052                                 MULT(q[2], p[0], p[3], t3);
1053                                 q[3] = p[3];
1054 #else
1055                                 q[0] = p[3];
1056                                 MULT(q[1], p[0], p[3], t1);
1057                                 MULT(q[2], p[1], p[3], t2);
1058                                 MULT(q[3], p[2], p[3], t3);
1059 #endif
1060
1061                                 p += 4;
1062                                 q += 4;
1063                         }
1064
1065 #undef MULT
1066                 }
1067
1068                 src_pixels += stride;
1069                 pixels += 4 * width;
1070         }
1071                 
1072         return surface;
1073 }
1074
1075 static void printing_textview_cb_draw_page(GtkPrintOperation *op, GtkPrintContext *context,
1076                          int page_nr, gpointer user_data)
1077 {
1078         cairo_t *cr;
1079         PrintData *print_data;
1080         int start, end, ii;
1081         GList *pagebreak;
1082         PangoLayoutIter *iter;
1083         double start_pos;
1084         gboolean notlast = TRUE;
1085
1086         print_data = (PrintData*) user_data;
1087
1088         if (page_nr == 0) {
1089                 start = 0;
1090         } else {
1091                 pagebreak = g_list_nth(print_data->page_breaks, page_nr - 1);
1092                 start = GPOINTER_TO_INT(pagebreak->data);
1093         }
1094
1095         pagebreak = g_list_nth(print_data->page_breaks, page_nr);
1096         if (pagebreak == NULL)
1097                 end = pango_layout_get_line_count(print_data->layout);
1098         else
1099                 end = GPOINTER_TO_INT(pagebreak->data);
1100
1101         cr = gtk_print_context_get_cairo_context(context);
1102         cairo_scale(cr, print_data->zoom, print_data->zoom);
1103         cairo_set_source_rgb(cr, 0., 0., 0.);
1104
1105         ii = 0;
1106         start_pos = 0.;
1107         iter = pango_layout_get_iter(print_data->layout);
1108         do {
1109                 PangoRectangle logical_rect;
1110                 PangoLayoutLine *line;
1111                 PangoAttrShape *attr = NULL;
1112                 int baseline;
1113
1114                 if (ii >= start) {
1115                         line = pango_layout_iter_get_line(iter);
1116
1117                         pango_layout_iter_get_line_extents(iter, NULL, &logical_rect);
1118                         baseline = pango_layout_iter_get_baseline(iter);
1119
1120                         if (ii == start)
1121                                 start_pos = ((double)logical_rect.y) / PANGO_SCALE;
1122
1123                         /* Draw header separator line */
1124                         if (ii == 0 && print_data->ypos_line >= 0) {
1125                                 cairo_surface_t *surface;
1126                                 surface = cairo_image_surface_create(CAIRO_FORMAT_ARGB32,
1127                                                 gtk_print_context_get_width(context)/print_data->zoom,
1128                                                 gtk_print_context_get_height(context)/print_data->zoom);
1129                                 cairo_set_line_width(cr, .5);
1130                                 cairo_set_source_surface(cr, surface,
1131                                                          ((double)logical_rect.x) / PANGO_SCALE, 
1132                                                          ((double)baseline) / PANGO_SCALE - start_pos);
1133                                 cairo_move_to(cr, ((double)logical_rect.x) / PANGO_SCALE,
1134                                               (double)print_data->ypos_line / PANGO_SCALE);
1135                                 cairo_rel_line_to(cr, gtk_print_context_get_width(context)/print_data->zoom, 0);
1136                                 cairo_set_source_rgb(cr, 0., 0., 0.);
1137                                 cairo_stroke(cr);
1138                                 cairo_surface_destroy(surface);
1139                         }
1140
1141                         cairo_move_to(cr,
1142                                       ((double)logical_rect.x) / PANGO_SCALE,
1143                                       ((double)baseline) / PANGO_SCALE - start_pos);
1144
1145                         if ((attr = g_hash_table_lookup(print_data->images,
1146                              GINT_TO_POINTER(pango_layout_iter_get_index(iter)))) != NULL) {
1147                                 cairo_surface_t *surface;
1148
1149                                 surface = pixbuf_to_surface(GDK_PIXBUF(attr->data));
1150                                 cairo_set_source_surface (cr, surface, 
1151                                                           ((double)logical_rect.x) / PANGO_SCALE, 
1152                                                           ((double)baseline) / PANGO_SCALE - start_pos);
1153                                 cairo_paint (cr);
1154                                 cairo_surface_destroy (surface);
1155                         } else {
1156                                 pango_cairo_show_layout_line(cr, line);
1157                         }
1158                 }
1159                 ii++;
1160         } while(ii < end && (notlast = pango_layout_iter_next_line(iter)));
1161         pango_layout_iter_free(iter);
1162         debug_print("Sent page %d to printer\n", page_nr+1);
1163 }
1164
1165 static void printing_layout_set_text_attributes(PrintData *print_data,
1166                                                 GtkPrintContext *context,
1167                                                 gboolean *has_headers)
1168 {
1169         GtkTextIter iter;
1170         PangoAttrList *attr_list;
1171         PangoAttribute *attr;
1172         GSList *open_attrs, *attr_walk;
1173         GtkTextView *text_view = GTK_TEXT_VIEW(print_data->renderer_data);
1174         GtkTextBuffer *buffer = gtk_text_view_get_buffer(text_view);
1175
1176         *has_headers = FALSE;
1177
1178         attr_list = pango_attr_list_new();
1179         if (print_data->sel_start < 0 || print_data->sel_end <= print_data->sel_start) {
1180                 gtk_text_buffer_get_start_iter(buffer, &iter);
1181         } else {
1182                 gtk_text_buffer_get_iter_at_offset(buffer, &iter, print_data->sel_start);
1183         }
1184
1185         open_attrs = NULL;
1186         do {
1187                 gboolean fg_set, bg_set, under_set, strike_set, weight_set;
1188                 GSList *tags, *tag_walk;
1189                 GtkTextTag *tag;
1190                 GdkColor *color = NULL;
1191                 PangoUnderline underline;
1192                 gboolean strikethrough;
1193                 gint weight;
1194                 GdkPixbuf *image;
1195
1196                 if (prefs_common.print_imgs && (image = gtk_text_iter_get_pixbuf(&iter)) != NULL) {
1197                         PangoRectangle rect = {0, 0, 0, 0};
1198                         gint startpos = printing_text_iter_get_offset_bytes(print_data, &iter);
1199                         gint h = gdk_pixbuf_get_height(image);
1200                         gint w = gdk_pixbuf_get_width(image);
1201                         gint a_h = gtk_print_context_get_height(context);
1202                         gint a_w = gtk_print_context_get_width(context);
1203                         gint r_h, r_w;
1204                         GdkPixbuf *scaled = NULL;
1205                         image_viewer_get_resized_size(w, h, a_w, a_h, &r_w, &r_h);
1206                         rect.x = 0;
1207                         rect.y = 0;
1208                         rect.width = r_w * PANGO_SCALE;
1209                         rect.height = r_h * PANGO_SCALE;
1210       
1211                         scaled = gdk_pixbuf_scale_simple(image, r_w, r_h, GDK_INTERP_BILINEAR);
1212                         attr = pango_attr_shape_new_with_data (&rect, &rect,
1213                                                                scaled, NULL, NULL);
1214                         attr->start_index = startpos;
1215                         attr->end_index = startpos+1;
1216                         pango_attr_list_insert(attr_list, attr);
1217                         g_hash_table_insert(print_data->images, GINT_TO_POINTER(startpos), attr);
1218                         print_data->img_cnt++;
1219                 }
1220
1221                 if (gtk_text_iter_ends_tag(&iter, NULL)) {
1222                         PangoAttrColor *attr_color;
1223                         PangoAttrInt   *attr_int;
1224
1225                         tags = gtk_text_iter_get_toggled_tags(&iter, FALSE);
1226                         for (tag_walk = tags; tag_walk != NULL; tag_walk = tag_walk->next) {
1227                                 gboolean found;
1228
1229                                 tag = GTK_TEXT_TAG(tag_walk->data);
1230                                 g_object_get(G_OBJECT(tag),
1231                                              "background-set", &bg_set,
1232                                              "foreground-set", &fg_set,
1233                                              "underline-set",&under_set,
1234                                              "strikethrough-set", &strike_set,
1235                                              "weight-set", &weight_set,
1236                                              NULL);
1237
1238                                 if (fg_set) {
1239                                         found = FALSE;
1240                                         for (attr_walk = open_attrs; attr_walk != NULL;
1241                                              attr_walk = attr_walk->next) {
1242                                                 attr = (PangoAttribute*)attr_walk->data;
1243                                                 if (attr->klass->type == PANGO_ATTR_FOREGROUND) {
1244                                                         attr_color = (PangoAttrColor*) attr;
1245                                                         g_object_get(G_OBJECT(tag), "foreground_gdk",
1246                                                                      &color, NULL);
1247                                                         if (color && 
1248                                                             printing_is_pango_gdk_color_equal(&(attr_color->color),
1249                                                             color)) {
1250                                                                 attr->end_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1251                                                                 pango_attr_list_insert(attr_list, attr);
1252                                                                 found = TRUE;
1253                                                                 open_attrs = g_slist_delete_link(open_attrs, attr_walk);
1254                                                                 break;
1255                                                         }
1256                                                         if (color)
1257                                                                 gdk_color_free(color);
1258                                                 }
1259                                         }
1260                                         if (!found)
1261                                                 debug_print("Error generating attribute list.\n");
1262                                 }
1263
1264                                 if (bg_set) {
1265                                         found = FALSE;
1266                                         for (attr_walk = open_attrs; attr_walk != NULL;
1267                                              attr_walk = attr_walk->next) {
1268                                                 attr = (PangoAttribute*)attr_walk->data;
1269                                                 if (attr->klass->type == PANGO_ATTR_BACKGROUND) {
1270                                                         attr_color = (PangoAttrColor*) attr;
1271                                                         g_object_get(G_OBJECT(tag), "background-gdk",
1272                                                                      &color, NULL);
1273                                                         if (printing_is_pango_gdk_color_equal(&(attr_color->color),
1274                                                             color)) {
1275                                                                 attr->end_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1276                                                                 pango_attr_list_insert(attr_list, attr);
1277                                                                 found = TRUE;
1278                                                                 open_attrs = g_slist_delete_link(open_attrs, attr_walk);
1279                                                                 break;
1280                                                         }
1281                                                         if (color)
1282                                                                 gdk_color_free(color);
1283                                                 }
1284                                         }
1285                                         if (!found)
1286                                                 debug_print("Error generating attribute list.\n");
1287                                 }
1288
1289                                 if (under_set) {
1290                                         found = FALSE;
1291                                         for (attr_walk = open_attrs; attr_walk != NULL;
1292                                              attr_walk = attr_walk->next) {
1293                                                 attr = (PangoAttribute*)attr_walk->data;
1294                                                 if (attr->klass->type == PANGO_ATTR_UNDERLINE) {
1295                                                         attr_int = (PangoAttrInt*)attr;
1296                                                         g_object_get(G_OBJECT(tag), "underline",
1297                                                                      &underline, NULL);
1298                                                         if (attr_int->value == underline) {
1299                                                                 attr->end_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1300                                                                 pango_attr_list_insert(attr_list, attr);
1301                                                                 found = TRUE;
1302                                                                 open_attrs = g_slist_delete_link(open_attrs, attr_walk);
1303                                                                 break;
1304                                                         }
1305                                                 }
1306                                         }
1307                                         if (!found)
1308                                                 debug_print("Error generating attribute list.\n");
1309                                 }
1310
1311                                 if (strike_set) {
1312                                         found = FALSE;
1313                                         for (attr_walk = open_attrs; attr_walk != NULL;
1314                                              attr_walk = attr_walk->next) {
1315                                                 attr = (PangoAttribute*)attr_walk->data;
1316                                                 if (attr->klass->type == PANGO_ATTR_STRIKETHROUGH) {
1317                                                         attr_int = (PangoAttrInt*)attr;
1318                                                         g_object_get(G_OBJECT(tag), "strikethrough",
1319                                                                      &strikethrough, NULL);
1320                                                         if (attr_int->value == strikethrough) {
1321                                                                 attr->end_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1322                                                                 pango_attr_list_insert(attr_list, attr);
1323                                                                 found = TRUE;
1324                                                                 open_attrs = g_slist_delete_link(open_attrs, attr_walk);
1325                                                                 break;
1326                                                         }
1327                                                 }
1328                                         }
1329                                         if (!found)
1330                                                 debug_print("Error generating attribute list.\n");
1331                                 }
1332
1333                                 if (weight_set) {
1334                                         found = FALSE;
1335                                         for (attr_walk = open_attrs; attr_walk != NULL;
1336                                             attr_walk = attr_walk->next) {
1337                                                 attr = (PangoAttribute*)attr_walk->data;
1338                                                 if (attr->klass->type == PANGO_ATTR_WEIGHT) {
1339                                                                 attr_int = (PangoAttrInt*)attr;
1340                                                         g_object_get(G_OBJECT(tag), "weight", &weight, NULL);
1341                                                         if (attr_int->value == weight) {
1342                                                                 attr->end_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1343                                                                 pango_attr_list_insert(attr_list, attr);
1344                                                                 found = TRUE;
1345                                                                 open_attrs = g_slist_delete_link(open_attrs, attr_walk);
1346                                                                 break;
1347                                                         }
1348                                                 }
1349                                         }
1350                                         if (!found)
1351                                                 debug_print("Error generating attribute list.\n");
1352                                 }
1353                         }
1354                         g_slist_free(tags);
1355                 }
1356
1357                 if (gtk_text_iter_begins_tag(&iter, NULL)) {
1358                         tags = gtk_text_iter_get_toggled_tags(&iter, TRUE);
1359                         /* Sometimes, an iter has several weights. Use only the first in this case */
1360                         gboolean weight_set_for_this_iter;
1361                         weight_set_for_this_iter = FALSE;
1362                         for (tag_walk = tags; tag_walk != NULL; tag_walk = tag_walk->next) {
1363                                 tag = GTK_TEXT_TAG(tag_walk->data);
1364                                 g_object_get(G_OBJECT(tag),
1365                                              "background-set", &bg_set,
1366                                              "foreground-set", &fg_set,
1367                                              "underline-set", &under_set,
1368                                              "strikethrough-set", &strike_set,
1369                                              "weight-set", &weight_set,
1370                                              NULL);
1371                                 if (fg_set) {
1372                                         g_object_get(G_OBJECT(tag), "foreground-gdk", &color, NULL);
1373                                         attr = pango_attr_foreground_new(color->red,color->green,color->blue);
1374                                         attr->start_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1375                                         open_attrs = g_slist_prepend(open_attrs, attr);
1376                                 }
1377                                 if (bg_set) {
1378                                         g_object_get(G_OBJECT(tag), "background-gdk", &color, NULL);
1379                                         attr = pango_attr_background_new(color->red,color->green,color->blue);
1380                                         attr->start_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1381                                         open_attrs = g_slist_prepend(open_attrs, attr);
1382                                 }
1383                                 if (under_set) {
1384                                         g_object_get(G_OBJECT(tag), "underline", &underline, NULL);
1385                                         attr = pango_attr_underline_new(underline);
1386                                         attr->start_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1387                                         open_attrs = g_slist_prepend(open_attrs, attr);   
1388                                 }
1389                                 if (strike_set) {
1390                                         g_object_get(G_OBJECT(tag), "strikethrough", &strikethrough, NULL);
1391                                         attr = pango_attr_strikethrough_new(strikethrough);
1392                                         attr->start_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1393                                         open_attrs = g_slist_prepend(open_attrs, attr);   
1394                                 }
1395                                 if (weight_set && !weight_set_for_this_iter) {
1396                                         weight_set_for_this_iter = TRUE;
1397                                         g_object_get(G_OBJECT(tag), "weight", &weight, NULL);
1398                                         attr = pango_attr_weight_new(weight);
1399                                         attr->start_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1400                                         open_attrs = g_slist_prepend(open_attrs, attr); 
1401                                         /* Hack to see if the first char is bold -- indicates header */
1402                                         if (attr->start_index == 0 && weight == PANGO_WEIGHT_BOLD) {
1403                                                 *has_headers = TRUE;
1404                                         }
1405                                 }
1406                         }
1407                         g_slist_free(tags);
1408                 }
1409     
1410         } while(!gtk_text_iter_is_end(&iter) && gtk_text_iter_forward_to_tag_toggle(&iter, NULL));
1411           
1412         /* close all open attributes */
1413         for (attr_walk = open_attrs; attr_walk != NULL; attr_walk = attr_walk->next) {
1414                 attr = (PangoAttribute*) attr_walk->data;
1415                 attr->end_index = printing_text_iter_get_offset_bytes(print_data, &iter);
1416                 pango_attr_list_insert(attr_list, attr);
1417         }
1418         g_slist_free(open_attrs);
1419
1420         pango_layout_set_attributes(print_data->layout, attr_list);
1421         pango_attr_list_unref(attr_list);
1422 }
1423
1424 static gboolean printing_is_pango_gdk_color_equal(PangoColor *p, GdkColor *g)
1425 {
1426         return ((p->red == g->red) && (p->green == g->green) && (p->blue == g->blue));
1427 }
1428
1429 /* Pango has it's attribute in bytes, but GtkTextIter gets only an offset
1430  * in characters, so here we're returning an offset in bytes. 
1431  */
1432 static gint printing_text_iter_get_offset_bytes(PrintData *print_data, const GtkTextIter *iter)
1433 {
1434         gint off_chars;
1435         gint off_bytes;
1436         gchar *text;
1437         GtkTextIter start;
1438
1439         off_chars = gtk_text_iter_get_offset(iter);
1440         if (print_data->sel_start < 0 || print_data->sel_end <= print_data->sel_start) {
1441                 gtk_text_buffer_get_start_iter(gtk_text_iter_get_buffer(iter), &start);
1442         } else {
1443                 gtk_text_buffer_get_iter_at_offset(gtk_text_iter_get_buffer(iter), &start, print_data->sel_start);
1444         }
1445         text = gtk_text_iter_get_text(&start, iter);
1446         off_bytes = strlen(text);
1447         g_free(text);
1448         return off_bytes;
1449 }
1450
1451 static void printing_preview_update_zoom_sensitivity(PreviewData *preview_data)
1452 {
1453         if((preview_data->print_data->zoom * PREVIEW_ZOOM_FAC) > PREVIEW_ZOOM_MAX)
1454                 gtk_widget_set_sensitive(preview_data->zoom_in, FALSE);
1455         else
1456                 gtk_widget_set_sensitive(preview_data->zoom_in, TRUE);
1457
1458         if ((preview_data->print_data->zoom / PREVIEW_ZOOM_FAC) < PREVIEW_ZOOM_MIN)
1459                 gtk_widget_set_sensitive(preview_data->zoom_out, FALSE);
1460         else
1461                 gtk_widget_set_sensitive(preview_data->zoom_out, TRUE);
1462 }
1463