Imported Debian patch 0.993-1debian/0.993-1

1 files changed, 0 insertions, 5801 deletions

diff --git a/src/xsane-save.c.orig b/src/xsane-save.c.orig
deleted file mode 100644
index a495e1c..0000000
--- a/src/xsane-save.c.orig
+++ /dev/null
@@ -1,5801 +0,0 @@
-/* xsane -- a graphical (X11, gtk) scanner-oriented SANE frontend
-
-   xsane-save.c
-
-   Oliver Rauch <Oliver.Rauch@rauch-domain.de>
-   Copyright (C) 1998-2005 Oliver Rauch
-   This file is part of the XSANE package.
-
-   This program 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 program; if not, write to the Free Software
-   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */ 
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#include "xsane.h"
-#include "xsane-back-gtk.h"
-#include "xsane-front-gtk.h"
-#include <time.h>
-#include <sys/wait.h> 
-
-/* the following test is always false */
-#ifdef _native_WIN32
-# include <winsock.h>
-#else
-# include <sys/socket.h>
-# include <netinet/in.h>
-# include <netdb.h>
-#endif
-
-#ifdef HAVE_LIBJPEG
-#include <jpeglib.h>
-#endif
-
-#ifdef HAVE_LIBZ
-#include <zlib.h>
-#endif
-
-#ifdef HAVE_LIBPNG
-#include <png.h>
-#endif
-
-#ifdef HAVE_LIBTIFF
-#include <tiffio.h>
-#endif
-
-#ifdef HAVE_MMAP
-#include <sys/mman.h>
-#endif
-
-#ifdef HAVE_OS2_H
-#include <process.h>
-#endif
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#ifdef HAVE_ANY_GIMP
- 
-#include <libgimp/gimp.h>
- 
-static void xsane_gimp_query(void);
-#ifdef HAVE_GIMP_2
-static void xsane_gimp_run(const gchar *name, gint nparams, const GimpParam *param, gint *nreturn_vals, GimpParam **return_vals);
-#else
-static void xsane_gimp_run(char *name, int nparams, GimpParam *param, int *nreturn_vals, GimpParam **return_vals);
-#endif
- 
-GimpPlugInInfo PLUG_IN_INFO =
-{
-  NULL,                         /* init_proc */
-  NULL,                         /* quit_proc */
-  xsane_gimp_query,             /* query_proc */
-  xsane_gimp_run,               /* run_proc */
-};
-
-
-static int xsane_decode_devname(const char *encoded_devname, int n,
-char *buf);
-static int xsane_encode_devname(const char *devname, int n, char *buf);
-void null_print_func(gchar *msg);
- 
-#endif /* HAVE_ANY_GIMP */
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-/* why this routine ? 
- Problem: link attack
-          Bad user wants to overwrite a file (mywork.txt) of good user.
-          File permissions of mywork.txt is 700 so that bad user can not
-          change or overwrite the file. Directory permissions allow bad user
-          to write into directory. Bad user sets symlink from a file that good
-          user will write soon (image.pnm) to mywork.txt.
-          ==> Good user overwrites his own file, he is allowed to do so.
-
- Solution: remove file.
-           Create outputfile and make sure that it does not exist while creation.
-
-           The file is created with the requested image-file permissions.
-
- Note: This case is a bit curious because it is only a small part of a larger problem:
- When other users have write access to the directory they simply can move
- mywork.txt to image.pnm. If they do it in the right moment the file is
- overwritten without any notice of good user. If they do it long before xsane
- wants to write image.pnm then xsane will possibly ask if image.pnm shall be
- overwritten. So the real solution is to make the direcoty permissions safe!!!
- But some users asked for this and so I added this.
-
-
- This routine shall not be called for temporary files because temp files shall not
- be removed after they have been created safe. (Although a temporary file should
- not be a symlink so there should be no problem with this)
-*/
-
-int xsane_create_secure_file(const char *filename)
-/* returns 0 on success, -1 on error */
-{
- int fd;
-
-  DBG(DBG_proc, "xsane_create_secure_file\n");
-
-  remove(filename); /* we need to remove the file because open(..., O_EXCL) will fail otherwise */
-  umask((mode_t) preferences.image_umask); /* define image file permissions */   
-  fd = open(filename, O_WRONLY | O_CREAT | O_EXCL, 0666);
-  umask(XSANE_DEFAULT_UMASK); /* define new file permissions */   
-
-  if (fd > 0)
-  {
-    DBG(DBG_info, "file %s is created and secure\n", filename);
-    close(fd);
-    fd = 0;
-  }
-  else
-  {
-    DBG(DBG_info, "could not create secure file %s\n", filename);
-  }
-
- return fd; /* -1 means file is not safe !!! otherwise 0 */
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void xsane_cancel_save(int *cancel_save)
-{
-  DBG(DBG_proc, "xsane_cancel_save\n");
-  *cancel_save = 1;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void xsane_convert_text_to_filename(char **text)
-{
-  DBG(DBG_proc, "xsane_convert_text_to_filename\n");
-
-  if (text)
-  {
-   char *filename = *text;
-   char buf[256];
-   int buflen=0;
-   int txtlen=0;
-
-    while((filename[txtlen] != 0) && (buflen<253))
-    {
-      switch (filename[txtlen])
-      {
-        case ' ':
-          buf[buflen++] = ':';
-          buf[buflen++] = '_';
-          txtlen++;
-          break;
-
-        case '/':
-          buf[buflen++] = ':';
-          buf[buflen++] = '%';
-          txtlen++;
-          break;
-
-        case '*':
-          buf[buflen++] = ':';
-          buf[buflen++] = '#';
-          txtlen++;
-          break;
-
-        case '?':
-          buf[buflen++] = ':';
-          buf[buflen++] = 'q';
-          txtlen++;
-          break;
-
-        case '\\':
-          buf[buflen++] = ':';
-          buf[buflen++] = '=';
-          txtlen++;
-          break;
-
-        case ';':
-          buf[buflen++] = ':';
-          buf[buflen++] = '!';
-          txtlen++;
-          break;
-
-        case '&':
-          buf[buflen++] = ':';
-          buf[buflen++] = '+';
-          txtlen++;
-          break;
-
-        case '<':
-          buf[buflen++] = ':';
-          buf[buflen++] = 's';
-          txtlen++;
-          break;
-
-        case '>':
-          buf[buflen++] = ':';
-          buf[buflen++] = 'g';
-          txtlen++;
-          break;
-
-        case '|':
-          buf[buflen++] = ':';
-          buf[buflen++] = 'p';
-          txtlen++;
-          break;
-
-        case ':':
-          buf[buflen++] = ':';
-          buf[buflen++] = ':';
-          txtlen++;
-          break;
-
-        default:
-          buf[buflen++] = filename[txtlen++];
-          break;
-      }
-    }
-    buf[buflen] = 0;
-    free(filename);
-    *text = strdup(buf);
-    DBG(DBG_info, "filename = \"%s\"\n", *text);
-  }
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_get_filesize(char *filename)
-{
- FILE *infile;
- int pos;
- int size;
-
-  infile = fopen(filename, "rb"); /* read binary (b for win32) */
-  if (infile == NULL)
-  {
-   return 0;
-  }
-
-  pos = ftell(infile);
-  fseek(infile, 0, SEEK_END); /* get size */
-  size = ftell(infile);
-  fseek(infile, pos, SEEK_SET); /* go to previous position */
-
-  fclose(infile);
-
- return size;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void xsane_ensure_counter_in_filename(char **filename, int counter_len)
-{
- char *position_point = NULL;
- char *position;
- int counter = 1;
-
-  DBG(DBG_proc, "xsane_ensure_counter_in_filename\n");
-
-  if (!counter_len)
-  {
-   counter_len = 1;
-  }
-
-  position_point = strrchr(*filename, '.');
-
-  if (!position_point) /* nothing usable ? */
-  {
-    position_point = *filename + strlen(*filename); /* position_point - 1 is last character */
-  }
-
-  if (position_point)
-  {
-    position = position_point-1;
-    if ( (position < *filename) || (*position < '0') || (*position >'9') ) /* we have no counter */
-    {
-     char buf[PATH_MAX];
-     int len;
-
-      len = position_point - (*filename); /* length until "." or end of string */
-      strncpy(buf, *filename, len);
-      snprintf(buf+len, sizeof(buf)-len, "-%0*d%s", counter_len,  counter, position_point);
-      *filename = strdup(buf);
-    }
-  }
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void xsane_update_counter_in_filename(char **filename, int skip, int step, int min_counter_len)
-{
- FILE *testfile;
- char *position_point = NULL;
- char *position_counter;
- char buf[PATH_MAX];
- int counter;
- int counter_len;
- int set_counter_len = min_counter_len;
-
-  DBG(DBG_proc, "xsane_update_counter_in_filename\n");
-
-  if ( (!step) && (!min_counter_len) )
-  {
-    return; /* do not touch counter */
-  }
-
-  while (1) /* loop because we may have to skip existing files */
-  {
-    position_point = strrchr(*filename, '.');
-
-    if (!position_point) /* nothing usable ? */
-    {
-      position_point = *filename + strlen(*filename); /* here is no point, but position - 1 is last character */
-    }
-
-    if (position_point)
-    {
-      position_counter = position_point-1; /* go to last number of counter (if counter exists) */
-
-      /* search non numeric char */
-      while ( (position_counter >= *filename) && (*position_counter >= '0') && (*position_counter <='9') )
-      {
-        position_counter--; /* search fisrt numeric character */
-      }
-
-      position_counter++; /* go to first numeric charcter */
-
-      counter_len = position_point - position_counter;
-
-      if (counter_len) /* we have a counter */
-      {
-        sscanf(position_counter, "%d", &counter);
-        counter = counter + step; /* update counter */
-
-        if (counter < 0)
-        {
-          counter = 0;
-          xsane_back_gtk_warning(WARN_COUNTER_UNDERRUN, TRUE);
-          break; /* last available number ("..999") */
-        }
-
-        *position_counter = 0; /* set end of string mark to counter start */
-
-        if (set_counter_len == 0)
-        {
-           set_counter_len = counter_len;
-        }
-
-        snprintf(buf, sizeof(buf), "%s%0*d%s", *filename, set_counter_len,  counter, position_point);
-
-        DBG(DBG_info, "filename = \"%s\"\n", buf);
-
-        free(*filename);
-        *filename = strdup(buf);
-
-        if (skip) /* test if filename already used */
-        {
-          if (preferences.filetype) /* add filetype to filename */
-          {
-            snprintf(buf, sizeof(buf), "%s%s", *filename, preferences.filetype);
-            testfile = fopen(buf, "rb"); /* read binary (b for win32) */
-          }
-          else /* filetype in filename */
-          {
-            testfile = fopen(*filename, "rb"); /* read binary (b for win32) */
-          }
-
-          if (testfile) /* filename used: skip */
-          {
-            fclose(testfile);
-          }
-          else
-          {
-            break; /* filename not used, ok */
-          }
-        }
-        else /* do not test if filename already used */
-        {
-          break; /* filename ok */
-        }
-      }
-      else /* no counter */
-      {
-        break; /* no counter */
-      }
-    }
-  }
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void xsane_read_pnm_header(FILE *file, Image_info *image_info)
-{
- int max_val, filetype_nr;
- char buf[256];
-
-  fgets(buf, sizeof(buf)-1, file);
-  DBG(DBG_info, "filetype header :%s", buf);
- 
-  if (buf[0] == 'P')
-  {
-    filetype_nr = atoi(buf+1); /* get filetype number */
-
-    image_info->resolution_x = 72.0;
-    image_info->resolution_y = 72.0;
-    image_info->reduce_to_lineart = FALSE;
-
-    while (strcmp(buf, "# XSANE data follows\n"))
-    {
-      fgets(buf, sizeof(buf)-1, file);
-
-      if (!strncmp(buf, "#  resolution_x    =", 20))
-      {
-        sscanf(buf+20, "%lf", &image_info->resolution_x);
-      }
-      else if (!strncmp(buf, "#  resolution_y    =", 20))
-      {
-        sscanf(buf+20, "%lf", &image_info->resolution_y);
-      }
-      else if (!strncmp(buf, "#  threshold       =", 20))
-      {
-        sscanf(buf+20, "%lf", &image_info->threshold);
-      }
-      else if (!strncmp(buf, "#  gamma           =", 20))
-      {
-        sscanf(buf+20, "%lf", &image_info->gamma);
-      }
-      else if (!strncmp(buf, "#  gamma      IRGB =", 20))
-      {
-        sscanf(buf+20, "%lf %lf %lf %lf",
-                        &image_info->gamma,
-                             &image_info->gamma_red, 
-                                &image_info->gamma_green, 
-                                    &image_info->gamma_blue);
-      }
-      else if (!strncmp(buf, "#  brightness      =", 20))
-      {
-        sscanf(buf+20, "%lf", &image_info->brightness);
-      }
-      else if (!strncmp(buf, "#  brightness IRGB =", 20))
-      {
-        sscanf(buf+20, "%lf %lf %lf %lf",
-                        &image_info->brightness,
-                             &image_info->brightness_red, 
-                                &image_info->brightness_green, 
-                                    &image_info->brightness_blue);
-      }
-      else if (!strncmp(buf, "#  contrast        =", 20))
-      {
-        sscanf(buf+20, "%lf", &image_info->contrast);
-      }
-      else if (!strncmp(buf, "#  contrast   IRGB =", 20))
-      {
-        sscanf(buf+20, "%lf %lf %lf %lf",
-                        &image_info->contrast,
-                             &image_info->contrast_red, 
-                                &image_info->contrast_green, 
-                                    &image_info->contrast_blue);
-      }
-      else if (!strncmp(buf, "#  reduce to lineart", 20))
-      {
-        image_info->reduce_to_lineart = TRUE;
-      }
-    }
-
-    fscanf(file, "%d %d", &image_info->image_width, &image_info->image_height);
-
-    image_info->depth = 1;
-
-    if (filetype_nr != 4) /* P4 = lineart */
-    {
-      fscanf(file, "%d", &max_val);
-
-      if (max_val == 255)
-      {
-        image_info->depth = 8;
-      }
-      else if (max_val == 65535)
-      {
-        image_info->depth = 16;
-      }
-    }
-
-    fgetc(file); /* read exactly one newline character */
-    
-
-    image_info->colors = 1;
- 
-    if (filetype_nr == 6) /* ppm RGB */
-    {
-      image_info->colors = 3;
-    } 
-  }
-#ifdef SUPPORT_RGBA
-  else if (buf[0] == 'S') /* RGBA format */
-  {
-    fscanf(file, "%d %d\n%d", &image_info->image_width, &image_info->image_height, &max_val);
-    fgetc(file); /* read exactly one newline character */
-
-    image_info->depth = 1;
-
-    if (max_val == 255)
-    {
-      image_info->depth = 8;
-    }
-    else if (max_val == 65535)
-    {
-      image_info->depth = 16;
-    }
-
-    image_info->colors = 4;
-  }
-#endif
-
-  DBG(DBG_info, "xsane_read_pnm_header: width=%d, height=%d, depth=%d, colors=%d, resolution_x=%f, resolution_y=%f\n",
-      image_info->image_width, image_info->image_height, image_info->depth, image_info->colors,
-      image_info->resolution_x, image_info->resolution_y);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void xsane_write_pnm_header(FILE *file, Image_info *image_info, int save_pnm16_as_ascii)
-{
- int maxval;
- int magic;
-
-  fflush(file);
-  rewind(file);
-
-  if (image_info->depth > 8)
-  {
-    maxval = 65535;
-
-    if (save_pnm16_as_ascii)
-    {
-      magic = 2; /* thats the magic number for grayscale ascii, 3 = color ascii */
-    }
-    else /* save pnm as binary */
-    {
-      magic = 5; /* that is the magic number for grayscake binary, 6 = color binary */
-    }
-  }
-  else
-  {
-    maxval = 255;
-    magic = 5; /* 8 bit images are always saved in binary mode */
-  }
-
-
-  if (image_info->colors == 1)
-  {
-    if (image_info->depth == 1)
-    {
-      /* do not touch the texts and length here, the reading routine needs to know the exact texts */
-      fprintf(file, "P4\n"
-                       "# XSane settings:\n"
-                       "#  resolution_x    = %6.1f\n"
-                       "#  resolution_y    = %6.1f\n"
-                       "#  threshold       = %4.1f\n"
-                       "# XSANE data follows\n"
-                       "%05d %05d\n",
-                       image_info->resolution_x,
-                       image_info->resolution_y,
-                       image_info->threshold,
-                       image_info->image_width, image_info->image_height);
-    }
-    else if (image_info->reduce_to_lineart)
-    {
-      /* do not touch the texts and length here, the reading routine needs to know the exact texts */
-      fprintf(file, "P%d\n"
-                       "# XSane settings:\n"
-                       "#  resolution_x    = %6.1f\n"
-                       "#  resolution_y    = %6.1f\n"
-                       "#  threshold       = %4.1f\n"
-                       "#  reduce to lineart\n"
-                       "# XSANE data follows\n"
-                       "%05d %05d\n"
-                       "%d\n",
-                       magic, /* P5 for binary, P2 for ascii */
-                       image_info->resolution_x,
-                       image_info->resolution_y,
-                       image_info->threshold,
-                       image_info->image_width, image_info->image_height,
-                       maxval);
-    }
-    else
-    {
-      fprintf(file, "P%d\n"
-                       "# XSane settings:\n"
-                       "#  resolution_x    = %6.1f\n"
-                       "#  resolution_y    = %6.1f\n"
-                       "#  gamma           = %3.2f\n"
-                       "#  brightness      = %4.1f\n"
-                       "#  contrast        = %4.1f\n"
-                       "# XSANE data follows\n"
-                       "%05d %05d\n"
-                       "%d\n",
-                       magic, /* P5 for binary, P2 for ascii */
-                       image_info->resolution_x,
-                       image_info->resolution_y,
-                       image_info->gamma,
-                       image_info->brightness,
-                       image_info->contrast,
-                       image_info->image_width, image_info->image_height,
-                       maxval);
-    }
-  }
-  else if (image_info->colors == 3)
-  {
-    fprintf(file, "P%d\n"
-                     "# XSane settings:\n"
-                     "#  resolution_x    = %6.1f\n"
-                     "#  resolution_y    = %6.1f\n"
-                     "#  gamma      IRGB = %3.2f %3.2f %3.2f %3.2f\n"
-                     "#  brightness IRGB = %4.1f %4.1f %4.1f %4.1f\n"
-                     "#  contrast   IRGB = %4.1f %4.1f %4.1f %4.1f\n"
-                     "# XSANE data follows\n"
-                     "%05d %05d\n" \
-                     "%d\n",
-                     magic+1, /* P6 for binary, P3 for ascii */
-                     image_info->resolution_x,
-                     image_info->resolution_y,
-                     image_info->gamma,      image_info->gamma_red,      image_info->gamma_green,      image_info->gamma_blue,
-                     image_info->brightness, image_info->brightness_red, image_info->brightness_green, image_info->brightness_blue,
-                     image_info->contrast,   image_info->contrast_red,   image_info->contrast_green,   image_info->contrast_blue,
-                     image_info->image_width, image_info->image_height,
-                     maxval);
-  }
-#ifdef SUPPORT_RGBA
-  else if (image_info->colors == 4)
-  {
-        fprintf(file, "SANE_RGBA\n" \
-                         "%d %d\n" \
-                         "%d\n",
-                         image_info->image_width, image_info->image_height, maxval);
-  }
-#endif
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_copy_file(FILE *outfile, FILE *infile, GtkProgressBar *progress_bar, int *cancel_save)
-{
- long size;
- long bytes_sum = 0;
- size_t bytes;
- unsigned char buf[65536];
-
-  DBG(DBG_proc, "copying file\n");
-
-  fseek(infile, 0, SEEK_END);
-  size = ftell(infile);
-  fseek(infile, 0, SEEK_SET);
-
-  gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), 0.0);
-
-  while (gtk_events_pending())
-  {
-    gtk_main_iteration();
-  }
-
-  while (!feof(infile))
-  {
-    bytes = fread(buf, 1, sizeof(buf), infile);
-    if (bytes > 0)
-    {
-      fwrite(buf, 1, bytes, outfile);
-      bytes_sum += bytes;
-    }
-
-    gtk_progress_bar_update(progress_bar, (float) bytes_sum / size); /* update progress bar */
-
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    if (ferror(infile))
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_READ, strerror(errno));
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-    if (ferror(outfile))
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
-  fflush(outfile);
-
-  if (size != bytes_sum)
-  {
-    DBG(DBG_info, "copy errro, not complete, %ld bytes of %ld bytes copied\n", bytes_sum, size);
-    *cancel_save = 1;
-   return (*cancel_save);
-  }
-
-  DBG(DBG_info, "copy complete, %ld bytes copied\n", bytes_sum);
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_copy_file_by_name(char *output_filename, char *input_filename, GtkProgressBar *progress_bar, int *cancel_save)
-{
- FILE *infile;
- FILE *outfile;
-
-  DBG(DBG_proc, "copying file %s to %s\n", input_filename, output_filename);
-
-  outfile = fopen(output_filename, "wb"); /* b = binary mode for win32 */
-
-  if (outfile == 0)
-  {
-   char buf[255];
-
-    snprintf(buf, sizeof(buf), "%s `%s': %s", ERR_OPEN_FAILED, output_filename, strerror(errno));
-    xsane_back_gtk_error(buf, TRUE);
-   return -2;
-  }
-
-  infile = fopen(input_filename, "rb"); /* read binary (b for win32) */
-  if (infile == 0)
-  {
-   char buf[256];
-    snprintf(buf, sizeof(buf), "%s `%s': %s", ERR_OPEN_FAILED, input_filename, strerror(errno));
-    xsane_back_gtk_error(buf, TRUE);     
-
-    fclose(outfile);
-    remove(output_filename); /* remove already created output file */
-   return -1;
-  }
-
-  xsane_copy_file(outfile, infile, progress_bar, cancel_save);
-
-  fclose(infile);
-  fclose(outfile);
-
-  gtk_progress_set_format_string(GTK_PROGRESS(progress_bar), "");
-  gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), 0.0);
-
-  while (gtk_events_pending())
-  {
-    gtk_main_iteration();
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_save_grayscale_image_as_lineart(FILE *outfile, FILE *imagefile, Image_info *image_info, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int x, y, bit;
- u_char bitval, packed;
-
-  *cancel_save = 0;
-
-  image_info->depth = 1;
-
-  xsane_write_pnm_header(outfile, image_info, 0);
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    bit = 128;
-    packed = 0;
-
-    for (x = 0; x < image_info->image_width; x++)
-    {
-      bitval = fgetc(imagefile);
-
-      if (!bitval) /* white gets 0 bit, black gets 1 bit */
-      {
-        packed |= bit;
-      }
-
-      if (bit == 1)
-      {
-        fputc(packed, outfile);
-        bit = 128;
-        packed = 0;
-      }
-      else
-      {
-        bit >>= 1;
-      }
-    }
-
-    if (bit != 128)
-    {
-      fputc(packed, outfile);
-      bit = 128;
-      packed = 0;
-    }
-
-    if (ferror(outfile))
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height); /* update progress bar */
-    while (gtk_events_pending()) /* give gtk the chance to display the changes */
-    {
-      gtk_main_iteration();
-    }
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
- 
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_save_scaled_image(FILE *outfile, FILE *imagefile, Image_info *image_info, float x_scale, float y_scale, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int original_image_width  = image_info->image_width;
- int original_image_height = image_info->image_height;
- int new_image_width  = image_info->image_width  * x_scale + 0.5;
- int new_image_height = image_info->image_height * y_scale + 0.5;
- unsigned char *original_line;
- guint16 *original_line16 = NULL;
- unsigned char *new_line;
- float *pixel_val;
- float *pixel_norm;
- int bytespp = 1;
- float x, y;
- int c;
- int oldy;
- int x_new, y_new;
- float x_go, y_go;
- float factor, x_factor, y_factor;
- guint16 color;
- int read_line;
-
-  DBG(DBG_proc, "xsane_save_scaled_image\n");
-
-  *cancel_save = 0;
-
-  if (image_info->depth > 8)
-  {
-    bytespp = 2;
-  }
-
-  image_info->image_width  = new_image_width;
-  image_info->image_height = new_image_height;
-  image_info->resolution_x *= x_scale;
-  image_info->resolution_y *= y_scale;
-
-  original_line = malloc(original_image_width * image_info->colors * bytespp);
-  if (!original_line)
-  {
-    DBG(DBG_error, "xsane_save_scaled_image: out of memory\n");
-   return -1;
-  }
-
-  new_line = malloc(new_image_width * image_info->colors * bytespp);
-  if (!new_line)
-  {
-    free(original_line);
-    DBG(DBG_error, "xsane_save_scaled_image: out of memory\n");
-   return -1;
-  }
-
-  pixel_val = malloc(new_image_width * image_info->colors * sizeof(float));
-  if (!pixel_val)
-  {
-    free(original_line);
-    free(new_line);
-    DBG(DBG_error, "xsane_save_scaled_image: out of memory\n");
-   return -1;
-  }               
-
-  pixel_norm = malloc(new_image_width * image_info->colors * sizeof(float));
-  if (!pixel_norm)
-  {
-    free(original_line);
-    free(new_line);
-    free(pixel_val);
-    DBG(DBG_error, "xsane_save_scaled_image: out of memory\n");
-   return -1;
-  }               
-
-  xsane_write_pnm_header(outfile, image_info, 0);
-
-  read_line = TRUE;
-
-  memset(pixel_val,  0, new_image_width * image_info->colors * sizeof(float));
-  memset(pixel_norm, 0, new_image_width * image_info->colors * sizeof(float));
-
-  y_new = 0;
-  y_go = 1.0 / y_scale;
-  y_factor = 1.0;
-  y = 0.0;
-
-  while (y < original_image_height)
-  {
-    DBG(DBG_info2, "xsane_save_scaled_image: original line %d, new line %d\n", (int) y, y_new);
-
-    gtk_progress_bar_update(progress_bar, (float) y / original_image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    if (read_line)
-    {
-      DBG(DBG_info, "xsane_save_scaled_image: reading original line %d\n", (int) y);
-      fread(original_line, original_image_width, image_info->colors * bytespp, imagefile); /* read one line */
-      original_line16 = (guint16 *) original_line;
-    }
-
-    x_new = 0;
-    x_go = 1.0 / x_scale;
-    x = 0.0;
-    x_factor = 1.0;
-
-    while ( (x < original_image_width) && (x_new < new_image_width) ) /* add this line to anti aliasing buffer */
-
-    {
-      factor = x_factor * y_factor;
-
-      for (c = 0; c < image_info->colors; c++)
-      {
-        if (bytespp == 1)
-        {
-          color = original_line[((int) x) * image_info->colors + c];
-        }
-        else /* bytespp == 2 */
-        {
-          color = original_line16[((int) x) * image_info->colors + c];
-        }
-
-        pixel_val [x_new * image_info->colors + c] += factor * color;
-        pixel_norm[x_new * image_info->colors + c] += factor;
-      }
-
-      x_go -= x_factor;
-
-      if (x_go <= 0.0) /* change of pixel in new image */
-      {
-        x_new++;
-        x_go = 1.0 / x_scale;
-
-        x_factor = x - (int) x; /* use pixel rest */
-        if (x_factor > x_go)
-        {
-          x_factor = x_go;
-        }
-      }
-      else
-      {
-        x_factor = x_go;
-      }
-
-      if (x_factor > 1.0)
-      {
-        x_factor = 1.0;
-      }
-
-      x += x_factor;
-    }
-
-    y_go -= y_factor;
-
-    if (y_go <= 0.0) /* normalize one line and write to destination image file */
-    {
-      DBG(DBG_info2, "xsane_save_scaled_image: writing new line %d\n", y_new);
-
-      if (bytespp == 1)
-      {
-        for (x_new = 0; x_new < new_image_width * image_info->colors; x_new++)
-        {
-          new_line[x_new] = (int) (pixel_val[x_new] / pixel_norm[x_new]);
-        }
-      }
-      else /* bytespp == 2 */
-      {
-       guint16 *new_line16 = (guint16 *) new_line;
-
-        for (x_new = 0; x_new < new_image_width * image_info->colors; x_new++)
-        {
-          new_line16[x_new] = (int) (pixel_val[x_new] / pixel_norm[x_new]);
-        }
-      }
-
-      fwrite(new_line, new_image_width, image_info->colors * bytespp, outfile); /* write one line */
-
-      if (ferror(outfile))
-      {
-       char buf[255];
- 
-        snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-        DBG(DBG_error, "%s\n", buf);
-        xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-        *cancel_save = 1;
-       break;
-      }
-
-      /* reset values and norm factors */
-      memset(pixel_val,  0, new_image_width * image_info->colors * sizeof(float));
-      memset(pixel_norm, 0, new_image_width * image_info->colors * sizeof(float));
-
-      y_new++;
-      y_go = 1.0 / y_scale;
-
-      y_factor = y - (int) y;
-      if (y_factor > y_go)
-      {
-        y_factor = y_go;
-      }
-    }
-    else
-    {
-      y_factor = y_go;
-    }
-
-    if (y_factor > 1.0)
-    {
-      y_factor = 1.0;
-    }
-
-    oldy = (int) y;
-    y += y_factor;
-    read_line = (oldy != (int) y);
-  }
-
-  free(original_line);
-  free(new_line);
-  free(pixel_val);
-  free(pixel_norm);
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-#if 0
-int xsane_save_scaled_image(FILE *outfile, FILE *imagefile, Image_info *image_info, float x_scale, float y_scale, GtkProgressBar *progress_bar, int *cancel_save)
-{
- float original_y;
- int old_original_y;
- int x, y, i;
- int original_image_width  = image_info->image_width;
- int new_image_width  = image_info->image_width * x_scale;
- int new_image_height = image_info->image_height * y_scale;
- unsigned char *original_line;
- unsigned char *new_line;
- int bytespp = 1;
-
-  DBG(DBG_proc, "xsane_save_scaled_image\n");
-
-  if (image_info->depth > 8)
-  {
-    bytespp = 2;
-  }
-
-  image_info->image_width  = new_image_width;
-  image_info->image_height = new_image_height;
-  image_info->resolution_x *= x_scale;
-  image_info->resolution_y *= y_scale;
-
-  original_line = malloc(original_image_width * image_info->colors * bytespp);
-  if (!original_line)
-  {
-    DBG(DBG_error, "xsane_save_scaled_image: out of memory\n");
-   return -1;
-  }
-
-  new_line = malloc(new_image_width * image_info->colors * bytespp);
-  if (!new_line)
-  {
-    free(original_line);
-    DBG(DBG_error, "xsane_save_scaled_image: out of memory\n");
-   return -1;
-  }
-
-  xsane_write_pnm_header(outfile, image_info, 0);
-
-  original_y = 0.0;
-  old_original_y = -1;
-
-  for (y = 0; y < new_image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    for (; ((int) original_y) - old_original_y; old_original_y += 1)
-    {
-      fread(original_line, original_image_width, image_info->colors * bytespp, imagefile); /* read one line */
-    }
-
-    for (x = 0; x < new_image_width; x++)
-    {
-      for (i = 0; i < image_info->colors * bytespp; i++)
-      {
-        new_line[x * image_info->colors * bytespp + i] = original_line[((int) (x / x_scale)) * image_info->colors * bytespp + i];
-      }
-    }
-
-    fwrite(new_line, new_image_width, image_info->colors * bytespp, outfile); /* write one line */
-
-    original_y += 1/y_scale;
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
-  free(original_line);
-  free(new_line);
-
-  fflush(outfile);
-
- return (*cancel_save);
-}
-#endif
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_save_despeckle_image(FILE *outfile, FILE *imagefile, Image_info *image_info, int radius, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int x, y, sx, sy, i;
- int xmin, xmax;
- int ymin, ymax;
- int count;
- unsigned char *line_cache;
- unsigned char *line_cache_ptr;
- guint16 *color_cache;
- guint16 *color_cache_ptr;
- int bytespp = 1;
- int color_radius;
- int color_width  = image_info->image_width * image_info->colors;
-
-  radius--; /* correct radius : 1 means nothing happens */
-
-  if (radius < 1)
-  {
-    radius = 1;
-  }
-
-  color_radius = radius * image_info->colors;
-
-  if (image_info->depth > 8)
-  {
-    bytespp = 2;
-  }
-
-  xsane_write_pnm_header(outfile, image_info, 0);
-
-  line_cache = malloc(color_width * bytespp * (2 * radius + 1));
-  if (!line_cache)
-  {
-    DBG(DBG_error, "xsane_despeckle_image: out of memory\n");
-   return -1;
-  }
-
-  fread(line_cache, color_width * bytespp, (2 * radius + 1), imagefile);
-
-  color_cache = malloc((size_t) sizeof(guint16) * (2*radius+1)*(2*radius+1));
-
-  if (!color_cache)
-  {
-    free(line_cache);
-    DBG(DBG_error, "xsane_despeckle_image: out of memory\n");
-   return -1;
-  }
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float)  y / image_info->image_height);
-
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    ymin = y - radius;
-    ymax = y + radius;
-
-    if (ymin < 0)
-    {
-      ymin = 0;
-    }
-
-    if (ymax > image_info->image_height)
-    {
-      ymax = image_info->image_height;
-    }
-
-    for (x = 0; x < color_width; x++)
-    {
-      xmin = x - color_radius;
-      xmax = x + color_radius;
-
-      if (xmin < 0)
-      {
-        xmin = x % image_info->colors;
-      }
-
-      if (xmax > color_width)
-      {
-        xmax = color_width;
-      }
-
-      count = 0;
-
-      color_cache_ptr = color_cache;
-
-
-      if (bytespp == 1)
-      {
-        for (sy = ymin; sy <= ymax; sy++) /* search area defined by radius  - y part */
-        {
-          line_cache_ptr = line_cache + (sy-ymin) * color_width + xmin;
-
-          for (sx = xmin; sx <= xmax; sx+=image_info->colors) /* x part */
-          {
-            *color_cache_ptr = *line_cache_ptr;
-            color_cache_ptr++;
-            line_cache_ptr += image_info->colors;
-          }
-        }
-
-        /* sort color_cache */
-
-        count = color_cache_ptr - color_cache;
-
-        if (count > 1)
-        {
-         int d, j, val;
-
-          for (d = count / 2; d > 0; d = d / 2)
-          {
-            for (i = d; i < count; i++)
-            {
-              for (j = i - d, color_cache_ptr = color_cache + j; j >= 0 && color_cache_ptr[0] > color_cache_ptr[d]; j -= d, color_cache_ptr -= d)
-              {
-                val                = color_cache_ptr[0];
-                color_cache_ptr[0] = color_cache_ptr[d];
-                color_cache_ptr[d] = val;
-              };
-            }
-          }
-        }
-
-        fputc((char) (color_cache[count/2]), outfile);
-      }
-      else /* 16 bit/color */
-      {
-       guint16 val16;
-       guint16 *line_cache16 = (guint16 *) line_cache;
-       guint16 *line_cache16_ptr;
-       char *bytes16 = (char *) &val16;
-
-        for (sy = ymin; sy <= ymax; sy++)
-        {
-          line_cache16_ptr = line_cache16 + (sy-ymin) * color_width + xmin;
-
-          for (sx = xmin; sx <= xmax; sx+=image_info->colors)
-          {
-            *color_cache_ptr = *line_cache16_ptr;
-            color_cache_ptr++;
-            line_cache16_ptr += image_info->colors;
-          }
-        }
-
-        /* sort color_cache */
-
-        count = color_cache_ptr - color_cache;
-
-        if (count > 1)
-        {
-         int d,j, val;
-
-          for (d = count / 2; d > 0; d = d / 2)
-          {
-            for (i = d; i < count; i++)
-            {
-              for (j = i - d, color_cache_ptr = color_cache + j; j >= 0 && color_cache_ptr[0] > color_cache_ptr[d]; j -= d, color_cache_ptr -= d)
-              {
-                val                = color_cache_ptr[0];
-                color_cache_ptr[0] = color_cache_ptr[d];
-                color_cache_ptr[d] = val;
-              };
-            }
-          }
-        }
-
-        val16 = color_cache[count/2];
-        fputc(bytes16[0], outfile); /* write bytes in machine byte order */
-        fputc(bytes16[1], outfile);
-      }
-    }
-
-    if (ferror(outfile))
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-    if ((y > radius) && (y < image_info->image_height - radius))
-    {
-      memcpy(line_cache, line_cache + color_width * bytespp, 
-             color_width * bytespp * 2 * radius);
-      fread(line_cache + color_width * bytespp * 2 * radius,
-            color_width * bytespp, 1, imagefile);
-    }
-  }
-
-  fflush(outfile);
-
-  free(line_cache);
-  free(color_cache);
-
- return 0;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_save_blur_image(FILE *outfile, FILE *imagefile, Image_info *image_info, float radius, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int x, y, sx, sy;
- int xmin, xmax;
- int ymin, ymax;
- double val, norm, outer_factor;
- unsigned char *line_cache;
- int bytespp = 1;
- int intradius;
- int xmin_flag;
- int xmax_flag;
- int ymin_flag;
- int ymax_flag;
-
-  *cancel_save = 0;
-
-  intradius = (int) radius;
-
-  outer_factor = radius - (int) radius;
-
-  if (image_info->depth > 8)
-  {
-    bytespp = 2;
-  }
-
-  xsane_write_pnm_header(outfile, image_info, 0);
-
-  line_cache = malloc(image_info->image_width * image_info->colors * bytespp * (2 * intradius + 1));
-  if (!line_cache)
-  {
-    DBG(DBG_error, "xsane_blur_image: out of memory\n");
-   return -1;
-  }
-
-  fread(line_cache, image_info->image_width * image_info->colors * bytespp, (2 * intradius + 1), imagefile);
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float)  y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    for (x = 0; x < image_info->image_width * image_info->colors; x++)
-    {
-      xmin_flag = xmax_flag = ymin_flag = ymax_flag = TRUE;
-
-      xmin = x - intradius * image_info->colors;
-      xmax = x + intradius * image_info->colors;
-
-      if (xmin < 0)
-      {
-        xmin = x % image_info->colors;
-        xmin_flag = FALSE;
-      }
-
-      if (xmax > image_info->image_width * image_info->colors)
-      {
-        xmax = image_info->image_width * image_info->colors;
-        xmax_flag = FALSE;
-      }
-
-      ymin = y - intradius;
-      ymax = y + intradius;
-
-      if (ymin < 0)
-      {
-        ymin = 0;
-        ymin_flag = FALSE;
-      }
-
-      if (ymax > image_info->image_height)
-      {
-        ymax = image_info->image_height;
-        ymax_flag = FALSE;
-      }
-
-      val  = 0.0;
-      norm = 0.0;
-
-      if (bytespp == 1)
-      {
-        if (xmin_flag) /* integrate over left margin */
-        {
-          for (sy = ymin+1; sy <= ymax-1 ; sy++)
-          {
-            val += outer_factor * line_cache[(sy-ymin) * image_info->image_width * image_info->colors + xmin];
-            norm += outer_factor;
-          }
-        }
-
-        if (xmax_flag) /* integrate over right margin */
-        {
-          for (sy = ymin+1; sy <= ymax-1 ; sy++)
-          {
-            val += outer_factor * line_cache[(sy-ymin) * image_info->image_width * image_info->colors + xmax];
-            norm += outer_factor;
-          }
-        }
-
-        if (ymin_flag) /* integrate over top margin */
-        {
-          for (sx = xmin+image_info->colors; sx <= xmax-image_info->colors ; sx += image_info->colors)
-          {
-            val += outer_factor * line_cache[sx];
-            norm += outer_factor;
-          }
-        }
-
-        if (ymax_flag) /* integrate over bottom margin */
-        {
-          for (sx = xmin+image_info->colors; sx <= xmax-image_info->colors ; sx += image_info->colors)
-          {
-            val += outer_factor * line_cache[(ymax-ymin) * image_info->image_width * image_info->colors + sx];
-            norm += outer_factor;
-          }
-        }
-
-        for (sy = ymin+1; sy <= ymax-1; sy++) /* integrate internal square */
-        {
-          for (sx = xmin+image_info->colors; sx <= xmax-image_info->colors; sx+=image_info->colors)
-          {
-            val += line_cache[(sy-ymin) * image_info->image_width * image_info->colors + sx];
-            norm += 1.0;
-          }
-        }
-        fputc((char) ((int) (val/norm)), outfile);
-      }
-      else /* bytespp == 2 */
-      {
-       guint16 *line_cache16 = (guint16 *) line_cache;
-       guint16 val16;
-       char *bytes16 = (char *) &val16;
-
-        if (xmin_flag) /* integrate over left margin */
-        {
-          for (sy = ymin+1; sy <= ymax-1 ; sy++)
-          {
-            val += outer_factor * line_cache16[(sy-ymin) * image_info->image_width * image_info->colors + xmin];
-            norm += outer_factor;
-          }
-        }
-
-        if (xmax_flag) /* integrate over right margin */
-        {
-          for (sy = ymin+1; sy <= ymax-1 ; sy++)
-          {
-            val += outer_factor * line_cache16[(sy-ymin) * image_info->image_width * image_info->colors + xmax];
-            norm += outer_factor;
-          }
-        }
-
-        if (ymin_flag) /* integrate over top margin */
-        {
-          for (sx = xmin+image_info->colors; sx <= xmax-image_info->colors ; sx += image_info->colors)
-          {
-            val += outer_factor * line_cache16[sx];
-            norm += outer_factor;
-          }
-        }
-
-        if (ymax_flag) /* integrate over bottom margin */
-        {
-          for (sx = xmin+image_info->colors; sx <= xmax-image_info->colors ; sx += image_info->colors)
-          {
-            val += outer_factor * line_cache16[(ymax-ymin) * image_info->image_width * image_info->colors + sx];
-            norm += outer_factor;
-          }
-        }
-
-        for (sy = ymin; sy <= ymax; sy++) /* integrate internal square */
-        {
-          for (sx = xmin; sx <= xmax; sx+=image_info->colors)
-          {
-            val += line_cache16[(sy-ymin) * image_info->image_width * image_info->colors + sx];
-            norm += 1.0;
-          }
-        }
-
-        val16 = val / norm;
-        fputc(bytes16[0], outfile); /* write bytes in machine byte order */
-        fputc(bytes16[1], outfile);
-      }
-    }
-
-    if (ferror(outfile))
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-      /* reset values and norm factors */
-
-    if ((y > intradius) && (y < image_info->image_height - intradius))
-    {
-      memcpy(line_cache, line_cache + image_info->image_width * image_info->colors * bytespp, 
-             image_info->image_width * image_info->colors * bytespp * 2 * intradius);
-      fread(line_cache + image_info->image_width * image_info->colors * bytespp * 2 * intradius,
-            image_info->image_width * image_info->colors * bytespp, 1, imagefile);
-    }
-  }
-
-  fflush(outfile);
-  free(line_cache);
-
- return 0;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#if 0
-int xsane_save_blur_image(FILE *outfile, FILE *imagefile, Image_info *image_info, int radius, GtkProgressBar *progress_bar)
-{
- int x, y, sx, sy;
- int xmin, xmax;
- int ymin, ymax;
- int pos0;
- int val, count;
- unsigned char *line_cache;
- int bytespp = 1;
-
-  if (image_info->depth > 8)
-  {
-    bytespp = 2;
-  }
-
-  pos0 = ftell(imagefile); /* mark position to skip header */
-
-  xsane_write_pnm_header(outfile, image_info, 0);
-
-  line_cache = malloc(image_info->image_width * image_info->colors * bytespp * (2 * radius + 1));
-  if (!line_cache)
-  {
-    DBG(DBG_error, "xsane_blur_image: out of memory\n");
-   return -1;
-  }
-
-  fread(line_cache, image_info->image_width * image_info->colors * bytespp, (2 * radius + 1), imagefile);
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float)  y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    for (x = 0; x < image_info->image_width * image_info->colors; x++)
-    {
-      xmin = x - radius * image_info->colors;
-      xmax = x + radius * image_info->colors;
-
-      if (xmin < 0)
-      {
-        xmin = x % image_info->colors;
-      }
-
-      if (xmax > image_info->image_width * image_info->colors)
-      {
-        xmax = image_info->image_width * image_info->colors;
-      }
-
-      ymin = y - radius;
-      ymax = y + radius;
-
-      if (ymin < 0)
-      {
-        ymin = 0;
-      }
-
-      if (ymax > image_info->image_height)
-      {
-        ymax = image_info->image_height;
-      }
-
-      val = 0;
-      count = 0;
-
-      if (bytespp == 1)
-      {
-        for (sy = ymin; sy <= ymax; sy++)
-        {
-          for (sx = xmin; sx <= xmax; sx+=image_info->colors)
-          {
-            val += line_cache[(sy-ymin) * image_info->image_width * image_info->colors + sx];
-            count++;
-          }
-        }
-        fputc((char) (val/count), outfile);
-      }
-      else
-      {
-       guint16 *line_cache16 = (guint16 *) line_cache;
-       guint16 val16;
-       char *bytes16 = (char *) &val16;
-
-        for (sy = ymin; sy <= ymax; sy++)
-        {
-          for (sx = xmin; sx <= xmax; sx+=image_info->colors)
-          {
-            val += line_cache16[(sy-ymin) * image_info->image_width * image_info->colors + sx];
-            count++;
-          }
-        }
-
-        val16 = val / count;
-        fputc(bytes16[0], outfile); /* write bytes in machine byte order */
-        fputc(bytes16[1], outfile);
-      }
-    }
-
-    if ((y > radius) && (y < image_info->image_height - radius))
-    {
-      memcpy(line_cache, line_cache + image_info->image_width * image_info->colors * bytespp, 
-             image_info->image_width * image_info->colors * bytespp * 2 * radius);
-      fread(line_cache + image_info->image_width * image_info->colors * bytespp * 2 * radius,
-            image_info->image_width * image_info->colors * bytespp, 1, imagefile);
-    }
-  }
-
-  fflush(outfile);
-  free(line_cache);
-
- return 0;
-}
-#endif
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_save_rotate_image(FILE *outfile, FILE *imagefile, Image_info *image_info, int rotation, GtkProgressBar *progress_bar, int *cancel_save)
-/* returns true if operation was cancelled */
-{
- int x, y, pos0, bytespp, i;
- int pixel_width  = image_info->image_width;
- int pixel_height = image_info->image_height;
- float resolution_x = image_info->resolution_x;
- float resolution_y = image_info->resolution_y;
-
-#ifdef HAVE_MMAP
- char *mmaped_imagefile = NULL;
-#endif
-
-  DBG(DBG_proc, "xsane_save_rotate_image\n");
-
-  *cancel_save = 0;
-
-  pos0 = ftell(imagefile); /* mark position to skip header */
-
-  bytespp = image_info->colors;
-
-  if (image_info->depth > 8)
-  {
-    bytespp *= 2;
-  }
-
-  if (image_info->depth < 8) /* lineart images are expanded to grayscale until transformation is done */
-  {
-    image_info->depth = 8; /* so we have at least 8 bits/pixel here */
-  }
-
-#ifdef HAVE_MMAP
-  mmaped_imagefile = mmap(NULL, pixel_width * pixel_height * bytespp + pos0, PROT_READ, MAP_PRIVATE, fileno(imagefile), 0);
-  if (mmaped_imagefile == (char *) -1) /* mmap failed */
-  {
-    DBG(DBG_info, "xsane_save_rotate_image: unable to memory map image file, using standard file access\n");
-    mmaped_imagefile = NULL;
-  }
-  else
-  {
-    DBG(DBG_info, "xsane_save_rotate_image: using memory mapped image file\n");
-  }
-#endif
-
-  switch (rotation)
-  {
-    default:
-     break;
-
-    case 0: /* 0 degree */
-      xsane_write_pnm_header(outfile, image_info, 0);
-
-      for (y = 0; y < pixel_height; y++)
-      {
-        gtk_progress_bar_update(progress_bar, (float) y / pixel_height);
-        while (gtk_events_pending())
-        {
-          gtk_main_iteration();
-        }
-
-        for (x = 0; x < pixel_width; x++)
-        {
-#ifdef HAVE_MMAP
-          if (mmaped_imagefile)
-          {
-           char *p = mmaped_imagefile + pos0 + bytespp * (x + y * pixel_width);  /* calculate correct position */
-
-            for (i=0; i<bytespp; i++)
-            {
-              fputc(*p++, outfile);
-            }
-          }
-          else
-#endif
-          {
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(fgetc(imagefile), outfile);
-            }
-          }
-        }
-
-        if (ferror(outfile))
-        {
-         char buf[255];
-
-          snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-          DBG(DBG_error, "%s\n", buf);
-          xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-          *cancel_save = 1;
-         break;
-        }
-
-        if (*cancel_save)
-        {
-          break;
-        }
-      }
-     break;
-
-    case 1: /* 90 degree */
-      image_info->image_width  = pixel_height;
-      image_info->image_height = pixel_width;
-
-      image_info->resolution_x = resolution_y;
-      image_info->resolution_y = resolution_x;
-
-      xsane_write_pnm_header(outfile, image_info, 0);
-
-      for (x=0; x<pixel_width; x++)
-      {
-        gtk_progress_bar_update(progress_bar, (float) x / pixel_width);
-        while (gtk_events_pending())
-        {
-          gtk_main_iteration();
-        }
-
-        for (y=pixel_height-1; y>=0; y--)
-        {
-#ifdef HAVE_MMAP
-          if (mmaped_imagefile)
-          {
-           char *p = mmaped_imagefile + pos0 + bytespp * (x + y * pixel_width); /* calculate correct position */
-
-            for (i=0; i<bytespp; i++)
-            {
-              fputc(*p++, outfile);
-            }
-          }
-          else
-#endif
-          {
-            fseek(imagefile, pos0 + bytespp * (x + y * pixel_width), SEEK_SET); /* go to the correct position */
-            for (i=0; i<bytespp; i++)
-            {
-              fputc(fgetc(imagefile), outfile);
-            }
-          }
-        }
-
-
-        if (ferror(outfile))
-        {
-         char buf[255];
-
-          snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-          DBG(DBG_error, "%s\n", buf);
-          xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-          *cancel_save = 1;
-         break;
-        }
-
-        if (*cancel_save)
-        {
-          break;
-        }
-      }
-
-     break;
-
-    case 2: /* 180 degree */
-      xsane_write_pnm_header(outfile, image_info, 0);
-
-      for (y = pixel_height-1; y >= 0; y--)
-      {
-        gtk_progress_bar_update(progress_bar, (float) (pixel_height - y) / pixel_height);
-        while (gtk_events_pending())
-        {
-          gtk_main_iteration();
-        }
-
-        for (x = pixel_width-1; x >= 0; x--)
-        {
-#ifdef HAVE_MMAP
-          if (mmaped_imagefile)
-          {
-           char *p = mmaped_imagefile + pos0 + bytespp * (x + y * pixel_width);  /* calculate correct position */
-
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(*p++, outfile);
-            }
-          }
-          else
-#endif
-          {
-            fseek(imagefile, pos0 + bytespp * (x + y * pixel_width), SEEK_SET); /* go to the correct position */
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(fgetc(imagefile), outfile);
-            }
-          }
-        }
-
-
-        if (ferror(outfile))
-        {
-         char buf[255];
-
-          snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-          DBG(DBG_error, "%s\n", buf);
-          xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-          *cancel_save = 1;
-         break;
-        }
-
-        if (*cancel_save)
-        {
-          break;
-        }
-      }
-     break;
-
-    case 3: /* 270 degree */
-      image_info->image_width  = pixel_height;
-      image_info->image_height = pixel_width;
-
-      image_info->resolution_x = resolution_y;
-      image_info->resolution_y = resolution_x;
-
-      xsane_write_pnm_header(outfile, image_info, 0);
-
-      for (x = pixel_width-1; x >= 0; x--)
-      {
-        gtk_progress_bar_update(progress_bar, (float) (pixel_width - x) / pixel_width);
-        while (gtk_events_pending())
-        {
-          gtk_main_iteration();
-        }
-
-        for (y = 0; y < pixel_height; y++)
-        {
-#ifdef HAVE_MMAP
-          if (mmaped_imagefile)
-          {
-           char *p = mmaped_imagefile + pos0 + bytespp * (x + y * pixel_width);  /* calculate correct position */
-
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(*p++, outfile);
-            }
-          }
-          else
-#endif
-          {
-            fseek(imagefile, pos0 + bytespp * (x + y * pixel_width), SEEK_SET); /* go to the correct position */
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(fgetc(imagefile), outfile);
-            }
-          }
-        }
-
-
-        if (ferror(outfile))
-        {
-         char buf[255];
-
-          snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-          DBG(DBG_error, "%s\n", buf);
-          xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-          *cancel_save = 1;
-         break;
-        }
-
-        if (*cancel_save)
-        {
-          break;
-        }
-      }
-     break;
-
-    case 4: /* 0 degree, x mirror */
-      xsane_write_pnm_header(outfile, image_info, 0);
-
-      for (y = 0; y < pixel_height; y++)
-      {
-        gtk_progress_bar_update(progress_bar, (float) y / pixel_height);
-        while (gtk_events_pending())
-        {
-          gtk_main_iteration();
-        }
-
-        for (x = pixel_width-1; x >= 0; x--)
-        {
-#ifdef HAVE_MMAP
-          if (mmaped_imagefile)
-          {
-           char *p = mmaped_imagefile + pos0 + bytespp * (x + y * pixel_width);  /* calculate correct position */
-
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(*p++, outfile);
-            }
-          }
-          else
-#endif
-          {
-            fseek(imagefile, pos0 + bytespp * (x + y * pixel_width), SEEK_SET); /* go to the correct position */
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(fgetc(imagefile), outfile);
-            }
-          }
-        }
-
-
-        if (ferror(outfile))
-        {
-         char buf[255];
-
-          snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-          DBG(DBG_error, "%s\n", buf);
-          xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-          *cancel_save = 1;
-         break;
-        }
-
-        if (*cancel_save)
-        {
-          break;
-        }
-      }
-     break;
-
-    case 5: /* 90 degree, x mirror */
-      image_info->image_width  = pixel_height;
-      image_info->image_height = pixel_width;
-
-      image_info->resolution_x = resolution_y;
-      image_info->resolution_y = resolution_x;
-
-      xsane_write_pnm_header(outfile, image_info, 0);
-
-      for (x = 0; x < pixel_width; x++)
-      {
-        gtk_progress_bar_update(progress_bar, (float) x / pixel_width);
-        while (gtk_events_pending())
-        {
-          gtk_main_iteration();
-        }
-
-        for (y = 0; y < pixel_height; y++)
-        {
-#ifdef HAVE_MMAP
-          if (mmaped_imagefile)
-          {
-           char *p = mmaped_imagefile + pos0 + bytespp * (x + y * pixel_width); /* calculate correct position */
-
-            for (i=0; i<bytespp; i++)
-            {
-              fputc(*p++, outfile);
-            }
-          }
-          else
-#endif
-          {
-            fseek(imagefile, pos0 + bytespp * (x + y * pixel_width), SEEK_SET); /* go to the correct position */
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(fgetc(imagefile), outfile);
-            }
-          }
-        }
-
-
-        if (ferror(outfile))
-        {
-         char buf[255];
-
-          snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-          DBG(DBG_error, "%s\n", buf);
-          xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-          *cancel_save = 1;
-         break;
-        }
-
-        if (*cancel_save)
-        {
-          break;
-        }
-      }
-
-     break;
-
-    case 6: /* 180 degree, x mirror */
-      xsane_write_pnm_header(outfile, image_info, 0);
-
-      for (y = pixel_height-1; y >= 0; y--)
-      {
-        gtk_progress_bar_update(progress_bar, (float) (pixel_height - y) / pixel_height);
-        while (gtk_events_pending())
-        {
-          gtk_main_iteration();
-        }
-
-        for (x = 0; x < pixel_width; x++)
-        {
-#ifdef HAVE_MMAP
-          if (mmaped_imagefile)
-          {
-           char *p = mmaped_imagefile + pos0 + bytespp * (x + y * pixel_width);  /* calculate correct position */
-
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(*p++, outfile);
-            }
-          }
-          else
-#endif
-          {
-            fseek(imagefile, pos0 + bytespp * (x + y * pixel_width), SEEK_SET); /* go to the correct position */
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(fgetc(imagefile), outfile);
-            }
-          }
-        }
-
-
-        if (ferror(outfile))
-        {
-         char buf[255];
-
-          snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-          DBG(DBG_error, "%s\n", buf);
-          xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-          *cancel_save = 1;
-         break;
-        }
-
-        if (*cancel_save)
-        {
-          break;
-        }
-      }
-     break;
-
-    case 7: /* 270 degree, x mirror */
-      image_info->image_width  = pixel_height;
-      image_info->image_height = pixel_width;
-
-      image_info->resolution_x = resolution_y;
-      image_info->resolution_y = resolution_x;
-
-      xsane_write_pnm_header(outfile, image_info, 0);
-
-      for (x = pixel_width-1; x >= 0; x--)
-      {
-        gtk_progress_bar_update(progress_bar, (float) (pixel_width - x) / pixel_width);
-        while (gtk_events_pending())
-        {
-          gtk_main_iteration();
-        }
-
-        for (y = pixel_height-1; y >= 0; y--)
-        {
-#ifdef HAVE_MMAP
-          if (mmaped_imagefile)
-          {
-           char *p = mmaped_imagefile + pos0 + bytespp * (x + y * pixel_width);  /* calculate correct position */
-
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(*p++, outfile);
-            }
-          }
-          else
-#endif
-          {
-            fseek(imagefile, pos0 + bytespp * (x + y * pixel_width), SEEK_SET); /* go to the correct position */
-            for (i = 0; i < bytespp; i++)
-            {
-              fputc(fgetc(imagefile), outfile);
-            }
-          }
-        }
-
-
-        if (ferror(outfile))
-        {
-         char buf[255];
-
-          snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-          DBG(DBG_error, "%s\n", buf);
-          xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-          *cancel_save = 1;
-         break;
-        }
-
-        if (*cancel_save)
-        {
-          break;
-        }
-      }
-     break;
-  }
-
-#ifdef HAVE_MMAP
-  if (mmaped_imagefile)
-  {
-    munmap(mmaped_imagefile, pos0 + pixel_width * pixel_height * bytespp);
-  }
-#endif
-
-  fflush(outfile);
-
-  return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void xsane_save_ps_create_document_header(FILE *outfile, int pages, int flatdecode)
-{
-  DBG(DBG_proc, "xsane_save_ps_create_document_header\n");
-
-  fprintf(outfile, "%%!PS-Adobe-3.0\n");
-  fprintf(outfile, "%%%%Creator: XSane version %s (sane %d.%d) - by Oliver Rauch\n", VERSION,
-                        SANE_VERSION_MAJOR(xsane.sane_backend_versioncode),
-                        SANE_VERSION_MINOR(xsane.sane_backend_versioncode));
-  fprintf(outfile, "%%%%DocumentData: Clean7Bit\n");
-  if (flatdecode)
-  {
-    fprintf(outfile, "%%%%LanguageLevel: 3\n");
-  }
-  else
-  {
-    fprintf(outfile, "%%%%LanguageLevel: 2\n");
-  }
-
-  if (pages)
-  {
-    fprintf(outfile, "%%%%Pages: %d\n", pages);
-  }
-  else
-  {
-    fprintf(outfile, "%%%%Pages: (atend)\n");
-  }
-  
-  fprintf(outfile, "%%%%EndComments\n");
-  fprintf(outfile, "\n");
-  fprintf(outfile, "/origstate save def\n");
-  fprintf(outfile, "20 dict begin\n");
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void xsane_save_ps_create_document_trailer(FILE *outfile, int pages)
-{
-  DBG(DBG_proc, "xsane_save_ps_create_document_trailer\n");
-
-  fprintf(outfile, "end\n");
-  fprintf(outfile, "origstate restore\n");
-
-  if (pages)
-  {
-    fprintf(outfile, "%%%%Trailer\n");
-    fprintf(outfile, "%%%%Pages: %d\n", pages);
-  }
-
-  fprintf(outfile, "%%%%EOF\n");
-  fprintf(outfile, "\n");
-
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-/* page = [1 .. pages] */
-static void xsane_save_ps_create_page_header(FILE *outfile, int page,
-                                             Image_info *image_info,
-                                             float width, float height,
-                                             int paper_left_margin, int paper_bottom_margin,
-                                             int paper_width, int paper_height,
-                                             int paper_orientation, int flatdecode,
-                                             GtkProgressBar *progress_bar)
-{
- int degree, position_left, position_bottom, box_left, box_bottom, box_right, box_top, depth;
- int left, bottom;
-
-  DBG(DBG_proc, "xsane_save_ps_create_page_header\n");
-
-  switch (paper_orientation)
-  {
-    default:
-    case 0: /* top left portrait */
-      left   = 0.0;
-      bottom = paper_height - height;
-     break;
-
-    case 1: /* top right portrait */
-      left   = paper_width  - width;
-      bottom = paper_height - height;
-     break;
-
-    case 2: /* bottom right portrait */
-      left   = paper_width - width;
-      bottom = 0.0;
-     break;
-
-    case 3: /* bottom left portrait */
-      left   = 0.0;
-      bottom = 0.0;
-     break;
-
-    case 4: /* center portrait */
-      left   = paper_width  / 2.0 - width  / 2.0;
-      bottom = paper_height / 2.0 - height / 2.0;
-     break;
-
-
-    case 8: /* top left landscape */
-      left   = 0.0;
-      bottom = paper_width - height;
-     break;
-
-    case 9: /* top right landscape */
-      left   = paper_height - width;
-      bottom = paper_width  - height;
-     break;
-
-    case 10: /* bottom right landscape */
-      left   = paper_height - width;
-      bottom = 0.0;
-     break;
-
-    case 11: /* bottom left landscape */
-      left   = 0.0;
-      bottom = 0.0;
-     break;
-
-    case 12: /* center landscape */
-      left   = paper_height / 2.0 - width  / 2.0;
-      bottom = paper_width  / 2.0 - height / 2.0;
-     break;
-  }
-
-
-  if (paper_orientation >= 8) /* rotate with 90 degrees - landscape mode */
-  {
-    degree = 90;
-    position_left   = left   + paper_bottom_margin;
-    position_bottom = bottom - paper_width - paper_left_margin;
-    box_left        = paper_width - paper_left_margin - bottom - height;
-    box_bottom      = left   + paper_bottom_margin;
-    box_right       = box_left   + ceil(height);
-    box_top         = box_bottom + ceil(width);
-  }
-  else /* do not rotate, portrait mode */
-  {
-    degree = 0;
-    position_left   = left   + paper_left_margin;
-    position_bottom = bottom + paper_bottom_margin;
-    box_left        = left   + paper_left_margin;
-    box_bottom      = bottom + paper_bottom_margin;
-    box_right       = box_left   + ceil(width);
-    box_top         = box_bottom + ceil(height);
-  }
-
-  depth = image_info->depth;
-
-  if (depth > 8)
-  {
-    depth = 8;
-  }
-
-  fprintf(outfile, "\n");
-  fprintf(outfile, "%%%%Page: %d %d\n", page, page);
-  fprintf(outfile, "%%%%PageBoundingBox: %d %d %d %d\n", box_left, box_bottom, box_right, box_top);
-
-  if (depth == 1)
-  {
-    fprintf(outfile, "/grays %d string def\n", image_info->image_width);
-    fprintf(outfile, "/npixels 0 def\n");
-    fprintf(outfile, "/rgbindx 0 def\n");
-  }
-
-  fprintf(outfile, "%d rotate\n", degree);
-  fprintf(outfile, "%d %d translate\n", position_left, position_bottom);
-  fprintf(outfile, "%f %f scale\n", width, height);
-  fprintf(outfile, "%d %d %d\n", image_info->image_width, image_info->image_height, depth);
-  fprintf(outfile, "[%d %d %d %d %d %d]\n", image_info->image_width, 0, 0, -image_info->image_height, 0, image_info->image_height);
-  fprintf(outfile, "currentfile\n");
-  fprintf(outfile, "/ASCII85Decode filter\n");
-#ifdef HAVE_LIBZ
-  if (flatdecode)
-  {
-    fprintf(outfile, "/FlateDecode filter\n");
-  }
-#endif
-
-  if (image_info->colors == 3) /* what about RGBA here ? */
-  {
-    fprintf(outfile, "false 3 colorimage\n");
-    fprintf(outfile, "\n");
-  }
-  else
-  {
-    fprintf(outfile, "image\n");
-    fprintf(outfile, "\n");
-  }
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static void xsane_save_ps_create_page_trailer(FILE *outfile)
-{
-  fprintf(outfile, "\n");
-  fprintf(outfile, "showpage\n");
-  fprintf(outfile, "%%%%PageTrailer\n");
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#ifdef HAVE_LIBZ
-/* Utility function for the PostScript output */
-static int xsane_write_compressed_a85_flatdecode(FILE *outfile, unsigned char *line, int len, int finish)
-{
-  static unsigned char *cbuf = NULL;
-  static int cbuflen = 0;
-  static int linelen = 0;
-  int i, j;
-  int outlen;
-  static int init = 0;
-  static z_stream s;
-  int ret;
-  int flush;
-  static int a85count = 0;
-  static guint32 a85tuple = 0;
-  static unsigned char a85block[6] = {0, 0, 0, 0, 0, 0};
-  static int count = 0;
-
-  DBG(DBG_proc, "xsane_write_compressed_a85_flatdecode\n");
-
-  if (linelen != len)
-  {
-    linelen = len;
-    if (cbuf != NULL)
-    {
-      free(cbuf);
-    }
-    /* buffer length = length + 0.1 * length + 12 (mandatory) */
-    cbuflen = len + len / 10 + 12;
-    cbuf = malloc(cbuflen);
-  }
-
-  if (cbuf == NULL)
-  {
-    DBG(DBG_error, "cbuf allocation failed\n");
-   return 1;
-  }
-
-  if (!init)
-  {
-    s.zalloc = Z_NULL;
-    s.zfree = Z_NULL;
-    s.opaque = Z_NULL;
-
-    ret = deflateInit(&s, Z_DEFAULT_COMPRESSION);
-
-    if (ret != Z_OK)
-    {
-      DBG(DBG_error, "deflateInit failed\n");
-      free(cbuf);
-     return 1;
-    }
-
-    init = 1;
-  }
-  
-  s.avail_in = len;
-  s.next_in = line;
-
-  do
-  {
-    s.avail_out = cbuflen;
-    s.next_out = cbuf;
-
-    flush = (finish) ? Z_FINISH : Z_NO_FLUSH;
-
-    ret = deflate(&s, flush);
-
-    if (ret == Z_STREAM_ERROR)
-    {
-      DBG(DBG_error, "deflate failed\n");
-      free(cbuf);
-     return 1;
-    }
-
-    outlen = cbuflen - s.avail_out;
-
-    /* ASCII85 (base 85) encoding */
-    for (i = 0; i < outlen; i++)
-    {
-      switch (a85count)
-      {
-        case 0:
-          a85tuple |= (cbuf[i] << 24);
-          a85count++;
-         break;
-
-        case 1:
-          a85tuple |= (cbuf[i] << 16);
-          a85count++;
-         break;
-
-        case 2:
-          a85tuple |= (cbuf[i] << 8);
-          a85count++;
-         break;
-
-        case 3:
-          a85tuple |= (cbuf[i] << 0);
-
-          if (count == 40)
-          {
-            fprintf(outfile, "\n");
-            count = 0;
-          }
-
-          if (a85tuple == 0)
-          {
-            fprintf(outfile, "z");
-            count++;
-          }
-          else
-          {
-            /* The ASCII chars must be written in reverse order, hence -> a85block[4-j] */
-            for (j = 0; j < 5; j++)
-            {
-              a85block[4-j] = a85tuple % 85 + '!';
-              a85tuple /= 85;
-            }
-
-            for (j = 0; j < 5; j++)
-            {
-              fprintf(outfile, "%c", a85block[j]);
-              count++;
-              if (count == 40)
-              {
-                fprintf(outfile, "\n");
-                count = 0;
-              }
-            }
-          }
-
-          a85count = 0;
-          a85tuple = 0;
-         break;
-
-        default:
-         break;
-      }
-    }
-  } while (s.avail_out == 0);
-
-  if (finish)
-  {
-    DBG(DBG_info, "finish\n");
-    if (a85count > 0)
-    {
-      a85count++;
-      for (j = 0; j <= a85count; j++)
-      {
-        a85block[j] = a85tuple % 85 + '!';
-        a85tuple /= 85;
-      }
-      /* Reverse order */
-      for (j--; j > 0; j--)
-      {
-        if (count == 40)
-        {
-          fprintf(outfile, "\n");
-          count = 0;
-        }
-        fprintf(outfile, "%c", a85block[j]);
-        count++;
-      }
-    }
-
-    /* ASCII85 EOD marker + newline*/
-    if (count + 2 > 40)
-    {
-      fprintf(outfile, "\n");
-    }
-    fprintf(outfile, "~>\n");
-    deflateEnd(&s);
-    free(cbuf);
-    cbuf = NULL;
-    init = 0;
-    a85tuple = 0;
-    a85count = 0;
-    cbuflen = 0;
-    linelen = 0;
-    count = 0;
-  }
-
- return 0;
-}
-#endif
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-/* Utility function for the PostScript output */
-static int xsane_write_compressed_a85(FILE *outfile, unsigned char *line, int len, int finish)
-{
-  static unsigned char *cbuf = NULL;
-  static int cbuflen = 0;
-  static int linelen = 0;
-  int i, j;
-  int outlen;
-  static int a85count = 0;
-  static guint32 a85tuple = 0;
-  static unsigned char a85block[6] = {0, 0, 0, 0, 0, 0};
-  static int count = 0;
-
-  DBG(DBG_proc, "xsane_write_compressed_a85\n");
-
-    cbuf = line;
-    outlen = len;
-
-    /* ASCII85 (base 85) encoding */
-    for (i = 0; i < outlen; i++)
-    {
-      switch (a85count)
-      {
-        case 0:
-          a85tuple |= (cbuf[i] << 24);
-          a85count++;
-         break;
-
-        case 1:
-          a85tuple |= (cbuf[i] << 16);
-          a85count++;
-         break;
-
-        case 2:
-          a85tuple |= (cbuf[i] << 8);
-          a85count++;
-         break;
-
-        case 3:
-          a85tuple |= (cbuf[i] << 0);
-
-          if (count == 40)
-          {
-            fprintf(outfile, "\n");
-            count = 0;
-          }
-
-          if (a85tuple == 0)
-          {
-            fprintf(outfile, "z");
-            count++;
-          }
-          else
-          {
-            /* The ASCII chars must be written in reverse order, hence -> a85block[4-j] */
-            for (j = 0; j < 5; j++)
-            {
-              a85block[4-j] = a85tuple % 85 + '!';
-              a85tuple /= 85;
-            }
-
-            for (j = 0; j < 5; j++)
-            {
-              fprintf(outfile, "%c", a85block[j]);
-              count++;
-              if (count == 40)
-              {
-                fprintf(outfile, "\n");
-                count = 0;
-              }
-            }
-          }
-
-          a85count = 0;
-          a85tuple = 0;
-         break;
-
-        default:
-         break;
-      }
-    }
-
-  if (finish)
-  {
-    DBG(DBG_info, "finish\n");
-    if (a85count > 0)
-    {
-      a85count++;
-      for (j = 0; j <= a85count; j++)
-      {
-        a85block[j] = a85tuple % 85 + '!';
-        a85tuple /= 85;
-      }
-      /* Reverse order */
-      for (j--; j > 0; j--)
-      {
-        if (count == 40)
-        {
-          fprintf(outfile, "\n");
-          count = 0;
-        }
-        fprintf(outfile, "%c", a85block[j]);
-        count++;
-      }
-    }
-
-    /* ASCII85 EOD marker + newline*/
-    if (count + 2 > 40)
-    {
-      fprintf(outfile, "\n");
-    }
-    fprintf(outfile, "~>\n");
-    a85tuple = 0;
-    a85count = 0;
-    cbuflen = 0;
-    linelen = 0;
-    count = 0;
-  }
-
- return 0;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static int xsane_save_ps_pdf_bw(FILE *outfile, FILE *imagefile, Image_info *image_info, int flatdecode, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int x, y;
- int bytes_per_line = (image_info->image_width+7)/8;
- int ret;
- unsigned char *line;
-
-  DBG(DBG_proc, "xsane_save_ps_pdf_bw\n");
-
-  *cancel_save = 0;
-
-  line = (unsigned char *) malloc(bytes_per_line);
-
-  if (line == NULL)
-  {
-    char buf[255];
-      
-    snprintf(buf, sizeof(buf), "%s malloc failed", ERR_DURING_SAVE);
-    DBG(DBG_error, "%s\n", buf);
-    xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-    *cancel_save = 1;
-   return (*cancel_save);
-  }
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    for (x = 0; x < bytes_per_line; x++)
-    {
-      line[x] = fgetc(imagefile) ^ 255;
-    }
-
-#ifdef HAVE_LIBZ
-    if (flatdecode)
-    {
-      ret = xsane_write_compressed_a85_flatdecode(outfile, line, bytes_per_line, (y == image_info->image_height - 1));
-    }
-    else
-#endif
-    {
-      ret = xsane_write_compressed_a85(outfile, line, bytes_per_line, (y == image_info->image_height - 1));
-    }
-
-    if ((ret != 0) || (ferror(outfile)))
-    {
-     char buf[255];
-
-      if (ret == 0)
-      {
-        snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      }
-      else
-      {
-        snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_ZLIB);
-      }
-
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-
-     break;
-    }
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
-  free(line);
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static int xsane_save_ps_pdf_gray(FILE *outfile, FILE *imagefile, Image_info *image_info, int flatdecode, GtkProgressBar *progress_bar, int *cancel_save)
-{
-  int x, y;
-  int ret;
-  unsigned char *line;
-
-  DBG(DBG_proc, "xsane_save_ps_pdf_gray\n");
-
-  *cancel_save = 0;
-
-  line = (unsigned char *) malloc(image_info->image_width);
-
-  if (line == NULL)
-  {
-   char buf[255];
-      
-    snprintf(buf, sizeof(buf), "%s malloc failed", ERR_DURING_SAVE);
-    DBG(DBG_error, "%s\n", buf);
-    xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-    *cancel_save = 1;
-   return (*cancel_save);
-  }
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    if (image_info->depth > 8) /* reduce 16 bit images */
-    {
-     guint16 val;
-
-      for (x = 0; x < image_info->image_width; x++)
-      {
-        fread(&val, 2, 1, imagefile);
-        line[x] = val/256;
-      }
-    }
-    else /* 8 bits/sample */
-    {
-      for (x = 0; x < image_info->image_width; x++)
-      {
-        line[x] = fgetc(imagefile);
-      }
-    }
-
-#ifdef HAVE_LIBZ
-    if (flatdecode)
-    {
-      ret = xsane_write_compressed_a85_flatdecode(outfile, line, image_info->image_width, (y == image_info->image_height - 1));
-    }
-    else
-#endif
-    {
-      ret = xsane_write_compressed_a85(outfile, line, image_info->image_width, (y == image_info->image_height - 1));
-    }
-
-    if ((ret != 0) || (ferror(outfile)))
-    {
-     char buf[255];
-
-      if (ret == 0)
-      {
-        snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      }
-      else
-      {
-        snprintf(buf, sizeof(buf), "%s zlib error or memory allocation problem", ERR_DURING_SAVE);
-      }
-
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-
-     break;
-    }
-
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
-  free(line);
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static int xsane_save_ps_pdf_color(FILE *outfile, FILE *imagefile, Image_info *image_info, int flatdecode, GtkProgressBar *progress_bar, int *cancel_save)
-{
-  int x, y;
-  int ret;
-  unsigned char *line, *linep;
-
-  DBG(DBG_proc, "xsane_save_ps_pdf_color\n");
-
-  *cancel_save = 0;
-
-  line = (unsigned char *) malloc(image_info->image_width * 3);
-
-  if (line == NULL)
-  {
-   char buf[255];
-      
-    snprintf(buf, sizeof(buf), "%s malloc failed", ERR_DURING_SAVE);
-    DBG(DBG_error, "%s\n", buf);
-    xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-    *cancel_save = 1;
-   return (*cancel_save);
-  }
- 
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    linep = line;
-
-    if (image_info->depth > 8) /* reduce 16 bit images */
-    {
-     guint16 val;
-
-      for (x = 0; x < image_info->image_width; x++)
-      {
-        fread(&val, 2, 1, imagefile);
-	*linep++ = val/256;
-        fread(&val, 2, 1, imagefile);
-	*linep++ = val/256;
-        fread(&val, 2, 1, imagefile);
-	*linep++ = val/256;
-      }
-    }
-    else /* 8 bits/sample */
-    {
-      for (x = 0; x < image_info->image_width; x++)
-      {
-	*linep++ = fgetc(imagefile);
-	*linep++ = fgetc(imagefile);
-	*linep++ = fgetc(imagefile);
-      }
-    }
-
-#ifdef HAVE_LIBZ
-    if (flatdecode)
-    {
-      ret = xsane_write_compressed_a85_flatdecode(outfile, line, (image_info->image_width * 3), (y == image_info->image_height - 1));
-    }
-    else
-#endif
-    {
-      ret = xsane_write_compressed_a85(outfile, line, (image_info->image_width * 3), (y == image_info->image_height - 1));
-    }
-
-    if ((ret != 0) || (ferror(outfile)))
-    {
-     char buf[255];
-
-      if (ret == 0)
-      {
-        snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      }
-      else
-      {
-        snprintf(buf, sizeof(buf), "%s zlib error or memory allocation problem", ERR_DURING_SAVE);
-      }
-
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-
-     break;
-    }
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
-  free(line);
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_save_ps_page(FILE *outfile, int page,
-                       FILE *imagefile, Image_info *image_info, float width, float height,
-                       int paper_left_margin, int paper_bottom_margin, int paperheight, int paperwidth, int paper_orientation,
-                       int flatdecode,
-                       GtkProgressBar *progress_bar, int *cancel_save)
-{
-  DBG(DBG_proc, "xsane_save_ps_page\n");
-
-  xsane_save_ps_create_page_header(outfile, page,
-                                   image_info, width, height,
-                                   paper_left_margin, paper_bottom_margin, paperheight, paperwidth, paper_orientation,
-                                   flatdecode,
-                                   progress_bar);
-
-  if (image_info->colors == 1) /* lineart, halftone, grayscale */
-  {
-    if (image_info->depth == 1) /* lineart, halftone */
-    {
-      xsane_save_ps_pdf_bw(outfile, imagefile, image_info, flatdecode, progress_bar, cancel_save);
-    }
-    else /* grayscale */
-    {
-      xsane_save_ps_pdf_gray(outfile, imagefile, image_info, flatdecode, progress_bar, cancel_save);
-    }
-  }
-  else /* color RGB */
-  {
-    xsane_save_ps_pdf_color(outfile, imagefile, image_info, flatdecode, progress_bar, cancel_save);
-  }
-
-  xsane_save_ps_create_page_trailer(outfile);
-
-  if (ferror(outfile))
-  {
-   char buf[255];
-
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-    DBG(DBG_error, "%s\n", buf);
-    xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-    *cancel_save = 1;
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_save_ps(FILE *outfile, FILE *imagefile, Image_info *image_info, float width, float height,
-                  int paper_left_margin, int paper_bottom_margin, int paperheight, int paperwidth, int paper_orientation,
-                  int flatdecode,
-                  GtkProgressBar *progress_bar, int *cancel_save)
-{
-  DBG(DBG_proc, "xsane_save_ps\n");
-
-  *cancel_save = 0;
-
-  xsane_save_ps_create_document_header(outfile, 1 /* pages */, flatdecode);
-
-  xsane_save_ps_page(outfile, 1 /* page */, 
-                     imagefile, image_info, width, height,
-                     paper_left_margin, paper_bottom_margin, paperheight, paperwidth, paper_orientation,
-                     flatdecode,
-                     progress_bar, cancel_save);
-
-  xsane_save_ps_create_document_trailer(outfile, 0 /* we defined pages at beginning */);
-
-  if (ferror(outfile))
-  {
-   char buf[255];
-
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-    DBG(DBG_error, "%s\n", buf);
-    xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-    *cancel_save = 1;
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-/* The pdf_xref struct holds byte offsets from the beginning of the PDF
- * file to each object of the PDF file -- used to build the xref table
- */
-struct pdf_xref
-{
-  unsigned long obj5; /* obj 5 0 */
-  unsigned long obj6; /* obj 6 0 */
-  unsigned long obj7; /* obj 7 0 */
-  unsigned long xref; /* xref table */
-  unsigned long slen; /* length of image stream */
-  unsigned long slenp; /* position of image stream length */
-};
-
-static void xsane_save_pdf_create_header(FILE *outfile, Image_info *image_info,
-                                         float width, float height,
-                                         int paper_left_margin, int paper_bottom_margin,
-                                         int paper_width, int paper_height,
-                                         int paper_orientation, int flatdecode,
-                                         GtkProgressBar *progress_bar, struct pdf_xref *xref)
-{
- int position_left, position_bottom, box_left, box_bottom, box_right, box_top, depth;
- int left, bottom;
- float rad;
-
-  DBG(DBG_proc, "xsane_save_pdf_create_header\n");
-
-  switch (paper_orientation)
-  {
-    default:
-    case 0: /* top left portrait */
-      left   = 0.0;
-      bottom = paper_height - height;
-     break;
-
-    case 1: /* top right portrait */
-      left   = paper_width  - width;
-      bottom = paper_height - height;
-     break;
-
-    case 2: /* bottom right portrait */
-      left   = paper_width - width;
-      bottom = 0.0;
-     break;
-
-    case 3: /* bottom left portrait */
-      left   = 0.0;
-      bottom = 0.0;
-     break;
-
-    case 4: /* center portrait */
-      left   = paper_width  / 2.0 - width  / 2.0;
-      bottom = paper_height / 2.0 - height / 2.0;
-     break;
-
-
-    case 8: /* top left landscape */
-      left   = 0.0;
-      bottom = paper_width - height;
-     break;
-
-    case 9: /* top right landscape */
-      left   = paper_height - width;
-      bottom = paper_width  - height;
-     break;
-
-    case 10: /* bottom right landscape */
-      left   = paper_height - width;
-      bottom = 0.0;
-     break;
-
-    case 11: /* bottom left landscape */
-      left   = 0.0;
-      bottom = 0.0;
-     break;
-
-    case 12: /* center landscape */
-      left   = paper_height / 2.0 - width  / 2.0;
-      bottom = paper_width  / 2.0 - height / 2.0;
-     break;
-  }
-
-
-  if (paper_orientation >= 8) /* rotate with 90 degrees - landscape mode */
-  {
-    rad = -M_PI_2; /* pi / 2 */
-    position_left   = left   + paper_bottom_margin;
-    position_bottom = bottom - paper_width - paper_left_margin;
-    box_left        = paper_width - paper_left_margin - bottom - height;
-    box_bottom      = left   + paper_bottom_margin;
-    box_right       = box_left   + ceil(height);
-    box_top         = box_bottom + ceil(width);
-  }
-  else /* do not rotate, portrait mode */
-  {
-    rad = 0;
-    position_left   = left   + paper_left_margin;
-    position_bottom = bottom + paper_bottom_margin;
-    box_left        = left   + paper_left_margin;
-    box_bottom      = bottom + paper_bottom_margin;
-    box_right       = box_left   + ceil(width);
-    box_top         = box_bottom + ceil(height);
-  }
-
-  depth = image_info->depth;
-
-  if (depth > 8)
-  {
-    depth = 8;
-  }
-
-  fprintf(outfile, "%%PDF-1.4\n");
-  fprintf(outfile, "\n");
-  fprintf(outfile, "1 0 obj\n");
-  fprintf(outfile, "   << /Type /Catalog\n");
-  fprintf(outfile, "      /Outlines 2 0 R\n");
-  fprintf(outfile, "      /Pages 3 0 R\n");
-  fprintf(outfile, "   >>\n");
-  fprintf(outfile, "endobj\n");
-  fprintf(outfile, "\n");
-  fprintf(outfile, "2 0 obj\n");
-  fprintf(outfile, "   << /Type /Outlines\n");
-  fprintf(outfile, "      /Count 0\n");
-  fprintf(outfile, "   >>\n");
-  fprintf(outfile, "endobj\n");
-  fprintf(outfile, "\n");
-  fprintf(outfile, "3 0 obj\n");
-  fprintf(outfile, "   << /Type /Pages\n");
-  fprintf(outfile, "      /Kids [4 0 R]\n");
-  fprintf(outfile, "      /Count 1\n");
-  fprintf(outfile, "   >>\n");
-  fprintf(outfile, "endobj\n");
-  fprintf(outfile, "\n");
-  fprintf(outfile, "4 0 obj\n");
-  fprintf(outfile, "    << /Type /Page\n");
-  fprintf(outfile, "       /Parent 3 0 R\n");
-  fprintf(outfile, "       /MediaBox [%d %d %d %d]\n", box_left, box_bottom, box_right, box_top);
-  fprintf(outfile, "       /Contents 5 0 R\n");
-  fprintf(outfile, "       /Resources << /ProcSet 6 0 R >>\n");
-  fprintf(outfile, "    >>\n");
-  fprintf(outfile, "endobj\n");
-  fprintf(outfile, "\n");
-
-  /* Offset of object 5, for xref */
-  xref->obj5 = ftell(outfile);
-
-  fprintf(outfile, "5 0 obj\n");
-  fprintf(outfile, "    << /Length             >>\n");
-
-  /* Position of the stream length, to be written later on */
-  xref->slenp = ftell(outfile) - 15;
-
-  fprintf(outfile, "stream\n");
-
-  /* Start of the stream data */
-  xref->slen = ftell(outfile);
-
-  fprintf(outfile, "q\n");
-  fprintf(outfile, "1 0 0 1 %d %d cm\n", position_left, position_bottom); /* translate */
-  fprintf(outfile, "%f %f -%f %f 0 0 cm\n", cos(rad), sin(rad), sin(rad), cos(rad)); /* rotate */
-  fprintf(outfile, "%f 0 0 %f 0 0 cm\n", width, height); /* scale */
-  fprintf(outfile, "BI\n");
-  fprintf(outfile, "  /W %d\n", image_info->image_width);
-  fprintf(outfile, "  /H %d\n", image_info->image_height);
-
-  if (image_info->colors == 3) /* what about RGBA here ? */
-  {
-    fprintf(outfile, "  /CS /RGB\n");
-    fprintf(outfile, "  /BPC %d\n", depth);
-  }
-  else if (image_info->depth == 1) /* BW */
-  {
-    fprintf(outfile, "  /CS /G\n");
-    fprintf(outfile, "  /BPC 1\n");
-  }
-  else /* gray */
-  {
-    fprintf(outfile, "  /CS /G\n");
-    fprintf(outfile, "  /BPC 8\n");
-  }
-
-#ifdef HAVE_LIBZ
-  if (flatdecode)
-  {  
-    fprintf(outfile, "  /F [/A85 /FlateDecode]\n");
-  }
-  else
-  {  
-    fprintf(outfile, "  /F /A85\n");
-  }
-#else
-  fprintf(outfile, "  /F /A85\n");
-#endif
-  fprintf(outfile, "ID\n");
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_save_pdf(FILE *outfile, FILE *imagefile, Image_info *image_info, float width, float height,
-                   int paper_left_margin, int paper_bottom_margin, int paperheight, int paperwidth, int paper_orientation,
-                   int flatdecode,
-                   GtkProgressBar *progress_bar, int *cancel_save)
-{
-  struct tm *t;
-  time_t tt;
-  struct pdf_xref xref;
-
-  DBG(DBG_proc, "xsane_save_pdf\n");
-
-  *cancel_save = 0;
-
-  xsane_save_pdf_create_header(outfile, image_info, width, height,
-			       paper_left_margin, paper_bottom_margin, paperheight, paperwidth, paper_orientation,
-                               flatdecode,
-			       progress_bar, &xref);
-
-  if (image_info->colors == 1) /* lineart, halftone, grayscale */
-  {
-    if (image_info->depth == 1) /* lineart, halftone */
-    {
-      xsane_save_ps_pdf_bw(outfile, imagefile, image_info, flatdecode, progress_bar, cancel_save);
-    }
-    else /* grayscale */
-    {
-      xsane_save_ps_pdf_gray(outfile, imagefile, image_info, flatdecode, progress_bar, cancel_save);
-    }
-  }
-  else /* color RGB */
-  {
-    xsane_save_ps_pdf_color(outfile, imagefile, image_info, flatdecode, progress_bar, cancel_save);
-  }
-
-  /* PDF trailer */
-  fprintf(outfile, "EI\n");
-  fprintf(outfile, "Q\n");
-
-  /* Go back and write the length of the stream */
-  xref.slen = ftell(outfile) - xref.slen - 1;
-  fseek(outfile, xref.slenp, SEEK_SET);
-  fprintf(outfile, "%lu", xref.slen);
-  fseek(outfile, 0L, SEEK_END);
-
-  fprintf(outfile, "endstream\n");
-  fprintf(outfile, "endobj\n");
-  fprintf(outfile, "\n");
-
-  /* Offset of object 6, for xref */
-  xref.obj6 = ftell(outfile);
-
-  fprintf(outfile, "6 0 obj\n");
-  fprintf(outfile, "    [/PDF]\n");
-  fprintf(outfile, "endobj\n");
-  fprintf(outfile, "\n");
-
-  /* Offset of object 7, for xref */
-  xref.obj7 = ftell(outfile);
-
-  fprintf(outfile, "7 0 obj\n");
-  fprintf(outfile, "   << /Title (XSane scanned image)\n");
-  fprintf(outfile, "      /Creator (XSane version %s (sane %d.%d) - by Oliver Rauch)\n",
-	  VERSION,
-	  SANE_VERSION_MAJOR(xsane.sane_backend_versioncode),
-	  SANE_VERSION_MINOR(xsane.sane_backend_versioncode));
-  fprintf(outfile, "      /Producer (XSane %s)\n", VERSION);
-
-  tt = time(NULL);
-  t = gmtime(&tt);
-
-  fprintf(outfile, "      /CreationDate (D:%04d%02d%02d%02d%02d%02d+00'00')\n",
-	  1900 + t->tm_year, t->tm_mon + 1, t->tm_mday, t->tm_hour, t->tm_min, t->tm_sec);
-  fprintf(outfile, "   >>\n");
-  fprintf(outfile, "endobj\n");
-  fprintf(outfile, "\n");
-
-  /* Offset of xref, for startxref below */
-  xref.xref = ftell(outfile);
-
-  fprintf(outfile, "xref\n");
-  fprintf(outfile, "0 8\n");
-  fprintf(outfile, "0000000000 65535 f \n");
-  fprintf(outfile, "0000000010 00000 n \n");
-  fprintf(outfile, "0000000094 00000 n \n");
-  fprintf(outfile, "0000000153 00000 n \n");
-  fprintf(outfile, "0000000229 00000 n \n");
-  fprintf(outfile, "%010lu 00000 n \n", xref.obj5);
-  fprintf(outfile, "%010lu 00000 n \n", xref.obj6);
-  fprintf(outfile, "%010lu 00000 n \n", xref.obj7);
-  fprintf(outfile, "\n");
-  fprintf(outfile, "trailer\n");
-  fprintf(outfile, "    << /Size 8\n");
-  fprintf(outfile, "       /Root 1 0 R\n");
-  fprintf(outfile, "       /Info 7 0 R\n");
-  fprintf(outfile, "    >>\n");
-  fprintf(outfile, "startxref\n");
-  fprintf(outfile, "%lu\n", xref.xref);
-  fprintf(outfile, "%%%%EOF\n");
-
-  if (ferror(outfile))
-  {
-   char buf[255];
-
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-    DBG(DBG_error, "%s\n", buf);
-    xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-    *cancel_save = 1;
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-#ifdef HAVE_LIBJPEG
-
-typedef struct
-{
-  struct jpeg_error_mgr pub;/* "public" fields */
-  int *cancel_save; 
-} xsane_jpeg_error_mgr;
-
-typedef xsane_jpeg_error_mgr *xsane_jpeg_error_mgr_ptr;
-
-static void xsane_jpeg_error_exit(j_common_ptr cinfo)
-{
- char buf[256];
-
-  /* cinfo->err points to a xsane_jpeg_error_mgr struct */
-  xsane_jpeg_error_mgr_ptr xsane_jpeg_error_mgr_data = (xsane_jpeg_error_mgr_ptr) cinfo->err;
-
-
-  if (!*xsane_jpeg_error_mgr_data->cancel_save)
-  {
-    /* output original error message */
-    (*cinfo->err->output_message) (cinfo);
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_LIBJPEG);
-    xsane_back_gtk_error(buf, TRUE);
-  }
-
-  *xsane_jpeg_error_mgr_data->cancel_save = 1;
-}
-
-int xsane_save_jpeg(FILE *outfile, FILE *imagefile, Image_info *image_info, int quality, GtkProgressBar *progress_bar, int *cancel_save)
-{
- unsigned char *data;
- char buf[256];
- int components = 1;
- int x,y;
- int bytespp = 1;
- struct jpeg_compress_struct cinfo;
- xsane_jpeg_error_mgr jerr;
- JSAMPROW row_pointer[1];
-
-  DBG(DBG_proc, "xsane_save_jpeg\n");
-
-  *cancel_save = 0;
-
-  if (image_info->colors == 3)
-  {
-    components = 3;
-  }
-
-  if (image_info->depth > 8)
-  {
-    bytespp = 2;
-  }
-
-  data = malloc(image_info->image_width * components * bytespp);
-
-  if (!data)
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_NO_MEM);
-    xsane_back_gtk_error(buf, TRUE);
-    return -1; /* error */
-  }
-
-  cinfo.err = jpeg_std_error(&jerr.pub);
-  jerr.pub.error_exit = xsane_jpeg_error_exit;
-  jerr.cancel_save = cancel_save; 
-
-  jpeg_create_compress(&cinfo);
-  jpeg_stdio_dest(&cinfo, outfile);
-  cinfo.image_width      = image_info->image_width;
-  cinfo.image_height     = image_info->image_height;
-  cinfo.input_components = components;
-  if (image_info->colors == 3)
-  {
-    cinfo.in_color_space   = JCS_RGB;
-  }
-  else
-  {
-    cinfo.in_color_space   = JCS_GRAYSCALE;
-  }
-  jpeg_set_defaults(&cinfo);
-
-  jpeg_set_quality(&cinfo, quality, TRUE);
-
-  cinfo.density_unit     = 1; /* dpi */
-  cinfo.X_density        = image_info->resolution_x;
-  cinfo.Y_density        = image_info->resolution_y;
-
-  jpeg_start_compress(&cinfo, TRUE);
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    if (image_info->depth == 1)
-    {
-     int byte = 0;
-     int mask = 128;
-
-      for (x = 0; x < image_info->image_width; x++)
-      {
-
-        if ( (x % 8) == 0)
-	{
-          byte = fgetc(imagefile);
-          mask = 128;
-	}
-
-        if (byte & mask)
-        {
-          data[x] = 0;
-        }
-        else
-        {
-          data[x] = 255;
-        }
-        mask >>= 1;
-      }
-    }
-    else if (image_info->depth > 8) /* jpeg does not support 16 bits/sample, so we reduce it at first */
-    {
-      guint16 *data16 = (guint16 *) data;
-      fread(data, components * 2, image_info->image_width, imagefile);
-      for (x = 0; x < image_info->image_width * components; x++)
-      {
-        data[x] = data16[x] / 256;
-      }
-
-    }
-    else /* 8 bits/sample */
-    {
-      fread(data, components, image_info->image_width, imagefile);
-    }
-
-    row_pointer[0] = data;
-    jpeg_write_scanlines(&cinfo, row_pointer, 1);
-
-    if (*cancel_save)
-    {
-      cinfo.image_height = y; /* correct image height */
-      break;
-    }
-  }
-
-  jpeg_finish_compress(&cinfo);
-  free(data);
-
- return (*cancel_save);
-}
-#endif
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#ifdef HAVE_LIBTIFF
-/* pages = 0 => single page tiff, page = 0 */
-/* pages > 0 => page = [1 .. pages] */
-int xsane_save_tiff_page(TIFF *tiffile, int page, int pages, FILE *imagefile, Image_info *image_info, int quality,
-                         GtkProgressBar *progress_bar, int *cancel_save)
-{
- char *data;
- char buf[256];
- int y, w;
- int components;
- int compression;
- int bytes;
- struct tm *ptm;
- time_t now;
-
-  DBG(DBG_proc, "xsane_save_tiff_page(%d/%d\n", page, pages);
-
-  *cancel_save = 0;
-
-  if (image_info->depth == 1)
-  {
-    compression = preferences.tiff_compression1_nr;
-  }
-  else if (image_info->depth == 8)
-  {
-    compression = preferences.tiff_compression8_nr;
-  }
-  else
-  {
-    compression = preferences.tiff_compression16_nr;
-  }
-
-
-  if (image_info->colors == 3)
-  {
-    components = 3;
-  }
-  else
-  {
-    components = 1;
-  }
-
-  if (image_info->depth <= 8)
-  {
-    bytes = 1;
-  }
-  else
-  {
-    bytes = 2;
-  }
-
-  data = (char *)_TIFFmalloc(image_info->image_width * components * bytes);
-
-  if (!data)
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_NO_MEM);
-    xsane_back_gtk_error(buf, TRUE);
-   return -1; /* error */
-  }
-  
-  TIFFSetField(tiffile, TIFFTAG_IMAGEWIDTH, image_info->image_width);
-  TIFFSetField(tiffile, TIFFTAG_IMAGELENGTH, image_info->image_height);
-  TIFFSetField(tiffile, TIFFTAG_BITSPERSAMPLE, image_info->depth); 
-  TIFFSetField(tiffile, TIFFTAG_SAMPLESPERPIXEL, components);
-  TIFFSetField(tiffile, TIFFTAG_ORIENTATION, ORIENTATION_TOPLEFT);
-  TIFFSetField(tiffile, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG);
-  TIFFSetField(tiffile, TIFFTAG_COMPRESSION, compression);
-  TIFFSetField(tiffile, TIFFTAG_SOFTWARE, "xsane");
-
-  time(&now);
-  ptm = localtime(&now);
-  sprintf(buf, "%04d:%02d:%02d %02d:%02d:%02d", 1900+ptm->tm_year, ptm->tm_mon+1, ptm->tm_mday, ptm->tm_hour, ptm->tm_min, ptm->tm_sec);
-  TIFFSetField(tiffile, TIFFTAG_DATETIME, buf);
-
-  if (image_info->resolution_x > 0.0)
-  {
-    TIFFSetField(tiffile, TIFFTAG_RESOLUTIONUNIT, RESUNIT_INCH);
-    TIFFSetField(tiffile, TIFFTAG_XRESOLUTION, image_info->resolution_x);
-    TIFFSetField(tiffile, TIFFTAG_YRESOLUTION, image_info->resolution_y);   
-  }
-
-  if (compression == COMPRESSION_JPEG)
-  {
-    TIFFSetField(tiffile, TIFFTAG_JPEGQUALITY, quality);
-    TIFFSetField(tiffile, TIFFTAG_JPEGCOLORMODE, JPEGCOLORMODE_RAW); /* should be default, but to be sure */
-  }
-
-  if (image_info->colors == 3)
-  {
-    TIFFSetField(tiffile, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_RGB);
-  }
-  else
-  {
-    if (image_info->depth == 1) /* lineart */
-    {
-      TIFFSetField(tiffile, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_MINISWHITE);
-    }
-    else /* grayscale */
-    {
-      TIFFSetField(tiffile, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_MINISBLACK);
-    }
-  }
-
-  TIFFSetField(tiffile, TIFFTAG_ROWSPERSTRIP, TIFFDefaultStripSize(tiffile, -1));
-
-  if (pages)
-  {
-    TIFFSetField(tiffile, TIFFTAG_SUBFILETYPE, FILETYPE_PAGE);
-    TIFFSetField(tiffile, TIFFTAG_PAGENUMBER, page, pages);
-  }
-
-  w = TIFFScanlineSize(tiffile);
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-    
-    fread(data, 1, w, imagefile);
-
-    if (TIFFWriteScanline(tiffile, data, y, 0) != 1)
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s", ERR_DURING_SAVE);
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
-  if (pages)
-  {
-    TIFFWriteDirectory(tiffile);
-  }
-
-  _TIFFfree(data);
- return (*cancel_save);
-}
-#endif
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#ifdef HAVE_LIBPNG
-#ifdef HAVE_LIBZ
-int xsane_save_png(FILE *outfile, FILE *imagefile, Image_info *image_info, int compression, GtkProgressBar *progress_bar, int *cancel_save)
-{
- png_structp png_ptr;
- png_infop png_info_ptr;
- png_bytep row_ptr;
- png_color_8 sig_bit;
- unsigned char *data;
- char buf[256];
- int colortype, components, byte_width;
- int y;
-
-  DBG(DBG_proc, "xsane_save_png\n");
-
-  *cancel_save = 0;
-
-  png_ptr = png_create_write_struct(PNG_LIBPNG_VER_STRING, 0, 0, 0);
-  if (!png_ptr)
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_LIBPNG);
-    xsane_back_gtk_error(buf, TRUE);
-    return -1; /* error */
-  }
-
-  png_info_ptr = png_create_info_struct(png_ptr);
-  if (!png_info_ptr)
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_LIBTIFF);
-    xsane_back_gtk_error(buf, TRUE);
-    return -1; /* error */
-  }
-
-  if (setjmp(png_ptr->jmpbuf))
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_LIBPNG);
-    xsane_back_gtk_error(buf, TRUE);
-    png_destroy_write_struct(&png_ptr, (png_infopp) 0);
-    return -1; /* error */
-  }
-
-  byte_width = image_info->image_width;
-
-  if (image_info->colors == 4) /* RGBA */
-  {
-    components = 4;
-    colortype = PNG_COLOR_TYPE_RGB_ALPHA;
-  }
-  else if (image_info->colors == 3) /* RGB */
-  {
-    components = 3;
-    colortype = PNG_COLOR_TYPE_RGB;
-  }
-  else /* gray or black/white */
-  {
-    components = 1;
-    colortype = PNG_COLOR_TYPE_GRAY;
-  }
-  
-  png_init_io(png_ptr, outfile);
-  png_set_compression_level(png_ptr, compression);
-  png_set_IHDR(png_ptr, png_info_ptr, image_info->image_width, image_info->image_height, image_info->depth,
-               colortype, PNG_INTERLACE_NONE, PNG_COMPRESSION_TYPE_BASE, PNG_FILTER_TYPE_BASE);
-
-  if (image_info->colors >=3)
-  {
-    sig_bit.red   = image_info->depth;
-    sig_bit.green = image_info->depth;
-    sig_bit.blue  = image_info->depth;
-
-    if (image_info->colors == 4)
-    {
-      sig_bit.alpha = image_info->depth;
-    }
-
-  }
-  else
-  {
-    sig_bit.gray  = image_info->depth;
-
-    if (image_info->depth == 1)
-    {
-      byte_width = (image_info->image_width+7)/8;
-      png_set_invert_mono(png_ptr);
-    }
-  }
-
-  png_set_sBIT(png_ptr, png_info_ptr, &sig_bit);
-#if defined(PNG_pHYs_SUPPORTED)
-  png_set_pHYs(png_ptr, png_info_ptr,
-               image_info->resolution_x * 100.0 / 2.54,
-               image_info->resolution_y * 100.0 / 2.54, PNG_RESOLUTION_METER);
-#endif
-  png_write_info(png_ptr, png_info_ptr);
-  png_set_shift(png_ptr, &sig_bit);
-
-  data = malloc(image_info->image_width * components);
-
-  if (!data)
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_NO_MEM);
-    xsane_back_gtk_error(buf, TRUE);
-    png_destroy_write_struct(&png_ptr, (png_infopp) 0);
-    return -1; /* error */
-  }
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    fread(data, components, byte_width, imagefile);
-
-    row_ptr = data;
-    png_write_rows(png_ptr, &row_ptr, 1); /* errors are caught by test sor setjmp(...) */
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
-  free(data);
-  png_write_end(png_ptr, png_info_ptr);
-  png_destroy_write_struct(&png_ptr, (png_infopp) 0);
-
- return (*cancel_save);
-}
-#endif
-#endif
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#ifdef HAVE_LIBPNG
-#ifdef HAVE_LIBZ
-int xsane_save_png_16(FILE *outfile, FILE *imagefile, Image_info *image_info, int compression, GtkProgressBar *progress_bar, int *cancel_save)
-{
- png_structp png_ptr;
- png_infop png_info_ptr;
- png_bytep row_ptr;
- png_color_8 sig_bit; /* should be 16, but then I get a warning about wrong type */
- unsigned char *data;
- char buf[256];
- int colortype, components;
- int x,y;
- guint16 val;
-
-  DBG(DBG_proc, "xsane_save_png16\n");
-
-  *cancel_save = 0;
-
-  png_ptr = png_create_write_struct(PNG_LIBPNG_VER_STRING, 0, 0, 0);
-  if (!png_ptr)
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_LIBPNG);
-    xsane_back_gtk_error(buf, TRUE);
-    return -1; /* error */
-  }
-
-  png_info_ptr = png_create_info_struct(png_ptr);
-  if (!png_info_ptr)
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_LIBPNG);
-    xsane_back_gtk_error(buf, TRUE);
-    return -1; /* error */
-  }
-
-  if (setjmp(png_ptr->jmpbuf))
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_LIBPNG);
-    xsane_back_gtk_error(buf, TRUE);
-    png_destroy_write_struct(&png_ptr, (png_infopp) 0);
-    return -1; /* error */
-  }
-
-  if (image_info->colors == 4) /* RGBA */
-  {
-    components = 4;
-    colortype = PNG_COLOR_TYPE_RGB_ALPHA;
-  }
-  else if (image_info->colors == 3) /* RGB */
-  {
-    components = 3;
-    colortype = PNG_COLOR_TYPE_RGB;
-  }
-  else /* gray or black/white */
-  {
-    components = 1;
-    colortype = PNG_COLOR_TYPE_GRAY;
-  }
-  
-  png_init_io(png_ptr, outfile);
-  png_set_compression_level(png_ptr, compression);
-  png_set_IHDR(png_ptr, png_info_ptr, image_info->image_width, image_info->image_height, 16,
-               colortype, PNG_INTERLACE_NONE, PNG_COMPRESSION_TYPE_BASE, PNG_FILTER_TYPE_BASE);
-
-  sig_bit.red   = image_info->depth;
-  sig_bit.green = image_info->depth;
-  sig_bit.blue  = image_info->depth;
-  sig_bit.alpha = image_info->depth;
-  sig_bit.gray  = image_info->depth;
-
-  png_set_sBIT(png_ptr, png_info_ptr, &sig_bit);
-  png_write_info(png_ptr, png_info_ptr);
-  png_set_shift(png_ptr, &sig_bit);
-  png_set_packing(png_ptr);
-
-  data = malloc(image_info->image_width * components * 2);
-
-  if (!data)
-  {
-    snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, ERR_NO_MEM);
-    xsane_back_gtk_error(buf, TRUE);
-    png_destroy_write_struct(&png_ptr, (png_infopp) 0);
-    return -1; /* error */
-  }
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    for (x = 0; x < image_info->image_width * components; x++) /* this must be changed in dependance of endianess */
-    {
-      fread(&val, 2, 1, imagefile);	/* get data in machine order */
-      data[x*2+0] = val / 256;		/* write data in network order (MSB first) */
-      data[x*2+1] = val & 255;
-    }
-
-    row_ptr = data;
-    png_write_rows(png_ptr, &row_ptr, 1);
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
-  free(data);
-  png_write_end(png_ptr, png_info_ptr);
-  png_destroy_write_struct(&png_ptr, (png_infopp) 0);
-
- return (*cancel_save);
-}
-#endif
-#endif
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static int xsane_save_pnm_16_ascii_gray(FILE *outfile, FILE *imagefile, Image_info *image_info, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int x,y;
- guint16 val;
- int count = 0;
-
-  DBG(DBG_proc, "xsane_save_pnm_16_ascii_gray\n");
-
-  *cancel_save = 0;
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    for (x = 0; x < image_info->image_width; x++)
-    {
-      fread(&val, 2, 1, imagefile); /* get data in machine order */
-      fprintf(outfile, "%d ", val);
-
-      if (++count >= 10)
-      {
-        fprintf(outfile, "\n");
-	count = 0;
-      }
-    }
-    fprintf(outfile, "\n");
-
-    if (ferror(outfile))
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-    count = 0;
-
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static int xsane_save_pnm_16_ascii_color(FILE *outfile, FILE *imagefile, Image_info *image_info, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int x,y;
- guint16 val;
- int count = 0;
-
-  DBG(DBG_proc, "xsane_save_pnm_16_ascii_color\n");
-
-  *cancel_save = 0;
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    for (x = 0; x < image_info->image_width; x++)
-    {
-      fread(&val, 2, 1, imagefile); /* get data in machine order */
-      fprintf(outfile, "%d ", val);
-
-      fread(&val, 2, 1, imagefile);
-      fprintf(outfile, "%d ", val);
-
-      fread(&val, 2, 1, imagefile);
-      fprintf(outfile, "%d  ", val);
-
-      if (++count >= 3)
-      {
-        fprintf(outfile, "\n");
-	count = 0;
-      }
-    }
-    fprintf(outfile, "\n");
-
-    if (ferror(outfile))
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-    count = 0;
-
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static int xsane_save_pnm_16_binary_gray(FILE *outfile, FILE *imagefile, Image_info *image_info, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int x,y;
- guint16 val;
-
-  DBG(DBG_proc, "xsane_save_pnm_16_binary_gray\n");
-
-  *cancel_save = 0;
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    for (x = 0; x < image_info->image_width; x++)
-    {
-      fread(&val, 2, 1, imagefile); /* get data in machine order */
-      fputc(val / 256, outfile); /* MSB fist */
-      fputc(val & 255, outfile); /* LSB */
-    }
-
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    if (ferror(outfile))
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static int xsane_save_pnm_16_binary_color(FILE *outfile, FILE *imagefile, Image_info *image_info, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int x,y;
- guint16 val;
-
-  DBG(DBG_proc, "xsane_save_pnm_16_binary_color\n");
-
-  *cancel_save = 0;
-
-  for (y = 0; y < image_info->image_height; y++)
-  {
-    for (x = 0; x < image_info->image_width; x++)
-    {
-      /* red */
-      fread(&val, 2, 1, imagefile); /* get data in machine order */
-      fputc(val / 256, outfile); /* MSB fist */
-      fputc(val & 255, outfile); /* LSB */
-
-      /* green */
-      fread(&val, 2, 1, imagefile); /* get data in machine order */
-      fputc(val / 256, outfile); /* MSB fist */
-      fputc(val & 255, outfile); /* LSB */
-
-      /* blue */
-      fread(&val, 2, 1, imagefile); /* get data in machine order */
-      fputc(val / 256, outfile); /* MSB fist */
-      fputc(val & 255, outfile); /* LSB */
-    }
-
-    gtk_progress_bar_update(progress_bar, (float) y / image_info->image_height);
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-
-    if (ferror(outfile))
-    {
-     char buf[255];
-
-      snprintf(buf, sizeof(buf), "%s %s", ERR_DURING_SAVE, strerror(errno));
-      DBG(DBG_error, "%s\n", buf);
-      xsane_back_gtk_decision(ERR_HEADER_ERROR, (gchar **) error_xpm, buf, BUTTON_OK, NULL, TRUE /* wait */);
-      *cancel_save = 1;
-     break;
-    }
-
-    if (*cancel_save)
-    {
-      break;
-    }
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_save_pnm_16(FILE *outfile, FILE *imagefile, Image_info *image_info, GtkProgressBar *progress_bar, int *cancel_save)
-{
-  DBG(DBG_proc, "xsane_save_pnm_16\n");
-
-  *cancel_save = 0;
-
-  xsane_write_pnm_header(outfile, image_info, preferences.save_pnm16_as_ascii);
-
-  if (image_info->colors > 1)
-  {
-    if (preferences.save_pnm16_as_ascii)
-    {
-      xsane_save_pnm_16_ascii_color(outfile, imagefile, image_info, progress_bar, cancel_save);
-    }
-    else
-    {
-      xsane_save_pnm_16_binary_color(outfile, imagefile, image_info, progress_bar, cancel_save);
-    }
-  }
-  else
-  {
-    if (preferences.save_pnm16_as_ascii)
-    {
-      xsane_save_pnm_16_ascii_gray(outfile, imagefile, image_info, progress_bar, cancel_save);
-    }
-    else
-    {
-      xsane_save_pnm_16_binary_gray(outfile, imagefile, image_info, progress_bar, cancel_save);
-    }
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-/* 0=ok, <0=error, 1=canceled */
-int xsane_save_image_as_lineart(char *output_filename, char *input_filename, GtkProgressBar *progress_bar, int *cancel_save)
-{
- FILE *outfile;
- FILE *infile;
- char buf[256];
- Image_info image_info;
-
-  *cancel_save = 0;
-
-  outfile = fopen(output_filename, "wb"); /* b = binary mode for win32 */
-
-  if (outfile == 0)
-  {
-    snprintf(buf, sizeof(buf), "%s `%s': %s", ERR_OPEN_FAILED, output_filename, strerror(errno));
-    xsane_back_gtk_error(buf, TRUE);
-   return -2;
-  }
-
-  infile = fopen(input_filename, "rb"); /* read binary (b for win32) */
-  if (infile == 0)
-  {
-   char buf[256];
-    snprintf(buf, sizeof(buf), "%s `%s': %s", ERR_OPEN_FAILED, input_filename, strerror(errno));
-    xsane_back_gtk_error(buf, TRUE);     
-
-    fclose(outfile);
-    remove(output_filename); /* remove already created output file */
-   return -1;
-  }
-
-  xsane_read_pnm_header(infile, &image_info);
-
-  xsane_save_grayscale_image_as_lineart(outfile, infile, &image_info, progress_bar, cancel_save);
-
-  fclose(infile);
-  fclose(outfile);
-
-  if (*cancel_save) /* remove output file if saving has been canceled */
-  {
-    remove(output_filename);
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
- 
-int xsane_save_image_as_text(char *output_filename, char *input_filename, GtkProgressBar *progress_bar, int *cancel_save)
-{
- char *arg[1000];
- char buf[256];
- int argnr;
- pid_t pid;
- int i;
- int pipefd[2]; /* for progress communication with gocr */
- FILE *ocr_progress = NULL;
- 
-  DBG(DBG_proc, "xsane_save_image_as_text\n");
- 
-  argnr = xsane_parse_options(preferences.ocr_command, arg);
- 
-  arg[argnr++] = strdup(preferences.ocr_inputfile_option);
-  arg[argnr++] = strdup(input_filename);
- 
-  arg[argnr++] = strdup(preferences.ocr_outputfile_option);
-  arg[argnr++] = strdup(output_filename);
- 
-  if (preferences.ocr_use_gui_pipe)
-  {
-    if (!pipe(pipefd)) /* success */
-    {
-      DBG(DBG_info, "xsane_save_image_as_text: created pipe for progress communication\n");
- 
-      arg[argnr++] = strdup(preferences.ocr_gui_outfd_option);
- 
-      snprintf(buf, sizeof(buf),"%d", pipefd[1]);
-      arg[argnr++] = strdup(buf);
-    }
-    else
-    {
-      DBG(DBG_info, "xsane_save_image_as_text: could not create pipe for progress communication\n");
-      pipefd[0] = 0;
-      pipefd[1] = 0;
-    }
-  }
-  else
-  {
-    DBG(DBG_info, "xsane_save_image_as_text: no pipe for progress communication requested\n");
-    pipefd[0] = 0;
-    pipefd[1] = 0;
-  }
- 
-  arg[argnr] = 0;
-
-#ifndef HAVE_OS2_H 
-  pid = fork();
- 
-  if (pid == 0) /* new process */
-  {
-   FILE *ipc_file = NULL;
- 
-    if (xsane.ipc_pipefd[0]) /* did we create the progress pipe? */
-    {
-      close(xsane.ipc_pipefd[0]); /* close reading end of pipe */
-      ipc_file = fdopen(xsane.ipc_pipefd[1], "w");
-    }
- 
-    if (pipefd[0]) /* did we create the progress pipe? */
-    {
-      close(pipefd[0]); /* close reading end of pipe */
-    }
- 
-    DBG(DBG_info, "trying to change user id for new subprocess:\n");
-    DBG(DBG_info, "old effective uid = %d\n", (int) geteuid());
-    setuid(getuid());
-    DBG(DBG_info, "new effective uid = %d\n", (int) geteuid());
- 
- 
-    execvp(arg[0], arg); /* does not return if successfully */
-    DBG(DBG_error, "%s %s\n", ERR_FAILED_EXEC_OCR_CMD, preferences.ocr_command);
- 
-    /* send error message via IPC pipe to parent process */
-    if (ipc_file)
-    {
-      fprintf(ipc_file, "%s %s:\n%s", ERR_FAILED_EXEC_OCR_CMD, preferences.ocr_command, strerror(errno));
-      fflush(ipc_file); /* make sure message is displayed */
-      fclose(ipc_file);
-    }
- 
-    _exit(0); /* do not use exit() here! otherwise gtk gets in trouble */
-  }
-
-#else
-  pid = spawnvp(P_NOWAIT, arg[0], arg);
-  if (pid == -1)
-  {
-   DBG(DBG_error, "%s %s\n", ERR_FAILED_EXEC_OCR_CMD, preferences.ocr_command);
-  }
-#endif
- 
-  if (pipefd[1])
-  {
-    close(pipefd[1]); /* close writing end of pipe */
-    ocr_progress = fdopen(pipefd[0], "r"); /* open reading end of pipe as file */
-  }
- 
-  for (i=0; i<argnr; i++)
-  {
-    free(arg[i]);
-  }
- 
-  if (ocr_progress) /* pipe available */
-  {
-    gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), 0.0);
- 
-    while (!feof(ocr_progress))
-    {
-     int progress, subprogress;
-     float fprogress;
- 
-      fgets(buf, sizeof(buf), ocr_progress);
- 
-      if (!strncmp(preferences.ocr_progress_keyword, buf, strlen(preferences.ocr_progress_keyword)))
-      {
-        sscanf(buf + strlen(preferences.ocr_progress_keyword), "%d %d", &progress, &subprogress);
- 
-        snprintf(buf, sizeof(buf), "%s (%d:%d)", PROGRESS_OCR, progress, subprogress);
-        gtk_progress_set_format_string(GTK_PROGRESS(progress_bar), buf);
- 
-        fprogress = progress / 100.0; 
- 
-        if (fprogress < 0.0)
-        {
-          fprogress = 0.0;
-        }
- 
-        if (fprogress > 11.0)
-        {
-          fprogress = 1.0;
-        }
- 
-        gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), fprogress);
-      }
- 
-      while (gtk_events_pending())
-      {
-        gtk_main_iteration();
-      }
-    }
- 
-    gtk_progress_set_format_string(GTK_PROGRESS(progress_bar), "");
-    gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), 0.0);
-  }
-  else /* no pipe available */
-  {
-    while (pid)
-    {
-     int status = 0;
-     pid_t pid_status = waitpid(pid, &status, WNOHANG);
- 
-      if (pid == pid_status)
-      {
-        pid = 0; /* ok, child process has terminated */
-      }
- 
-      while (gtk_events_pending())
-      {
-        gtk_main_iteration();
-      }
-    }
-  }
- 
-  if (pipefd[0])
-  {
-    fclose(ocr_progress); /* close reading end of pipe */
-  }
-
- return (*cancel_save);
-}                                                                                                                                                      
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-/* save image in destination file format. lineart images that are stored as grayscale image are reduced to lineart! */
-int xsane_save_image_as(char *output_filename, char *input_filename, int output_format, GtkProgressBar *progress_bar, int *cancel_save)
-{
- FILE *outfile;
- FILE *infile;
- char buf[256];
- Image_info image_info;
- char lineart_filename[PATH_MAX];
- int remove_input_file = FALSE;
-  
-  DBG(DBG_proc, "xsane_save_image_as(output_file=%s, input_file=%s, type=%d)\n", output_filename, input_filename, output_format);
-
-  *cancel_save = 0;
-
-  infile = fopen(input_filename, "rb"); /* read binary (b for win32) */
-  if (infile == 0)
-  {
-   char buf[256];
-    snprintf(buf, sizeof(buf), "%s `%s': %s", ERR_OPEN_FAILED, input_filename, strerror(errno));
-    xsane_back_gtk_error(buf, TRUE);     
-
-   return -1;
-  }
-
-  xsane_read_pnm_header(infile, &image_info);
-
-  if ((image_info.reduce_to_lineart) && (output_format != XSANE_PNM))
-  {
-    DBG(DBG_info, "original image is a lineart => reduce to lineart\n");
-    fclose(infile);
-    xsane_back_gtk_make_path(sizeof(lineart_filename), lineart_filename, 0, 0, "xsane-conversion-", xsane.dev_name, ".pbm", XSANE_PATH_TMP);
-
-    snprintf(buf, sizeof(buf), "%s: %s", PROGRESS_PACKING_DATA, output_filename);
-
-    gtk_progress_set_format_string(GTK_PROGRESS(progress_bar), buf);
-    gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), 0.0);
-
-    while (gtk_events_pending())
-    {
-      gtk_main_iteration();
-    }
-
-    xsane_save_image_as_lineart(lineart_filename, input_filename, progress_bar, cancel_save);
-
-    input_filename = lineart_filename;
-    remove_input_file = TRUE;
-
-    infile = fopen(input_filename, "rb"); /* read binary (b for win32) */
-    if (infile == 0)
-    {
-     char buf[256];
-      snprintf(buf, sizeof(buf), "%s `%s': %s", ERR_OPEN_FAILED, input_filename, strerror(errno));
-      xsane_back_gtk_error(buf, TRUE);     
-
-     return -1;
-    }
-
-    xsane_read_pnm_header(infile, &image_info);
-  }
-
-  snprintf(buf, sizeof(buf), "%s: %s", PROGRESS_SAVING_DATA, output_filename);
-
-  gtk_progress_set_format_string(GTK_PROGRESS(progress_bar), buf);
-  gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), 0.0);
-
-  while (gtk_events_pending())
-  {
-    gtk_main_iteration();
-  }
-
-
-#ifdef HAVE_LIBTIFF
-  if (output_format == XSANE_TIFF)		/* routines that want to have filename  for saving */
-  {
-   TIFF *tiffile;
-
-    if (xsane_create_secure_file(output_filename)) /* remove possibly existing symbolic links for security */
-    {
-      snprintf(buf, sizeof(buf), "%s %s %s\n", ERR_DURING_SAVE, ERR_CREATE_SECURE_FILE, output_filename);
-      xsane_back_gtk_error(buf, TRUE);
-     return -1; /* error */
-    }
-
-    tiffile = TIFFOpen(output_filename, "w");
-    if (!tiffile)
-    {
-      snprintf(buf, sizeof(buf), "%s %s %s\n", ERR_DURING_SAVE, ERR_OPEN_FAILED, output_filename);
-      xsane_back_gtk_error(buf, TRUE);
-     return -1; /* error */
-    }
-
-    xsane_save_tiff_page(tiffile, 0, 0, infile, &image_info, preferences.jpeg_quality, progress_bar, cancel_save);
-
-    TIFFClose(tiffile);
-  }
-  else							/* routines that want to have filedescriptor for saving */
-#endif /* HAVE_LIBTIFF */
-  {
-    if (xsane_create_secure_file(output_filename)) /* remove possibly existing symbolic links for security */
-    {
-      snprintf(buf, sizeof(buf), "%s %s %s\n", ERR_DURING_SAVE, ERR_CREATE_SECURE_FILE, output_filename);
-      xsane_back_gtk_error(buf, TRUE);
-     return -1; /* error */
-    }
-
-    outfile = fopen(output_filename, "wb"); /* b = binary mode for win32 */
-
-    if (outfile != 0)
-    {
-      switch(output_format)
-      {
-        case XSANE_PNM:
-          if (image_info.reduce_to_lineart)
-          {
-            xsane_save_grayscale_image_as_lineart(outfile, infile, &image_info, progress_bar, cancel_save);
-          }
-          else
-          {
-            xsane_copy_file(outfile, infile, progress_bar, cancel_save);
-          }
-         break;
-
-#ifdef HAVE_LIBJPEG
-        case XSANE_JPEG:
-          xsane_save_jpeg(outfile, infile, &image_info, preferences.jpeg_quality, progress_bar, cancel_save);
-         break; /* switch format == XSANE_JPEG */
-#endif
-
-#ifdef HAVE_LIBPNG
-#ifdef HAVE_LIBZ
-        case XSANE_PNG:
-          if (image_info.depth <= 8)
-          {
-            xsane_save_png(outfile, infile, &image_info, preferences.png_compression, progress_bar, cancel_save);
-          }
-          else
-          {
-            xsane_save_png_16(outfile, infile, &image_info, preferences.png_compression, progress_bar, cancel_save);
-          }
-         break; /* switch format == XSANE_PNG */
-#endif
-#endif
-
-        case XSANE_PNM16:
-          xsane_save_pnm_16(outfile, infile, &image_info, progress_bar, cancel_save);
-         break; /* switch fomat == XSANE_PNM16 */
-
-        case XSANE_PS: /* save postscript, use original size */
-        { 
-         float imagewidth, imageheight;
-
-           imagewidth  = 72.0 * image_info.image_width/image_info.resolution_x; /* width in 1/72 inch */
-           imageheight = 72.0 * image_info.image_height/image_info.resolution_y; /* height in 1/72 inch */
-
-            xsane_save_ps(outfile, infile,
-                          &image_info,
-                          imagewidth, imageheight,
-                          0, /* paper_left_margin */
-                          0, /* paper_bottom_margin */
-                          (int) imagewidth, /* paper_width */
-                          (int) imageheight, /* paper_height */
-                          0 /* portrait top left */,
-                          preferences.save_ps_flatdecoded,
-                          progress_bar,
-                          cancel_save);
-        }
-        break; /* switch format == XSANE_PS */
-
-        case XSANE_PDF: /* save PDF, use original size */
-        { 
-         float imagewidth, imageheight;
-
-           imagewidth  = 72.0 * image_info.image_width/image_info.resolution_x; /* width in 1/72 inch */
-           imageheight = 72.0 * image_info.image_height/image_info.resolution_y; /* height in 1/72 inch */
-
-            xsane_save_pdf(outfile, infile,
-                          &image_info,
-                          imagewidth, imageheight,
-                          0, /* paper_left_margin */
-                          0, /* paper_bottom_margin */
-                          (int) imagewidth, /* paper_width */
-                          (int) imageheight, /* paper_height */
-                          0 /* portrait top left */,
-                          preferences.save_pdf_flatdecoded,
-                          progress_bar,
-                          cancel_save);
-        }
-        break; /* switch format == XSANE_PDF */
-
-        case XSANE_TEXT: /* save as text using ocr program like gocr/jocr */
-        {
-          xsane_save_image_as_text(output_filename, input_filename, progress_bar, cancel_save);
-        }
-        break; /* switch format == XSANE_TEXT */
-
-        default:
-          snprintf(buf, sizeof(buf),"%s", ERR_UNKNOWN_SAVING_FORMAT);
-          xsane_back_gtk_error(buf, TRUE);
-
-          fclose(outfile);
-          fclose(infile);
-
-          remove(output_filename); /* no usable output: remove output file  */
-
-          if (remove_input_file)
-          {
-            remove(input_filename); /* remove lineart pbm file  */
-          }
-
-          gtk_progress_set_format_string(GTK_PROGRESS(progress_bar), "");
-          gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), 0.0);
-
-          while (gtk_events_pending())
-          {
-            gtk_main_iteration();
-          }
-
-         return -2;
-         break; /* switch format == default */
-      }
-      fclose(outfile);
-    }
-    else
-    {
-      snprintf(buf, sizeof(buf), "%s `%s': %s", ERR_OPEN_FAILED, output_filename, strerror(errno));
-      xsane_back_gtk_error(buf, TRUE);
-
-      fclose(infile);
-
-      if (remove_input_file)
-      {
-        remove(input_filename); /* remove lineart pbm file  */
-      }
-
-      gtk_progress_set_format_string(GTK_PROGRESS(progress_bar), "");
-      gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), 0.0);
-
-      while (gtk_events_pending())
-      {
-        gtk_main_iteration();
-      }
-
-     return -2;
-    }
-  }
-
-  fclose (infile);
-
-  if (remove_input_file)
-  {
-    remove(input_filename); /* remove lineart pbm file  */
-  }
-
-  if (*cancel_save) /* remove output file if saving has been canceled */
-  {
-    remove(output_filename);
-  }
-
-  gtk_progress_set_format_string(GTK_PROGRESS(progress_bar), "");
-  gtk_progress_bar_update(GTK_PROGRESS_BAR(progress_bar), 0.0);
-
-  while (gtk_events_pending())
-  {
-    gtk_main_iteration();
-  }
-
- return (*cancel_save);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-/* ---------------------------------------------------------------------------------------------------------------------- */
-/* ---------------------------------------------------------------------------------------------------------------------- */
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#ifdef HAVE_ANY_GIMP
-static int xsane_decode_devname(const char *encoded_devname, int n, char *buf)
-{
- char *dst, *limit;
- const char *src;
- char ch, val;
-
-  DBG(DBG_proc, "xsane_decode_devname\n");
-
-  limit = buf + n;
-  for (src = encoded_devname, dst = buf; *src; ++dst)
-  {
-    if (dst >= limit)
-    {
-      return -1;
-    }
-
-    ch = *src++;
-    /* don't use the ctype.h macros here since we don't want to allow anything non-ASCII here... */
-    if (ch != '-')
-    {
-      *dst = ch;
-    }
-    else /* decode */
-    {
-      ch = *src++;
-      if (ch == '-')
-      {
-        *dst = ch;
-      }
-      else
-      {
-        if (ch >= 'a' && ch <= 'f')
-        {
-          val = (ch - 'a') + 10;
-        }
-        else
-        {
-          val = (ch - '0');
-        }
-        val <<= 4;
-
-        ch = *src++;
-        if (ch >= 'a' && ch <= 'f')
-        {
-          val |= (ch - 'a') + 10;
-        }
-        else
-        {
-          val |= (ch - '0');
-        }
-
-        *dst = val;
-
-        ++src;    /* simply skip terminating '-' for now... */
-      }
-    }
-  }
-
-  if (dst >= limit)
-  {
-    return -1;
-  }
-
-  *dst = '\0';
- return 0;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static int xsane_encode_devname(const char *devname, int n, char *buf)
-{
- static const char hexdigit[] = "0123456789abcdef";
- char *dst, *limit;
- const char *src;
- char ch;
-
-  DBG(DBG_proc, "xsane_encode_devname\n");
-
-  limit = buf + n;
-  for (src = devname, dst = buf; *src; ++src)
-  {
-    if (dst >= limit)
-    {
-      return -1;
-    }
-
-    ch = *src;
-    /* don't use the ctype.h macros here since we don't want to allow anything non-ASCII here... */
-    if ((ch >= '0' && ch <= '9') || (ch >= 'a' && ch <= 'z') || (ch >= 'A' && ch <= 'Z'))
-    {
-      *dst++ = ch;
-    }
-    else /* encode */
-    {
-      if (dst + 4 >= limit)
-      {
-        return -1;
-      }
-
-      *dst++ = '-';
-      if (ch == '-')
-      {
-        *dst++ = '-';
-      }
-      else
-      {
-        *dst++ = hexdigit[(ch >> 4) & 0x0f];
-        *dst++ = hexdigit[(ch >> 0) & 0x0f];
-        *dst++ = '-';
-      }
-    }
-  }
-
-  if (dst >= limit)
-  {
-    return -1;
-  }
-
-  *dst = '\0';
- return 0;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static void xsane_gimp_query(void)
-{
- static GimpParamDef args[] =
- {
-     {GIMP_PDB_INT32, "run_mode", "Interactive, non-interactive"},
- };
- static GimpParamDef *return_vals = NULL;
- static int nargs = sizeof(args) / sizeof(args[0]);
- static int nreturn_vals = 0;
- char mpath[1024];
- char name[1024];
- size_t len;
- int i, j;
-
-  DBG(DBG_proc, "xsane_gimp_query\n");
-
-  snprintf(name, sizeof(name), "%s", xsane.prog_name);
-#ifdef GIMP_CHECK_VERSION
-# if GIMP_CHECK_VERSION(1,1,9)
-  snprintf(mpath, sizeof(mpath), "%s", XSANE_GIMP_MENU_DIALOG);
-# else
-  snprintf(mpath, sizeof(mpath), "%s", XSANE_GIMP_MENU_DIALOG_OLD);
-# endif
-#else
-  snprintf(mpath, sizeof(mpath), "%s", XSANE_GIMP_MENU_DIALOG_OLD);
-#endif
-  gimp_install_procedure(name,
-			 XSANE_GIMP_INSTALL_BLURB,
-			 XSANE_GIMP_INSTALL_HELP,
-			 XSANE_AUTHOR,
-			 XSANE_COPYRIGHT,
-			 XSANE_DATE,
-			 mpath,
-			 0, /* "RGB, GRAY", */
-			 GIMP_EXTENSION,
-			 nargs, nreturn_vals,
-			 args, return_vals);
-
-  sane_init(&xsane.sane_backend_versioncode, (void *) xsane_authorization_callback);
-  if (SANE_VERSION_MAJOR(xsane.sane_backend_versioncode) != SANE_V_MAJOR)
-  {
-    DBG(DBG_error0, "\n\n"
-                    "%s %s:\n"
-                    "  %s\n"
-                    "  %s %d\n"
-                    "  %s %d\n"
-                    "%s\n\n",
-                     xsane.prog_name, ERR_ERROR,
-                     ERR_MAJOR_VERSION_NR_CONFLICT,
-                     ERR_XSANE_MAJOR_VERSION, SANE_V_MAJOR,
-                     ERR_BACKEND_MAJOR_VERSION, SANE_VERSION_MAJOR(xsane.sane_backend_versioncode),
-                     ERR_PROGRAM_ABORTED);      
-    return;
-  }
-
-  sane_get_devices(&xsane.devlist, SANE_FALSE);
-
-  for (i = 0; xsane.devlist[i]; ++i)
-  {
-    snprintf(name, sizeof(name), "%s-", xsane.prog_name);
-    if (xsane_encode_devname(xsane.devlist[i]->name, sizeof(name) - 6, name + 6) < 0)
-    {
-      continue;	/* name too long... */
-    }
-
-#ifdef GIMP_CHECK_VERSION
-# if GIMP_CHECK_VERSION(1,1,9)
-    snprintf(mpath, sizeof(mpath), "%s", XSANE_GIMP_MENU);
-# else
-    snprintf(mpath, sizeof(mpath), "%s", XSANE_GIMP_MENU_OLD);
-# endif
-#else
-    snprintf(mpath, sizeof(mpath), "%s", XSANE_GIMP_MENU_OLD);
-#endif
-    len = strlen(mpath);
-    for (j = 0; xsane.devlist[i]->name[j]; ++j)
-    {
-      if (xsane.devlist[i]->name[j] == '/')
-      {
-        mpath[len++] = '\'';
-      }
-      else
-      {
-        mpath[len++] = xsane.devlist[i]->name[j];
-      }
-    }
-    mpath[len++] = '\0';
-
-    gimp_install_procedure(name,
-                           XSANE_GIMP_INSTALL_BLURB,
-                           XSANE_GIMP_INSTALL_HELP,
-                           XSANE_AUTHOR,
-                           XSANE_COPYRIGHT,
-                           XSANE_DATE,
-                           mpath,
-                           0, /* "RGB, GRAY", */
-                           GIMP_EXTENSION,
-                           nargs, nreturn_vals,
-                           args, return_vals);
-  }
-
-  sane_exit();
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#ifdef HAVE_GIMP_2
-static void xsane_gimp_run(const gchar *name, gint nparams, const GimpParam *param, gint *nreturn_vals, GimpParam **return_vals)
-{
- GimpRunMode run_mode;
-#else /* GIMP-1.x */
-static void xsane_gimp_run(char *name, int nparams, GimpParam *param, int *nreturn_vals, GimpParam **return_vals)
-{
- GimpRunModeType run_mode;
-#endif
-
- static GimpParam values[2];
- char devname[1024];
- char *args[2];
- int nargs;
-
-  DBG(DBG_proc, "xsane_gimp_run\n");
-
-  run_mode = param[0].data.d_int32;
-  xsane.mode = XSANE_GIMP_EXTENSION;
-  xsane.xsane_mode = XSANE_SAVE;
-
-  *nreturn_vals = 1;
-  *return_vals = values;
-
-  values[0].type = GIMP_PDB_STATUS;
-  values[0].data.d_status = GIMP_PDB_CALLING_ERROR;
-
-  nargs = 0;
-  args[nargs++] = "xsane";
-
-  xsane.selected_dev = -1;
-  if (strncmp(name, "xsane-", 6) == 0)
-  {
-    if (xsane_decode_devname(name + 6, sizeof(devname), devname) < 0)
-    {
-      return;			/* name too long */
-    }
-    args[nargs++] = devname;
-  }
-
-  switch (run_mode)
-  {
-    case GIMP_RUN_INTERACTIVE:
-#ifdef HAVE_GIMP_2
-      gimp_extension_ack();
-#endif
-      xsane_interface(nargs, args);
-      values[0].data.d_status = GIMP_PDB_SUCCESS;
-      break;
-
-    case GIMP_RUN_NONINTERACTIVE:
-      /*  Make sure all the arguments are there!  */
-      break;
-
-    case GIMP_RUN_WITH_LAST_VALS:
-      /*  Possibly retrieve data  */
-      break;
-
-    default:
-      break;
-  }
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void null_print_func(gchar *msg)
-{
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-int xsane_transfer_to_gimp(char *input_filename, GtkProgressBar *progress_bar, int *cancel_save)
-{
- int remaining;
- size_t tile_size;
- GimpImageType image_type    = GIMP_GRAY;
- GimpImageType drawable_type = GIMP_GRAY_IMAGE;
- gint32 layer_ID;
- gint32 image_ID;
- GimpDrawable *drawable;
- guchar *tile;
- GimpPixelRgn region;
- unsigned tile_offset;
- int i, x, y;
- Image_info image_info;
- FILE *imagefile;
-
-  DBG(DBG_info, "xsane_transer_to_gimp\n");
-
-  *cancel_save = 0;
-
-  imagefile = fopen(input_filename, "rb"); /* read binary (b for win32) */
-  if (imagefile == 0)
-  {
-   char buf[256];
-    snprintf(buf, sizeof(buf), "%s `%s': %s", ERR_OPEN_FAILED, input_filename, strerror(errno));
-    xsane_back_gtk_error(buf, TRUE);     
-
-   return -1;
-  }
-
-  xsane_read_pnm_header(imagefile, &image_info);
-
-  x = 0;
-  y = 0; 
-  tile_offset = 0;
-  tile_size = image_info.image_width * gimp_tile_height();
-
-  if (image_info.colors == 3) /* RGB */
-  {
-    tile_size *= 3;  /* 24 bits/pixel RGB */
-    image_type    = GIMP_RGB;
-    drawable_type = GIMP_RGB_IMAGE;
-  }
-  else if (image_info.colors == 4) /* RGBA */
-  {
-    tile_size *= 4;  /* 32 bits/pixel RGBA */
-    image_type    = GIMP_RGB;
-    drawable_type = GIMP_RGBA_IMAGE; /* interpret infrared as alpha */
-  }
-  /* colors == 0/1 is predefined */
- 
-  image_ID = gimp_image_new(image_info.image_width, image_info.image_height, image_type);
- 
-/* the following is supported since gimp-1.1.? */
-#ifdef GIMP_HAVE_RESOLUTION_INFO
-  if (image_info.resolution_x > 0)
-  {
-    gimp_image_set_resolution(image_ID, image_info.resolution_x, image_info.resolution_y);
-  }
-/*          gimp_image_set_unit(image_ID, unit?); */
-#endif
- 
-  layer_ID = gimp_layer_new(image_ID, "Background", image_info.image_width, image_info.image_height, drawable_type, 100.0, GIMP_NORMAL_MODE);
-  gimp_image_add_layer(image_ID, layer_ID, 0);
-  drawable = gimp_drawable_get(layer_ID);
-  gimp_pixel_rgn_init(&region, drawable, 0, 0, drawable->width, drawable->height, TRUE, FALSE);
-  tile = g_new(guchar, tile_size);
- 
-
-  if (image_info.colors == 1) /* gray */
-  {
-    switch (image_info.depth)
-    {
-      case 1: /* 1 bit gray => conversion to 8 bit gray */
-        for (i = 0; i < ( (image_info.image_width + 7) / 8) * image_info.image_height; ++i)
-        {
-         u_char mask;
-         int j;
-
-          mask = fgetc(imagefile);
-          for (j = 7; j >= 0; --j)
-          {
-            u_char gl = (mask & (1 << j)) ? 0x00 : 0xff;
-            tile[tile_offset++] = gl;
-
-            x++;
-
-            if (x >= image_info.image_width)
-            {
-             int tile_height = gimp_tile_height();
-
-              x = 0;
-              y++;
-
-              if (y % tile_height == 0)
-              {
-                gimp_pixel_rgn_set_rect(&region, tile, 0, y - tile_height, image_info.image_width, tile_height);
-                tile_offset = 0;
-              }
-
-              gtk_progress_bar_update(progress_bar, (float) y / image_info.image_height); /* update progress bar */
-              while (gtk_events_pending())
-              {
-                gtk_main_iteration();
-              }
-
-              break; /* leave for j loop */
-            }
-          }
-
-          if (*cancel_save)
-          {
-            break;
-          }
-        }
-       break; /* leave switch depth 1 */
-
-      case 8: /* 8 bit gray */
-      case 16: /* 16 bit gray already has been reduced to 8 bit */
-        for (i = 0; i < image_info.image_width * image_info.image_height; ++i)
-        {
-          tile[tile_offset++] = fgetc(imagefile);
-          x++;
-
-          if (x >= image_info.image_width)
-          {
-           int tile_height = gimp_tile_height();
-
-            x = 0;
-            y++;
-
-            if (y % tile_height == 0)
-            {
-              gimp_pixel_rgn_set_rect(&region, tile, 0, y - tile_height, image_info.image_width, tile_height);
-              tile_offset = 0;
-            }
-
-            gtk_progress_bar_update(progress_bar, (float) y / image_info.image_height); /* update progress bar */
-            while (gtk_events_pending())
-            {
-              gtk_main_iteration();
-            }
-          }
-
-          if (*cancel_save)
-          {
-            break;
-          }
-        }
-       break; /* leave switch depth */
-
-      default: /* bad depth */
-       break; /* default */
-    }
-  }
-  else if (image_info.colors == 3) /* RGB */
-  {
-    switch (image_info.depth)
-    {
-      case 8: /* 8 bit RGB */
-      case 16: /* 16 bit RGB already has been reduced to 8 bit */
-        for (i = 0; i < image_info.image_width * image_info.image_height*3; ++i)
-        {
-          tile[tile_offset++] = fgetc(imagefile);
-          if (tile_offset % 3 == 0)
-          {
-            x++;
-
-            if (x >= image_info.image_width)
-            {
-             int tile_height = gimp_tile_height();
-
-              x = 0;
-              y++;
-
-              if (y % tile_height == 0)
-              {
-                gimp_pixel_rgn_set_rect(&region, tile, 0, y - tile_height, image_info.image_width, tile_height);
-                tile_offset = 0;
-              }
-
-              gtk_progress_bar_update(progress_bar, (float) y / image_info.image_height); /* update progress bar */
-              while (gtk_events_pending())
-              {
-                gtk_main_iteration();
-              }
-            }
-          }
-
-          if (*cancel_save)
-          {
-            break;
-          }
-        }
-       break; /* case 8 */
-
-      default: /* bad depth */
-       break; /* default */
-    }
-  }
-#ifdef SUPPORT_RGBA
-  else if (image_info.colors == 4) /* RGBA */
-  {
-   int i;
-
-    switch (image_info.depth)
-    {
-      case 8: /* 8 bit RGBA */
-      case 16: /* 16 bit RGBA already has been reduced to 8 bit */
-        for (i = 0; i < image_info.image_width * image_info.image_height * 4; ++i)
-        {
-          tile[tile_offset++] = fgetc(imagefile);
-          if (tile_offset % 4 == 0)
-          {
-            x++;
-
-            if (x >= image_info.image_width)
-            {
-             int tile_height = gimp_tile_height();
-
-              x = 0;
-              y++;
-
-              if (y % tile_height == 0)
-              {
-                gimp_pixel_rgn_set_rect(&region, tile, 0, y - tile_height, image_info.image_width, tile_height);
-                tile_offset = 0;
-              }
-
-              gtk_progress_bar_update(progress_bar, (float) y / image_info.image_height); /* update progress bar */
-              while (gtk_events_pending())
-              {
-                gtk_main_iteration();
-              }
-            }
-          }
-
-          if (*cancel_save)
-          {
-            break;
-          }
-        }
-       break;
-
-      default: /* bad depth */
-       break;
-    }
-  }
-#endif
-
-/* scan_done part */
-  if (y > image_info.image_height)
-  {
-    y = image_info.image_height;
-  }
- 
-  remaining = y % gimp_tile_height();
-
-  if (remaining)
-  {
-    gimp_pixel_rgn_set_rect(&region, tile, 0, y - remaining, image_info.image_width, remaining);
-  }
-
-  gimp_drawable_flush(drawable);
-  gimp_display_new(image_ID);
-  gimp_drawable_detach(drawable);
-  g_free(tile);
-  tile = 0;
-
-  fclose(imagefile);
-
- return 0;
-}
-#endif /* HAVE_ANY_GIMP */ 
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-/* ---------------------------------------------------------------------------------------------------------------------- */
-/* ---------------------------------------------------------------------------------------------------------------------- */
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-#ifdef XSANE_ACTIVATE_MAIL
-
-/* character base of base64 coding */
-static const char base64[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-static void write_3chars_as_base64(unsigned char c1, unsigned char c2, unsigned char c3, int pads, int fd_socket)
-{
- char buf[4];
-
-  buf[0] = base64[c1>>2]; /* wirte bits 7-2 of first char */
-  buf[1] = base64[((c1 & 0x3)<< 4) | ((c2 & 0xF0) >> 4)]; /* write bits 1,0 of first and bits 7-4 of second char */
-
-  if (pads == 2) /* only one byte used */
-  {
-    buf[2] = '='; /* char not used */
-    buf[3] = '='; /* char not used */
-  }
-  else if (pads) /* only two bytes used */
-  {
-    buf[2] = base64[((c2 & 0xF) << 2)]; /* write bits 3-0 of second char */
-    buf[3] = '='; /* char not used */
-  }
-  else
-  {
-    buf[2] = base64[((c2 & 0xF) << 2) | ((c3 & 0xC0) >>6)]; /* write bits 3-0 of second and bits 7,6 of third char */
-    buf[3] = base64[c3 & 0x3F]; /* write bits 5-0 of third char as lsb */
-  }
-
-  write(fd_socket, buf, 4);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void write_base64(int fd_socket, FILE *infile) 
-{
- int c1, c2, c3;
- int pos = 0;
-
-  while ((c1 = getc(infile)) != EOF)
-  {
-    c2 = getc(infile);
-    if (c2 == EOF)
-    {
-      write_3chars_as_base64(c1, 0, 0, 2, fd_socket);
-    }
-    else
-    {
-      c3 = getc(infile);
-      if (c3 == EOF)
-      {
-        write_3chars_as_base64(c1, c2, 0, 1, fd_socket);
-      }
-      else
-      {
-        write_3chars_as_base64(c1, c2, c3, 0, fd_socket);
-      }
-    }
-
-    pos += 4;
-    if (pos > 71)
-    {
-      write(fd_socket, "\n", 1);
-      
-      pos = 0;
-    }
-
-    xsane.mail_progress_bytes += 3;
-    if ((int)  ((xsane.mail_progress_bytes * 100) / xsane.mail_progress_size) != (int) (xsane.mail_progress_val * 100))
-    {
-      xsane.mail_progress_val = (float) xsane.mail_progress_bytes / xsane.mail_progress_size;
-      xsane_front_gtk_mail_project_update_lockfile_status();
-    }
-  }
-
-  if (pos)
-  {
-    write(fd_socket, "\n", 1);
-  }
-
-  xsane.mail_progress_val = 1.0;
-  xsane_front_gtk_mail_project_update_lockfile_status();
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void write_mail_header(int fd_socket, char *from, char *reply_to, char *to, char *subject, char *boundary, int related)
-{
- char buf[1024];
-
-  snprintf(buf, sizeof(buf), "From: %s\n", from);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Reply-To: %s\n", reply_to);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "To: %s\n", to);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Subject: %s\n", subject);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "MIME-Version: 1.0\n");
-  write(fd_socket, buf, strlen(buf));
-
-  if (related) /* related means that we need a special link in the html part to display the image */
-  {
-    snprintf(buf, sizeof(buf), "Content-Type: multipart/related;\n");
-    write(fd_socket, buf, strlen(buf));
-  }
-  else
-  {
-    snprintf(buf, sizeof(buf), "Content-Type: multipart/mixed;\n");
-    write(fd_socket, buf, strlen(buf));
-  }
-
-  snprintf(buf, sizeof(buf), " boundary=\"%s\"\n\n", boundary);
-  write(fd_socket, buf, strlen(buf));
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void write_mail_footer(int fd_socket, char *boundary)
-{
- char buf[1024];
-
-  snprintf(buf, sizeof(buf), "--%s--\n", boundary);
-  write(fd_socket, buf, strlen(buf));
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void write_mail_mime_ascii(int fd_socket, char *boundary)
-{
- char buf[1024];
-
-  snprintf(buf, sizeof(buf), "--%s\n", boundary);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Content-Type: text/plain;\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "        charset=\"iso-8859-1\"\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Content-Transfer-Encoding: 8bit\n\n");
-  write(fd_socket, buf, strlen(buf));
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void write_mail_mime_html(int fd_socket, char *boundary)
-{
- char buf[1024];
-
-  snprintf(buf, sizeof(buf), "--%s\n", boundary);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Content-Type: text/html;\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "        charset=\"us-ascii\"\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Content-Transfer-Encoding: 7bit\n\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "<!doctype html public \"-//w3c//dtd html 4.0 transitional//en\">\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "<html>\n");
-  write(fd_socket, buf, strlen(buf));
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void write_mail_attach_image(int fd_socket, char *boundary, char *content_id, char *content_type, FILE *infile, char *filename)
-{
- char buf[1024];
-
-  snprintf(buf, sizeof(buf), "--%s\n", boundary);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Content-Type: %s\n", content_type);
-  write(fd_socket, buf, strlen(buf));
-
-  if (content_id)
-  {
-    snprintf(buf, sizeof(buf), "Content-ID: <%s>\n", content_id);
-    write(fd_socket, buf, strlen(buf));
-  }
-
-  snprintf(buf, sizeof(buf), "Content-Transfer-Encoding: base64\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Content-Disposition: inline;\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "        filename=\"%s\"\n", filename);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "\n");
-  write(fd_socket, buf, strlen(buf));
-
-  write_base64(fd_socket, infile);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-void write_mail_attach_file(int fd_socket, char *boundary, FILE *infile, char *filename)
-{
- char buf[1024];
-
-  snprintf(buf, sizeof(buf), "--%s\n", boundary);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Content-Type: application/octet-stream\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "        name=\"%s\"\n", filename);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Content-Transfer-Encoding: base64\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "Content-Disposition: attachment;\n");
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "        filename=\"%s\"\n", filename);
-  write(fd_socket, buf, strlen(buf));
-
-  snprintf(buf, sizeof(buf), "\n");
-  write(fd_socket, buf, strlen(buf));
-
-  write_base64(fd_socket, infile);
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-/* returns fd_socket if sucessfull, < 0 when error occured */
-int open_socket(char *server, int port)
-{
- int fd_socket;
- struct sockaddr_in sin;
- struct hostent *he;
-
-  he = gethostbyname(server);
-  if (!he)
-  {
-    DBG(DBG_error, "open_socket: Could not get hostname of \"%s\"\n", server);
-   return -1;
-  }
-  else
-  {
-    DBG(DBG_info, "open_socket: connecting to \"%s\" = %d.%d.%d.%d\n",
-        he->h_name,
-        (unsigned char) he->h_addr_list[0][0],
-        (unsigned char) he->h_addr_list[0][1],
-        (unsigned char) he->h_addr_list[0][2],
-        (unsigned char) he->h_addr_list[0][3]);
-  }
- 
-  if (he->h_addrtype != AF_INET)
-  {
-    DBG(DBG_error, "open_socket: Unknown address family: %d\n", he->h_addrtype);
-   return -1;
-  }
-
-  fd_socket = socket(AF_INET, SOCK_STREAM, 0);
-
-  if (fd_socket < 0)
-  {
-    DBG(DBG_error, "open_socket: Could not create socket: %s\n", strerror(errno));
-   return -1;
-  }
-
-/*  setsockopt (dev->ctl, level, TCP_NODELAY, &on, sizeof (on)); */
-
-  sin.sin_port = htons(port);
-  sin.sin_family = AF_INET;
-  memcpy(&sin.sin_addr, he->h_addr_list[0], he->h_length);
-
-  if (connect(fd_socket, &sin, sizeof(sin)))
-  {
-    DBG(DBG_error, "open_socket: Could not connect with port %d of socket: %s\n", ntohs(sin.sin_port), strerror(errno));
-   return -1;
-  }
-
-  DBG(DBG_info, "open_socket: Connected with port %d\n", ntohs(sin.sin_port));
-
- return fd_socket;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-/* returns 0 if success */
-/* not only a write routine, also reads data */
-int pop3_login(int fd_socket, char *user, char *passwd)
-{
- char buf[1024];
- int len;
-
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-
-  snprintf(buf, sizeof(buf), "USER %s\r\n", user);
-  DBG(DBG_info2, "> USER xxx\n");
-  write(fd_socket, buf, strlen(buf));
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-  if (buf[0] != '+')
-  {
-    return -1;
-  }
-
-  snprintf(buf, sizeof(buf), "PASS %s\r\n", passwd);
-  DBG(DBG_info2, "> PASS xxx\n");
-  write(fd_socket, buf, strlen(buf));
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-  if (buf[0] != '+')
-  {
-    return -1;
-  }
-
-  snprintf(buf, sizeof(buf), "QUIT\r\n");
-  DBG(DBG_info2, "> QUIT\n");
-  write(fd_socket, buf, strlen(buf));
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-
- return 0;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-/* not only a write routine, also reads data */
-/* returns -1 on error, 0 when ok */
-int write_smtp_header(int fd_socket, char *from, char *to)
-{
- char buf[1024];
- int len;
-
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-
-  snprintf(buf, sizeof(buf), "helo localhost\r\n");
-  DBG(DBG_info2, "> %s", buf);
-  write(fd_socket, buf, strlen(buf));
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-
-  if (buf[0] != '2')
-  {
-    DBG(DBG_info, "=> error\n");
-
-    if (xsane.mail_status)
-    {
-      free(xsane.mail_status);
-    }
-    xsane.mail_status = strdup(TEXT_MAIL_STATUS_SMTP_CONNECTION_FAILED);
-    xsane_front_gtk_mail_project_update_lockfile_status();
-   return -1;
-  }
-
-  snprintf(buf, sizeof(buf), "MAIL FROM: %s\r\n", from);
-  DBG(DBG_info2, "> %s", buf);
-  write(fd_socket, buf, strlen(buf));
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-
-  if (buf[0] != '2')
-  {
-    DBG(DBG_info, "=> error\n");
-
-    if (xsane.mail_status)
-    {
-      free(xsane.mail_status);
-    }
-    xsane.mail_status = strdup(TEXT_MAIL_STATUS_SMTP_ERR_FROM);
-    xsane_front_gtk_mail_project_update_lockfile_status();
-   return -1;
-  }
-  
-
-  snprintf(buf, sizeof(buf), "RCPT TO: %s\r\n", to);
-  DBG(DBG_info2, "> %s", buf);
-  write(fd_socket, buf, strlen(buf));
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-
-  if (buf[0] != '2')
-  {
-    DBG(DBG_info, "=> error\n");
-
-    if (xsane.mail_status)
-    {
-      free(xsane.mail_status);
-    }
-    xsane.mail_status = strdup(TEXT_MAIL_STATUS_SMTP_ERR_RCPT);
-    xsane_front_gtk_mail_project_update_lockfile_status();
-   return -1;
-  }
-
-  snprintf(buf, sizeof(buf), "DATA\r\n");
-  DBG(DBG_info2, "> %s", buf);
-  write(fd_socket, buf, strlen(buf));
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-
-  if ((buf[0] != '2') && (buf[0] != '3'))
-  {
-    DBG(DBG_info, "=> error\n");
-
-    if (xsane.mail_status)
-    {
-      free(xsane.mail_status);
-    }
-    xsane.mail_status = strdup(TEXT_MAIL_STATUS_SMTP_ERR_DATA);
-    xsane_front_gtk_mail_project_update_lockfile_status();
-   return -1;
-  }
-
- return 0;
-}
-
-/* ---------------------------------------------------------------------------------------------------------------------- */
-
-/* not only a write routine, also reads data */
-int write_smtp_footer(int fd_socket)
-{
- char buf[1024];
- int len;
-
-  snprintf(buf, sizeof(buf), "\r\n.\r\n");
-  DBG(DBG_info2, "> %s", buf);
-  write(fd_socket, buf, strlen(buf));
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-
-  snprintf(buf, sizeof(buf), "QUIT\r\n");
-  DBG(DBG_info2, "> %s", buf);
-  write(fd_socket, buf, strlen(buf));
-  len = read(fd_socket, buf, sizeof(buf));
-  if (len >= 0)
-  {
-    buf[len] = 0;
-  }
-  DBG(DBG_info2, "< %s\n", buf);
-
- return 0;
-}
-
-#endif
-/* ---------------------------------------------------------------------------------------------------------------------- */