X-Git-Url: https://www.fi.muni.cz/~kas/git//home/kas/public_html/git/?a=blobdiff_plain;f=ps%2Fps-document.c;h=0931fb91d37f63414879eddeb732500419c46f68;hb=HEAD;hp=8f514cfffd7c9cb644b8f8756480ef0fa1cdae7f;hpb=b8261d154d9bd065eb6b557b1c9c80e47ea2b4d1;p=evince.git diff --git a/ps/ps-document.c b/ps/ps-document.c deleted file mode 100644 index 8f514cff..00000000 --- a/ps/ps-document.c +++ /dev/null @@ -1,1462 +0,0 @@ -/* Ghostscript widget for GTK/GNOME - * - * Copyright (C) 1998 - 2005 the Free Software Foundation - * - * Authors: Jonathan Blandford, Jaka Mocnik - * - * Based on code by: Federico Mena (Quartic), Szekeres Istvan (Pista) - * - * This library is free software; you can redistribute it and/or - * modify it under the terms of the GNU Library General Public - * License as published by the Free Software Foundation; either - * version 2 of the License, or (at your option) any later version. - * - * This library 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 - * Library General Public License for more details. - * - * You should have received a copy of the GNU Library 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 "config.h" -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "ps-document.h" -#include "ev-debug.h" -#include "gsdefaults.h" -#include "ev-ps-exporter.h" - -#ifdef HAVE_LOCALE_H -# include -#endif - -/* if POSIX O_NONBLOCK is not available, use O_NDELAY */ -#if !defined(O_NONBLOCK) && defined(O_NDELAY) -# define O_NONBLOCK O_NDELAY -#endif - -#define MAX_BUFSIZE 1024 - -#define PS_DOCUMENT_IS_COMPRESSED(gs) (PS_DOCUMENT(gs)->gs_filename_unc != NULL) -#define PS_DOCUMENT_GET_PS_FILE(gs) (PS_DOCUMENT_IS_COMPRESSED(gs) ? \ - PS_DOCUMENT(gs)->gs_filename_unc : \ - PS_DOCUMENT(gs)->gs_filename) - -GCond* pixbuf_cond = NULL; -GMutex* pixbuf_mutex = NULL; -GdkPixbuf *current_pixbuf = NULL; - -enum { - PROP_0, - PROP_TITLE -}; - -/* structure to describe section of file to send to ghostscript */ -struct record_list { - FILE *fp; - long begin; - guint len; - gboolean seek_needed; - gboolean close; - struct record_list *next; -}; - -typedef struct { - int page; - double scale; - PSDocument *document; -} PSRenderJob; - -static gboolean broken_pipe = FALSE; - -/* Forward declarations */ -static void ps_document_init(PSDocument * gs); -static void ps_document_class_init(PSDocumentClass * klass); -static void ps_document_finalize(GObject * object); -static void send_ps(PSDocument * gs, long begin, unsigned int len, gboolean close); -static void close_pipe(int p[2]); -static void output(gpointer data, gint source, GdkInputCondition condition); -static void input(gpointer data, gint source, GdkInputCondition condition); -static void stop_interpreter(PSDocument * gs); -static gint start_interpreter(PSDocument * gs); -static void ps_document_document_iface_init (EvDocumentIface *iface); -static void ps_document_ps_exporter_iface_init (EvPSExporterIface *iface); -static gboolean ps_document_widget_event (GtkWidget *widget, GdkEvent *event, gpointer data); - -static GObjectClass *parent_class = NULL; - -static PSDocumentClass *gs_class = NULL; - -static void -ps_document_init (PSDocument *gs) -{ - gs->bpixmap = NULL; - - gs->interpreter_pid = -1; - - gs->busy = FALSE; - gs->gs_filename = 0; - gs->gs_filename_unc = 0; - - broken_pipe = FALSE; - - gs->structured_doc = FALSE; - gs->reading_from_pipe = FALSE; - gs->send_filename_to_gs = FALSE; - - gs->doc = NULL; - gs->loaded = FALSE; - - gs->interpreter_input = -1; - gs->interpreter_output = -1; - gs->interpreter_err = -1; - gs->interpreter_input_id = 0; - gs->interpreter_output_id = 0; - gs->interpreter_error_id = 0; - - gs->ps_input = NULL; - gs->input_buffer = NULL; - gs->input_buffer_ptr = NULL; - gs->bytes_left = 0; - gs->buffer_bytes_left = 0; - - gs->gs_status = _("No document loaded."); - - gs->ps_export_pagelist = NULL; - gs->ps_export_filename = NULL; - - pixbuf_cond = g_cond_new (); - pixbuf_mutex = g_mutex_new (); -} - -static void -ps_document_set_property (GObject *object, - guint prop_id, - const GValue *value, - GParamSpec *pspec) -{ - switch (prop_id) - - { - case PROP_TITLE: - /* read only */ - break; - } -} - -static void -ps_document_get_property (GObject *object, - guint prop_id, - GValue *value, - GParamSpec *pspec) -{ - PSDocument *ps = PS_DOCUMENT (object); - - switch (prop_id) - { - case PROP_TITLE: - if (ps->doc) { - g_value_set_string (value, ps->doc->title); - } else { - g_value_set_string (value, NULL); - } - break; - } -} - -static void -ps_document_class_init(PSDocumentClass *klass) -{ - GObjectClass *object_class; - - object_class = (GObjectClass *) klass; - parent_class = g_type_class_peek_parent (klass); - gs_class = klass; - - object_class->finalize = ps_document_finalize; - object_class->get_property = ps_document_get_property; - object_class->set_property = ps_document_set_property; - - klass->gs_atom = gdk_atom_intern ("GHOSTVIEW", FALSE); - klass->next_atom = gdk_atom_intern ("NEXT", FALSE); - klass->page_atom = gdk_atom_intern ("PAGE", FALSE); - klass->string_atom = gdk_atom_intern ("STRING", FALSE); - - g_object_class_override_property (object_class, PROP_TITLE, "title"); -} - -static void -push_pixbuf (PSDocument *gs) -{ - GdkColormap *cmap; - GdkPixbuf *pixbuf; - int width, height; - - cmap = gdk_window_get_colormap (gs->pstarget); - gdk_drawable_get_size (gs->bpixmap, &width, &height); - pixbuf = gdk_pixbuf_get_from_drawable (NULL, gs->bpixmap, cmap, - 0, 0, 0, 0, - width, height); - g_mutex_lock (pixbuf_mutex); - current_pixbuf = pixbuf; - g_cond_signal (pixbuf_cond); - g_mutex_unlock (pixbuf_mutex); - -} - -static void -interpreter_failed (PSDocument *gs, char *msg) -{ - LOG ("Interpreter failed %s", msg); - - push_pixbuf (gs); - - stop_interpreter (gs); -} - -static void -ps_document_cleanup (PSDocument *gs) -{ - g_return_if_fail (gs != NULL); - g_return_if_fail (PS_IS_DOCUMENT (gs)); - - LOG ("Cleanup\n"); - - stop_interpreter (gs); - - if (gs->gs_psfile) { - fclose (gs->gs_psfile); - gs->gs_psfile = NULL; - } - - if (gs->gs_filename) { - g_free (gs->gs_filename); - gs->gs_filename = NULL; - } - - if (gs->doc) { - psfree (gs->doc); - gs->doc = NULL; - } - - if (gs->gs_filename_unc) { - unlink(gs->gs_filename_unc); - g_free(gs->gs_filename_unc); - gs->gs_filename_unc = NULL; - } - - gs->loaded = FALSE; -} - -static gboolean -ps_document_widget_event (GtkWidget *widget, GdkEvent *event, gpointer data) -{ - PSDocument *gs = (PSDocument *) data; - - if(event->type != GDK_CLIENT_EVENT) - return FALSE; - - gs->message_window = event->client.data.l[0]; - - if (event->client.message_type == gs_class->page_atom) { - LOG ("GS rendered the document"); - gs->busy = FALSE; - - push_pixbuf (gs); - } - - return TRUE; -} - -static void -ps_document_finalize (GObject * object) -{ - PSDocument *gs; - - g_return_if_fail (object != NULL); - g_return_if_fail (PS_IS_DOCUMENT (object)); - - LOG ("Finalize"); - - gs = PS_DOCUMENT (object); - - ps_document_cleanup (gs); - stop_interpreter (gs); - - if(gs->input_buffer) { - g_free(gs->input_buffer); - gs->input_buffer = NULL; - } - - (*G_OBJECT_CLASS (parent_class)->finalize) (object); -} - -static void -send_ps(PSDocument * gs, long begin, unsigned int len, gboolean close) -{ - struct record_list *ps_new; - - if(gs->interpreter_input < 0) { - g_critical("No pipe to gs: error in send_ps()."); - return; - } - - ps_new = (struct record_list *) g_malloc(sizeof(struct record_list)); - ps_new->fp = gs->gs_psfile; - ps_new->begin = begin; - ps_new->len = len; - ps_new->seek_needed = TRUE; - ps_new->close = close; - ps_new->next = NULL; - - if(gs->input_buffer == NULL) { - gs->input_buffer = g_malloc(MAX_BUFSIZE); - } - - if(gs->ps_input == NULL) { - gs->input_buffer_ptr = gs->input_buffer; - gs->bytes_left = len; - gs->buffer_bytes_left = 0; - gs->ps_input = ps_new; - gs->interpreter_input_id = - gdk_input_add(gs->interpreter_input, GDK_INPUT_WRITE, input, gs); - } - else { - struct record_list *p = gs->ps_input; - while(p->next != NULL) { - p = p->next; - } - p->next = ps_new; - } -} - -static float -get_xdpi (PSDocument *gs) -{ - return 25.4 * gdk_screen_width() / gdk_screen_width_mm(); -} - -static float -get_ydpi (PSDocument *gs) -{ - return 25.4 * gdk_screen_height() / gdk_screen_height_mm(); -} - -static void -setup_pixmap (PSDocument *gs, int page, double scale) -{ - GdkGC *fill; - GdkColor white = { 0, 0xFFFF, 0xFFFF, 0xFFFF }; /* pixel, r, g, b */ - GdkColormap *colormap; - double width, height; - int pixmap_width, pixmap_height; - - ev_document_get_page_size (EV_DOCUMENT (gs), page, &width, &height); - pixmap_width = floor (width * scale); - pixmap_height = floor (height * scale); - - if(gs->bpixmap) { - int w, h; - - gdk_drawable_get_size (gs->bpixmap, &w, &h); - - if (pixmap_width != w || h != pixmap_height) { - gdk_drawable_unref (gs->bpixmap); - gs->bpixmap = NULL; - stop_interpreter (gs); - } - } - - if (!gs->bpixmap) { - LOG ("Create pixmap"); - - fill = gdk_gc_new (gs->pstarget); - colormap = gdk_drawable_get_colormap (gs->pstarget); - gdk_color_alloc (colormap, &white); - gdk_gc_set_foreground (fill, &white); - gs->bpixmap = gdk_pixmap_new (gs->pstarget, pixmap_width, - pixmap_height, -1); - gdk_draw_rectangle (gs->bpixmap, fill, TRUE, - 0, 0, pixmap_width, pixmap_height); - } -} - -#define DEFAULT_PAGE_SIZE 1 - -static void -get_page_box (PSDocument *gs, int page, int *urx, int *ury, int *llx, int *lly) -{ - gint new_llx = 0; - gint new_lly = 0; - gint new_urx = 0; - gint new_ury = 0; - GtkGSPaperSize *papersizes = gtk_gs_defaults_get_paper_sizes(); - int new_pagesize = -1; - - g_return_if_fail(PS_IS_DOCUMENT(gs)); - - if(new_pagesize == -1) { - new_pagesize = DEFAULT_PAGE_SIZE; - if(gs->doc) { - /* If we have a document: - We use -- the page size (if specified) - or the doc. size (if specified) - or the page bbox (if specified) - or the bounding box - */ - if((page >= 0) && (gs->doc->numpages > page) && - (gs->doc->pages) && (gs->doc->pages[page].size)) { - new_pagesize = gs->doc->pages[page].size - gs->doc->size; - } - else if(gs->doc->default_page_size != NULL) { - new_pagesize = gs->doc->default_page_size - gs->doc->size; - } - else if((page >= 0) && - (gs->doc->numpages > page) && - (gs->doc->pages) && - (gs->doc->pages[page].boundingbox[URX] > - gs->doc->pages[page].boundingbox[LLX]) && - (gs->doc->pages[page].boundingbox[URY] > - gs->doc->pages[page].boundingbox[LLY])) { - new_pagesize = -1; - } - else if((gs->doc->boundingbox[URX] > gs->doc->boundingbox[LLX]) && - (gs->doc->boundingbox[URY] > gs->doc->boundingbox[LLY])) { - new_pagesize = -1; - } - } - } - - /* Compute bounding box */ - if(gs->doc && (gs->doc->epsf || new_pagesize == -1)) { /* epsf or bbox */ - if((page >= 0) && - (gs->doc->pages) && - (gs->doc->pages[page].boundingbox[URX] > - gs->doc->pages[page].boundingbox[LLX]) - && (gs->doc->pages[page].boundingbox[URY] > - gs->doc->pages[page].boundingbox[LLY])) { - /* use page bbox */ - new_llx = gs->doc->pages[page].boundingbox[LLX]; - new_lly = gs->doc->pages[page].boundingbox[LLY]; - new_urx = gs->doc->pages[page].boundingbox[URX]; - new_ury = gs->doc->pages[page].boundingbox[URY]; - } - else if((gs->doc->boundingbox[URX] > gs->doc->boundingbox[LLX]) && - (gs->doc->boundingbox[URY] > gs->doc->boundingbox[LLY])) { - /* use doc bbox */ - new_llx = gs->doc->boundingbox[LLX]; - new_lly = gs->doc->boundingbox[LLY]; - new_urx = gs->doc->boundingbox[URX]; - new_ury = gs->doc->boundingbox[URY]; - } - } - else { - if(new_pagesize < 0) - new_pagesize = DEFAULT_PAGE_SIZE; - new_llx = new_lly = 0; - if(gs->doc && gs->doc->size && - (new_pagesize < gs->doc->numsizes)) { - new_urx = gs->doc->size[new_pagesize].width; - new_ury = gs->doc->size[new_pagesize].height; - } - else { - new_urx = papersizes[new_pagesize].width; - new_ury = papersizes[new_pagesize].height; - } - } - - if(new_urx <= new_llx) - new_urx = papersizes[12].width; - if(new_ury <= new_lly) - new_ury = papersizes[12].height; - - *urx = new_urx; - *ury = new_ury; - *llx = new_llx; - *lly = new_lly; -} - -static int -get_page_orientation (PSDocument *gs, int page) -{ - int orientation; - - orientation = GTK_GS_ORIENTATION_NONE; - - if (gs->structured_doc) { - orientation = gs->doc->pages[page].orientation; - } - if (orientation == GTK_GS_ORIENTATION_NONE) { - orientation = gs->doc->default_page_orientation; - } - if (orientation == GTK_GS_ORIENTATION_NONE) { - orientation = gs->doc->orientation; - } - if (orientation == GTK_GS_ORIENTATION_NONE) { - orientation = GTK_GS_ORIENTATION_PORTRAIT; - } - - return orientation; -} - -static void -setup_page (PSDocument *gs, int page, double scale) -{ - char buf[1024]; - int urx, ury, llx, lly, orientation; -#ifdef HAVE_LOCALE_H - char *savelocale; -#endif - - LOG ("Setup the page"); - -#ifdef HAVE_LOCALE_H - /* gs needs floating point parameters with '.' as decimal point - * while some (european) locales use ',' instead, so we set the - * locale for this snprintf to "C". - */ - savelocale = setlocale (LC_NUMERIC, "C"); -#endif - get_page_box (gs, page, &urx, &ury, &llx, &lly); - orientation = get_page_orientation (gs, page); - - g_snprintf (buf, 1024, "%ld %d %d %d %d %d %f %f %d %d %d %d", - 0L, orientation * 90, llx, lly, urx, ury, - get_xdpi (gs) * scale, - get_ydpi (gs) * scale, - 0, 0, 0, 0); - LOG ("GS property %s", buf); - -#ifdef HAVE_LOCALE_H - setlocale(LC_NUMERIC, savelocale); -#endif - gdk_property_change (gs->pstarget, gs_class->gs_atom, gs_class->string_atom, - 8, GDK_PROP_MODE_REPLACE, (guchar *)buf, strlen(buf)); - gdk_flush (); -} - -static void -close_pipe (int p[2]) -{ - if (p[0] != -1) { - close (p[0]); - } - if (p[1] != -1) { - close (p[1]); - } -} - -static gboolean -is_interpreter_ready (PSDocument *gs) -{ - return (gs->interpreter_pid != -1 && !gs->busy && gs->ps_input == NULL); -} - -static void -output(gpointer data, gint source, GdkInputCondition condition) -{ - char buf[MAX_BUFSIZE + 1], *msg; - guint bytes = 0; - PSDocument *gs = PS_DOCUMENT(data); - - if(source == gs->interpreter_output) { - bytes = read(gs->interpreter_output, buf, MAX_BUFSIZE); - if(bytes == 0) { /* EOF occurred */ - close(gs->interpreter_output); - gs->interpreter_output = -1; - gdk_input_remove(gs->interpreter_output_id); - return; - } - else if(bytes == -1) { - /* trouble... */ - interpreter_failed(gs, NULL); - return; - } - if(gs->interpreter_err == -1) { - interpreter_failed(gs, NULL); - } - } - else if(source == gs->interpreter_err) { - bytes = read(gs->interpreter_err, buf, MAX_BUFSIZE); - if(bytes == 0) { /* EOF occurred */ - close(gs->interpreter_err); - gs->interpreter_err = -1; - gdk_input_remove(gs->interpreter_error_id); - return; - } - else if(bytes == -1) { - /* trouble... */ - interpreter_failed(gs, NULL); - return; - } - if(gs->interpreter_output == -1) { - interpreter_failed(gs, NULL); - } - } - if(bytes > 0) { - buf[bytes] = '\0'; - msg = g_strdup(buf); - interpreter_failed (gs, msg); - } -} - -static void -catchPipe(int i) -{ - broken_pipe = True; -} - -static void -input(gpointer data, gint source, GdkInputCondition condition) -{ - PSDocument *gs = PS_DOCUMENT(data); - int bytes_written; - void (*oldsig) (int); - oldsig = signal(SIGPIPE, catchPipe); - - LOG ("Input"); - - do { - if(gs->buffer_bytes_left == 0) { - /* Get a new section if required */ - if(gs->ps_input && gs->bytes_left == 0) { - struct record_list *ps_old = gs->ps_input; - gs->ps_input = ps_old->next; - if(ps_old->close && NULL != ps_old->fp) - fclose(ps_old->fp); - g_free((char *) ps_old); - } - /* Have to seek at the beginning of each section */ - if(gs->ps_input && gs->ps_input->seek_needed) { - fseek(gs->ps_input->fp, gs->ps_input->begin, SEEK_SET); - gs->ps_input->seek_needed = FALSE; - gs->bytes_left = gs->ps_input->len; - } - - if(gs->bytes_left > MAX_BUFSIZE) { - gs->buffer_bytes_left = - fread(gs->input_buffer, sizeof(char), MAX_BUFSIZE, gs->ps_input->fp); - } - else if(gs->bytes_left > 0) { - gs->buffer_bytes_left = - fread(gs->input_buffer, - sizeof(char), gs->bytes_left, gs->ps_input->fp); - } - else { - gs->buffer_bytes_left = 0; - } - if(gs->bytes_left > 0 && gs->buffer_bytes_left == 0) { - interpreter_failed (gs, NULL); /* Error occurred */ - } - gs->input_buffer_ptr = gs->input_buffer; - gs->bytes_left -= gs->buffer_bytes_left; - } - - if(gs->buffer_bytes_left > 0) { - bytes_written = write(gs->interpreter_input, - gs->input_buffer_ptr, gs->buffer_bytes_left); - - if(broken_pipe) { - interpreter_failed (gs, g_strdup(_("Broken pipe."))); - broken_pipe = FALSE; - interpreter_failed (gs, NULL); - } - else if(bytes_written == -1) { - if((errno != EWOULDBLOCK) && (errno != EAGAIN)) { - interpreter_failed (gs, NULL); /* Something bad happened */ - } - } - else { - gs->buffer_bytes_left -= bytes_written; - gs->input_buffer_ptr += bytes_written; - } - } - } - while(gs->ps_input && gs->buffer_bytes_left == 0); - - signal(SIGPIPE, oldsig); - - if(gs->ps_input == NULL && gs->buffer_bytes_left == 0) { - if(gs->interpreter_input_id != 0) { - gdk_input_remove(gs->interpreter_input_id); - gs->interpreter_input_id = 0; - } - } -} - -static int -start_interpreter (PSDocument *gs) -{ - int std_in[2] = { -1, -1 }; /* pipe to interp stdin */ - int std_out[2]; /* pipe from interp stdout */ - int std_err[2]; /* pipe from interp stderr */ - -#define NUM_ARGS 100 -#define NUM_GS_ARGS (NUM_ARGS - 20) -#define NUM_ALPHA_ARGS 10 - - char *argv[NUM_ARGS], *dir, *gv_env; - char **gs_args, **alpha_args = NULL; - int argc = 0, i; - - LOG ("Start the interpreter"); - - if(!gs->gs_filename) - return 0; - - stop_interpreter(gs); - - /* set up the args... */ - gs_args = g_strsplit (gtk_gs_defaults_get_interpreter_cmd (), " ", NUM_GS_ARGS); - for(i = 0; i < NUM_GS_ARGS && gs_args[i]; i++, argc++) { - argv[argc] = gs_args[i]; - } - - alpha_args = g_strsplit (ALPHA_PARAMS, " ", NUM_ALPHA_ARGS); - for(i = 0; i < NUM_ALPHA_ARGS && alpha_args[i]; i++, argc++) { - argv[argc] = alpha_args[i]; - } - - argv[argc++] = "-dNOPAUSE"; - argv[argc++] = "-dQUIET"; - argv[argc++] = "-dSAFER"; - - /* set up the pipes */ - if (gs->send_filename_to_gs) { - argv[argc++] = PS_DOCUMENT_GET_PS_FILE (gs); - argv[argc++] = "-c"; - argv[argc++] = "quit"; - } else { - argv[argc++] = "-"; - } - - argv[argc++] = NULL; - - if (!gs->reading_from_pipe && !gs->send_filename_to_gs) { - if (pipe (std_in) == -1) { - g_critical ("Unable to open pipe to Ghostscript."); - return -1; - } - } - - if (pipe (std_out) == -1) { - close_pipe (std_in); - return -1; - } - - if (pipe(std_err) == -1) { - close_pipe (std_in); - close_pipe (std_out); - return -1; - } - - gv_env = g_strdup_printf ("GHOSTVIEW=%ld %ld", - gdk_x11_drawable_get_xid (gs->pstarget), - gdk_x11_drawable_get_xid (gs->bpixmap)); - LOG ("Launching ghostview with env %s", gv_env); - - gs->busy = TRUE; - gs->interpreter_pid = fork (); - switch (gs->interpreter_pid) { - case -1: /* error */ - close_pipe (std_in); - close_pipe (std_out); - close_pipe (std_err); - return -2; - break; - case 0: /* child */ - close (std_out[0]); - dup2 (std_out[1], 1); - close (std_out[1]); - - close (std_err[0]); - dup2 (std_err[1], 2); - close (std_err[1]); - - if (!gs->reading_from_pipe) { - if (gs->send_filename_to_gs) { - int stdinfd; - /* just in case gs tries to read from stdin */ - stdinfd = open("/dev/null", O_RDONLY); - if (stdinfd != 0) { - dup2(stdinfd, 0); - close(stdinfd); - } - } else { - close (std_in[1]); - dup2 (std_in[0], 0); - close (std_in[0]); - } - } - - putenv(gv_env); - - /* change to directory where the input file is. This helps - * with postscript-files which include other files using - * a relative path */ - dir = g_path_get_dirname (gs->gs_filename); - chdir (dir); - g_free (dir); - - execvp (argv[0], argv); - - /* Notify error */ - g_critical ("Unable to execute [%s]\n", argv[0]); - g_strfreev (gs_args); - g_free (gv_env); - g_strfreev (alpha_args); - _exit (1); - break; - default: /* parent */ - if (!gs->send_filename_to_gs && !gs->reading_from_pipe) { - int result; - close (std_in[0]); - /* use non-blocking IO for pipe to ghostscript */ - result = fcntl (std_in[1], F_GETFL, 0); - fcntl (std_in[1], F_SETFL, result | O_NONBLOCK); - gs->interpreter_input = std_in[1]; - } else { - gs->interpreter_input = -1; - } - close (std_out[1]); - - gs->interpreter_output = std_out[0]; - close (std_err[1]); - gs->interpreter_err = std_err[0]; - gs->interpreter_output_id = - gdk_input_add (std_out[0], GDK_INPUT_READ, output, gs); - gs->interpreter_error_id = - gdk_input_add (std_err[0], GDK_INPUT_READ, output, gs); - break; - } - - return TRUE; -} - -static void -stop_interpreter(PSDocument * gs) -{ - if(gs->interpreter_pid > 0) { - int status = 0; - LOG ("Stop the interpreter"); - kill(gs->interpreter_pid, SIGTERM); - while((wait(&status) == -1) && (errno == EINTR)) ; - gs->interpreter_pid = -1; - if(status == 1) { - ps_document_cleanup(gs); - gs->gs_status = _("Interpreter failed."); - } - } - - if(gs->interpreter_input >= 0) { - close(gs->interpreter_input); - gs->interpreter_input = -1; - if(gs->interpreter_input_id != 0) { - gdk_input_remove(gs->interpreter_input_id); - gs->interpreter_input_id = 0; - } - while(gs->ps_input) { - struct record_list *ps_old = gs->ps_input; - gs->ps_input = gs->ps_input->next; - if(ps_old->close && NULL != ps_old->fp) - fclose(ps_old->fp); - g_free((char *) ps_old); - } - } - - if(gs->interpreter_output >= 0) { - close(gs->interpreter_output); - gs->interpreter_output = -1; - if(gs->interpreter_output_id) { - gdk_input_remove(gs->interpreter_output_id); - gs->interpreter_output_id = 0; - } - } - - if(gs->interpreter_err >= 0) { - close(gs->interpreter_err); - gs->interpreter_err = -1; - if(gs->interpreter_error_id) { - gdk_input_remove(gs->interpreter_error_id); - gs->interpreter_error_id = 0; - } - } - - gs->busy = FALSE; -} - -/* If file exists and is a regular file then return its length, else -1 */ -static gint -file_length(const gchar * filename) -{ - struct stat stat_rec; - - if(filename && (stat(filename, &stat_rec) == 0) - && S_ISREG(stat_rec.st_mode)) - return stat_rec.st_size; - else - return -1; -} - -/* Test if file exists, is a regular file and its length is > 0 */ -static gboolean -file_readable(const char *filename) -{ - return (file_length(filename) > 0); -} - -/* - * Decompress gs->gs_filename if necessary - * Set gs->filename_unc to the name of the uncompressed file or NULL. - * Error reporting via signal 'interpreter_message' - * Return name of input file to use or NULL on error.. - */ -static gchar * -check_filecompressed(PSDocument * gs) -{ - FILE *file; - gchar buf[1024]; - gchar *filename, *filename_unc, *filename_err, *cmdline; - const gchar *cmd; - int fd; - - cmd = NULL; - - if((file = fopen(gs->gs_filename, "r")) - && (fread(buf, sizeof(gchar), 3, file) == 3)) { - if((buf[0] == '\037') && ((buf[1] == '\235') || (buf[1] == '\213'))) { - /* file is gzipped or compressed */ - cmd = gtk_gs_defaults_get_ungzip_cmd(); - } - else if(strncmp(buf, "BZh", 3) == 0) { - /* file is compressed with bzip2 */ - cmd = gtk_gs_defaults_get_unbzip2_cmd(); - } - } - if(NULL != file) - fclose(file); - - if(!cmd) - return gs->gs_filename; - - /* do the decompression */ - filename = g_shell_quote(gs->gs_filename); - filename_unc = g_strconcat(g_get_tmp_dir(), "/ggvXXXXXX", NULL); - if((fd = mkstemp(filename_unc)) < 0) { - g_free(filename_unc); - g_free(filename); - return NULL; - } - close(fd); - filename_err = g_strconcat(g_get_tmp_dir(), "/ggvXXXXXX", NULL); - if((fd = mkstemp(filename_err)) < 0) { - g_free(filename_err); - g_free(filename_unc); - g_free(filename); - return NULL; - } - close(fd); - cmdline = g_strdup_printf("%s %s >%s 2>%s", cmd, - filename, filename_unc, filename_err); - if((system(cmdline) == 0) - && file_readable(filename_unc) - && (file_length(filename_err) == 0)) { - /* sucessfully uncompressed file */ - gs->gs_filename_unc = filename_unc; - } - else { - /* report error */ - g_snprintf(buf, 1024, _("Error while decompressing file %s:\n"), - gs->gs_filename); - interpreter_failed (gs, buf); - unlink(filename_unc); - g_free(filename_unc); - filename_unc = NULL; - } - unlink(filename_err); - g_free(filename_err); - g_free(cmdline); - g_free(filename); - return filename_unc; -} - -static gint -ps_document_enable_interpreter(PSDocument * gs) -{ - g_return_val_if_fail(gs != NULL, FALSE); - g_return_val_if_fail(PS_IS_DOCUMENT(gs), FALSE); - - if(!gs->gs_filename) - return 0; - - return start_interpreter(gs); -} - -/* publicly accessible functions */ - -GType -ps_document_get_type(void) -{ - static GType gs_type = 0; - if(!gs_type) { - GTypeInfo gs_info = { - sizeof(PSDocumentClass), - (GBaseInitFunc) NULL, - (GBaseFinalizeFunc) NULL, - (GClassInitFunc) ps_document_class_init, - (GClassFinalizeFunc) NULL, - NULL, /* class_data */ - sizeof(PSDocument), - 0, /* n_preallocs */ - (GInstanceInitFunc) ps_document_init - }; - - static const GInterfaceInfo document_info = - { - (GInterfaceInitFunc) ps_document_document_iface_init, - NULL, - NULL - }; - - static const GInterfaceInfo ps_exporter_info = - { - (GInterfaceInitFunc) ps_document_ps_exporter_iface_init, - NULL, - NULL - }; - - gs_type = g_type_register_static(G_TYPE_OBJECT, - "PSDocument", &gs_info, 0); - - g_type_add_interface_static (gs_type, - EV_TYPE_DOCUMENT, - &document_info); - g_type_add_interface_static (gs_type, - EV_TYPE_PS_EXPORTER, - &ps_exporter_info); - } - return gs_type; - - -} - -static gboolean -document_load(PSDocument * gs, const gchar * fname) -{ - g_return_val_if_fail(gs != NULL, FALSE); - g_return_val_if_fail(PS_IS_DOCUMENT(gs), FALSE); - - LOG ("Load the document"); - - /* clean up previous document */ - ps_document_cleanup(gs); - - if(fname == NULL) { - gs->gs_status = ""; - return FALSE; - } - - /* prepare this document */ - gs->structured_doc = FALSE; - gs->send_filename_to_gs = TRUE; - gs->loaded = FALSE; - if(*fname == '/') { - /* an absolute path */ - gs->gs_filename = g_strdup(fname); - } - else { - /* path relative to our cwd: make it absolute */ - gchar *cwd = g_get_current_dir(); - gs->gs_filename = g_strconcat(cwd, "/", fname, NULL); - g_free(cwd); - } - - if((gs->reading_from_pipe = (strcmp(fname, "-") == 0))) { - gs->send_filename_to_gs = FALSE; - } - else { - /* - * We need to make sure that the file is loadable/exists! - * otherwise we want to exit without loading new stuff... - */ - gchar *filename = NULL; - - if(!file_readable(fname)) { - gchar buf[1024]; - g_snprintf(buf, 1024, _("Cannot open file %s.\n"), fname); - interpreter_failed (gs, buf); - gs->gs_status = _("File is not readable."); - } - else { - filename = check_filecompressed(gs); - } - - if(!filename || (gs->gs_psfile = fopen(filename, "r")) == NULL) { - interpreter_failed (gs, NULL); - ps_document_cleanup(gs); - return FALSE; - } - - /* we grab the vital statistics!!! */ - gs->doc = psscan(gs->gs_psfile, TRUE, filename); - - g_object_notify (G_OBJECT (gs), "title"); - - if(gs->doc == NULL) { - /* File does not seem to be a Postscript one */ - gchar buf[1024]; - g_snprintf(buf, 1024, _("Error while scanning file %s\n"), fname); - interpreter_failed (gs, buf); - ps_document_cleanup(gs); - gs->gs_status = _("The file is not a PostScript document."); - return FALSE; - } - - if((!gs->doc->epsf && gs->doc->numpages > 0) || - (gs->doc->epsf && gs->doc->numpages > 1)) { - gs->structured_doc = TRUE; - gs->send_filename_to_gs = FALSE; - } - } - gs->loaded = TRUE; - - gs->gs_status = _("Document loaded."); - - return gs->loaded; -} - - -static gboolean -ps_document_next_page (PSDocument *gs) -{ - XEvent event; - - LOG ("Make ghostscript render next page"); - - g_return_val_if_fail (PS_IS_DOCUMENT(gs), FALSE); - g_return_val_if_fail (gs->interpreter_pid != 0, FALSE); - g_return_val_if_fail (gs->busy != TRUE, FALSE); - - gs->busy = TRUE; - - event.xclient.type = ClientMessage; - event.xclient.display = gdk_display; - event.xclient.window = gs->message_window; - event.xclient.message_type = gdk_x11_atom_to_xatom(gs_class->next_atom); - event.xclient.format = 32; - - gdk_error_trap_push (); - XSendEvent (gdk_display, gs->message_window, FALSE, 0, &event); - gdk_flush (); - gdk_error_trap_pop (); - - return TRUE; -} - -static gboolean -render_page (PSDocument *gs, int page) -{ - g_return_val_if_fail(gs != NULL, FALSE); - g_return_val_if_fail(PS_IS_DOCUMENT(gs), FALSE); - - if(!gs->gs_filename) { - return FALSE; - } - - if (gs->structured_doc && gs->doc) { - LOG ("It's a structured document, let's send one page to gs"); - - if (is_interpreter_ready (gs)) { - ps_document_next_page (gs); - } else { - ps_document_enable_interpreter (gs); - send_ps (gs, gs->doc->beginprolog, gs->doc->lenprolog, FALSE); - send_ps (gs, gs->doc->beginsetup, gs->doc->lensetup, FALSE); - } - - send_ps (gs, gs->doc->pages[page].begin, - gs->doc->pages[page].len, FALSE); - } else { - /* Unstructured document - * - * In the case of non structured documents, - * GS read the PS from the actual file (via command - * line. Hence, ggv only send a signal next page. - * If ghostview is not running it is usually because - * the last page of the file was displayed. In that - * case, ggv restarts GS again and the first page is displayed. - */ - - LOG ("It's an unstructured document, gs will just read the file"); - - if (!is_interpreter_ready (gs)) { - ps_document_enable_interpreter(gs); - } - ps_document_next_page(gs); - } - - return TRUE; -} - -static gboolean -ps_document_load (EvDocument *document, - const char *uri, - GError **error) -{ - gboolean result; - char *filename; - - filename = g_filename_from_uri (uri, NULL, error); - if (!filename) - return FALSE; - - result = document_load (PS_DOCUMENT (document), filename); - if (!result) { - g_set_error (error, G_FILE_ERROR, - G_FILE_ERROR_FAILED, - "Failed to load document '%s'\n", - uri); - } - - g_free (filename); - - return result; -} - -static gboolean -save_page_list (PSDocument *document, int *page_list, const char *filename) -{ - gboolean result = TRUE; - GtkGSDocSink *sink = gtk_gs_doc_sink_new (); - FILE *f; - gchar *buf; - - pscopydoc (sink, document->gs_filename, document->doc, page_list); - - buf = gtk_gs_doc_sink_get_buffer (sink); - - f = fopen (filename, "w"); - if (f) { - fputs (buf, f); - fclose (f); - } else { - result = FALSE; - } - - g_free (buf); - gtk_gs_doc_sink_free (sink); - g_free (sink); - - return result; -} - -static gboolean -ps_document_save (EvDocument *document, - const char *uri, - GError **error) -{ - PSDocument *ps = PS_DOCUMENT (document); - int *page_list; - gboolean result; - int i; - char *filename; - - filename = g_filename_from_uri (uri, NULL, error); - if (!filename) - return FALSE; - - page_list = g_new0 (int, ps->doc->numpages); - for (i = 0; i < ps->doc->numpages; i++) { - page_list[i] = 1; - } - - result = save_page_list (ps, page_list, filename); - - g_free (page_list); - g_free (filename); - - return result; -} - -static int -ps_document_get_n_pages (EvDocument *document) -{ - PSDocument *ps = PS_DOCUMENT (document); - - g_return_val_if_fail (ps != NULL, -1); - - if (!ps->gs_filename || !ps->doc) { - return -1; - } - - return ps->structured_doc ? ps->doc->numpages : 1; -} - -static void -ps_document_get_page_size (EvDocument *document, - int page, - double *width, - double *height) -{ - PSDocument *gs = PS_DOCUMENT (document); - int w, h; - int urx, ury, llx, lly, orientation; - - get_page_box (PS_DOCUMENT (document), page, &urx, &ury, &llx, &lly); - orientation = get_page_orientation (PS_DOCUMENT (document), page); - - switch (orientation) { - case GTK_GS_ORIENTATION_PORTRAIT: - case GTK_GS_ORIENTATION_UPSIDEDOWN: - w = (urx - llx) / 72.0 * get_xdpi (gs) + 0.5; - h = (ury - lly) / 72.0 * get_ydpi (gs) + 0.5; - break; - case GTK_GS_ORIENTATION_LANDSCAPE: - case GTK_GS_ORIENTATION_SEASCAPE: - w = (ury - lly) / 72.0 * get_xdpi (gs) + 0.5; - h = (urx - llx) / 72.0 * get_ydpi (gs) + 0.5; - break; - default: - w = h = 0; - g_assert_not_reached (); - break; - } - - if (width) { - *width = w; - } - - if (height) { - *height = h; - } -} - -static gboolean -ps_document_can_get_text (EvDocument *document) -{ - return FALSE; -} - -static gboolean -render_pixbuf_idle (PSRenderJob *job) -{ - PSDocument *gs = job->document; - - if (gs->pstarget == NULL) { - GtkWidget *widget; - - widget = gtk_window_new (GTK_WINDOW_POPUP); - gtk_widget_realize (widget); - gs->pstarget = widget->window; - - g_assert (gs->pstarget != NULL); - - g_signal_connect (widget, "event", - G_CALLBACK (ps_document_widget_event), - gs); - } - - setup_pixmap (gs, job->page, job->scale); - setup_page (gs, job->page, job->scale); - - render_page (gs, job->page); - - return FALSE; -} - -static GdkPixbuf * -ps_document_render_pixbuf (EvDocument *document, int page, double scale) -{ - GdkPixbuf *pixbuf; - PSRenderJob job; - - job.page = page; - job.scale = scale; - job.document = PS_DOCUMENT (document); - g_idle_add ((GSourceFunc)render_pixbuf_idle, &job); - - g_mutex_lock (pixbuf_mutex); - while (!current_pixbuf) - g_cond_wait (pixbuf_cond, pixbuf_mutex); - pixbuf = current_pixbuf; - current_pixbuf = NULL; - g_mutex_unlock (pixbuf_mutex); - - LOG ("Pixbuf rendered %p\n", pixbuf); - - return pixbuf; -} - -static void -ps_document_document_iface_init (EvDocumentIface *iface) -{ - iface->load = ps_document_load; - iface->save = ps_document_save; - iface->can_get_text = ps_document_can_get_text; - iface->get_n_pages = ps_document_get_n_pages; - iface->get_page_size = ps_document_get_page_size; - iface->render_pixbuf = ps_document_render_pixbuf; -} - -static void -ps_document_ps_export_begin (EvPSExporter *exporter, const char *filename) -{ - PSDocument *document = PS_DOCUMENT (exporter); - - g_free (document->ps_export_pagelist); - - document->ps_export_pagelist = g_new0 (int, document->doc->numpages); - document->ps_export_filename = g_strdup (filename); -} - -static void -ps_document_ps_export_do_page (EvPSExporter *exporter, int page) -{ - PSDocument *document = PS_DOCUMENT (exporter); - - document->ps_export_pagelist[page] = 1; -} - -static void -ps_document_ps_export_end (EvPSExporter *exporter) -{ - PSDocument *document = PS_DOCUMENT (exporter); - - save_page_list (document, document->ps_export_pagelist, - document->ps_export_filename); - - g_free (document->ps_export_pagelist); - g_free (document->ps_export_filename); - document->ps_export_pagelist = NULL; - document->ps_export_filename = NULL; -} - -static void -ps_document_ps_exporter_iface_init (EvPSExporterIface *iface) -{ - iface->begin = ps_document_ps_export_begin; - iface->do_page = ps_document_ps_export_do_page; - iface->end = ps_document_ps_export_end; -}