Changeset 38564

Timestamp:

Jul 2, 2015, 9:41:58 AM (11 years ago)

Author:

bills

Message:

add hack to deal with files processed remotely and thus have incorrect
paths in the config dump files

File:

• trunk/ippScripts/scripts/dist_bundle.pl (modified) (1 diff)

trunk/ippScripts/scripts/dist_bundle.pl

@@ -201 +201 @@
 
     my $file_name = $file->{name};
+
+    # look for file names that were processed remotely (LANL or UH Cray for example)
+    # and change them to nebulous names
+    if ( !($file_name =~ '^neb:') ) {
+        # XXX: These two definitions should probably live in a config file
+        my @remote_paths_to_replace =  ('/lus/scratch/watersc', '/scratch3/watersc1');
+        my $local_path = 'neb://any';
+        # find filenames that begin with the remote paths and change them to a nebulous path
+        foreach my $remote_path (@remote_paths_to_replace) {
+            if ($file_name =~ "^$remote_path") {
+                $file_name =~ s{^$remote_path}{$local_path};
+                last;
+            }
+        }
+    }
     my $path = $ipprc->file_resolve($file_name);