Programming Examples
Appendix B
B-20
setscanl.c file
/***************************************************************************
**
** UBYTE set_scan_list (KTX_DUALPORT far *dp, SCAN_LIST *sl, UBYTE *orphan,
**
UBYTE trans_num, USHORT timeout)
**
**
This routine instructs the KTX scanner to replace the existing scan
**
list with the new one specified in the command. If the new scan
**
list would create a fault dependent groupt (FDG) orphan, the orphan’s
**
address is copied to the caller in addition to the status code.
**
**
INPUT
**
KTX_DUALPORT far *dp
– points to the base of the KTX dualport
**
SCAN_LIST *sl
– the scan list to be sent to the KTX
**
UBYTE *orphan
– where orphan’s address is to be written
**
UBYTE trans_num
– transaction_number
**
USHORT timeout
– time (in seconds) to wait for completion
**
**
OUTPUT
**
UBYTE status
– completion status of the command
**
***************************************************************************/
#include ”ktx_dp.h”
/* 1784–KTX scanner dualport definition
*/
#include ”ktx_err.h”
/* 1784–KTX scanner error codes
*/
#include ”ktxconst.h”
/* 1784–KTX scanner constants
*/
UBYTE set_scan_list (KTX_DUALPORT far *dp, SCAN_LIST *sl, UBYTE *orphan,
UBYTE trans_num, USHORT timeout)
{
UBYTE
status;
/**** Initialize the command buffer ****/
dp–>cmd_buffer.host_command = SET_SCAN_LIST;
dp–>cmd_buffer.transaction_num = trans_num;
dp–>cmd_buffer.command_length = 1 + sl–>count;
dp–>cmd_buffer.cmd.set_scan_list = *sl;
/**** Send the command ****/
dp–>int_status_from_host = SCANNER_COMMAND_FROM_HOST;
dp–>host_to_ktx_int_reg = INTERRUPT_KTX;
/**** Get and process the confirmation ****/
status = get_confirmation(dp, trans_num, timeout);
switch (status) {
/* break if no confirmation was available */
case CONFIRMATION_TIMED_OUT:
break;
/* break if the transaction numbers didn’t match */
case TRANS_NUM_MISMATCH:
break;
/* If an adapter became a FDG orphan, copy
*/
/* orphan’s address to caller. */
/* (fall through to acknowledge confirmation) */
case SCAN_LIST_CAUSES_FDG_ORPHAN:
*orphan = dp–>confirmation_buffer.conf.set_list.orphan;
acknowledge_confirmation(dp);
break;