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

   1 /* $Id$ */
   2
   3 /* vfprintf( FILE *, const char *, va_list )
   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 #include <stdarg.h>
  11 #include <stdint.h>
  12
  13 #ifndef REGTEST
  14
  15 int vfprintf( struct _PDCLIB_file_t * _PDCLIB_restrict stream, const char * _PDCLIB_restrict format, va_list arg )
  16 {
  17     /* TODO: This function should interpret format as multibyte characters.  */
  18     /* Members: base, flags, n, i, this, s, width, prec, stream, arg         */
  19     struct _PDCLIB_status_t status = { 0, 0, SIZE_MAX, 0, 0, NULL, 0, 0, stream, arg };
  20     while ( *format != '\0' )
  21     {
  22         const char * rc;
  23         if ( ( *format != '%' ) || ( ( rc = _PDCLIB_print( format, &status ) ) == format ) )
  24         {
  25             /* No conversion specifier, print verbatim */
  26             putc( *(format++), stream );
  27             status.i++;
  28         }
  29         else
  30         {
  31             /* Continue parsing after conversion specifier */
  32             format = rc;
  33         }
  34     }
  35     return status.i;
  36 }
  37
  38 #endif
  39
  40 #ifdef TEST
  41 #include <stdlib.h>
  42 #include <_PDCLIB_test.h>
  43
  44 static int testprintf( FILE * stream, const char * format, ... )
  45 {
  46     int i;
  47     va_list arg;
  48     va_start( arg, format );
  49     i = vfprintf( stream, format, arg );
  50     va_end( arg );
  51     return i;
  52 }
  53
  54 int main( void )
  55 {
  56     FILE * fh;
  57     TESTCASE( ( fh = fopen( "testfile", "w" ) ) != NULL );
  58     TESTCASE( testprintf( fh, "Hallo\n" ) == 6 );
  59     TESTCASE( fclose( fh ) == 0 );
  60     /* FIXME: Testfile doesn't exist... */
  61     return TEST_RESULTS;
  62 }
  63
  64 #endif