76 lines
2.5 KiB
C
76 lines
2.5 KiB
C
/*
|
|
* scan.c - Phase 1 barcode diagnostic: decoded laser over the serial port.
|
|
*
|
|
* The Workabout MX integral laser powered up and gave a good-read LED on
|
|
* TTY:D, i.e. it is a DECODED scanner that emits ASCII over the serial port -
|
|
* no BAR: decoder LDD needed. The earlier TTY:D read returned nothing because
|
|
* the port's default handshake sets P_OBEY_DSR, and the I/O Devices Reference
|
|
* states that if the remote device does not assert DSR, an outstanding P_FREAD
|
|
* is suspended. The laser does not drive DSR, so the read blocked forever.
|
|
*
|
|
* This build opens TTY:D, applies a P_SRCHAR config at 9600/8/1 with P_OBEY_DSR
|
|
* cleared (P_IGN_CTS only, so reads are not gated on modem lines), forces DTR
|
|
* active, then dumps every byte of each read so the decoded UPC format is seen.
|
|
*
|
|
* Blocking I/O; exit via the System screen.
|
|
*/
|
|
#include <plib.h>
|
|
#include <p_serial.h>
|
|
|
|
GLDEF_C INT main(VOID)
|
|
{
|
|
VOID *chan;
|
|
P_SRCHAR ser;
|
|
UBYTE buf[64];
|
|
UBYTE ctrl[2];
|
|
INT err, n, i;
|
|
|
|
err = p_open(&chan, "TTY:D", (UINT)-1);
|
|
p_printf("open TTY:D: %d\n", err);
|
|
if (err < 0) {
|
|
p_printf("Press a key to exit.\n");
|
|
p_getch();
|
|
return 1;
|
|
}
|
|
|
|
/* 9600 baud, 8 data bits, 1 stop, no parity; do NOT obey DSR/DCD (only
|
|
ignore CTS) so a scanner that leaves the modem lines idle can be read. */
|
|
ser.tbaud = P_BAUD_9600;
|
|
ser.rbaud = P_BAUD_9600;
|
|
ser.frame = P_DATA_8;
|
|
ser.parity = 0;
|
|
ser.hand = P_IGN_CTS;
|
|
ser.xon = 0x11;
|
|
ser.xoff = 0x13;
|
|
ser.flags = 0;
|
|
ser.tmask = 0;
|
|
err = p_iow(chan, P_FSET, &ser);
|
|
p_printf("config 9600/8/1: %d\n", err);
|
|
|
|
/* Force DTR (the scanner enable line) active. Opening already drives it,
|
|
but make it explicit. ctrl[0] is the read-back of input lines. */
|
|
ctrl[0] = 0;
|
|
ctrl[1] = P_SRDTR_ON;
|
|
err = p_iow(chan, P_FCTRL, ctrl);
|
|
p_printf("assert DTR: %d\n", err);
|
|
|
|
p_printf("\nScan a barcode. System screen to exit.\n\n");
|
|
|
|
/* Read ONE byte per call: with tmask=0 a multi-byte P_FREAD waits for the
|
|
full requested count and would block on a short scan. Streaming single
|
|
bytes returns each character as it arrives, whatever the terminator. */
|
|
for (;;) {
|
|
n = p_read(chan, buf, 1);
|
|
if (n < 0) {
|
|
p_printf("<err %d>", n);
|
|
continue;
|
|
}
|
|
if (n == 0)
|
|
continue;
|
|
i = buf[0];
|
|
p_printf(" %d", i);
|
|
if (i == 13 || i == 10)
|
|
p_printf(" <EOL>\n");
|
|
}
|
|
}
|