\n"; #file[0]=Unix timestamp; file[1]=filename
}
}
}
$m = count($files);
$monthN = array("01","02","03","04","05","06","07","08","09","10","11","12");
$monthS = array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec");
$old = './old';
$olddh = opendir($old);
while (false !== ($oldnames = readdir($olddh))) {
$olddirs[] = $oldnames;
}
$nod = count($olddirs);
for($num=0; $num<$m; $num++) {
$prev='';
for($od=0; $od<$nod; $od++) {
if ($files[$num]==$olddirs[$od] ) {
$prev = " previous test ";
}
}
$take = 0;
if ( $modSel ) {
if ( $files[$num]{0}==$myMod{0} && $files[$num]{1}==$myMod{1} && $files[$num]{2}==$myMod{2} &&
$files[$num]{3}==$myMod{3} && $files[$num]{4}==$myMod{4} ) { $take = 1; }
}
else if ( !strcmp($serie, "all") || !strcmp($serie, "recent") ) {
if ( $files[$num]{0}=="M" ) { $take = 1; }
}
else {
if ($files[$num]{0}=="M" &&
$files[$num]{1}==substr($serie, 0, 1) &&
$files[$num]{2}==substr($serie, 1, 2) ) { $take = 1; }
}
if ( !strcmp($serie, "recent") && $num>23 ) { exit; }
if ( !strcmp($serie, "all") && $num>1000 ) { exit; }
if ( $take ) {
$subs = array();
$sh = opendir($files[$num]);
while (false !== ($subname = readdir($sh))) {
$subs[] = $subname;
}
closedir($sh);
rsort($subs);
$s = count($subs);
for($mum=0; $mum<$s; $mum++) {
if($subs[$mum]{0}=="T" && $subs[$mum]{5} == "" ) {
$moduleTemp = '';
$module = '';
$app = '';
$testNrTemp = '';
$testNr = '';
$pi=0; $ma=0; $bu=0; $tr=0; $ad=0;
$rocs=0; $root=0;
$date=''; $datr=''; $daca='';
$c=''; $t=''; $n=''; $pr='';
$temp=0; $sollTemp=0;$cycl=''; $cy='';
$i=0; $ivVar=0; $ivDP=0; $slope=0;
$tbm1=1; $tbm2=1;
$iv150 = ''; $iv150_2 = '';
$grade = '';
$mount = '';
$finalGrade = '';
$fullGrade = '';
$shortGrade = '';
$reGrade = '';
$com=$prev.' ';
$mis=' ';
$tempWarning=' ';
$noiB=0; $noiC=0; $trmB=0; $trmC=0;
$gainB=0; $gainC=0; $pedB=0; $pedC=0;
$highCur = 0;
$perfDef = 0;
$regraded = 0;
$path = $files[$num]."/".$subs[$mum];
#echo "$path\n";
$ft = date("d.m.y",fileatime($path."/summaryTest.txt"));
$handle = fopen($path."/summaryTest.txt", "r");
$li = 0;
while ($userinfo = fscanf($handle, "%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t%s\n")) {
$li = $li +1;
// if($li==1) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"Directory") ) {
$moduleTemp = 'M'.$userinfo[1]{1+11}.$userinfo[1]{2+11}.$userinfo[1]{3+11}.$userinfo[1]{4+11};
$moduleNr = $userinfo[1]{2+11}.$userinfo[1]{3+11}.$userinfo[1]{4+11};
$day = $userinfo[1]{10+11}.$userinfo[1]{11+11};
$month = $userinfo[1]{8+11}.$userinfo[1]{9+11};
$year = $userinfo[1]{6+11}.$userinfo[1]{7+11};
for ( $i=0; $i<12;$i++ ) {
if (!strcmp($month, $monthN[$i]) ) {
$date = $monthS[$i].' '.$day.' 20'.$year;
}
}
}
// if($li==2) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"ModuleNr") ) {
$testNrTemp = $userinfo[3];
$testDir = $userinfo[2].'/'. $userinfo[3];
$link = $userinfo[2].$userinfo[3];
if (!strcmp($testNrTemp, "T+17a") ) {
$module = ' '.$moduleTemp.' ';
$testNr = ' '.$testNrTemp.' ';
}
else if (!strcmp($testNrTemp, "T-10a") ) {
$module = ' '.$moduleTemp.' ';
$testNr = ' '.$testNrTemp.' ';
$testNrTemp = "T-10b"; # for the link
}
else {
$module = $moduleTemp;
$testNr = $testNrTemp;
}
}
$alvl = "";
if (file_exists($path."/alvl_$link.gif")) {
$alvl = "fits";
}
//if($li==3) { //------------------------------------------------------------------
if( !strcmp($userinfo[0],"Defects") ) {
$pi=$userinfo[1];
$ma=$userinfo[2];
if ( $ma > 0 ) {
$ma=''.$ma.'';
}
$bu=$userinfo[3];
$tr=$userinfo[4];
$ad=$userinfo[5];
}
//if($li==3) { //------------------------------------------------------------------
if( !strcmp($userinfo[0],"PerfDefects") ) {
$no=$userinfo[1];
$th=$userinfo[2];
$ga=$userinfo[3];
$pe=$userinfo[4];
$pa=$userinfo[5];
$perfDef=1;
}
// if($li==4) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"ROCS") ) {
$rocs = $userinfo[5];
$defB = $userinfo[6];
$defC = $userinfo[7];
if ( $defC > 0 ) {
$rocs = $rocs.' ('.$defC.'C)';
}
}
// // if($li==6) { ------------------------------------------------------------------
// if( !strcmp($userinfo[0],"Tested") && $moduleNr < 50 ) {
// $date=$userinfo[4].' '.$userinfo[5];
// }
// if($li==7) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"Trimming") ) {
$t=$userinfo[1];
}
// if($li==8) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"phCalibration") ) {
$pr=$userinfo[1];
$c=$userinfo[1];
}
// if($li==9){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"Temp") ) {
if ( $userinfo[2] != -100 ) {
$temp=sprintf("%01.2f+-%01.2f", $userinfo[1],$userinfo[2]);
$sollTemp=$userinfo[4];
}
else {
$temp=$userinfo[4];
$sollTemp=$userinfo[4];
}
if ( abs($temp - $sollTemp) > 1 ) {
$temp = ''.$temp.'';
$tempWarning='T not '.$sollTemp.'!';
}
}
// if($li==10){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"Thermal") ) {
if (!strcmp($userinfo[2],"yes")) {
$cy= $userinfo[2];
if( $userinfo[4] != -100 ) {
$cycl=sprintf("(%01.1f+-%01.1f)", $userinfo[3], $userinfo[4]);
}
}
else {
$cy = $userinfo[2];
}
}
// if($li==17) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"TBM1") ) {
$tbm1=$userinfo[1];
if ( $tbm1 != 0 ) {
$com=' '.$com.' TBM1: Err '.$tbm1.'.';
}
}
// if($li==18) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"TBM2") ) {
$tbm2=$userinfo[1];
if ( $tbm2 != 0 ) {
$com=' '.$com.' TBM2: Err '.$tbm2.'.';
}
}
// if($li==18) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"LogErrors") ) {
$err=$userinfo[1];
if ( $err == 0 ) {
$err='-';
} else if ( $err > 0 ) {
$err=''.$err.'';
} else {
$err='???';
}
}
if( !strcmp($userinfo[0],"I") ) {
$i=$userinfo[2];
if($i==0 || $i=='') { $iv150=''; }
else {
$iv150=sprintf("%01.2f uA",$i);
if ( $sollTemp < 0 ) {
$i10 = sprintf("%01.2f uA", $i/12.10188635);
$iv150_2 = '('.$i10.')';
if ( $i > 15 ) {
$iv150 = ''.$iv150.'';
$iv150_2 = ''.$iv150_2.'';
}
else if ( $i > 3 ) {
$iv150 = ''.$iv150.'';
$iv150_2 = ''.$iv150_2.'';
}
}
if ( $sollTemp > 0 ) {
$iv150_2 = '';
if ( $i > 10 ) {
$iv150 = ''.$iv150.'';
}
else if ( $i > 2 ) {
$iv150 = ''.$iv150.'';
}
}
}
}
// if($li==19) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"SwitchOn") ) {
$i=$userinfo[1];
if($i==0 || $i=='') { $switchOn ='-'; }
else {
$switchOn=sprintf("%01.2f uA",$i);
}
}
// if($li==19) { ------------------------------------------------------------------
if( !strcmp($userinfo[0],"Current") ) {
$i=$userinfo[1];
if($i==0 || $i=='') { $current='-'; }
else {
$current=sprintf("%01.2f uA",$i);
if ( $sollTemp < 0 ) {
$i17 = sprintf("%01.2f uA", $i*12.10188635);
$current_2 = $i17;
$current = '('.$current.')';
if ( $i17 > 15 ) {
$highCur = 1;
$current = ''.$current.'';
$current_2 = ''.$current_2.'';
}
else if ( $i > 3 ) {
$current = ''.$current.'';
$current_2 = ''.$current_2.'';
}
}
if ( $sollTemp > 0 ) {
$current_2 = '';
if ( $i > 10 ) {
$highCur = 1;
$current = ''.$current.'';
}
else if ( $i > 2 ) {
$current = ''.$current.'';
}
}
}
}
// if($li==19) { ------------------------------------------------------------------
// if( !strcmp($userinfo[0],"Current") ) {
// $i=$userinfo[1];
// if($i==0 || $i=='') { $iv150=''; }
// else {
// $iv150=sprintf("%01.2f muA",$i);
// if ( $sollTemp < 0 ) {
// if ( $i*12.1018863 < 10. ) {
// $iv150 = sprintf("%01.2f muA", $i*12.10188635);
// } else if ( $i*12.1018863 < 100. ) {
// $iv150 = sprintf("%01.2f muA", $i*12.10188635);
// } else {
// $iv150 = '> 100 muA';
// }
// if ( $i < 10. ) {
// $iv150_2=sprintf("(%01.2f muA)",$i);
// } else if ( $i < 99. ) {
// $iv150_2=sprintf("(%01.1f muA)",$i);
// } else if ( $i < 100. ) {
// $iv150_2=sprintf("(%01.0f muA)",$i);
// } else {
// $iv150_2 = '> 100 muA';
// }
// $i = $i*12.1018863;
// if ( $i > 15 ) {
// $iv150 = ''.$iv150.'';
// }
// else if ( $i > 3 ) {
// $iv150 = ''.$iv150.'';
// }
// }
// if ( $sollTemp > 0 ) {
// $iv150_2 = '';
// if ( $i > 10 ) {
// $iv150 = ''.$iv150.'';
// }
// else if ( $i > 2 ) {
// $iv150 = ''.$iv150.'';
// }
// }
// }
// }
// if($li==20){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"I150/I100") ) {
$ivVar=$userinfo[1];
if ( $ivVar > 0 ) {
$slope=sprintf("%01.2f",$ivVar);
}
else {
$slope = '';
}
if ( $ivVar > 2 ) {
$slope=' '.$slope.' '; }
}
// if($li==21){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"iv") ) {
$ivDP=$userinfo[2];
if ( $ivDP < 1 && $ivDP != 0 ) {$com=$com.' incompl. iv-data: '.$iDP.' meas.';}
}
// if($li==22){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"Grade") ) {
$grade=$userinfo[1];
}
// if($li==22){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"position") ) {
$mount=$userinfo[1];
}
// if($li==28){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"MeanParameter1") ) {
$parB=$userinfo[1];
$parC=$userinfo[2];
if ( $parB == 0 && $parC == 0 ) {
$pr = 'ok';
}
else if ( $parB > 0 && $parC == 0 ) {
$pr = ''.$parB.'B';
}
else if ( $parB > 0 && $parC > 0) {
$pr = ''.$parB.'B/'.$parC.'C';
}
else if ( $parC > 0 && $parB == 0 ) {
$pr = ''.$parC.'C';
}
else {
$pr = '-';
}
}
// if($li==28){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"Noise") ) {
$noiB=$userinfo[1];
$noiC=$userinfo[2];
if ( $noiB == 0 && $noiC == 0 ) {
$n = 'ok';
}
else if ( $noiB > 0 && $noiC == 0 ) {
$n = ''.$noiB.'B';
}
else if ( $noiB > 0 && $noiC > 0) {
$n = ''.$noiB.'B/'.$noiC.'C';
}
else if ( $noiC > 0 && $noiB == 0 ) {
$n = ''.$noiC.'C';
}
else {
$n = '-';
}
}
// if($li==29){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"VcalThrWidth") ) {
$trmB=$userinfo[1];
$trmC=$userinfo[2];
if ( $trmB == 0 && $trmC == 0 ) {
if ( strcmp($t, "no") ) {
$t = 'ok';
}
}
else if ( $trmB > 0 && $trmC == 0 ) {
$t = ''.$trmB.'B';
}
else if ( $trmB > 0 && $trmC > 0 ) {
$t = ''.$trmB.'B/'.$trmC.'C';
}
else if ( $trmC > 0 && $trmB == 0 ) {
$t = ''.$trmC.'C';
}
else {
$t = '-';
}
}
// if($li==30){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"RelGainWidth") ) {
$gainB=$userinfo[1];
$gainC=$userinfo[2];
if ( $gainB == 0 && $gainC == 0 ) {
if ( !strcmp($c, "yes") ) {
$c = '';
}
}
else if ( $gainB > 0 && $gainC == 0 ) {
$c = ''.$gainB.'B Gain';
}
else if ( $gainB > 0 && $gainC > 0 ) {
$c = ''.$gainB.'B/'.$gainC.'C Gain';
}
else if ( $gainC > 0 && $gainB == 0 ) {
$c = ''.$gainC.'C Gain';
}
else {
$c = '-';
}
}
// if($li==31){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"PedSpread") ) {
$pedB=$userinfo[1];
$pedC=$userinfo[2];
if ( $gainB == 0 && $gainC == 0 &&
$pedB == 0 && $pedC == 0 ) {
if ( strcmp($c, "no") ) {
$c = 'ok';
}
}
else if ( $pedB > 0 && $pedC == 0 ) {
$c = $c.' '.''.$pedB.'B Ped';
}
else if ( $pedB > 0 && $pedC > 0 ) {
$c = $c.' '.''.$pedB.'B/'.$pedC.'C Ped';
}
else if ( $pedC > 0 && $pedB == 0 ) {
$c = $c.' '.$pedC.'C Ped';
}
}
// if($li==34){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"RATIO") ) {
if ( $userinfo[1] > 5 ) {
$com=$com.'I_recalc > 5 x I_meas';
}
}
// if($li==35){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"Grade") ) {
if (!strcmp($userinfo[1], "A") ) { $grade = ' a '; }
if (!strcmp($userinfo[1], "B") ) { $grade = ' b '; }
if (!strcmp($userinfo[1], "C") ) { $grade = ' c '; }
}
// if($li==35){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"shortTest") ) {
if (!strcmp($userinfo[2], "A") ) { $shortGrade = ' a '; }
if (!strcmp($userinfo[2], "B") ) { $shortGrade = ' b '; }
if (!strcmp($userinfo[2], "C") ) { $shortGrade = ' c '; }
}
// if($li==35){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"fullTest") ) {
$fullGrade = $userinfo[2];
if (!strcmp($userinfo[2], "A") ) { $fullGrade = ' '.$userinfo[2].' '; }
if (!strcmp($userinfo[2], "B") ) { $fullGrade = ' '.$userinfo[2].' '; }
if (!strcmp($userinfo[2], "C") ) { $fullGrade = ' '.$userinfo[2].' '; }
}
// if($li==35){ ------------------------------------------------------------------
if( !strcmp($userinfo[0],"FINAL") ) {
if (!strcmp($userinfo[2], "A") ) { $finalGrade = ' '.$userinfo[2].' '; }
if (!strcmp($userinfo[2], "B") ) { $finalGrade = ' '.$userinfo[2].' '; }
if (!strcmp($userinfo[2], "C") ) { $finalGrade = ' '.$userinfo[2].' '; }
}
// if($li==36){ ------------------------------------------------------------------
if (!strcmp($module, "") ) { $module = $moduleTemp; }
// commments:
// if($li==15 || $li==16 || $li==17 ||$li==18 || $li==37 ) {
if (!strcmp($userinfo[2],"Vcal") ||
!strcmp($userinfo[2],"SCurve") ||
!strcmp($userinfo[2],"Par1") ||
!strcmp($userinfo[2],"Gain") ||
!strcmp($userinfo[2],"Ped") ) {
$com=$com.' ';
$ar = count($userinfo);
if($ar>1) {
for($en=0; $en<$ar+10; $en++) {
$com=$com.' '.$userinfo[$en];
}
}
}
if( !strcmp($userinfo[0],"Regrading:") ) {
$regraded=1;
$ar = count($userinfo);
$reGrade=$reGrade.'*';
for($en=1; $en<$ar+10; $en++) {
$reGrade=$reGrade.' '.$userinfo[$en];
}
$reGrade=$reGrade.'';
}
if( !strcmp($userinfo[0],"Missing:") ) {
$tmp_mis = ''; $files_mis=0;
$mis=$mis.' MISSING: ';
$ar = count($userinfo);
for($en=1; $en<$ar+10; $en++) {
if ( $files_mis == 1 ) { $mis= $mis.''.$tmp_mis; $files_mis = 0; }
if( !strcmp($userinfo[$en],"Files:") ) {
$tmp_mis = " FILES:";
$files_mis = 1;
continue;
}
$mis=$mis.' '.$userinfo[$en];
}
$mis=$mis.'';
}
if( !strcmp($userinfo[0],"Comment:") ) {
$com=$com.' ';
$ar = count($userinfo);
for($en=1; $en<$ar+10; $en++) {
$com=$com.' '.$userinfo[$en];
}
}
if( !strcmp($userinfo[0],"Half-Module") ) {
$app='H-';
}
}
fclose($handle);
if ( $highCur ){
// $com = $com.' switch-on: '.$switchOn.' ';
}
$pdef = '';
if ( $perfDef ) {
$pdef = '
'.$no.'/'.$th.'/'.$ga.'/'.$pe.'/'.$pa.'';
}
if ( $regraded ) {
$com = $reGrade.'
'.$com;
$finalGrade = $finalGrade.'*';
}
echo "