]> pd.if.org Git - pdclib.old/blob - functions/stdio/vfprintf.c
Narrowed down to exclude KDevelop metadata.
[pdclib.old] / 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