X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstdio%2F_PDCLIB_fdopen.c;fp=functions%2Fstdio%2F_PDCLIB_fdopen.c;h=0000000000000000000000000000000000000000;hb=c5d49235e09fbd58416f10dec2799e61cf3431c8;hp=c628ebcd1e5da4ebf48131e2b9771c47c4d0cce1;hpb=4c7c56442f6b3e08c17594dd4e8095fca3aec9cf;p=pdclib

diff --git a/functions/stdio/_PDCLIB_fdopen.c b/functions/stdio/_PDCLIB_fdopen.c
deleted file mode 100644
index c628ebc..0000000
--- a/functions/stdio/_PDCLIB_fdopen.c
+++ /dev/null
@@ -1,99 +0,0 @@
-/* $Id$ */
-
-/* _PDCLIB_fdopen( _PDCLIB_fd_t fd, const char * )
-
-   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 <string.h>
-#include <threads.h>
-
-extern struct _PDCLIB_file_t * _PDCLIB_filelist;
-
-struct _PDCLIB_file_t * _PDCLIB_fdopen( _PDCLIB_fd_t fd, 
-                                        int mode,
-                                        const char * _PDCLIB_restrict filename )
-{
-    size_t filename_len;
-    struct _PDCLIB_file_t * 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( struct _PDCLIB_file_t ) + _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->handle = fd;
-    /* Setting pointers into the memory block allocated above */
-    rc->ungetbuf = (unsigned char *)rc + sizeof( struct _PDCLIB_file_t );
-    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;
-    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