compiler/posixc/fgetc.c

   1 /*
   2     Copyright © 1995-2013, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     C99 function fgetc().
   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 "__fdesc.h"
  14 #include "__stdio.h"
  15
  16 #define DEBUG 0
  17 #include <aros/debug.h>
  18
  19 /*****************************************************************************
  20
  21     NAME */
  22 #include <stdio.h>
  23
  24         int fgetc (
  25
  26 /*  SYNOPSIS */
  27         FILE * stream)
  28
  29 /*  FUNCTION
  30         Read one character from the stream. If there is no character
  31         available or an error occurred, the function returns EOF.
  32
  33     INPUTS
  34         stream - Read from this stream
  35
  36     RESULT
  37         The character read or EOF on end of file or error.
  38
  39     NOTES
  40
  41     EXAMPLE
  42
  43     BUGS
  44
  45     SEE ALSO
  46         getc(), fputc(), putc()
  47
  48     INTERNALS
  49
  50 ******************************************************************************/
  51 {
  52     int c;
  53     fdesc *fdesc = __getfdesc(stream->fd);
  54
  55     if (!fdesc)
  56     {
  57         errno = EBADF;
  58         stream->flags |= __POSIXC_STDIO_ERROR;
  59         return EOF;
  60     }
  61
  62     /* Note: changes here might require changes in vfscanf.c!! */
  63
  64     FLUSHONREADCHECK
  65
  66     c = FGetC (fdesc->fcb->handle);
  67     if (c == EOF)
  68     {
  69         c = IoErr ();
  70
  71         if (c)
  72         {
  73             errno = __stdc_ioerr2errno (c);
  74
  75             stream->flags |= __POSIXC_STDIO_ERROR;
  76         }
  77         else
  78             stream->flags |= __POSIXC_STDIO_EOF;
  79
  80         c = EOF;
  81     }
  82
  83     return c;
  84 } /* fgetc */
  85