| /* |
| * Copyright 2000 Corel Corporation |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library 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 |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA |
| */ |
| |
| #define NONAMELESSUNION |
| #define NONAMELESSSTRUCT |
| |
| #include "config.h" |
| |
| #include <stdarg.h> |
| #include <stdio.h> |
| #include <math.h> |
| |
| #include "windef.h" |
| #include "winbase.h" |
| #include "twain.h" |
| #include "sane_i.h" |
| #include "winnls.h" |
| #include "wine/debug.h" |
| |
| WINE_DEFAULT_DEBUG_CHANNEL(twain); |
| |
| #ifndef SANE_VALUE_SCAN_MODE_COLOR |
| #define SANE_VALUE_SCAN_MODE_COLOR SANE_I18N("Color") |
| #endif |
| #ifndef SANE_VALUE_SCAN_MODE_GRAY |
| #define SANE_VALUE_SCAN_MODE_GRAY SANE_I18N("Gray") |
| #endif |
| #ifndef SANE_VALUE_SCAN_MODE_LINEART |
| #define SANE_VALUE_SCAN_MODE_LINEART SANE_I18N("Lineart") |
| #endif |
| |
| static TW_UINT16 get_onevalue(pTW_CAPABILITY pCapability, TW_UINT16 *type, TW_UINT32 *value) |
| { |
| if (pCapability->hContainer) |
| { |
| pTW_ONEVALUE pVal = GlobalLock (pCapability->hContainer); |
| if (pVal) |
| { |
| *value = pVal->Item; |
| if (type) |
| *type = pVal->ItemType; |
| GlobalUnlock (pCapability->hContainer); |
| return TWCC_SUCCESS; |
| } |
| } |
| return TWCC_BUMMER; |
| } |
| |
| |
| static TW_UINT16 set_onevalue(pTW_CAPABILITY pCapability, TW_UINT16 type, TW_UINT32 value) |
| { |
| pCapability->hContainer = GlobalAlloc (0, sizeof(TW_ONEVALUE)); |
| |
| if (pCapability->hContainer) |
| { |
| pTW_ONEVALUE pVal = GlobalLock (pCapability->hContainer); |
| if (pVal) |
| { |
| pCapability->ConType = TWON_ONEVALUE; |
| pVal->ItemType = type; |
| pVal->Item = value; |
| GlobalUnlock (pCapability->hContainer); |
| return TWCC_SUCCESS; |
| } |
| } |
| return TWCC_LOWMEMORY; |
| } |
| |
| static TW_UINT16 msg_set(pTW_CAPABILITY pCapability, TW_UINT32 *val) |
| { |
| if (pCapability->ConType == TWON_ONEVALUE) |
| return get_onevalue(pCapability, NULL, val); |
| |
| FIXME("Partial Stub: MSG_SET only supports TW_ONEVALUE\n"); |
| return TWCC_BADCAP; |
| } |
| |
| |
| static TW_UINT16 msg_get_enum(pTW_CAPABILITY pCapability, const TW_UINT32 *values, int value_count, |
| TW_UINT16 type, TW_UINT32 current, TW_UINT32 default_value) |
| { |
| TW_ENUMERATION *enumv = NULL; |
| TW_UINT32 *p32; |
| TW_UINT16 *p16; |
| int i; |
| |
| pCapability->ConType = TWON_ENUMERATION; |
| pCapability->hContainer = 0; |
| |
| if (type == TWTY_INT16 || type == TWTY_UINT16) |
| pCapability->hContainer = GlobalAlloc (0, FIELD_OFFSET( TW_ENUMERATION, ItemList[value_count * sizeof(TW_UINT16)])); |
| |
| if (type == TWTY_INT32 || type == TWTY_UINT32) |
| pCapability->hContainer = GlobalAlloc (0, FIELD_OFFSET( TW_ENUMERATION, ItemList[value_count * sizeof(TW_UINT32)])); |
| |
| if (pCapability->hContainer) |
| enumv = GlobalLock(pCapability->hContainer); |
| |
| if (! enumv) |
| return TWCC_LOWMEMORY; |
| |
| enumv->ItemType = type; |
| enumv->NumItems = value_count; |
| |
| p16 = (TW_UINT16 *) enumv->ItemList; |
| p32 = (TW_UINT32 *) enumv->ItemList; |
| for (i = 0; i < value_count; i++) |
| { |
| if (values[i] == current) |
| enumv->CurrentIndex = i; |
| if (values[i] == default_value) |
| enumv->DefaultIndex = i; |
| if (type == TWTY_INT16 || type == TWTY_UINT16) |
| p16[i] = values[i]; |
| if (type == TWTY_INT32 || type == TWTY_UINT32) |
| p32[i] = values[i]; |
| } |
| |
| GlobalUnlock(pCapability->hContainer); |
| return TWCC_SUCCESS; |
| } |
| |
| #ifdef SONAME_LIBSANE |
| static TW_UINT16 msg_get_range(pTW_CAPABILITY pCapability, TW_UINT16 type, |
| TW_UINT32 minval, TW_UINT32 maxval, TW_UINT32 step, TW_UINT32 def, TW_UINT32 current) |
| { |
| TW_RANGE *range = NULL; |
| |
| pCapability->ConType = TWON_RANGE; |
| pCapability->hContainer = 0; |
| |
| pCapability->hContainer = GlobalAlloc (0, sizeof(*range)); |
| if (pCapability->hContainer) |
| range = GlobalLock(pCapability->hContainer); |
| |
| if (! range) |
| return TWCC_LOWMEMORY; |
| |
| range->ItemType = type; |
| range->MinValue = minval; |
| range->MaxValue = maxval; |
| range->StepSize = step; |
| range->DefaultValue = def; |
| range->CurrentValue = current; |
| |
| GlobalUnlock(pCapability->hContainer); |
| return TWCC_SUCCESS; |
| } |
| #endif |
| |
| static TW_UINT16 TWAIN_GetSupportedCaps(pTW_CAPABILITY pCapability) |
| { |
| TW_ARRAY *a; |
| static const UINT16 supported_caps[] = { CAP_SUPPORTEDCAPS, CAP_XFERCOUNT, CAP_UICONTROLLABLE, |
| CAP_AUTOFEED, CAP_FEEDERENABLED, |
| ICAP_XFERMECH, ICAP_PIXELTYPE, ICAP_UNITS, ICAP_BITDEPTH, ICAP_COMPRESSION, ICAP_PIXELFLAVOR, |
| ICAP_XRESOLUTION, ICAP_YRESOLUTION, ICAP_PHYSICALHEIGHT, ICAP_PHYSICALWIDTH, ICAP_SUPPORTEDSIZES }; |
| |
| pCapability->hContainer = GlobalAlloc (0, FIELD_OFFSET( TW_ARRAY, ItemList[sizeof(supported_caps)] )); |
| pCapability->ConType = TWON_ARRAY; |
| |
| if (pCapability->hContainer) |
| { |
| UINT16 *u; |
| int i; |
| a = GlobalLock (pCapability->hContainer); |
| a->ItemType = TWTY_UINT16; |
| a->NumItems = sizeof(supported_caps) / sizeof(supported_caps[0]); |
| u = (UINT16 *) a->ItemList; |
| for (i = 0; i < a->NumItems; i++) |
| u[i] = supported_caps[i]; |
| GlobalUnlock (pCapability->hContainer); |
| return TWCC_SUCCESS; |
| } |
| else |
| return TWCC_LOWMEMORY; |
| } |
| |
| |
| /* ICAP_XFERMECH */ |
| static TW_UINT16 SANE_ICAPXferMech (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| static const TW_UINT32 possible_values[] = { TWSX_NATIVE, TWSX_MEMORY }; |
| TW_UINT32 val; |
| TW_UINT16 twCC = TWCC_BADCAP; |
| |
| TRACE("ICAP_XFERMECH\n"); |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| twCC = msg_get_enum(pCapability, possible_values, sizeof(possible_values) / sizeof(possible_values[0]), |
| TWTY_UINT16, activeDS.capXferMech, TWSX_NATIVE); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| { |
| activeDS.capXferMech = (TW_UINT16) val; |
| FIXME("Partial Stub: XFERMECH set to %d, but ignored\n", val); |
| } |
| break; |
| |
| case MSG_GETDEFAULT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, TWSX_NATIVE); |
| break; |
| |
| case MSG_RESET: |
| activeDS.capXferMech = TWSX_NATIVE; |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, activeDS.capXferMech); |
| FIXME("Partial Stub: XFERMECH of %d not actually used\n", activeDS.capXferMech); |
| break; |
| } |
| return twCC; |
| } |
| |
| |
| /* CAP_XFERCOUNT */ |
| static TW_UINT16 SANE_CAPXferCount (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT32 val; |
| TW_UINT16 twCC = TWCC_BADCAP; |
| |
| TRACE("CAP_XFERCOUNT\n"); |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| twCC = set_onevalue(pCapability, TWTY_INT16, -1); |
| FIXME("Partial Stub: Reporting only support for transfer all\n"); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| FIXME("Partial Stub: XFERCOUNT set to %d, but ignored\n", val); |
| break; |
| |
| case MSG_GETDEFAULT: |
| twCC = set_onevalue(pCapability, TWTY_INT16, -1); |
| break; |
| |
| case MSG_RESET: |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_INT16, -1); |
| break; |
| } |
| return twCC; |
| } |
| |
| #ifdef SONAME_LIBSANE |
| static BOOL pixeltype_to_sane_mode(TW_UINT16 pixeltype, SANE_String mode, int len) |
| { |
| SANE_String_Const m = NULL; |
| switch (pixeltype) |
| { |
| case TWPT_GRAY: |
| m = SANE_VALUE_SCAN_MODE_GRAY; |
| break; |
| case TWPT_RGB: |
| m = SANE_VALUE_SCAN_MODE_COLOR; |
| break; |
| case TWPT_BW: |
| m = SANE_VALUE_SCAN_MODE_LINEART; |
| break; |
| } |
| if (! m) |
| return FALSE; |
| if (strlen(m) >= len) |
| return FALSE; |
| strcpy(mode, m); |
| return TRUE; |
| } |
| static BOOL sane_mode_to_pixeltype(SANE_String_Const mode, TW_UINT16 *pixeltype) |
| { |
| if (strcmp(mode, SANE_VALUE_SCAN_MODE_LINEART) == 0) |
| *pixeltype = TWPT_BW; |
| else if (memcmp(mode, SANE_VALUE_SCAN_MODE_GRAY, strlen(SANE_VALUE_SCAN_MODE_GRAY)) == 0) |
| *pixeltype = TWPT_GRAY; |
| else if (strcmp(mode, SANE_VALUE_SCAN_MODE_COLOR) == 0) |
| *pixeltype = TWPT_RGB; |
| else |
| return FALSE; |
| |
| return TRUE; |
| } |
| #endif |
| |
| /* ICAP_PIXELTYPE */ |
| static TW_UINT16 SANE_ICAPPixelType (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT16 twCC = TWCC_BADCAP; |
| #ifdef SONAME_LIBSANE |
| TW_UINT32 possible_values[3]; |
| int possible_value_count; |
| TW_UINT32 val; |
| SANE_Status rc; |
| SANE_Int status; |
| SANE_String_Const *choices; |
| char current_mode[64]; |
| TW_UINT16 current_pixeltype = TWPT_BW; |
| SANE_Char mode[64]; |
| |
| TRACE("ICAP_PIXELTYPE\n"); |
| |
| rc = sane_option_probe_mode(activeDS.deviceHandle, &choices, current_mode, sizeof(current_mode)); |
| if (rc != SANE_STATUS_GOOD) |
| { |
| ERR("Unable to retrieve mode from sane, ICAP_PIXELTYPE unsupported\n"); |
| return twCC; |
| } |
| |
| sane_mode_to_pixeltype(current_mode, ¤t_pixeltype); |
| |
| /* Sane does not support a concept of a default mode, so we simply cache |
| * the first mode we find */ |
| if (! activeDS.PixelTypeSet) |
| { |
| activeDS.PixelTypeSet = TRUE; |
| activeDS.defaultPixelType = current_pixeltype; |
| } |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| for (possible_value_count = 0; choices && *choices && possible_value_count < 3; choices++) |
| { |
| TW_UINT16 pix; |
| if (sane_mode_to_pixeltype(*choices, &pix)) |
| possible_values[possible_value_count++] = pix; |
| } |
| twCC = msg_get_enum(pCapability, possible_values, possible_value_count, |
| TWTY_UINT16, current_pixeltype, activeDS.defaultPixelType); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| { |
| TRACE("Setting pixeltype to %d\n", val); |
| if (! pixeltype_to_sane_mode(val, mode, sizeof(mode))) |
| return TWCC_BADVALUE; |
| |
| status = 0; |
| rc = sane_option_set_str(activeDS.deviceHandle, "mode", mode, &status); |
| /* Some SANE devices use 'Grayscale' instead of the standard 'Gray' */ |
| if (rc == SANE_STATUS_INVAL && strcmp(mode, SANE_VALUE_SCAN_MODE_GRAY) == 0) |
| { |
| strcpy(mode, "Grayscale"); |
| rc = sane_option_set_str(activeDS.deviceHandle, "mode", mode, &status); |
| } |
| if (rc != SANE_STATUS_GOOD) |
| return sane_status_to_twcc(rc); |
| if (status & SANE_INFO_RELOAD_PARAMS) |
| psane_get_parameters (activeDS.deviceHandle, &activeDS.sane_param); |
| } |
| break; |
| |
| case MSG_GETDEFAULT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, activeDS.defaultPixelType); |
| break; |
| |
| case MSG_RESET: |
| current_pixeltype = activeDS.defaultPixelType; |
| if (! pixeltype_to_sane_mode(current_pixeltype, mode, sizeof(mode))) |
| return TWCC_BADVALUE; |
| |
| status = 0; |
| rc = sane_option_set_str(activeDS.deviceHandle, "mode", mode, &status); |
| /* Some SANE devices use 'Grayscale' instead of the standard 'Gray' */ |
| if (rc == SANE_STATUS_INVAL && strcmp(mode, SANE_VALUE_SCAN_MODE_GRAY) == 0) |
| { |
| strcpy(mode, "Grayscale"); |
| rc = sane_option_set_str(activeDS.deviceHandle, "mode", mode, &status); |
| } |
| if (rc != SANE_STATUS_GOOD) |
| return sane_status_to_twcc(rc); |
| if (status & SANE_INFO_RELOAD_PARAMS) |
| psane_get_parameters (activeDS.deviceHandle, &activeDS.sane_param); |
| |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, current_pixeltype); |
| TRACE("Returning current pixeltype of %d\n", current_pixeltype); |
| break; |
| } |
| |
| #endif |
| return twCC; |
| } |
| |
| /* ICAP_UNITS */ |
| static TW_UINT16 SANE_ICAPUnits (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT32 val; |
| TW_UINT16 twCC = TWCC_BADCAP; |
| |
| TRACE("ICAP_UNITS\n"); |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, TWUN_INCHES); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| { |
| if (val != TWUN_INCHES) |
| { |
| ERR("Sane supports only SANE_UNIT_DPI\n"); |
| twCC = TWCC_BADVALUE; |
| } |
| } |
| break; |
| |
| case MSG_GETDEFAULT: |
| case MSG_RESET: |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, TWUN_INCHES); |
| break; |
| } |
| |
| return twCC; |
| } |
| |
| /* ICAP_BITDEPTH */ |
| static TW_UINT16 SANE_ICAPBitDepth(pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT16 twCC = TWCC_BADCAP; |
| #ifdef SONAME_LIBSANE |
| TW_UINT32 possible_values[1]; |
| |
| TRACE("ICAP_BITDEPTH\n"); |
| |
| possible_values[0] = activeDS.sane_param.depth; |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_GETDEFAULT | TWQC_GETCURRENT ); |
| break; |
| |
| case MSG_GET: |
| twCC = msg_get_enum(pCapability, possible_values, sizeof(possible_values) / sizeof(possible_values[0]), |
| TWTY_UINT16, activeDS.sane_param.depth, activeDS.sane_param.depth); |
| break; |
| |
| case MSG_GETDEFAULT: |
| /* .. Fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| TRACE("Returning current bitdepth of %d\n", activeDS.sane_param.depth); |
| twCC = set_onevalue(pCapability, TWTY_UINT16, activeDS.sane_param.depth); |
| break; |
| } |
| #endif |
| return twCC; |
| } |
| |
| /* CAP_UICONTROLLABLE */ |
| static TW_UINT16 SANE_CAPUiControllable(pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT16 twCC = TWCC_BADCAP; |
| |
| TRACE("CAP_UICONTROLLABLE\n"); |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, TWQC_GET); |
| break; |
| |
| case MSG_GET: |
| twCC = set_onevalue(pCapability, TWTY_BOOL, TRUE); |
| break; |
| |
| } |
| return twCC; |
| } |
| |
| /* ICAP_COMPRESSION */ |
| static TW_UINT16 SANE_ICAPCompression (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| static const TW_UINT32 possible_values[] = { TWCP_NONE }; |
| TW_UINT32 val; |
| TW_UINT16 twCC = TWCC_BADCAP; |
| |
| TRACE("ICAP_COMPRESSION\n"); |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| twCC = msg_get_enum(pCapability, possible_values, sizeof(possible_values) / sizeof(possible_values[0]), |
| TWTY_UINT16, TWCP_NONE, TWCP_NONE); |
| FIXME("Partial stub: We don't attempt to support compression\n"); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| FIXME("Partial Stub: COMPRESSION set to %d, but ignored\n", val); |
| break; |
| |
| case MSG_GETDEFAULT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, TWCP_NONE); |
| break; |
| |
| case MSG_RESET: |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, TWCP_NONE); |
| break; |
| } |
| return twCC; |
| } |
| |
| /* ICAP_XRESOLUTION, ICAP_YRESOLUTION */ |
| static TW_UINT16 SANE_ICAPResolution (pTW_CAPABILITY pCapability, TW_UINT16 action, TW_UINT16 cap) |
| { |
| TW_UINT16 twCC = TWCC_BADCAP; |
| #ifdef SONAME_LIBSANE |
| TW_UINT32 val; |
| SANE_Int current_resolution; |
| TW_FIX32 *default_res; |
| const char *best_option_name; |
| SANE_Int minval, maxval, quantval; |
| SANE_Status sane_rc; |
| SANE_Int set_status; |
| |
| TRACE("ICAP_%cRESOLUTION\n", cap == ICAP_XRESOLUTION ? 'X' : 'Y'); |
| |
| /* Some scanners support 'x-resolution', most seem to just support 'resolution' */ |
| if (cap == ICAP_XRESOLUTION) |
| { |
| best_option_name = "x-resolution"; |
| default_res = &activeDS.defaultXResolution; |
| } |
| else |
| { |
| best_option_name = "y-resolution"; |
| default_res = &activeDS.defaultYResolution; |
| } |
| if (sane_option_get_int(activeDS.deviceHandle, best_option_name, ¤t_resolution) != SANE_STATUS_GOOD) |
| { |
| best_option_name = "resolution"; |
| if (sane_option_get_int(activeDS.deviceHandle, best_option_name, ¤t_resolution) != SANE_STATUS_GOOD) |
| return TWCC_BADCAP; |
| } |
| |
| /* Sane does not support a concept of 'default' resolution, so we have to |
| * cache the resolution the very first time we load the scanner, and use that |
| * as the default */ |
| if (cap == ICAP_XRESOLUTION && ! activeDS.XResolutionSet) |
| { |
| default_res->Whole = current_resolution; |
| default_res->Frac = 0; |
| activeDS.XResolutionSet = TRUE; |
| } |
| |
| if (cap == ICAP_YRESOLUTION && ! activeDS.YResolutionSet) |
| { |
| default_res->Whole = current_resolution; |
| default_res->Frac = 0; |
| activeDS.YResolutionSet = TRUE; |
| } |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| sane_rc = sane_option_probe_resolution(activeDS.deviceHandle, best_option_name, &minval, &maxval, &quantval); |
| if (sane_rc != SANE_STATUS_GOOD) |
| twCC = TWCC_BADCAP; |
| else |
| twCC = msg_get_range(pCapability, TWTY_FIX32, |
| minval, maxval, quantval == 0 ? 1 : quantval, default_res->Whole, current_resolution); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| { |
| TW_FIX32 f32; |
| memcpy(&f32, &val, sizeof(f32)); |
| sane_rc = sane_option_set_int(activeDS.deviceHandle, best_option_name, f32.Whole, &set_status); |
| if (sane_rc != SANE_STATUS_GOOD) |
| { |
| FIXME("Status of %d not expected or handled\n", sane_rc); |
| twCC = TWCC_BADCAP; |
| } |
| else if (set_status == SANE_INFO_INEXACT) |
| twCC = TWCC_CHECKSTATUS; |
| } |
| break; |
| |
| case MSG_GETDEFAULT: |
| twCC = set_onevalue(pCapability, TWTY_FIX32, default_res->Whole); |
| break; |
| |
| case MSG_RESET: |
| sane_rc = sane_option_set_int(activeDS.deviceHandle, best_option_name, default_res->Whole, NULL); |
| if (sane_rc != SANE_STATUS_GOOD) |
| return TWCC_BADCAP; |
| |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_FIX32, current_resolution); |
| break; |
| } |
| #endif |
| return twCC; |
| } |
| |
| /* ICAP_PHYSICALHEIGHT, ICAP_PHYSICALWIDTH */ |
| static TW_UINT16 SANE_ICAPPhysical (pTW_CAPABILITY pCapability, TW_UINT16 action, TW_UINT16 cap) |
| { |
| TW_UINT16 twCC = TWCC_BADCAP; |
| #ifdef SONAME_LIBSANE |
| TW_FIX32 res; |
| char option_name[64]; |
| SANE_Fixed lower, upper; |
| SANE_Unit lowerunit, upperunit; |
| SANE_Status status; |
| |
| TRACE("ICAP_PHYSICAL%s\n", cap == ICAP_PHYSICALHEIGHT? "HEIGHT" : "WIDTH"); |
| |
| sprintf(option_name, "tl-%c", cap == ICAP_PHYSICALHEIGHT ? 'y' : 'x'); |
| status = sane_option_probe_scan_area(activeDS.deviceHandle, option_name, NULL, &lowerunit, &lower, NULL, NULL); |
| if (status != SANE_STATUS_GOOD) |
| return sane_status_to_twcc(status); |
| |
| sprintf(option_name, "br-%c", cap == ICAP_PHYSICALHEIGHT ? 'y' : 'x'); |
| status = sane_option_probe_scan_area(activeDS.deviceHandle, option_name, NULL, &upperunit, NULL, &upper, NULL); |
| if (status != SANE_STATUS_GOOD) |
| return sane_status_to_twcc(status); |
| |
| if (upperunit != lowerunit) |
| return TWCC_BADCAP; |
| |
| if (! convert_sane_res_to_twain(SANE_UNFIX(upper) - SANE_UNFIX(lower), upperunit, &res, TWUN_INCHES)) |
| return TWCC_BADCAP; |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_GETDEFAULT | TWQC_GETCURRENT ); |
| break; |
| |
| case MSG_GET: |
| case MSG_GETDEFAULT: |
| |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_FIX32, res.Whole | (res.Frac << 16)); |
| break; |
| } |
| #endif |
| return twCC; |
| } |
| |
| /* ICAP_PIXELFLAVOR */ |
| static TW_UINT16 SANE_ICAPPixelFlavor (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT16 twCC = TWCC_BADCAP; |
| #ifdef SONAME_LIBSANE |
| static const TW_UINT32 possible_values[] = { TWPF_CHOCOLATE, TWPF_VANILLA }; |
| TW_UINT32 val; |
| TW_UINT32 flavor = activeDS.sane_param.depth == 1 ? TWPF_VANILLA : TWPF_CHOCOLATE; |
| |
| TRACE("ICAP_PIXELFLAVOR\n"); |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| twCC = msg_get_enum(pCapability, possible_values, sizeof(possible_values) / sizeof(possible_values[0]), |
| TWTY_UINT16, flavor, flavor); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| { |
| FIXME("Stub: PIXELFLAVOR set to %d, but ignored\n", val); |
| } |
| break; |
| |
| case MSG_GETDEFAULT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, flavor); |
| break; |
| |
| case MSG_RESET: |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, flavor); |
| break; |
| } |
| #endif |
| return twCC; |
| } |
| |
| #ifdef SONAME_LIBSANE |
| static TW_UINT16 get_width_height(double *width, double *height, BOOL max) |
| { |
| SANE_Status status; |
| |
| SANE_Fixed tlx_current, tlx_min, tlx_max; |
| SANE_Fixed tly_current, tly_min, tly_max; |
| SANE_Fixed brx_current, brx_min, brx_max; |
| SANE_Fixed bry_current, bry_min, bry_max; |
| |
| status = sane_option_probe_scan_area(activeDS.deviceHandle, "tl-x", &tlx_current, NULL, &tlx_min, &tlx_max, NULL); |
| if (status != SANE_STATUS_GOOD) |
| return sane_status_to_twcc(status); |
| |
| status = sane_option_probe_scan_area(activeDS.deviceHandle, "tl-y", &tly_current, NULL, &tly_min, &tly_max, NULL); |
| if (status != SANE_STATUS_GOOD) |
| return sane_status_to_twcc(status); |
| |
| status = sane_option_probe_scan_area(activeDS.deviceHandle, "br-x", &brx_current, NULL, &brx_min, &brx_max, NULL); |
| if (status != SANE_STATUS_GOOD) |
| return sane_status_to_twcc(status); |
| |
| status = sane_option_probe_scan_area(activeDS.deviceHandle, "br-y", &bry_current, NULL, &bry_min, &bry_max, NULL); |
| if (status != SANE_STATUS_GOOD) |
| return sane_status_to_twcc(status); |
| |
| if (max) |
| *width = SANE_UNFIX(brx_max) - SANE_UNFIX(tlx_min); |
| else |
| *width = SANE_UNFIX(brx_current) - SANE_UNFIX(tlx_current); |
| |
| if (max) |
| *height = SANE_UNFIX(bry_max) - SANE_UNFIX(tly_min); |
| else |
| *height = SANE_UNFIX(bry_current) - SANE_UNFIX(tly_current); |
| |
| return(TWCC_SUCCESS); |
| } |
| |
| static TW_UINT16 set_one_coord(const char *name, double coord) |
| { |
| SANE_Status status; |
| status = sane_option_set_fixed(activeDS.deviceHandle, name, SANE_FIX(coord), NULL); |
| if (status != SANE_STATUS_GOOD) |
| return sane_status_to_twcc(status); |
| return TWCC_SUCCESS; |
| } |
| |
| static TW_UINT16 set_width_height(double width, double height) |
| { |
| TW_UINT16 rc = TWCC_SUCCESS; |
| rc = set_one_coord("tl-x", 0); |
| if (rc != TWCC_SUCCESS) |
| return rc; |
| rc = set_one_coord("br-x", width); |
| if (rc != TWCC_SUCCESS) |
| return rc; |
| rc = set_one_coord("tl-y", 0); |
| if (rc != TWCC_SUCCESS) |
| return rc; |
| rc = set_one_coord("br-y", height); |
| |
| return rc; |
| } |
| |
| typedef struct |
| { |
| TW_UINT32 size; |
| double x; |
| double y; |
| } supported_size_t; |
| |
| static const supported_size_t supported_sizes[] = |
| { |
| { TWSS_NONE, 0, 0 }, |
| { TWSS_A4, 210, 297 }, |
| { TWSS_JISB5, 182, 257 }, |
| { TWSS_USLETTER, 215.9, 279.4 }, |
| { TWSS_USLEGAL, 215.9, 355.6 }, |
| { TWSS_A5, 148, 210 }, |
| { TWSS_B4, 250, 353 }, |
| { TWSS_B6, 125, 176 }, |
| { TWSS_USLEDGER, 215.9, 431.8 }, |
| { TWSS_USEXECUTIVE, 184.15, 266.7 }, |
| { TWSS_A3, 297, 420 }, |
| }; |
| #define SUPPORTED_SIZE_COUNT (sizeof(supported_sizes) / sizeof(supported_sizes[0])) |
| |
| static TW_UINT16 get_default_paper_size(const supported_size_t *s, int n) |
| { |
| DWORD paper; |
| int rc; |
| int defsize = -1; |
| double width, height; |
| int i; |
| rc = GetLocaleInfoA(LOCALE_USER_DEFAULT, LOCALE_IPAPERSIZE | LOCALE_RETURN_NUMBER, (void *) &paper, sizeof(paper)); |
| if (rc > 0) |
| switch (paper) |
| { |
| case 1: |
| defsize = TWSS_USLETTER; |
| break; |
| case 5: |
| defsize = TWSS_USLEGAL; |
| break; |
| case 8: |
| defsize = TWSS_A3; |
| break; |
| case 9: |
| defsize = TWSS_A4; |
| break; |
| } |
| |
| if (defsize == -1) |
| return TWSS_NONE; |
| |
| if (get_width_height(&width, &height, TRUE) != TWCC_SUCCESS) |
| return TWSS_NONE; |
| |
| for (i = 0; i < n; i++) |
| if (s[i].size == defsize) |
| { |
| /* Sane's use of integers to store floats is a hair lossy; deal with it */ |
| if (s[i].x > (width + .01) || s[i].y > (height + 0.01)) |
| return TWSS_NONE; |
| else |
| return s[i].size; |
| } |
| |
| return TWSS_NONE; |
| } |
| |
| static TW_UINT16 get_current_paper_size(const supported_size_t *s, int n) |
| { |
| int i; |
| double width, height; |
| double xdelta, ydelta; |
| |
| if (get_width_height(&width, &height, FALSE) != TWCC_SUCCESS) |
| return TWSS_NONE; |
| |
| for (i = 0; i < n; i++) |
| { |
| /* Sane's use of integers to store floats results |
| * in a very small error; cope with that */ |
| xdelta = s[i].x - width; |
| ydelta = s[i].y - height; |
| if (xdelta < 0.01 && xdelta > -0.01 && |
| ydelta < 0.01 && ydelta > -0.01) |
| return s[i].size; |
| } |
| |
| return TWSS_NONE; |
| } |
| #endif |
| |
| /* ICAP_SUPPORTEDSIZES */ |
| static TW_UINT16 SANE_ICAPSupportedSizes (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT16 twCC = TWCC_BADCAP; |
| #ifdef SONAME_LIBSANE |
| |
| static TW_UINT32 possible_values[SUPPORTED_SIZE_COUNT]; |
| int i; |
| TW_UINT32 val; |
| TW_UINT16 default_size = get_default_paper_size(supported_sizes, SUPPORTED_SIZE_COUNT); |
| TW_UINT16 current_size = get_current_paper_size(supported_sizes, SUPPORTED_SIZE_COUNT); |
| |
| TRACE("ICAP_SUPPORTEDSIZES\n"); |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| for (i = 0; i < sizeof(supported_sizes) / sizeof(supported_sizes[0]); i++) |
| possible_values[i] = supported_sizes[i].size; |
| twCC = msg_get_enum(pCapability, possible_values, sizeof(possible_values) / sizeof(possible_values[0]), |
| TWTY_UINT16, current_size, default_size); |
| WARN("Partial Stub: our supported size selection is a bit thin.\n"); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| for (i = 1; i < SUPPORTED_SIZE_COUNT; i++) |
| if (supported_sizes[i].size == val) |
| return set_width_height(supported_sizes[i].x, supported_sizes[i].y); |
| |
| ERR("Unsupported size %d\n", val); |
| twCC = TWCC_BADCAP; |
| break; |
| |
| case MSG_GETDEFAULT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, default_size); |
| break; |
| |
| case MSG_RESET: |
| twCC = TWCC_BADCAP; |
| for (i = 1; i < SUPPORTED_SIZE_COUNT; i++) |
| if (supported_sizes[i].size == default_size) |
| { |
| twCC = set_width_height(supported_sizes[i].x, supported_sizes[i].y); |
| break; |
| } |
| if (twCC != TWCC_SUCCESS) |
| return twCC; |
| |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_UINT16, current_size); |
| break; |
| } |
| |
| #undef SUPPORTED_SIZE_COUNT |
| #endif |
| return twCC; |
| } |
| |
| /* CAP_AUTOFEED */ |
| static TW_UINT16 SANE_CAPAutofeed (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT16 twCC = TWCC_BADCAP; |
| #ifdef SONAME_LIBSANE |
| TW_UINT32 val; |
| SANE_Bool autofeed; |
| SANE_Status status; |
| |
| TRACE("CAP_AUTOFEED\n"); |
| |
| if (sane_option_get_bool(activeDS.deviceHandle, "batch-scan", &autofeed, NULL) != SANE_STATUS_GOOD) |
| return TWCC_BADCAP; |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| twCC = set_onevalue(pCapability, TWTY_BOOL, autofeed); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| { |
| if (val) |
| autofeed = SANE_TRUE; |
| else |
| autofeed = SANE_FALSE; |
| |
| status = sane_option_set_bool(activeDS.deviceHandle, "batch-scan", autofeed, NULL); |
| if (status != SANE_STATUS_GOOD) |
| { |
| ERR("Error %s: Could not set batch-scan to %d\n", psane_strstatus(status), autofeed); |
| return sane_status_to_twcc(status); |
| } |
| } |
| break; |
| |
| case MSG_GETDEFAULT: |
| twCC = set_onevalue(pCapability, TWTY_BOOL, SANE_TRUE); |
| break; |
| |
| case MSG_RESET: |
| autofeed = SANE_TRUE; |
| status = sane_option_set_bool(activeDS.deviceHandle, "batch-scan", autofeed, NULL); |
| if (status != SANE_STATUS_GOOD) |
| { |
| ERR("Error %s: Could not reset batch-scan to SANE_TRUE\n", psane_strstatus(status)); |
| return sane_status_to_twcc(status); |
| } |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_BOOL, autofeed); |
| break; |
| } |
| #endif |
| return twCC; |
| } |
| |
| /* CAP_FEEDERENABLED */ |
| static TW_UINT16 SANE_CAPFeederEnabled (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT16 twCC = TWCC_BADCAP; |
| #ifdef SONAME_LIBSANE |
| TW_UINT32 val; |
| TW_BOOL enabled; |
| SANE_Status status; |
| SANE_Char source[64]; |
| |
| TRACE("CAP_FEEDERENABLED\n"); |
| |
| if (sane_option_get_str(activeDS.deviceHandle, SANE_NAME_SCAN_SOURCE, source, sizeof(source), NULL) != SANE_STATUS_GOOD) |
| return TWCC_BADCAP; |
| |
| if (strcmp(source, "Auto") == 0 || strcmp(source, "ADF") == 0) |
| enabled = TRUE; |
| else |
| enabled = FALSE; |
| |
| switch (action) |
| { |
| case MSG_QUERYSUPPORT: |
| twCC = set_onevalue(pCapability, TWTY_INT32, |
| TWQC_GET | TWQC_SET | TWQC_GETDEFAULT | TWQC_GETCURRENT | TWQC_RESET ); |
| break; |
| |
| case MSG_GET: |
| twCC = set_onevalue(pCapability, TWTY_BOOL, enabled); |
| break; |
| |
| case MSG_SET: |
| twCC = msg_set(pCapability, &val); |
| if (twCC == TWCC_SUCCESS) |
| { |
| if (val) |
| enabled = TRUE; |
| else |
| enabled = FALSE; |
| |
| strcpy(source, "ADF"); |
| status = sane_option_set_str(activeDS.deviceHandle, SANE_NAME_SCAN_SOURCE, source, NULL); |
| if (status != SANE_STATUS_GOOD) |
| { |
| strcpy(source, "Auto"); |
| status = sane_option_set_str(activeDS.deviceHandle, SANE_NAME_SCAN_SOURCE, source, NULL); |
| } |
| if (status != SANE_STATUS_GOOD) |
| { |
| ERR("Error %s: Could not set source to either ADF or Auto\n", psane_strstatus(status)); |
| return sane_status_to_twcc(status); |
| } |
| } |
| break; |
| |
| case MSG_GETDEFAULT: |
| twCC = set_onevalue(pCapability, TWTY_BOOL, TRUE); |
| break; |
| |
| case MSG_RESET: |
| strcpy(source, "Auto"); |
| if (sane_option_set_str(activeDS.deviceHandle, SANE_NAME_SCAN_SOURCE, source, NULL) == SANE_STATUS_GOOD) |
| enabled = TRUE; |
| twCC = TWCC_SUCCESS; |
| /* .. fall through intentional .. */ |
| |
| case MSG_GETCURRENT: |
| twCC = set_onevalue(pCapability, TWTY_BOOL, enabled); |
| break; |
| } |
| #endif |
| return twCC; |
| } |
| |
| |
| |
| TW_UINT16 SANE_SaneCapability (pTW_CAPABILITY pCapability, TW_UINT16 action) |
| { |
| TW_UINT16 twCC = TWCC_CAPUNSUPPORTED; |
| |
| TRACE("capability=%d action=%d\n", pCapability->Cap, action); |
| |
| switch (pCapability->Cap) |
| { |
| case CAP_SUPPORTEDCAPS: |
| if (action == MSG_GET) |
| twCC = TWAIN_GetSupportedCaps(pCapability); |
| else |
| twCC = TWCC_BADVALUE; |
| break; |
| |
| case CAP_XFERCOUNT: |
| twCC = SANE_CAPXferCount (pCapability, action); |
| break; |
| |
| case CAP_UICONTROLLABLE: |
| twCC = SANE_CAPUiControllable (pCapability, action); |
| break; |
| |
| case CAP_AUTOFEED: |
| twCC = SANE_CAPAutofeed (pCapability, action); |
| break; |
| |
| case CAP_FEEDERENABLED: |
| twCC = SANE_CAPFeederEnabled (pCapability, action); |
| break; |
| |
| case ICAP_PIXELTYPE: |
| twCC = SANE_ICAPPixelType (pCapability, action); |
| break; |
| |
| case ICAP_UNITS: |
| twCC = SANE_ICAPUnits (pCapability, action); |
| break; |
| |
| case ICAP_BITDEPTH: |
| twCC = SANE_ICAPBitDepth(pCapability, action); |
| break; |
| |
| case ICAP_XFERMECH: |
| twCC = SANE_ICAPXferMech (pCapability, action); |
| break; |
| |
| case ICAP_PIXELFLAVOR: |
| twCC = SANE_ICAPPixelFlavor (pCapability, action); |
| break; |
| |
| case ICAP_COMPRESSION: |
| twCC = SANE_ICAPCompression(pCapability, action); |
| break; |
| |
| case ICAP_XRESOLUTION: |
| twCC = SANE_ICAPResolution(pCapability, action, pCapability->Cap); |
| break; |
| |
| case ICAP_YRESOLUTION: |
| twCC = SANE_ICAPResolution(pCapability, action, pCapability->Cap); |
| break; |
| |
| case ICAP_PHYSICALHEIGHT: |
| twCC = SANE_ICAPPhysical(pCapability, action, pCapability->Cap); |
| break; |
| |
| case ICAP_PHYSICALWIDTH: |
| twCC = SANE_ICAPPhysical(pCapability, action, pCapability->Cap); |
| break; |
| |
| case ICAP_SUPPORTEDSIZES: |
| twCC = SANE_ICAPSupportedSizes (pCapability, action); |
| break; |
| |
| case ICAP_PLANARCHUNKY: |
| FIXME("ICAP_PLANARCHUNKY not implemented\n"); |
| break; |
| |
| case ICAP_BITORDER: |
| FIXME("ICAP_BITORDER not implemented\n"); |
| break; |
| |
| } |
| |
| /* Twain specifies that you should return a 0 in response to QUERYSUPPORT, |
| * even if you don't formally support the capability */ |
| if (twCC == TWCC_CAPUNSUPPORTED && action == MSG_QUERYSUPPORT) |
| twCC = set_onevalue(pCapability, 0, TWTY_INT32); |
| |
| if (twCC == TWCC_CAPUNSUPPORTED) |
| TRACE("capability 0x%x/action=%d being reported as unsupported\n", pCapability->Cap, action); |
| |
| return twCC; |
| } |
| |
| TW_UINT16 SANE_SaneSetDefaults (void) |
| { |
| TW_CAPABILITY cap; |
| |
| memset(&cap, 0, sizeof(cap)); |
| cap.Cap = CAP_AUTOFEED; |
| cap.ConType = TWON_DONTCARE16; |
| |
| if (SANE_SaneCapability(&cap, MSG_RESET) == TWCC_SUCCESS) |
| GlobalFree(cap.hContainer); |
| |
| memset(&cap, 0, sizeof(cap)); |
| cap.Cap = CAP_FEEDERENABLED; |
| cap.ConType = TWON_DONTCARE16; |
| |
| if (SANE_SaneCapability(&cap, MSG_RESET) == TWCC_SUCCESS) |
| GlobalFree(cap.hContainer); |
| |
| memset(&cap, 0, sizeof(cap)); |
| cap.Cap = ICAP_SUPPORTEDSIZES; |
| cap.ConType = TWON_DONTCARE16; |
| |
| if (SANE_SaneCapability(&cap, MSG_RESET) == TWCC_SUCCESS) |
| GlobalFree(cap.hContainer); |
| |
| return TWCC_SUCCESS; |
| } |
