/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
* e-contact-print-envelope.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-envelope.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 <addressbook/backend/ebook/e-card.h>
#include <addressbook/backend/ebook/e-card-simple.h>
#define ENVELOPE_HEIGHT (72.0 * 4.0)
#define ENVELOPE_WIDTH (72.0 * 9.5)
typedef struct {
int start;
int length;
} EcpeLine;
static void
startset(void *pointer, EcpeLine **iterator)
{
(*iterator)--;
(*iterator)->start = GPOINTER_TO_INT(pointer);
}
static void
lengthset(void *pointer, EcpeLine **iterator)
{
(*iterator)--;
(*iterator)->length = GPOINTER_TO_INT(pointer);
}
static EcpeLine *
ecpe_break(char *address)
{
int i;
int length = 0;
int laststart = 0;
GList *startlist = NULL;
GList *lengthlist = NULL;
EcpeLine *ret_val;
EcpeLine *iterator;
for (i = 0; address[i]; i++) {
if (address[i] == '\n') {
startlist = g_list_prepend (startlist, GINT_TO_POINTER(laststart));
lengthlist = g_list_prepend (lengthlist, GINT_TO_POINTER(i - laststart));
length ++;
laststart = i + 1;
}
}
startlist = g_list_prepend (startlist, GINT_TO_POINTER(laststart));
lengthlist = g_list_prepend (lengthlist, GINT_TO_POINTER(i - laststart));
length ++;
ret_val = g_new(EcpeLine, length + 1);
iterator = ret_val + length;
g_list_foreach(startlist, (GFunc) startset, &iterator);
g_list_free(startlist);
iterator = ret_val + length;
g_list_foreach(lengthlist, (GFunc) lengthset, &iterator);
g_list_free(lengthlist);
ret_val[length].start = -1;
ret_val[length].length = -1;
return ret_val;
}
static void
ecpe_linelist_dimensions(GnomeFont *font, char *address, EcpeLine *linelist, double *widthp, double *heightp)
{
double width = 0;
int i;
if (widthp) {
for (i = 0; linelist[i].length != -1; i++) {
width = MAX(width, gnome_font_get_width_string_n (font, address + linelist[i].start, linelist[i].length));
}
*widthp = width;
} else {
for (i = 0; linelist[i].length != -1; i++)
/* Intentionally empty */;
}
if (heightp) {
*heightp = gnome_font_get_size(font) * i;
}
}
static void
ecpe_linelist_print(GnomePrintContext *pc, GnomeFont *font, char *address, EcpeLine *linelist, double x, double y)
{
int i;
gnome_print_setfont(pc, font);
for (i = 0; linelist[i].length != -1; i++) {
gnome_print_moveto(pc, x, y + gnome_font_get_ascender(font));
gnome_print_show_sized (pc, address + linelist[i].start, linelist[i].length);
y -= gnome_font_get_size(font);
}
}
static gint
e_contact_print_envelope_close(GnomeDialog *dialog, gpointer data)
{
return FALSE;
}
static void
ecpe_print(GnomePrintContext *pc, ECard *ecard, gboolean as_return)
{
ECardSimple *card = e_card_simple_new(ecard);
char *address;
EcpeLine *linelist;
double x;
double y;
GnomeFont *font;
gnome_print_rotate(pc, 90);
gnome_print_translate(pc, 72.0 * 11.0 - ENVELOPE_WIDTH, -72.0 * 8.5 + (72.0 * 8.5 - ENVELOPE_HEIGHT) / 2);
address = e_card_simple_get(card, E_CARD_SIMPLE_FIELD_ADDRESS_BUSINESS);
linelist = ecpe_break(address);
if (as_return)
font = gnome_font_new("Helvetica", 9);
else
font = gnome_font_new("Helvetica", 12);
ecpe_linelist_dimensions(font, address, linelist, NULL, &y);
if (as_return) {
x = 36;
y = ENVELOPE_HEIGHT - 36;
} else {
x = ENVELOPE_WIDTH / 2;
y = (ENVELOPE_HEIGHT - y) / 2;
}
ecpe_linelist_print(pc, font, address, linelist, x, y);
gtk_object_unref(GTK_OBJECT(font));
g_free(linelist);
g_free(address);
gnome_print_showpage(pc);
gnome_print_context_close(pc);
gtk_object_unref(GTK_OBJECT(card));
}
static void
e_contact_print_envelope_button(GnomeDialog *dialog, gint button, gpointer data)
{
GnomePrintMaster *master;
GnomePrintContext *pc;
ECard *card = NULL;
GtkWidget *preview;
card = gtk_object_get_data(GTK_OBJECT(dialog), "card");
switch( button ) {
case GNOME_PRINT_PRINT:
master = gnome_print_master_new_from_dialog( GNOME_PRINT_DIALOG(dialog) );
pc = gnome_print_master_get_context( master );
ecpe_print(pc, card, FALSE);
gnome_print_master_print(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 );
ecpe_print(pc, card, FALSE);
preview = GTK_WIDGET(gnome_print_master_preview_new(master, "Print Preview"));
gtk_widget_show_all(preview);
break;
case GNOME_PRINT_CANCEL:
gtk_object_unref(GTK_OBJECT(card));
gnome_dialog_close(dialog);
break;
}
}
GtkWidget *
e_contact_print_envelope_dialog_new(ECard *card)
{
GtkWidget *dialog;
dialog = gnome_print_dialog_new("Print envelope", GNOME_PRINT_DIALOG_COPIES);
card = e_card_duplicate(card);
gtk_object_set_data(GTK_OBJECT(dialog), "card", card);
gtk_signal_connect(GTK_OBJECT(dialog),
"clicked", GTK_SIGNAL_FUNC(e_contact_print_envelope_button), NULL);
gtk_signal_connect(GTK_OBJECT(dialog),
"close", GTK_SIGNAL_FUNC(e_contact_print_envelope_close), NULL);
return dialog;
}
