seppdroid/Digital-Research-Source-Code
1
0
Fork 0
mirror of https://github.com/SEPPDROID/Digital-Research-Source-Code.git synced 2025-10-24 17:04:19 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Upload

Browse Source 
Digital Research
This commit is contained in:
Sepp J Morris
2020-11-06 18:50:37 +01:00
parent 621ed8ccaf
commit 31738079c4
8481 changed files with 1888323 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

44
CPM OPERATING SYSTEMS/CPM 68K/1.0X SOURCES/v102a/clib/sgtty.c Normal file
View File

@@ -0,0 +1,44 @@
/*************************************************************************
*
* stty / gtty Functions
* -----------------------
* Copyright 1983 by Digital Reserach Inc. All rights reserved.
*
* "stty(fd,argp)" sets the bits for CON: file opened on 'fd'
* "gtty(fd,argp)" gets the bits for CON: file opened on 'fd'
*
* Where:
* fd = file descriptor returned by 'open'
* argp pts to struct 'sgttyb' (see "sgtty.h")
*
**************************************************************************/
#include "portab.h"
#include "osif.h"
#include "sgtty.h"
VOID stty(fd,argp) /* CLEAR FUNCTION ***********/
WORD fd; /* opened file descriptor */
struct sgttyb *argp; /* ptr to control info */
{
REG FD *fp; FD *_chkc();
if( (fp=_chkc(fd)) == NULLFD ||
(fp->flags & ISTTY) == 0 )
return -1;
blkmove(argp,&(fp->fcb),sizeof(*argp)); /* no checks: do whatever */
return 0;
}
VOID gtty(fd,argp) /* CLEAR FUNCTION ***********/
WORD fd; /* opened file descriptor */
struct sgttyb *argp; /* ptr to control info */
{
REG FD *fp; FD *_chkc();
if( (fp=_chkc(fd)) == NULLFD ||
(fp->flags & ISTTY) == 0 )
return -1;
blkmove(&(fp->fcb),argp,sizeof(*argp)); /* no checks: do whatever */
return 0;
}