/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
* e-contact-print.c
* Copyright (C) 2000 Helix Code, Inc.
* Author: Chris Lahey <clahey@helixcode.com>
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License as
* published by the Free Software Foundation; either version 2 of the
* License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* General Public License for more details.
*
* You should have received a copy of the GNU General Public
* License along with this library; if not, write to the
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
* Boston, MA 02111-1307, USA.
*/
#include "e-contact-print.h"
#include <libgnomeprint/gnome-print.h>
#include <libgnomeprint/gnome-print-dialog.h>
#include <libgnomeprint/gnome-print-master.h>
#include <libgnomeprint/gnome-print-master-preview.h>
#include <libgnomeprint/gnome-print-multipage.h>
#include <gnome-xml/tree.h>
#include <gnome-xml/parser.h>
#include <ctype.h>
typedef struct _EContactPrintContext EContactPrintContext;
struct _EContactPrintContext
{
GnomePrintContext *pc;
GnomePrintMaster *master;
gdouble x;
gdouble y;
EContactPrintStyle *style;
gboolean first_section;
};
static void
e_contact_output(GnomePrintContext *pc, GnomeFont *font, double x, double y, gchar *text)
{
gnome_print_gsave(pc);
gnome_print_setfont(pc, font);
y -= gnome_font_get_ascender(font);
gnome_print_moveto(pc, x, y);
gnome_print_show(pc, text);
gnome_print_grestore(pc);
}
static void
e_contact_output_and_advance(EContactPrintContext *ctxt, GnomeFont *font, double x, gchar *text)
{
ctxt->y -= .1 * font->size;
e_contact_output(ctxt->pc, font, x, ctxt->y, text);
ctxt->y -= gnome_font_get_ascender(font) - gnome_font_get_descender(font);
ctxt->y -= .1 * font->size;
}
static void
e_contact_rectangle(GnomePrintContext *pc,
gdouble x0,
gdouble y0,
gdouble x1,
gdouble y1,
gdouble r,
gdouble g,
gdouble b)
{
gnome_print_gsave(pc);
gnome_print_setrgbcolor(pc, r, g, b);
gnome_print_moveto(pc, x0, y0);
gnome_print_lineto(pc, x1, y0);
gnome_print_lineto(pc, x1, y1);
gnome_print_lineto(pc, x0, y1);
gnome_print_lineto(pc, x0, y0);
gnome_print_fill(pc);
gnome_print_grestore(pc);
}
static gchar *e_card_get_string(void *card, gchar *key)
{
return key;
}
static gchar *e_card_get_string_fileas(void *card)
{
return "Lahey, Chris";
}
static void
e_contact_print_letter_heading (EContactPrintContext *ctxt, gchar *character)
{
gdouble ascender, descender;
gdouble width;
width = gnome_font_get_width_string(ctxt->style->headings_font, "m ");
ascender = gnome_font_get_ascender(ctxt->style->headings_font);
descender = gnome_font_get_descender(ctxt->style->headings_font);
gnome_print_gsave( ctxt->pc );
e_contact_rectangle( ctxt->pc, ctxt->x, ctxt->y, ctxt->x + width, ctxt->y - (ctxt->style->headings_font->size + 6), 0, 0, 0);
gnome_print_setrgbcolor(ctxt->pc, 1, 1, 1);
ctxt->y -= 4;
e_contact_output(ctxt->pc, ctxt->style->headings_font, ctxt->x + (width - gnome_font_get_width_string(ctxt->style->headings_font, character))/ 2, ctxt->y, character);
ctxt->y -= ascender - descender;
ctxt->y -= 2;
ctxt->y -= 3;
gnome_print_grestore( ctxt->pc );
}
static double
e_contact_get_letter_tab_width (EContactPrintContext *ctxt)
{
return gnome_font_get_width_string(ctxt->style->body_font, "123") + ctxt->style->body_font->size / 5;
}
static double
e_contact_get_letter_heading_height (EContactPrintContext *ctxt)
{
return ctxt->style->headings_font->size * 2;
}
static void
e_contact_start_new_page(EContactPrintContext *ctxt)
{
ctxt->x = ctxt->style->left_margin * 72;
ctxt->y = (ctxt->style->page_height - ctxt->style->top_margin) * 72;
gnome_print_showpage(ctxt->pc);
}
static double
e_contact_get_card_size(void *card, EContactPrintContext *ctxt, GList *shown_fields)
{
double height = 0;
height += ctxt->style->headings_font->size;
for(; shown_fields; shown_fields = g_list_next(shown_fields)) {
gchar *field = e_card_get_string(card, shown_fields->data);
gchar *start = field;
gchar *text;
gchar *temp;
for( text = start, temp = strchr(text, '\n'); temp; text = temp + 1, temp = strchr(text, '\n')) {
height += ctxt->style->body_font->size;
}
height += ctxt->style->body_font->size;
}
return height;
}
static void
e_contact_print_card (void *card, EContactPrintContext *ctxt, GList *shown_fields)
{
gnome_print_gsave(ctxt->pc);
ctxt->y -= 2;
e_contact_rectangle(ctxt->pc, ctxt->x, ctxt->y + 2, ctxt->x + (ctxt->style->page_width - ctxt->style->left_margin - ctxt->style->right_margin) * 72, ctxt->y - (gnome_font_get_ascender(ctxt->style->headings_font) - gnome_font_get_descender(ctxt->style->headings_font)) - 2, .85, .85, .85);
e_contact_output(ctxt->pc, ctxt->style->headings_font, ctxt->x + 2, ctxt->y, e_card_get_string_fileas(card));
ctxt->y -= gnome_font_get_ascender(ctxt->style->headings_font) - gnome_font_get_descender(ctxt->style->headings_font);
ctxt->y -= 2;
for(; shown_fields; shown_fields = g_list_next(shown_fields)) {
double xoff = 0;
gchar *field = e_card_get_string(card, shown_fields->data);
ctxt->y -= .1 * ctxt->style->body_font->size;
e_contact_output(ctxt->pc, ctxt->style->body_font, ctxt->x + xoff, ctxt->y, shown_fields->data);
xoff += gnome_font_get_width_string(ctxt->style->body_font, shown_fields->data);
e_contact_output(ctxt->pc, ctxt->style->body_font, ctxt->x + xoff, ctxt->y, ": ");
xoff += gnome_font_get_width_string(ctxt->style->body_font, ": ");
if (strchr(field, '\n')) {
gchar *start = g_strdup(field);
gchar *text;
gchar *temp;
for( text = start, temp = strchr(text, '\n'); temp; text = temp + 1, temp = strchr(text, '\n')) {
*temp = 0;
e_contact_output(ctxt->pc, ctxt->style->body_font, ctxt->x + xoff, ctxt->y, text);
ctxt->y -= gnome_font_get_ascender(ctxt->style->body_font) - gnome_font_get_descender(ctxt->style->body_font);
ctxt->y -= .2 * ctxt->style->body_font->size;
xoff = 0;
}
e_contact_output(ctxt->pc, ctxt->style->body_font, ctxt->x + xoff, ctxt->y, text);
ctxt->y -= gnome_font_get_ascender(ctxt->style->body_font) - gnome_font_get_descender(ctxt->style->body_font);
ctxt->y -= .1 * ctxt->style->body_font->size;
g_free(text);
} else {
e_contact_output(ctxt->pc, ctxt->style->body_font, ctxt->x + xoff, ctxt->y, field);
ctxt->y -= gnome_font_get_ascender(ctxt->style->body_font) - gnome_font_get_descender(ctxt->style->body_font);
ctxt->y -= .1 * ctxt->style->body_font->size;
}
}
gnome_print_grestore(ctxt->pc);
}
static void
e_contact_do_print (void *book, EContactPrintContext *ctxt, GList *shown_fields)
{
gchar *character = NULL;
gchar first_page_character = 'a' - 1;
void *card = NULL;
int i;
gdouble page_height = 72 * (ctxt->style->page_height - ctxt->style->top_margin - ctxt->style->bottom_margin);
gdouble page_width = 72 * (ctxt->style->page_width - ctxt->style->left_margin - ctxt->style->right_margin);
ctxt->y = (ctxt->style->page_height - ctxt->style->top_margin) * 72;
ctxt->x = (ctxt->style->left_margin) * 72;
if ( ctxt->style->letter_tabs )
page_width -= e_contact_get_letter_tab_width(ctxt);
/*
for(card = e_book_get_first(book); card; card = e_book_get_next(book)) {
*/
for (i=0; i < 40; i++) {
gchar *file_as = e_card_get_string_fileas(card);
if ( ctxt->style->letter_headings && file_as && (!character || *character != tolower(*file_as)) ) {
if (ctxt->style->sections_start_new_page)
e_contact_start_new_page(ctxt);
else if (ctxt->y - e_contact_get_letter_heading_height(ctxt) - e_contact_get_card_size(card, ctxt, shown_fields) < ctxt->style->bottom_margin * 72)
e_contact_start_new_page(ctxt);
if (!character)
character = g_strdup(" ");
*character = tolower(*file_as);
e_contact_print_letter_heading(ctxt, character);
ctxt->first_section = FALSE;
}
if (ctxt->y - e_contact_get_card_size(card, ctxt, shown_fields) < ctxt->style->bottom_margin * 72) {
e_contact_start_new_page(ctxt);
e_contact_print_letter_heading(ctxt, character);
}
e_contact_print_card(card, ctxt, shown_fields);
}
gnome_print_showpage(ctxt->pc);
gnome_print_context_close(ctxt->pc);
g_free(character);
}
static void
e_contact_build_style(EContactPrintStyle *style)
{
xmlDocPtr styledoc;
style->title = "";
style->sections_start_new_page = FALSE;
style->num_columns = 1;
style->blank_forms = 2;
style->letter_tabs = TRUE;
style->letter_headings = TRUE;
style->headings_font = gnome_font_new("Helvetica-Bold", 8);
style->body_font = gnome_font_new("Helvetica", 6);
style->print_using_grey = TRUE;
style->paper_type = 0;
style->paper_width = 8.5;
style->paper_height = 11;
style->paper_source = 0;
style->top_margin = .5;
style->left_margin = .5;
style->bottom_margin = .5;
style->right_margin = .5;
style->page_size = 0;
style->page_width = 2.75;
style->page_height = 4.25;
#if 0
style->page_width = 4.25;
style->page_height = 5.5;
#endif
style->orientation_portrait = FALSE;
style->header_font = gnome_font_new("Helvetica", 6);
style->left_header = "";
style->center_header = "";
style->right_header = "";
style->footer_font = gnome_font_new("Helvetica", 6);
style->left_footer = "";
style->center_footer = "";
style->right_footer = "";
style->reverse_on_even_pages = FALSE;
styledoc = xmlParseFile("smallbook.ecps");
if (styledoc) {
#if 0
xmlNodePtr stylenode = xmlDocGetRootElement(styledoc);
#endif
xmlFreeDoc(styledoc);
}
}
static gint
e_contact_print_close(GnomeDialog *dialog, gpointer data)
{
return FALSE;
}
static void
e_contact_print_button(GnomeDialog *dialog, gint button, gpointer data)
{
EContactPrintContext ctxt;
EContactPrintStyle style;
GnomePrintMaster *master;
GtkWidget *preview;
GnomePrintContext *pc;
void *book = gtk_object_get_data(GTK_OBJECT(dialog), "book");
GList *shown_fields = gtk_object_get_data(GTK_OBJECT(dialog), "shown_fields");
switch( button ) {
case GNOME_PRINT_PRINT:
master = gnome_print_master_new_from_dialog( GNOME_PRINT_DIALOG(dialog) );
pc = gnome_print_master_get_context( master );
e_contact_build_style(&style);
ctxt.x = 0;
ctxt.y = 0;
ctxt.style = &style;
ctxt.master = master;
ctxt.first_section = TRUE;
ctxt.pc = gnome_print_multipage_new_from_sizes(pc,
72 * style.paper_width,
72 * style.paper_height,
72 * style.page_width,
72 * style.page_height);
e_contact_do_print(book, &ctxt, shown_fields);
gnome_print_master_print(master);
gtk_object_unref(GTK_OBJECT(ctxt.pc));
gtk_object_unref(GTK_OBJECT(master));
gnome_dialog_close(dialog);
break;
case GNOME_PRINT_PREVIEW:
master = gnome_print_master_new_from_dialog( GNOME_PRINT_DIALOG(dialog) );
pc = gnome_print_master_get_context( master );
e_contact_build_style(&style);
ctxt.x = 0;
ctxt.y = 0;
ctxt.style = &style;
ctxt.master = master;
ctxt.first_section = TRUE;
ctxt.pc = gnome_print_multipage_new_from_sizes(pc,
72 * style.paper_width,
72 * style.paper_height,
72 * style.page_width,
72 * style.page_height);
e_contact_do_print(book, &ctxt, shown_fields);
preview = GTK_WIDGET(gnome_print_master_preview_new(master, "Print Preview"));
gtk_widget_show_all(preview);
gtk_object_unref(GTK_OBJECT(ctxt.pc));
gtk_object_unref(GTK_OBJECT(master));
break;
case GNOME_PRINT_CANCEL:
gnome_dialog_close(dialog);
break;
}
}
GtkWidget *
e_contact_print_dialog_new(void *book, GList *shown_fields)
{
GtkWidget *dialog;
dialog = gnome_print_dialog_new("Print cards", GNOME_PRINT_DIALOG_RANGE | GNOME_PRINT_DIALOG_COPIES);
gnome_print_dialog_construct_range_any(GNOME_PRINT_DIALOG(dialog), GNOME_PRINT_RANGE_ALL | GNOME_PRINT_RANGE_SELECTION,
NULL, NULL, NULL);
gtk_object_set_data(GTK_OBJECT(dialog), "book", book);
gtk_object_set_data(GTK_OBJECT(dialog), "shown_fields", shown_fields);
gtk_signal_connect(GTK_OBJECT(dialog),
"clicked", e_contact_print_button, NULL);
gtk_signal_connect(GTK_OBJECT(dialog),
"close", e_contact_print_close, NULL);
return dialog;
}
