compiler/clib/fread.c

   1 /*
   2     Copyright © 1995-2003, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     ANSI C function fread().
   6 */
   7
   8 #include <errno.h>
   9 #include <dos/dos.h>
  10 #include <dos/dosextens.h>
  11 #include <proto/exec.h>
  12 #include <proto/dos.h>
  13 #include "__errno.h"
  14 #include "__stdio.h"
  15 #include "__open.h"
  16
  17 /*****************************************************************************
  18
  19     NAME */
  20 #include <stdio.h>
  21
  22         size_t fread (
  23
  24 /*  SYNOPSIS */
  25         void * buf,
  26         size_t size,
  27         size_t nblocks,
  28         FILE * stream)
  29
  30 /*  FUNCTION
  31         Read an amount of bytes from a stream.
  32
  33     INPUTS
  34         buf - The buffer to read the bytes into
  35         size - Size of one block to read
  36         nblocks - The number of blocks to read
  37         stream - Read from this stream
  38
  39     RESULT
  40         The number of blocks read. This may range from 0 when the stream
  41         contains no more blocks up to nblocks. In case of an error, 0 is
  42         returned.
  43
  44     NOTES
  45
  46     EXAMPLE
  47
  48     BUGS
  49
  50     SEE ALSO
  51         fopen(), fwrite()
  52
  53     INTERNALS
  54
  55 ******************************************************************************/
  56 {
  57     size_t cnt;
  58     fdesc *fdesc = __getfdesc(stream->fd);
  59
  60     if (!fdesc)
  61     {
  62         stream->flags |= _STDIO_ERROR;
  63         errno = EBADF;
  64         return 0;
  65     }
  66
  67     cnt = FRead ((BPTR)fdesc->fcb->fh, buf, size, nblocks);
  68
  69     if (cnt == -1)
  70     {
  71         errno = IoErr2errno (IoErr ());
  72         stream->flags |= _STDIO_ERROR;
  73
  74         cnt = 0;
  75     }
  76     else if (cnt == 0 || cnt < nblocks)
  77     {
  78         stream->flags |= _STDIO_EOF;
  79     }
  80
  81     return cnt;
  82 } /* fread */
  83