-
- 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);
-}
-
-/* PSInterpreter */
-static gboolean
-ps_interpreter_input (GIOChannel *io,
- GIOCondition condition,
- PSDocument *gs)
-{
- PSSection *section = NULL;
-
- do {
- if (gs->buffer_bytes_left == 0) {
- /* Get a new section if required */
- if (gs->bytes_left == 0) {
- ps_section_free (section);
- section = NULL;
- g_queue_pop_tail (gs->ps_input);
- }
-
- if (section == NULL) {
- section = g_queue_peek_tail (gs->ps_input);
- }
-
- /* Have to seek at the beginning of each section */
- if (section && section->seek_needed) {
- fseek (section->fp, section->begin, SEEK_SET);
- section->seek_needed = FALSE;
- gs->bytes_left = section->len;
- }
-
- if (gs->bytes_left > MAX_BUFSIZE) {
- gs->buffer_bytes_left = fread (gs->input_buffer, sizeof (char),
- MAX_BUFSIZE, section->fp);
- } else if (gs->bytes_left > 0) {
- gs->buffer_bytes_left = fread (gs->input_buffer, sizeof (char),
- gs->bytes_left, section->fp);
- } else {
- gs->buffer_bytes_left = 0;
- }
-
- if (gs->bytes_left > 0 && gs->buffer_bytes_left == 0) {
- ps_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) {
- GIOStatus status;
- gsize bytes_written;
- GError *error = NULL;
-
- status = g_io_channel_write_chars (gs->interpreter_input,
- gs->input_buffer_ptr,
- gs->buffer_bytes_left,
- &bytes_written,
- &error);
- switch (status) {
- case G_IO_STATUS_NORMAL:
- gs->buffer_bytes_left -= bytes_written;
- gs->input_buffer_ptr += bytes_written;
-
- break;
- case G_IO_STATUS_ERROR:
- ps_interpreter_failed (gs, error->message);
- g_error_free (error);
-
- break;
- case G_IO_STATUS_AGAIN:
- default:
- break;
- }
- }
- } while (!g_queue_is_empty (gs->ps_input) && gs->buffer_bytes_left == 0);
-
- if (g_queue_is_empty (gs->ps_input) && gs->buffer_bytes_left == 0) {
- GIOFlags flags;
-
- flags = g_io_channel_get_flags (gs->interpreter_input);
-
- g_io_channel_set_flags (gs->interpreter_input,
- flags & ~G_IO_FLAG_NONBLOCK, NULL);
- g_io_channel_flush (gs->interpreter_input, NULL);
- g_io_channel_set_flags (gs->interpreter_input,
- flags | G_IO_FLAG_NONBLOCK, NULL);
-
- gs->interpreter_input_id = 0;
-
- return FALSE;
- }
-
- return TRUE;
-}
-
-static gboolean
-ps_interpreter_output (GIOChannel *io,
- GIOCondition condition,
- PSDocument *gs)
-{
- gchar buf[MAX_BUFSIZE + 1];
- gsize bytes = 0;
- GIOStatus status;
- GError *error = NULL;
-
- status = g_io_channel_read_chars (io, buf, MAX_BUFSIZE,
- &bytes, &error);
- switch (status) {
- case G_IO_STATUS_NORMAL:
- if (bytes > 0) {
- buf[bytes] = '\0';
- g_print ("%s", buf);
- }
- break;
- case G_IO_STATUS_EOF:
- g_io_channel_unref (gs->interpreter_output);
- gs->interpreter_output = NULL;
- gs->interpreter_output_id = 0;
-
- return FALSE;
- case G_IO_STATUS_ERROR:
- ps_interpreter_failed (gs, error->message);
- g_error_free (error);
- gs->interpreter_output_id = 0;
-
- return FALSE;
- default:
- break;
- }
-
- if (!gs->interpreter_err) {
- ps_interpreter_failed (gs, NULL);
- }
-
- return TRUE;
-}
-
-static gboolean
-ps_interpreter_error (GIOChannel *io,
- GIOCondition condition,
- PSDocument *gs)
-{
- gchar buf[MAX_BUFSIZE + 1];
- gsize bytes = 0;
- GIOStatus status;
- GError *error = NULL;
-
- status = g_io_channel_read_chars (io, buf, MAX_BUFSIZE,
- &bytes, &error);
- switch (status) {
- case G_IO_STATUS_NORMAL:
- if (bytes > 0) {
- buf[bytes] = '\0';
- g_print ("%s", buf);
- }
-
- break;
- case G_IO_STATUS_EOF:
- g_io_channel_unref (gs->interpreter_err);
- gs->interpreter_err = NULL;
- gs->interpreter_error_id = 0;
-
- return FALSE;
- case G_IO_STATUS_ERROR:
- ps_interpreter_failed (gs, error->message);
- g_error_free (error);
- gs->interpreter_error_id = 0;
-
- break;
- default:
- break;
- }
-
- if (!gs->interpreter_output) {
- ps_interpreter_failed (gs, NULL);
- }
-
- return TRUE;
-}
-
-#define NUM_ARGS 100
-#define NUM_GS_ARGS (NUM_ARGS - 20)
-#define NUM_ALPHA_ARGS 10
-
-static void
-setup_interpreter_env (gchar **envp)
-{
- gint i;
-
- for (i = 0; envp[i]; i++)
- putenv (envp[i]);
-}
-
-static void
-ps_interpreter_start (PSDocument *gs)
-{
- gchar *argv[NUM_ARGS], *dir, *gv_env, *gs_path;
- gchar **gs_args, **alpha_args = NULL;
- gchar **envp;
- gint pin, pout, perr;
- gint argc = 0, i;
- GError *error = NULL;
-
- if (!gs->gs_filename)
- return;
-
- ps_interpreter_stop (gs);
-
- dir = g_path_get_dirname (gs->gs_filename);
-
- /* set up the args... */
- gs_path = g_find_program_in_path ("gs");
- gs_args = g_strsplit (gs_path, " ", NUM_GS_ARGS);
- g_free (gs_path);
- 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";
-
- 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;
-
- gv_env = g_strdup_printf ("GHOSTVIEW=%ld %ld;DISPLAY=%s",
- gdk_x11_drawable_get_xid (gs->pstarget),
- gdk_x11_drawable_get_xid (gs->bpixmap),
- gdk_display_get_name (gdk_drawable_get_display (gs->pstarget)));
- envp = g_strsplit (gv_env, ";", 2);
- g_free (gv_env);
-
- if (g_spawn_async_with_pipes (dir, argv, NULL, 0,
- (GSpawnChildSetupFunc)setup_interpreter_env, envp,
- &(gs->interpreter_pid),
- &pin, &pout, &perr,
- &error)) {
- GIOFlags flags;
-
- gs->interpreter_input = g_io_channel_unix_new (pin);
- g_io_channel_set_encoding (gs->interpreter_input, NULL, NULL);
- flags = g_io_channel_get_flags (gs->interpreter_input);
- g_io_channel_set_flags (gs->interpreter_input,
- flags | G_IO_FLAG_NONBLOCK, NULL);
-
-
- gs->interpreter_output = g_io_channel_unix_new (pout);
- flags = g_io_channel_get_flags (gs->interpreter_output);
- g_io_channel_set_flags (gs->interpreter_output,
- flags | G_IO_FLAG_NONBLOCK, NULL);
- gs->interpreter_output_id =
- g_io_add_watch (gs->interpreter_output, G_IO_IN,
- (GIOFunc)ps_interpreter_output,
- gs);
-
- gs->interpreter_err = g_io_channel_unix_new (perr);
- flags = g_io_channel_get_flags (gs->interpreter_err);
- g_io_channel_set_flags (gs->interpreter_err,
- flags | G_IO_FLAG_NONBLOCK, NULL);
- gs->interpreter_error_id =
- g_io_add_watch (gs->interpreter_err, G_IO_IN,
- (GIOFunc)ps_interpreter_error,
- gs);
- } else {
- g_warning (error->message);
- g_error_free (error);
- }
-
- g_free (dir);
- g_strfreev (envp);
- g_strfreev (gs_args);
- g_strfreev (alpha_args);
-}
-
-static void
-ps_interpreter_stop (PSDocument *gs)
-{
- if (gs->interpreter_pid > 0) {
- gint status = 0;
-
- kill (gs->interpreter_pid, SIGTERM);
- while ((wait (&status) == -1) && (errno == EINTR));
- g_spawn_close_pid (gs->interpreter_pid);
- gs->interpreter_pid = -1;
-
- if (status == 1) {
- gs->gs_status = _("Interpreter failed.");
- }
- }
-
- if (gs->interpreter_input) {
- g_io_channel_unref (gs->interpreter_input);
- gs->interpreter_input = NULL;
-
- if (gs->interpreter_input_id > 0) {
- g_source_remove (gs->interpreter_input_id);
- gs->interpreter_input_id = 0;
- }
-
- if (gs->ps_input) {
- g_queue_foreach (gs->ps_input, (GFunc)ps_section_free, NULL);
- g_queue_free (gs->ps_input);
- gs->ps_input = g_queue_new ();
- }
- }
-
- if (gs->interpreter_output) {
- g_io_channel_unref (gs->interpreter_output);
- gs->interpreter_output = NULL;
-
- if (gs->interpreter_output_id > 0) {
- g_source_remove (gs->interpreter_output_id);
- gs->interpreter_output_id = 0;
- }
- }
-
- if (gs->interpreter_err) {
- g_io_channel_unref (gs->interpreter_err);
- gs->interpreter_err = NULL;
-
- if (gs->interpreter_error_id > 0) {
- g_source_remove (gs->interpreter_error_id);
- gs->interpreter_error_id = 0;
- }
- }
-
- gs->busy = FALSE;
-}
-
-static void
-ps_interpreter_failed (PSDocument *gs, const char *msg)
-{
- if (msg)
- g_warning (msg);
-
- push_pixbuf (gs);
- ps_interpreter_stop (gs);
-}
-
-static gboolean
-ps_interpreter_is_ready (PSDocument *gs)
-{
- return (gs->interpreter_pid != -1 &&
- !gs->busy &&
- (g_queue_is_empty (gs->ps_input)));