seppdroid/Digital-Research-Source-Code
1
0
Fork 0
mirror of https://github.com/SEPPDROID/Digital-Research-Source-Code.git synced 2025-10-28 02:44: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 86/CONCURRENT/CCPM-86 3.1 SOURCE/D6/READSECT.C Normal file
View File

@@ -0,0 +1,44 @@
/*----------------------------------------------------------------------*\
| NAME : readsect |
| CREATED : 19-August-83 LAST MODIFIED: 16-August-83 |
| FUNCTION: Readsect reads a sector from the file referenced in |
| passed FCB. |
| INPUT : fcb -- ptr to FCB for file to read from. |
| OUTPUT : Returns 0 if successful, F_READ error code otherwise |
\*----------------------------------------------------------------------*/
#include <portab.h>
#include "utildef.h"
#include "cpmfunc.h"
/* THIS REFERENCE IS IN CPMFUNC.H
EXTERN WORD f_read();
*/
EXTERN VOID cpmerr();
EXTERN VOID putfname();
EXTERN VOID crlf();
EXTERN BYTE *err08;
WORD readsect( fcb,buff )
BYTE fcb[];
BYTE *buff;
{
WORD ret_code;
f_dmaset( buff ); /* set input buffer */
f_read( fcb );
ret_code = _EXTERR; /* if phy. or ext err */
if( (ret_code & 0x00ff) == 0x00ff ) /* display message */
{
crlf();
cpmerr( err08,0 );
putfname( fcb,0 );
crlf();
ret_code = ret_code & 0x00ff;
} /* return F_READ error */
return( ret_code ); /* code, 0 = sucecss */
}