source: buchla-68k/libcio/fread.c@ 6262b5c

/*
   =============================================================================
        fread.c -- read a stream file
        Version 3 -- 1987-06-29 -- D.N. Lynx Crowe
   =============================================================================
*/

#include "all.h"

/*
   =============================================================================
        fread(buffer, size, number, stream) -- read 'number' items of size
        'size' bytes from file 'stream' into 'buffer'.
   =============================================================================
*/

int16_t fread(int8_t *buffer, uint16_t size, int16_t number, FILE *stream)
{
        int16_t total;
        register int16_t c,i;

        for (total = 0; total < number; ++total) {

                for (i = size; i; --i) {

                        if ((c = getc(stream)) EQ EOF)
                                return(total);

                        *buffer++ = c;
                }
        }
        return(total);
}