compiler/clib/vfprintf.c

   1 /*
   2     Copyright © 1995-2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Format a string and call a usercallback to output each char.
   6 */
   7 /* Original source from libnix */
   8
   9
  10 #include <proto/dos.h>
  11 #include <errno.h>
  12 #include "__fdesc.h"
  13
  14 static int __putc(int c, void *fh);
  15
  16 /*****************************************************************************
  17
  18     NAME */
  19 #include <stdio.h>
  20 #include <stdarg.h>
  21
  22         int vfprintf (
  23
  24 /*  SYNOPSIS */
  25         FILE       * stream,
  26         const char * format,
  27         va_list      args)
  28
  29 /*  FUNCTION
  30         Format a list of arguments and print them on the specified stream.
  31
  32     INPUTS
  33         stream - A stream on which one can write
  34         format - A printf() format string.
  35         args - A list of arguments for the format string.
  36
  37     RESULT
  38         The number of characters written.
  39
  40     NOTES
  41
  42     EXAMPLE
  43
  44     BUGS
  45
  46     SEE ALSO
  47
  48     INTERNALS
  49
  50 ******************************************************************************/
  51 {
  52     fdesc *fdesc = __getfdesc(stream->fd);
  53
  54     if (!fdesc)
  55     {
  56         errno = EBADF;
  57         return 0;
  58     }
  59
  60     return __vcformat ((void *)BADDR(fdesc->fcb->fh), __putc, format, args);
  61 } /* vfprintf */
  62
  63
  64 static int __putc(int c, void *fhp)
  65 {
  66     BPTR fh = MKBADDR(fhp);
  67     if (FPutC(fh, c) == EOF)
  68     {
  69         errno = __arosc_ioerr2errno(IoErr());
  70         return EOF;
  71     }
  72
  73     return c;
  74 }