libiberty/rename.c

   1 /* rename -- rename a file
   2    This function is in the public domain. */
   3
   4 /*
   5
   6 @deftypefn Supplemental int rename (const char *@var{old}, const char *@var{new})
   7
   8 Renames a file from @var{old} to @var{new}.  If @var{new} already
   9 exists, it is removed.
  10
  11 @end deftypefn
  12
  13 */
  14
  15 #include "ansidecl.h"
  16 #ifdef HAVE_CONFIG_H
  17 #include "config.h"
  18 #endif
  19 #include <errno.h>
  20 #ifdef HAVE_UNISTD_H
  21 #include <unistd.h>
  22 #endif
  23
  24 int
  25 rename (zfrom, zto)
  26      const char *zfrom;
  27      const char *zto;
  28 {
  29   if (link (zfrom, zto) < 0)
  30     {
  31       if (errno != EEXIST)
  32         return -1;
  33       if (unlink (zto) < 0
  34           || link (zfrom, zto) < 0)
  35         return -1;
  36     }
  37   return unlink (zfrom);
  38 }