]> pd.if.org Git - pdclib.old/blob - functions/stdio/fputs.c
Narrowed down to exclude KDevelop metadata.
[pdclib.old] / functions / stdio / fputs.c
1 /* $Id$ */
2
3 /* fputs( const char *, FILE * )
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 int fputs( const char * _PDCLIB_restrict s, struct _PDCLIB_file_t * _PDCLIB_restrict stream )
14 {
15     /* FIXME: This is devoid of any error checking (file writeable? r/w
16        constraints honored?)
17     */
18     /* FIXME: Proper buffering handling. */
19     while ( stream->bufidx < stream->bufsize )
20     {
21         if ( ( stream->buffer[stream->bufidx++] = *(s++) ) == '\0' )
22         {
23             break;
24         }
25     }
26     fflush( stream );
27     if ( *(s-1) != '\0' )
28     {
29         return fputs( s, stream );
30     }
31     else
32     {
33         return 1;
34     }
35 }
36
37 #endif
38
39 #ifdef TEST
40 #include <_PDCLIB_test.h>
41
42 #include <string.h>
43
44 int main( void )
45 {
46     FILE * fh;
47     char buffer[100];
48     char text[] = "SUCCESS testing fputs().";
49     TESTCASE( ( fh = fopen( "testfile", "w" ) ) != NULL );
50     TESTCASE( fputs( text, fh ) != EOF );
51     TESTCASE( fclose( fh ) == 0 );
52     TESTCASE( ( fh = fopen( "testfile", "r" ) ) != NULL );
53     TESTCASE( fread( buffer, 1, strlen( text ), fh ) == strlen( text ) );
54     TESTCASE( memcmp( buffer, text, strlen( text ) ) == 0 );
55     TESTCASE( fclose( fh ) == 0 );
56     TESTCASE( remove( "testfile" ) == 0 );
57     return TEST_RESULTS;
58 }
59
60 #endif