Changeset 27632 for trunk/tools/errors.pl
- Timestamp:
- Apr 7, 2010, 11:07:45 AM (16 years ago)
- File:
-
- 1 edited
-
trunk/tools/errors.pl (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/errors.pl
r27574 r27632 46 46 47 47 my $sql; # Query to run 48 my $table; # Table with fault 48 my $fault_table; # Table with fault 49 my $label_table; # Table with label 49 50 if ($stage eq "diff") { 50 51 $sql = "SELECT diff_id, skycell_id, hostname, path_base FROM diffRun JOIN diffSkyfile USING(diff_id) WHERE fault != 0"; 51 $table = "diffSkyfile"; 52 $label_table = "diffRun"; 53 $fault_table = "diffSkyfile"; 52 54 } elsif ($stage eq "stack") { 53 55 $sql = "SELECT stack_id, 'stack', hostname, path_base FROM stackRun JOIN stackSumSkyfile USING(stack_id) WHERE fault != 0"; 54 $table = "stackSumSkyfile"; 56 $label_table = "stackRun"; 57 $fault_table = "stackSumSkyfile"; 55 58 } elsif ($stage eq "warp") { 56 59 $sql = "SELECT warp_id, skycell_id, hostname, path_base FROM warpRun JOIN warpSkyfile USING(warp_id) WHERE fault != 0"; 57 $table = "warpSkyfile"; 60 $label_table = "warpRun"; 61 $fault_table = "warpSkyfile"; 58 62 } elsif ($stage eq "magic") { 59 63 $sql = "SELECT magic_id, node, 'unknown' AS hostname, CONCAT(workdir, '/', exp_id, '/', exp_id, '.mgc.', magic_id, '.', node) FROM magicRun JOIN magicNodeResult USING(magic_id) WHERE magicNodeResult.fault != 0"; 60 $table = "magicNodeResult"; 64 $label_table = "magicRun"; 65 $fault_table = "magicNodeResult"; 61 66 } elsif ($stage eq "chip") { 62 67 $sql = "SELECT chip_id, class_id, hostname, CONCAT(path_base, '.', class_id) FROM chipRun JOIN chipProcessedImfile USING(chip_id) WHERE fault != 0"; 63 $table = "chipProcessedImfile"; 68 $label_table = "chipRun"; 69 $fault_table = "chipProcessedImfile"; 64 70 } elsif ($stage eq "camera") { 65 71 $sql = "SELECT cam_id, 'cam', hostname, path_base FROM camRun JOIN camProcessedExp USING(cam_id) WHERE fault != 0"; 66 $table = "camProcessedExp"; 72 $label_table = "camRun"; 73 $fault_table = "camProcessedExp"; 74 } elsif ($stage eq "destreak") { 75 $sql = "SELECT magic_ds_id, component, 'unknown', CONCAT_WS('.', CONCAT(outroot, '/', exp_id), 'mds', magic_ds_id, stage_id, component) FROM magicDSRun JOIN magicDSFile USING(magic_ds_id) JOIN magicRun USING(magic_id) WHERE magicDSFile.fault != 0"; 76 $label_table = "magicDSRun"; 77 $fault_table = "magicDSFile"; 67 78 } else { 68 79 die "Unsupported stage: $stage\n"; … … 70 81 71 82 my $where = ""; # WHERE restriction 72 $where .= " AND ( label LIKE '" . join("' ORlabel LIKE '", @$label) . "')" if defined $label;73 $where .= " AND $ table.fault = $fault" if defined $fault;83 $where .= " AND ($label_table.label LIKE '" . join("' OR $label_table.label LIKE '", @$label) . "')" if defined $label; 84 $where .= " AND $fault_table.fault = $fault" if defined $fault; 74 85 75 86 $sql .= $where if length $where > 0;
Note:
See TracChangeset
for help on using the changeset viewer.
