442 lines
13 KiB
C
442 lines
13 KiB
C
/*
|
|
* 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 "windef.h"
|
|
#include "winbase.h"
|
|
#include "twain.h"
|
|
#include "sane_i.h"
|
|
#include "wine/debug.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(twain);
|
|
|
|
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;
|
|
}
|
|
|
|
static TW_UINT16 TWAIN_GetSupportedCaps(pTW_CAPABILITY pCapability)
|
|
{
|
|
TW_ARRAY *a;
|
|
static const UINT16 supported_caps[] = { CAP_SUPPORTEDCAPS, CAP_XFERCOUNT, CAP_UICONTROLLABLE,
|
|
ICAP_XFERMECH, ICAP_PIXELTYPE, ICAP_COMPRESSION, ICAP_PIXELFLAVOR };
|
|
|
|
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;
|
|
}
|
|
|
|
/* ICAP_PIXELTYPE */
|
|
static TW_UINT16 SANE_ICAPPixelType (pTW_CAPABILITY pCapability, TW_UINT16 action)
|
|
{
|
|
static const TW_UINT32 possible_values[] = { TWPT_BW, TWPT_GRAY, TWPT_RGB };
|
|
TW_UINT32 val;
|
|
TW_UINT16 twCC = TWCC_BADCAP;
|
|
|
|
TRACE("ICAP_PIXELTYPE\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, TWPT_BW);
|
|
break;
|
|
|
|
case MSG_SET:
|
|
twCC = msg_set(pCapability, &val);
|
|
if (twCC == TWCC_SUCCESS)
|
|
{
|
|
activeDS.capPixelType = (TW_UINT16) val;
|
|
FIXME("Partial Stub: PIXELTYPE set to %d, but ignored\n", val);
|
|
}
|
|
break;
|
|
|
|
case MSG_GETDEFAULT:
|
|
twCC = set_onevalue(pCapability, TWTY_UINT16, TWPT_BW);
|
|
break;
|
|
|
|
case MSG_RESET:
|
|
activeDS.capPixelType = TWPT_BW;
|
|
/* .. fall through intentional .. */
|
|
|
|
case MSG_GETCURRENT:
|
|
twCC = set_onevalue(pCapability, TWTY_UINT16, activeDS.capPixelType);
|
|
break;
|
|
}
|
|
|
|
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_PIXELFLAVOR */
|
|
static TW_UINT16 SANE_ICAPPixelFlavor (pTW_CAPABILITY pCapability, TW_UINT16 action)
|
|
{
|
|
static const TW_UINT32 possible_values[] = { TWPF_CHOCOLATE, TWPF_VANILLA };
|
|
TW_UINT32 val;
|
|
TW_UINT16 twCC = TWCC_BADCAP;
|
|
|
|
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, TWPF_CHOCOLATE, TWPF_CHOCOLATE);
|
|
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, TWPF_CHOCOLATE);
|
|
break;
|
|
|
|
case MSG_RESET:
|
|
/* .. fall through intentional .. */
|
|
|
|
case MSG_GETCURRENT:
|
|
twCC = set_onevalue(pCapability, TWTY_UINT16, TWPF_CHOCOLATE);
|
|
break;
|
|
}
|
|
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 ICAP_PIXELTYPE:
|
|
twCC = SANE_ICAPPixelType (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;
|
|
}
|
|
|
|
/* 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;
|
|
}
|