pd.if.org Git - pdclib.old/blob - functions/stdio/fputc.c

   1 /* $Id$ */
   2
   3 /* fputc( int, FILE * )
   4
   5    This file is part of the Public Domain C Library (PDCLib).
   6    Permission is granted to use, modify, and / or redistribute at will.
   7 */
   8
   9 #include <stdio.h>
  10
  11 #ifndef REGTEST
  12
  13 #include <_PDCLIB_glue.h>
  14
  15 /* Write the value c (cast to unsigned char) to the given stream.
  16    Returns c if successful, EOF otherwise.
  17    If a write error occurs, the error indicator of the stream is set.
  18 */
  19 int fputc( int c, struct _PDCLIB_file_t * stream )
  20 {
  21     if ( _PDCLIB_prepwrite( stream ) == EOF )
  22     {
  23         return EOF;
  24     }
  25     stream->buffer[stream->bufidx++] = (char)c;
  26     if ( ( stream->bufidx == stream->bufsize )                   /* _IOFBF */
  27            || ( ( stream->status & _IOLBF ) && ( (char)c == '\n' ) ) /* _IOLBF */
  28            || ( stream->status & _IONBF )                        /* _IONBF */
  29     )
  30     {
  31         /* buffer filled, unbuffered stream, or end-of-line. */
  32         return ( _PDCLIB_flushbuffer( stream ) == 0 ) ? c : EOF;
  33     }
  34     return c;
  35 }
  36
  37 #endif
  38
  39 #ifdef TEST
  40 #include <_PDCLIB_test.h>
  41
  42 int main( void )
  43 {
  44     /* Testing covered by ftell.c */
  45     return TEST_RESULTS;
  46 }
  47
  48 #endif