]> pd.if.org Git - pdclib/blob - functions/stdio/vfprintf.c
Thanks where thanks is due.
[pdclib] / 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     struct _PDCLIB_status_t status;
19     status.base = 0;
20     status.flags = 0;
21     status.n = SIZE_MAX;
22     status.i = 0;
23     status.current = 0;
24     status.s = NULL;
25     status.width = 0;
26     status.prec = 0;
27     status.stream = stream;
28     va_copy( status.arg, arg );
29
30     while ( *format != '\0' )
31     {
32         const char * rc;
33         if ( ( *format != '%' ) || ( ( rc = _PDCLIB_print( format, &status ) ) == format ) )
34         {
35             /* No conversion specifier, print verbatim */
36             putc( *(format++), stream );
37             status.i++;
38         }
39         else
40         {
41             /* Continue parsing after conversion specifier */
42             format = rc;
43         }
44     }
45     va_end( status.arg );
46     return status.i;
47 }
48
49 #endif
50
51 #ifdef TEST
52 #include <stdlib.h>
53 #include <limits.h>
54 #include <string.h>
55 #include <_PDCLIB_test.h>
56
57 static int testprintf( FILE * stream, const char * format, ... )
58 {
59     int i;
60     va_list arg;
61     va_start( arg, format );
62     i = vfprintf( stream, format, arg );
63     va_end( arg );
64     return i;
65 }
66
67 #define TESTCASE_SPRINTF( x )
68
69 int main( void )
70 {
71     FILE * target;
72     TESTCASE( ( target = fopen( testfile, "wb" ) ) != NULL );
73 #include "printf_testcases.incl"
74     TESTCASE( fclose( target ) == 0 );
75 #include "fprintf_reftest.incl"
76     TESTCASE( remove( testfile ) == 0 );
77     return TEST_RESULTS;
78 }
79
80 #endif