kopia lustrzana https://gitlab.com/sane-project/backends
1530 wiersze
46 KiB
C
1530 wiersze
46 KiB
C
/*
|
|
* SANE backend for Xerox Phaser 3200MFP et al.
|
|
* Copyright 2008-2016 ABC <abc@telekom.ru>
|
|
*
|
|
* Network Scanners Support
|
|
* Copyright 2010 Alexander Kuznetsov <acca(at)cpan.org>
|
|
*
|
|
* Color scanning on Samsung M2870 model and Xerox Cognac 3215 & 3225
|
|
* models by Laxmeesh Onkar Markod <m.laxmeesh@samsung.com>
|
|
*
|
|
* This program is licensed under GPL + SANE exception.
|
|
* More info at http://www.sane-project.org/license.html
|
|
*/
|
|
|
|
#define DEBUG_NOT_STATIC
|
|
#define BACKEND_NAME xerox_mfp
|
|
|
|
#include "../include/sane/config.h"
|
|
#include "../include/lassert.h"
|
|
#include <ctype.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <errno.h>
|
|
#include <fcntl.h>
|
|
#include <math.h>
|
|
#include <unistd.h>
|
|
#include <sys/time.h>
|
|
#include <sys/types.h>
|
|
#include "../include/sane/sane.h"
|
|
#include "../include/sane/sanei.h"
|
|
#include "../include/sane/saneopts.h"
|
|
#include "../include/sane/sanei_thread.h"
|
|
#include "../include/sane/sanei_usb.h"
|
|
#include "../include/sane/sanei_config.h"
|
|
#include "../include/sane/sanei_backend.h"
|
|
#ifdef HAVE_LIBJPEG
|
|
#include <jpeglib.h>
|
|
#endif
|
|
#include "xerox_mfp.h"
|
|
|
|
#define BACKEND_BUILD 13
|
|
#define XEROX_CONFIG_FILE "xerox_mfp.conf"
|
|
|
|
static const SANE_Device **devlist = NULL; /* sane_get_devices array */
|
|
static struct device *devices_head = NULL; /* sane_get_devices list */
|
|
|
|
enum { TRANSPORT_USB, TRANSPORT_TCP, TRANSPORTS_MAX };
|
|
transport available_transports[TRANSPORTS_MAX] = {
|
|
{ "usb", usb_dev_request, usb_dev_open, usb_dev_close, usb_configure_device },
|
|
{ "tcp", tcp_dev_request, tcp_dev_open, tcp_dev_close, tcp_configure_device },
|
|
};
|
|
|
|
static int resolv_state(int state)
|
|
{
|
|
if (state & STATE_DOCUMENT_JAM)
|
|
return SANE_STATUS_JAMMED;
|
|
if (state & STATE_NO_DOCUMENT)
|
|
return SANE_STATUS_NO_DOCS;
|
|
if (state & STATE_COVER_OPEN)
|
|
return SANE_STATUS_COVER_OPEN;
|
|
if (state & STATE_INVALID_AREA)
|
|
return SANE_STATUS_INVAL; /* sane_start: implies SANE_INFO_RELOAD_OPTIONS */
|
|
if (state & STATE_WARMING)
|
|
#ifdef SANE_STATUS_WARMING_UP
|
|
return SANE_STATUS_WARMING_UP;
|
|
#else
|
|
return SANE_STATUS_DEVICE_BUSY;
|
|
#endif
|
|
if (state & STATE_LOCKING)
|
|
#ifdef SANE_STATUS_HW_LOCKED
|
|
return SANE_STATUS_HW_LOCKED;
|
|
#else
|
|
return SANE_STATUS_JAMMED;
|
|
#endif
|
|
if (state & ~STATE_NO_ERROR)
|
|
return SANE_STATUS_DEVICE_BUSY;
|
|
return 0;
|
|
}
|
|
|
|
static char *str_cmd(int cmd)
|
|
{
|
|
switch (cmd) {
|
|
case CMD_ABORT: return "ABORT";
|
|
case CMD_INQUIRY: return "INQUIRY";
|
|
case CMD_RESERVE_UNIT: return "RESERVE_UNIT";
|
|
case CMD_RELEASE_UNIT: return "RELEASE_UNIT";
|
|
case CMD_SET_WINDOW: return "SET_WINDOW";
|
|
case CMD_READ: return "READ";
|
|
case CMD_READ_IMAGE: return "READ_IMAGE";
|
|
case CMD_OBJECT_POSITION: return "OBJECT_POSITION";
|
|
}
|
|
return "unknown";
|
|
}
|
|
|
|
#define MAX_DUMP 70
|
|
const char *encTmpFileName = "/tmp/stmp_enc.tmp";
|
|
|
|
static int decompress(struct device __sane_unused__ *dev,
|
|
const char __sane_unused__ *infilename)
|
|
{
|
|
#ifdef HAVE_LIBJPEG
|
|
int rc;
|
|
int row_stride, width, height, pixel_size;
|
|
struct jpeg_decompress_struct cinfo;
|
|
struct jpeg_error_mgr jerr;
|
|
unsigned long bmp_size = 0;
|
|
FILE *pInfile = NULL;
|
|
JSAMPARRAY buffer;
|
|
|
|
if ((pInfile = fopen(infilename, "rb")) == NULL) {
|
|
fprintf(stderr, "can't open %s\n", infilename);
|
|
return -1;
|
|
}
|
|
|
|
cinfo.err = jpeg_std_error(&jerr);
|
|
|
|
jpeg_create_decompress(&cinfo);
|
|
|
|
jpeg_stdio_src(&cinfo, pInfile);
|
|
|
|
rc = jpeg_read_header(&cinfo, TRUE);
|
|
if (rc != 1) {
|
|
jpeg_destroy_decompress(&cinfo);
|
|
fclose(pInfile);
|
|
return -1;
|
|
}
|
|
|
|
jpeg_start_decompress(&cinfo);
|
|
|
|
width = cinfo.output_width;
|
|
height = cinfo.output_height;
|
|
pixel_size = cinfo.output_components;
|
|
bmp_size = width * height * pixel_size;
|
|
dev->decDataSize = bmp_size;
|
|
|
|
row_stride = width * pixel_size;
|
|
|
|
buffer = (*cinfo.mem->alloc_sarray)
|
|
((j_common_ptr) &cinfo, JPOOL_IMAGE, row_stride, 1);
|
|
|
|
while (cinfo.output_scanline < cinfo.output_height) {
|
|
buffer[0] = dev->decData + \
|
|
(cinfo.output_scanline) * row_stride;
|
|
jpeg_read_scanlines(&cinfo, buffer, 1);
|
|
}
|
|
jpeg_finish_decompress(&cinfo);
|
|
jpeg_destroy_decompress(&cinfo);
|
|
fclose(pInfile);
|
|
return 0;
|
|
#else
|
|
return -1;
|
|
#endif
|
|
}
|
|
|
|
static int copy_decompress_data(struct device *dev, unsigned char *pDest, int maxlen, int *destLen)
|
|
{
|
|
int data_size = 0;
|
|
size_t result = 0, retVal = 0;
|
|
|
|
|
|
if (0 == dev->decDataSize) {
|
|
*destLen = 0;
|
|
return retVal;
|
|
}
|
|
data_size = dev->decDataSize - dev->currentDecDataIndex;
|
|
if (data_size > maxlen) {
|
|
data_size = maxlen;
|
|
}
|
|
memcpy(pDest, dev->decData+dev->currentDecDataIndex, data_size);
|
|
result = data_size;
|
|
*destLen = result;
|
|
dev->currentDecDataIndex += result;
|
|
retVal = result;
|
|
|
|
if (dev->decDataSize == dev->currentDecDataIndex) {
|
|
dev->currentDecDataIndex = 0;
|
|
dev->decDataSize = 0;
|
|
}
|
|
|
|
return retVal;
|
|
}
|
|
|
|
static int decompress_tempfile(struct device *dev)
|
|
{
|
|
decompress(dev, encTmpFileName);
|
|
remove(encTmpFileName);
|
|
return 0;
|
|
}
|
|
|
|
static int dump_to_tmp_file(struct device *dev)
|
|
{
|
|
unsigned char *pSrc = dev->data;
|
|
int srcLen = dev->datalen;
|
|
FILE *pInfile;
|
|
if ((pInfile = fopen(encTmpFileName, "a")) == NULL) {
|
|
fprintf(stderr, "can't open %s\n", encTmpFileName);
|
|
return 0;
|
|
}
|
|
|
|
fwrite(pSrc, 1, srcLen, pInfile);
|
|
fclose(pInfile);
|
|
return srcLen;
|
|
}
|
|
|
|
static int isSupportedDevice(struct device __sane_unused__ *dev)
|
|
{
|
|
#ifdef HAVE_LIBJPEG
|
|
/* Checking device which supports JPEG Lossy compression for color scanning*/
|
|
if (dev->compressionTypes & (1 << 6))
|
|
return 1;
|
|
else
|
|
return 0;
|
|
#else
|
|
return 0;
|
|
#endif
|
|
}
|
|
|
|
static void dbg_dump(struct device *dev)
|
|
{
|
|
int i;
|
|
char dbuf[MAX_DUMP * 3 + 1], *dptr = dbuf;
|
|
int nzlen = dev->reslen;
|
|
int dlen = MIN(dev->reslen, MAX_DUMP);
|
|
|
|
for (i = dev->reslen - 1; i >= 0; i--, nzlen--)
|
|
if (dev->res[i] != 0)
|
|
break;
|
|
|
|
dlen = MIN(dlen, nzlen + 1);
|
|
|
|
for (i = 0; i < dlen; i++, dptr += 3)
|
|
sprintf(dptr, " %02x", dev->res[i]);
|
|
|
|
DBG(5, "[%lu]%s%s\n", (u_long)dev->reslen, dbuf,
|
|
(dlen < (int)dev->reslen)? "..." : "");
|
|
}
|
|
|
|
/* one command to device */
|
|
/* return 0: on error, 1: success */
|
|
static int dev_command(struct device *dev, SANE_Byte *cmd, size_t reqlen)
|
|
{
|
|
SANE_Status status;
|
|
size_t sendlen = cmd[3] + 4;
|
|
SANE_Byte *res = dev->res;
|
|
|
|
|
|
assert(reqlen <= sizeof(dev->res)); /* requested len */
|
|
dev->reslen = sizeof(dev->res); /* doing full buffer to flush stalled commands */
|
|
|
|
if (cmd[2] == CMD_SET_WINDOW) {
|
|
/* Set Window have wrong packet length, huh. */
|
|
sendlen = 25;
|
|
}
|
|
|
|
if (cmd[2] == CMD_READ_IMAGE) {
|
|
/* Read Image is raw data, don't need to read response */
|
|
res = NULL;
|
|
}
|
|
|
|
dev->state = 0;
|
|
DBG(4, ":: dev_command(%s[%#x], %lu)\n", str_cmd(cmd[2]), cmd[2],
|
|
(u_long)reqlen);
|
|
status = dev->io->dev_request(dev, cmd, sendlen, res, &dev->reslen);
|
|
if (status != SANE_STATUS_GOOD) {
|
|
DBG(1, "%s: dev_request: %s\n", __func__, sane_strstatus(status));
|
|
dev->state = SANE_STATUS_IO_ERROR;
|
|
return 0;
|
|
}
|
|
|
|
if (!res) {
|
|
/* if not need response just return success */
|
|
return 1;
|
|
}
|
|
|
|
/* normal command reply, some sanity checking */
|
|
if (dev->reslen < reqlen) {
|
|
DBG(1, "%s: illegal response len %lu, need %lu\n",
|
|
__func__, (u_long)dev->reslen, (u_long)reqlen);
|
|
dev->state = SANE_STATUS_IO_ERROR;
|
|
return 0;
|
|
} else {
|
|
size_t pktlen; /* len specified in packet */
|
|
|
|
if (DBG_LEVEL > 3)
|
|
dbg_dump(dev);
|
|
|
|
if (dev->res[0] != RES_CODE) {
|
|
DBG(2, "%s: illegal data header %02x\n", __func__, dev->res[0]);
|
|
dev->state = SANE_STATUS_IO_ERROR;
|
|
return 0;
|
|
}
|
|
pktlen = dev->res[2] + 3;
|
|
if (dev->reslen != pktlen) {
|
|
DBG(2, "%s: illegal response len %lu, should be %lu\n",
|
|
__func__, (u_long)pktlen, (u_long)dev->reslen);
|
|
dev->state = SANE_STATUS_IO_ERROR;
|
|
return 0;
|
|
}
|
|
if (dev->reslen > reqlen)
|
|
DBG(2, "%s: too big packet len %lu, need %lu\n",
|
|
__func__, (u_long)dev->reslen, (u_long)reqlen);
|
|
}
|
|
|
|
dev->state = 0;
|
|
if (cmd[2] == CMD_SET_WINDOW ||
|
|
cmd[2] == CMD_OBJECT_POSITION ||
|
|
cmd[2] == CMD_READ ||
|
|
cmd[2] == CMD_RESERVE_UNIT) {
|
|
if (dev->res[1] == STATUS_BUSY)
|
|
dev->state = SANE_STATUS_DEVICE_BUSY;
|
|
else if (dev->res[1] == STATUS_CANCEL)
|
|
dev->state = SANE_STATUS_CANCELLED;
|
|
else if (dev->res[1] == STATUS_CHECK)
|
|
dev->state = resolv_state((cmd[2] == CMD_READ)?
|
|
(dev->res[12] << 8 | dev->res[13]) :
|
|
(dev->res[4] << 8 | dev->res[5]));
|
|
|
|
if (dev->state)
|
|
DBG(3, "%s(%s[%#x]): => %d: %s\n",
|
|
__func__, str_cmd(cmd[2]), cmd[2],
|
|
dev->state, sane_strstatus(dev->state));
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
/* one short command to device */
|
|
static int dev_cmd(struct device *dev, SANE_Byte command)
|
|
{
|
|
SANE_Byte cmd[4] = { REQ_CODE_A, REQ_CODE_B };
|
|
cmd[2] = command;
|
|
return dev_command(dev, cmd, (command == CMD_INQUIRY)? 70 : 32);
|
|
}
|
|
|
|
/* stop scanning operation. return previous status */
|
|
static SANE_Status dev_stop(struct device *dev)
|
|
{
|
|
int state = dev->state;
|
|
|
|
DBG(3, "%s: %p, scanning %d, reserved %d\n", __func__,
|
|
(void *)dev, dev->scanning, dev->reserved);
|
|
dev->scanning = 0;
|
|
|
|
/* release */
|
|
if (!dev->reserved)
|
|
return state;
|
|
dev->reserved = 0;
|
|
dev_cmd(dev, CMD_RELEASE_UNIT);
|
|
DBG(3, "total image %d*%d size %d (win %d*%d), %d*%d %d data: %d, out %d bytes\n",
|
|
dev->para.pixels_per_line, dev->para.lines,
|
|
dev->total_img_size,
|
|
dev->win_width, dev->win_len,
|
|
dev->pixels_per_line, dev->ulines, dev->blocks,
|
|
dev->total_data_size, dev->total_out_size);
|
|
dev->state = state;
|
|
return state;
|
|
}
|
|
|
|
SANE_Status ret_cancel(struct device *dev, SANE_Status ret)
|
|
{
|
|
dev_cmd(dev, CMD_ABORT);
|
|
if (dev->scanning) {
|
|
dev_stop(dev);
|
|
dev->state = SANE_STATUS_CANCELLED;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
static int cancelled(struct device *dev)
|
|
{
|
|
if (dev->cancel)
|
|
return ret_cancel(dev, 1);
|
|
return 0;
|
|
}
|
|
|
|
/* issue command and wait until scanner is not busy */
|
|
/* return 0 on error/blocking, 1 is ok and ready */
|
|
static int dev_cmd_wait(struct device *dev, int cmd)
|
|
{
|
|
int sleeptime = 10;
|
|
|
|
do {
|
|
if (cancelled(dev))
|
|
return 0;
|
|
if (!dev_cmd(dev, cmd)) {
|
|
dev->state = SANE_STATUS_IO_ERROR;
|
|
return 0;
|
|
} else if (dev->state) {
|
|
if (dev->state != SANE_STATUS_DEVICE_BUSY)
|
|
return 0;
|
|
else {
|
|
if (dev->non_blocking) {
|
|
dev->state = SANE_STATUS_GOOD;
|
|
return 0;
|
|
} else {
|
|
if (sleeptime > 1000)
|
|
sleeptime = 1000;
|
|
DBG(4, "(%s) sleeping(%d ms).. [%x %x]\n",
|
|
str_cmd(cmd), sleeptime, dev->res[4], dev->res[5]);
|
|
usleep(sleeptime * 1000);
|
|
if (sleeptime < 1000)
|
|
sleeptime *= (sleeptime < 100)? 10 : 2;
|
|
}
|
|
} /* BUSY */
|
|
}
|
|
} while (dev->state == SANE_STATUS_DEVICE_BUSY);
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int inq_dpi_bits[] = {
|
|
75, 150, 0, 0,
|
|
200, 300, 0, 0,
|
|
600, 0, 0, 1200,
|
|
100, 0, 0, 2400,
|
|
0, 4800, 0, 9600
|
|
};
|
|
|
|
static int res_dpi_codes[] = {
|
|
75, 0, 150, 0,
|
|
0, 300, 0, 600,
|
|
1200, 200, 100, 2400,
|
|
4800, 9600
|
|
};
|
|
|
|
static int SANE_Word_sort(const void *a, const void *b)
|
|
{
|
|
return *(const SANE_Word *)a - *(const SANE_Word *)b;
|
|
}
|
|
|
|
/* resolve inquired dpi list to dpi_list array */
|
|
static void resolv_inq_dpi(struct device *dev)
|
|
{
|
|
unsigned int i;
|
|
int res = dev->resolutions;
|
|
|
|
assert(sizeof(inq_dpi_bits) < sizeof(dev->dpi_list));
|
|
for (i = 0; i < sizeof(inq_dpi_bits) / sizeof(int); i++)
|
|
if (inq_dpi_bits[i] && (res & (1 << i)))
|
|
dev->dpi_list[++dev->dpi_list[0]] = inq_dpi_bits[i];
|
|
qsort(&dev->dpi_list[1], dev->dpi_list[0], sizeof(SANE_Word), SANE_Word_sort);
|
|
}
|
|
|
|
static unsigned int dpi_to_code(int dpi)
|
|
{
|
|
unsigned int i;
|
|
|
|
for (i = 0; i < sizeof(res_dpi_codes) / sizeof(int); i++) {
|
|
if (dpi == res_dpi_codes[i])
|
|
return i;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static int string_match_index(const SANE_String_Const s[], SANE_String m)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; *s; i++) {
|
|
SANE_String_Const x = *s++;
|
|
if (strcasecmp(x, m) == 0)
|
|
return i;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
static SANE_String string_match(const SANE_String_Const s[], SANE_String m)
|
|
{
|
|
return UNCONST(s[string_match_index(s, m)]);
|
|
}
|
|
|
|
static size_t max_string_size(SANE_String_Const s[])
|
|
{
|
|
size_t max = 0;
|
|
|
|
while (*s) {
|
|
size_t size = strlen(*s++) + 1;
|
|
if (size > max)
|
|
max = size;
|
|
}
|
|
return max;
|
|
}
|
|
|
|
static SANE_String_Const doc_sources[] = {
|
|
"Flatbed", "ADF", "Auto", NULL
|
|
};
|
|
|
|
static int doc_source_to_code[] = {
|
|
0x40, 0x20, 0x80
|
|
};
|
|
|
|
static SANE_String_Const scan_modes[] = {
|
|
SANE_VALUE_SCAN_MODE_LINEART,
|
|
SANE_VALUE_SCAN_MODE_HALFTONE,
|
|
SANE_VALUE_SCAN_MODE_GRAY,
|
|
SANE_VALUE_SCAN_MODE_COLOR,
|
|
NULL
|
|
};
|
|
|
|
static int scan_mode_to_code[] = {
|
|
0x00, 0x01, 0x03, 0x05
|
|
};
|
|
|
|
static SANE_Range threshold = {
|
|
SANE_FIX(30), SANE_FIX(70), SANE_FIX(10)
|
|
};
|
|
|
|
static void reset_options(struct device *dev)
|
|
{
|
|
dev->val[OPT_RESOLUTION].w = 150;
|
|
dev->val[OPT_MODE].s = string_match(scan_modes, SANE_VALUE_SCAN_MODE_COLOR);
|
|
|
|
/* if docs loaded in adf use it as default source, flatbed oterwise */
|
|
dev->val[OPT_SOURCE].s = UNCONST(doc_sources[(dev->doc_loaded)? 1 : 0]);
|
|
|
|
dev->val[OPT_THRESHOLD].w = SANE_FIX(50);
|
|
|
|
/* this is reported maximum window size, will be fixed later */
|
|
dev->win_x_range.min = SANE_FIX(0);
|
|
dev->win_x_range.max = SANE_FIX((double)dev->max_win_width / PNT_PER_MM);
|
|
dev->win_x_range.quant = SANE_FIX(1);
|
|
dev->win_y_range.min = SANE_FIX(0);
|
|
dev->win_y_range.max = SANE_FIX((double)dev->max_win_len / PNT_PER_MM);
|
|
dev->win_y_range.quant = SANE_FIX(1);
|
|
dev->val[OPT_SCAN_TL_X].w = dev->win_x_range.min;
|
|
dev->val[OPT_SCAN_TL_Y].w = dev->win_y_range.min;
|
|
dev->val[OPT_SCAN_BR_X].w = dev->win_x_range.max;
|
|
dev->val[OPT_SCAN_BR_Y].w = dev->win_y_range.max;
|
|
}
|
|
|
|
static void init_options(struct device *dev)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < NUM_OPTIONS; i++) {
|
|
dev->opt[i].cap = SANE_CAP_SOFT_SELECT | SANE_CAP_SOFT_DETECT;
|
|
dev->opt[i].size = sizeof(SANE_Word);
|
|
dev->opt[i].type = SANE_TYPE_FIXED;
|
|
dev->val[i].s = NULL;
|
|
}
|
|
|
|
dev->opt[OPT_NUMOPTIONS].name = SANE_NAME_NUM_OPTIONS;
|
|
dev->opt[OPT_NUMOPTIONS].title = SANE_TITLE_NUM_OPTIONS;
|
|
dev->opt[OPT_NUMOPTIONS].desc = SANE_DESC_NUM_OPTIONS;
|
|
dev->opt[OPT_NUMOPTIONS].type = SANE_TYPE_INT;
|
|
dev->opt[OPT_NUMOPTIONS].cap = SANE_CAP_SOFT_DETECT;
|
|
dev->val[OPT_NUMOPTIONS].w = NUM_OPTIONS;
|
|
|
|
dev->opt[OPT_GROUP_STD].name = SANE_NAME_STANDARD;
|
|
dev->opt[OPT_GROUP_STD].title = SANE_TITLE_STANDARD;
|
|
dev->opt[OPT_GROUP_STD].desc = SANE_DESC_STANDARD;
|
|
dev->opt[OPT_GROUP_STD].type = SANE_TYPE_GROUP;
|
|
dev->opt[OPT_GROUP_STD].cap = 0;
|
|
|
|
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].cap = SANE_CAP_SOFT_SELECT|SANE_CAP_SOFT_DETECT;
|
|
dev->opt[OPT_RESOLUTION].unit = SANE_UNIT_DPI;
|
|
dev->opt[OPT_RESOLUTION].constraint_type = SANE_CONSTRAINT_WORD_LIST;
|
|
dev->opt[OPT_RESOLUTION].constraint.word_list = dev->dpi_list;
|
|
|
|
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_modes);
|
|
dev->opt[OPT_MODE].cap = SANE_CAP_SOFT_SELECT|SANE_CAP_SOFT_DETECT;
|
|
dev->opt[OPT_MODE].constraint_type = SANE_CONSTRAINT_STRING_LIST;
|
|
dev->opt[OPT_MODE].constraint.string_list = scan_modes;
|
|
|
|
dev->opt[OPT_THRESHOLD].name = SANE_NAME_HIGHLIGHT;
|
|
dev->opt[OPT_THRESHOLD].title = SANE_TITLE_THRESHOLD;
|
|
dev->opt[OPT_THRESHOLD].desc = SANE_DESC_THRESHOLD;
|
|
dev->opt[OPT_THRESHOLD].unit = SANE_UNIT_PERCENT;
|
|
dev->opt[OPT_THRESHOLD].cap = SANE_CAP_SOFT_SELECT|SANE_CAP_SOFT_DETECT;
|
|
dev->opt[OPT_THRESHOLD].constraint_type = SANE_CONSTRAINT_RANGE;
|
|
dev->opt[OPT_THRESHOLD].constraint.range = &threshold;
|
|
|
|
dev->opt[OPT_SOURCE].name = SANE_NAME_SCAN_SOURCE;
|
|
dev->opt[OPT_SOURCE].title = SANE_TITLE_SCAN_SOURCE;
|
|
dev->opt[OPT_SOURCE].desc = SANE_DESC_SCAN_SOURCE;
|
|
dev->opt[OPT_SOURCE].type = SANE_TYPE_STRING;
|
|
dev->opt[OPT_SOURCE].size = max_string_size(doc_sources);
|
|
dev->opt[OPT_SOURCE].cap = SANE_CAP_SOFT_SELECT|SANE_CAP_SOFT_DETECT;
|
|
dev->opt[OPT_SOURCE].constraint_type = SANE_CONSTRAINT_STRING_LIST;
|
|
dev->opt[OPT_SOURCE].constraint.string_list = doc_sources;
|
|
|
|
dev->opt[OPT_GROUP_GEO].name = SANE_NAME_GEOMETRY;
|
|
dev->opt[OPT_GROUP_GEO].title = SANE_TITLE_GEOMETRY;
|
|
dev->opt[OPT_GROUP_GEO].desc = SANE_DESC_GEOMETRY;
|
|
dev->opt[OPT_GROUP_GEO].type = SANE_TYPE_GROUP;
|
|
dev->opt[OPT_GROUP_GEO].cap = 0;
|
|
|
|
dev->opt[OPT_SCAN_TL_X].name = SANE_NAME_SCAN_TL_X;
|
|
dev->opt[OPT_SCAN_TL_X].title = SANE_TITLE_SCAN_TL_X;
|
|
dev->opt[OPT_SCAN_TL_X].desc = SANE_DESC_SCAN_TL_X;
|
|
dev->opt[OPT_SCAN_TL_X].unit = SANE_UNIT_MM;
|
|
dev->opt[OPT_SCAN_TL_X].constraint_type = SANE_CONSTRAINT_RANGE;
|
|
dev->opt[OPT_SCAN_TL_X].constraint.range = &dev->win_x_range;
|
|
|
|
dev->opt[OPT_SCAN_TL_Y].name = SANE_NAME_SCAN_TL_Y;
|
|
dev->opt[OPT_SCAN_TL_Y].title = SANE_TITLE_SCAN_TL_Y;
|
|
dev->opt[OPT_SCAN_TL_Y].desc = SANE_DESC_SCAN_TL_Y;
|
|
dev->opt[OPT_SCAN_TL_Y].unit = SANE_UNIT_MM;
|
|
dev->opt[OPT_SCAN_TL_Y].constraint_type = SANE_CONSTRAINT_RANGE;
|
|
dev->opt[OPT_SCAN_TL_Y].constraint.range = &dev->win_y_range;
|
|
|
|
dev->opt[OPT_SCAN_BR_X].name = SANE_NAME_SCAN_BR_X;
|
|
dev->opt[OPT_SCAN_BR_X].title = SANE_TITLE_SCAN_BR_X;
|
|
dev->opt[OPT_SCAN_BR_X].desc = SANE_DESC_SCAN_BR_X;
|
|
dev->opt[OPT_SCAN_BR_X].unit = SANE_UNIT_MM;
|
|
dev->opt[OPT_SCAN_BR_X].constraint_type = SANE_CONSTRAINT_RANGE;
|
|
dev->opt[OPT_SCAN_BR_X].constraint.range = &dev->win_x_range;
|
|
|
|
dev->opt[OPT_SCAN_BR_Y].name = SANE_NAME_SCAN_BR_Y;
|
|
dev->opt[OPT_SCAN_BR_Y].title = SANE_TITLE_SCAN_BR_Y;
|
|
dev->opt[OPT_SCAN_BR_Y].desc = SANE_DESC_SCAN_BR_Y;
|
|
dev->opt[OPT_SCAN_BR_Y].unit = SANE_UNIT_MM;
|
|
dev->opt[OPT_SCAN_BR_Y].constraint_type = SANE_CONSTRAINT_RANGE;
|
|
dev->opt[OPT_SCAN_BR_Y].constraint.range = &dev->win_y_range;
|
|
}
|
|
|
|
/* fill parameters from options */
|
|
static void set_parameters(struct device *dev)
|
|
{
|
|
double px_to_len;
|
|
|
|
dev->para.last_frame = SANE_TRUE;
|
|
dev->para.lines = -1;
|
|
px_to_len = 1200.0 / dev->val[OPT_RESOLUTION].w;
|
|
#define BETTER_BASEDPI 1
|
|
/* tests prove that 1200dpi base is very inexact
|
|
* so I calculated better values for each axis */
|
|
#if BETTER_BASEDPI
|
|
px_to_len = 1180.0 / dev->val[OPT_RESOLUTION].w;
|
|
#endif
|
|
dev->para.pixels_per_line = dev->win_width / px_to_len;
|
|
dev->para.bytes_per_line = dev->para.pixels_per_line;
|
|
|
|
if (!isSupportedDevice(dev)) {
|
|
#if BETTER_BASEDPI
|
|
px_to_len = 1213.9 / dev->val[OPT_RESOLUTION].w;
|
|
#endif
|
|
}
|
|
dev->para.lines = dev->win_len / px_to_len;
|
|
if (dev->composition == MODE_LINEART ||
|
|
dev->composition == MODE_HALFTONE) {
|
|
dev->para.format = SANE_FRAME_GRAY;
|
|
dev->para.depth = 1;
|
|
dev->para.bytes_per_line = (dev->para.pixels_per_line + 7) / 8;
|
|
} else if (dev->composition == MODE_GRAY8) {
|
|
dev->para.format = SANE_FRAME_GRAY;
|
|
dev->para.depth = 8;
|
|
dev->para.bytes_per_line = dev->para.pixels_per_line;
|
|
} else if (dev->composition == MODE_RGB24) {
|
|
dev->para.format = SANE_FRAME_RGB;
|
|
dev->para.depth = 8;
|
|
dev->para.bytes_per_line *= 3;
|
|
} else {
|
|
/* this will never happen */
|
|
DBG(1, "%s: impossible image composition %d\n",
|
|
__func__, dev->composition);
|
|
dev->para.format = SANE_FRAME_GRAY;
|
|
dev->para.depth = 8;
|
|
}
|
|
}
|
|
|
|
/* resolve all options related to scan window */
|
|
/* called after option changed and in set_window */
|
|
static int fix_window(struct device *dev)
|
|
{
|
|
double win_width_mm, win_len_mm;
|
|
int i;
|
|
int threshold = SANE_UNFIX(dev->val[OPT_THRESHOLD].w);
|
|
|
|
dev->resolution = dpi_to_code(dev->val[OPT_RESOLUTION].w);
|
|
dev->composition = scan_mode_to_code[string_match_index(scan_modes, dev->val[OPT_MODE].s)];
|
|
|
|
if (dev->composition == MODE_LINEART ||
|
|
dev->composition == MODE_HALFTONE) {
|
|
dev->opt[OPT_THRESHOLD].cap &= ~SANE_CAP_INACTIVE;
|
|
} else {
|
|
dev->opt[OPT_THRESHOLD].cap |= SANE_CAP_INACTIVE;
|
|
}
|
|
if (threshold < 30) {
|
|
dev->val[OPT_THRESHOLD].w = SANE_FIX(30);
|
|
} else if (threshold > 70) {
|
|
dev->val[OPT_THRESHOLD].w = SANE_FIX(70);
|
|
}
|
|
threshold = SANE_UNFIX(dev->val[OPT_THRESHOLD].w);
|
|
dev->threshold = (threshold - 30) / 10;
|
|
dev->val[OPT_THRESHOLD].w = SANE_FIX(dev->threshold * 10 + 30);
|
|
|
|
dev->doc_source = doc_source_to_code[string_match_index(doc_sources, dev->val[OPT_SOURCE].s)];
|
|
|
|
/* max window len is dependent of document source */
|
|
if (dev->doc_source == DOC_FLATBED ||
|
|
(dev->doc_source == DOC_AUTO && !dev->doc_loaded))
|
|
dev->max_len = dev->max_len_fb;
|
|
else
|
|
dev->max_len = dev->max_len_adf;
|
|
|
|
/* parameters */
|
|
dev->win_y_range.max = SANE_FIX((double)dev->max_len / PNT_PER_MM);
|
|
|
|
/* window sanity checking */
|
|
for (i = OPT_SCAN_TL_X; i <= OPT_SCAN_BR_Y; i++) {
|
|
if (dev->val[i].w < dev->opt[i].constraint.range->min)
|
|
dev->val[i].w = dev->opt[i].constraint.range->min;
|
|
if (dev->val[i].w > dev->opt[i].constraint.range->max)
|
|
dev->val[i].w = dev->opt[i].constraint.range->max;
|
|
}
|
|
|
|
if (dev->val[OPT_SCAN_TL_X].w > dev->val[OPT_SCAN_BR_X].w)
|
|
SWAP_Word(dev->val[OPT_SCAN_TL_X].w, dev->val[OPT_SCAN_BR_X].w);
|
|
if (dev->val[OPT_SCAN_TL_Y].w > dev->val[OPT_SCAN_BR_Y].w)
|
|
SWAP_Word(dev->val[OPT_SCAN_TL_Y].w, dev->val[OPT_SCAN_BR_Y].w);
|
|
|
|
/* recalculate millimeters to inches */
|
|
dev->win_off_x = SANE_UNFIX(dev->val[OPT_SCAN_TL_X].w) / MM_PER_INCH;
|
|
dev->win_off_y = SANE_UNFIX(dev->val[OPT_SCAN_TL_Y].w) / MM_PER_INCH;
|
|
|
|
/* calc win size in mm */
|
|
win_width_mm = SANE_UNFIX(dev->val[OPT_SCAN_BR_X].w) -
|
|
SANE_UNFIX(dev->val[OPT_SCAN_TL_X].w);
|
|
win_len_mm = SANE_UNFIX(dev->val[OPT_SCAN_BR_Y].w) -
|
|
SANE_UNFIX(dev->val[OPT_SCAN_TL_Y].w);
|
|
/* convert mm to 1200 dpi points */
|
|
dev->win_width = (int)(win_width_mm * PNT_PER_MM);
|
|
dev->win_len = (int)(win_len_mm * PNT_PER_MM);
|
|
|
|
/* don't scan if window is zero size */
|
|
if (!dev->win_width || !dev->win_len) {
|
|
/* "The scan cannot be started with the current set of options." */
|
|
dev->state = SANE_STATUS_INVAL;
|
|
return 0;
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int dev_set_window(struct device *dev)
|
|
{
|
|
SANE_Byte cmd[0x19] = {
|
|
REQ_CODE_A, REQ_CODE_B, CMD_SET_WINDOW, 0x13, MSG_SCANNING_PARAM
|
|
};
|
|
|
|
if (!fix_window(dev))
|
|
return 0;
|
|
|
|
cmd[0x05] = dev->win_width >> 24;
|
|
cmd[0x06] = dev->win_width >> 16;
|
|
cmd[0x07] = dev->win_width >> 8;
|
|
cmd[0x08] = dev->win_width;
|
|
cmd[0x09] = dev->win_len >> 24;
|
|
cmd[0x0a] = dev->win_len >> 16;
|
|
cmd[0x0b] = dev->win_len >> 8;
|
|
cmd[0x0c] = dev->win_len;
|
|
cmd[0x0d] = dev->resolution; /* x */
|
|
cmd[0x0e] = dev->resolution; /* y */
|
|
cmd[0x0f] = (SANE_Byte)floor(dev->win_off_x);
|
|
cmd[0x10] = (SANE_Byte)((dev->win_off_x - floor(dev->win_off_x)) * 100);
|
|
cmd[0x11] = (SANE_Byte)floor(dev->win_off_y);
|
|
cmd[0x12] = (SANE_Byte)((dev->win_off_y - floor(dev->win_off_y)) * 100);
|
|
cmd[0x13] = dev->composition;
|
|
/* Set to JPEG Lossy Compression, if mode is color (only for supported model)...
|
|
* else go with Uncompressed (For backard compatibility with old models )*/
|
|
if (dev->composition == MODE_RGB24) {
|
|
if (isSupportedDevice(dev)) {
|
|
cmd[0x14] = 0x6;
|
|
}
|
|
}
|
|
cmd[0x16] = dev->threshold;
|
|
cmd[0x17] = dev->doc_source;
|
|
|
|
DBG(5, "OFF xi: %02x%02x yi: %02x%02x,"
|
|
" WIN xp: %02x%02x%02x%02x yp %02x%02x%02x%02x,"
|
|
" MAX %08x %08x\n",
|
|
cmd[0x0f], cmd[0x10], cmd[0x11], cmd[0x12],
|
|
cmd[0x05], cmd[0x06], cmd[0x07], cmd[0x08],
|
|
cmd[0x09], cmd[0x0a], cmd[0x0b], cmd[0x0c],
|
|
dev->max_win_width, dev->max_win_len);
|
|
|
|
return dev_command(dev, cmd, 32);
|
|
}
|
|
|
|
static SANE_Status
|
|
dev_inquiry(struct device *dev)
|
|
{
|
|
SANE_Byte *ptr;
|
|
SANE_Char *optr, *xptr;
|
|
|
|
if (!dev_cmd(dev, CMD_INQUIRY))
|
|
return SANE_STATUS_IO_ERROR;
|
|
ptr = dev->res;
|
|
if (ptr[3] != MSG_PRODUCT_INFO) {
|
|
DBG(1, "%s: illegal INQUIRY response %02x\n", __func__, ptr[3]);
|
|
return SANE_STATUS_IO_ERROR;
|
|
}
|
|
|
|
/* parse reported manufacturer/product names */
|
|
dev->sane.vendor = optr = (SANE_Char *) malloc(33);
|
|
for (ptr += 4; ptr < &dev->res[0x24] && *ptr && *ptr != ' ';)
|
|
*optr++ = *ptr++;
|
|
*optr++ = 0;
|
|
|
|
for (; ptr < &dev->res[0x24] && (!*ptr || *ptr == ' '); ptr++)
|
|
/* skip spaces */;
|
|
|
|
dev->sane.model = optr = (SANE_Char *) malloc(33);
|
|
xptr = optr; /* is last non space character + 1 */
|
|
for (; ptr < &dev->res[0x24] && *ptr;) {
|
|
if (*ptr != ' ')
|
|
xptr = optr + 1;
|
|
*optr++ = *ptr++;
|
|
}
|
|
*optr++ = 0;
|
|
*xptr = 0;
|
|
|
|
DBG(1, "%s: found %s/%s\n", __func__, dev->sane.vendor, dev->sane.model);
|
|
dev->sane.type = strdup("multi-function peripheral");
|
|
|
|
dev->resolutions = dev->res[0x37] << 16 |
|
|
dev->res[0x24] << 8 |
|
|
dev->res[0x25];
|
|
dev->compositions = dev->res[0x27];
|
|
dev->max_win_width = dev->res[0x28] << 24 |
|
|
dev->res[0x29] << 16 |
|
|
dev->res[0x2a] << 8 |
|
|
dev->res[0x2b];
|
|
dev->max_win_len = dev->res[0x2c] << 24 |
|
|
dev->res[0x2d] << 16 |
|
|
dev->res[0x2e] << 8 |
|
|
dev->res[0x2f];
|
|
dev->max_len_adf = dev->res[0x38] << 24 |
|
|
dev->res[0x39] << 16 |
|
|
dev->res[0x3a] << 8 |
|
|
dev->res[0x3b];
|
|
dev->max_len_fb = dev->res[0x3c] << 24 |
|
|
dev->res[0x3d] << 16 |
|
|
dev->res[0x3e] << 8 |
|
|
dev->res[0x3f];
|
|
dev->line_order = dev->res[0x31];
|
|
dev->compressionTypes = dev->res[0x32];
|
|
dev->doc_loaded = (dev->res[0x35] == 0x02) &&
|
|
(dev->res[0x26] & 0x03);
|
|
|
|
init_options(dev);
|
|
reset_options(dev);
|
|
fix_window(dev);
|
|
set_parameters(dev);
|
|
resolv_inq_dpi(dev);
|
|
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
const SANE_Option_Descriptor *
|
|
sane_get_option_descriptor(SANE_Handle h, SANE_Int opt)
|
|
{
|
|
struct device *dev = h;
|
|
|
|
DBG(3, "%s: %p, %d\n", __func__, h, opt);
|
|
if (opt >= NUM_OPTIONS || opt < 0)
|
|
return NULL;
|
|
return &dev->opt[opt];
|
|
}
|
|
|
|
SANE_Status
|
|
sane_control_option(SANE_Handle h, SANE_Int opt, SANE_Action act,
|
|
void *val, SANE_Word *info)
|
|
{
|
|
struct device *dev = h;
|
|
|
|
DBG(3, "%s: %p, %d, <%d>, %p, %p\n", __func__, h, opt, act, val, (void *)info);
|
|
if (!dev || opt >= NUM_OPTIONS || opt < 0)
|
|
return SANE_STATUS_INVAL;
|
|
|
|
if (info)
|
|
*info = 0;
|
|
|
|
if (act == SANE_ACTION_GET_VALUE) { /* GET */
|
|
if (dev->opt[opt].type == SANE_TYPE_STRING)
|
|
strcpy(val, dev->val[opt].s);
|
|
else
|
|
*(SANE_Word *)val = dev->val[opt].w;
|
|
} else if (act == SANE_ACTION_SET_VALUE) { /* SET */
|
|
SANE_Parameters xpara = dev->para;
|
|
SANE_Option_Descriptor xopt[NUM_OPTIONS];
|
|
Option_Value xval[NUM_OPTIONS];
|
|
int i;
|
|
|
|
if (dev->opt[opt].constraint_type == SANE_CONSTRAINT_STRING_LIST) {
|
|
dev->val[opt].s = string_match(dev->opt[opt].constraint.string_list, val);
|
|
if (info && strcasecmp(dev->val[opt].s, val))
|
|
*info |= SANE_INFO_INEXACT;
|
|
} else if (opt == OPT_RESOLUTION)
|
|
dev->val[opt].w = res_dpi_codes[dpi_to_code(*(SANE_Word *)val)];
|
|
else
|
|
dev->val[opt].w = *(SANE_Word *)val;
|
|
|
|
memcpy(&xopt, &dev->opt, sizeof(xopt));
|
|
memcpy(&xval, &dev->val, sizeof(xval));
|
|
fix_window(dev);
|
|
set_parameters(dev);
|
|
|
|
/* check for side effects */
|
|
if (info) {
|
|
if (memcmp(&xpara, &dev->para, sizeof(xpara)))
|
|
*info |= SANE_INFO_RELOAD_PARAMS;
|
|
if (memcmp(&xopt, &dev->opt, sizeof(xopt)))
|
|
*info |= SANE_INFO_RELOAD_OPTIONS;
|
|
for (i = 0; i < NUM_OPTIONS; i++)
|
|
if (xval[i].w != dev->val[i].w) {
|
|
if (i == opt)
|
|
*info |= SANE_INFO_INEXACT;
|
|
else
|
|
*info |= SANE_INFO_RELOAD_OPTIONS;
|
|
}
|
|
}
|
|
}
|
|
|
|
DBG(4, "%s: %d, <%d> => %08x, %x\n", __func__, opt, act,
|
|
val? *(SANE_Word *)val : 0, info? *info : 0);
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
static void
|
|
dev_free(struct device *dev)
|
|
{
|
|
if (!dev)
|
|
return;
|
|
|
|
if (dev->sane.name)
|
|
free(UNCONST(dev->sane.name));
|
|
if (dev->sane.vendor)
|
|
free(UNCONST(dev->sane.vendor));
|
|
if (dev->sane.model)
|
|
free(UNCONST(dev->sane.model));
|
|
if (dev->sane.type)
|
|
free(UNCONST(dev->sane.type));
|
|
if (dev->data)
|
|
free(dev->data);
|
|
if (dev->decData) {
|
|
free(dev->decData);
|
|
dev->decData = NULL;
|
|
}
|
|
memset(dev, 0, sizeof(*dev));
|
|
free(dev);
|
|
}
|
|
|
|
static void
|
|
free_devices(void)
|
|
{
|
|
struct device *next;
|
|
struct device *dev;
|
|
|
|
if (devlist) {
|
|
free(devlist);
|
|
devlist = NULL;
|
|
}
|
|
for (dev = devices_head; dev; dev = next) {
|
|
next = dev->next;
|
|
dev_free(dev);
|
|
}
|
|
devices_head = NULL;
|
|
}
|
|
|
|
static transport *tr_from_devname(SANE_String_Const devname)
|
|
{
|
|
if (strncmp("tcp", devname, 3) == 0)
|
|
return &available_transports[TRANSPORT_TCP];
|
|
return &available_transports[TRANSPORT_USB];
|
|
}
|
|
|
|
static SANE_Status
|
|
list_one_device(SANE_String_Const devname)
|
|
{
|
|
struct device *dev;
|
|
SANE_Status status;
|
|
transport *tr;
|
|
|
|
DBG(4, "%s: %s\n", __func__, devname);
|
|
|
|
for (dev = devices_head; dev; dev = dev->next) {
|
|
if (strcmp(dev->sane.name, devname) == 0)
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
tr = tr_from_devname(devname);
|
|
|
|
dev = calloc(1, sizeof(struct device));
|
|
if (dev == NULL)
|
|
return SANE_STATUS_NO_MEM;
|
|
|
|
dev->sane.name = strdup(devname);
|
|
dev->io = tr;
|
|
status = tr->dev_open(dev);
|
|
if (status != SANE_STATUS_GOOD) {
|
|
dev_free(dev);
|
|
return status;
|
|
}
|
|
|
|
/* status = dev_cmd (dev, CMD_ABORT);*/
|
|
status = dev_inquiry(dev);
|
|
tr->dev_close(dev);
|
|
if (status != SANE_STATUS_GOOD) {
|
|
DBG(1, "%s: dev_inquiry(%s): %s\n", __func__,
|
|
dev->sane.name, sane_strstatus(status));
|
|
dev_free(dev);
|
|
return status;
|
|
}
|
|
|
|
/* good device, add it to list */
|
|
dev->next = devices_head;
|
|
devices_head = dev;
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
/* SANE API ignores return code of this callback */
|
|
static SANE_Status
|
|
list_conf_devices(UNUSED(SANEI_Config *config), const char *devname)
|
|
{
|
|
return tr_from_devname(devname)->configure_device(devname, list_one_device);
|
|
}
|
|
|
|
SANE_Status
|
|
sane_init(SANE_Int *version_code, SANE_Auth_Callback cb)
|
|
{
|
|
DBG_INIT();
|
|
DBG(2, "sane_init: Xerox backend (build %d), version %s null, authorize %s null\n", BACKEND_BUILD,
|
|
(version_code) ? "!=" : "==", (cb) ? "!=" : "==");
|
|
|
|
if (version_code)
|
|
*version_code = SANE_VERSION_CODE(V_MAJOR, V_MINOR, BACKEND_BUILD);
|
|
|
|
sanei_usb_init();
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
void
|
|
sane_exit(void)
|
|
{
|
|
struct device *dev;
|
|
|
|
for (dev = devices_head; dev; dev = dev->next)
|
|
if (dev->dn != -1)
|
|
sane_close(dev); /* implies flush */
|
|
|
|
free_devices();
|
|
}
|
|
|
|
SANE_Status
|
|
sane_get_devices(const SANE_Device *** device_list, SANE_Bool local)
|
|
{
|
|
SANEI_Config config;
|
|
struct device *dev;
|
|
int dev_count;
|
|
int i;
|
|
|
|
DBG(3, "%s: %p, %d\n", __func__, (const void *)device_list, local);
|
|
|
|
if (devlist) {
|
|
if (device_list)
|
|
*device_list = devlist;
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
free_devices();
|
|
|
|
config.count = 0;
|
|
config.descriptors = NULL;
|
|
config.values = NULL;
|
|
sanei_configure_attach(XEROX_CONFIG_FILE, &config, list_conf_devices);
|
|
|
|
for (dev_count = 0, dev = devices_head; dev; dev = dev->next)
|
|
dev_count++;
|
|
|
|
devlist = malloc((dev_count + 1) * sizeof(*devlist));
|
|
if (!devlist) {
|
|
DBG(1, "%s: malloc: no memory\n", __func__);
|
|
return SANE_STATUS_NO_MEM;
|
|
}
|
|
|
|
for (i = 0, dev = devices_head; dev; dev = dev->next)
|
|
devlist[i++] = &dev->sane;
|
|
devlist[i++] = NULL;
|
|
|
|
if (device_list)
|
|
*device_list = devlist;
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
void
|
|
sane_close(SANE_Handle h)
|
|
{
|
|
struct device *dev = h;
|
|
|
|
if (!dev)
|
|
return;
|
|
|
|
DBG(3, "%s: %p (%s)\n", __func__, (void *)dev, dev->sane.name);
|
|
dev->io->dev_close(dev);
|
|
}
|
|
|
|
SANE_Status
|
|
sane_open(SANE_String_Const name, SANE_Handle *h)
|
|
{
|
|
struct device *dev;
|
|
|
|
DBG(3, "%s: '%s'\n", __func__, name);
|
|
|
|
if (!devlist)
|
|
sane_get_devices(NULL, SANE_TRUE);
|
|
|
|
if (!name || !*name) {
|
|
/* special case of empty name: open first available device */
|
|
for (dev = devices_head; dev; dev = dev->next) {
|
|
if (dev->dn != -1) {
|
|
if (sane_open(dev->sane.name, h) == SANE_STATUS_GOOD)
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
}
|
|
} else {
|
|
for (dev = devices_head; dev; dev = dev->next) {
|
|
if (strcmp(name, dev->sane.name) == 0) {
|
|
*h = dev;
|
|
return dev->io->dev_open(dev);
|
|
}
|
|
}
|
|
}
|
|
|
|
return SANE_STATUS_INVAL;
|
|
}
|
|
|
|
SANE_Status
|
|
sane_get_parameters(SANE_Handle h, SANE_Parameters *para)
|
|
{
|
|
struct device *dev = h;
|
|
|
|
DBG(3, "%s: %p, %p\n", __func__, h, (void *)para);
|
|
if (!para)
|
|
return SANE_STATUS_INVAL;
|
|
|
|
*para = dev->para;
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
/* check if image data is ready, and wait if not */
|
|
/* 1: image is acquired, 0: error or non_blocking mode */
|
|
static int dev_acquire(struct device *dev)
|
|
{
|
|
if (!dev_cmd_wait(dev, CMD_READ))
|
|
return dev->state;
|
|
|
|
dev->state = SANE_STATUS_GOOD;
|
|
dev->vertical = dev->res[0x08] << 8 | dev->res[0x09];
|
|
dev->horizontal = dev->res[0x0a] << 8 | dev->res[0x0b];
|
|
dev->blocklen = dev->res[4] << 24 |
|
|
dev->res[5] << 16 |
|
|
dev->res[6] << 8 |
|
|
dev->res[7];
|
|
dev->final_block = (dev->res[3] == MSG_END_BLOCK)? 1 : 0;
|
|
|
|
dev->pixels_per_line = dev->horizontal;
|
|
dev->bytes_per_line = dev->horizontal;
|
|
|
|
if (dev->composition == MODE_RGB24)
|
|
dev->bytes_per_line *= 3;
|
|
else if (dev->composition == MODE_LINEART ||
|
|
dev->composition == MODE_HALFTONE)
|
|
dev->pixels_per_line *= 8;
|
|
|
|
DBG(4, "acquiring, size per band v: %d, h: %d, %sblock: %d, slack: %d\n",
|
|
dev->vertical, dev->horizontal, dev->final_block? "last " : "",
|
|
dev->blocklen, dev->blocklen - (dev->vertical * dev->bytes_per_line));
|
|
|
|
if (dev->bytes_per_line > DATASIZE) {
|
|
DBG(1, "%s: unsupported line size: %d bytes > %d\n",
|
|
__func__, dev->bytes_per_line, DATASIZE);
|
|
return ret_cancel(dev, SANE_STATUS_NO_MEM);
|
|
}
|
|
|
|
dev->reading = 0; /* need to issue READ_IMAGE */
|
|
|
|
dev->dataindex = 0;
|
|
dev->datalen = 0;
|
|
dev->dataoff = 0;
|
|
|
|
return 1;
|
|
}
|
|
|
|
static int fill_slack(struct device *dev, SANE_Byte *buf, int maxlen)
|
|
{
|
|
const int slack = dev->total_img_size - dev->total_out_size;
|
|
const int havelen = MIN(slack, maxlen);
|
|
int j;
|
|
|
|
if (havelen <= 0)
|
|
return 0;
|
|
for (j = 0; j < havelen; j++)
|
|
buf[j] = 255;
|
|
return havelen;
|
|
}
|
|
|
|
static int copy_plain_trim(struct device *dev, SANE_Byte *buf, int maxlen, int *olenp)
|
|
{
|
|
int j;
|
|
const int linesize = dev->bytes_per_line;
|
|
int k = dev->dataindex;
|
|
*olenp = 0;
|
|
for (j = 0; j < dev->datalen && *olenp < maxlen; j++, k++) {
|
|
const int x = k % linesize;
|
|
const int y = k / linesize;
|
|
if (y >= dev->vertical)
|
|
break; /* slack */
|
|
if (x < dev->para.bytes_per_line &&
|
|
(y + dev->y_off) < dev->para.lines) {
|
|
*buf++ = dev->data[(dev->dataoff + j) & DATAMASK];
|
|
(*olenp)++;
|
|
}
|
|
}
|
|
dev->dataindex = k;
|
|
return j;
|
|
}
|
|
|
|
/* return: how much data could be freed from cyclic buffer */
|
|
/* convert from RRGGBB to RGBRGB */
|
|
static int copy_mix_bands_trim(struct device *dev, SANE_Byte *buf, int maxlen, int *olenp)
|
|
{
|
|
int j;
|
|
|
|
const int linesize = dev->bytes_per_line; /* caching real line size */
|
|
|
|
/* line number of the head of input buffer,
|
|
* input buffer is always aligned to whole line */
|
|
const int y_off = dev->dataindex / linesize;
|
|
|
|
int k = dev->dataindex; /* caching current index of input buffer */
|
|
|
|
/* can only copy as much as full lines we have */
|
|
int havelen = dev->datalen / linesize * linesize - k % linesize;
|
|
|
|
const int bands = 3;
|
|
*olenp = 0;
|
|
|
|
/* while we have data && they can receive */
|
|
for (j = 0; j < havelen && *olenp < maxlen; j++, k++) {
|
|
const int band = (k % bands) * dev->horizontal;
|
|
const int x = k % linesize / bands;
|
|
const int y = k / linesize - y_off; /* y relative to buffer head */
|
|
const int y_rly = y + y_off + dev->y_off; /* global y */
|
|
|
|
if (x < dev->para.pixels_per_line &&
|
|
y_rly < dev->para.lines) {
|
|
*buf++ = dev->data[(dev->dataoff + band + x + y * linesize) & DATAMASK];
|
|
(*olenp)++;
|
|
}
|
|
}
|
|
dev->dataindex = k;
|
|
|
|
/* how much full lines are finished */
|
|
return (k / linesize - y_off) * linesize;
|
|
}
|
|
|
|
SANE_Status
|
|
sane_read(SANE_Handle h, SANE_Byte *buf, SANE_Int maxlen, SANE_Int *lenp)
|
|
{
|
|
SANE_Status status;
|
|
struct device *dev = h;
|
|
|
|
DBG(3, "%s: %p, %p, %d, %p\n", __func__, h, buf, maxlen, (void *)lenp);
|
|
|
|
if (lenp)
|
|
*lenp = 0;
|
|
if (!dev)
|
|
return SANE_STATUS_INVAL;
|
|
|
|
if (!dev->scanning)
|
|
return SANE_STATUS_EOF;
|
|
|
|
/* if there is no data to read or output from buffer */
|
|
if (!dev->blocklen && dev->datalen <= PADDING_SIZE) {
|
|
|
|
/* copying uncompressed data */
|
|
if (dev->composition == MODE_RGB24 &&
|
|
isSupportedDevice(dev) &&
|
|
dev->decDataSize > 0) {
|
|
int diff = dev->total_img_size - dev->total_out_size;
|
|
int bufLen = (diff < maxlen) ? diff : maxlen;
|
|
if (0 < diff &&
|
|
0 < copy_decompress_data(dev, buf, bufLen, lenp)) {
|
|
dev->total_out_size += *lenp;
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
}
|
|
|
|
/* and we don't need to acquire next block */
|
|
if (dev->final_block) {
|
|
int slack = dev->total_img_size - dev->total_out_size;
|
|
|
|
/* but we may need to fill slack */
|
|
if (buf && lenp && slack > 0) {
|
|
*lenp = fill_slack(dev, buf, maxlen);
|
|
dev->total_out_size += *lenp;
|
|
DBG(9, "<> slack: %d, filled: %d, maxlen %d\n",
|
|
slack, *lenp, maxlen);
|
|
return SANE_STATUS_GOOD;
|
|
} else if (slack < 0) {
|
|
/* this will never happen */
|
|
DBG(1, "image overflow %d bytes\n", dev->total_img_size - dev->total_out_size);
|
|
}
|
|
if (isSupportedDevice(dev) &&
|
|
dev->composition == MODE_RGB24) {
|
|
remove(encTmpFileName);
|
|
}
|
|
/* that's all */
|
|
dev_stop(dev);
|
|
return SANE_STATUS_EOF;
|
|
}
|
|
|
|
/* queue next image block */
|
|
if (!dev_acquire(dev))
|
|
return dev->state;
|
|
}
|
|
|
|
if (!dev->reading) {
|
|
if (cancelled(dev))
|
|
return dev->state;
|
|
DBG(5, "READ_IMAGE\n");
|
|
if (!dev_cmd(dev, CMD_READ_IMAGE))
|
|
return SANE_STATUS_IO_ERROR;
|
|
dev->reading++;
|
|
dev->ulines += dev->vertical;
|
|
dev->y_off = dev->ulines - dev->vertical;
|
|
dev->total_data_size += dev->blocklen;
|
|
dev->blocks++;
|
|
}
|
|
|
|
do {
|
|
size_t datalen;
|
|
int clrlen; /* cleared lines len */
|
|
int olen; /* output len */
|
|
|
|
/* read as much data into the buffer */
|
|
datalen = DATAROOM(dev) & USB_BLOCK_MASK;
|
|
while (datalen && dev->blocklen) {
|
|
SANE_Byte *rbuf = dev->data + DATATAIL(dev);
|
|
|
|
DBG(9, "<> request len: %lu, [%d, %d; %d]\n",
|
|
(u_long)datalen, dev->dataoff, DATATAIL(dev), dev->datalen);
|
|
if ((status = dev->io->dev_request(dev, NULL, 0, rbuf, &datalen)) !=
|
|
SANE_STATUS_GOOD)
|
|
return status;
|
|
dev->datalen += datalen;
|
|
dev->blocklen -= datalen;
|
|
DBG(9, "<> got %lu, [%d, %d; %d]\n",
|
|
(u_long)datalen, dev->dataoff, DATATAIL(dev), dev->datalen);
|
|
if (dev->blocklen < 0)
|
|
return ret_cancel(dev, SANE_STATUS_IO_ERROR);
|
|
|
|
datalen = DATAROOM(dev) & USB_BLOCK_MASK;
|
|
}
|
|
|
|
if (buf && lenp) { /* read mode */
|
|
/* copy will do minimal of valid data */
|
|
if (dev->para.format == SANE_FRAME_RGB && dev->line_order) {
|
|
if (isSupportedDevice(dev)) {
|
|
clrlen = dump_to_tmp_file(dev);
|
|
/* decompress after reading entire block data*/
|
|
if (0 == dev->blocklen) {
|
|
decompress_tempfile(dev);
|
|
}
|
|
copy_decompress_data(dev, buf, maxlen, &olen);
|
|
} else {
|
|
clrlen = copy_mix_bands_trim(dev, buf, maxlen, &olen);
|
|
}
|
|
} else
|
|
clrlen = copy_plain_trim(dev, buf, maxlen, &olen);
|
|
|
|
dev->datalen -= clrlen;
|
|
dev->dataoff = (dev->dataoff + clrlen) & DATAMASK;
|
|
buf += olen;
|
|
maxlen -= olen;
|
|
*lenp += olen;
|
|
dev->total_out_size += olen;
|
|
|
|
DBG(9, "<> olen: %d, clrlen: %d, blocklen: %d/%d, maxlen %d (%d %d %d)\n",
|
|
olen, clrlen, dev->blocklen, dev->datalen, maxlen,
|
|
dev->dataindex / dev->bytes_per_line + dev->y_off,
|
|
dev->y_off, dev->para.lines);
|
|
|
|
/* slack beyond last line */
|
|
if (dev->dataindex / dev->bytes_per_line + dev->y_off >= dev->para.lines) {
|
|
dev->datalen = 0;
|
|
dev->dataoff = 0;
|
|
}
|
|
|
|
if (!clrlen || maxlen <= 0)
|
|
break;
|
|
} else { /* flush mode */
|
|
dev->datalen = 0;
|
|
dev->dataoff = 0;
|
|
}
|
|
|
|
} while (dev->blocklen);
|
|
|
|
if (lenp)
|
|
DBG(9, " ==> %d\n", *lenp);
|
|
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
SANE_Status
|
|
sane_start(SANE_Handle h)
|
|
{
|
|
struct device *dev = h;
|
|
|
|
DBG(3, "%s: %p\n", __func__, h);
|
|
|
|
dev->cancel = 0;
|
|
dev->scanning = 0;
|
|
dev->total_img_size = 0;
|
|
dev->total_out_size = 0;
|
|
dev->total_data_size = 0;
|
|
dev->blocks = 0;
|
|
|
|
if (!dev->reserved) {
|
|
if (!dev_cmd_wait(dev, CMD_RESERVE_UNIT))
|
|
return dev->state;
|
|
dev->reserved++;
|
|
}
|
|
|
|
if (!dev_set_window(dev) ||
|
|
(dev->state && dev->state != SANE_STATUS_DEVICE_BUSY))
|
|
return dev_stop(dev);
|
|
|
|
if (!dev_cmd_wait(dev, CMD_OBJECT_POSITION))
|
|
return dev_stop(dev);
|
|
|
|
if (!dev_cmd(dev, CMD_READ) ||
|
|
(dev->state && dev->state != SANE_STATUS_DEVICE_BUSY))
|
|
return dev_stop(dev);
|
|
|
|
dev->scanning = 1;
|
|
dev->final_block = 0;
|
|
dev->blocklen = 0;
|
|
dev->pixels_per_line = 0;
|
|
dev->bytes_per_line = 0;
|
|
dev->ulines = 0;
|
|
|
|
set_parameters(dev);
|
|
|
|
if (!dev->data && !(dev->data = malloc(DATASIZE)))
|
|
return ret_cancel(dev, SANE_STATUS_NO_MEM);
|
|
|
|
if (!dev->decData && !(dev->decData = malloc(POST_DATASIZE)))
|
|
return ret_cancel(dev, SANE_STATUS_NO_MEM);
|
|
|
|
if (!dev_acquire(dev))
|
|
return dev->state;
|
|
|
|
/* make sure to have dev->para <= of real size */
|
|
if (dev->para.pixels_per_line > dev->pixels_per_line) {
|
|
dev->para.pixels_per_line = dev->pixels_per_line;
|
|
dev->para.bytes_per_line = dev->pixels_per_line;
|
|
}
|
|
|
|
if (dev->composition == MODE_RGB24)
|
|
dev->para.bytes_per_line = dev->para.pixels_per_line * 3;
|
|
else if (dev->composition == MODE_LINEART ||
|
|
dev->composition == MODE_HALFTONE) {
|
|
dev->para.bytes_per_line = (dev->para.pixels_per_line + 7) / 8;
|
|
dev->para.pixels_per_line = dev->para.bytes_per_line * 8;
|
|
} else {
|
|
dev->para.bytes_per_line = dev->para.pixels_per_line;
|
|
}
|
|
|
|
dev->total_img_size = dev->para.bytes_per_line * dev->para.lines;
|
|
|
|
if (isSupportedDevice(dev) &&
|
|
dev->composition == MODE_RGB24) {
|
|
int fd;
|
|
remove(encTmpFileName);
|
|
|
|
/* Precreate temporary file in exclusive mode. */
|
|
fd = open(encTmpFileName, O_CREAT|O_EXCL, 0600);
|
|
if (fd == -1) {
|
|
DBG(3, "%s: %p, can't create temporary file %s: %s\n", __func__,
|
|
(void *)dev, encTmpFileName, strerror(errno));
|
|
return ret_cancel(dev, SANE_STATUS_ACCESS_DENIED);
|
|
}
|
|
close(fd);
|
|
}
|
|
dev->currentDecDataIndex = 0;
|
|
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
SANE_Status sane_set_io_mode(SANE_Handle h, SANE_Bool non_blocking)
|
|
{
|
|
struct device *dev = h;
|
|
|
|
DBG(3, "%s: %p, %d\n", __func__, h, non_blocking);
|
|
|
|
if (non_blocking)
|
|
return SANE_STATUS_UNSUPPORTED;
|
|
|
|
dev->non_blocking = non_blocking;
|
|
return SANE_STATUS_GOOD;
|
|
}
|
|
|
|
SANE_Status sane_get_select_fd(SANE_Handle h, SANE_Int *fdp)
|
|
{
|
|
DBG(3, "%s: %p, %p\n", __func__, h, (void *)fdp);
|
|
/* supporting of this will require thread creation */
|
|
return SANE_STATUS_UNSUPPORTED;
|
|
}
|
|
|
|
void sane_cancel(SANE_Handle h)
|
|
{
|
|
struct device *dev = h;
|
|
|
|
DBG(3, "%s: %p\n", __func__, h);
|
|
dev->cancel = 1;
|
|
}
|
|
|
|
/* xerox_mfp.c */
|