Changeset 28800

Timestamp:

Jul 30, 2010, 10:13:46 AM (16 years ago)

Author:

bills

Message:

if destination file already exists, delete it. This happens if previous attempts at
registration failed due to file system problems.

File:

• trunk/DataStoreServer/scripts/dsreg (modified) (1 diff)

trunk/DataStoreServer/scripts/dsreg

@@ -332 +332 @@
 
                     if ( !-e $src or !-r $src) {
-                        print STDERR "file $src does not exist or is not accessible\n";
+                        print STDERR "source file $src does not exist or is not accessible\n";
                         exit $PS_EXIT_SYS_ERROR;
                     }
+                    if ( -e $dest ) {
+                        print STDERR "destination $dest already exists removing\n";
+                        if (! unlink $dest ) {
+                            print STDERR "failed trying to unlink $dest\n";
+                            exit $PS_EXIT_SYS_ERROR;
+                        }
+                    }
+
                     if ($linkfiles) {
                         if (! symlink $src, $dest) {