compiler/clib/fflush.c

   1 /*
   2     Copyright © 1995-2007, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     ANSI C function fflush().
   6 */
   7
   8 #include "__arosc_privdata.h"
   9
  10 #include <exec/types.h>
  11 #include <exec/lists.h>
  12 #include <dos/dosextens.h>
  13 #include <proto/exec.h>
  14 #include <proto/dos.h>
  15 #include "__errno.h"
  16 #include "__stdio.h"
  17 #include "__open.h"
  18
  19 /*****************************************************************************
  20
  21     NAME */
  22 #include <stdio.h>
  23
  24         int fflush (
  25
  26 /*  SYNOPSIS */
  27         FILE * stream)
  28
  29 /*  FUNCTION
  30         Flush a stream. If the stream is an input stream, then the stream
  31         is synchronised for unbuffered I/O. If the stream is an output
  32         stream, then any buffered data is written.
  33
  34     INPUTS
  35         stream - Flush this stream. May be NULL. In this case, all
  36                 output streams are flushed.
  37
  38     RESULT
  39         0 on success or EOF on error.
  40
  41     NOTES
  42
  43     EXAMPLE
  44
  45     BUGS
  46
  47     SEE ALSO
  48
  49     INTERNALS
  50
  51 ******************************************************************************/
  52 {
  53     /* flush all streams opened for output */
  54     if (!stream)
  55     {
  56         FILENODE *fn;
  57
  58         ForeachNode (&__stdio_files, fn)
  59         {
  60             if (fn->File.flags & _STDIO_WRITE)
  61             {
  62                 fdesc *fdesc = __getfdesc(fn->File.fd);
  63
  64                 if (!fdesc)
  65                 {
  66                     errno = EBADF;
  67                     return EOF;
  68                 }
  69
  70                 if (!Flush((BPTR)fdesc->fh))
  71                 {
  72                     errno = IoErr2errno(IoErr());
  73                     return EOF;
  74                 }
  75             }
  76         }
  77     }
  78     else
  79     {
  80         fdesc *fdesc = __getfdesc(stream->fd);
  81
  82         if (!fdesc || !(stream->flags & _STDIO_WRITE))
  83         {
  84             errno = EBADF;
  85             return EOF;
  86         }
  87
  88         if (Flush((BPTR)fdesc->fh))
  89             return 0;
  90     }
  91
  92     errno = IoErr2errno(IoErr());
  93     return EOF;
  94 } /* fflush */
  95