Changeset 40327 for trunk/ippScripts/scripts/rawcheck_mddb.pl
- Timestamp:
- Jan 30, 2018, 6:36:47 PM (8 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/rawcheck_mddb.pl (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/rawcheck_mddb.pl
r40314 r40327 176 176 177 177 $volume_fill_factors{$name} = $used / $total; 178 179 # This should prioritize hosts that we wish to deprecate. 180 if ($total < 52885172852) { 181 $volume_fill_factors{$name} = 1.0; 182 } 178 183 } 179 184 … … 228 233 unless(defined($key)) { die "No database uri: $exp_id"; } 229 234 unless(defined($data_state)) { $data_state = 'no_data_state'; } 235 if ($data_state eq 'corrupt') { next; } # This has already been marked as bad, so we can move on. 230 236 unless(defined($md5sum)) { die "No database md5sum: $exp_id"; } 231 237 unless(defined($hostname)) { $hostname = 'ipp004'; } … … 545 551 @cull_order = sort { $sorting_hash{$b} <=> $sorting_hash{$a} } @cull_order; 546 552 553 my $tmp = join ' ', @cull_order; 554 print "$exp_id $site $tmp\n"; 547 555 for ($i = 0; $i < ($instance_count{$site} - $requirement_map{$site}); $i++) { 548 556 my $f = $cull_order[$i];
Note:
See TracChangeset
for help on using the changeset viewer.
