#!/usr/bin/perl

my $RULESET = "/home/measure/Data/LabelRules/Rulesets/measure.rul";

my @Data = (
   "ProcessedSolarWindGSE/IMP8/mag",
   "ProcessedSolarWindGSE/IMP8/plasma",
   "ProcessedSolarWindGSE/ISEE3/mag",
   "ProcessedSolarWindGSE/ISEE3/plasma",
   "ProcessedSolarWindGSE/ACE/mag",
   "ProcessedSolarWindGSE/ACE/plasma",
   "ProcessedSolarWindGSE/Wind/mag",
   "ProcessedSolarWindGSE/Wind/plasma",
   "ProcessedSolarWindGSE/Interball/mag",
   "ProcessedSolarWindGSE/Interball/plasma",
   "ProcessedSolarWindGSE/Geotail/mag",
   "ProcessedSolarWindGSE/Geotail/plasma",
   "ProcessedSolarWindGSE/Geotail/cpi",
   "ProcessedSolarWindGSE/ISEE1/mag",
   "ProcessedSolarWindGSE/ISEE1/plasma",
   "ProcessedSolarWindGSE/ISEE2/mag",
   "ProcessedSolarWindGSE/ISEE2/plasma",
   "ProcessedSolarWindGSM/IMP8/mag",
   "ProcessedSolarWindGSM/IMP8/plasma",
   "ProcessedSolarWindGSM/ISEE3/mag",
   "ProcessedSolarWindGSM/ISEE3/plasma",
   "ProcessedSolarWindGSM/ACE/mag",
   "ProcessedSolarWindGSM/ACE/plasma",
   "ProcessedSolarWindGSM/Wind/mag",
   "ProcessedSolarWindGSM/Wind/plasma",
   "ProcessedSolarWindGSM/Geotail/mag",
   "ProcessedSolarWindGSM/Geotail/plasma",
   "ProcessedSolarWindGSM/Geotail/cpi",
   "ProcessedSolarWindGSM/ISEE1/mag",
   "ProcessedSolarWindGSM/ISEE1/plasma",
   "ProcessedSolarWindGSM/ISEE2/mag",
   "ProcessedSolarWindGSM/ISEE2/plasma",
   "ProcessedSolarWindGSM/SOHO/plasma",
   "PropagatedSolarWindGSE/weimer/IMP8/TAP",
   "PropagatedSolarWindGSE/weimer/IMP8/mag",
   "PropagatedSolarWindGSE/weimer/IMP8/plasma",
   "PropagatedSolarWindGSE/weimer/ISEE3/TAP",
   "PropagatedSolarWindGSE/weimer/ISEE3/mag",
   "PropagatedSolarWindGSE/weimer/ISEE3/plasma",
   "PropagatedSolarWindGSE/weimer/ACE/TAP",
   "PropagatedSolarWindGSE/weimer/ACE/mag",
   "PropagatedSolarWindGSE/weimer/ACE/plasma",
   "PropagatedSolarWindGSE/weimer/Wind/TAP",
   "PropagatedSolarWindGSE/weimer/Wind/mag",
   "PropagatedSolarWindGSE/weimer/Wind/plasma",
   "PropagatedSolarWindGSE/weimer/Geotail/lep_lep",
   "PropagatedSolarWindGSE/weimer/Geotail/TAP_lep",
   "PropagatedSolarWindGSE/weimer/Geotail/mag_cpi",
   "PropagatedSolarWindGSE/weimer/Geotail/TAP_cpi",
   "PropagatedSolarWindGSE/weimer/Geotail/mag_lep",
   "PropagatedSolarWindGSE/weimer/Geotail/cpi_cpi",
   "PropagatedSolarWindGSE/weimer/ISEE1/TAP",
   "PropagatedSolarWindGSE/weimer/ISEE1/mag",
   "PropagatedSolarWindGSE/weimer/ISEE1/plasma",
   "PropagatedSolarWindGSM/weimer/IMP8/mag",
   "PropagatedSolarWindGSM/weimer/IMP8/plasma",
   "PropagatedSolarWindGSM/weimer/ISEE3/mag",
   "PropagatedSolarWindGSM/weimer/ISEE3/plasma",
   "PropagatedSolarWindGSM/weimer/ACE/mag",
   "PropagatedSolarWindGSM/weimer/ACE/plasma",
   "PropagatedSolarWindGSM/weimer/Wind/mag",
   "PropagatedSolarWindGSM/weimer/Wind/plasma",
   "PropagatedSolarWindGSM/weimer/Geotail/lep_lep",
   "PropagatedSolarWindGSM/weimer/Geotail/mag_cpi",
   "PropagatedSolarWindGSM/weimer/Geotail/mag_lep",
   "PropagatedSolarWindGSM/weimer/Geotail/cpi_cpi",
   "PropagatedSolarWindGSM/weimer/ISEE1/mag",
   "PropagatedSolarWindGSM/weimer/ISEE1/plasma"
);

foreach my $Data (@Data) {
  opendir (DATADIR, "$Data");
  my @Years = sort (grep /\d{4}/, readdir DATADIR);
  closedir (DATADIR);

  foreach my $Year (@Years) {
    print "java ruleset.Labeler $RULESET $Data/$Year\n";
    system("java ruleset.Labeler $RULESET $Data/$Year");
  }
}