]> pd.if.org Git - pdclib.old/blob - stdio/vfprintf.c
[gandr] s/__lp64__/__LP64__/ to match GCC define
[pdclib.old] / 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, size_t n, 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 int main( void )
68 {
69     FILE * buffer;
70     TESTCASE( ( buffer = fopen( "testfile", "wb" ) ) != NULL );
71 #include "printf_testcases.incl"
72     TESTCASE( fclose( buffer ) == 0 );
73 #include "fprintf_reftest.incl"
74     return TEST_RESULTS;
75 }
76
77 #endif