print.c

   1 #include <stdio.h>
   2 #include <string.h>
   3 #include <stdarg.h>
   4 #include <gtk/gtk.h>
   5
   6 #include "dive.h"
   7 #include "display.h"
   8 #include "display-gtk.h"
   9
  10 /* Why doesn't pango/gtk have these quoting functions? */
  11 static inline int add_char(char *buffer, size_t size, int len, char c)
  12 {
  13         if (len < size)
  14                 buffer[len++] = c;
  15         return len;
  16 }
  17
  18 /* Add an escape string "atomically" - all or nothing */
  19 static int add_str(char *buffer, size_t size, int len, const char *s)
  20 {
  21         int oldlen = len;
  22         char c;
  23         while ((c = *s++) != 0) {
  24                 if (len >= size)
  25                         return oldlen;
  26                 buffer[len++] = c;
  27         }
  28         return len;
  29 }
  30
  31 static int add_quoted_string(char *buffer, size_t size, int len, const char *s)
  32 {
  33         if (!s)
  34                 return len;
  35
  36         /* Room for '\0' */
  37         size--;
  38         for (;;) {
  39                 const char *escape;
  40                 unsigned char c = *s++;
  41                 switch(c) {
  42                 default:
  43                         len = add_char(buffer, size, len, c);
  44                         continue;
  45                 case 0:
  46                         escape = "\n";
  47                         break;
  48                 case '&':
  49                         escape = "&amp;";
  50                         break;
  51                 case '>':
  52                         escape = "&gt;";
  53                         break;
  54                 case '<':
  55                         escape = "&lt;";
  56                         break;
  57                 }
  58                 len = add_str(buffer, size, len, escape);
  59                 if (c)
  60                         continue;
  61                 buffer[len] = 0;
  62                 return len;
  63         }
  64 }
  65
  66 /*
  67  * You know what? Maybe somebody can do a real Pango layout thing.
  68  * This is hacky.
  69  */
  70 static void show_dive_text(struct dive *dive, cairo_t *cr, double w, double h)
  71 {
  72         int len;
  73         PangoLayout *layout;
  74         struct tm *tm;
  75         char buffer[1024], divenr[20];
  76
  77         layout = pango_cairo_create_layout(cr);
  78         pango_layout_set_width(layout, w * PANGO_SCALE);
  79         pango_layout_set_height(layout, h * PANGO_SCALE * 0.9);
  80         pango_layout_set_wrap(layout, PANGO_WRAP_WORD_CHAR);
  81
  82         *divenr = 0;
  83         if (dive->number)
  84                 snprintf(divenr, sizeof(divenr), "Dive #%d - ", dive->number);
  85
  86
  87         tm = gmtime(&dive->when);
  88         len = snprintf(buffer, sizeof(buffer),
  89                 "<span size=\"large\">"
  90                 "%s%s, %s %d, %d   %d:%02d"
  91                 "</span>\n",
  92                 divenr,
  93                 weekday(tm->tm_wday),
  94                 monthname(tm->tm_mon),
  95                 tm->tm_mday, tm->tm_year + 1900,
  96                 tm->tm_hour, tm->tm_min);
  97
  98         /*
  99          * Leave an empty line even if no location: otherwise the notes can
 100          * overrun the depth/duration information.
 101          */
 102         if (dive->location)
 103                 len = add_quoted_string(buffer, sizeof(buffer), len, dive->location);
 104         else
 105                 len = add_char(buffer, sizeof(buffer), len, '\n');
 106
 107         if (dive->notes) {
 108                 len = add_char(buffer, sizeof(buffer), len, '\n');
 109                 len = add_quoted_string(buffer, sizeof(buffer), len, dive->notes);
 110         }
 111
 112         pango_layout_set_justify(layout, 1);
 113         pango_layout_set_ellipsize(layout, PANGO_ELLIPSIZE_END);
 114         pango_layout_set_alignment(layout, PANGO_ALIGN_LEFT);
 115         pango_layout_set_markup(layout, buffer, len);
 116
 117         cairo_move_to(cr, 0, 0);
 118         pango_cairo_show_layout(cr, layout);
 119
 120         /*
 121          * This is still problematic: a long dive location will clash
 122          * with the depth/duration information. Need to mask that or
 123          * create a box or something.
 124          */
 125         snprintf(buffer, sizeof(buffer),
 126                 "<span size=\"small\">"
 127                 "Max depth: %d ft\n"
 128                 "Duration: %d:%02d"
 129                 "</span>",
 130                 to_feet(dive->maxdepth),
 131                 dive->duration.seconds / 60,
 132                 dive->duration.seconds % 60);
 133
 134         pango_layout_set_alignment(layout, PANGO_ALIGN_RIGHT);
 135         pango_layout_set_markup(layout, buffer, -1);
 136
 137         cairo_move_to(cr, 0, 0);
 138         pango_cairo_show_layout(cr, layout);
 139
 140         g_object_unref(layout);
 141 }
 142
 143 static void show_dive_profile(struct dive *dive, cairo_t *cr, double w, double h)
 144 {
 145         struct graphics_context gc = {
 146                 .printer = 1,
 147                 .cr = cr
 148         };
 149         cairo_save(cr);
 150         plot(&gc, w, h, dive);
 151         cairo_restore(cr);
 152 }
 153
 154 static void print(int divenr, cairo_t *cr, double x, double y, double w, double h)
 155 {
 156         struct dive *dive;
 157
 158         dive = get_dive(divenr);
 159         if (!dive)
 160                 return;
 161         cairo_save(cr);
 162         cairo_translate(cr, x, y);
 163
 164         /* Plus 5% on all sides */
 165         cairo_translate(cr, w/20, h/20);
 166         w *= 0.9; h *= 0.9;
 167
 168         /* We actually want to scale the text and the lines now */
 169         cairo_scale(cr, 0.5, 0.5);
 170
 171         /* Dive plot in the upper two thirds - note the scaling */
 172         show_dive_profile(dive, cr, w*2, h*1.33);
 173
 174         /* Dive information in the lower third */
 175         cairo_translate(cr, 0, h*1.33);
 176
 177         show_dive_text(dive, cr, w*2, h*0.67);
 178
 179         cairo_restore(cr);
 180 }
 181
 182 static void draw_page(GtkPrintOperation *operation,
 183                         GtkPrintContext *context,
 184                         gint page_nr,
 185                         gpointer user_data)
 186 {
 187         int nr;
 188         cairo_t *cr;
 189         double w, h;
 190
 191         cr = gtk_print_context_get_cairo_context(context);
 192
 193         w = gtk_print_context_get_width(context)/2;
 194         h = gtk_print_context_get_height(context)/3;
 195
 196         nr = page_nr*6;
 197         print(nr+0, cr, 0,   0, w, h);
 198         print(nr+1, cr, w,   0, w, h);
 199         print(nr+2, cr, 0,   h, w, h);
 200         print(nr+3, cr, w,   h, w, h);
 201         print(nr+4, cr, 0, 2*h, w, h);
 202         print(nr+5, cr, w, 2*h, w, h);
 203 }
 204
 205 static void begin_print(GtkPrintOperation *operation, gpointer user_data)
 206 {
 207 }
 208
 209 static GtkPrintSettings *settings = NULL;
 210
 211 void do_print(void)
 212 {
 213         int pages;
 214         GtkPrintOperation *print;
 215         GtkPrintOperationResult res;
 216
 217         repaint_dive();
 218         print = gtk_print_operation_new();
 219         if (settings != NULL)
 220                 gtk_print_operation_set_print_settings(print, settings);
 221         pages = (dive_table.nr + 5) / 6;
 222         gtk_print_operation_set_n_pages(print, pages);
 223         g_signal_connect(print, "begin_print", G_CALLBACK(begin_print), NULL);
 224         g_signal_connect(print, "draw_page", G_CALLBACK(draw_page), NULL);
 225         res = gtk_print_operation_run(print, GTK_PRINT_OPERATION_ACTION_PRINT_DIALOG,
 226                                          GTK_WINDOW(main_window), NULL);
 227         if (res == GTK_PRINT_OPERATION_RESULT_APPLY) {
 228                 if (settings != NULL)
 229                         g_object_unref(settings);
 230                 settings = g_object_ref(gtk_print_operation_get_print_settings(print));
 231         }
 232         g_object_unref(print);
 233 }