mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 08:24:18 +00:00
27 lines
958 B
C
27 lines
958 B
C
/*************************************************************************
|
|
*
|
|
* i s a t t y F u n c t i o n
|
|
* -----------------------------
|
|
* Copyright 1982 by Digital Reserach Inc. All rights reserved.
|
|
*
|
|
* "isatty" returns TRUE iff the file on channel fd is a 'CON:'
|
|
* device.
|
|
* Calling sequence:
|
|
* ret = isatty(fd)
|
|
* Where:
|
|
* fd = file descriptor returned by 'open'
|
|
* ret = TRUE iff the file is a 'CON:'
|
|
*
|
|
**************************************************************************/
|
|
#include <portab.h>
|
|
#include <cpm.h>
|
|
BOOLEAN isatty(fd) /****************************/
|
|
WORD fd; /* file des returned by open*/
|
|
{ /****************************/
|
|
REG FD *fp; /* ptr to ccb */
|
|
FD *_chkc(); /* validates fd, cvt to fp */
|
|
if((fp=_chkc(fd)) == NULL) /* make sure its open MGL */
|
|
return(FALSE); /* isno TTY ifnot open */
|
|
return( (fp->flags & ISTTY) != 0 ); /* test this flag */
|
|
} /****************************/
|