sane-project-backends/backend/pixma_mp150.c

1214 wiersze
31 KiB
C

/* SANE - Scanner Access Now Easy.
Copyright (C) 2006-2007 Wittawat Yamwong <wittawat@web.de>
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 <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h> /* 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
};