compiler/stdc/fputc.c

   1 /*
   2     Copyright © 1995-2013, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     C99 function fputc().
   6 */
   7 #include <dos/dos.h>
   8 #include <proto/dos.h>
   9 #include <errno.h>
  10
  11 #include "__stdio.h"
  12
  13 /*****************************************************************************
  14
  15     NAME */
  16 #include <stdio.h>
  17
  18         int fputc (
  19
  20 /*  SYNOPSIS */
  21         int    c,
  22         FILE * stream)
  23
  24 /*  FUNCTION
  25         Write one character to the specified stream.
  26
  27     INPUTS
  28         c - The character to output
  29         stream - The character is written to this stream
  30
  31     RESULT
  32         The character written or EOF on error.
  33
  34     NOTES
  35
  36     EXAMPLE
  37
  38     BUGS
  39
  40     SEE ALSO
  41
  42     INTERNALS
  43
  44 ******************************************************************************/
  45 {
  46     if (!(stream->flags & __STDCIO_STDIO_WRITE))
  47     {
  48         SetIoErr(ERROR_WRITE_PROTECTED);
  49         errno = EACCES;
  50         stream->flags |= __STDCIO_STDIO_ERROR;
  51         return EOF;
  52     }
  53
  54     if ((stream->flags & __STDCIO_STDIO_APPEND))
  55         Seek(stream->fh, 0, OFFSET_END);
  56
  57     c = (int)FPutC(stream->fh, c);
  58
  59     if (c == EOF)
  60     {
  61         errno = __stdc_ioerr2errno(IoErr());
  62         stream->flags |= __STDCIO_STDIO_ERROR;
  63     }
  64
  65     return c;
  66 } /* fputc */