mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-22 16:04:18 +00:00
59 lines
1.7 KiB
C
59 lines
1.7 KiB
C
/*************************************************************************
|
||
*
|
||
* Channel Info Functions
|
||
* ----------------------
|
||
* Copyright 1982,83 by Digital Reserach Inc. All rights reserved.
|
||
*
|
||
* "isatty(fd)" == TRUE iff the file on channel fd is a 'CON:' device.
|
||
* "isdev(fd)" == TRUE iff fd is 'CON:', 'LST:', 'AUX:'
|
||
*
|
||
* Where:
|
||
* fd = file descriptor returned by 'open'
|
||
*
|
||
**************************************************************************/
|
||
#include "portab.h"
|
||
#include "osif.h"
|
||
|
||
BOOLEAN isatty(fd) /* CLEAR FUNCTION ***********/
|
||
WORD fd; /* file des returned by open*/
|
||
{ /****************************/
|
||
REG FD *fp; /* ptr to ccb */
|
||
FD *_chkc(); /* validates fd, cvt to fp */
|
||
/* */
|
||
if((fp=_chkc(fd)) == NULLFD) /* make sure its open MGL */
|
||
return(FALSE); /* isno TTY ifnot open */
|
||
return( (fp->flags & ISTTY) != 0 ); /* test this flag */
|
||
} /****************************/
|
||
|
||
BOOLEAN isdev(fd) /* CLEAR FUNCTION ***********/
|
||
WORD fd; /* file des returned by open*/
|
||
{ /****************************/
|
||
REG FD *fp; /* ptr to ccb */
|
||
FD *_chkc(); /* validates fd, cvt to fp */
|
||
/* */
|
||
if((fp=_chkc(fd)) == NULLFD) /* make sure its open MGL */
|
||
return(FALSE); /* isno TTY ifnot open */
|
||
return(fp->flags&(ISTTY|ISLPT|ISAUX)); /* test these flags */
|
||
} /****************************/
|
||
|
||
|
||
/* ttyname - find name of a terminal */
|
||
/* returns "CON:" if isatty, NULLPTR o.w., under CP/M */
|
||
|
||
EXTERN BYTE __tname[]; /* CON: String */
|
||
BYTE * ttyname(fd) /* CLEAR FUNCTION ***********/
|
||
WORD fd;
|
||
{
|
||
if( isatty(fd) )
|
||
return(__tname);
|
||
return(NULLPTR);
|
||
}
|
||
satty(fd) )
|
||
return(__tname);
|
||
return(NULLPTR);
|
||
}
|
||
satty(fd) )
|
||
return(__tname);
|
||
return(NULLPTR);
|
||
}
|