X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstdio%2Fsetbuf.c;h=f6f6f7016790709cbcdfd469eff24d6cd2eac8e5;hb=HEAD;hp=d9b722b88f46ba37f82fd342bd2a9eefa85eef2f;hpb=12e17136786afb1775c9dc946cbe41f5e230c24a;p=pdclib.old

diff --git a/functions/stdio/setbuf.c b/functions/stdio/setbuf.c
index d9b722b..f6f6f70 100644
--- a/functions/stdio/setbuf.c
+++ b/functions/stdio/setbuf.c
@@ -1,7 +1,5 @@
 /* $Id$ */
 
-/* Release $Name$ */
-
 /* setbuf( FILE *, char * )
 
    This file is part of the Public Domain C Library (PDCLib).
@@ -14,7 +12,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 +26,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;
 }