Line Code
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107
#!/bin/tcsh

set file = `ls $1`
set OutputDir = "/cms/mon/data/dqm/lumi"
set OutPrefix = "HLXDQM"
set psDir = "$OutputDir/ps"

set Run = $2
set LS = $3
set suffix = _${Run}_${LS}

mkdir -p $OutputDir
mkdir -p $psDir

rm -f /tmp/TempScript.C

if ( `echo $file` == '' ) then
    echo "$1 does not exist"
else

cat >> /tmp/TempScript.C <<EOF
{    
    gROOT->SetStyle("Plain");

    TFile myfile("$1","Read");

    TCanvas HLXC("HLXC");
    HLXC->Divide(3,3);

    if(myfile.cd("DQMData")){
	if(myfile.cd("DQMData/HFPlus")){
EOF

foreach n (`seq 1 18`)

set prefix = 'HF_Plus_Wedge"$n"_'

cat >> /tmp/TempScript.C <<EOF

    if(myfile.cd("DQMData/HFPlus/Wedge$n")){
	HLXC.cd(1);
	`echo $prefix`ETSum->Draw();
	HLXC.cd(4);
	`echo $prefix`Set1_Above->Draw();
	HLXC.cd(5);
	`echo $prefix`Set1_Between->Draw();
	HLXC.cd(6);
	`echo $prefix`Set1_Below->Draw();
	HLXC.cd(7);
	`echo $prefix`Set1_Above->Draw();
	HLXC.cd(8);
	`echo $prefix`Set1_Between->Draw();
	HLXC.cd(9);
	`echo $prefix`Set1_Below->Draw();
	HLXC.Print("$psDir/HFPlusWedge$n.ps");
    }
EOF

end

cat >> /tmp/TempScript.C <<EOF
 }
 if(myfile.cd("DQMData/HFMinus")){
EOF

foreach n (`seq 19 36`)

set prefix = 'HF_Minus_Wedge"$n"_'

cat >> /tmp/TempScript.C <<EOF

    if(myfile.cd("DQMData/HFMinus/Wedge$n")){
	HLXC.cd(1);
	`echo $prefix`ETSum->Draw();
	HLXC.cd(4);
	`echo $prefix`Set1_Above->Draw();
	HLXC.cd(5);
	`echo $prefix`Set1_Between->Draw();
	HLXC.cd(6);
	`echo $prefix`Set1_Below->Draw();
	HLXC.cd(7);
	`echo $prefix`Set1_Above->Draw();
	HLXC.cd(8);
	`echo $prefix`Set1_Between->Draw();
	HLXC.cd(9);
	`echo $prefix`Set1_Below->Draw();
	HLXC.Print("$psDir/HFPlusWedge$n.ps");
    }

EOF

end

cat >> /tmp/TempScript.C <<EOF
	}
    } 
}
EOF

root -b -q .x /tmp/TempScript.C

#rm /tmp/TempScript.C

gs -sDEVICE=pswrite -sOutputFile=$OutputDir/$OutPrefix$suffix.ps -dNOPAUSE -dBATCH $psDir/*.ps

endif