mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 08:24:18 +00:00
39 lines
909 B
C
39 lines
909 B
C
/**************************************************************************
|
|
*
|
|
* f r e a d F u n c t i o n
|
|
* ---------------------------
|
|
* Copyright 1982 by Digital Research Inc. All rights reserved.
|
|
*
|
|
* "fread" reads NI items of size SZ from stream SP and deposits them
|
|
* at BUFF.
|
|
*
|
|
* Calling sequence:
|
|
* nitems = fread(buff,size,nitems,stream)
|
|
* Where:
|
|
* buff -> where to read to
|
|
* size = number bytes in each item
|
|
* nitems = number bytes read/to read
|
|
* stream -> file
|
|
*
|
|
* nitems is set to 0 if an error occurs (including EOF).
|
|
*
|
|
*****************************************************************************/
|
|
#include <stdio.h>
|
|
WORD fread(buff,sz,ni,sp)
|
|
REG BYTE *buff;
|
|
WORD sz,
|
|
ni;
|
|
REG FILE *sp;
|
|
{
|
|
REG WORD jj, kk, ch;
|
|
|
|
for( jj=0; jj<ni; jj++ )
|
|
for( kk=0; kk<sz; kk++ )
|
|
{
|
|
if( (ch = getc(sp)) == FAILURE )
|
|
return(ZERO);
|
|
else *buff++ = ch & 0377;
|
|
}
|
|
return(ni);
|
|
}
|