home *** CD-ROM | disk | FTP | other *** search
- /*
- * Terminate_Parallel.c
- *
- * This is an example of using a termination array for writes from the
- * parallel device. A termination array is set up for the characters Q, E,
- * A and %. The EOFMODE flag is set in io_ParFlags to indicate that we want
- * to use a termination array by sending the PDCMD_SETPARAMS command to the
- * device. Then, a CMD_WRITE command is sent to the device with io_Length
- * set to -1. The write will terminate when one of the four characters in
- * the termination array is sent or when the end of the write buffer has
- * been reached.
- *
- * Compile with SAS C 5.10 lc -b1 -cfistq -v -y -L
- *
- * Run from CLI only
- */
-
- #include <exec/types.h>
- #include <exec/memory.h>
- #include <exec/io.h>
- #include <devices/parallel.h>
-
- #include <clib/exec_protos.h>
- #include <clib/alib_protos.h>
-
- #include <stdio.h>
-
- #ifdef LATTICE
- int CXBRK(void) { return(0); } /* Disable SAS CTRL/C handling */
- int chkabort(void) { return(0); } /* really */
- #endif
-
- void main(void)
- {
- struct MsgPort *ParallelMP; /* Define storage for one pointer */
- struct IOExtPar *ParallelIO; /* Define storage for one pointer */
-
- struct IOPArray Terminators =
- {
- 0x51454125,/* Q E A A */
- 0x25252525 /* fill to end with lowest value, must be in descending order */
- };
-
- UBYTE *WriteBuffer ="abcdefghijklmEopqrstuvwxyze";
- UWORD ctr;
-
- if (ParallelMP=CreatePort(0,0))
- {
- if (ParallelIO=(struct IOExtPar *)
- CreateExtIO(ParallelMP,sizeof(struct IOExtPar)) )
- {
- if (OpenDevice(PARALLELNAME,0L,(struct IORequest *)ParallelIO,0) )
- printf("%s did not open\n",PARALLELNAME);
- else
- {
- /* Tell user what we are doing */
- printf("\fLooking for Q, E, A or % in output\n");
-
- /* Set EOF mode flag
- * Set the termination array
- * Send PDCMD_SETPARAMS to the parallel device
- */
- ParallelIO->io_ParFlags |= PARF_EOFMODE;
- ParallelIO->io_PTermArray = Terminators;
- ParallelIO->IOPar.io_Command = PDCMD_SETPARAMS;
- if (DoIO((struct IORequest *)ParallelIO))
- printf("Set Params failed "); /* Inform user of error */
- else
- {
- /* Send buffer */
- ParallelIO->IOPar.io_Length = -1;
- ParallelIO->IOPar.io_Data = WriteBuffer;
- ParallelIO->IOPar.io_Command = CMD_WRITE;
- if (DoIO((struct IORequest *)ParallelIO))
- printf("Error: Write failed\n");
- else
- {
- /* Display all characters sent */
- printf("\nThese characters were sent:\n\t\t\tASCII\tHEX\n");
- for (ctr=0;ctr<ParallelIO->IOPar.io_Actual;ctr++)
- printf("\t\t\t%c\t%x\n",*WriteBuffer,*WriteBuffer++);
- printf("\nThe actual number of characters sent: %d\n",
- ParallelIO->IOPar.io_Actual);
- }
- }
- CloseDevice((struct IORequest *)ParallelIO);
- }
-
- DeleteExtIO((struct IORequest *)ParallelIO);
- }
- else
- printf("Error: Could not create I/O request\n");
-
- DeletePort(ParallelMP);
- }
- else
- printf("Error: Could not create message port\n");
- }
-