Home | History | Annotate | Line # | Download | only in scsipi
ss_mustek.c revision 1.24
      1  1.24   mycroft /*	$NetBSD: ss_mustek.c,v 1.24 2004/09/18 00:08:16 mycroft Exp $	*/
      2   1.1   mycroft 
      3   1.1   mycroft /*
      4   1.1   mycroft  * Copyright (c) 1995 Joachim Koenig-Baltes.  All rights reserved.
      5   1.1   mycroft  *
      6   1.1   mycroft  * Redistribution and use in source and binary forms, with or without
      7   1.1   mycroft  * modification, are permitted provided that the following conditions
      8   1.1   mycroft  * are met:
      9   1.1   mycroft  * 1. Redistributions of source code must retain the above copyright
     10   1.1   mycroft  *    notice, this list of conditions and the following disclaimer.
     11   1.1   mycroft  * 2. Redistributions in binary form must reproduce the above copyright
     12   1.1   mycroft  *    notice, this list of conditions and the following disclaimer in the
     13   1.1   mycroft  *    documentation and/or other materials provided with the distribution.
     14   1.1   mycroft  * 3. All advertising materials mentioning features or use of this software
     15   1.1   mycroft  *    must display the following acknowledgement:
     16   1.1   mycroft  *	This product includes software developed by Joachim Koenig-Baltes.
     17   1.1   mycroft  * 4. The name of the author may not be used to endorse or promote products
     18   1.1   mycroft  *    derived from this software without specific prior written permission.
     19   1.1   mycroft  *
     20   1.1   mycroft  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     21   1.1   mycroft  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     22   1.1   mycroft  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     23   1.1   mycroft  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     24   1.1   mycroft  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     25   1.1   mycroft  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     26   1.1   mycroft  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     27   1.1   mycroft  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     28   1.1   mycroft  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     29   1.1   mycroft  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     30   1.1   mycroft  */
     31   1.1   mycroft 
     32   1.1   mycroft /*
     33   1.1   mycroft  * special driver for MUSTEK flatbed scanners MFS 06000CX and MFS 12000CX
     34   1.1   mycroft  * these scanners come with their own scsi card, containing an NCR53C400
     35   1.1   mycroft  * SCSI controller chip. I'm in the progress of writing a driver for this
     36   1.1   mycroft  * card to work under NetBSD-current. I've hooked it up to a Seagate ST01
     37   1.1   mycroft  * hostadapter in the meantime, giving 350KB/sec for higher resolutions!
     38   1.1   mycroft  *
     39   1.1   mycroft  * I tried to connect it to my Adaptec 1542B, but with no success. It seems,
     40   1.1   mycroft  * it does not like synchronous negotiation between Hostadapter and other
     41   1.1   mycroft  * targets, but I could not turn this off for the 1542B.
     42   1.1   mycroft  *
     43   1.1   mycroft  * There is also an other reason why you would not like to connect it to your
     44   1.1   mycroft  * favourite SCSI host adapter: The Mustek DOES NOT DISCONNECT. It will block
     45   1.1   mycroft  * other traffic from the bus while a transfer is active.
     46   1.1   mycroft  */
     47  1.17     lukem 
     48  1.17     lukem #include <sys/cdefs.h>
     49  1.24   mycroft __KERNEL_RCSID(0, "$NetBSD: ss_mustek.c,v 1.24 2004/09/18 00:08:16 mycroft Exp $");
     50   1.1   mycroft 
     51   1.1   mycroft #include <sys/param.h>
     52   1.1   mycroft #include <sys/kernel.h>
     53   1.1   mycroft #include <sys/systm.h>
     54   1.1   mycroft #include <sys/fcntl.h>
     55   1.1   mycroft #include <sys/errno.h>
     56   1.1   mycroft #include <sys/ioctl.h>
     57   1.1   mycroft #include <sys/malloc.h>
     58   1.1   mycroft #include <sys/buf.h>
     59   1.1   mycroft #include <sys/proc.h>
     60   1.1   mycroft #include <sys/user.h>
     61   1.1   mycroft #include <sys/device.h>
     62   1.1   mycroft #include <sys/conf.h>		/* for cdevsw */
     63   1.1   mycroft #include <sys/scanio.h>
     64   1.1   mycroft 
     65   1.7    bouyer #include <dev/scsipi/scsi_all.h>
     66   1.7    bouyer #include <dev/scsipi/scsipi_all.h>
     67   1.7    bouyer #include <dev/scsipi/scsi_scanner.h>
     68   1.7    bouyer #include <dev/scsipi/scsiconf.h>
     69  1.21    bouyer #include <dev/scsipi/scsipi_base.h>
     70   1.7    bouyer #include <dev/scsipi/ssvar.h>
     71   1.7    bouyer #include <dev/scsipi/ss_mustek.h>
     72   1.1   mycroft 
     73   1.1   mycroft #define MUSTEK_RETRIES 4
     74   1.1   mycroft 
     75  1.19   thorpej static int	mustek_get_params(struct ss_softc *);
     76  1.19   thorpej static int	mustek_set_params(struct ss_softc *, struct scan_io *);
     77  1.19   thorpej static int	mustek_trigger_scanner(struct ss_softc *);
     78  1.19   thorpej static void	mustek_minphys(struct ss_softc *, struct buf *);
     79  1.19   thorpej static int	mustek_read(struct ss_softc *, struct buf *);
     80  1.19   thorpej static int	mustek_rewind_scanner(struct ss_softc *);
     81   1.1   mycroft 
     82   1.1   mycroft /* only used internally */
     83  1.19   thorpej static int	mustek_get_status(struct ss_softc *, int, int);
     84  1.19   thorpej static void	mustek_compute_sizes(struct ss_softc *);
     85   1.1   mycroft 
     86   1.1   mycroft /*
     87   1.1   mycroft  * structure for the special handlers
     88   1.1   mycroft  */
     89  1.19   thorpej static struct ss_special mustek_special = {
     90   1.1   mycroft 	mustek_set_params,
     91   1.1   mycroft 	mustek_trigger_scanner,
     92   1.1   mycroft 	mustek_get_params,
     93   1.1   mycroft 	mustek_minphys,
     94   1.1   mycroft 	mustek_read,
     95   1.1   mycroft 	mustek_rewind_scanner,
     96   1.1   mycroft 	NULL,			/* no adf support right now */
     97   1.1   mycroft 	NULL			/* no adf support right now */
     98   1.1   mycroft };
     99   1.1   mycroft 
    100   1.1   mycroft /*
    101   1.1   mycroft  * mustek_attach: attach special functions to ss
    102   1.1   mycroft  */
    103   1.1   mycroft void
    104  1.19   thorpej mustek_attach(struct ss_softc *ss, struct scsipibus_attach_args *sa)
    105   1.1   mycroft {
    106  1.13    bouyer #ifdef SCSIPI_DEBUG
    107  1.13    bouyer 	struct scsipi_periph *periph = sa->sa_periph;
    108   1.3  christos #endif
    109   1.1   mycroft 
    110  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_attach: start\n"));
    111   1.1   mycroft 	ss->sio.scan_scanner_type = 0;
    112   1.1   mycroft 
    113   1.6  christos 	printf("\n%s: ", ss->sc_dev.dv_xname);
    114   1.3  christos 
    115   1.1   mycroft 	/* first, check the model which determines resolutions */
    116  1.16   thorpej 	if (!memcmp(sa->sa_inqbuf.product, "MFS-06000CX", 11)) {
    117   1.1   mycroft 		ss->sio.scan_scanner_type = MUSTEK_06000CX;
    118   1.6  christos 		printf("Mustek 6000CX Flatbed 3-pass color scanner, 3 - 600 dpi\n");
    119   1.1   mycroft 	}
    120  1.16   thorpej 	if (!memcmp(sa->sa_inqbuf.product, "MFS-12000CX", 11)) {
    121   1.1   mycroft 		ss->sio.scan_scanner_type = MUSTEK_12000CX;
    122   1.6  christos 		printf("Mustek 12000CX Flatbed 3-pass color scanner, 6 - 1200 dpi\n");
    123   1.1   mycroft 	}
    124   1.1   mycroft 
    125  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_attach: scanner_type = %d\n",
    126   1.1   mycroft 	    ss->sio.scan_scanner_type));
    127   1.1   mycroft 
    128   1.1   mycroft 	/* install special handlers */
    129   1.1   mycroft 	ss->special = &mustek_special;
    130   1.1   mycroft 
    131   1.1   mycroft 	/*
    132   1.1   mycroft 	 * populate the scanio struct with legal values
    133   1.1   mycroft 	 * the default should come from user space
    134   1.1   mycroft 	 */
    135   1.1   mycroft 	ss->sio.scan_width		= 1200;
    136   1.1   mycroft 	ss->sio.scan_height		= 1200;
    137   1.1   mycroft 	ss->sio.scan_x_resolution	= 99;
    138   1.1   mycroft 	ss->sio.scan_y_resolution	= 99;
    139   1.1   mycroft 	ss->sio.scan_x_origin		= 0;
    140   1.1   mycroft 	ss->sio.scan_y_origin		= 0;
    141   1.1   mycroft 	ss->sio.scan_brightness		= 100;
    142   1.1   mycroft 	ss->sio.scan_contrast		= 100;
    143   1.1   mycroft 	ss->sio.scan_quality		= 100;
    144   1.1   mycroft 	ss->sio.scan_image_mode		= SIM_GRAYSCALE;
    145   1.1   mycroft 
    146   1.1   mycroft 	mustek_compute_sizes(ss);
    147   1.1   mycroft }
    148   1.1   mycroft 
    149  1.19   thorpej static int
    150  1.19   thorpej mustek_get_params (struct ss_softc *ss)
    151   1.1   mycroft {
    152   1.1   mycroft 
    153   1.1   mycroft 	return (0);
    154   1.1   mycroft }
    155   1.1   mycroft 
    156   1.1   mycroft /*
    157   1.1   mycroft  * check the parameters if the mustek is capable of fulfilling it
    158   1.1   mycroft  * but don't send the command to the scanner in case the user wants
    159   1.1   mycroft  * to change parameters by more than one call
    160   1.1   mycroft  */
    161  1.19   thorpej static int
    162  1.19   thorpej mustek_set_params(struct ss_softc *ss, struct scan_io *sio)
    163   1.1   mycroft {
    164   1.1   mycroft 	int error;
    165   1.1   mycroft 
    166   1.1   mycroft 	/*
    167   1.1   mycroft 	 * if the scanner is triggered, then rewind it
    168   1.1   mycroft 	 */
    169   1.1   mycroft 	if (ss->flags & SSF_TRIGGERED) {
    170   1.1   mycroft 		error = mustek_rewind_scanner(ss);
    171   1.1   mycroft 		if (error)
    172   1.1   mycroft 			return (error);
    173   1.1   mycroft 	}
    174   1.1   mycroft 
    175   1.1   mycroft 	/* size constraints: 8.5" horizontally and 14" vertically */
    176   1.1   mycroft #ifdef MUSTEK_INCH_SPEC
    177   1.1   mycroft 	/* sizes must be a multiple of 1/8" */
    178   1.1   mycroft 	sio->scan_x_origin -= sio->scan_x_origin % 150;
    179   1.1   mycroft 	sio->scan_y_origin -= sio->scan_y_origin % 150;
    180   1.1   mycroft 	sio->scan_width -= sio->scan_width % 150;
    181   1.1   mycroft 	sio->scan_height -= sio->scan_height % 150;
    182   1.1   mycroft #endif
    183   1.1   mycroft 	if (sio->scan_width == 0 ||
    184   1.1   mycroft 	    sio->scan_x_origin + sio->scan_width > 10200 ||
    185   1.1   mycroft 	    sio->scan_height == 0 ||
    186   1.1   mycroft 	    sio->scan_y_origin + sio->scan_height > 16800)
    187   1.1   mycroft 		return (EINVAL);
    188   1.1   mycroft 
    189   1.1   mycroft 	/*
    190   1.1   mycroft 	 * for now, only realize the values for the MUSTEK_06000CX
    191   1.1   mycroft 	 * in the future, values for the MUSTEK_12000CX will be implemented
    192   1.1   mycroft 	 */
    193   1.1   mycroft 
    194   1.1   mycroft 	/*
    195   1.1   mycroft 	 * resolution (dpi) must be <= 300 and a multiple of 3 or
    196   1.1   mycroft 	 * between 300 and 600 and a multiple of 30
    197   1.1   mycroft 	 */
    198   1.1   mycroft 	sio->scan_x_resolution -= sio->scan_x_resolution <= 300 ?
    199   1.1   mycroft 	    sio->scan_x_resolution % 3 : sio->scan_x_resolution % 30;
    200   1.1   mycroft 	sio->scan_y_resolution -= sio->scan_y_resolution <= 300 ?
    201   1.1   mycroft 	    sio->scan_y_resolution % 3 : sio->scan_y_resolution % 30;
    202   1.1   mycroft 	if (sio->scan_x_resolution < 3 || sio->scan_x_resolution > 600 ||
    203   1.1   mycroft 	    sio->scan_x_resolution != sio->scan_y_resolution)
    204   1.1   mycroft 		return (EINVAL);
    205   1.1   mycroft 
    206   1.1   mycroft 	/* assume brightness values are between 64 and 136 in steps of 3 */
    207   1.1   mycroft 	sio->scan_brightness -= (sio->scan_brightness - 64) % 3;
    208   1.1   mycroft 	if (sio->scan_brightness < 64 || sio->scan_brightness > 136)
    209   1.1   mycroft 		return (EINVAL);
    210   1.1   mycroft 
    211   1.1   mycroft 	/* contrast values must be between 16 and 184 in steps of 7 */
    212   1.1   mycroft 	sio->scan_contrast -= (sio->scan_contrast - 16) % 7;
    213   1.1   mycroft 	if (sio->scan_contrast < 16 || sio->scan_contrast > 184)
    214   1.1   mycroft 		return (EINVAL);
    215   1.1   mycroft 
    216   1.1   mycroft 	/*
    217   1.1   mycroft 	 * velocity: between 0 (fast) and 4 (slow) which will be mapped
    218   1.1   mycroft 	 * to 100% = 4, 80% = 3, 60% = 2, 40% = 1, 20% = 0
    219   1.1   mycroft 	 * must be a multiple of 20
    220   1.1   mycroft 	 */
    221   1.1   mycroft 	sio->scan_quality -= sio->scan_quality % 20;
    222   1.1   mycroft 	if (sio->scan_quality < 20 || sio->scan_quality > 100)
    223   1.1   mycroft 		return (EINVAL);
    224   1.1   mycroft 
    225   1.1   mycroft 	switch (sio->scan_image_mode) {
    226   1.1   mycroft 	case SIM_BINARY_MONOCHROME:
    227   1.1   mycroft 	case SIM_DITHERED_MONOCHROME:
    228   1.1   mycroft 	case SIM_GRAYSCALE:
    229   1.1   mycroft 	case SIM_RED:
    230   1.1   mycroft 	case SIM_GREEN:
    231   1.1   mycroft 	case SIM_BLUE:
    232   1.1   mycroft 		break;
    233   1.1   mycroft 	default:
    234   1.1   mycroft 		return (EINVAL);
    235   1.1   mycroft 	}
    236   1.1   mycroft 
    237   1.1   mycroft 	/* change ss_softc to the new values, but save ro-variables */
    238   1.1   mycroft 	sio->scan_scanner_type = ss->sio.scan_scanner_type;
    239  1.15   thorpej 	memcpy(&ss->sio, sio, sizeof(struct scan_io));
    240   1.1   mycroft 
    241   1.1   mycroft 	mustek_compute_sizes(ss);
    242   1.1   mycroft 
    243   1.1   mycroft 	return (0);
    244   1.1   mycroft }
    245   1.1   mycroft 
    246   1.1   mycroft /*
    247   1.1   mycroft  * trim the requested transfer to a multiple of the line size
    248   1.1   mycroft  * this is called only from ssread() which guarantees, scanner is triggered
    249   1.1   mycroft  * In the future, it will trim the transfer to not read to much at a time
    250   1.1   mycroft  * because the mustek cannot disconnect. It will be calculated by the
    251   1.1   mycroft  * resolution, the velocity and the number of bytes per line.
    252   1.1   mycroft  */
    253  1.19   thorpej static void
    254  1.19   thorpej mustek_minphys(struct ss_softc *ss, struct buf *bp)
    255   1.1   mycroft {
    256  1.13    bouyer #ifdef SCSIPI_DEBUG
    257  1.13    bouyer 	struct scsipi_periph *periph = ss->sc_periph;
    258   1.3  christos #endif
    259   1.1   mycroft 
    260  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_minphys: before: %ld\n",
    261   1.1   mycroft 	    bp->b_bcount));
    262   1.1   mycroft 	bp->b_bcount -= bp->b_bcount %
    263   1.1   mycroft 	    ((ss->sio.scan_pixels_per_line * ss->sio.scan_bits_per_pixel) / 8);
    264  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_minphys: after:  %ld\n",
    265   1.1   mycroft 	    bp->b_bcount));
    266   1.1   mycroft }
    267   1.1   mycroft 
    268   1.1   mycroft /*
    269   1.1   mycroft  * trigger the scanner to start a scan operation
    270   1.1   mycroft  * this includes sending the mode- and window-data, starting the scanner
    271   1.1   mycroft  * and getting the image size info
    272   1.1   mycroft  */
    273  1.19   thorpej static int
    274  1.19   thorpej mustek_trigger_scanner(struct ss_softc *ss)
    275   1.1   mycroft {
    276   1.1   mycroft 	struct mustek_mode_select_cmd mode_cmd;
    277   1.1   mycroft 	struct mustek_mode_select_data mode_data;
    278   1.1   mycroft 	struct mustek_set_window_cmd window_cmd;
    279   1.1   mycroft 	struct mustek_set_window_data window_data;
    280   1.1   mycroft 	struct mustek_start_scan_cmd start_scan_cmd;
    281  1.13    bouyer 	struct scsipi_periph *periph = ss->sc_periph;
    282   1.1   mycroft 	int pixel_tlx, pixel_tly, pixel_brx, pixel_bry, paperlength;
    283   1.1   mycroft 	int error;
    284   1.1   mycroft 
    285   1.1   mycroft 	mustek_compute_sizes(ss);
    286   1.1   mycroft 
    287  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_trigger_scanner\n"));
    288   1.1   mycroft 
    289   1.1   mycroft 	/*
    290   1.1   mycroft 	 * set the window params and send the scsi command
    291   1.1   mycroft 	 */
    292  1.14   thorpej 	memset(&window_cmd, 0, sizeof(window_cmd));
    293   1.1   mycroft 	window_cmd.opcode = MUSTEK_SET_WINDOW;
    294   1.1   mycroft 	window_cmd.length = sizeof(window_data);
    295   1.1   mycroft 
    296  1.14   thorpej 	memset(&window_data, 0, sizeof(window_data));
    297   1.2   mycroft 	window_data.frame.header = MUSTEK_LINEART_BACKGROUND | MUSTEK_UNIT_SPEC;
    298   1.1   mycroft #ifdef MUSTEK_INCH_SPEC
    299   1.1   mycroft 	/* the positional values are all 1 byte because 256 / 8 = 32" */
    300   1.2   mycroft 	pixel_tlx = ss->sio.scan_x_origin / 150;
    301   1.2   mycroft 	pixel_tly = ss->sio.scan_y_origin / 150;
    302   1.2   mycroft 	pixel_brx = pixel_tlx + ss->sio.scan_width / 150;
    303   1.2   mycroft 	pixel_bry = pixel_tly + ss->sio.scan_height / 150;
    304   1.1   mycroft #else
    305   1.1   mycroft 	pixel_tlx = (ss->sio.scan_x_origin * ss->sio.scan_x_resolution) / 1200;
    306   1.1   mycroft 	pixel_tly = (ss->sio.scan_y_origin * ss->sio.scan_y_resolution) / 1200;
    307   1.1   mycroft 	pixel_brx = pixel_tlx +
    308   1.1   mycroft 	    (ss->sio.scan_width * ss->sio.scan_x_resolution) / 1200;
    309   1.1   mycroft 	pixel_bry = pixel_tly +
    310   1.1   mycroft 	    (ss->sio.scan_height * ss->sio.scan_y_resolution) / 1200;
    311   1.1   mycroft #endif
    312   1.2   mycroft 	_lto2l(pixel_tlx, window_data.frame.tl_x);
    313   1.2   mycroft 	_lto2l(pixel_tly, window_data.frame.tl_y);
    314   1.2   mycroft 	_lto2l(pixel_brx, window_data.frame.br_x);
    315   1.2   mycroft 	_lto2l(pixel_bry, window_data.frame.br_y);
    316   1.1   mycroft 
    317   1.1   mycroft #if MUSTEK_WINDOWS >= 1
    318   1.2   mycroft 	window_data.window1 = window_data.frame;
    319   1.2   mycroft 	window_data.window1.header = MUSTEK_WINDOW_MASK | MUSTEK_UNIT_SPEC;
    320   1.1   mycroft #endif
    321   1.1   mycroft 
    322   1.1   mycroft 	/* send the set window command to the scanner */
    323  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_set_parms: set_window\n"));
    324  1.24   mycroft 	error = scsipi_command(periph, (void *)&window_cmd, sizeof(window_cmd),
    325  1.24   mycroft 	    (void *)&window_data, sizeof(window_data),
    326  1.12     enami 	    MUSTEK_RETRIES, 5000, NULL, XS_CTL_DATA_OUT | XS_CTL_DATA_ONSTACK);
    327   1.1   mycroft 	if (error)
    328   1.1   mycroft 		return (error);
    329   1.1   mycroft 
    330   1.1   mycroft 	/*
    331   1.1   mycroft 	 * do what it takes to actualize the mode
    332   1.1   mycroft 	 */
    333  1.14   thorpej 	memset(&mode_cmd, 0, sizeof(mode_cmd));
    334   1.1   mycroft 	mode_cmd.opcode = MUSTEK_MODE_SELECT;
    335   1.2   mycroft 	_lto2b(sizeof(mode_data), mode_cmd.length);
    336   1.1   mycroft 
    337  1.14   thorpej 	memset(&mode_data, 0, sizeof(mode_data));
    338   1.1   mycroft 	mode_data.mode =
    339   1.1   mycroft 	    MUSTEK_MODE_MASK | MUSTEK_HT_PATTERN_BUILTIN | MUSTEK_UNIT_SPEC;
    340   1.1   mycroft 	if (ss->sio.scan_x_resolution <= 300) {
    341   1.1   mycroft 		mode_data.resolution = ss->sio.scan_x_resolution / 3;
    342   1.1   mycroft 	} else {
    343   1.1   mycroft 		/*
    344   1.1   mycroft 		 * the resolution values is computed by modulo 100, but not
    345   1.1   mycroft 		 * for 600dpi, where the value is 100 (a bit tricky, but ...)
    346   1.1   mycroft 		 */
    347   1.1   mycroft 		mode_data.resolution =
    348   1.1   mycroft 		    ((ss->sio.scan_x_resolution - 1) % 100) + 1;
    349   1.1   mycroft 	}
    350   1.1   mycroft 	mode_data.brightness = (ss->sio.scan_brightness - 64) / 3;
    351   1.1   mycroft 	mode_data.contrast = (ss->sio.scan_contrast - 16) / 7;
    352   1.1   mycroft 	mode_data.grain = 0;
    353   1.1   mycroft 	mode_data.velocity = ss->sio.scan_quality / 20 - 1;
    354   1.1   mycroft #ifdef MUSTEK_INCH_SPEC
    355   1.2   mycroft 	paperlength = 14 * 8;	/* 14" */
    356   1.1   mycroft #else
    357   1.2   mycroft 	paperlength = 14 * ss->sio.scan_y_resolution;	/* 14" */
    358   1.1   mycroft #endif
    359   1.2   mycroft 	_lto2l(paperlength, mode_data.paperlength);
    360   1.1   mycroft 
    361  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_trigger_scanner: mode_select\n"));
    362   1.1   mycroft 	/* send the command to the scanner */
    363  1.24   mycroft 	error = scsipi_command(periph, (void *)&mode_cmd, sizeof(mode_cmd),
    364  1.24   mycroft 	    (void *)&mode_data, sizeof(mode_data),
    365  1.12     enami 	    MUSTEK_RETRIES, 5000, NULL, XS_CTL_DATA_OUT | XS_CTL_DATA_ONSTACK);
    366   1.1   mycroft 	if (error)
    367   1.1   mycroft 		return (error);
    368   1.1   mycroft 
    369   1.1   mycroft 	/*
    370   1.1   mycroft 	 * now construct and send the start command
    371   1.1   mycroft 	 */
    372  1.14   thorpej 	memset(&start_scan_cmd, 0, sizeof(start_scan_cmd));
    373   1.1   mycroft 	start_scan_cmd.opcode = MUSTEK_START_STOP;
    374   1.1   mycroft 	start_scan_cmd.mode = MUSTEK_SCAN_START;
    375   1.1   mycroft 	if (ss->sio.scan_x_resolution <= 300)
    376   1.1   mycroft 		start_scan_cmd.mode |= MUSTEK_RES_STEP_1;
    377   1.1   mycroft 	else
    378   1.1   mycroft 		start_scan_cmd.mode |= MUSTEK_RES_STEP_10;
    379   1.1   mycroft 	switch (ss->sio.scan_image_mode) {
    380   1.1   mycroft 	case SIM_BINARY_MONOCHROME:
    381   1.1   mycroft 	case SIM_DITHERED_MONOCHROME:
    382   1.1   mycroft 		start_scan_cmd.mode |= MUSTEK_BIT_MODE | MUSTEK_GRAY_FILTER;
    383   1.1   mycroft 		break;
    384   1.1   mycroft 	case SIM_GRAYSCALE:
    385   1.1   mycroft 		start_scan_cmd.mode |= MUSTEK_GRAY_MODE | MUSTEK_GRAY_FILTER;
    386   1.1   mycroft 		break;
    387   1.1   mycroft 	case SIM_RED:
    388   1.1   mycroft 		start_scan_cmd.mode |= MUSTEK_GRAY_MODE | MUSTEK_RED_FILTER;
    389   1.1   mycroft 		break;
    390   1.1   mycroft 	case SIM_GREEN:
    391   1.1   mycroft 		start_scan_cmd.mode |= MUSTEK_GRAY_MODE | MUSTEK_GREEN_FILTER;
    392   1.1   mycroft 		break;
    393   1.1   mycroft 	case SIM_BLUE:
    394   1.1   mycroft 		start_scan_cmd.mode |= MUSTEK_GRAY_MODE | MUSTEK_BLUE_FILTER;
    395   1.1   mycroft 		break;
    396   1.1   mycroft 	}
    397   1.1   mycroft 
    398   1.1   mycroft 	/* send the command to the scanner */
    399  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_trigger_scanner: start_scan\n"));
    400  1.23   mycroft 	error = scsipi_command(periph,
    401  1.24   mycroft 	    (void *)&start_scan_cmd, sizeof(start_scan_cmd),
    402  1.24   mycroft 	    NULL, 0,
    403   1.1   mycroft 	    MUSTEK_RETRIES, 5000, NULL, 0);
    404   1.1   mycroft 	if (error)
    405   1.1   mycroft 		return (error);
    406   1.1   mycroft 
    407   1.1   mycroft 	/*
    408   1.1   mycroft 	 * now check if scanner ready this time with update of size info
    409   1.1   mycroft 	 * we wait here so that if the user issues a read directly afterwards,
    410   1.1   mycroft 	 * the scanner will respond directly (otherwise we had to sleep with
    411   1.1   mycroft 	 * a buffer locked in memory)
    412   1.1   mycroft 	 */
    413  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_trigger_scanner: get_status\n"));
    414   1.1   mycroft 	error = mustek_get_status(ss, 60, 1);
    415   1.1   mycroft 	if (error)
    416   1.1   mycroft 		return (error);
    417   1.1   mycroft 
    418   1.1   mycroft 	return (0);
    419   1.1   mycroft }
    420   1.1   mycroft 
    421   1.1   mycroft /*
    422   1.1   mycroft  * stop a scan operation in progress
    423   1.1   mycroft  */
    424  1.19   thorpej static int
    425  1.19   thorpej mustek_rewind_scanner(struct ss_softc *ss)
    426   1.1   mycroft {
    427   1.1   mycroft 	struct mustek_start_scan_cmd cmd;
    428  1.13    bouyer 	struct scsipi_periph *periph = ss->sc_periph;
    429   1.1   mycroft 	int error;
    430   1.1   mycroft 
    431   1.1   mycroft 	if (ss->sio.scan_window_size != 0) {
    432   1.1   mycroft 		/*
    433   1.1   mycroft 		 * only if not all data has been read, the scanner has to be
    434   1.1   mycroft 		 * stopped
    435   1.1   mycroft 		 */
    436  1.14   thorpej 		memset(&cmd, 0, sizeof(cmd));
    437   1.1   mycroft 		cmd.opcode = MUSTEK_START_STOP;
    438   1.1   mycroft 		cmd.mode = MUSTEK_SCAN_STOP;
    439   1.1   mycroft 
    440   1.1   mycroft 		/* send the command to the scanner */
    441  1.13    bouyer 		SC_DEBUG(periph, SCSIPI_DB1,
    442   1.1   mycroft 		    ("mustek_rewind_scanner: stop_scan\n"));
    443  1.23   mycroft 		error = scsipi_command(periph,
    444  1.24   mycroft 		    (void *)&cmd, sizeof(cmd),
    445  1.24   mycroft 		    NULL, 0,
    446  1.24   mycroft 		    MUSTEK_RETRIES, 5000, NULL, 0);
    447   1.1   mycroft 		if (error)
    448   1.1   mycroft 			return (error);
    449   1.1   mycroft 	}
    450   1.1   mycroft 
    451  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_rewind_scanner: end\n"));
    452   1.1   mycroft 
    453   1.1   mycroft 	return (0);
    454   1.1   mycroft }
    455   1.1   mycroft 
    456   1.1   mycroft /*
    457   1.1   mycroft  * read the requested number of bytes/lines from the scanner
    458   1.1   mycroft  */
    459  1.19   thorpej static int
    460  1.19   thorpej mustek_read(struct ss_softc *ss, struct buf *bp)
    461   1.1   mycroft {
    462   1.1   mycroft 	struct mustek_read_cmd cmd;
    463  1.21    bouyer 	struct scsipi_xfer *xs;
    464  1.13    bouyer 	struct scsipi_periph *periph = ss->sc_periph;
    465   1.1   mycroft 	u_long lines_to_read;
    466  1.10   mycroft 	int error;
    467   1.1   mycroft 
    468  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_read: start\n"));
    469   1.1   mycroft 
    470  1.14   thorpej 	memset(&cmd, 0, sizeof(cmd));
    471   1.1   mycroft 	cmd.opcode = MUSTEK_READ;
    472   1.1   mycroft 
    473   1.1   mycroft 	/* instead of the bytes, the mustek wants the number of lines */
    474   1.1   mycroft 	lines_to_read = bp->b_bcount /
    475   1.1   mycroft 	    ((ss->sio.scan_pixels_per_line * ss->sio.scan_bits_per_pixel) / 8);
    476  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_read: read %ld lines\n",
    477   1.1   mycroft 	    lines_to_read));
    478   1.2   mycroft 	_lto3b(lines_to_read, cmd.length);
    479   1.1   mycroft 
    480   1.1   mycroft 	/*
    481   1.1   mycroft 	 * go ask the adapter to do all this for us
    482   1.1   mycroft 	 */
    483  1.21    bouyer 	xs = scsipi_make_xs(periph,
    484   1.8     enami 	    (struct scsipi_generic *) &cmd, sizeof(cmd),
    485  1.21    bouyer 	    (u_char *) bp->b_data, bp->b_bcount,
    486  1.21    bouyer 	    MUSTEK_RETRIES, 10000, bp,
    487  1.11   thorpej 	    XS_CTL_NOSLEEP | XS_CTL_ASYNC | XS_CTL_DATA_IN);
    488  1.21    bouyer 	if (xs == NULL) {
    489  1.21    bouyer 		/*
    490  1.21    bouyer 		 * out of memory. Keep this buffer in the queue, and
    491  1.21    bouyer 		 * retry later.
    492  1.21    bouyer 		 */
    493  1.21    bouyer 		callout_reset(&ss->sc_callout, hz / 2, ssrestart,
    494  1.21    bouyer 		    periph);
    495  1.21    bouyer 		return(0);
    496   1.1   mycroft 	}
    497  1.20    bouyer #ifdef DIAGNOSTIC
    498  1.20    bouyer 	if (BUFQ_GET(&ss->buf_queue) != bp)
    499  1.20    bouyer 		panic("ssstart(): dequeued wrong buf");
    500  1.20    bouyer #else
    501  1.20    bouyer 	BUFQ_GET(&ss->buf_queue);
    502  1.20    bouyer #endif
    503  1.22   mycroft 	error = scsipi_execute_xs(xs);
    504  1.21    bouyer 	/* with a scsipi_xfer preallocated, scsipi_command can't fail */
    505  1.21    bouyer 	KASSERT(error == 0);
    506  1.21    bouyer 	ss->sio.scan_lines -= lines_to_read;
    507  1.21    bouyer 	if (ss->sio.scan_lines < 0)
    508  1.21    bouyer 		ss->sio.scan_lines = 0;
    509  1.21    bouyer 	ss->sio.scan_window_size -= bp->b_bcount;
    510  1.21    bouyer 	if (ss->sio.scan_window_size < 0)
    511  1.21    bouyer 		ss->sio.scan_window_size = 0;
    512   1.1   mycroft 	return (0);
    513   1.1   mycroft }
    514   1.1   mycroft 
    515   1.1   mycroft /*
    516   1.1   mycroft  * check if the scanner is ready to take commands
    517   1.1   mycroft  *   wait timeout seconds and try only every second
    518   1.1   mycroft  *   if update, then update picture size info
    519   1.1   mycroft  *
    520   1.1   mycroft  *   returns EBUSY if scanner not ready
    521   1.1   mycroft  */
    522  1.19   thorpej static int
    523  1.19   thorpej mustek_get_status(struct ss_softc *ss, int timeout, int update)
    524   1.1   mycroft {
    525   1.1   mycroft 	struct mustek_get_status_cmd cmd;
    526   1.1   mycroft 	struct mustek_get_status_data data;
    527  1.13    bouyer 	struct scsipi_periph *periph = ss->sc_periph;
    528   1.1   mycroft 	int error, lines, bytes_per_line;
    529   1.1   mycroft 
    530  1.14   thorpej 	memset(&cmd, 0, sizeof(cmd));
    531   1.1   mycroft 	cmd.opcode = MUSTEK_GET_STATUS;
    532   1.1   mycroft 	cmd.length = sizeof(data);
    533   1.1   mycroft 
    534   1.1   mycroft 	while (1) {
    535  1.13    bouyer 		SC_DEBUG(periph, SCSIPI_DB1, ("mustek_get_status: stat_cmd\n"));
    536  1.24   mycroft 		error = scsipi_command(periph, (void *)&cmd, sizeof(cmd),
    537  1.24   mycroft 		    (void *)&data, sizeof(data),
    538  1.24   mycroft 		    MUSTEK_RETRIES, 5000, NULL, XS_CTL_DATA_IN | XS_CTL_DATA_ONSTACK);
    539   1.1   mycroft 		if (error)
    540   1.1   mycroft 			return (error);
    541   1.1   mycroft 		if ((data.ready_busy == MUSTEK_READY) ||
    542   1.1   mycroft 		    (timeout-- <= 0))
    543   1.1   mycroft 			break;
    544   1.1   mycroft 		/* please wait a second */
    545   1.1   mycroft 		tsleep((caddr_t)mustek_get_status, PRIBIO + 1, "mtkrdy", hz);
    546   1.1   mycroft 	}
    547   1.1   mycroft 
    548   1.1   mycroft 	if (update) {
    549   1.2   mycroft 		bytes_per_line = _2ltol(data.bytes_per_line);
    550   1.2   mycroft 		lines = _3ltol(data.lines);
    551   1.1   mycroft 		if (lines != ss->sio.scan_lines) {
    552   1.6  christos 			printf("mustek: lines actual(%d) != computed(%ld)\n",
    553   1.1   mycroft 			    lines, ss->sio.scan_lines);
    554   1.1   mycroft 			return (EIO);
    555   1.1   mycroft 		}
    556   1.1   mycroft 		if (bytes_per_line * lines != ss->sio.scan_window_size) {
    557   1.6  christos 			printf("mustek: win-size actual(%d) != computed(%ld)\n",
    558   1.1   mycroft 			    bytes_per_line * lines, ss->sio.scan_window_size);
    559   1.1   mycroft 		    return (EIO);
    560   1.1   mycroft 		}
    561   1.1   mycroft 
    562  1.13    bouyer 		SC_DEBUG(periph, SCSIPI_DB1,
    563   1.3  christos 		    ("mustek_get_size: bpl=%ld, lines=%ld\n",
    564   1.1   mycroft 		    (ss->sio.scan_pixels_per_line * ss->sio.scan_bits_per_pixel) / 8,
    565   1.1   mycroft 		    ss->sio.scan_lines));
    566  1.13    bouyer 		SC_DEBUG(periph, SCSIPI_DB1, ("window size = %ld\n",
    567   1.1   mycroft 		    ss->sio.scan_window_size));
    568   1.1   mycroft 	}
    569   1.1   mycroft 
    570  1.13    bouyer 	SC_DEBUG(periph, SCSIPI_DB1, ("mustek_get_status: end\n"));
    571   1.1   mycroft 	if (data.ready_busy == MUSTEK_READY)
    572   1.1   mycroft 		return (0);
    573   1.1   mycroft 	else
    574   1.1   mycroft 		return (EBUSY);
    575   1.1   mycroft }
    576   1.1   mycroft 
    577   1.1   mycroft /*
    578   1.1   mycroft  * mustek_compute_sizes: compute window_size and lines for the picture
    579   1.1   mycroft  *   this function is called from different places in the code
    580   1.1   mycroft  */
    581  1.19   thorpej static void
    582  1.19   thorpej mustek_compute_sizes(struct ss_softc *ss)
    583   1.1   mycroft {
    584   1.1   mycroft 
    585   1.1   mycroft 	switch (ss->sio.scan_image_mode) {
    586   1.1   mycroft 	case SIM_BINARY_MONOCHROME:
    587   1.1   mycroft 	case SIM_DITHERED_MONOCHROME:
    588   1.1   mycroft 		ss->sio.scan_bits_per_pixel = 1;
    589   1.1   mycroft 		break;
    590   1.1   mycroft 	case SIM_GRAYSCALE:
    591   1.1   mycroft 	case SIM_RED:
    592   1.1   mycroft 	case SIM_GREEN:
    593   1.1   mycroft 	case SIM_BLUE:
    594   1.1   mycroft 		ss->sio.scan_bits_per_pixel = 8;
    595   1.1   mycroft 		break;
    596   1.1   mycroft 	}
    597   1.1   mycroft 
    598   1.1   mycroft 	/*
    599   1.1   mycroft 	 * horizontal number of bytes is always a multiple of 2,
    600   1.1   mycroft 	 * in 8-bit mode at least
    601   1.1   mycroft 	 */
    602   1.1   mycroft 	ss->sio.scan_pixels_per_line =
    603   1.1   mycroft 	    (ss->sio.scan_width * ss->sio.scan_x_resolution) / 1200;
    604   1.1   mycroft 	if (ss->sio.scan_bits_per_pixel == 1)
    605   1.1   mycroft 		/* make it a multiple of 16, and thus of 2 bytes */
    606   1.1   mycroft 		ss->sio.scan_pixels_per_line =
    607   1.1   mycroft 		    (ss->sio.scan_pixels_per_line + 15) & 0xfffffff0;
    608   1.1   mycroft 	else
    609   1.1   mycroft 		ss->sio.scan_pixels_per_line =
    610   1.1   mycroft 		    (ss->sio.scan_pixels_per_line + 1) & 0xfffffffe;
    611   1.1   mycroft 
    612   1.1   mycroft 	ss->sio.scan_lines =
    613   1.1   mycroft 	    (ss->sio.scan_height * ss->sio.scan_y_resolution) / 1200;
    614   1.8     enami 	ss->sio.scan_window_size = ss->sio.scan_lines *
    615   1.1   mycroft 	    ((ss->sio.scan_pixels_per_line * ss->sio.scan_bits_per_pixel) / 8);
    616   1.1   mycroft }
    617