X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstdio%2Fsetbuf.c;h=2479eb732450a04345d0f5f90dd2d21088438aae;hb=e1c526e9bad3f6e69391e94059096145390508d3;hp=d9b722b88f46ba37f82fd342bd2a9eefa85eef2f;hpb=d02f38605b53cdff5460cc6b9e1b2a80c3a2ba4c;p=pdclib

diff --git a/functions/stdio/setbuf.c b/functions/stdio/setbuf.c
index d9b722b..2479eb7 100644
--- a/functions/stdio/setbuf.c
+++ b/functions/stdio/setbuf.c
@@ -1,7 +1,3 @@
-/* $Id$ */
-
-/* Release $Name$ */
-
 /* setbuf( FILE *, char * )
 
    This file is part of the Public Domain C Library (PDCLib).
@@ -14,7 +10,6 @@
 
 void setbuf( FILE * _PDCLIB_restrict stream, char * _PDCLIB_restrict buf )
 {
-    /* TODO: Only allowed on a "virgin" stream; add check. */
     if ( buf == NULL )
     {
         setvbuf( stream, buf, _IONBF, BUFSIZ );
@@ -29,10 +24,32 @@ void setbuf( FILE * _PDCLIB_restrict stream, char * _PDCLIB_restrict buf )
 
 #ifdef TEST
 #include <_PDCLIB_test.h>
+#include <stdlib.h>
+#ifndef REGTEST
+#include <_PDCLIB_io.h>
+#endif
 
 int main( void )
 {
-    TESTCASE( NO_TESTDRIVER );
+    /* TODO: Extend testing once setvbuf() is finished. */
+#ifndef REGTEST
+    char buffer[ BUFSIZ + 1 ];
+    FILE * fh;
+    /* full buffered */
+    TESTCASE( ( fh = tmpfile() ) != NULL );
+    setbuf( fh, buffer );
+    TESTCASE( fh->buffer == buffer );
+    TESTCASE( fh->bufsize == BUFSIZ );
+    TESTCASE( ( fh->status & ( _IOFBF | _IONBF | _IOLBF ) ) == _IOFBF );
+    TESTCASE( fclose( fh ) == 0 );
+    /* not buffered */
+    TESTCASE( ( fh = tmpfile() ) != NULL );
+    setbuf( fh, NULL );
+    TESTCASE( ( fh->status & ( _IOFBF | _IONBF | _IOLBF ) ) == _IONBF );
+    TESTCASE( fclose( fh ) == 0 );
+#else
+    puts( " NOTEST setbuf() test driver is PDCLib-specific." );
+#endif
     return TEST_RESULTS;
 }