X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=platform%2Fexample_cygwin%2Ffunctions%2F_PDCLIB%2Frename.c;fp=platform%2Fexample_cygwin%2Ffunctions%2F_PDCLIB%2Frename.c;h=0000000000000000000000000000000000000000;hb=0cd903b82201176f3148f6d18d68fd30b82746d5;hp=ccfc7807d4ebc4c5b5e67be03453cc553d238d58;hpb=56bacb39160e13397fde32a36329461f3ae56ec1;p=pdclib

diff --git a/platform/example_cygwin/functions/_PDCLIB/rename.c b/platform/example_cygwin/functions/_PDCLIB/rename.c
deleted file mode 100644
index ccfc780..0000000
--- a/platform/example_cygwin/functions/_PDCLIB/rename.c
+++ /dev/null
@@ -1,135 +0,0 @@
-/* _PDCLIB_rename( const char *, 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>
-
-#ifndef REGTEST
-#include <_PDCLIB_glue.h>
-
-#include </usr/include/errno.h>
-
-extern int unlink( const char * pathname );
-extern int link( const char * old, const char * new );
-
-int _PDCLIB_rename( const char * old, const char * new )
-{
-    /* Note that the behaviour if new file exists is implementation-defined.
-       There is nothing wrong with either overwriting it or failing the
-       operation, but you might want to document whichever you chose.
-       This example fails if new file exists.
-    */
-    if ( link( old, new ) == 0 )
-    {
-        if ( unlink( old ) == EOF )
-        {
-            switch ( errno )
-            {
-                /* See the comments on implementation-defined errno values in
-                   <_PDCLIB_config.h>.
-                */
-                case EACCES:
-                case EFAULT:
-                case EIO:
-                case EISDIR:
-                case ELOOP:
-                case ENAMETOOLONG:
-                case ENOENT:
-                case ENOMEM:
-                case ENOTDIR:
-                case EPERM:
-                case EROFS:
-                    _PDCLIB_errno = _PDCLIB_ERROR;
-                    break;
-                default:
-                    /* This should be something like EUNKNOWN. */
-                    _PDCLIB_errno = _PDCLIB_ERROR;
-                    break;
-            }
-            return -1;
-        }
-        else
-        {
-            return 0;
-        }
-    }
-    else
-    {
-        switch ( errno )
-        {
-            /* See the comments on implementation-defined errno values in
-               <_PDCLIB_config.h>.
-            */
-            case EACCES:
-            case EEXIST:
-            case EFAULT:
-            case EIO:
-            case ELOOP:
-            case EMLINK:
-            case ENAMETOOLONG:
-            case ENOENT:
-            case ENOMEM:
-            case ENOSPC:
-            case ENOTDIR:
-            case EPERM:
-            case EROFS:
-            case EXDEV:
-                _PDCLIB_errno = _PDCLIB_ERROR;
-                break;
-            default:
-                /* This should be something like EUNKNOWN. */
-                _PDCLIB_errno = _PDCLIB_ERROR;
-                break;
-        }
-        return EOF;
-    }
-}
-
-#endif
-
-#ifdef TEST
-#include <_PDCLIB_test.h>
-
-#include <stdlib.h>
-
-int main( void )
-{
-    FILE * file;
-    remove( testfile1 );
-    remove( testfile2 );
-    /* check that neither file exists */
-    TESTCASE( fopen( testfile1, "r" ) == NULL );
-    TESTCASE( fopen( testfile2, "r" ) == NULL );
-    /* rename file 1 to file 2 - expected to fail */
-    TESTCASE( _PDCLIB_rename( testfile1, testfile2 ) == -1 );
-    /* create file 1 */
-    TESTCASE( ( file = fopen( testfile1, "w" ) ) != NULL );
-    TESTCASE( fputc( 'x', file ) == 'x' );
-    TESTCASE( fclose( file ) == 0 );
-    /* check that file 1 exists */
-    TESTCASE( fopen( testfile1, "r" ) != NULL );
-    /* rename file 1 to file 2 */
-    TESTCASE( _PDCLIB_rename( testfile1, testfile2 ) == 0 );
-    /* check that file 2 exists, file 1 does not */
-    TESTCASE( fopen( testfile1, "r" ) == NULL );
-    TESTCASE( fopen( testfile2, "r" ) != NULL );
-    /* create another file 1 */
-    TESTCASE( ( file = fopen( testfile1, "w" ) ) != NULL );
-    TESTCASE( fputc( 'x', file ) == 'x' );
-    TESTCASE( fclose( file ) == 0 );
-    /* check that file 1 exists */
-    TESTCASE( ( file = fopen( testfile1, "r" ) ) != NULL );
-    TESTCASE( fclose( file ) == 0 );
-    /* rename file 1 to file 2 - expected to fail, see comment in
-       _PDCLIB_rename() itself.
-    */
-    TESTCASE( _PDCLIB_rename( testfile1, testfile2 ) == -1 );
-    /* remove both files */
-    remove( testfile1 );
-    remove( testfile2 );
-    return TEST_RESULTS;
-}
-
-#endif