pd.if.org Git - pdclib/blob - functions/stdio/rename.c

   1 /* $Id$ */
   2
   3 /* rename( const char *, const char * )
   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 #include <_PDCLIB_glue.h>
  13
  14 int rename( const char * old, const char * new )
  15 {
  16     /* TODO: Search open file list, flush and close file */
  17     return _PDCLIB_rename( old, new );
  18 }
  19
  20 #endif
  21
  22 #ifdef TEST
  23 #include <_PDCLIB_test.h>
  24
  25 #include <stdlib.h>
  26
  27 int main( void )
  28 {
  29     /* TODO: Extend to internal testing (buffer etc.) */
  30     char filename1[] = "touch testfile1";
  31     char filename2[] = "testfile2";
  32     remove( filename1 + 6 );
  33     remove( filename2 );
  34     /* make sure that neither file exists */
  35     TESTCASE( fopen( filename1 + 6, "r" ) == NULL );
  36     TESTCASE( fopen( filename2, "r" ) == NULL );
  37     /* rename file 1 to file 2 - expected to fail */
  38     TESTCASE( rename( filename1 + 6, filename2 ) == -1 );
  39     /* create file 1 */
  40     system( filename1 );
  41     /* check that file 1 exists */
  42     TESTCASE( fopen( filename1 + 6, "r" ) != NULL );
  43     /* rename file 1 to file 2 */
  44     TESTCASE( rename( filename1 + 6, filename2 ) == 0 );
  45     /* check that file 2 exists, file 1 does not */
  46     TESTCASE( fopen( filename1 + 6, "r" ) == NULL );
  47     TESTCASE( fopen( filename2, "r" ) != NULL );
  48     /* create another file 1 */
  49     system( filename1 );
  50     /* check that file 1 exists */
  51     TESTCASE( fopen( filename1 + 6, "r" ) != NULL );
  52     /* rename file 1 to file 2 - expected to fail, see comment in
  53        _PDCLIB_rename() itself.
  54     */
  55 #ifndef REGTEST
  56     TESTCASE( rename( filename1 + 6, filename2 ) == -1 );
  57 #else
  58     /* glibc rename() overwrites existing destination file. */
  59     TESTCASE( rename( filename1 + 6, filename2 ) == 0 );
  60 #endif
  61     /* remove both files */
  62     remove( filename1 + 6 );
  63     remove( filename2 );
  64     /* check that they're gone */
  65     TESTCASE( fopen( filename1 + 6, "r" ) == NULL );
  66     TESTCASE( fopen( filename2, "r" ) == NULL );
  67     return TEST_RESULTS;
  68 }
  69
  70 #endif
  71