]> pd.if.org Git - pdclib/blob - functions/stdio/setbuf.c
f6f6f7016790709cbcdfd469eff24d6cd2eac8e5
[pdclib] / functions / stdio / setbuf.c
1 /* $Id$ */
2
3 /* setbuf( FILE *, char * )
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
11 #ifndef REGTEST
12
13 void setbuf( FILE * _PDCLIB_restrict stream, char * _PDCLIB_restrict buf )
14 {
15     if ( buf == NULL )
16     {
17         setvbuf( stream, buf, _IONBF, BUFSIZ );
18     }
19     else
20     {
21         setvbuf( stream, buf, _IOFBF, BUFSIZ );
22     }
23 }
24
25 #endif
26
27 #ifdef TEST
28 #include <_PDCLIB_test.h>
29 #include <stdlib.h>
30 #ifndef REGTEST
31 #include <_PDCLIB_io.h>
32 #endif
33
34 int main( void )
35 {
36     /* TODO: Extend testing once setvbuf() is finished. */
37 #ifndef REGTEST
38     char buffer[ BUFSIZ + 1 ];
39     FILE * fh;
40     /* full buffered */
41     TESTCASE( ( fh = tmpfile() ) != NULL );
42     setbuf( fh, buffer );
43     TESTCASE( fh->buffer == buffer );
44     TESTCASE( fh->bufsize == BUFSIZ );
45     TESTCASE( ( fh->status & ( _IOFBF | _IONBF | _IOLBF ) ) == _IOFBF );
46     TESTCASE( fclose( fh ) == 0 );
47     /* not buffered */
48     TESTCASE( ( fh = tmpfile() ) != NULL );
49     setbuf( fh, NULL );
50     TESTCASE( ( fh->status & ( _IOFBF | _IONBF | _IOLBF ) ) == _IONBF );
51     TESTCASE( fclose( fh ) == 0 );
52 #else
53     puts( " NOTEST setbuf() test driver is PDCLib-specific." );
54 #endif
55     return TEST_RESULTS;
56 }
57
58 #endif