Changeset 38165

Timestamp:

Apr 22, 2015, 3:06:35 PM (11 years ago)

Author:

watersc1

Message:

Copy of edits from the trunk that should allow diffs to fail correctly. Not merging to prevent the larger re-design of config information from complicating the active lanl processing.

File:

• tags/ipp-pv3-20140717/ippScripts/scripts/sc_remote_poll.pl (modified) (2 diffs)

tags/ipp-pv3-20140717/ippScripts/scripts/sc_remote_poll.pl

@@ -510 +510 @@
         ($class_id, $stage_id) = $file =~ /(skycell.\d\d\d\d.\d\d\d).stk.(\d*).dbinfo/;
     }
+    elsif ($stage eq 'staticsky') {
+        ($class_id, $stage_id) = $file =~ /(skycell.\d\d\d\d.\d\d\d).sky.(\d*).dbinfo/;
+    }
+    elsif ($stage eq 'diff') {
+        ($class_id,$stage_id) = $file =~ /(skycell.\d\d\d\d.\d\d\d).WS.dif.(\d*).dbinfo/;
+    }
+    elsif ($stage eq 'ff') {
+        ($class_id,$stage_id) = $file =~ /wrp\.(\d*).ff.(\d*).dbinfo/;
+    }
 
     return ($stage_id, $class_id);
@@ -540 +549 @@
         $class_id = 0;
     }
+    elsif ($stage eq 'staticsky') {
+        ($class_id, $stage_id) = $file =~ /(skycell.\d\d\d\d.\d\d\d).sky.(\d*).dbinfo/;
+    }
+    elsif ($stage eq 'diff') {
+        ($class_id,$stage_id) = $file =~ /(skycell.\d\d\d\d.\d\d\d).WS.dif.(\d*).dbinfo/;
+    }
+    elsif ($stage eq 'ff') {
+        ($class_id,$stage_id) = $file =~ /wrp\.(\d*).ff.(\d*).dbinfo/;
+    }
+
     return($stage_id,$class_id,$component);
 }