X-Git-Url: https://pd.if.org/git/?p=pdclib;a=blobdiff_plain;f=functions%2Fstdio%2F_PDCLIB_fvopen.c;h=292ba3922c05f5d1ba5acd511e83942aa353f8a7;hp=307d0c9cc04a38fb879005ff0f080800128934fd;hb=abc15df6b9fae3374d24c7cf5c3ab94c605b2a6d;hpb=8894c921674bb116d0a7b8f23a55311e7a768019

diff --git a/functions/stdio/_PDCLIB_fvopen.c b/functions/stdio/_PDCLIB_fvopen.c
index 307d0c9..292ba39 100644
--- a/functions/stdio/_PDCLIB_fvopen.c
+++ b/functions/stdio/_PDCLIB_fvopen.c
@@ -1,105 +1,105 @@
-/* _PDCLIB_fvopen( _PDCLIB_fd_t, _PDCLIB_fileops_t * )
-
-   This file is part of the Public Domain C Library (PDCLib).
-   Permission is granted to use, modify, and / or redistribute at will.
-*/
-
-#include <stdio.h>
-#include <stdlib.h>
-
-#ifndef REGTEST
-#include "_PDCLIB_glue.h"
-#include "_PDCLIB_io.h"
-#include <string.h>
-#include <threads.h>
-
-extern FILE * _PDCLIB_filelist;
-
-FILE * _PDCLIB_fvopen(
-    _PDCLIB_fd_t                                    fd,
-    const _PDCLIB_fileops_t    *_PDCLIB_restrict    ops,
-    int                                             mode,
-    const char                  *_PDCLIB_restrict   filename
-)
-{
-    size_t filename_len;
-    FILE * rc;
-    if ( mode == NULL )
-    {
-        /* Mode invalid */
-        return NULL;
-    }
-    /* To reduce the number of malloc calls, all data fields are concatenated:
-       * the FILE structure itself,
-       * ungetc buffer,
-       * filename buffer,
-       * data buffer.
-       Data buffer comes last because it might change in size ( setvbuf() ).
-    */
-    filename_len = filename ? strlen( filename ) + 1 : 1;
-    if ( ( rc = calloc( 1, sizeof( FILE ) + _PDCLIB_UNGETCBUFSIZE + filename_len + BUFSIZ ) ) == NULL )
-    {
-        /* no memory */
-        return NULL;
-    }
-
-    if(mtx_init(&rc->lock, mtx_recursive) != thrd_success) {
-        free(rc);
-        return NULL;
-    }
-
-    rc->status = mode;
-    rc->ops    = ops;
-    rc->handle = fd;
-    /* Setting pointers into the memory block allocated above */
-    rc->ungetbuf = (unsigned char *)rc + sizeof( FILE );
-    rc->filename = (char *)rc->ungetbuf + _PDCLIB_UNGETCBUFSIZE;
-    rc->buffer   = rc->filename + filename_len;
-    /* Copying filename to FILE structure */
-    if(filename) strcpy( rc->filename, filename );
-    /* Initializing the rest of the structure */
-    rc->bufsize = BUFSIZ;
-    rc->bufidx = 0;
-#ifdef _PDCLIB_NEED_EOL_TRANSLATION
-    rc->bufnlexp = 0;
-#endif
-    rc->ungetidx = 0;
-    /* Setting buffer to _IOLBF because "when opened, a stream is fully
-       buffered if and only if it can be determined not to refer to an
-       interactive device."
-    */
-    rc->status |= _IOLBF;
-    /* TODO: Setting mbstate */
-    /* Adding to list of open files */
-    rc->next = _PDCLIB_filelist;
-    _PDCLIB_filelist = rc;
-    return rc;
-}
-
-#endif
-
-#ifdef TEST
-#include "_PDCLIB_test.h"
-
-int main( void )
-{
-    /* Some of the tests are not executed for regression tests, as the libc on
-       my system is at once less forgiving (segfaults on mode NULL) and more
-       forgiving (accepts undefined modes).
-    */
-    FILE * fh;
-    remove( testfile );
-    TESTCASE_NOREG( fopen( NULL, NULL ) == NULL );
-    TESTCASE( fopen( NULL, "w" ) == NULL );
-    TESTCASE_NOREG( fopen( "", NULL ) == NULL );
-    TESTCASE( fopen( "", "w" ) == NULL );
-    TESTCASE( fopen( "foo", "" ) == NULL );
-    TESTCASE_NOREG( fopen( testfile, "wq" ) == NULL ); /* Undefined mode */
-    TESTCASE_NOREG( fopen( testfile, "wr" ) == NULL ); /* Undefined mode */
-    TESTCASE( ( fh = fopen( testfile, "w" ) ) != NULL );
-    TESTCASE( fclose( fh ) == 0 );
-    TESTCASE( remove( testfile ) == 0 );
-    return TEST_RESULTS;
-}
-
-#endif
+/* _PDCLIB_fvopen( _PDCLIB_fd_t, _PDCLIB_fileops_t * )
+
+   This file is part of the Public Domain C Library (PDCLib).
+   Permission is granted to use, modify, and / or redistribute at will.
+*/
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#ifndef REGTEST
+#include "_PDCLIB_glue.h"
+#include "_PDCLIB_io.h"
+#include <string.h>
+#include <threads.h>
+
+extern FILE * _PDCLIB_filelist;
+
+FILE * _PDCLIB_fvopen(
+    _PDCLIB_fd_t                                    fd,
+    const _PDCLIB_fileops_t    *_PDCLIB_restrict    ops,
+    int                                             mode,
+    const char                  *_PDCLIB_restrict   filename
+)
+{
+    size_t filename_len;
+    FILE * rc;
+    if ( mode == NULL )
+    {
+        /* Mode invalid */
+        return NULL;
+    }
+    /* To reduce the number of malloc calls, all data fields are concatenated:
+       * the FILE structure itself,
+       * ungetc buffer,
+       * filename buffer,
+       * data buffer.
+       Data buffer comes last because it might change in size ( setvbuf() ).
+    */
+    filename_len = filename ? strlen( filename ) + 1 : 1;
+    if ( ( rc = calloc( 1, sizeof( FILE ) + _PDCLIB_UNGETCBUFSIZE + filename_len + BUFSIZ ) ) == NULL )
+    {
+        /* no memory */
+        return NULL;
+    }
+
+    if(mtx_init(&rc->lock, mtx_recursive) != thrd_success) {
+        free(rc);
+        return NULL;
+    }
+
+    rc->status = mode;
+    rc->ops    = ops;
+    rc->handle = fd;
+    /* Setting pointers into the memory block allocated above */
+    rc->ungetbuf = (unsigned char *)rc + sizeof( FILE );
+    rc->filename = (char *)rc->ungetbuf + _PDCLIB_UNGETCBUFSIZE;
+    rc->buffer   = rc->filename + filename_len;
+    /* Copying filename to FILE structure */
+    if(filename) strcpy( rc->filename, filename );
+    /* Initializing the rest of the structure */
+    rc->bufsize = BUFSIZ;
+    rc->bufidx = 0;
+#ifdef _PDCLIB_NEED_EOL_TRANSLATION
+    rc->bufnlexp = 0;
+#endif
+    rc->ungetidx = 0;
+    /* Setting buffer to _IOLBF because "when opened, a stream is fully
+       buffered if and only if it can be determined not to refer to an
+       interactive device."
+    */
+    rc->status |= _IOLBF;
+    /* TODO: Setting mbstate */
+    /* Adding to list of open files */
+    rc->next = _PDCLIB_filelist;
+    _PDCLIB_filelist = rc;
+    return rc;
+}
+
+#endif
+
+#ifdef TEST
+#include "_PDCLIB_test.h"
+
+int main( void )
+{
+    /* Some of the tests are not executed for regression tests, as the libc on
+       my system is at once less forgiving (segfaults on mode NULL) and more
+       forgiving (accepts undefined modes).
+    */
+    FILE * fh;
+    remove( testfile );
+    TESTCASE_NOREG( fopen( NULL, NULL ) == NULL );
+    TESTCASE( fopen( NULL, "w" ) == NULL );
+    TESTCASE_NOREG( fopen( "", NULL ) == NULL );
+    TESTCASE( fopen( "", "w" ) == NULL );
+    TESTCASE( fopen( "foo", "" ) == NULL );
+    TESTCASE_NOREG( fopen( testfile, "wq" ) == NULL ); /* Undefined mode */
+    TESTCASE_NOREG( fopen( testfile, "wr" ) == NULL ); /* Undefined mode */
+    TESTCASE( ( fh = fopen( testfile, "w" ) ) != NULL );
+    TESTCASE( fclose( fh ) == 0 );
+    TESTCASE( remove( testfile ) == 0 );
+    return TEST_RESULTS;
+}
+
+#endif