148 lines
5.6 KiB
C
148 lines
5.6 KiB
C
/*---------------------------------------------------------------------------*\
|
|
|
|
CWIN.C Version 1.1 1995 AVM
|
|
|
|
This file contains the source of the operating system specific
|
|
CAPI functions, here for Windows 16 bit. See CAPI 2.0 spec.
|
|
|
|
\*---------------------------------------------------------------------------*/
|
|
#include <windows.h>
|
|
#include <memory.h>
|
|
|
|
#include "capi20.h"
|
|
|
|
/*---------------------------------------------------------------------------*\
|
|
defined in capi20 Runtime DLL
|
|
\*---------------------------------------------------------------------------*/
|
|
extern WORD FAR PASCAL CAPI_INSTALLED (void);
|
|
extern WORD FAR PASCAL CAPI_REGISTER (WORD MessageBufferSize, WORD maxLogicalConnection, WORD maxBDataBlocks, WORD maxBDataLen, LPWORD pApplID);
|
|
extern WORD FAR PASCAL CAPI_RELEASE (WORD ApplID);
|
|
extern WORD FAR PASCAL CAPI_PUT_MESSAGE (WORD ApplID, LPVOID pCAPIMessage);
|
|
extern WORD FAR PASCAL CAPI_GET_MESSAGE (WORD ApplID, LPVOID FAR *ppCAPIMessage);
|
|
extern WORD FAR PASCAL CAPI_SET_SIGNAL (WORD ApplID, VOID (FAR PASCAL *CAPI_Callback)(WORD ApplID, DWORD Param), DWORD Param);
|
|
extern WORD FAR PASCAL CAPI_GET_MANUFACTURER (LPBYTE SzBuffer);
|
|
extern WORD FAR PASCAL CAPI_GET_VERSION (LPWORD pCAPIMajor, LPWORD pCAPIMinor, LPWORD pManufacturerMajor, LPWORD pManufacturerMinor);
|
|
extern WORD FAR PASCAL CAPI_GET_SERIAL_NUMBER (LPBYTE SzBuffer);
|
|
extern WORD FAR PASCAL CAPI_GET_PROFILE (LPBYTE SzBuffer, WORD CtrlNr);
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
unsigned CAPI20_ISINSTALLED (void) {
|
|
return (unsigned)CAPI_INSTALLED () == 0;
|
|
}
|
|
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
_cword CAPI20_REGISTER (unsigned MsgBufSize, unsigned MaxB3Connection, unsigned MaxB3Blks, unsigned MaxSizeB3, CAPI_REGISTER_ERROR *ErrorCode) {
|
|
WORD ApplID;
|
|
|
|
*ErrorCode = (CAPI_REGISTER_ERROR) CAPI_REGISTER((WORD)MsgBufSize, (WORD)MaxB3Connection, (WORD)MaxB3Blks, (WORD)MaxSizeB3, &ApplID);
|
|
return (_cword)ApplID;
|
|
}
|
|
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
MESSAGE_EXCHANGE_ERROR CAPI20_RELEASE (unsigned Appl_Id) {
|
|
|
|
return (MESSAGE_EXCHANGE_ERROR) CAPI_RELEASE ((WORD)Appl_Id);
|
|
}
|
|
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
MESSAGE_EXCHANGE_ERROR CAPI20_PUT_MESSAGE (CAPI_MESSAGE Msg, unsigned Appl_Id) {
|
|
WORD Error;
|
|
|
|
Error = CAPI_PUT_MESSAGE((WORD)Appl_Id, (void __far *)Msg);
|
|
|
|
#if defined (CPROT)
|
|
if (Error == 0x0000)
|
|
CAPI_PROTOCOL_MESSAGE (Msg);
|
|
else
|
|
CAPI_PROTOCOL_TEXT ("CAPI_PUT_MESSAGE error 0x%04x\n", Error);
|
|
#endif
|
|
|
|
return (MESSAGE_EXCHANGE_ERROR) Error;
|
|
}
|
|
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
MESSAGE_EXCHANGE_ERROR CAPI20_GET_MESSAGE (unsigned Appl_Id, CAPI_MESSAGE __far *ReturnMessage) {
|
|
WORD Error;
|
|
|
|
Error = CAPI_GET_MESSAGE((WORD)Appl_Id, (LPVOID FAR *)ReturnMessage);
|
|
|
|
#if defined (CPROT)
|
|
if (Error == 0x0000)
|
|
CAPI_PROTOCOL_MESSAGE (*ReturnMessage);
|
|
else if (Error != CapiReceiveQueueEmpty)
|
|
CAPI_PROTOCOL_TEXT ("CAPI_GET_MESSAGE error 0x%04x\n", Error);
|
|
#endif
|
|
|
|
return (MESSAGE_EXCHANGE_ERROR) Error;
|
|
}
|
|
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
MESSAGE_EXCHANGE_ERROR CAPI20_SET_SIGNAL(unsigned ApplId, void (FAR PASCAL *CallBack)(WORD,DWORD), DWORD Param) {
|
|
WORD Error;
|
|
|
|
Error = CAPI_SET_SIGNAL((WORD)ApplId, CallBack, Param);
|
|
|
|
#if defined (CPROT)
|
|
if (Error != 0x0000)
|
|
CAPI_PROTOCOL_TEXT("CAPI_SET_SIGNAL error \n", Error);
|
|
#endif
|
|
|
|
return (MESSAGE_EXCHANGE_ERROR) Error;
|
|
}
|
|
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
CAPI_MESSAGE CAPI20_GET_MANUFACTURER (CAPI_MESSAGE LpBuffer) {
|
|
CAPI_GET_MANUFACTURER(LpBuffer);
|
|
|
|
return LpBuffer;
|
|
}
|
|
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
CAPI_MESSAGE CAPI20_GET_VERSION (CAPI_MESSAGE version) {
|
|
WORD CMajor;
|
|
WORD CMinor;
|
|
WORD MMajor;
|
|
WORD MMinor;
|
|
|
|
CAPI_GET_VERSION((WORD __far *)&CMajor, (WORD __far *)&CMinor,
|
|
(WORD __far *)&MMajor, (WORD __far *)&MMinor);
|
|
|
|
version[0] = (BYTE)CMajor;
|
|
version[1] = (BYTE)CMinor;
|
|
version[2] = (BYTE)MMajor;
|
|
version[3] = (BYTE)MMinor;
|
|
|
|
return version;
|
|
}
|
|
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
CAPI_MESSAGE CAPI20_GET_SERIAL_NUMBER (CAPI_MESSAGE LpBuffer) {
|
|
|
|
CAPI_GET_SERIAL_NUMBER(LpBuffer);
|
|
|
|
return LpBuffer;
|
|
}
|
|
|
|
/*--------------------------------------------------------------------------*\
|
|
\*--------------------------------------------------------------------------*/
|
|
MESSAGE_EXCHANGE_ERROR CAPI20_GET_PROFILE (unsigned Controller, CAPI_MESSAGE LpBuffer) {
|
|
WORD Error;
|
|
|
|
Error = CAPI_GET_PROFILE(LpBuffer, (WORD)Controller);
|
|
|
|
#if defined (CPROT)
|
|
if (Error != 0x0000)
|
|
CAPI_PROTOCOL_TEXT("CAPI_GET_PROFILE error \n", Error);
|
|
#endif
|
|
|
|
return (MESSAGE_EXCHANGE_ERROR) Error;
|
|
}
|