/* SANE - Scanner Access Now Easy. Copyright (C) 2006-2007 Wittawat Yamwong 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. */ /* test cases 1. short USB packet (must be no -ETIMEDOUT) 2. cancel using button on the printer (look for abort command) 3. start scan while busy (status 0x1414) 4. cancel using ctrl-c (must send abort command) */ #include "../include/sane/config.h" #include #include #include #include /* localtime(C90) */ #include "pixma_rename.h" #include "pixma_common.h" #include "pixma_io.h" #ifdef __GNUC__ # define UNUSED(v) (void) v #else # define UNUSED(v) #endif /* Size of the command buffer should be multiple of wMaxPacketLength and greater than 4096+24. 4096 = size of gamma table. 24 = header + checksum */ #define IMAGE_BLOCK_SIZE (512*1024) #define CMDBUF_SIZE (4096 + 24) #define DEFAULT_GAMMA 1.0 #define UNKNOWN_PID 0xffff #define CANON_VID 0x04a9 /* Generation 1 */ #define MP150_PID 0x1709 #define MP170_PID 0x170a #define MP450_PID 0x170b #define MP500_PID 0x170c #define MP530_PID 0x1712 #define MP800_PID 0x170d #define MP800R_PID 0x170e #define MP830_PID 0x1713 /* Generation 2 */ #define MP160_PID 0x1714 #define MP180_PID 0x1715 #define MP460_PID 0x1716 #define MP510_PID 0x1717 #define MP600_PID 0x1718 #define MP600R_PID 0x1719 #define MP810_PID 0x171a #define MP960_PID 0x171b #define MP140_PID 0x172b /* Generation 3 */ #define MP210_PID 0x1721 #define MP220_PID 0x1722 #define MP470_PID 0x1723 #define MP520_PID 0x1724 #define MP610_PID 0x1725 #define MP970_PID 0x1726 #define MX300_PID 0x1727 #define MX310_PID 0x1728 #define MX700_PID 0x1729 #define MX850_PID 0x172c /* untested */ enum mp150_state_t { state_idle, state_warmup, state_scanning, state_transfering, state_finished }; enum mp150_cmd_t { cmd_start_session = 0xdb20, cmd_select_source = 0xdd20, cmd_gamma = 0xee20, cmd_scan_param = 0xde20, cmd_status = 0xf320, cmd_abort_session = 0xef20, cmd_time = 0xeb80, cmd_read_image = 0xd420, cmd_error_info = 0xff20, cmd_start_calibrate_ccd_3 = 0xd520, cmd_end_calibrate_ccd_3 = 0xd720, cmd_scan_param_3 = 0xd820, cmd_scan_start_3 = 0xd920, cmd_status_3 = 0xda20, cmd_e920 = 0xe920 /* seen in MP800 */ }; typedef struct mp150_t { enum mp150_state_t state; pixma_cmdbuf_t cb; uint8_t *imgbuf; uint8_t current_status[16]; unsigned last_block; uint8_t generation; /* for Generation 3 and CCD shift */ uint8_t *linebuf; uint8_t *data_left_ofs; unsigned data_left_len; int shift[3]; unsigned lines_shift; } mp150_t; /* STAT: 0x0606 = ok, 0x1515 = failed (PIXMA_ECANCELED), 0x1414 = busy (PIXMA_EBUSY) Transaction scheme 1. command_header/data | result_header 2. command_header | result_header/data 3. command_header | result_header/image_data - data has checksum in the last byte. - image_data has no checksum. - data and image_data begins in the same USB packet as command_header or result_header. command format #1: u16be cmd u8[6] 0 u8[4] 0 u32be PLEN parameter length u8[PLEN-1] parameter u8 parameter check sum result: u16be STAT u8 0 u8 0 or 0x21 if STAT == 0x1414 u8[4] 0 command format #2: u16be cmd u8[6] 0 u8[4] 0 u32be RLEN result length result: u16be STAT u8[6] 0 u8[RLEN-1] result u8 result check sum command format #3: (only used by read_image_block) u16be 0xd420 u8[6] 0 u8[4] 0 u32be max. block size + 8 result: u16be STAT u8[6] 0 u8 block info bitfield: 0x8 = end of scan, 0x10 = no more paper, 0x20 = no more data u8[3] 0 u32be ILEN image data size u8[ILEN] image data */ static void mp150_finish_scan (pixma_t * s); static int start_scan_3 (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; return pixma_exec_short_cmd (s, &mp->cb, cmd_scan_start_3); } static int is_calibrated (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; if (mp->generation == 3) { return (mp->current_status[0] == 1); } if (mp->generation == 1) { return (mp->current_status[8] == 1); } else { return (mp->current_status[9] == 1); } } static int has_paper (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; return (mp->current_status[1] == 0); } static void drain_bulk_in (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; while (pixma_read (s->io, mp->imgbuf, IMAGE_BLOCK_SIZE) >= 0); } static int abort_session (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; return pixma_exec_short_cmd (s, &mp->cb, cmd_abort_session); } static int send_cmd_e920 (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; return pixma_exec_short_cmd (s, &mp->cb, cmd_e920); } static int send_cmd_start_calibrate_ccd_3 (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; return pixma_exec_short_cmd (s, &mp->cb, cmd_start_calibrate_ccd_3); } static int start_session (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; return pixma_exec_short_cmd (s, &mp->cb, cmd_start_session); } static int select_source (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; uint8_t *data; data = pixma_newcmd (&mp->cb, cmd_select_source, 12, 0); if (s->cfg->pid == MP830_PID) { switch (s->param->source) { case PIXMA_SOURCE_ADF: data[0] = 2; data[5] = 1; data[6] = 1; break; case PIXMA_SOURCE_ADFDUP: data[0] = 2; data[5] = 3; data[6] = 3; break; case PIXMA_SOURCE_TPU: PDBG (pixma_dbg (1, "BUG:select_source(): unsupported source %d\n", s->param->source)); /* fall through */ case PIXMA_SOURCE_FLATBED: data[0] = 1; data[1] = 1; break; } } else { data[0] = (s->param->source == PIXMA_SOURCE_ADF) ? 2 : 1; data[1] = 1; if (mp->generation == 2) { data[5] = 1; } } return pixma_exec (s, &mp->cb); } static int send_gamma_table (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; const uint8_t *lut = s->param->gamma_table; uint8_t *data; if (mp->generation == 1) { data = pixma_newcmd (&mp->cb, cmd_gamma, 4096 + 8, 0); data[0] = (s->param->channels == 3) ? 0x10 : 0x01; pixma_set_be16 (0x1004, data + 2); if (lut) memcpy (data + 4, lut, 4096); else pixma_fill_gamma_table (DEFAULT_GAMMA, data + 4, 4096); } else { /* FIXME: Gamma table for 2nd generation: 1024 * uint16_le */ data = pixma_newcmd (&mp->cb, cmd_gamma, 2048 + 8, 0); data[0] = 0x10; pixma_set_be16 (0x0804, data + 2); if (lut) { int i; for (i = 0; i < 1024; i++) { int j = (i << 2) + (i >> 8); data[4 + 2 * i + 0] = lut[j]; data[4 + 2 * i + 1] = lut[j]; } } else { int i; pixma_fill_gamma_table (DEFAULT_GAMMA, data + 4, 2048); for (i = 0; i < 1024; i++) { int j = (i << 1) + (i >> 9); data[4 + 2 * i + 0] = data[4 + j]; data[4 + 2 * i + 1] = data[4 + j]; } } } return pixma_exec (s, &mp->cb); } static unsigned calc_raw_width (const mp150_t * mp, const pixma_scan_param_t * param) { unsigned raw_width; /* NOTE: Actually, we can send arbitary width to MP150. Lines returned are always padded to multiple of 4 or 12 pixels. Is this valid for other models, too? */ if (mp->generation >= 2) { raw_width = ALIGN (param->w, 32); } else if (param->channels == 1) { raw_width = ALIGN (param->w, 12); } else { raw_width = ALIGN (param->w, 4); } return raw_width; } static int has_ccd_sensor (pixma_t * s) { return ((s->cfg->cap & PIXMA_CAP_CCD) != 0); } static int is_ccd_grayscale (pixma_t * s) { return (has_ccd_sensor (s) && (s->param->channels == 1)); } /* CCD sensors don't have a Grayscale mode, but use color mode instead */ static unsigned get_cis_ccd_line_size (pixma_t * s) { return (s->param->line_size * ((is_ccd_grayscale (s)) ? 3 : 1)); } static int is_scanning_from_adf (pixma_t * s) { return (s->param->source == PIXMA_SOURCE_ADF || s->param->source == PIXMA_SOURCE_ADFDUP); } static int send_scan_param (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; uint8_t *data; unsigned raw_width = calc_raw_width (mp, s->param); if (mp->generation <= 2) { data = pixma_newcmd (&mp->cb, cmd_scan_param, 0x30, 0); pixma_set_be16 (s->param->xdpi | 0x8000, data + 0x04); pixma_set_be16 (s->param->ydpi | 0x8000, data + 0x06); pixma_set_be32 (s->param->x, data + 0x08); pixma_set_be32 (s->param->y, data + 0x0c); pixma_set_be32 (raw_width, data + 0x10); pixma_set_be32 (s->param->h, data + 0x14); data[0x18] = ((s->param->channels != 1) || is_ccd_grayscale (s)) ? 0x08 : 0x04; data[0x19] = s->param->depth * ((is_ccd_grayscale (s)) ? 3 : s->param->channels); /* bits per pixel */ data[0x20] = 0xff; data[0x23] = 0x81; data[0x26] = 0x02; data[0x27] = 0x01; } else { data = pixma_newcmd (&mp->cb, cmd_scan_param_3, 0x38, 0); data[0x00] = (s->param->source == PIXMA_SOURCE_ADF) ? 0x02 : 0x01; data[0x01] = 0x01; data[0x02] = 0x01; data[0x05] = 0x01; /* This one also seen at 0. Don't know yet what's used for */ pixma_set_be16 (s->param->xdpi | 0x8000, data + 0x08); pixma_set_be16 (s->param->ydpi | 0x8000, data + 0x0a); pixma_set_be32 (s->param->x, data + 0x0c); pixma_set_be32 (s->param->y, data + 0x10); pixma_set_be32 (raw_width, data + 0x14); pixma_set_be32 (s->param->h, data + 0x18); data[0x1c] = ((s->param->channels != 1) || is_ccd_grayscale (s)) ? 0x08 : 0x04; data[0x1d] = s->param->depth * ((is_ccd_grayscale (s)) ? 3 : s->param->channels); /* bits per pixel */ data[0x1f] = 0x01; data[0x20] = 0xff; data[0x21] = 0x81; data[0x23] = 0x02; data[0x24] = 0x01; data[0x30] = 0x01; } return pixma_exec (s, &mp->cb); } static int query_status_3 (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; uint8_t *data; int error, status_len; status_len = 8; data = pixma_newcmd (&mp->cb, cmd_status_3, 0, status_len); error = pixma_exec (s, &mp->cb); if (error >= 0) { memcpy (mp->current_status, data, status_len); } return error; } static int init_ccd_3 (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; uint8_t *data; int error, status_len; status_len = 8; error = send_cmd_start_calibrate_ccd_3 (s); if (error >= 0) { data = pixma_newcmd (&mp->cb, cmd_end_calibrate_ccd_3, 0, status_len); error = pixma_exec (s, &mp->cb); if (error >= 0) { memcpy (mp->current_status, data, status_len); } } return error; } static int query_status (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; uint8_t *data; int error, status_len; status_len = (mp->generation == 1) ? 12 : 16; data = pixma_newcmd (&mp->cb, cmd_status, 0, status_len); error = pixma_exec (s, &mp->cb); if (error >= 0) { memcpy (mp->current_status, data, status_len); PDBG (pixma_dbg (3, "Current status: paper=%u cal=%u lamp=%u busy=%u\n", data[1], data[8], data[7], data[9])); } return error; } static int send_time (pixma_t * s) { /* Why does a scanner need a time? */ time_t now; struct tm *t; uint8_t *data; mp150_t *mp = (mp150_t *) s->subdriver; data = pixma_newcmd (&mp->cb, cmd_time, 20, 0); pixma_get_time (&now, NULL); t = localtime (&now); snprintf ((char *) data, 16, "%02d/%02d/%02d %02d:%02d", t->tm_year % 100, t->tm_mon + 1, t->tm_mday, t->tm_hour, t->tm_min); PDBG (pixma_dbg (3, "Sending time: '%s'\n", (char *) data)); return pixma_exec (s, &mp->cb); } /* TODO: Simplify this function. Read the whole data packet in one shot. */ static int read_image_block (pixma_t * s, uint8_t * header, uint8_t * data) { uint8_t cmd[16]; mp150_t *mp = (mp150_t *) s->subdriver; const int hlen = 8 + 8; int error, datalen; memset (cmd, 0, sizeof (cmd)); pixma_set_be16 (cmd_read_image, cmd); if ((mp->last_block & 0x20) == 0) pixma_set_be32 ((IMAGE_BLOCK_SIZE / 65536) * 65536 + 8, cmd + 0xc); else pixma_set_be32 (32 + 8, cmd + 0xc); mp->state = state_transfering; mp->cb.reslen = pixma_cmd_transaction (s, cmd, sizeof (cmd), mp->cb.buf, 512); datalen = mp->cb.reslen; if (datalen < 0) return datalen; memcpy (header, mp->cb.buf, hlen); if (datalen >= hlen) { datalen -= hlen; memcpy (data, mp->cb.buf + hlen, datalen); data += datalen; if (mp->cb.reslen == 512) { error = pixma_read (s->io, data, IMAGE_BLOCK_SIZE - 512 + hlen); if (error < 0) return error; datalen += error; } } mp->state = state_scanning; mp->cb.expected_reslen = 0; error = pixma_check_result (&mp->cb); if (error < 0) return error; if (mp->cb.reslen < hlen) return PIXMA_EPROTO; return datalen; } static int read_error_info (pixma_t * s, void *buf, unsigned size) { unsigned len = 16; mp150_t *mp = (mp150_t *) s->subdriver; uint8_t *data; int error; data = pixma_newcmd (&mp->cb, cmd_error_info, 0, len); error = pixma_exec (s, &mp->cb); if (error >= 0 && buf) { if (len < size) size = len; /* NOTE: I've absolutely no idea what the returned data mean. */ memcpy (buf, data, size); error = len; } return error; } /* handle_interrupt() waits until it receives an interrupt packet or times out. It calls send_time() and query_status() if necessary. Therefore, make sure that handle_interrupt() is only called from a safe context for send_time() and query_status(). Returns: 0 timed out 1 an interrupt packet received PIXMA_ECANCELED interrupted by signal <0 error */ static int handle_interrupt (pixma_t * s, int timeout) { uint8_t buf[16]; int len; len = pixma_wait_interrupt (s->io, buf, sizeof (buf), timeout); if (len == PIXMA_ETIMEDOUT) return 0; if (len < 0) return len; if (len != 16) { PDBG (pixma_dbg (1, "WARNING:unexpected interrupt packet length %d\n", len)); return PIXMA_EPROTO; } /* More than one event can be reported at the same time. */ if (buf[3] & 1) send_time (s); if (buf[9] & 2) query_status (s); if (buf[0] & 2) s->events = PIXMA_EV_BUTTON2 | buf[1]; /* b/w scan */ if (buf[0] & 1) s->events = PIXMA_EV_BUTTON1 | buf[1]; /* color scan */ return 1; } static int wait_until_ready (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; int error, tmo = 60; error = (mp->generation == 3) ? query_status_3 (s) : query_status (s); if (error < 0) return error; while (!is_calibrated (s)) { error = handle_interrupt (s, 1000); if (mp->generation == 3) error = query_status_3 (s); if (s->cancel) return PIXMA_ECANCELED; if (error != PIXMA_ECANCELED && error < 0) return error; if (--tmo == 0) { PDBG (pixma_dbg (1, "WARNING:Timed out in wait_until_ready()\n")); PDBG (query_status (s)); return PIXMA_ETIMEDOUT; } #if 0 /* If we use sanei_usb_*, we sometimes lose interrupts! So poll the * status here. */ error = query_status (s); if (error < 0) return error; #endif } return 0; } static int mp150_open (pixma_t * s) { mp150_t *mp; uint8_t *buf; mp = (mp150_t *) calloc (1, sizeof (*mp)); if (!mp) return PIXMA_ENOMEM; buf = (uint8_t *) malloc (CMDBUF_SIZE + IMAGE_BLOCK_SIZE); if (!buf) { free (mp); return PIXMA_ENOMEM; } s->subdriver = mp; mp->state = state_idle; mp->cb.buf = buf; mp->cb.size = CMDBUF_SIZE; mp->cb.res_header_len = 8; mp->cb.cmd_header_len = 16; mp->cb.cmd_len_field_ofs = 14; mp->imgbuf = buf + CMDBUF_SIZE; /* General rules for setting Pixma protocol generation # */ mp->generation = (s->cfg->pid >= MP160_PID) ? 2 : 1; if (s->cfg->pid >= MP210_PID) mp->generation = 3; /* And exceptions to be added here */ if (s->cfg->pid == MP140_PID) mp->generation = 2; query_status (s); handle_interrupt (s, 200); return 0; } static void mp150_close (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; mp150_finish_scan (s); free (mp->cb.buf); free (mp); s->subdriver = NULL; } static int mp150_check_param (pixma_t * s, pixma_scan_param_t * sp) { mp150_t *mp = (mp150_t *) s->subdriver; sp->depth = 8; /* MP150 only supports 8 bit per channel. */ if (mp->generation >= 2) { sp->x = ALIGN (sp->x, 32); sp->y = ALIGN (sp->y, 32); sp->w = calc_raw_width (mp, sp); } sp->line_size = calc_raw_width (mp, sp) * sp->channels; return 0; } static int mp150_scan (pixma_t * s) { int error = 0, tmo; mp150_t *mp = (mp150_t *) s->subdriver; if (mp->state != state_idle) return PIXMA_EBUSY; /* clear interrupt packets buffer */ while (handle_interrupt (s, 0) > 0) { } /* FIXME: Duplex ADF: check paper status only before odd pages (1,3,5,...). */ if (is_scanning_from_adf (s)) { if ((error = query_status (s)) < 0) return error; tmo = 10; while (!has_paper(s) && --tmo >= 0) { error = handle_interrupt (s, 1000); if (s->cancel) return PIXMA_ECANCELED; if (error != PIXMA_ECANCELED && error < 0) return error; PDBG (pixma_dbg (2, "No paper in ADF. Timed out in %d sec.\n", tmo)); } if (!has_paper(s)) return PIXMA_ENO_PAPER; } if (has_ccd_sensor (s)) { error = (mp->generation <= 2) ? send_cmd_e920 (s) : send_cmd_start_calibrate_ccd_3 (s); switch (error) { case PIXMA_ECANCELED: case PIXMA_EBUSY: PDBG (pixma_dbg (2, "cmd e920 or d520 returned %s\n", pixma_strerror (error))); /* fall through */ case 0: query_status (s); break; default: PDBG (pixma_dbg (1, "WARNING:cmd e920 or d520 failed %s\n", pixma_strerror (error))); return error; } tmo = 3; /* like Windows driver, CCD calibration ? */ while (--tmo >= 0) { error = handle_interrupt (s, 1000); if (s->cancel) return PIXMA_ECANCELED; if (error != PIXMA_ECANCELED && error < 0) return error; PDBG (pixma_dbg (2, "CCD Calibration ends in %d sec.\n", tmo)); } /* pixma_sleep(2000000); */ } tmo = 10; error = start_session (s); while (error == PIXMA_EBUSY && --tmo >= 0) { if (s->cancel) { error = PIXMA_ECANCELED; break; } PDBG (pixma_dbg (2, "Scanner is busy. Timed out in %d sec.\n", tmo + 1)); pixma_sleep (1000000); error = start_session (s); } if (error == PIXMA_EBUSY || error == PIXMA_ETIMEDOUT) { /* The scanner maybe hangs. We try to empty output buffer of the * scanner and issue the cancel command. */ PDBG (pixma_dbg (2, "Scanner hangs? Sending abort_session command.\n")); drain_bulk_in (s); abort_session (s); pixma_sleep (500000); error = start_session (s); } if ((error >= 0) || (mp->generation == 3)) mp->state = state_warmup; if ((error >= 0) && (mp->generation <= 2)) error = select_source (s); if ((error >= 0) && (mp->generation == 3) && has_ccd_sensor (s)) error = init_ccd_3 (s); if (error >= 0) error = send_gamma_table (s); if ((error >= 0) && (mp->generation == 3)) error = send_gamma_table (s); if ((error >= 0) && (mp->generation == 3)) error = send_gamma_table (s); if (error >= 0) error = send_scan_param (s); if ((error >= 0) && (mp->generation == 3)) error = start_scan_3 (s); if (error < 0) { mp150_finish_scan (s); return error; } return 0; } static uint8_t * shift_colors (uint8_t * dptr, uint8_t * sptr, unsigned w, int sr, int sg, int sb) { unsigned i; for (i = 0; i < w; i++) { *sptr++ = *(dptr++ + sr); *sptr++ = *(dptr++ + sg); *sptr++ = *(dptr++ + sb); } return dptr; } static uint8_t * rgb_to_gray (uint8_t * gptr, uint8_t * sptr, unsigned w) { unsigned i, g; for (i = 0; i < w; i++) { g = *sptr++; g += *sptr++; *gptr++ = (*sptr++ + g) / 3; } return gptr; } static void reorder_pixels (uint8_t * linebuf, uint8_t * sptr, unsigned c, unsigned n, unsigned m, unsigned w, unsigned line_size) { unsigned i; for (i = 0; i < w; i++) { memcpy (linebuf + c * (n * (i % m) + i / m), sptr + c * i, c); } memcpy (sptr, linebuf, line_size); } /* This function deals both with PIXMA CCD sensors producing shifted color * planes images, Grayscale CCD scan and Generation 3 high dpi images. * Each complete line in mp->imgbuf is processed for shifting CCD sensor * color planes, reordering pixels above 600 dpi for Generation 3, and * converting to Grayscale for CCD sensors. */ static unsigned post_process_image_data (pixma_t * s, pixma_imagebuf_t * ib) { mp150_t *mp = (mp150_t *) s->subdriver; unsigned c, lines, i, line_size, n, m; uint8_t *sptr, *dptr, *gptr; c = (is_ccd_grayscale (s)) ? 3 : s->param->channels; n = s->param->xdpi / 600; m = (n > 0) ? s->param->w / n : 1; sptr = dptr = gptr = mp->imgbuf; line_size = get_cis_ccd_line_size (s); lines = (mp->data_left_ofs - mp->imgbuf) / line_size; if (lines > 2 * mp->lines_shift) { lines -= 2 * mp->lines_shift; for (i = 0; i < lines; i++, sptr += line_size) { /* Color plane shift needed by e.g. CCD */ if (c == 3) dptr = shift_colors (dptr, sptr, s->param->w, mp->shift[0], mp->shift[1], mp->shift[2]); /* special image format for *most* Generation 3 devices */ if ((mp->generation == 3) && (s->cfg->pid != MP220_PID)) reorder_pixels (mp->linebuf, sptr, c, n, m, s->param->w, line_size); /* Color to Grayscale convert for CCD sensor */ if (is_ccd_grayscale (s)) gptr = rgb_to_gray (gptr, sptr, s->param->w); } } ib->rptr = mp->imgbuf; ib->rend = (is_ccd_grayscale (s)) ? gptr : sptr; return mp->data_left_ofs - sptr; /* # of non processed bytes */ } static unsigned calc_shifting (pixma_t * s) { mp150_t *mp = (mp150_t *) s->subdriver; unsigned base_shift; /* If color plane shift, how many pixels shift */ switch (s->cfg->pid) { case MP970_PID: if (s->param->ydpi > 75) mp->lines_shift = s->param->ydpi / 50; break; case MP800_PID: case MP810_PID: case MP830_PID: case MP960_PID: mp->lines_shift = s->param->ydpi / 100; break; default: /* all CIS devices */ mp->lines_shift = 0; } base_shift = get_cis_ccd_line_size (s) * mp->lines_shift; /* If color plane shift, how to apply the shift */ switch (s->cfg->pid) { case MP970_PID: mp->shift[0] = 0; mp->shift[1] = base_shift; mp->shift[2] = 2 * base_shift; break; case MP800_PID: case MP810_PID: case MP830_PID: case MP960_PID: default: mp->shift[0] = 2 * base_shift; mp->shift[1] = base_shift; mp->shift[2] = 0; } return mp->lines_shift; } static int mp150_fill_buffer (pixma_t * s, pixma_imagebuf_t * ib) { int error; mp150_t *mp = (mp150_t *) s->subdriver; unsigned block_size, bytes_received, proc_buf_size, line_size; uint8_t header[16]; if (mp->state == state_warmup) { error = wait_until_ready (s); if (error < 0) return error; pixma_sleep (1000000); /* No need to sleep, actually, but Window's driver * sleep 1.5 sec. */ mp->state = state_scanning; mp->last_block = 0; line_size = get_cis_ccd_line_size (s); proc_buf_size = (2 * calc_shifting (s) + 2) * line_size; mp->cb.buf = realloc (mp->cb.buf, CMDBUF_SIZE + IMAGE_BLOCK_SIZE + proc_buf_size); if (!mp->cb.buf) return PIXMA_ENOMEM; mp->linebuf = mp->cb.buf + CMDBUF_SIZE; mp->imgbuf = mp->data_left_ofs = mp->linebuf + line_size; mp->data_left_len = 0; } do { if (s->cancel) return PIXMA_ECANCELED; if ((mp->last_block & 0x28) == 0x28) { /* end of image */ if (mp->last_block != 0x38) abort_session (s); /* FIXME: it probably doesn't work in duplex mode! */ mp->state = state_finished; return 0; } memmove (mp->imgbuf, mp->data_left_ofs, mp->data_left_len); error = read_image_block (s, header, mp->imgbuf + mp->data_left_len); if (error < 0) { if (error == PIXMA_ECANCELED) { /* NOTE: I see this in traffic logs but I don't know its meaning. */ read_error_info (s, NULL, 0); } return error; } bytes_received = error; block_size = pixma_get_be32 (header + 12); mp->last_block = header[8] & 0x38; if ((header[8] & ~0x38) != 0) { PDBG (pixma_dbg (1, "WARNING: Unexpected result header\n")); PDBG (pixma_hexdump (1, header, 16)); } PASSERT (bytes_received == block_size); if (block_size == 0) { /* no image data at this moment. */ pixma_sleep (10000); } mp->data_left_ofs = mp->imgbuf + mp->data_left_len + bytes_received; mp->data_left_len = post_process_image_data (s, ib); mp->data_left_ofs -= mp->data_left_len; } while (ib->rend == ib->rptr); return ib->rend - ib->rptr; } static void mp150_finish_scan (pixma_t * s) { int error; mp150_t *mp = (mp150_t *) s->subdriver; switch (mp->state) { case state_transfering: drain_bulk_in (s); /* fall through */ case state_scanning: case state_warmup: error = abort_session (s); if (error < 0) PDBG (pixma_dbg (1, "WARNING:abort_session() failed %d\n", error)); /* fall through */ case state_finished: mp->state = state_idle; /* fall through */ case state_idle: break; } } static void mp150_wait_event (pixma_t * s, int timeout) { /* FIXME: timeout is not correct. See usbGetCompleteUrbNoIntr() for * instance. */ while (s->events == 0 && handle_interrupt (s, timeout) > 0) { } } static int mp150_get_status (pixma_t * s, pixma_device_status_t * status) { int error; error = query_status (s); if (error < 0) return error; status->hardware = PIXMA_HARDWARE_OK; status->adf = (has_paper (s)) ? PIXMA_ADF_OK : PIXMA_ADF_NO_PAPER; status->cal = (is_calibrated (s)) ? PIXMA_CALIBRATION_OK : PIXMA_CALIBRATION_OFF; return 0; } static const pixma_scan_ops_t pixma_mp150_ops = { mp150_open, mp150_close, mp150_scan, mp150_fill_buffer, mp150_finish_scan, mp150_wait_event, mp150_check_param, mp150_get_status }; #define DEVICE(name, pid, dpi, cap) { \ name, /* name */ \ CANON_VID, pid, /* vid pid */ \ 0, /* iface */ \ &pixma_mp150_ops, /* ops */ \ dpi, 2*(dpi), /* xdpi, ydpi */ \ 638, 877, /* width, height */ \ PIXMA_CAP_EASY_RGB|PIXMA_CAP_GRAY| \ PIXMA_CAP_GAMMA_TABLE|PIXMA_CAP_EVENTS|cap \ } #define END_OF_DEVICE_LIST DEVICE(NULL, 0, 0, 0) const pixma_config_t pixma_mp150_devices[] = { /* Generation 1: CIS */ DEVICE ("Canon PIXMA MP150", MP150_PID, 1200, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP170", MP170_PID, 1200, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP450", MP450_PID, 1200, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP500", MP500_PID, 1200, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP530", MP530_PID, 1200, PIXMA_CAP_CIS | PIXMA_CAP_ADF), /* Generation 1: CCD */ DEVICE ("Canon PIXMA MP800", MP800_PID, 2400, PIXMA_CAP_CCD | PIXMA_CAP_TPU | PIXMA_CAP_48BIT), DEVICE ("Canon PIXMA MP800R", MP800R_PID, 2400, PIXMA_CAP_CCD | PIXMA_CAP_TPU | PIXMA_CAP_48BIT), DEVICE ("Canon PIXMA MP830", MP830_PID, 2400, PIXMA_CAP_CCD | PIXMA_CAP_ADFDUP | PIXMA_CAP_48BIT), /* Generation 2: CIS */ DEVICE ("Canon PIXMA MP140", MP140_PID, 600, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP160", MP160_PID, 600, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP180", MP180_PID, 1200, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP460", MP460_PID, 1200, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP510", MP510_PID, 1200, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP600", MP600_PID, 2400, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP600R", MP600R_PID, 2400, PIXMA_CAP_CIS), /* Generation 2: CCD */ DEVICE ("Canon PIXMA MP810", MP810_PID, 4800, PIXMA_CAP_CCD | PIXMA_CAP_TPU), DEVICE ("Canon PIXMA MP960", MP960_PID, 4800, PIXMA_CAP_CCD | PIXMA_CAP_TPU), /* Generation 3: CIS */ DEVICE ("Canon PIXMA MP210", MP210_PID, 600, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP220", MP220_PID, 1200, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP470", MP470_PID, 2400, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP520", MP520_PID, 2400, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MP610", MP610_PID, 4800, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MX300", MX300_PID, 600, PIXMA_CAP_CIS), DEVICE ("Canon PIXMA MX310", MX310_PID, 1200, PIXMA_CAP_CIS | PIXMA_CAP_ADF), DEVICE ("Canon PIXMA MX700", MX700_PID, 2400, PIXMA_CAP_CIS | PIXMA_CAP_ADF), DEVICE ("Canon PIXMA MX850", MX850_PID, 2400, PIXMA_CAP_CIS | PIXMA_CAP_ADFDUP), /* Generation 3 CCD not managed as Generation 2 */ DEVICE ("Canon PIXMA MP970", MP970_PID, 4800, PIXMA_CAP_CCD | PIXMA_CAP_TPU), END_OF_DEVICE_LIST };