X-Git-Url: https://pd.if.org/git/?p=pdclib;a=blobdiff_plain;f=platform%2Fexample%2Ffunctions%2F_PDCLIB%2Frename.c;h=8ae31f6b517204f56047d77a43a3f838b362700b;hp=a37eeb3464ed74a22d30a4ee4fbd7280479b1a8c;hb=da0f3f353d417fed71f358a48d5d5394145e460d;hpb=ce0e5d8cd76b50f239fb8e95170502b146247b35

diff --git a/platform/example/functions/_PDCLIB/rename.c b/platform/example/functions/_PDCLIB/rename.c
index a37eeb3..8ae31f6 100644
--- a/platform/example/functions/_PDCLIB/rename.c
+++ b/platform/example/functions/_PDCLIB/rename.c
@@ -1,5 +1,3 @@
-/* $Id$ */
-
 /* _PDCLIB_rename( const char *, const char * )
 
    This file is part of the Public Domain C Library (PDCLib).
@@ -9,130 +7,23 @@
 #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 );
+#include "_PDCLIB_glue.h"
+#include <errno.h>
 
 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;
-    }
+    errno = ENOTSUP;
 }
 
 #endif
 
 #ifdef TEST
-#include <_PDCLIB_test.h>
+#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( ( file = fopen( testfile1, "r" ) ) != NULL );
-    TESTCASE( fclose( file ) == 0 );
-    /* 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( ( file = fopen( testfile2, "r" ) ) != NULL );
-    TESTCASE( fclose( file ) == 0 );
-    /* 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;
 }