summaryrefslogtreecommitdiff
path: root/backend/teco2.c
diff options
context:
space:
mode:
authorJörg Frings-Fürst <debian@jff-webhosting.net>2014-10-06 14:00:40 +0200
committerJörg Frings-Fürst <debian@jff-webhosting.net>2014-10-06 14:00:40 +0200
commit6e9c41a892ed0e0da326e0278b3221ce3f5713b8 (patch)
tree2e301d871bbeeb44aa57ff9cc070fcf3be484487 /backend/teco2.c
Initial import of sane-backends version 1.0.24-1.2
Diffstat (limited to 'backend/teco2.c')
-rw-r--r--backend/teco2.c3455
1 files changed, 3455 insertions, 0 deletions
diff --git a/backend/teco2.c b/backend/teco2.c
new file mode 100644
index 0000000..9bc8bf4
--- /dev/null
+++ b/backend/teco2.c
@@ -0,0 +1,3455 @@
+/* sane - Scanner Access Now Easy.
+
+ Copyright (C) 2002-2003 Frank Zago (sane at zago dot net)
+ Copyright (C) 2003-2008 Gerard Klaver (gerard at gkall dot hobby dot nl)
+
+ This file is part of the SANE 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., 59 Temple Place - Suite 330, Boston,
+ MA 02111-1307, USA.
+
+ As a special exception, the authors of SANE give permission for
+ additional uses of the libraries contained in this release of SANE.
+
+ The exception is that, if you link a SANE library with other files
+ to produce an executable, this does not by itself cause the
+ resulting executable to be covered by the GNU General Public
+ License. Your use of that executable is in no way restricted on
+ account of linking the SANE library code into it.
+
+ This exception does not, however, invalidate any other reasons why
+ the executable file might be covered by the GNU General Public
+ License.
+
+ If you submit changes to SANE to the maintainers to be included in
+ a subsequent release, you agree by submitting the changes that
+ those changes may be distributed with this exception intact.
+
+ If you write modifications of your own for SANE, it is your choice
+ whether to permit this exception to apply to your modifications.
+ If you do not wish that, delete this exception notice.
+*/
+
+/*
+ $Id$
+ TECO scanner VM3575, VM656A, VM6575, VM6586, VM356A, VM3564
+ update 2003/02/14, Patch for VM356A Gerard Klaver
+ update 2003/03/19, traces, tests VM356A Gerard Klaver, Michael Hoeller
+ update 2003/07/19, white level calibration, color modes VM3564, VM356A, VM3575
+ Gerard Klaver, Michael Hoeller
+ update 2004/01/15, white level , red, green, and blue calibration and
+ leave out highest and lowest value and then divide
+ VM3564, VM356A and VM3575: Gerard Klaver
+ update 2004/08/04, white level, red, green and blue calibration for the VM6575
+ changed default SANE_TECO_CAL_ALGO to 1 for VM3564 and VM6575
+ preview value changed to 75 dpi for VM6575
+ leave out highest and lowest value and then divide
+ VM656A, VM6586
+ update 2004/08/05, use of SANE_VALUE_SCAN_MODE_LINEART, _GRAY, and _COLOR,
+ changed use of %d to %ld (when bytes values are displayed)
+ update 2005/03/04, use of __sane_unused__
+ update 2005/07/29. Removed using teco_request_sense (dev) routine for VM3564
+ update 2008/01/12, Update teco_request_sense routine due to no
+ init value for size.
+*/
+
+/*--------------------------------------------------------------------------*/
+
+#define BUILD 10 /* 2008/01/12 */
+#define BACKEND_NAME teco2
+#define TECO2_CONFIG_FILE "teco2.conf"
+
+/*--------------------------------------------------------------------------*/
+
+#include "../include/sane/config.h"
+
+#include <errno.h>
+#include <fcntl.h>
+#include <limits.h>
+#include <signal.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/wait.h>
+#include <unistd.h>
+
+#include "../include/sane/sane.h"
+#include "../include/sane/sanei.h"
+#include "../include/sane/saneopts.h"
+#include "../include/sane/sanei_scsi.h"
+#include "../include/sane/sanei_debug.h"
+#include "../include/sane/sanei_backend.h"
+#include "../include/sane/sanei_config.h"
+#include "../include/lassert.h"
+
+#include "teco2.h"
+
+/* This is used to debug the backend without having the real hardware. */
+#undef sim
+#ifdef sim
+#define sanei_scsi_cmd2(a, b, c, d, e, f, g) SANE_STATUS_GOOD
+#define sanei_scsi_open(a, b, c, d) 0
+#define sanei_scsi_cmd(a, b, c, d, e) SANE_STATUS_GOOD
+#define sanei_scsi_close(a) SANE_STATUS_GOOD
+#endif
+
+/* For debugging purposes: output a stream straight out from the
+ * scanner without reordering the colors, 0=normal, 1 = raw. */
+static int raw_output = 0;
+
+/*--------------------------------------------------------------------------*/
+
+/* Lists of possible scan modes. */
+static SANE_String_Const scan_mode_list[] = {
+ SANE_VALUE_SCAN_MODE_LINEART,
+ SANE_VALUE_SCAN_MODE_GRAY,
+ SANE_VALUE_SCAN_MODE_COLOR,
+ NULL
+};
+
+/*--------------------------------------------------------------------------*/
+
+/* List of color dropout. */
+static SANE_String_Const filter_color_list[] = {
+ "Red",
+ "Green",
+ "Blue",
+ NULL
+};
+static const int filter_color_val[] = {
+ 0,
+ 1,
+ 2
+};
+
+/*--------------------------------------------------------------------------*/
+
+/* List of dithering options. */
+static SANE_String_Const dither_list[] = {
+ "Line art",
+ "2x2",
+ "3x3",
+ "4x4 bayer",
+ "4x4 smooth",
+ "8x8 bayer",
+ "8x8 smooth",
+ "8x8 horizontal",
+ "8x8 vertical",
+ NULL
+};
+static const int dither_val[] = {
+ 0x00,
+ 0x01,
+ 0x02,
+ 0x03,
+ 0x04,
+ 0x05,
+ 0x06,
+ 0x07,
+ 0x08
+};
+
+/*--------------------------------------------------------------------------*/
+
+static const SANE_Range threshold_range = {
+ 0, /* minimum */
+ 255, /* maximum */
+ 0 /* quantization */
+};
+
+/*--------------------------------------------------------------------------*/
+
+static const SANE_Range red_level_range = {
+ 0, /* minimum */
+ 64, /* maximum */
+ 1 /* quantization */
+};
+
+/*--------------------------------------------------------------------------*/
+
+static const SANE_Range green_level_range = {
+ 0, /* minimum */
+ 64, /* maximum */
+ 1 /* quantization */
+};
+
+/*--------------------------------------------------------------------------*/
+
+static const SANE_Range blue_level_range = {
+ 0, /* minimum */
+ 64, /* maximum */
+ 1 /* quantization */
+};
+
+/*--------------------------------------------------------------------------*/
+
+/* Gamma range */
+static const SANE_Range gamma_range = {
+ 0, /* minimum */
+ 255, /* 255 maximum */
+ 0 /* quantization */
+};
+
+/*--------------------------------------------------------------------------*/
+
+static const struct dpi_color_adjust vm3564_dpi_color_adjust[] = {
+
+ /*dpi, color sequence R G or B, 0 (-) or 1 (+) color skewing, lines skewing */
+ {25, 1, 0, 2, 0, 0},
+ {50, 1, 2, 0, 0, 1},
+ {75, 1, 0, 2, 1, 1},
+ {150, 1, 0, 2, 1, 2},
+ {225, 1, 0, 2, 1, 3},
+ {300, 1, 0, 2, 1, 4},
+ {375, 1, 0, 2, 1, 5},
+ {450, 1, 0, 2, 1, 6},
+ {525, 1, 0, 2, 1, 7},
+ {600, 1, 0, 2, 1, 8},
+ /* must be the last entry */
+ {0, 0, 0, 0, 0, 0}
+};
+
+/* Used for VM356A only */
+
+static const struct dpi_color_adjust vm356a_dpi_color_adjust[] = {
+
+ /* All values with ydpi > 300 result in a wrong proportion for */
+ /* the scan. The proportion can be adjusted with the following */
+ /* command: convert -geometry (dpi/max_xdpi * 100%)x100% */
+ /* max_xdpi is for the vm356a constant with 300 dpi */
+ /* e.g. 600dpi adjust with: convert -geometry 200%x100% */
+
+ /* All resolutions in increments of 25 are testede, only the shown */
+ /* bring back good results */
+
+ /*dpi, color sequence R G or B, 0 (-) or 1 (+) color skewing, lines skewing */
+ {25, 1, 0, 2, 0, 0},
+ {50, 1, 2, 0, 0, 1},
+ {75, 1, 0, 2, 1, 1},
+ {150, 1, 0, 2, 1, 2},
+ {225, 1, 0, 2, 1, 3},
+ {300, 1, 0, 2, 1, 4},
+ {375, 1, 0, 2, 1, 5},
+ {450, 1, 0, 2, 1, 6},
+ {525, 1, 0, 2, 1, 7},
+ {600, 1, 0, 2, 1, 8},
+
+ /* must be the last entry */
+ {0, 0, 0, 0, 0, 0}
+};
+
+/* Used for the VM3575 only */
+
+static const struct dpi_color_adjust vm3575_dpi_color_adjust[] = {
+
+ /* All values with ydpi > 300 result in a wrong proportion for */
+ /* the scan. The proportion can be adjusted with the following */
+ /* command: convert -geometry (dpi/max_xdpi * 100%)x100% */
+ /* max_xdpi is for the vm3575 constant with 300 dpi */
+ /* e.g. 600dpi adjust with: convert -geometry 200%x100% */
+
+ {50, 2, 0, 1, 1, 1},
+ {60, 2, 1, 0, 0, 2},
+/* {75, 2, 0, 1, 1, 2}, NOK, effects in scan, also with twain driver*/
+ {100, 2, 1, 0, 0, 3},
+ {120, 2, 0, 1, 1, 3},
+ {150, 2, 0, 1, 1, 4},
+/* {180, 2, 1, 0, 0, 4}, NOK, skewing problem*/
+ {225, 2, 0, 1, 1, 6},
+ {300, 2, 0, 1, 1, 8},
+ {375, 2, 0, 1, 1, 10},
+ {450, 2, 0, 1, 1, 12},
+ {525, 2, 0, 1, 1, 14},
+ {600, 2, 0, 1, 1, 16},
+
+ /* must be the last entry */
+ {0, 0, 0, 0, 0, 0}
+};
+
+static const struct dpi_color_adjust vm656a_dpi_color_adjust[1] = {
+ {0, 0, 1, 2, 0, 0}
+};
+
+static const struct dpi_color_adjust vm6575_dpi_color_adjust[] = {
+ {75, 1, 0, 2, 1, 1},
+ {150, 1, 0, 2, 1, 2},
+ {300, 1, 0, 2, 1, 4},
+ {600, 1, 0, 2, 1, 8},
+};
+
+static const struct dpi_color_adjust vm6586_dpi_color_adjust[] = {
+ {25, 1, 0, 2, 1, 0},
+ {40, 1, 0, 2, 1, 0},
+ {50, 1, 0, 2, 1, 0},
+ {75, 1, 2, 0, 0, 1},
+ {150, 1, 0, 2, 1, 1},
+ {160, 1, 0, 2, 1, 1},
+ {175, 1, 0, 2, 1, 1},
+ {180, 1, 0, 2, 1, 1},
+ {300, 1, 0, 2, 1, 2},
+ {320, 1, 0, 2, 1, 2},
+ {325, 1, 0, 2, 1, 2},
+ {450, 1, 0, 2, 1, 3},
+ {460, 1, 0, 2, 1, 3},
+ {600, 1, 0, 2, 1, 4},
+ {620, 1, 0, 2, 1, 6},
+ {625, 1, 0, 2, 1, 6},
+ {750, 1, 0, 2, 1, 12},
+ {760, 1, 0, 2, 1, 12},
+ {900, 1, 0, 2, 1, 12},
+ {1050, 1, 0, 2, 1, 15},
+ {1200, 1, 0, 2, 1, 15},
+
+ /* must be the last entry */
+ {0, 0, 0, 0, 0, 0}
+};
+
+static const struct dpi_color_adjust default_dpi_color_adjust[1] = {
+ {0, 0, 1, 2, 0, 0}
+};
+
+/* For all scanners. Must be reasonable (eg. between 50 and 300) and
+ * appear in the ...._dpi_color_adjust list of all supported scanners. */
+#define DEF_RESOLUTION 150
+
+/*--------------------------------------------------------------------------*/
+
+/* Define the supported scanners and their characteristics. */
+static const struct scanners_supported scanners[] = {
+
+ {6, "TECO VM3564",
+ TECO_VM3564,
+ "Relisys", "AVEC II S3",
+ {1, 600, 1}, /* resolution */
+ 300, 600, /* max x and Y resolution */
+ 2550, 12, 3, 1, /* calibration */
+ {SANE_FIX (0), SANE_FIX (8.5 * MM_PER_INCH), 0},
+ {SANE_FIX (0), SANE_FIX (11.7 * MM_PER_INCH), 0},
+ vm3564_dpi_color_adjust},
+
+ {6, "TECO VM356A",
+ TECO_VM356A,
+ "Relisys", "APOLLO Express 3",
+ {1, 600, 1}, /* resolution */
+ 300, 600, /* max x and Y resolution */
+ 2550, 12, 3, 1, /* calibration */
+ /* dots/inch * x-length, calibration samples, tot.bytes for 3 colors, default SANE_TECO2_CAL_ALGO value */
+ {SANE_FIX (0), SANE_FIX (8.5 * MM_PER_INCH), 0},
+ {SANE_FIX (0), SANE_FIX (11.7 * MM_PER_INCH), 0},
+ vm356a_dpi_color_adjust},
+
+ {6, "TECO VM356A",
+ TECO_VM356A,
+ "Primax", "Jewel 4800",
+ {1, 600, 1}, /* resolution */
+ 300, 600, /* max x and Y resolution */
+ 2550, 12, 3, 1, /* calibration */
+ /* dots/inch * x-length, calibration samples, tot.bytes for 3 colors, default SANE_TECO2_CAL_ALGO value */
+ {SANE_FIX (0), SANE_FIX (8.5 * MM_PER_INCH), 0},
+ {SANE_FIX (0), SANE_FIX (11.7 * MM_PER_INCH), 0},
+ vm356a_dpi_color_adjust},
+
+ {6, "TECO VM3575",
+ TECO_VM3575,
+ "Relisys", "SCORPIO Super 3",
+ {1, 600, 1}, /* resolution */
+ 300, 600, /* max x and Y resolution */
+ 2550, 12, 6, 1, /* calibration */
+ {SANE_FIX (0), SANE_FIX (8.5 * MM_PER_INCH), 0},
+ {SANE_FIX (0), SANE_FIX (11.7 * MM_PER_INCH), 0},
+ vm3575_dpi_color_adjust},
+
+ {6, "TECO VM3575",
+ TECO_VM3575,
+ "Relisys", "AVEC Super 3",
+ {1, 600, 1}, /* resolution */
+ 300, 600, /* max x and Y resolution */
+ 2550, 12, 6, 1, /* calibration */
+ {SANE_FIX (0), SANE_FIX (8.5 * MM_PER_INCH), 0},
+ {SANE_FIX (0), SANE_FIX (11.7 * MM_PER_INCH), 0},
+ vm3575_dpi_color_adjust},
+
+ {6, "TECO VM656A",
+ TECO_VM656A,
+ "Relisys", "APOLLO Express 6",
+ {1, 600, 1}, /* resolution */
+ 600, 1200, /* max x and Y resolution */
+ 5100, 8, 6, 0, /* calibration */
+ {SANE_FIX (0), SANE_FIX (210), 0},
+ {SANE_FIX (0), SANE_FIX (297), 0},
+ vm656a_dpi_color_adjust},
+
+ {6, "TECO VM6575",
+ TECO_VM6575,
+ "Relisys", "SCORPIO Pro",
+ {1, 600, 1}, /* resolution */
+ 600, 1200, /* max x and Y resolution */
+ 5100, 8, 6, 1, /* calibration */
+ {SANE_FIX (0), SANE_FIX (8.5 * MM_PER_INCH), 0},
+ {SANE_FIX (0), SANE_FIX (11.7 * MM_PER_INCH), 0},
+ vm6575_dpi_color_adjust},
+
+ {6, "TECO VM6575",
+ TECO_VM6575,
+ "Primax", "Profi 9600",
+ {1, 600, 1}, /* resolution */
+ 600, 1200, /* max x and Y resolution */
+ 5100, 8, 6, 1, /* calibration */
+ {SANE_FIX (0), SANE_FIX (8.5 * MM_PER_INCH), 0},
+ {SANE_FIX (0), SANE_FIX (11.7 * MM_PER_INCH), 0},
+ vm6575_dpi_color_adjust},
+
+ {6, "TECO VM6586",
+ TECO_VM6586,
+ "Relisys", "SCORPIO Pro-S",
+ {1, 600, 1}, /* resolution */
+ 600, 1200, /* max x and Y resolution */
+ 5100, 8, 6, 0, /* calibration */
+ {SANE_FIX (0), SANE_FIX (8.5 * MM_PER_INCH), 0},
+ {SANE_FIX (0), SANE_FIX (11.7 * MM_PER_INCH), 0},
+ vm6586_dpi_color_adjust},
+
+ {6, "TECO VM6586",
+ TECO_VM6586,
+ "Primax", "Profi 19200",
+ {1, 600, 1}, /* resolution */
+ 600, 1200, /* max x and Y resolution */
+ 5100, 8, 6, 0, /* calibration */
+ {SANE_FIX (0), SANE_FIX (8.5 * MM_PER_INCH), 0},
+ {SANE_FIX (0), SANE_FIX (11.7 * MM_PER_INCH), 0},
+ vm6586_dpi_color_adjust}
+};
+
+/*--------------------------------------------------------------------------*/
+
+/* List of scanner attached. */
+static Teco_Scanner *first_dev = NULL;
+static int num_devices = 0;
+static const SANE_Device **devlist = NULL;
+
+
+/* Local functions. */
+
+/* Display a buffer in the log. Display by lines of 16 bytes. */
+static void
+hexdump (int level, const char *comment, unsigned char *buf, const int length)
+{
+ int i;
+ char line[128];
+ char *ptr;
+ char asc_buf[17];
+ char *asc_ptr;
+
+ DBG (level, " %s\n", comment);
+
+ i = 0;
+ goto start;
+
+ do
+ {
+ if (i < length)
+ {
+ ptr += sprintf (ptr, " %2.2x", *buf);
+
+ if (*buf >= 32 && *buf <= 127)
+ {
+ asc_ptr += sprintf (asc_ptr, "%c", *buf);
+ }
+ else
+ {
+ asc_ptr += sprintf (asc_ptr, ".");
+ }
+ }
+ else
+ {
+ /* After the length; do nothing. */
+ ptr += sprintf (ptr, " ");
+ }
+
+ i++;
+ buf++;
+
+ if ((i % 16) == 0)
+ {
+ /* It's a new line */
+ DBG (level, " %s %s\n", line, asc_buf);
+
+ start:
+ ptr = line;
+ *ptr = '\0';
+ asc_ptr = asc_buf;
+ *asc_ptr = '\0';
+
+ ptr += sprintf (ptr, " %3.3d:", i);
+ }
+
+ }
+ while (i < ((length + 15) & ~15));
+}
+
+/* Returns the length of the longest string, including the terminating
+ * character. */
+static size_t
+max_string_size (SANE_String_Const strings[])
+{
+ size_t size, max_size = 0;
+ int i;
+
+ for (i = 0; strings[i]; ++i)
+ {
+ size = strlen (strings[i]) + 1;
+ if (size > max_size)
+ {
+ max_size = size;
+ }
+ }
+
+ return max_size;
+}
+
+/* Lookup a string list from one array and return its index. */
+static int
+get_string_list_index (SANE_String_Const list[], SANE_String_Const name)
+{
+ int index;
+
+ index = 0;
+ while (list[index] != NULL)
+ {
+ if (strcmp (list[index], name) == 0)
+ {
+ return (index);
+ }
+ index++;
+ }
+
+ DBG (DBG_error, "name %s not found in list\n", name);
+
+ assert (0); /* bug in backend, core dump */
+
+ return (-1);
+}
+
+/* Initialize a scanner entry. Return an allocated scanner with some
+ * preset values. */
+static Teco_Scanner *
+teco_init (void)
+{
+ Teco_Scanner *dev;
+
+ DBG (DBG_proc, "teco_init: enter\n");
+
+ /* Allocate a new scanner entry. */
+ dev = malloc (sizeof (Teco_Scanner));
+ if (dev == NULL)
+ {
+ return NULL;
+ }
+
+ memset (dev, 0, sizeof (Teco_Scanner));
+
+ /* Allocate the buffer used to transfer the SCSI data. */
+ dev->buffer_size = 64 * 1024;
+ dev->buffer = malloc (dev->buffer_size);
+ if (dev->buffer == NULL)
+ {
+ free (dev);
+ return NULL;
+ }
+
+ dev->sfd = -1;
+
+ DBG (DBG_proc, "teco_init: exit\n");
+
+ return (dev);
+}
+
+/* Closes an open scanner. */
+static void
+teco_close (Teco_Scanner * dev)
+{
+ DBG (DBG_proc, "teco_close: enter\n");
+
+ if (dev->sfd != -1)
+ {
+ sanei_scsi_close (dev->sfd);
+ dev->sfd = -1;
+ }
+
+ DBG (DBG_proc, "teco_close: exit\n");
+}
+
+/* Frees the memory used by a scanner. */
+static void
+teco_free (Teco_Scanner * dev)
+{
+ int i;
+
+ DBG (DBG_proc, "teco_free: enter\n");
+
+ if (dev == NULL)
+ return;
+
+ teco_close (dev);
+ if (dev->devicename)
+ {
+ free (dev->devicename);
+ }
+ if (dev->buffer)
+ {
+ free (dev->buffer);
+ }
+ for (i = 1; i < OPT_NUM_OPTIONS; i++)
+ {
+ if (dev->opt[i].type == SANE_TYPE_STRING && dev->val[i].s)
+ {
+ free (dev->val[i].s);
+ }
+ }
+ if (dev->resolutions_list)
+ free (dev->resolutions_list);
+
+ free (dev);
+
+ DBG (DBG_proc, "teco_free: exit\n");
+}
+
+/* Inquiry a device and returns TRUE if is supported. */
+static int
+teco_identify_scanner (Teco_Scanner * dev)
+{
+ CDB cdb;
+ SANE_Status status;
+ size_t size;
+ int i;
+
+ DBG (DBG_proc, "teco_identify_scanner: enter\n");
+
+ size = 5;
+ MKSCSI_INQUIRY (cdb, size);
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ NULL, 0, dev->buffer, &size);
+
+ if (status)
+ {
+ DBG (DBG_error,
+ "teco_identify_scanner: inquiry failed with status %s\n",
+ sane_strstatus (status));
+ return (SANE_FALSE);
+ }
+
+ size = dev->buffer[4] + 5; /* total length of the inquiry data */
+
+#ifndef sim
+ if (size < 53)
+ {
+ DBG (DBG_error,
+ "teco_identify_scanner: not enough data to identify device\n");
+ return (SANE_FALSE);
+ }
+#endif
+#ifdef sim
+ {
+#if 0
+ /* vm3564 */
+ unsigned char table[] = {
+ 0x06, 0x00, 0x02, 0x02, 0x43, 0x00, 0x00, 0x10, 0x52, 0x45,
+ 0x4c, 0x49, 0x53, 0x59, 0x53, 0x20, 0x41, 0x56, 0x45, 0x43,
+ 0x20, 0x49, 0x49, 0x20, 0x53, 0x33, 0x20, 0x20, 0x20, 0x20,
+ 0x20, 0x20, 0x31, 0x2e, 0x30, 0x37, 0x31, 0x2e, 0x30, 0x37,
+ 0x00, 0x01, 0x54, 0x45, 0x43, 0x4f, 0x20, 0x56, 0x4d, 0x33,
+ 0x35, 0x36, 0x34, 0x20, 0x00, 0x01, 0x01, 0x2c, 0x00, 0x01,
+ 0x02, 0x58, 0x09, 0xf6, 0x0d, 0xaf, 0x01, 0x2c, 0x00, 0x08,
+ 0x01, 0x00
+ };
+#endif
+#if 0
+ /* vm356A */
+ unsigned char table[] = {
+ 0x06, 0x00, 0x02, 0x02, 0x43, 0x00, 0x00, 0x10, 0x50, 0x72,
+ 0x69, 0x6d, 0x61, 0x78, 0x20, 0x20, 0x4a, 0x65, 0x77, 0x65,
+ 0x6c, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x20,
+ 0x20, 0x20, 0x31, 0x2e, 0x30, 0x30, 0x31, 0x2e, 0x30, 0x30,
+ 0x00, 0x01, 0x54, 0x45, 0x43, 0x4f, 0x20, 0x56, 0x4d, 0x33,
+ 0x35, 0x36, 0x41, 0x20, 0x00, 0x01, 0x01, 0x2c, 0x00, 0x01,
+ 0x02, 0x58, 0x09, 0xf6, 0x0d, 0xaf, 0x01, 0x2c, 0x00, 0x08,
+ 0x10, 0x00
+ };
+#endif
+#if 1
+ /* vm3575 */
+ unsigned char table[] = {
+ 0x06, 0x00, 0x02, 0x02, 0x43, 0x00, 0x00, 0x00, 0x20, 0x20,
+ 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x46, 0x6c, 0x61, 0x74,
+ 0x62, 0x65, 0x64, 0x20, 0x53, 0x63, 0x61, 0x6e, 0x6e, 0x65,
+ 0x72, 0x20, 0x31, 0x2e, 0x30, 0x33, 0x31, 0x2e, 0x30, 0x33,
+ 0x00, 0x01, 0x54, 0x45, 0x43, 0x4f, 0x20, 0x56, 0x4d, 0x33,
+ 0x35, 0x37, 0x35, 0x20, 0x00, 0x01, 0x01, 0x2c, 0x00, 0x01,
+ 0x02, 0x58, 0x09, 0xf6, 0x0d, 0xaf, 0x01, 0x2c, 0x00, 0x08,
+ 0x01, 0x00
+ };
+#endif
+#if 0
+ /* vm6586 */
+ unsigned char table[] = {
+ 0x06, 0x00, 0x02, 0x02, 0x43, 0x00, 0x00, 0x00, 0x20, 0x20,
+ 0x20, 0x20, 0x20, 0x20, 0x20, 0x20, 0x46, 0x6c, 0x61, 0x74,
+ 0x62, 0x65, 0x64, 0x20, 0x53, 0x63, 0x61, 0x6e, 0x6e, 0x65,
+ 0x72, 0x20, 0x33, 0x2e, 0x30, 0x31, 0x33, 0x2e, 0x30, 0x31,
+ 0x00, 0x01, 0x54, 0x45, 0x43, 0x4f, 0x20, 0x56, 0x4d, 0x36,
+ 0x35, 0x38, 0x36, 0x20, 0x00, 0x01, 0x01, 0x2c, 0x00, 0x01,
+ 0x02, 0x58, 0x09, 0xf6, 0x0d, 0xaf, 0x01, 0x2c, 0x00, 0x08,
+ 0x01, 0x00
+ };
+#endif
+#if 0
+ /* vm656A */
+ unsigned char table[] = {
+ 0x06, 0x00, 0x02, 0x02, 0x43, 0x00, 0x00, 0x00, 0x52, 0x45,
+ 0x4c, 0x49, 0x53, 0x59, 0x53, 0x20, 0x41, 0x50, 0x4f, 0x4c,
+ 0x4c, 0x4f, 0x20, 0x45, 0x78, 0x70, 0x72, 0x65, 0x73, 0x73,
+ 0x20, 0x36, 0x31, 0x2e, 0x30, 0x33, 0x31, 0x2e, 0x30, 0x33,
+ 0x00, 0x01, 0x54, 0x45, 0x43, 0x4f, 0x20, 0x56, 0x4d, 0x36,
+ 0x35, 0x36, 0x41, 0x00, 0x01, 0x01, 0x2c, 0x00, 0x01, 0x02,
+ 0x58, 0x09, 0xf6, 0x0d, 0xaf, 0x01, 0x2c, 0x00, 0x08, 0x01,
+ 0x00, 0x00
+ };
+#endif
+ size = sizeof (table);
+ memcpy (dev->buffer, table, sizeof (table));
+ }
+#endif
+
+ MKSCSI_INQUIRY (cdb, size);
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ NULL, 0, dev->buffer, &size);
+
+ if (status)
+ {
+ DBG (DBG_error,
+ "teco_identify_scanner: inquiry failed with status %s\n",
+ sane_strstatus (status));
+ return (SANE_FALSE);
+ }
+
+ hexdump (DBG_info2, "inquiry", dev->buffer, size);
+
+ dev->scsi_type = dev->buffer[0] & 0x1f;
+ memcpy (dev->scsi_vendor, dev->buffer + 0x08, 0x08);
+ dev->scsi_vendor[0x08] = 0;
+ memcpy (dev->scsi_product, dev->buffer + 0x10, 0x010);
+ dev->scsi_product[0x10] = 0;
+ memcpy (dev->scsi_version, dev->buffer + 0x20, 0x04);
+ dev->scsi_version[0x04] = 0;
+ memcpy (dev->scsi_teco_name, dev->buffer + 0x2A, 0x0B);
+ dev->scsi_teco_name[0x0B] = 0;
+
+ DBG (DBG_info, "device is \"%s\" \"%s\" \"%s\" \"%s\"\n",
+ dev->scsi_vendor, dev->scsi_product, dev->scsi_version,
+ dev->scsi_teco_name);
+
+ /* Lookup through the supported scanners table to find if this
+ * backend supports that one. */
+ for (i = 0; i < NELEMS (scanners); i++)
+ {
+ if (dev->scsi_type == scanners[i].scsi_type &&
+ strcmp (dev->scsi_teco_name, scanners[i].scsi_teco_name) == 0)
+ {
+
+ DBG (DBG_error, "teco_identify_scanner: scanner supported\n");
+
+ /*patch for VM356A Jewel or Apollo text in frontend-+ others-------------- */
+
+ if (strncmp (dev->scsi_vendor, "RELISYS", 1) == 0 ||
+ strncmp (dev->scsi_vendor, " ", 1) == 0)
+ {
+ DBG (DBG_error,
+ "teco_identify_scanner: scanner detected with this teco_name and first brand/name entry in table\n");
+
+ dev->def = &(scanners[i]);
+
+ return (SANE_TRUE);
+ }
+ else
+ {
+ i++;
+
+ DBG (DBG_error,
+ "teco_identify_scanner: scanner detected with this teco_name and second brand/name entry in table\n");
+
+ dev->def = &(scanners[i]);
+
+ return (SANE_TRUE);
+ }
+
+ }
+ }
+
+ DBG (DBG_proc, "teco_identify_scanner: exit, device not supported\n");
+
+ return (SANE_FALSE);
+}
+
+/* Set a window. */
+static SANE_Status
+teco_set_window (Teco_Scanner * dev)
+{
+ size_t size; /* significant size of window */
+ CDB cdb;
+ unsigned char window[56];
+ SANE_Status status;
+ int i;
+
+ DBG (DBG_proc, "teco_set_window: enter\n");
+
+ /* size of the whole windows block */
+ size = 0; /* keep gcc quiet */
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3575:
+ size = 53;
+ break;
+ case TECO_VM3564:
+ case TECO_VM356A:
+ case TECO_VM656A:
+ case TECO_VM6575:
+ case TECO_VM6586:
+ size = 56;
+ break;
+ default:
+ assert (0);
+ }
+
+ /* Check that window is big enough */
+ assert (size <= sizeof (window));
+
+ MKSCSI_SET_WINDOW (cdb, size);
+
+ memset (window, 0, size);
+
+ /* size of the windows descriptor block */
+ window[7] = size - 8;
+
+ /* X and Y resolution */
+ Ito16 (dev->x_resolution, &window[10]);
+ Ito16 (dev->y_resolution, &window[12]);
+
+ /* Upper Left (X,Y) */
+ Ito32 (dev->x_tl, &window[14]);
+ Ito32 (dev->y_tl, &window[18]);
+
+ /* Width and length */
+ Ito32 (dev->width, &window[22]);
+ Ito32 (dev->length, &window[26]);
+
+ /* Image Composition */
+ switch (dev->scan_mode)
+ {
+ case TECO_BW:
+ window[31] = dev->val[OPT_THRESHOLD].w;
+ window[33] = 0x00;
+ i = get_string_list_index (dither_list, dev->val[OPT_DITHER].s);
+ window[36] = dither_val[i];
+ break;
+ case TECO_GRAYSCALE:
+ window[33] = 0x02;
+ break;
+ case TECO_COLOR:
+ window[33] = 0x05;
+ break;
+ }
+
+ /* Depth */
+ window[34] = dev->depth;
+
+ /* Lamp to use */
+ i = get_string_list_index (filter_color_list, dev->val[OPT_FILTER_COLOR].s);
+ window[48] = filter_color_val[i];
+
+ /* Unknown - invariants */
+ window[31] = 0x80;
+ window[37] = 0x80;
+
+ /* Set the expected size line and number of lines. */
+ if (dev->def->tecoref == TECO_VM656A ||
+ dev->def->tecoref == TECO_VM6575 || dev->def->tecoref == TECO_VM6586)
+ {
+
+ switch (dev->scan_mode)
+ {
+ case TECO_BW:
+ case TECO_GRAYSCALE:
+ Ito16 (dev->params.bytes_per_line, &window[52]);
+ break;
+ case TECO_COLOR:
+ Ito16 (dev->params.bytes_per_line / 3, &window[52]);
+ break;
+ }
+ Ito16 (dev->params.lines, &window[54]);
+ }
+
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ hexdump (DBG_info2, "windows", window, size);
+
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ window, size, NULL, NULL);
+
+ DBG (DBG_proc, "teco_set_window: exit, status=%d\n", status);
+
+ return status;
+}
+
+/* Park the CCD */
+static SANE_Status
+teco_reset_window (Teco_Scanner * dev)
+{
+ SANE_Status status;
+ CDB cdb;
+
+ DBG (DBG_proc, "teco_reset_window: enter\n");
+
+ MKSCSI_OBJECT_POSITION (cdb, 0);
+
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len, NULL, 0, NULL, NULL);
+
+ DBG (DBG_proc, "teco_reset_window: leave, status=%d\n", status);
+
+ return status;
+}
+
+#ifdef sim
+unsigned char *image_buf;
+int image_buf_begin;
+#endif
+
+/* Read the size of the scan. */
+static SANE_Status
+teco_get_scan_size (Teco_Scanner * dev)
+{
+ size_t size;
+ CDB cdb;
+ SANE_Status status;
+
+ DBG (DBG_proc, "teco_get_scan_size: enter\n");
+
+ size = 0x12;
+ MKSCSI_GET_DATA_BUFFER_STATUS (cdb, 1, size);
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ NULL, 0, dev->buffer, &size);
+
+ assert (size == 0x12);
+
+ hexdump (DBG_info2, "teco_get_scan_size return", dev->buffer, size);
+
+#ifndef sim
+ dev->params.lines = B16TOI (&dev->buffer[12]);
+ dev->bytes_per_raster = B16TOI (&dev->buffer[14]);
+
+ switch (dev->scan_mode)
+ {
+ case TECO_BW:
+ dev->params.bytes_per_line = B16TOI (&dev->buffer[14]);
+ dev->params.pixels_per_line = dev->params.bytes_per_line * 8;
+ break;
+ case TECO_GRAYSCALE:
+ dev->params.pixels_per_line = B16TOI (&dev->buffer[14]);
+ dev->params.bytes_per_line = dev->params.pixels_per_line;
+ break;
+ case TECO_COLOR:
+ dev->params.pixels_per_line = B16TOI (&dev->buffer[14]);
+ dev->params.bytes_per_line = dev->params.pixels_per_line * 3;
+ break;
+ }
+#else
+ {
+ size_t s1, s2;
+ int fd;
+ char *name;
+
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3575:
+
+ if (dev->scan_mode == TECO_GRAYSCALE)
+ {
+ dev->params.pixels_per_line = 850;
+ dev->params.bytes_per_line = 850;
+ dev->params.lines = 1170;
+ dev->bytes_per_raster = 850;
+
+ name = "/home/fzago/sane/teco2/vm3575/gr100d-2.raw";
+
+ }
+ else
+ {
+ switch (dev->val[OPT_RESOLUTION].w)
+ {
+ case 50:
+ dev->params.pixels_per_line = 425;
+ dev->params.lines = 585;
+ name = "/home/fzago/sane/teco2/vm3575/out12-co50.raw";
+ break;
+ case 60:
+ dev->params.pixels_per_line = 510;
+ dev->params.lines = 702;
+ name = "/home/fzago/sane/teco2/vm3575/out12-co60.raw";
+ break;
+ case 75:
+ dev->params.pixels_per_line = 638;
+ dev->params.lines = 431;
+ name = "/home/fzago/sane/teco2/vm3575/out12-co75.raw";
+ break;
+ case 100:
+ dev->params.pixels_per_line = 402;
+ dev->params.lines = 575;
+ name = "/home/fzago/sane/teco2/vm3575/out12-co100.raw";
+ break;
+ }
+
+ dev->params.bytes_per_line = dev->params.pixels_per_line * 3;
+ dev->bytes_per_raster = dev->params.pixels_per_line;
+ }
+ break;
+
+ case TECO_VM6586:
+ switch (dev->val[OPT_RESOLUTION].w)
+ {
+ case 150:
+ dev->params.pixels_per_line = 297;
+ dev->params.lines = 296;
+ name = "/home/fzago/sane/teco2/vm6586/150dpi.raw";
+ break;
+ case 600:
+ dev->params.pixels_per_line = 1186;
+ dev->params.lines = 1186;
+ name = "/home/fzago/sane/teco2/vm6586/600dpi.raw";
+ break;
+ }
+
+ dev->params.bytes_per_line = dev->params.pixels_per_line * 3;
+ dev->bytes_per_raster = dev->params.pixels_per_line;
+ }
+
+
+ s1 = dev->params.bytes_per_line * dev->params.lines;
+ image_buf = malloc (s1);
+ assert (image_buf);
+ image_buf_begin = 0;
+
+ fd = open (name, O_RDONLY);
+ assert (fd >= 0);
+ s2 = read (fd, image_buf, s1);
+ assert (s1 == s2);
+ close (fd);
+
+ }
+#endif
+
+ DBG (DBG_proc, "teco_get_scan_size: exit, status=%d\n", status);
+
+ return (status);
+}
+
+/* Wait until the scanner is ready to send the data. This is the
+ almost the same code as teco_get_scan_size(). This function has to
+ be called once after the scan has started. */
+static SANE_Status
+teco_wait_for_data (Teco_Scanner * dev)
+{
+ size_t size;
+ CDB cdb;
+ SANE_Status status;
+ int i;
+
+#ifdef sim
+ return SANE_STATUS_GOOD;
+#endif
+
+ DBG (DBG_proc, "teco_wait_for_data: enter\n");
+
+ for (i = 0; i < 60; i++)
+ {
+
+ size = 0x12;
+ MKSCSI_GET_DATA_BUFFER_STATUS (cdb, 1, size);
+
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ NULL, 0, dev->buffer, &size);
+
+ assert (size == 0x12);
+
+ hexdump (DBG_info2, "teco_wait_for_data return", dev->buffer, size);
+
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3564:
+ case TECO_VM356A:
+ if (dev->buffer[11] > 0x01)
+ {
+ return SANE_STATUS_GOOD;
+ }
+
+ sleep (1);
+ break;
+ /* For VM3575, VM6575, VM656A, VM6586 until otherwise default value is used */
+ default:
+ if (dev->buffer[11] == 0x80)
+ {
+ return SANE_STATUS_GOOD;
+ }
+
+ sleep (1);
+ break;
+ }
+ }
+
+ DBG (DBG_proc, "teco_wait_for_data: scanner not ready to send data (%d)\n",
+ status);
+
+ return SANE_STATUS_DEVICE_BUSY;
+}
+
+/* Do the calibration stuff. Get 12 or 8 lines of data. Each pixel is coded
+ * in 6 bytes (2 per color) or 3 bytes (3564 and 356A). To do the calibration,
+ * allocates an array big enough for one line, read the 12 or 8 lines of calibration,
+ * subtract the highest and lowest value and do a average.
+ * The input line is 1 raster for each color. However
+ * the output line is interlaced (ie RBG for the first pixel, then RGB
+ * for the second, and so on...). The output line are the value to use
+ * to compensate for the white point.
+ * There is two algorithms:
+ *
+ * The range goes from 0 to 0xfff, and the average is 0x800. So if
+ * the average input is 0x700, the output value for that dot must be
+ * 0x1000-0x700=0x900.
+ *
+ * and
+ *
+ * the calibration needs to be a multiplication factor, to
+ * compensate for the too strong or too weak pixel in the sensor.
+ *
+ * See more info in doc/teco/teco2.txt
+ *
+ **/
+static SANE_Status
+teco_do_calibration (Teco_Scanner * dev)
+{
+ SANE_Status status;
+ CDB cdb;
+ size_t size;
+ int i;
+ int j;
+ int colsub0_0, colsub0_1, colsub0_2;
+ int colsub1_0, colsub1_1, colsub1_2;
+ int *tmp_buf, *tmp_min_buf, *tmp_max_buf; /* hold the temporary calibration */
+ size_t tmp_buf_size, tmp_min_buf_size, tmp_max_buf_size;
+ const char *calibration_algo;
+ int cal_algo;
+
+ colsub0_0 = 0;
+ colsub0_1 = 0;
+ colsub0_2 = 0;
+ colsub1_0 = 0;
+ colsub1_1 = 0;
+ colsub1_2 = 0;
+
+ DBG (DBG_proc, "teco_do_calibration: enter\n");
+
+ /* Get default calibration algorithm. */
+ cal_algo = dev->def->cal_algo;
+ if ((calibration_algo = getenv ("SANE_TECO2_CAL_ALGO")) != NULL)
+ {
+ cal_algo = atoi (calibration_algo);
+ }
+ if (cal_algo != 0 && cal_algo != 1)
+ {
+ DBG (DBG_error, "Invalid calibration algorithm (%d)\n", cal_algo);
+ cal_algo = 0;
+ }
+
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3564:
+ case TECO_VM356A:
+ /* white level red, green and blue calibration correction */
+ /* 0x110 or 272 is middle value */
+ colsub0_1 = 240 + (dev->val[OPT_WHITE_LEVEL_R].w);
+ colsub0_2 = 240 + (dev->val[OPT_WHITE_LEVEL_G].w);
+ colsub0_0 = 240 + (dev->val[OPT_WHITE_LEVEL_B].w);
+ /* 14000 is middle value */
+ colsub1_1 = 12720 + (40 * dev->val[OPT_WHITE_LEVEL_R].w);
+ colsub1_2 = 12720 + (40 * dev->val[OPT_WHITE_LEVEL_G].w);
+ colsub1_0 = 12720 + (40 * dev->val[OPT_WHITE_LEVEL_B].w);
+ break;
+ case TECO_VM3575:
+ case TECO_VM6575:
+ /* 0x1100 or 4352 is middle value */
+ colsub0_1 = 4096 + (8 * dev->val[OPT_WHITE_LEVEL_R].w);
+ colsub0_2 = 4096 + (8 * dev->val[OPT_WHITE_LEVEL_G].w);
+ colsub0_0 = 4096 + (8 * dev->val[OPT_WHITE_LEVEL_B].w);
+ /* 4206639 is middle value */
+ colsub1_1 = 4078639 + (4000 * dev->val[OPT_WHITE_LEVEL_R].w);
+ colsub1_2 = 4078639 + (4000 * dev->val[OPT_WHITE_LEVEL_G].w);
+ colsub1_0 = 4078639 + (4000 * dev->val[OPT_WHITE_LEVEL_B].w);
+ break;
+ /* old default value */
+ case TECO_VM656A:
+ case TECO_VM6586:
+ colsub0_1 = 0x1000;
+ colsub0_2 = 0x1000;
+ colsub0_0 = 0x1000;
+ colsub1_1 = 4206639;
+ colsub1_2 = 4206639;
+ colsub1_0 = 4206639;
+ break;
+ default:
+ colsub0_1 = 0x1000;
+ colsub0_2 = 0x1000;
+ colsub0_0 = 0x1000;
+ colsub1_1 = 4206639;
+ colsub1_2 = 4206639;
+ colsub1_0 = 4206639;
+ break;
+ }
+
+ tmp_buf_size = dev->def->cal_length * 3 * sizeof (int);
+ tmp_min_buf_size = dev->def->cal_length * 3 * sizeof (int);
+ tmp_max_buf_size = dev->def->cal_length * 3 * sizeof (int);
+ tmp_buf = malloc (tmp_buf_size);
+ tmp_min_buf = malloc (tmp_min_buf_size);
+ tmp_max_buf = malloc (tmp_max_buf_size);
+ memset (tmp_buf, 0, tmp_buf_size);
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3564:
+ case TECO_VM356A:
+ memset (tmp_min_buf, 0xff, tmp_min_buf_size);
+ memset (tmp_max_buf, 0x00, tmp_max_buf_size);
+ break;
+ case TECO_VM3575:
+ case TECO_VM656A:
+ case TECO_VM6575:
+ case TECO_VM6586:
+ memset (tmp_min_buf, 0xffff, tmp_min_buf_size);
+ memset (tmp_max_buf, 0x0000, tmp_max_buf_size);
+ break;
+ }
+
+ if ((tmp_buf == NULL) || (tmp_min_buf == NULL) || (tmp_max_buf == NULL))
+ {
+ DBG (DBG_proc, "teco_do_calibration: not enough memory (%ld bytes)\n",
+ (long) tmp_buf_size);
+ return (SANE_STATUS_NO_MEM);
+ }
+
+ for (i = 0; i < dev->def->cal_lines; i++)
+ {
+
+ MKSCSI_VENDOR_SPEC (cdb, SCSI_VENDOR_09, 6);
+
+ /* No idea what that is. */
+ switch (dev->scan_mode)
+ {
+ case TECO_BW:
+ cdb.data[2] = 0x02;
+ break;
+ case TECO_GRAYSCALE:
+ cdb.data[2] = 0x01;
+ break;
+ case TECO_COLOR:
+ cdb.data[2] = 0x00;
+ break;
+ }
+
+ /* Length of the scanner * number of bytes per color */
+ size = dev->def->cal_length * dev->def->cal_col_len;
+ cdb.data[3] = (size >> 8) & 0xff;
+ cdb.data[4] = (size >> 0) & 0xff;
+
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ NULL, 0, dev->buffer, &size);
+
+ if (status != SANE_STATUS_GOOD)
+ {
+ DBG (DBG_error,
+ "teco_do_calibration: cannot read from the scanner\n");
+ free (tmp_buf);
+ return status;
+ }
+
+#ifdef sim
+ for (j = 0; j < dev->def->cal_length; j++)
+ {
+ dev->buffer[6 * j + 0] = 0x10;
+ dev->buffer[6 * j + 1] = 0x12;
+ dev->buffer[6 * j + 2] = 0x14;
+ dev->buffer[6 * j + 3] = 0x16;
+ dev->buffer[6 * j + 4] = 0x20;
+ dev->buffer[6 * j + 5] = 0x25;
+ }
+#endif
+ /*hexdump (DBG_info2, "got calibration line:", dev->buffer, size); */
+
+ for (j = 0; j < dev->def->cal_length; j++)
+ {
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3575:
+ case TECO_VM6575:
+ case TECO_VM656A:
+ case TECO_VM6586:
+ tmp_buf[3 * j + 0] +=
+ (dev->buffer[6 * j + 1] << 8) + dev->buffer[6 * j + 0];
+ /* get lowest value */
+ if (tmp_min_buf[3 * j + 0] >> ((dev->buffer[6 * j + 1] << 8) + dev->buffer[6 * j + 0]))
+ {
+ tmp_min_buf[3 * j + 0] = (dev->buffer[6 * j + 1] << 8) + dev->buffer[6 * j + 0];
+ }
+ /* get highest value */
+ if (tmp_max_buf[3 * j + 0] < ((dev->buffer[6 * j + 1] << 8) + dev->buffer[6 * j + 0]))
+ {
+ tmp_max_buf[3 * j + 0] = (dev->buffer[6 * j + 1] << 8) + dev->buffer[6 * j + 0];
+ }
+ tmp_buf[3 * j + 1] +=
+ (dev->buffer[6 * j + 3] << 8) + dev->buffer[6 * j + 2];
+ /* get lowest value */
+ if (tmp_min_buf[3 * j + 1] >> ((dev->buffer[6 * j + 3] << 8) + dev->buffer[6 * j + 2]))
+ {
+ tmp_min_buf[3 * j + 1] = (dev->buffer[6 * j + 3] << 8) + dev->buffer[6 * j + 2];
+ }
+ /* get highest value */
+ if (tmp_max_buf[3 * j + 1] < ((dev->buffer[6 * j + 3] << 8) + dev->buffer[6 * j + 2]))
+ {
+ tmp_max_buf[3 * j + 1] = (dev->buffer[6 * j + 3] << 8) + dev->buffer[6 * j + 2];
+ }
+ tmp_buf[3 * j + 2] +=
+ (dev->buffer[6 * j + 5] << 8) + dev->buffer[6 * j + 4];
+ /* get lowest value */
+ if (tmp_min_buf[3 * j + 2] >> ((dev->buffer[6 * j + 5] << 8) + dev->buffer[6 * j + 4]))
+ {
+ tmp_min_buf[3 * j + 2] = (dev->buffer[6 * j + 5] << 8) + dev->buffer[6 * j + 4];
+ }
+ /* get highest value */
+ if (tmp_max_buf[3 * j + 2] < ((dev->buffer[6 * j + 5] << 8) + dev->buffer[6 * j + 4]))
+ {
+ tmp_max_buf[3 * j + 2] = (dev->buffer[6 * j + 5] << 8) + dev->buffer[6 * j + 4];
+ }
+ break;
+ case TECO_VM3564:
+ case TECO_VM356A:
+ tmp_buf[3 * j + 0] += dev->buffer[3 * j + 0];
+ /* get lowest value */
+ if (tmp_min_buf[3 * j + 0] >> dev->buffer[3 * j + 0])
+ {
+ tmp_min_buf[3 * j + 0] = dev->buffer[3 * j + 0];
+ }
+ /* get highest value */
+ if (tmp_max_buf[3 * j + 0] < dev->buffer[3 * j + 0])
+ {
+ tmp_max_buf[3 * j + 0] = dev->buffer[3 * j + 0];
+ }
+ tmp_buf[3 * j + 1] += dev->buffer[3 * j + 1];
+ /* get lowest value */
+ if (tmp_min_buf[3 * j + 1] >> dev->buffer[3 * j + 1])
+ {
+ tmp_min_buf[3 * j + 1] = dev->buffer[3 * j + 1];
+ }
+ /* get hightest value */
+ if (tmp_max_buf[3 * j + 1] < dev->buffer[3 * j + 1])
+ {
+ tmp_max_buf[3 * j + 1] = dev->buffer[3 * j + 1];
+ }
+ tmp_buf[3 * j + 2] += dev->buffer[3 * j + 2];
+ /* get lowest value */
+ if (tmp_min_buf[3 * j + 2] >> dev->buffer[3 * j + 2])
+ {
+ tmp_min_buf[3 * j + 2] = dev->buffer[3 * j + 2];
+ }
+ /* get highest value */
+ if (tmp_max_buf[3 * j + 2] < dev->buffer[3 * j + 2])
+ {
+ tmp_max_buf[3 * j + 2] = dev->buffer[3 * j + 2];
+ }
+ break;
+/* default:
+ tmp_buf[3 * j + 0] +=
+ (dev->buffer[6 * j + 1] << 8) + dev->buffer[6 * j + 0];
+ tmp_buf[3 * j + 1] +=
+ (dev->buffer[6 * j + 3] << 8) + dev->buffer[6 * j + 2];
+ tmp_buf[3 * j + 2] +=
+ (dev->buffer[6 * j + 5] << 8) + dev->buffer[6 * j + 4];
+ break; */
+ }
+ }
+ }
+
+ /* hexdump (DBG_info2, "calibration before average:", tmp_buf, tmp_buf_size); */
+ /* hexdump (DBG_info2, "calibration before average min value:", tmp_min_buf, tmp_min_buf_size); */
+ /* hexdump (DBG_info2, "calibration before average max value:", tmp_max_buf, tmp_max_buf_size); */
+
+ /* Do the average. Since we got 12 or 8 lines, divide all values by 10 or 6
+ * and create the final calibration value that compensates for the
+ * white values read. */
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM356A:
+ case TECO_VM3564:
+ case TECO_VM3575:
+ case TECO_VM6575:
+ case TECO_VM656A:
+ case TECO_VM6586:
+ for (j = 0; j < dev->def->cal_length; j++)
+ {
+ /* subtract lowest and highest value */
+ tmp_buf[j] = tmp_buf[j] - (tmp_min_buf[j] + tmp_max_buf[j]);
+ tmp_buf[j + dev->def->cal_length] = tmp_buf[j + dev->def->cal_length]
+ - (tmp_min_buf[j + dev->def->cal_length]
+ + tmp_max_buf[j + dev->def->cal_length]);
+ tmp_buf[j + 2 * dev->def->cal_length] = tmp_buf[j + 2 * dev->def->cal_length]
+ - (tmp_min_buf[j + 2 * dev->def->cal_length]
+ + tmp_max_buf[j + 2 *dev->def->cal_length]);
+ /* sequence colors first color row one then two and last three */
+ if (cal_algo == 1)
+ {
+ tmp_buf[j] = (colsub1_0 * (dev->def->cal_lines - 2)) / tmp_buf[j];
+ tmp_buf[j + dev->def->cal_length] = (colsub1_1 * (dev->def->cal_lines - 2))
+ / tmp_buf[j + dev->def->cal_length];
+ tmp_buf[j + 2 * dev->def->cal_length] = (colsub1_2 * (dev->def->cal_lines - 2))
+ / tmp_buf[j + 2 * dev->def->cal_length];
+ }
+ else
+ {
+ tmp_buf[j] = colsub0_0 - (tmp_buf[j] / (dev->def->cal_lines - 2));
+ tmp_buf[j + dev->def->cal_length] = colsub0_1 - (tmp_buf[j + dev->def->cal_length]
+ / (dev->def->cal_lines - 2));
+ tmp_buf[j + 2 * dev->def->cal_length] = colsub0_2
+ - (tmp_buf[j + 2 * dev->def->cal_length] / (dev->def->cal_lines - 2));
+ }
+ }
+ break;
+/* default:
+ for (j = 0; j < (3 * dev->def->cal_length); j++)
+ {
+ if (cal_algo == 1)
+ tmp_buf[j] = (colsub1_1 * dev->def->cal_lines) / tmp_buf[j];
+ else
+ tmp_buf[j] = colsub0_1 - (tmp_buf[j] / dev->def->cal_lines);
+ }
+ break; */
+ }
+
+ /*hexdump (DBG_info2, "calibration after average:", tmp_buf, tmp_buf_size); */
+
+ /* Build the calibration line to send. */
+ for (j = 0; j < dev->def->cal_length; j++)
+ {
+
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3575:
+ case TECO_VM6575:
+ case TECO_VM656A:
+ case TECO_VM6586:
+ dev->buffer[6 * j + 0] =
+ (tmp_buf[0 * dev->def->cal_length + j] >> 0) & 0xff;
+ dev->buffer[6 * j + 1] =
+ (tmp_buf[0 * dev->def->cal_length + j] >> 8) & 0xff;
+
+ dev->buffer[6 * j + 2] =
+ (tmp_buf[1 * dev->def->cal_length + j] >> 0) & 0xff;
+ dev->buffer[6 * j + 3] =
+ (tmp_buf[1 * dev->def->cal_length + j] >> 8) & 0xff;
+
+ dev->buffer[6 * j + 4] =
+ (tmp_buf[2 * dev->def->cal_length + j] >> 0) & 0xff;
+ dev->buffer[6 * j + 5] =
+ (tmp_buf[2 * dev->def->cal_length + j] >> 8) & 0xff;
+ break;
+ case TECO_VM3564:
+ case TECO_VM356A:
+ dev->buffer[3 * j + 0] = (tmp_buf[3 * j + 0] >> 0) & 0xff;
+
+ dev->buffer[3 * j + 1] = (tmp_buf[3 * j + 1] >> 0) & 0xff;
+
+ dev->buffer[3 * j + 2] = (tmp_buf[3 * j + 2] >> 0) & 0xff;
+ break;
+ }
+ }
+
+ free (tmp_buf);
+ tmp_buf = NULL;
+
+ /* Send the calibration line. The CDB is the same as the previous
+ * one, except for the command. */
+
+ cdb.data[0] = 0x0E;
+ size = dev->def->cal_length * dev->def->cal_col_len;
+
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ /*hexdump (DBG_info2, "calibration line sent:", dev->buffer, size); */
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ dev->buffer, size, NULL, NULL);
+
+ if (status != SANE_STATUS_GOOD)
+ {
+ DBG (DBG_error,
+ "teco_do_calibration: calibration line was not sent correctly\n");
+ return status;
+ }
+
+ DBG (DBG_proc, "teco_do_calibration: leave\n");
+
+ return SANE_STATUS_GOOD;
+}
+
+/*------------request sense command 03----------------*/
+static SANE_Status
+teco_request_sense (Teco_Scanner * dev)
+{
+ SANE_Status status;
+ unsigned char buf[255];
+ CDB cdb;
+ size_t size;
+ /* size = 0; */
+
+ DBG (DBG_proc, "teco_request_sense: enter\n");
+
+ size = sizeof (buf);
+ MKSCSI_REQUEST_SENSE (cdb, size);
+
+ /*size = cdb.data[5];
+
+ hexdump (DBG_info2, "teco_request_sense", cdb.data, cdb.len);
+
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ NULL, 0, dev->buffer, &size); */
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ NULL, 0, buf, &size);
+
+ hexdump (DBG_info2, "teco_request_sense:", buf, size);
+
+ DBG (DBG_proc, "teco_request_sense: exit, status=%d\n", status);
+
+ return (status);
+}
+
+/*----------------------------------------------------*/
+
+/* Send the gamma */
+static SANE_Status
+teco_send_gamma (Teco_Scanner * dev)
+{
+ CDB cdb;
+ SANE_Status status;
+ struct
+ {
+ unsigned char gamma_R[GAMMA_LENGTH];
+ unsigned char gamma_G[GAMMA_LENGTH]; /* also gray */
+ unsigned char gamma_B[GAMMA_LENGTH];
+ }
+ param;
+ size_t i;
+ size_t size;
+
+ DBG (DBG_proc, "teco_send_gamma: enter\n");
+
+ size = sizeof (param);
+ assert (size == 3 * GAMMA_LENGTH);
+ MKSCSI_SEND_10 (cdb, 0x03, 0x04, size);
+
+ if (dev->val[OPT_CUSTOM_GAMMA].w)
+ {
+ /* Use the custom gamma. */
+ if (dev->scan_mode == TECO_GRAYSCALE)
+ {
+ /* Gray */
+ for (i = 0; i < GAMMA_LENGTH; i++)
+ {
+ param.gamma_R[i] = dev->gamma_GRAY[i];
+ param.gamma_G[i] = dev->gamma_GRAY[i];
+ param.gamma_B[i] = dev->gamma_GRAY[i];
+ }
+ }
+ else
+ {
+ /* Color */
+ for (i = 0; i < GAMMA_LENGTH; i++)
+ {
+ param.gamma_R[i] = dev->gamma_R[i];
+ param.gamma_G[i] = dev->gamma_G[i];
+ param.gamma_B[i] = dev->gamma_B[i];
+ }
+ }
+ }
+ else
+ {
+ /* Defaults to a linear gamma for now. */
+ for (i = 0; i < GAMMA_LENGTH; i++)
+ {
+ param.gamma_R[i] = i / 4;
+ param.gamma_G[i] = i / 4;
+ param.gamma_B[i] = i / 4;
+ }
+ }
+
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3564:
+ case TECO_VM356A:
+ status = 0;
+ break;
+ default:
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ &param, size, NULL, NULL);
+ }
+ DBG (DBG_proc, "teco_send_gamma: exit, status=%d\n", status);
+
+ return (status);
+}
+
+/* Send a vendor specific command. */
+static SANE_Status
+teco_send_vendor_06 (Teco_Scanner * dev)
+{
+ SANE_Status status;
+ CDB cdb;
+ size_t size;
+
+ DBG (DBG_proc, "teco_send_vendor_06: enter\n");
+
+ MKSCSI_VENDOR_SPEC (cdb, SCSI_VENDOR_06, 6);
+
+ size = 4;
+
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ NULL, 0, dev->buffer, &size);
+
+
+ MKSCSI_VENDOR_SPEC (cdb, SCSI_VENDOR_1C, 6);
+
+ size = 4;
+ memset (dev->buffer, 0, size);
+
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ dev->buffer, size, NULL, NULL);
+
+ DBG (DBG_proc, "teco_send_vendor_06: exit, status=%d\n", status);
+
+ return (status);
+}
+
+/* Start a scan. */
+static SANE_Status
+teco_scan (Teco_Scanner * dev)
+{
+ CDB cdb;
+ SANE_Status status;
+
+ DBG (DBG_proc, "teco_scan: enter\n");
+
+ MKSCSI_SCAN (cdb);
+
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len, NULL, 0, NULL, NULL);
+
+ DBG (DBG_proc, "teco_scan: exit, status=%d\n", status);
+
+ return status;
+}
+
+/* SCSI sense handler. Callback for SANE. */
+static SANE_Status
+teco_sense_handler (int scsi_fd, unsigned char *result, void __sane_unused__ *arg)
+{
+ int asc, ascq, sensekey;
+ int len;
+
+ DBG (DBG_proc, "teco_sense_handler (scsi_fd = %d)\n", scsi_fd);
+
+ sensekey = get_RS_sense_key (result);
+ len = 7 + get_RS_additional_length (result);
+
+ hexdump (DBG_info2, "sense", result, len);
+
+ if (get_RS_error_code (result) != 0x70)
+ {
+ DBG (DBG_error,
+ "teco_sense_handler: invalid sense key error code (%d)\n",
+ get_RS_error_code (result));
+
+ return SANE_STATUS_IO_ERROR;
+ }
+
+ if (get_RS_ILI (result) != 0)
+ {
+ DBG (DBG_sense, "teco_sense_handler: short read\n");
+ }
+
+ if (len < 14)
+ {
+ DBG (DBG_error, "teco_sense_handler: sense too short, no ASC/ASCQ\n");
+
+ return SANE_STATUS_IO_ERROR;
+ }
+
+ asc = get_RS_ASC (result);
+ ascq = get_RS_ASCQ (result);
+
+ DBG (DBG_sense, "teco_sense_handler: sense=%d, ASC/ASCQ=%02x%02x\n",
+ sensekey, asc, ascq);
+
+ switch (sensekey)
+ {
+ case 0x00: /* no sense */
+ case 0x02: /* not ready */
+ case 0x03: /* medium error */
+ case 0x05:
+ case 0x06:
+ break;
+ }
+
+ DBG (DBG_sense,
+ "teco_sense_handler: unknown error condition. Please report it to the backend maintainer\n");
+
+ return SANE_STATUS_IO_ERROR;
+}
+
+/* Attach a scanner to this backend. */
+static SANE_Status
+attach_scanner (const char *devicename, Teco_Scanner ** devp)
+{
+ Teco_Scanner *dev;
+ int sfd;
+
+ DBG (DBG_sane_proc, "attach_scanner: %s\n", devicename);
+
+ if (devp)
+ *devp = NULL;
+
+ /* Check if we know this device name. */
+ for (dev = first_dev; dev; dev = dev->next)
+ {
+ if (strcmp (dev->sane.name, devicename) == 0)
+ {
+ if (devp)
+ {
+ *devp = dev;
+ }
+ DBG (DBG_info, "device is already known\n");
+ return SANE_STATUS_GOOD;
+ }
+ }
+
+ /* Allocate a new scanner entry. */
+ dev = teco_init ();
+ if (dev == NULL)
+ {
+ DBG (DBG_error, "ERROR: not enough memory\n");
+ return SANE_STATUS_NO_MEM;
+ }
+
+ DBG (DBG_info, "attach_scanner: opening %s\n", devicename);
+
+ if (sanei_scsi_open (devicename, &sfd, teco_sense_handler, dev) != 0)
+ {
+ DBG (DBG_error, "ERROR: attach_scanner: open failed\n");
+ teco_free (dev);
+ return SANE_STATUS_INVAL;
+ }
+
+#ifdef sim
+ sfd = -1;
+#endif
+
+ /* Fill some scanner specific values. */
+ dev->devicename = strdup (devicename);
+ dev->sfd = sfd;
+
+ /* Now, check that it is a scanner we support. */
+ if (teco_identify_scanner (dev) == SANE_FALSE)
+ {
+ DBG (DBG_error,
+ "ERROR: attach_scanner: scanner-identification failed\n");
+ teco_free (dev);
+ return SANE_STATUS_INVAL;
+ }
+
+ teco_close (dev);
+
+ /* If this scanner only supports a given number of resolutions,
+ * build that list now. */
+ if (dev->def->color_adjust[0].resolution != 0)
+ {
+ int num_entries;
+ int i;
+
+ num_entries = 0;
+ while (dev->def->color_adjust[num_entries].resolution != 0)
+ num_entries++;
+
+ dev->resolutions_list = malloc (sizeof (SANE_Word) * (num_entries + 1));
+
+ if (dev->resolutions_list == NULL)
+ {
+ DBG (DBG_error,
+ "ERROR: attach_scanner: scanner-identification failed\n");
+ teco_free (dev);
+ return SANE_STATUS_NO_MEM;
+ }
+
+ dev->resolutions_list[0] = num_entries;
+ for (i = 0; i < num_entries; i++)
+ {
+ dev->resolutions_list[i + 1] = dev->def->color_adjust[i].resolution;
+ }
+ }
+ else
+ {
+ dev->resolutions_list = NULL;
+ }
+
+ /* Set the default options for that scanner. */
+ dev->sane.name = dev->devicename;
+ dev->sane.vendor = dev->def->real_vendor;
+ dev->sane.model = dev->def->real_product;
+ dev->sane.type = SANE_I18N ("flatbed scanner");
+
+ /* Link the scanner with the others. */
+ dev->next = first_dev;
+ first_dev = dev;
+
+ if (devp)
+ {
+ *devp = dev;
+ }
+
+ num_devices++;
+
+ DBG (DBG_proc, "attach_scanner: exit\n");
+
+ return SANE_STATUS_GOOD;
+}
+
+static SANE_Status
+attach_one (const char *dev)
+{
+ attach_scanner (dev, NULL);
+ return SANE_STATUS_GOOD;
+}
+
+/* Reset the options for that scanner. */
+static void
+teco_init_options (Teco_Scanner * dev)
+{
+ int i;
+
+ /* Pre-initialize the options. */
+ memset (dev->opt, 0, sizeof (dev->opt));
+ memset (dev->val, 0, sizeof (dev->val));
+
+ for (i = 0; i < OPT_NUM_OPTIONS; ++i)
+ {
+ dev->opt[i].size = sizeof (SANE_Word);
+ dev->opt[i].cap = SANE_CAP_SOFT_SELECT | SANE_CAP_SOFT_DETECT;
+ }
+
+ /* Number of options. */
+ dev->opt[OPT_NUM_OPTS].name = "";
+ dev->opt[OPT_NUM_OPTS].title = SANE_TITLE_NUM_OPTIONS;
+ dev->opt[OPT_NUM_OPTS].desc = SANE_DESC_NUM_OPTIONS;
+ dev->opt[OPT_NUM_OPTS].type = SANE_TYPE_INT;
+ dev->opt[OPT_NUM_OPTS].cap = SANE_CAP_SOFT_DETECT;
+ dev->val[OPT_NUM_OPTS].w = OPT_NUM_OPTIONS;
+
+ /* Mode group */
+ dev->opt[OPT_MODE_GROUP].title = SANE_I18N ("Scan Mode");
+ dev->opt[OPT_MODE_GROUP].desc = ""; /* not valid for a group */
+ dev->opt[OPT_MODE_GROUP].type = SANE_TYPE_GROUP;
+ dev->opt[OPT_MODE_GROUP].cap = 0;
+ dev->opt[OPT_MODE_GROUP].size = 0;
+ dev->opt[OPT_MODE_GROUP].constraint_type = SANE_CONSTRAINT_NONE;
+
+ /* Scanner supported modes */
+ dev->opt[OPT_MODE].name = SANE_NAME_SCAN_MODE;
+ dev->opt[OPT_MODE].title = SANE_TITLE_SCAN_MODE;
+ dev->opt[OPT_MODE].desc = SANE_DESC_SCAN_MODE;
+ dev->opt[OPT_MODE].type = SANE_TYPE_STRING;
+ dev->opt[OPT_MODE].size = max_string_size (scan_mode_list);
+ dev->opt[OPT_MODE].constraint_type = SANE_CONSTRAINT_STRING_LIST;
+ dev->opt[OPT_MODE].constraint.string_list = scan_mode_list;
+ dev->val[OPT_MODE].s = (SANE_Char *) strdup (""); /* will be set later */
+
+ /* X and Y resolution */
+ dev->opt[OPT_RESOLUTION].name = SANE_NAME_SCAN_RESOLUTION;
+ dev->opt[OPT_RESOLUTION].title = SANE_TITLE_SCAN_RESOLUTION;
+ dev->opt[OPT_RESOLUTION].desc = SANE_DESC_SCAN_RESOLUTION;
+ dev->opt[OPT_RESOLUTION].type = SANE_TYPE_INT;
+ dev->opt[OPT_RESOLUTION].unit = SANE_UNIT_DPI;
+ dev->opt[OPT_RESOLUTION].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_RESOLUTION].constraint.range = &dev->def->res_range;
+ dev->val[OPT_RESOLUTION].w = DEF_RESOLUTION;
+
+ /* Geometry group */
+ dev->opt[OPT_GEOMETRY_GROUP].title = SANE_I18N ("Geometry");
+ dev->opt[OPT_GEOMETRY_GROUP].desc = ""; /* not valid for a group */
+ dev->opt[OPT_GEOMETRY_GROUP].type = SANE_TYPE_GROUP;
+ dev->opt[OPT_GEOMETRY_GROUP].cap = 0;
+ dev->opt[OPT_GEOMETRY_GROUP].size = 0;
+ dev->opt[OPT_GEOMETRY_GROUP].constraint_type = SANE_CONSTRAINT_NONE;
+
+ /* Upper left X */
+ dev->opt[OPT_TL_X].name = SANE_NAME_SCAN_TL_X;
+ dev->opt[OPT_TL_X].title = SANE_TITLE_SCAN_TL_X;
+ dev->opt[OPT_TL_X].desc = SANE_DESC_SCAN_TL_X;
+ dev->opt[OPT_TL_X].type = SANE_TYPE_FIXED;
+ dev->opt[OPT_TL_X].unit = SANE_UNIT_MM;
+ dev->opt[OPT_TL_X].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_TL_X].constraint.range = &dev->def->x_range;
+ dev->val[OPT_TL_X].w = dev->def->x_range.min;
+
+ /* Upper left Y */
+ dev->opt[OPT_TL_Y].name = SANE_NAME_SCAN_TL_Y;
+ dev->opt[OPT_TL_Y].title = SANE_TITLE_SCAN_TL_Y;
+ dev->opt[OPT_TL_Y].desc = SANE_DESC_SCAN_TL_Y;
+ dev->opt[OPT_TL_Y].type = SANE_TYPE_FIXED;
+ dev->opt[OPT_TL_Y].unit = SANE_UNIT_MM;
+ dev->opt[OPT_TL_Y].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_TL_Y].constraint.range = &dev->def->y_range;
+ dev->val[OPT_TL_Y].w = dev->def->y_range.min;
+
+ /* Bottom-right x */
+ dev->opt[OPT_BR_X].name = SANE_NAME_SCAN_BR_X;
+ dev->opt[OPT_BR_X].title = SANE_TITLE_SCAN_BR_X;
+ dev->opt[OPT_BR_X].desc = SANE_DESC_SCAN_BR_X;
+ dev->opt[OPT_BR_X].type = SANE_TYPE_FIXED;
+ dev->opt[OPT_BR_X].unit = SANE_UNIT_MM;
+ dev->opt[OPT_BR_X].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_BR_X].constraint.range = &dev->def->x_range;
+ dev->val[OPT_BR_X].w = dev->def->x_range.max;
+
+ /* Bottom-right y */
+ dev->opt[OPT_BR_Y].name = SANE_NAME_SCAN_BR_Y;
+ dev->opt[OPT_BR_Y].title = SANE_TITLE_SCAN_BR_Y;
+ dev->opt[OPT_BR_Y].desc = SANE_DESC_SCAN_BR_Y;
+ dev->opt[OPT_BR_Y].type = SANE_TYPE_FIXED;
+ dev->opt[OPT_BR_Y].unit = SANE_UNIT_MM;
+ dev->opt[OPT_BR_Y].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_BR_Y].constraint.range = &dev->def->y_range;
+ dev->val[OPT_BR_Y].w = dev->def->y_range.max;
+
+ /* Enhancement group */
+ dev->opt[OPT_ENHANCEMENT_GROUP].title = SANE_I18N ("Enhancement");
+ dev->opt[OPT_ENHANCEMENT_GROUP].desc = ""; /* not valid for a group */
+ dev->opt[OPT_ENHANCEMENT_GROUP].type = SANE_TYPE_GROUP;
+ dev->opt[OPT_ENHANCEMENT_GROUP].cap = SANE_CAP_ADVANCED;
+ dev->opt[OPT_ENHANCEMENT_GROUP].size = 0;
+ dev->opt[OPT_ENHANCEMENT_GROUP].constraint_type = SANE_CONSTRAINT_NONE;
+
+ /* Halftone pattern */
+ dev->opt[OPT_DITHER].name = "dither";
+ dev->opt[OPT_DITHER].title = SANE_I18N ("Dither");
+ dev->opt[OPT_DITHER].desc = SANE_I18N ("Dither");
+ dev->opt[OPT_DITHER].type = SANE_TYPE_STRING;
+ dev->opt[OPT_DITHER].size = max_string_size (dither_list);
+ dev->opt[OPT_DITHER].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_DITHER].constraint_type = SANE_CONSTRAINT_STRING_LIST;
+ dev->opt[OPT_DITHER].constraint.string_list = dither_list;
+ dev->val[OPT_DITHER].s = strdup (dither_list[0]);
+
+ /* custom-gamma table */
+ dev->opt[OPT_CUSTOM_GAMMA].name = SANE_NAME_CUSTOM_GAMMA;
+ dev->opt[OPT_CUSTOM_GAMMA].title = SANE_TITLE_CUSTOM_GAMMA;
+ dev->opt[OPT_CUSTOM_GAMMA].desc = SANE_DESC_CUSTOM_GAMMA;
+ dev->opt[OPT_CUSTOM_GAMMA].type = SANE_TYPE_BOOL;
+ dev->opt[OPT_CUSTOM_GAMMA].cap |= SANE_CAP_INACTIVE;
+ dev->val[OPT_CUSTOM_GAMMA].w = SANE_FALSE;
+
+ /* red gamma vector */
+ dev->opt[OPT_GAMMA_VECTOR_R].name = SANE_NAME_GAMMA_VECTOR_R;
+ dev->opt[OPT_GAMMA_VECTOR_R].title = SANE_TITLE_GAMMA_VECTOR_R;
+ dev->opt[OPT_GAMMA_VECTOR_R].desc = SANE_DESC_GAMMA_VECTOR_R;
+ dev->opt[OPT_GAMMA_VECTOR_R].type = SANE_TYPE_INT;
+ dev->opt[OPT_GAMMA_VECTOR_R].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_R].unit = SANE_UNIT_NONE;
+ dev->opt[OPT_GAMMA_VECTOR_R].size = GAMMA_LENGTH * sizeof (SANE_Word);
+ dev->opt[OPT_GAMMA_VECTOR_R].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_GAMMA_VECTOR_R].constraint.range = &gamma_range;
+ dev->val[OPT_GAMMA_VECTOR_R].wa = dev->gamma_R;
+
+ /* green and gamma vector */
+ dev->opt[OPT_GAMMA_VECTOR_G].name = SANE_NAME_GAMMA_VECTOR_G;
+ dev->opt[OPT_GAMMA_VECTOR_G].title = SANE_TITLE_GAMMA_VECTOR_G;
+ dev->opt[OPT_GAMMA_VECTOR_G].desc = SANE_DESC_GAMMA_VECTOR_G;
+ dev->opt[OPT_GAMMA_VECTOR_G].type = SANE_TYPE_INT;
+ dev->opt[OPT_GAMMA_VECTOR_G].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_G].unit = SANE_UNIT_NONE;
+ dev->opt[OPT_GAMMA_VECTOR_G].size = GAMMA_LENGTH * sizeof (SANE_Word);
+ dev->opt[OPT_GAMMA_VECTOR_G].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_GAMMA_VECTOR_G].constraint.range = &gamma_range;
+ dev->val[OPT_GAMMA_VECTOR_G].wa = dev->gamma_G;
+
+ /* blue gamma vector */
+ dev->opt[OPT_GAMMA_VECTOR_B].name = SANE_NAME_GAMMA_VECTOR_B;
+ dev->opt[OPT_GAMMA_VECTOR_B].title = SANE_TITLE_GAMMA_VECTOR_B;
+ dev->opt[OPT_GAMMA_VECTOR_B].desc = SANE_DESC_GAMMA_VECTOR_B;
+ dev->opt[OPT_GAMMA_VECTOR_B].type = SANE_TYPE_INT;
+ dev->opt[OPT_GAMMA_VECTOR_B].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_B].unit = SANE_UNIT_NONE;
+ dev->opt[OPT_GAMMA_VECTOR_B].size = GAMMA_LENGTH * sizeof (SANE_Word);
+ dev->opt[OPT_GAMMA_VECTOR_B].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_GAMMA_VECTOR_B].constraint.range = &gamma_range;
+ dev->val[OPT_GAMMA_VECTOR_B].wa = dev->gamma_B;
+
+ /* grayscale gamma vector */
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].name = SANE_NAME_GAMMA_VECTOR;
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].title = SANE_TITLE_GAMMA_VECTOR;
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].desc = SANE_DESC_GAMMA_VECTOR;
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].type = SANE_TYPE_INT;
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].unit = SANE_UNIT_NONE;
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].size = GAMMA_LENGTH * sizeof (SANE_Word);
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].constraint.range = &gamma_range;
+ dev->val[OPT_GAMMA_VECTOR_GRAY].wa = dev->gamma_GRAY;
+
+ /* Color filter */
+ dev->opt[OPT_FILTER_COLOR].name = "color-filter";
+ dev->opt[OPT_FILTER_COLOR].title = "Color dropout";
+ dev->opt[OPT_FILTER_COLOR].desc = "Color dropout";
+ dev->opt[OPT_FILTER_COLOR].type = SANE_TYPE_STRING;
+ dev->opt[OPT_FILTER_COLOR].size = max_string_size (filter_color_list);
+ dev->opt[OPT_FILTER_COLOR].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_FILTER_COLOR].constraint_type = SANE_CONSTRAINT_STRING_LIST;
+ dev->opt[OPT_FILTER_COLOR].constraint.string_list = filter_color_list;
+ dev->val[OPT_FILTER_COLOR].s = (SANE_Char *) strdup (filter_color_list[0]);
+
+ /* Threshold */
+ dev->opt[OPT_THRESHOLD].name = SANE_NAME_THRESHOLD;
+ dev->opt[OPT_THRESHOLD].title = SANE_TITLE_THRESHOLD;
+ dev->opt[OPT_THRESHOLD].desc = SANE_DESC_THRESHOLD;
+ dev->opt[OPT_THRESHOLD].type = SANE_TYPE_INT;
+ dev->opt[OPT_THRESHOLD].unit = SANE_UNIT_NONE;
+ dev->opt[OPT_THRESHOLD].size = sizeof (SANE_Int);
+ dev->opt[OPT_THRESHOLD].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_THRESHOLD].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_THRESHOLD].constraint.range = &threshold_range;
+ dev->val[OPT_THRESHOLD].w = 128;
+
+ /* preview */
+ dev->opt[OPT_PREVIEW].name = SANE_NAME_PREVIEW;
+ dev->opt[OPT_PREVIEW].title = SANE_TITLE_PREVIEW;
+ dev->opt[OPT_PREVIEW].desc = SANE_DESC_PREVIEW;
+ dev->opt[OPT_PREVIEW].type = SANE_TYPE_BOOL;
+ dev->opt[OPT_PREVIEW].cap = SANE_CAP_SOFT_DETECT | SANE_CAP_SOFT_SELECT;
+ dev->val[OPT_PREVIEW].w = SANE_FALSE;
+
+ /* red level calibration manual correction */
+ dev->opt[OPT_WHITE_LEVEL_R].name = SANE_NAME_WHITE_LEVEL_R;
+ dev->opt[OPT_WHITE_LEVEL_R].title = SANE_TITLE_WHITE_LEVEL_R;
+ dev->opt[OPT_WHITE_LEVEL_R].desc = SANE_DESC_WHITE_LEVEL_R;
+ dev->opt[OPT_WHITE_LEVEL_R].type = SANE_TYPE_INT;
+ dev->opt[OPT_WHITE_LEVEL_R].unit = SANE_UNIT_NONE;
+ dev->opt[OPT_WHITE_LEVEL_R].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_WHITE_LEVEL_R].constraint.range = &red_level_range;
+ dev->val[OPT_WHITE_LEVEL_R].w = 32; /* to get middle value */
+
+ /* green level calibration manual correction */
+ dev->opt[OPT_WHITE_LEVEL_G].name = SANE_NAME_WHITE_LEVEL_G;
+ dev->opt[OPT_WHITE_LEVEL_G].title = SANE_TITLE_WHITE_LEVEL_G;
+ dev->opt[OPT_WHITE_LEVEL_G].desc = SANE_DESC_WHITE_LEVEL_G;
+ dev->opt[OPT_WHITE_LEVEL_G].type = SANE_TYPE_INT;
+ dev->opt[OPT_WHITE_LEVEL_G].unit = SANE_UNIT_NONE;
+ dev->opt[OPT_WHITE_LEVEL_G].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_WHITE_LEVEL_G].constraint.range = &green_level_range;
+ dev->val[OPT_WHITE_LEVEL_G].w = 32; /* to get middle value */
+
+ /* blue level calibration manual correction */
+ dev->opt[OPT_WHITE_LEVEL_B].name = SANE_NAME_WHITE_LEVEL_B;
+ dev->opt[OPT_WHITE_LEVEL_B].title = SANE_TITLE_WHITE_LEVEL_B;
+ dev->opt[OPT_WHITE_LEVEL_B].desc = SANE_DESC_WHITE_LEVEL_B;
+ dev->opt[OPT_WHITE_LEVEL_B].type = SANE_TYPE_INT;
+ dev->opt[OPT_WHITE_LEVEL_B].unit = SANE_UNIT_NONE;
+ dev->opt[OPT_WHITE_LEVEL_B].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_WHITE_LEVEL_B].constraint.range = &blue_level_range;
+ dev->val[OPT_WHITE_LEVEL_B].w = 32; /* to get middle value */
+
+ /* Lastly, set the default scan mode. This might change some
+ * values previously set here. */
+ sane_control_option (dev, OPT_MODE, SANE_ACTION_SET_VALUE,
+ (SANE_String_Const *) scan_mode_list[0], NULL);
+}
+
+/*
+ * Wait until the scanner is ready.
+ */
+static SANE_Status
+teco_wait_scanner (Teco_Scanner * dev)
+{
+ SANE_Status status;
+ int timeout;
+ CDB cdb;
+
+ DBG (DBG_proc, "teco_wait_scanner: enter\n");
+
+ MKSCSI_TEST_UNIT_READY (cdb);
+
+ /* Set the timeout to 60 seconds. */
+ timeout = 60;
+
+ while (timeout > 0)
+ {
+
+ /* test unit ready */
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd (dev->sfd, cdb.data, cdb.len, NULL, NULL);
+
+ if (status == SANE_STATUS_GOOD)
+ {
+ return SANE_STATUS_GOOD;
+ }
+
+ sleep (1);
+ };
+
+ DBG (DBG_proc, "teco_wait_scanner: scanner not ready\n");
+ return (SANE_STATUS_IO_ERROR);
+}
+
+/*
+ * Adjust the rasters. This function is used during a color scan,
+ * because the scanner does not present a format sane can interpret
+ * directly.
+ *
+ * The scanner sends the colors by rasters (B then G then R), whereas
+ * sane is waiting for a group of 3 bytes per color. To make things
+ * funnier, the rasters are shifted. As a result, color planes appear to be shifted be a few pixels.
+ *
+ * The order of the color is dependant on each scanners. Also the same
+ * scanner can change the order depending on the resolution.
+ *
+ * For instance, the VM6586 at 300dpi has a color shift of 2 lines. The rasters sent are:
+ * starts with two blue rasters - BB,
+ * then red in added - BRBR
+ * then green - BRG ... (most of the picture)
+ * then blue is removed - RGRG
+ * and finaly only green stays - GG
+ *
+ * Overall there is the same number of RGB rasters.
+ * The VM3575 is a variant (when factor_x is 0). It does not keep the same order,
+ * but reverses it, eg:
+ * BB RBRB GRB... GRGR GG
+ * (ie it adds the new color in front of the previous one, instead of after).
+ *
+ * So this function reorders all that mess. It gets the input from
+ * dev->buffer and write the output in dev->image. size_in the the
+ * length of the valid data in dev->buffer. */
+
+#define COLOR_0 (color_adjust->z3_color_0)
+#define COLOR_1 (color_adjust->z3_color_1)
+#define COLOR_2 (color_adjust->z3_color_2)
+
+static void
+teco_adjust_raster (Teco_Scanner * dev, size_t size_in)
+{
+ int nb_rasters; /* number of rasters in dev->buffer */
+
+ int raster; /* current raster number in buffer */
+ int line; /* line number for that raster */
+ int color; /* color for that raster */
+ size_t offset;
+ const struct dpi_color_adjust *color_adjust = dev->color_adjust;
+
+ DBG (DBG_proc, "teco_adjust_raster: enter\n");
+
+ color = 0; /* keep gcc quiet */
+
+ assert (dev->scan_mode == TECO_COLOR);
+ assert ((size_in % dev->params.bytes_per_line) == 0);
+
+ if (size_in == 0)
+ {
+ return;
+ }
+
+ /*
+ * The color coding is one line for each color (in the RGB order).
+ * Recombine that stuff to create a RGB value for each pixel.
+ */
+
+ nb_rasters = size_in / dev->raster_size;
+
+ for (raster = 0; raster < nb_rasters; raster++)
+ {
+
+ /*
+ * Find the color and the line which this raster belongs to.
+ */
+ line = 0;
+ if (dev->raster_num < color_adjust->color_shift)
+ {
+ /* Top of the picture. */
+ if (color_adjust->factor_x)
+ {
+ color = COLOR_2;
+ }
+ else
+ {
+ color = COLOR_1;
+ }
+ line = dev->raster_num;
+ }
+ else if (dev->raster_num < (3 * color_adjust->color_shift))
+ {
+ /* Top of the picture. */
+ if ((dev->raster_num - color_adjust->color_shift) % 2)
+ {
+ color = COLOR_0;
+ line = (dev->raster_num - color_adjust->color_shift) / 2;
+ }
+ else
+ {
+ if (color_adjust->factor_x)
+ {
+ color = COLOR_2;
+ }
+ else
+ {
+ color = COLOR_1;
+ }
+ line = (dev->raster_num + color_adjust->color_shift) / 2;
+ }
+ }
+ else if (dev->raster_num >=
+ dev->raster_real - color_adjust->color_shift)
+ {
+ /* Bottom of the picture. */
+ if (color_adjust->factor_x)
+ {
+ color = COLOR_1;
+ }
+ else
+ {
+ color = COLOR_2;
+ }
+ line = dev->line;
+ }
+ else if (dev->raster_num >=
+ dev->raster_real - 3 * color_adjust->color_shift)
+ {
+ /* Bottom of the picture. */
+ if ((dev->raster_real - dev->raster_num -
+ color_adjust->color_shift) % 2)
+ {
+ if (color_adjust->factor_x)
+ {
+ color = COLOR_1;
+ line = dev->line;
+ }
+ else
+ {
+ color = COLOR_0;
+ line = dev->line + color_adjust->color_shift - 1;
+ }
+ }
+ else
+ {
+ if (color_adjust->factor_x)
+ {
+ color = COLOR_0;
+ line = dev->line + color_adjust->color_shift;
+ }
+ else
+ {
+ color = COLOR_2;
+ line = dev->line;
+ }
+ }
+ }
+ else
+ {
+ /* Middle of the picture. */
+ switch ((dev->raster_num) % 3)
+ {
+ case 0:
+ color = COLOR_2;
+ if (color_adjust->factor_x)
+ line = dev->raster_num / 3 + color_adjust->color_shift;
+ else
+ line = dev->raster_num / 3 - color_adjust->color_shift;
+ break;
+ case 1:
+ color = COLOR_0;
+ line = dev->raster_num / 3;
+ break;
+ case 2:
+ color = COLOR_1;
+ if (color_adjust->factor_x)
+ line = dev->raster_num / 3 - color_adjust->color_shift;
+ else
+ line = dev->raster_num / 3 + color_adjust->color_shift;
+ break;
+ }
+ }
+
+ /* Adjust the line number relative to the image. */
+ line -= dev->line;
+
+ offset = dev->image_end + line * dev->params.bytes_per_line;
+
+ assert (offset <= (dev->image_size - dev->params.bytes_per_line));
+
+ /* Copy the raster to the temporary image. */
+ {
+ int i;
+ unsigned char *src = dev->buffer + raster * dev->raster_size;
+ unsigned char *dest = dev->image + offset + color;
+
+ for (i = 0; i < dev->raster_size; i++)
+ {
+ *dest = *src;
+ src++;
+ dest += 3;
+ }
+ }
+
+ DBG (DBG_info, "raster=%d, line=%d, color=%d\n", dev->raster_num,
+ dev->line + line, color);
+
+ if ((color_adjust->factor_x == 0 && color == COLOR_2) ||
+ (color_adjust->factor_x == 1 && color == COLOR_1))
+ {
+ /* This blue raster completes a new line */
+ dev->line++;
+ dev->image_end += dev->params.bytes_per_line;
+ }
+
+ dev->raster_num++;
+ }
+
+ DBG (DBG_proc, "teco_adjust_raster: exit\n");
+}
+
+/* Read the image from the scanner and fill the temporary buffer with it. */
+static SANE_Status
+teco_fill_image (Teco_Scanner * dev)
+{
+ SANE_Status status;
+ size_t size;
+ CDB cdb;
+
+ DBG (DBG_proc, "teco_fill_image: enter\n");
+
+ assert (dev->image_begin == dev->image_end);
+ assert (dev->real_bytes_left > 0);
+
+ /* Copy the complete lines, plus the incompletes
+ * ones. We don't keep the real end of data used
+ * in image, so we copy the biggest possible.
+ *
+ * This is a no-op for non color images.
+ */
+ memmove (dev->image, dev->image + dev->image_begin, dev->raster_ahead);
+
+ dev->image_begin = 0;
+ dev->image_end = 0;
+
+ while (dev->real_bytes_left)
+ {
+ /*
+ * Try to read the maximum number of bytes.
+ */
+ size = dev->real_bytes_left;
+ if (size > dev->image_size - dev->raster_ahead - dev->image_end)
+ {
+ size = dev->image_size - dev->raster_ahead - dev->image_end;
+ }
+ if (size > dev->buffer_size)
+ {
+ size = dev->buffer_size;
+ }
+
+ /* Limit to 0x2000 bytes as does the TWAIN driver. */
+ if (size > 0x2000)
+ size = 0x2000;
+
+ /* Round down to a multiple of line size. */
+ size = size - (size % dev->params.bytes_per_line);
+
+ if (size == 0)
+ {
+ /* Probably reached the end of the buffer.
+ * Check, just in case. */
+ assert (dev->image_end != 0);
+ return (SANE_STATUS_GOOD);
+ }
+
+ DBG (DBG_info, "teco_fill_image: to read = %ld bytes (bpl=%d)\n",
+ (long) size, dev->params.bytes_per_line);
+
+ MKSCSI_READ_10 (cdb, 0, 0, size);
+ cdb.data[5] = size / dev->params.bytes_per_line;
+
+ hexdump (DBG_info2, "teco_fill_image: READ_10 CDB", cdb.data, cdb.len);
+
+ hexdump (DBG_info2, "CDB:", cdb.data, cdb.len);
+ status = sanei_scsi_cmd2 (dev->sfd, cdb.data, cdb.len,
+ NULL, 0, dev->buffer, &size);
+
+#ifdef sim
+ memcpy (dev->buffer, image_buf + image_buf_begin, size);
+ image_buf_begin += size;
+#endif
+
+ if (status != SANE_STATUS_GOOD)
+ {
+ DBG (DBG_error, "teco_fill_image: cannot read from the scanner\n");
+ return status;
+ }
+
+ DBG (DBG_info, "teco_fill_image: real bytes left = %ld\n",
+ (long) dev->real_bytes_left);
+
+ if (dev->scan_mode == TECO_COLOR &&
+ dev->def->tecoref != TECO_VM656A && raw_output == 0)
+ {
+ teco_adjust_raster (dev, size);
+ }
+ else
+ {
+ memcpy (dev->image + dev->image_end, dev->buffer, size);
+ dev->image_end += size;
+ }
+ dev->real_bytes_left -= size;
+ }
+
+ return (SANE_STATUS_GOOD); /* unreachable */
+}
+
+/* Copy from the raw buffer to the buffer given by the backend.
+ *
+ * len in input is the maximum length available in buf, and, in
+ * output, is the length written into buf.
+ */
+static void
+teco_copy_raw_to_frontend (Teco_Scanner * dev, SANE_Byte * buf, size_t * len)
+{
+ size_t size;
+
+ size = dev->image_end - dev->image_begin;
+ if (size > *len)
+ {
+ size = *len;
+ }
+ *len = size;
+
+ switch (dev->scan_mode)
+ {
+ case TECO_BW:
+ {
+ /* Invert black and white. */
+ unsigned char *src = dev->image + dev->image_begin;
+ size_t i;
+
+ for (i = 0; i < size; i++)
+ {
+ *buf = *src ^ 0xff;
+ src++;
+ buf++;
+ }
+ }
+ break;
+
+ case TECO_GRAYSCALE:
+ case TECO_COLOR:
+ memcpy (buf, dev->image + dev->image_begin, size);
+ break;
+ }
+
+ dev->image_begin += size;
+}
+
+/* Stop a scan. */
+static SANE_Status
+do_cancel (Teco_Scanner * dev)
+{
+ DBG (DBG_sane_proc, "do_cancel enter\n");
+
+ if (dev->scanning == SANE_TRUE)
+ {
+
+ /* Reset the scanner */
+ teco_reset_window (dev);
+ teco_close (dev);
+ }
+
+ dev->scanning = SANE_FALSE;
+
+ DBG (DBG_sane_proc, "do_cancel exit\n");
+
+ return SANE_STATUS_CANCELLED;
+}
+
+/*--------------------------------------------------------------------------*/
+
+/* Sane entry points */
+
+SANE_Status
+sane_init (SANE_Int * version_code, SANE_Auth_Callback __sane_unused__ authorize)
+{
+ FILE *fp;
+ char dev_name[PATH_MAX];
+ size_t len;
+
+ DBG_INIT ();
+
+ DBG (DBG_sane_init, "sane_init\n");
+
+ DBG (DBG_error, "This is sane-teco2 version %d.%d-%d\n", SANE_CURRENT_MAJOR,
+ V_MINOR, BUILD);
+ DBG (DBG_error, "(C) 2002 - 2003 by Frank Zago, update 2003 - 2008 by Gerard Klaver\n");
+
+ if (version_code)
+ {
+ *version_code = SANE_VERSION_CODE (SANE_CURRENT_MAJOR, V_MINOR, BUILD);
+ }
+
+ fp = sanei_config_open (TECO2_CONFIG_FILE);
+ if (!fp)
+ {
+ /* default to /dev/scanner instead of insisting on config file */
+ attach_scanner ("/dev/scanner", 0);
+ return SANE_STATUS_GOOD;
+ }
+
+ while (sanei_config_read (dev_name, sizeof (dev_name), fp))
+ {
+ if (dev_name[0] == '#') /* ignore line comments */
+ continue;
+ len = strlen (dev_name);
+
+ if (!len)
+ continue; /* ignore empty lines */
+
+ sanei_config_attach_matching_devices (dev_name, attach_one);
+ }
+
+ fclose (fp);
+
+ DBG (DBG_proc, "sane_init: leave\n");
+
+ return SANE_STATUS_GOOD;
+}
+
+SANE_Status
+sane_get_devices (const SANE_Device *** device_list, SANE_Bool __sane_unused__ local_only)
+{
+ Teco_Scanner *dev;
+ int i;
+
+ DBG (DBG_proc, "sane_get_devices: enter\n");
+
+ if (devlist)
+ free (devlist);
+
+ devlist = malloc ((num_devices + 1) * sizeof (devlist[0]));
+ if (!devlist)
+ return SANE_STATUS_NO_MEM;
+
+ i = 0;
+ for (dev = first_dev; i < num_devices; dev = dev->next)
+ devlist[i++] = &dev->sane;
+ devlist[i++] = 0;
+
+ *device_list = devlist;
+
+ DBG (DBG_proc, "sane_get_devices: exit\n");
+
+ return SANE_STATUS_GOOD;
+}
+
+SANE_Status
+sane_open (SANE_String_Const devicename, SANE_Handle * handle)
+{
+ Teco_Scanner *dev;
+ SANE_Status status;
+ int i;
+
+ DBG (DBG_proc, "sane_open: enter\n");
+
+ /* search for devicename */
+ if (devicename[0])
+ {
+ DBG (DBG_info, "sane_open: devicename=%s\n", devicename);
+
+ for (dev = first_dev; dev; dev = dev->next)
+ {
+ if (strcmp (dev->sane.name, devicename) == 0)
+ {
+ break;
+ }
+ }
+
+ if (!dev)
+ {
+ status = attach_scanner (devicename, &dev);
+ if (status != SANE_STATUS_GOOD)
+ {
+ return status;
+ }
+ }
+ }
+ else
+ {
+ DBG (DBG_sane_info, "sane_open: no devicename, opening first device\n");
+ dev = first_dev; /* empty devicename -> use first device */
+ }
+
+ if (!dev)
+ {
+ DBG (DBG_error, "No scanner found\n");
+
+ return SANE_STATUS_INVAL;
+ }
+
+ teco_init_options (dev);
+
+ /* Initialize the gamma table. */
+ for (i = 0; i < GAMMA_LENGTH; i++)
+ {
+ dev->gamma_R[i] = i / 4;
+ dev->gamma_G[i] = i / 4;
+ dev->gamma_B[i] = i / 4;
+ dev->gamma_GRAY[i] = i / 4;
+ }
+
+ *handle = dev;
+
+ DBG (DBG_proc, "sane_open: exit\n");
+
+ return SANE_STATUS_GOOD;
+}
+
+const SANE_Option_Descriptor *
+sane_get_option_descriptor (SANE_Handle handle, SANE_Int option)
+{
+ Teco_Scanner *dev = handle;
+
+ DBG (DBG_proc, "sane_get_option_descriptor: enter, option %d\n", option);
+
+ if ((unsigned) option >= OPT_NUM_OPTIONS)
+ {
+ return NULL;
+ }
+
+ DBG (DBG_proc, "sane_get_option_descriptor: exit\n");
+
+ return dev->opt + option;
+}
+
+SANE_Status
+sane_control_option (SANE_Handle handle, SANE_Int option,
+ SANE_Action action, void *val, SANE_Int * info)
+{
+ Teco_Scanner *dev = handle;
+ SANE_Status status;
+ SANE_Word cap;
+
+ DBG (DBG_proc, "sane_control_option: enter, option %d, action %d\n",
+ option, action);
+
+ if (info)
+ {
+ *info = 0;
+ }
+
+ if (dev->scanning)
+ {
+ return SANE_STATUS_DEVICE_BUSY;
+ }
+
+ if (option < 0 || option >= OPT_NUM_OPTIONS)
+ {
+ return SANE_STATUS_INVAL;
+ }
+
+ cap = dev->opt[option].cap;
+ if (!SANE_OPTION_IS_ACTIVE (cap))
+ {
+ return SANE_STATUS_INVAL;
+ }
+
+ if (action == SANE_ACTION_GET_VALUE)
+ {
+
+ switch (option)
+ {
+ /* word options */
+ case OPT_NUM_OPTS:
+ case OPT_RESOLUTION:
+ case OPT_TL_Y:
+ case OPT_BR_Y:
+ case OPT_TL_X:
+ case OPT_BR_X:
+ case OPT_CUSTOM_GAMMA:
+ case OPT_PREVIEW:
+ case OPT_THRESHOLD:
+ case OPT_WHITE_LEVEL_R:
+ case OPT_WHITE_LEVEL_G:
+ case OPT_WHITE_LEVEL_B:
+ *(SANE_Word *) val = dev->val[option].w;
+ return SANE_STATUS_GOOD;
+
+ /* string options */
+ case OPT_MODE:
+ case OPT_DITHER:
+ case OPT_FILTER_COLOR:
+ strcpy (val, dev->val[option].s);
+ return SANE_STATUS_GOOD;
+
+ /* Gamma */
+ case OPT_GAMMA_VECTOR_R:
+ case OPT_GAMMA_VECTOR_G:
+ case OPT_GAMMA_VECTOR_B:
+ case OPT_GAMMA_VECTOR_GRAY:
+ memcpy (val, dev->val[option].wa, dev->opt[option].size);
+ return SANE_STATUS_GOOD;
+
+ default:
+ return SANE_STATUS_INVAL;
+ }
+ }
+ else if (action == SANE_ACTION_SET_VALUE)
+ {
+
+ if (!SANE_OPTION_IS_SETTABLE (cap))
+ {
+ DBG (DBG_error, "could not set option, not settable\n");
+ return SANE_STATUS_INVAL;
+ }
+
+ status = sanei_constrain_value (dev->opt + option, val, info);
+ if (status != SANE_STATUS_GOOD)
+ {
+ DBG (DBG_error, "could not set option, invalid value\n");
+ return status;
+ }
+
+ switch (option)
+ {
+
+ /* Numeric side-effect options */
+ case OPT_TL_Y:
+ case OPT_BR_Y:
+ case OPT_TL_X:
+ case OPT_BR_X:
+ case OPT_THRESHOLD:
+ case OPT_RESOLUTION:
+ case OPT_WHITE_LEVEL_R:
+ case OPT_WHITE_LEVEL_G:
+ case OPT_WHITE_LEVEL_B:
+ if (info)
+ {
+ *info |= SANE_INFO_RELOAD_PARAMS;
+ }
+ dev->val[option].w = *(SANE_Word *) val;
+ return SANE_STATUS_GOOD;
+
+ /* Numeric side-effect free options */
+ case OPT_PREVIEW:
+ dev->val[option].w = *(SANE_Word *) val;
+ return SANE_STATUS_GOOD;
+
+ /* String side-effect free options */
+ case OPT_DITHER:
+ free (dev->val[option].s);
+ dev->val[option].s = (SANE_String) strdup (val);
+ return SANE_STATUS_GOOD;
+
+ case OPT_FILTER_COLOR:
+ free (dev->val[option].s);
+ dev->val[option].s = (SANE_String) strdup (val);
+ return SANE_STATUS_GOOD;
+
+ /* String side-effect options */
+ case OPT_MODE:
+ if (strcmp (dev->val[option].s, val) == 0)
+ return SANE_STATUS_GOOD;
+
+ free (dev->val[OPT_MODE].s);
+ dev->val[OPT_MODE].s = (SANE_Char *) strdup (val);
+
+ dev->opt[OPT_CUSTOM_GAMMA].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_R].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_G].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_B].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_DITHER].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_FILTER_COLOR].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_THRESHOLD].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_R].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_G].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_B].cap |= SANE_CAP_INACTIVE;
+
+
+ /* This the default resolution range, except for the
+ * VM3575, VM3564, VM356A and VM6586 in color mode. */
+ dev->opt[OPT_RESOLUTION].constraint_type = SANE_CONSTRAINT_RANGE;
+ dev->opt[OPT_RESOLUTION].constraint.range = &dev->def->res_range;
+
+ if (strcmp (dev->val[OPT_MODE].s, SANE_VALUE_SCAN_MODE_LINEART) == 0)
+ {
+ dev->scan_mode = TECO_BW;
+ dev->depth = 8;
+ dev->opt[OPT_DITHER].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_FILTER_COLOR].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_THRESHOLD].cap &= ~SANE_CAP_INACTIVE;
+ }
+ else if (strcmp (dev->val[OPT_MODE].s, SANE_VALUE_SCAN_MODE_GRAY) == 0)
+ {
+ dev->scan_mode = TECO_GRAYSCALE;
+ dev->depth = 8;
+
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3564:
+ case TECO_VM356A:
+ dev->opt[OPT_WHITE_LEVEL_R].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_G].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_B].cap &= ~SANE_CAP_INACTIVE;
+ break;
+ case TECO_VM3575:
+ case TECO_VM6575:
+ dev->opt[OPT_WHITE_LEVEL_R].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_G].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_B].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_CUSTOM_GAMMA].cap &= ~SANE_CAP_INACTIVE;
+ if (dev->val[OPT_CUSTOM_GAMMA].w)
+ {
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].cap &=
+ ~SANE_CAP_INACTIVE;
+ }
+ break;
+ case TECO_VM656A:
+ case TECO_VM6586:
+ dev->opt[OPT_CUSTOM_GAMMA].cap &= ~SANE_CAP_INACTIVE;
+ if (dev->val[OPT_CUSTOM_GAMMA].w)
+ {
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].cap &=
+ ~SANE_CAP_INACTIVE;
+ }
+ break;
+ }
+ dev->opt[OPT_FILTER_COLOR].cap &= ~SANE_CAP_INACTIVE;
+ }
+ else if (strcmp (dev->val[OPT_MODE].s, SANE_VALUE_SCAN_MODE_COLOR) == 0)
+ {
+ dev->scan_mode = TECO_COLOR;
+ dev->depth = 8;
+
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3564:
+ case TECO_VM356A:
+ dev->opt[OPT_WHITE_LEVEL_R].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_G].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_B].cap &= ~SANE_CAP_INACTIVE;
+ break;
+ case TECO_VM3575:
+ case TECO_VM6575:
+ dev->opt[OPT_WHITE_LEVEL_R].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_G].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_WHITE_LEVEL_B].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_CUSTOM_GAMMA].cap &= ~SANE_CAP_INACTIVE;
+ if (dev->val[OPT_CUSTOM_GAMMA].w)
+ {
+ dev->opt[OPT_GAMMA_VECTOR_R].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_G].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_B].cap &= ~SANE_CAP_INACTIVE;
+ }
+ break;
+ case TECO_VM656A:
+ case TECO_VM6586:
+ dev->opt[OPT_CUSTOM_GAMMA].cap &= ~SANE_CAP_INACTIVE;
+ if (dev->val[OPT_CUSTOM_GAMMA].w)
+ {
+ dev->opt[OPT_GAMMA_VECTOR_R].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_G].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_B].cap &= ~SANE_CAP_INACTIVE;
+ }
+ break;
+ }
+ /* The VM3575, VM3564, VM356A and VM6586 supports only a handful of resolution. Do that here.
+ * Ugly! */
+ if (dev->resolutions_list != NULL)
+ {
+ int i;
+
+ dev->opt[OPT_RESOLUTION].constraint_type =
+ SANE_CONSTRAINT_WORD_LIST;
+ dev->opt[OPT_RESOLUTION].constraint.word_list =
+ dev->resolutions_list;
+
+ /* If the resolution isn't in the list, set a default. */
+ for (i = 1; i <= dev->resolutions_list[0]; i++)
+ {
+ if (dev->resolutions_list[i] >=
+ dev->val[OPT_RESOLUTION].w)
+ break;
+ }
+ if (i > dev->resolutions_list[0])
+ {
+ /* Too big. Take default. */
+ dev->val[OPT_RESOLUTION].w = DEF_RESOLUTION;
+ }
+ else
+ {
+ /* Take immediate superioir value. */
+ dev->val[OPT_RESOLUTION].w = dev->resolutions_list[i];
+ }
+ }
+ }
+
+ if (info)
+ {
+ *info |= SANE_INFO_RELOAD_OPTIONS | SANE_INFO_RELOAD_PARAMS;
+ }
+ return SANE_STATUS_GOOD;
+
+ case OPT_GAMMA_VECTOR_R:
+ case OPT_GAMMA_VECTOR_G:
+ case OPT_GAMMA_VECTOR_B:
+ case OPT_GAMMA_VECTOR_GRAY:
+ memcpy (dev->val[option].wa, val, dev->opt[option].size);
+ return SANE_STATUS_GOOD;
+
+ case OPT_CUSTOM_GAMMA:
+ dev->val[OPT_CUSTOM_GAMMA].w = *(SANE_Word *) val;
+ if (dev->val[OPT_CUSTOM_GAMMA].w)
+ {
+ /* use custom_gamma_table */
+ if (dev->scan_mode == TECO_GRAYSCALE)
+ {
+ dev->opt[OPT_GAMMA_VECTOR_GRAY].cap &= ~SANE_CAP_INACTIVE;
+ }
+ else
+ {
+ /* color mode */
+ dev->opt[OPT_GAMMA_VECTOR_R].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_G].cap &= ~SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_B].cap &= ~SANE_CAP_INACTIVE;
+ }
+ }
+ else
+ {
+ dev->opt[OPT_GAMMA_VECTOR_R].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_G].cap |= SANE_CAP_INACTIVE;
+ dev->opt[OPT_GAMMA_VECTOR_B].cap |= SANE_CAP_INACTIVE;
+ }
+ if (info)
+ {
+ *info |= SANE_INFO_RELOAD_OPTIONS;
+ }
+ return SANE_STATUS_GOOD;
+
+ default:
+ return SANE_STATUS_INVAL;
+ }
+ }
+
+ DBG (DBG_proc, "sane_control_option: exit, bad\n");
+
+ return SANE_STATUS_UNSUPPORTED;
+}
+
+SANE_Status
+sane_get_parameters (SANE_Handle handle, SANE_Parameters * params)
+{
+ Teco_Scanner *dev = handle;
+
+ DBG (DBG_proc, "sane_get_parameters: enter\n");
+
+ if (!(dev->scanning))
+ {
+
+ /* Setup the parameters for the scan. These values will be re-used
+ * in the SET WINDOWS command. */
+ if (dev->val[OPT_PREVIEW].w == SANE_TRUE)
+ {
+ /* for VM356A, no good 50 dpi scan possible, now leave as */
+
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM356A:
+ case TECO_VM6575:
+ dev->x_resolution = 75;
+ dev->y_resolution = 75;
+ break;
+ /* For VM3575, VM656A, VM6586 etc until otherwise default value is used */
+ default:
+ dev->x_resolution = 50;
+ dev->y_resolution = 50;
+ break;
+ }
+ dev->x_tl = 0;
+ dev->y_tl = 0;
+ dev->x_br = mmToIlu (SANE_UNFIX (dev->def->x_range.max));
+ dev->y_br = mmToIlu (SANE_UNFIX (dev->def->y_range.max));
+ }
+ else
+ {
+ dev->x_resolution = dev->val[OPT_RESOLUTION].w;
+ dev->y_resolution = dev->val[OPT_RESOLUTION].w;
+
+ dev->x_tl = mmToIlu (SANE_UNFIX (dev->val[OPT_TL_X].w));
+ dev->y_tl = mmToIlu (SANE_UNFIX (dev->val[OPT_TL_Y].w));
+ dev->x_br = mmToIlu (SANE_UNFIX (dev->val[OPT_BR_X].w));
+ dev->y_br = mmToIlu (SANE_UNFIX (dev->val[OPT_BR_Y].w));
+ }
+
+ if (dev->x_resolution > dev->def->x_resolution_max)
+ {
+ dev->x_resolution = dev->def->x_resolution_max;
+ }
+
+ /* Check the corners are OK. */
+ if (dev->x_tl > dev->x_br)
+ {
+ int s;
+ s = dev->x_tl;
+ dev->x_tl = dev->x_br;
+ dev->x_br = s;
+ }
+ if (dev->y_tl > dev->y_br)
+ {
+ int s;
+ s = dev->y_tl;
+ dev->y_tl = dev->y_br;
+ dev->y_br = s;
+ }
+
+ dev->width = dev->x_br - dev->x_tl;
+ dev->length = dev->y_br - dev->y_tl;
+
+ /* Prepare the parameters for the caller. */
+ memset (&dev->params, 0, sizeof (SANE_Parameters));
+
+ dev->params.last_frame = SANE_TRUE;
+
+ switch (dev->scan_mode)
+ {
+ case TECO_BW:
+ dev->params.format = SANE_FRAME_GRAY;
+ dev->params.pixels_per_line =
+ ((dev->width * dev->x_resolution) /
+ dev->def->x_resolution_max) & ~0x7;
+ dev->params.bytes_per_line = dev->params.pixels_per_line / 8;
+ dev->params.depth = 1;
+ dev->color_adjust = NULL;
+ break;
+ case TECO_GRAYSCALE:
+ dev->params.format = SANE_FRAME_GRAY;
+ dev->params.pixels_per_line =
+ ((dev->width * dev->x_resolution) / dev->def->x_resolution_max);
+ if ((dev->def->tecoref == TECO_VM656A
+ || dev->def->tecoref == TECO_VM6586)
+ && ((dev->width * dev->x_resolution) %
+ dev->def->x_resolution_max != 0))
+ {
+ /* Round up */
+ dev->params.pixels_per_line += 1;
+ }
+ dev->params.bytes_per_line = dev->params.pixels_per_line;
+ dev->params.depth = 8;
+ dev->color_adjust = NULL;
+ break;
+ case TECO_COLOR:
+ dev->params.format = SANE_FRAME_RGB;
+ dev->params.pixels_per_line =
+ ((dev->width * dev->x_resolution) / dev->def->x_resolution_max);
+ if ((dev->def->tecoref == TECO_VM656A
+ || dev->def->tecoref == TECO_VM6586)
+ && ((dev->width * dev->x_resolution) %
+ dev->def->x_resolution_max != 0))
+ {
+ /* Round up */
+ dev->params.pixels_per_line += 1;
+ }
+ dev->params.bytes_per_line = dev->params.pixels_per_line * 3;
+ dev->params.depth = 8;
+
+ if (dev->resolutions_list != NULL)
+ {
+ /* This scanner has a fixed number of supported
+ * resolutions. Find the color shift for that
+ * resolution. */
+
+ int i;
+ for (i = 0;
+ dev->def->color_adjust[i].resolution != dev->y_resolution;
+ i++);
+
+ dev->color_adjust = &dev->def->color_adjust[i];
+ }
+ else
+ {
+ dev->color_adjust = &dev->def->color_adjust[0];
+ }
+ break;
+ }
+
+ dev->params.lines =
+ (dev->length * dev->y_resolution) / dev->def->x_resolution_max;
+ }
+
+ /* Return the current values. */
+ if (params)
+ {
+ *params = (dev->params);
+ }
+
+ DBG (DBG_proc, "sane_get_parameters: exit\n");
+
+ return SANE_STATUS_GOOD;
+}
+
+SANE_Status
+sane_start (SANE_Handle handle)
+{
+ Teco_Scanner *dev = handle;
+ SANE_Status status;
+
+ DBG (DBG_proc, "sane_start: enter\n");
+
+ if (!(dev->scanning))
+ {
+
+ sane_get_parameters (dev, NULL);
+
+ /* Open again the scanner. */
+ if (sanei_scsi_open
+ (dev->devicename, &(dev->sfd), teco_sense_handler, dev) != 0)
+ {
+ DBG (DBG_error, "ERROR: sane_start: open failed\n");
+ return SANE_STATUS_INVAL;
+ }
+
+ /* The scanner must be ready. */
+ status = teco_wait_scanner (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+
+ status = teco_set_window (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+
+ status = teco_get_scan_size (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+
+ /* Compute the length necessary in image. The first part will store
+ * the complete lines, and the rest is used to stored ahead
+ * rasters.
+ */
+ if (dev->color_adjust)
+ {
+ dev->raster_ahead =
+ (2 * dev->color_adjust->color_shift) * dev->params.bytes_per_line;
+ }
+ else
+ {
+ dev->raster_ahead = 0;
+ }
+ dev->image_size = dev->buffer_size + dev->raster_ahead;
+ dev->image = malloc (dev->image_size);
+ if (dev->image == NULL)
+ {
+ return SANE_STATUS_NO_MEM;
+ }
+
+ /* Rasters are meaningfull only in color mode. */
+ dev->raster_size = dev->params.pixels_per_line;
+ dev->raster_real = dev->params.lines * 3;
+ dev->raster_num = 0;
+ dev->line = 0;
+
+#if 1
+ status = teco_do_calibration (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+#endif
+
+ switch (dev->def->tecoref)
+ {
+ /* case TECO_VM3564: not for VM3564 */
+ case TECO_VM356A:
+/*--------------request sense for first time loop---*/
+ status = teco_request_sense (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+ break;
+ default:
+ break;
+ }
+
+ status = teco_send_gamma (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+
+ status = teco_set_window (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+ switch (dev->def->tecoref)
+ {
+ case TECO_VM3564:
+ case TECO_VM356A:
+ break;
+ default:
+ status = teco_send_vendor_06 (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+ }
+ status = teco_scan (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+
+ status = teco_wait_for_data (dev);
+ if (status)
+ {
+ teco_close (dev);
+ return status;
+ }
+ }
+
+ dev->image_end = 0;
+ dev->image_begin = 0;
+
+ dev->bytes_left = dev->params.bytes_per_line * dev->params.lines;
+ dev->real_bytes_left = dev->params.bytes_per_line * dev->params.lines;
+
+ dev->scanning = SANE_TRUE;
+
+ DBG (DBG_proc, "sane_start: exit\n");
+
+ return SANE_STATUS_GOOD;
+}
+
+SANE_Status
+sane_read (SANE_Handle handle, SANE_Byte * buf, SANE_Int max_len,
+ SANE_Int * len)
+{
+ SANE_Status status;
+ Teco_Scanner *dev = handle;
+ size_t size;
+ int buf_offset; /* offset into buf */
+
+ DBG (DBG_proc, "sane_read: enter\n");
+
+ *len = 0;
+
+ if (!(dev->scanning))
+ {
+ /* OOPS, not scanning */
+ return do_cancel (dev);
+ }
+
+ if (dev->bytes_left <= 0)
+ {
+ return (SANE_STATUS_EOF);
+ }
+
+ buf_offset = 0;
+
+ do
+ {
+ if (dev->image_begin == dev->image_end)
+ {
+ /* Fill image */
+ status = teco_fill_image (dev);
+ if (status != SANE_STATUS_GOOD)
+ {
+ return (status);
+ }
+ }
+
+ /* Something must have been read */
+#if 1
+ assert (dev->image_begin != dev->image_end);
+#else
+ if (dev->image_begin == dev->image_end)
+ {
+ DBG (DBG_info, "sane_read: nothing read\n");
+ return SANE_STATUS_IO_ERROR;
+ }
+#endif
+
+ /* Copy the data to the frontend buffer. */
+ size = max_len - buf_offset;
+ if (size > dev->bytes_left)
+ {
+ size = dev->bytes_left;
+ }
+ teco_copy_raw_to_frontend (dev, buf + buf_offset, &size);
+
+ buf_offset += size;
+
+ dev->bytes_left -= size;
+ *len += size;
+
+ }
+ while ((buf_offset != max_len) && dev->bytes_left);
+
+ DBG (DBG_info, "sane_read: leave, bytes_left=%ld\n", (long) dev->bytes_left);
+
+ return SANE_STATUS_GOOD;
+}
+
+SANE_Status
+sane_set_io_mode (SANE_Handle __sane_unused__ handle, SANE_Bool __sane_unused__ non_blocking)
+{
+ SANE_Status status;
+ Teco_Scanner *dev = handle;
+
+ DBG (DBG_proc, "sane_set_io_mode: enter\n");
+
+ if (dev->scanning == SANE_FALSE)
+ {
+ return SANE_STATUS_INVAL;
+ }
+
+ if (non_blocking == SANE_FALSE)
+ {
+ status = SANE_STATUS_GOOD;
+ }
+ else
+ {
+ status = SANE_STATUS_UNSUPPORTED;
+ }
+
+ DBG (DBG_proc, "sane_set_io_mode: exit\n");
+
+ return status;
+}
+
+SANE_Status
+sane_get_select_fd (SANE_Handle __sane_unused__ handle, SANE_Int __sane_unused__ * fd)
+{
+ DBG (DBG_proc, "sane_get_select_fd: enter\n");
+
+ DBG (DBG_proc, "sane_get_select_fd: exit\n");
+
+ return SANE_STATUS_UNSUPPORTED;
+}
+
+void
+sane_cancel (SANE_Handle handle)
+{
+ Teco_Scanner *dev = handle;
+
+ DBG (DBG_proc, "sane_cancel: enter\n");
+
+ do_cancel (dev);
+
+ DBG (DBG_proc, "sane_cancel: exit\n");
+}
+
+void
+sane_close (SANE_Handle handle)
+{
+ Teco_Scanner *dev = handle;
+ Teco_Scanner *dev_tmp;
+
+ DBG (DBG_proc, "sane_close: enter\n");
+
+ do_cancel (dev);
+ teco_close (dev);
+
+ /* Unlink dev. */
+ if (first_dev == dev)
+ {
+ first_dev = dev->next;
+ }
+ else
+ {
+ dev_tmp = first_dev;
+ while (dev_tmp->next && dev_tmp->next != dev)
+ {
+ dev_tmp = dev_tmp->next;
+ }
+ if (dev_tmp->next != NULL)
+ {
+ dev_tmp->next = dev_tmp->next->next;
+ }
+ }
+
+ teco_free (dev);
+ num_devices--;
+
+ DBG (DBG_proc, "sane_close: exit\n");
+}
+
+void
+sane_exit (void)
+{
+ DBG (DBG_proc, "sane_exit: enter\n");
+
+ while (first_dev)
+ {
+ sane_close (first_dev);
+ }
+
+ if (devlist)
+ {
+ free (devlist);
+ devlist = NULL;
+ }
+
+ DBG (DBG_proc, "sane_exit: exit\n");
+}