|
Legend
| links in black | = file can be viewed now |
| links in white | = file has not be found by Fido historians |
| links in yellow | = file scheduled to be added to collection |
| links in red | = exceptions, addtl. info available |
| Background dark | = pre makenl distributions |
| Background light | = regular makenl distribution since #219/1987 |
|
|
$year ";
// $label = "";
$label = "";
$day=date("z",$datum)+1; // ???
$week=1;
$sikday = $day;
$listtype = "Node";
$ptype = "";
$tmpp[2] = "";
$tmpp[3] = "";
$counts = 0;
$workdir[0][0] = "";
$workdir[1][0] = "";
$workdir[2][0] = "";
$workdir[3][0] = "";
$workdir[4][0] = "";
$workdir[0][1] = "";
$workdir[1][1] = "";
$workdir[2][1] = "";
$workdir[3][1] = "";
$workdir[4][1] = "";
// if dir doesnt exist, include list dir
if ($code_criterion==3) {
// fidonews
$tmpp[0]=sprintf("fidonews/%04d",$year);
$tmpp[1]="";
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // fidonews dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "Fidonews";
$workdir[$counts][2] = "";
$workdir[$counts][3] = 3;
}
} else {
if ($code_criterion<2) {
$tmpp[0]=sprintf("nodelist/%04d",$year);
$tmpp[1]=sprintf("nodelist/%04d/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "Nodelist";
$workdir[$counts][2] = "";
$workdir[$counts][3] = 1;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "Nodediff";
$workdir[$counts][2] = "";
$workdir[$counts][3] = 2;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "Nodelist";
$workdir[$counts][2] = "";
$workdir[$counts][3] = 1;
}
} else {
if ($zone_criterion==20) {
// z2pnt
$tmpp[0]=sprintf("pntlist/z2/%04d/poss",$year);
$tmpp[1]=sprintf("pntlist/z2/%04d/poss/diff",$year);
$tmpp[2]=sprintf("pntlist/z2/%04d/boss",$year);
$tmpp[3]=sprintf("pntlist/z2/%04d/boss/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "Z2 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 21;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "Z2 Pointdiff";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 22;
}
} else {
$tmpd=$basepath2.$basepath.$tmpp[2];
if (is_dir($tmpd)) { // BOSS dir exists
// do nothing
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "Z2 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 21;
}
}
$tmpd=$basepath2.$basepath.$tmpp[2];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[2];
$workdir[$counts][1] = "Z2 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 26;
$tmpd=$basepath2.$basepath.$tmpp[3];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[3];
$workdir[$counts][1] = "Z2 Pointdiff";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 27;
}
//} else {
// $counts++;
// $workdir[$counts][0] = $tmpp[2];
// $workdir[$counts][1] = "Z2 Pointlist";
// $workdir[$counts][2] = "Boss";
// $workdir[$counts][3] = 26;
}
} else {
if ($zone_criterion==30) {
// r24
// formats: Boss, Fake
$tmpp[0]=sprintf("pntlist/r24/%04d/boss",$year);
$tmpp[1]=sprintf("pntlist/r24/%04d/boss/diff",$year);
$tmpp[2]=sprintf("pntlist/r24/%04d/fake",$year);
$tmpp[3]=sprintf("pntlist/r24/%04d/fake/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R24 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 31;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R24 Pointdiff";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 32;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R24 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 31;
}
$tmpd=$basepath2.$basepath.$tmpp[2];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[2];
$workdir[$counts][1] = "R24 Pointlist";
$workdir[$counts][2] = "Fakenet";
$workdir[$counts][3] = 33;
$tmpd=$basepath2.$basepath.$tmpp[3];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[3];
$workdir[$counts][1] = "R24 Pointdiff";
$workdir[$counts][2] = "Fakenet";
$workdir[$counts][3] = 34;
}
}
} else {
if ($zone_criterion==40) {
// r28
// formats: Fidouser, Boss
$tmpp[0]=sprintf("pntlist/r28/%04d/boss",$year);
$tmpp[1]=sprintf("pntlist/r28/%04d/boss/diff",$year);
$tmpp[2]=sprintf("pntlist/r28/%04d/fidouser",$year);
$tmpp[3]=sprintf("pntlist/r28/%04d/fidouser/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R28 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 41;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R28 Pointdiff";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 42;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R28 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 41;
}
$tmpd=$basepath2.$basepath.$tmpp[2];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[2];
$workdir[$counts][1] = "R28 Pointlist";
$workdir[$counts][2] = "Fidouser";
$workdir[$counts][3] = 43;
$tmpd=$basepath2.$basepath.$tmpp[3];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[3];
$workdir[$counts][1] = "R28 Pointdiff";
$workdir[$counts][2] = "Fidouser";
$workdir[$counts][3] = 44;
}
}
} else {
if ($zone_criterion==50) {
// r31
// formats: V7, Boss
$tmpp[0]=sprintf("pntlist/r31/%04d/boss",$year);
$tmpp[1]=sprintf("pntlist/r31/%04d/boss/diff",$year);
$tmpp[2]=sprintf("pntlist/r31/%04d/v7",$year);
$tmpp[3]=sprintf("pntlist/r31/%04d/v7/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R31 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 51;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R31 Pointdiff";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 52;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R31 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 51;
}
$tmpd=$basepath2.$basepath.$tmpp[2];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[2];
$workdir[$counts][1] = "R31 Pointlist";
$workdir[$counts][2] = "Points,V7";
$workdir[$counts][3] = 53;
$tmpd=$basepath2.$basepath.$tmpp[3];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[3];
$workdir[$counts][1] = "R31 Pointdiff";
$workdir[$counts][2] = "Points,V7";
$workdir[$counts][3] = 54;
}
}
} else {
if ($zone_criterion==55) {
// r22
// formats: Poss
$tmpp[0]=sprintf("pntlist/r22/%04d/poss",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R22 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 56;
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R22 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 56;
}
} else {
if ($zone_criterion==60) {
// r23
// formats: Boss, Fake
$tmpp[0]=sprintf("pntlist/r23/%04d/boss",$year);
$tmpp[1]=sprintf("pntlist/r23/%04d/boss/diff",$year);
$tmpp[2]=sprintf("pntlist/r23/%04d/fake",$year);
$tmpp[3]=sprintf("pntlist/r23/%04d/fake/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R23 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 61;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R23 Pointdiff";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 62;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R23 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 61;
}
$tmpd=$basepath2.$basepath.$tmpp[2];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[2];
$workdir[$counts][1] = "R23 Pointlist";
$workdir[$counts][2] = "Fakenet";
$workdir[$counts][3] = 63;
$tmpd=$basepath2.$basepath.$tmpp[3];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[3];
$workdir[$counts][1] = "R23 Pointdiff";
$workdir[$counts][2] = "Fakenet";
$workdir[$counts][3] = 64;
}
}
} else {
if ($zone_criterion==70) {
// r34
// formats: Boss, Fake
$tmpp[0]=sprintf("pntlist/r34/%04d/boss",$year);
$tmpp[1]=sprintf("pntlist/r34/%04d/boss/diff",$year);
$tmpp[2]=sprintf("pntlist/r34/%04d/fake",$year);
$tmpp[3]=sprintf("pntlist/r34/%04d/fake/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R34 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 71;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R34 Pointdiff";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 72;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R34 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 71;
}
$tmpd=$basepath2.$basepath.$tmpp[2];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[2];
$workdir[$counts][1] = "R34 Pointlist";
$workdir[$counts][2] = "Fakenet";
$workdir[$counts][3] = 73;
$tmpd=$basepath2.$basepath.$tmpp[3];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[3];
$workdir[$counts][1] = "R34 Pointdiff";
$workdir[$counts][2] = "Fakenet";
$workdir[$counts][3] = 74;
}
}
} else {
if ($zone_criterion==75) {
// r45
// formats: Poss
$tmpp[0]=sprintf("pntlist/r45/%04d/poss",$year);
$tmpp[1]=sprintf("pntlist/r45/%04d/poss/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R45 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 76;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R45 Pointdiff";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 77;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R45 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 76;
}
} else {
if ($zone_criterion==80) {
// r46
// formats: Poss
$tmpp[0]=sprintf("pntlist/r46/%04d/poss",$year);
$tmpp[1]=sprintf("pntlist/r46/%04d/poss/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R46 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 81;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R46 Pointdiff";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 82;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R46 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 81;
}
} else {
if ($zone_criterion==85) {
// r48
// formats: Boss
$tmpp[0]=sprintf("pntlist/r48/%04d/boss",$year);
$tmpp[1]=sprintf("pntlist/r48/%04d/boss/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R48 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 86;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R48 Pointdiff";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 87;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R48 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 86;
}
} else {
if ($zone_criterion==90) {
// r50
// formats: Poss, Boss
if ($year < 2008) {
$tmpp[0]=sprintf("pntlist/r50/%04d/poss",$year);
$tmpp[1]=sprintf("pntlist/r50/%04d/poss/diff",$year);
$tmpp[2]=sprintf("pntlist/r50/%04d/boss",$year);
$tmpp[3]=sprintf("pntlist/r50/%04d/boss/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R50 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 91;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R50 Pointdiff";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 92;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R50 Pointlist";
$workdir[$counts][2] = "Poss";
$workdir[$counts][3] = 91;
}
}
$tmpd=$basepath2.$basepath.$tmpp[2];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[2];
$workdir[$counts][1] = "R50 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 93;
$tmpd=$basepath2.$basepath.$tmpp[3];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[3];
$workdir[$counts][1] = "R50 Pointdiff";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 94;
}
}
} else {
if ($zone_criterion==100) {
// r29
// formats: Boss, V7
$tmpp[0]=sprintf("pntlist/r29/%04d/boss",$year);
$tmpp[1]=sprintf("pntlist/r29/%04d/boss/diff",$year);
$tmpp[2]=sprintf("pntlist/r29/%04d/v7",$year);
$tmpp[3]=sprintf("pntlist/r29/%04d/v7/diff",$year);
$tmpd=$basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R29 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 101;
$tmpd=$basepath2.$basepath.$tmpp[1];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[1];
$workdir[$counts][1] = "R29 Pointdiff";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 102;
}
} else {
$counts++;
$workdir[$counts][0] = $tmpp[0];
$workdir[$counts][1] = "R29 Pointlist";
$workdir[$counts][2] = "Boss";
$workdir[$counts][3] = 101;
}
$tmpd=$basepath2.$basepath.$tmpp[2];
if (is_dir($tmpd)) { // Nodelist dir exists
$counts++;
$workdir[$counts][0] = $tmpp[2];
$workdir[$counts][1] = "R29 Pointlist";
$workdir[$counts][2] = "Points,V7";
$workdir[$counts][3] = 103;
$tmpd=$basepath2.$basepath.$tmpp[3];
if (is_dir($tmpd)) { // Nodediff dir exists
$counts++;
$workdir[$counts][0] = $tmpp[3];
$workdir[$counts][1] = "R29 Pointdiff";
$workdir[$counts][2] = "Points,V7";
$workdir[$counts][3] = 104;
}
}
} // End 100
} // End 90
} // end 85
} // end 80
} // end 75
} // end 70
} // end 60
} // end 55
} // end 50
} // end 40
} // end 30
} // end 20
} // end < 2
} // end code_criterion 3
// $tmpp=$basepath2.$basepath.$tmpp;
// for i = 1 to counts
// check directorys to list
// nodelist/nodediff?
// pointlist format 1, format 1 diff?, format 2, format 2 diff? (upto 4)
for ($j=1; $j <= $counts; $j++) {
$tmpd = $workdir[$j][0];
$listtype = $workdir[$j][1];
$ptype = $workdir[$j][2];
$slct = $workdir[$j][3];
// Reset
$datum = $sikdatum;
$year=date("Y",$datum);
$tyr = $year;
$fidoyear=($tyr - 1984)+1;
// echo "$year ";
$day=date("z",$datum)+1; // ???
$week=1;
// $sikday = $day;
if ($slct==3) {
$listtype.=" [".$fidoyear."]";
}
if ($j==1) {
echo " | ".date("Y",$datum)." | ";
echo " ".$listtype;
} else {
echo " |
---|
".$listtype;
}
if ($ptype!="") {
echo " (".$ptype.")\n";
}
echo " | \n";
if ($slct==3) {
$teller=0;
} else {
if ($day!=1) {
if ((($year==1987) && ($day>212)) OR (($year>1987)) ) {
echo "";
} else {
echo " | ";
}
echo " | \n";
// echo " | \n";
$teller=1;
} else {
$teller=0;
}
}
$fnwsex = False;
while ((($day<367) && (date("Y",$datum)==$tyr)) || ($fnwsex)) {
$fnwsex = False;
if ($slct==3) {
if ((($year==1984) && ($week<48)) || (($year==1993) && ($week==53)) || (($year==1986) && ($week==52)) || (($year==1988) && ($week==53)) || (($year==1999) && ($week==53)) || (($year==2004) && ($week==53)) ) {
// 1993/53 results in mismatch between nodediff day friday publishing
// and fidonews publishing day on sunday #52/1993 is 26th Dec. 1993
// same happens in 1986 #51 in 86 is published 29th Dec
// same happens in 1988 #52 in 88 is published 26th Dec
$printday=" ";
$printweek=" ";
} else {
if (($year==1984)) {
$printday=$day;
$printweek=$week-47;
} else {
$printday=$day;
$printweek=$week;
}
}
} else {
// some exceptions, no daynumber display
if (($year==1984) && ($day<153)) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==32) && ($year==2001) && ($day<180)) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==34) && (($year==1992) && ($day==157)) ) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==21) && (($year==2007) && ( ($day>138) && ($day<355)) ) ) {
$printday=$day;
$printweek=$week;
} else {
if (($slct==21) && (($year==2007) && ($day>348) ) ) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==22) && (($year==2007) && ( ($day>138) && ($day<355)) ) ) {
$printday=$day;
$printweek=$week;
} else {
if (($slct==22) && (($year==2007) && ($day>348) ) ) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==26) && (($year==2007) && ($day<145)) ) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==27) && (($year==2007) && ($day<145)) ) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==86) && (($year==2007) && ($day<362))) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==56) && (($year==2008) && ($day<11))) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==91) && (($year==2007) && ($day>138))) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==92) && (($year==2007) && ($day>138))) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==93) && (($year==2008) && ($day<277))) {
$printday=" ";
$printweek=" ";
} else {
if (($slct==94) && (($year==2008) && ($day<277))) {
$printday=" ";
$printweek=" ";
} else {
// regular daynumber display
$printday=$day;
$printweek=$week;
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
}
$filename2="";
if ($slct==1) {
$filename=sprintf("nodelist/%04d/nl%02s-%03d.zip",$year,substr($year,2,2),$day);
} else {
if ($slct==2) {
$filename=sprintf("nodelist/%04d/diff/nodediff.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==3) {
if (($year==1984)) {
$filename=sprintf("fidonews/%04d/fido%s%s.nws",$year,$fidoyear, substr("00".($week-47),strlen(($week-47)),2));
} else {
$filename=sprintf("fidonews/%04d/fido%s%s.nws",$year,$fidoyear, substr("00".$week,strlen($week),2));
}
} else {
if ($slct==21) {
// z2pnt poss list
$filename=sprintf("pntlist/z2/%04d/poss/z2pnt.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==22) {
// z2pnt poss diff
$filename=sprintf("pntlist/z2/%04d/poss/diff/z2pnt_d.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==26) {
// z2pnt boss list
$filename=sprintf("pntlist/z2/%04d/boss/z2pnt.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==27) {
// z2pnt boss diff
$filename=sprintf("pntlist/z2/%04d/boss/diff/z2pnt_d.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==31) {
// r24
// formats: Boss list
$filename=sprintf("pntlist/r24/%04d/boss/r24pnt.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==32) {
// r24
// formats: Boss diff
$filename=sprintf("pntlist/r24/%04d/boss/diff/r24pnt_d.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==41) {
// r28
// formats: Boss list
$filename=sprintf("pntlist/r28/%04d/boss/p28-list.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==42) {
// r28
// formats: Boss diff
$filename=sprintf("pntlist/r28/%04d/boss/diff/p28-diff.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==51) {
// r31
// formats: Boss list
$filename=sprintf("pntlist/r31/%04d/boss/r31pnt.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==52) {
// r31
// formats: Boss diff
$filename=sprintf("pntlist/r31/%04d/boss/diff/r31pnt_d.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==33) {
// r24
// formats: Fake list
// P24yyDDD.ZIP or POINTS24.Zdd
// $filename2=sprintf("pntlist/r24/%04d/Fake/p24%s%03d.zip",$year,substr($year,2,2),$day);
$filename=sprintf("pntlist/r24/%04d/fake/points24.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==34) {
// r24
// formats: fake diff
$filename=sprintf("pntlist/r24/%04d/fake/diff/pr24diff.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==53) {
// r31
// formats: v7 list
$filename=sprintf("pntlist/r31/%04d/v7/point4d.a%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==54) {
// r31
// formats: v7 diff (not avail)
$filename=sprintf("pntlist/r31/%04d/v7/diff/point4d.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==56) {
// r22pnt poss list
$filename=sprintf("pntlist/r22/%04d/poss/r22pnt.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==43) {
// r28
// formats: fidouser list
$filename=sprintf("pntlist/r28/%04d/fidouser/pointl%s.zip",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==44) {
// r28
// formats: fidouser diff (not avail)
$filename=sprintf("pntlist/r28/%04d/fidouser/diff/pointl%s.zip",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==61) {
// r23
// formats: Boss list
$filename=sprintf("pntlist/r23/%04d/boss/r23pnt.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==62) {
// r23
// formats: Boss diff
$filename=sprintf("pntlist/r23/%04d/boss/diff/r23pnt_d.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==63) {
// r23
// formats: Fake list
// DK-POINT.Zdd
$filename=sprintf("pntlist/r23/%04d/fake/dk-point.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==64) {
// r23
// formats: fake diff
$filename=sprintf("pntlist/r23/%04d/fake/diff/dkp-diff.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==71) {
// r34
// formats: Boss list
$filename =sprintf("pntlist/r34/%04d/boss/ptlstr34.z%s",$year, substr("00".$day,strlen($day),2));
$filename2=sprintf("pntlist/r34/%04d/boss/ptlstr34.l%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==72) {
// r34
// formats: Boss diff
$filename=sprintf("pntlist/r34/%04d/boss/diff/ptdifr34.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==73) {
// r34
// formats: Fake list
$filename =sprintf("pntlist/r34/%04d/fake/pointr34.z%s",$year, substr("00".$day,strlen($day),2));
$filename2=sprintf("pntlist/r34/%04d/fake/pointr34.l%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==74) {
// r34
// formats: fake diff
$filename=sprintf("pntlist/r34/%04d/fake/diff/pdiffr34.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==76) {
// r45pnt poss list
$filename=sprintf("pntlist/r45/%04d/poss/r45point.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==77) {
// r45pnt poss diff
$filename=sprintf("pntlist/r45/%04d/poss/diff/r45pdiff.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==81) {
// r46pnt poss list
$filename=sprintf("pntlist/r46/%04d/poss/pnt46reg.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==82) {
// r46pnt poss diff
$filename=sprintf("pntlist/r46/%04d/poss/diff/r46pdiff.z%s",$year, substr("00".$day,strlen($day),2));
$filename2=sprintf("pntlist/r46/%04d/poss/diff/r46pdiff.%s",$year, substr("000".$day,strlen($day),3));
} else {
if ($slct==86) {
// r48pnt boss list
$filename=sprintf("pntlist/r48/%04d/boss/point_48.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==87) {
// r48pnt boss diff
$filename=sprintf("pntlist/r48/%04d/boss/diff/pointd48.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==91) {
// r50pnt poss list
$filename=sprintf("pntlist/r50/%04d/poss/r50pnt.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==92) {
// r50pnt poss diff
$filename=sprintf("pntlist/r50/%04d/poss/diff/r50pnt_d.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==93) {
// r50pnt boss list
$filename=sprintf("pntlist/r50/%04d/boss/r50pnt.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==94) {
// r50pnt boss diff
$filename=sprintf("pntlist/r50/%04d/boss/diff/r50pnt_d.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==101) {
// r29pnt Boss %s substr("00".$day,strlen($day),2)
//$filename=sprintf("pntlist/r29/%04d/Boss/r29pnt_b.%03d",$year, $day);
$filename=sprintf("pntlist/r29/%04d/boss/r29pnt_b.z%s",$year, substr("00".$day,strlen($day),2));
} else {
if ($slct==103) {
// r29pnt Point,V7 z%s substr("00".$day,strlen($day),3)
//$filename=sprintf("pntlist/r29/%04d/V7/r29pnt_p.%03d",$year, $day);
$filename=sprintf("pntlist/r29/%04d/v7/r29pnt_p.z%s",$year, substr("00".$day,strlen($day),2));
} // end 103
} // end 101
} // end 94
} // end 93
} // end 92
} // end 91
} // end 87
} // end 86
} // end 82
} // end 81
} // end 77
} // end 76
} // end 74
} // end 73
} // end 72
} // end 71
} // end 64
} // end 63
} // end 62
} // end 61
} // end 44
} // end 43
} // end 56
} // end 54
} // end 53
} // end 34
} // end 33
} // end 52
} // end 51
} // end 42
} // end 41
} // end 32
} // end 31
} // end 27
} // end 26
} // end 22
} // end 21
} // end select 3
} // end select 2
} // end select 1
// $filename=$basepath.$filename;
$dir1 = substr($filename,0,rat("/",$filename)+1);
$filename = substr($filename,rat("/",$filename)+1);
$lfnam1 = $basepath.$dir1.strtolower($filename);
$ufnam1 = $basepath.$dir1.strtoupper($filename);
//echo "[".$dir1."]\r\n";
//echo "[".$filename."]\r\n";
//echo "[".$lfnam1."]\r\n";
//echo "[".$ufnam1."]\r\n";
// [nodelist/1984]
// [nl84-006.zip]
// [/pub/fidohist/nodelist/1984nl84-006.zip]
// [/pub/fidohist/nodelist/1984NL84-006.ZIP]
// [nodelist/1984/]
// [nl84-006.zip]
// [/pub/fidohist/nodelist/1984/nl84-006.zip]
// [/pub/fidohist/nodelist/1984/NL84-006.ZIP]
if ($filename2!="") {
$dir2 = substr($filename2,0,rat("/",$filename2)+1);
$filename2 = substr($filename2,rat("/",$filename2)+1);
$lfnam2 = $basepath.$dir2.strtolower($filename2);
$ufnam2 = $basepath.$dir2.strtoupper($filename2);
if ( (file_exists($basepath2.$lfnam1)) OR (file_exists($basepath2.$lfnam2)) OR (file_exists($basepath2.$ufnam1)) OR (file_exists($basepath2.$ufnam2)) ) {
$fnrq = "";
if ((file_exists($basepath2.$lfnam1))) {
$fnrq = $lfnam1;
} else {
if ((file_exists($basepath2.$ufnam1))) {
$fnrq = $ufnam1;
} else {
if ((file_exists($basepath2.$lfnam2))) {
$fnrq = $lfnam2;
} else {
if ((file_exists($basepath2.$ufnam2))) {
$fnrq = $ufnam2;
} else {
$fnrq = "";
}
}
}
}
$srch[0]=$slct;
$srch[1]=$year;
$srch[2]=$day;
$fnd = excep_find($srch,$exception);
if ($fnd>-1) {
// Exceptions
$printday="$printday".$exception["note"][$fnd]."";
$printweek="$printweek";
} else {
if ((((($year==1987) && ($day>212)) OR (($year>1987))) ) && ($slct!=3)) {
// DEFAULT
$printday="$printday";
$printweek="$printweek";
} else {
$printday="$printday";
$printweek="$printweek";
}
}
} else {
$srch[0]=$slct;
$srch[1]=$year;
$srch[2]=$day;
$fnd = excep_find($srch,$exception);
if ($fnd>-1) {
// Exceptions
$printday="$printday".$exception["note"][$fnd]." ";
$printweek="$printweek".$exception["note"][$fnd]." ";
} else {
if (($year>$actyear-1)) {
$printday="".$printday."\n";
$printweek="".$printweek."\n";
} else {
$printday="".$printday."\n";
$printweek="".$printweek."\n";
}
}
}
} else {
if ( (file_exists($basepath2.$lfnam1)) OR (file_exists($basepath2.$ufnam1)) ) {
$fnrq = "";
if ((file_exists($basepath2.$lfnam1))) {
$fnrq = $lfnam1;
} else {
if ((file_exists($basepath2.$ufnam1))) {
$fnrq = $ufnam1;
} else {
$fnrq = "";
}
}
// if (file_exists($basepath2.$filename)) {
$srch[0]=$slct;
$srch[1]=$year;
$srch[2]=$day;
$fnd = excep_find($srch,$exception);
if ($fnd>-1) {
// Exceptions
$printday="$printday".$exception["note"][$fnd]."";
$printweek="$printweek".$exception["note"][$fnd]."";
} else {
if ((((($year==1987) && ($day>212)) OR (($year>1987))) ) && ($slct!=3)) {
// DEFAULT
$printday="$printday";
$printweek="$printweek";
} else {
$printday="$printday";
$printweek="$printweek";
}
}
} else {
$srch[0]=$slct;
$srch[1]=$year;
$srch[2]=$day;
$fnd = excep_find($srch,$exception);
if ($fnd>-1) {
// Exceptions
$printday="$printday".$exception["note"][$fnd]." ";
$printweek="$printweek".$exception["note"][$fnd]." ";
} else {
if (($year>$actyear-1)) {
$printday="".$printday."\n";
$printweek="".$printweek."\n";
} else {
$printday="".$printday."\n";
$printweek="".$printweek."\n";
}
}
}
}
if ($slct==3) {
echo "";
echo $printweek." | \n";
} else {
if ((($year==1987) && ($day>212)) OR (($year>1987)) ) {
echo "";
} else {
echo " | ";
}
echo $printday." | \n";
}
$day=$day+7;
$week++;
// week 53 exceptions
if (($slct==3) && ((($year==1990) && ($week==53)) || (($year==1996) && ($week==53)) || (($year==2000) && ($week==53)) || (($year==2001) && ($week==53)) || (($year==2007) && ($week==53)) )) {
$fnwsex = True;
} else {
$datum=mktime(0,0,0,date("m",$datum),date("d",$datum)+7,date("Y",$datum));
}
$teller++;
if ($teller>9) {
echo " \n";
$teller=0;
}
}
if ($teller<10) {
while ($teller<10) {
if ($slct==3) {
echo "";
} else {
if ((($year==1987) && ($day>212)) OR (($year>1987)) ) {
echo " | ";
} else {
echo " | ";
}
}
echo " | \n";
$teller++;
}
}
echo " \n";
}
echo "\n";
echo " | \n";
echo " \n";
$tmnth = date("n",$datum);
$tday = date("j",$datum);
$tyr = date("Y",$datum);
//$year=$tyr+1;
flush();
}
} else {
// Codecriterion == 4 Last 5 weeks
// echo "CODE CRITERION = 4";
// dirmask types:
// only 1 $tmpp[0]=sprintf("pntlist/r50/%04d/poss",$year);
// filemask types:
// 1 $filename=sprintf("nodelist/%04d/nl%02s-%03d.zip",$year,substr($year,2,2),$day);
// 2 $filename=sprintf("nodelist/%04d/diff/nodediff.z%s",$year, substr("00".$day,strlen($day),2));
// 3 $filename=sprintf("fidonews/%04d/fido%s%s.nws",$year,$fidoyear, substr("00".($week-47),strlen(($week-47)),2));
// $filename=sprintf("fidonews/%04d/fido%s%s.nws",$year,$fidoyear, substr("00".$week,strlen($week),2));
$llc = 0;
$ll[$llc]['code_criterion'] = 1;
$ll[$llc]['zone_criterion'] = 0;
$ll[$llc]['list_criterion'] = 1;
$ll[$llc]['dirmask'] = "nodelist/%04d";
$ll[$llc]['filemask'] = "nl%02s-%03d.zip";
$ll[$llc]['fmt'] = 1;
$ll[$llc]['description'] = "Nodelist";
$ll[$llc]['descfrmt'] = "Nodelist";
$ll[$llc]['format'] = "";
$ll[$llc]['startyear'] = 1984;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 1;
$ll[$llc]['zone_criterion'] = 0;
$ll[$llc]['list_criterion'] = 2;
$ll[$llc]['dirmask'] = "nodelist/%04d/diff";
$ll[$llc]['filemask'] = "nodediff.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "Nodediff";
$ll[$llc]['descfrmt'] = "Nodediff";
$ll[$llc]['format'] = "";
$ll[$llc]['startyear'] = 1984;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 20;
$ll[$llc]['list_criterion'] = 21;
$ll[$llc]['dirmask'] = "pntlist/z2/%04d/poss";
$ll[$llc]['filemask'] = "z2pnt.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "Z2 Pointlist";
$ll[$llc]['descfrmt'] = "Z2 Pointlist";
$ll[$llc]['format'] = "Poss";
$ll[$llc]['startyear'] = 1999;
$ll[$llc]['lastyear'] = 2007;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 20;
$ll[$llc]['list_criterion'] = 22;
$ll[$llc]['dirmask'] = "pntlist/z2/%04d/poss/diff";
$ll[$llc]['filemask'] = "z2pnt_d.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "Z2 Pointdiff";
$ll[$llc]['descfrmt'] = "Z2 Pointdiff";
$ll[$llc]['format'] = "Poss";
$ll[$llc]['startyear'] = 1999;
$ll[$llc]['lastyear'] = 2007;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 20;
$ll[$llc]['list_criterion'] = 26;
$ll[$llc]['dirmask'] = "pntlist/z2/%04d/boss";
$ll[$llc]['filemask'] = "z2pnt.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "Z2 Pointlist";
$ll[$llc]['descfrmt'] = "Z2 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 2007;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 20;
$ll[$llc]['list_criterion'] = 27;
$ll[$llc]['dirmask'] = "pntlist/z2/%04d/boss/diff";
$ll[$llc]['filemask'] = "z2pnt_d.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "Z2 Pointdiff";
$ll[$llc]['descfrmt'] = "Z2 Pointdiff";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 2007;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 55;
$ll[$llc]['list_criterion'] = 56;
$ll[$llc]['dirmask'] = "pntlist/r22/%04d/poss";
$ll[$llc]['filemask'] = "r22pnt.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R22 Pointlist";
$ll[$llc]['descfrmt'] = "R22 Pointlist";
$ll[$llc]['format'] = "Poss";
$ll[$llc]['startyear'] = 2008;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 60;
$ll[$llc]['list_criterion'] = 61;
$ll[$llc]['dirmask'] = "pntlist/r23/%04d/boss";
$ll[$llc]['filemask'] = "r23pnt.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R23 Pointlist";
$ll[$llc]['descfrmt'] = "R23 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 1992;
$ll[$llc]['lastyear'] = 0; // 2005
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 60;
$ll[$llc]['list_criterion'] = 62;
$ll[$llc]['dirmask'] = "pntlist/r23/%04d/boss/diff";
$ll[$llc]['filemask'] = "r23pnt_d.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R23 Pointdiff";
$ll[$llc]['descfrmt'] = "R23 Pointdiff";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 1992;
$ll[$llc]['lastyear'] = 0; // 2005
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 60;
$ll[$llc]['list_criterion'] = 63;
$ll[$llc]['dirmask'] = "pntlist/r23/%04d/fake";
$ll[$llc]['filemask'] = "dk-point.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R23 Pointlist";
$ll[$llc]['descfrmt'] = "R23 Pointlist";
$ll[$llc]['format'] = "Fakenet";
$ll[$llc]['startyear'] = 1992;
$ll[$llc]['lastyear'] = 0; // 2005
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 60;
$ll[$llc]['list_criterion'] = 64;
$ll[$llc]['dirmask'] = "pntlist/r23/%04d/fake/diff";
$ll[$llc]['filemask'] = "dkp-diff.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R23 Pointdiff";
$ll[$llc]['descfrmt'] = "R23 Pointdiff";
$ll[$llc]['format'] = "Fakenet";
$ll[$llc]['startyear'] = 1992;
$ll[$llc]['lastyear'] = 0; // 2005
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 30;
$ll[$llc]['list_criterion'] = 31;
$ll[$llc]['dirmask'] = "pntlist/r24/%04d/boss";
$ll[$llc]['filemask'] = "r24pnt.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R24 Pointlist";
$ll[$llc]['descfrmt'] = "R24 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 1989;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 30;
$ll[$llc]['list_criterion'] = 32;
$ll[$llc]['dirmask'] = "pntlist/r24/%04d/boss/diff";
$ll[$llc]['filemask'] = "r24pnt_d.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R24 Pointdiff";
$ll[$llc]['descfrmt'] = "R24 Pointdiff";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 1989;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 30;
$ll[$llc]['list_criterion'] = 33;
$ll[$llc]['dirmask'] = "pntlist/r24/%04d/fake";
$ll[$llc]['filemask'] = "points24.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R24 Pointlist";
$ll[$llc]['descfrmt'] = "R24 Pointlist";
$ll[$llc]['format'] = "Fakenet";
$ll[$llc]['startyear'] = 1989;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 30;
$ll[$llc]['list_criterion'] = 34;
$ll[$llc]['dirmask'] = "pntlist/r24/%04d/fake/diff";
$ll[$llc]['filemask'] = "pr24diff.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R24 Pointdiff";
$ll[$llc]['descfrmt'] = "R24 Pointdiff";
$ll[$llc]['format'] = "Fakenet";
$ll[$llc]['startyear'] = 1989;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 40;
$ll[$llc]['list_criterion'] = 41;
$ll[$llc]['dirmask'] = "pntlist/r28/%04d/boss";
$ll[$llc]['filemask'] = "p28-list.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R28 Pointlist";
$ll[$llc]['descfrmt'] = "R28 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 40;
$ll[$llc]['list_criterion'] = 42;
$ll[$llc]['dirmask'] = "pntlist/r28/%04d/boss/diff";
$ll[$llc]['filemask'] = "p28-diff.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R28 Pointdiff";
$ll[$llc]['descfrmt'] = "R28 Pointdiff";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 40;
$ll[$llc]['list_criterion'] = 43;
$ll[$llc]['dirmask'] = "pntlist/r28/%04d/fidouser";
$ll[$llc]['filemask'] = "pointl%s.zip";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R28 Pointlist";
$ll[$llc]['descfrmt'] = "R28 Pointlist";
$ll[$llc]['format'] = "Fidouser";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 40;
$ll[$llc]['list_criterion'] = 44;
$ll[$llc]['dirmask'] = "pntlist/r28/%04d/fidouser/diff";
$ll[$llc]['filemask'] = "pointl%s.zip";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R28 Pointdiff";
$ll[$llc]['descfrmt'] = "R28 Pointdiff";
$ll[$llc]['format'] = "Fidouser";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 100;
$ll[$llc]['list_criterion'] = 101;
$ll[$llc]['dirmask'] = "pntlist/r29/%04d/boss";
$ll[$llc]['filemask'] = "r29pnt_b.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R29 Pointlist";
$ll[$llc]['descfrmt'] = "R29 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 2001;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 100;
$ll[$llc]['list_criterion'] = 103;
$ll[$llc]['dirmask'] = "pntlist/r29/%04d/v7";
$ll[$llc]['filemask'] = "r29pnt_p.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R29 Pointlist";
$ll[$llc]['descfrmt'] = "R29 Pointlist";
$ll[$llc]['format'] = "Points,V7";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 2001;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 50;
$ll[$llc]['list_criterion'] = 51;
$ll[$llc]['dirmask'] = "pntlist/r31/%04d/boss";
$ll[$llc]['filemask'] = "r31pnt.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R31 Pointlist";
$ll[$llc]['descfrmt'] = "R31 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 1998;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 50;
$ll[$llc]['list_criterion'] = 52;
$ll[$llc]['dirmask'] = "pntlist/r31/%04d/boss/diff";
$ll[$llc]['filemask'] = "r31pnt_d.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R31 Pointlist";
$ll[$llc]['descfrmt'] = "R31 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 1998;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 50;
$ll[$llc]['list_criterion'] = 53;
$ll[$llc]['dirmask'] = "pntlist/r31/%04d/v7";
$ll[$llc]['filemask'] = "point4d.a%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R31 Pointlist";
$ll[$llc]['descfrmt'] = "R31 Pointlist";
$ll[$llc]['format'] = "Points,V7";
$ll[$llc]['startyear'] = 1998;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 50;
$ll[$llc]['list_criterion'] = 54;
$ll[$llc]['dirmask'] = "pntlist/r31/%04d/v7/diff";
$ll[$llc]['filemask'] = "point4d.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R31 Pointlist";
$ll[$llc]['descfrmt'] = "R31 Pointlist";
$ll[$llc]['format'] = "Points,V7";
$ll[$llc]['startyear'] = 1998;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 70;
$ll[$llc]['list_criterion'] = 71;
$ll[$llc]['dirmask'] = "pntlist/r34/%04d/boss";
$ll[$llc]['filemask'] = "ptlstr34.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R34 Pointlist";
$ll[$llc]['descfrmt'] = "R34 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 2001;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 70;
$ll[$llc]['list_criterion'] = 72;
$ll[$llc]['dirmask'] = "pntlist/r34/%04d/boss/diff";
$ll[$llc]['filemask'] = "ptdifr34.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R34 Pointdiff";
$ll[$llc]['descfrmt'] = "R34 Pointdiff";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 2001;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 70;
$ll[$llc]['list_criterion'] = 73;
$ll[$llc]['dirmask'] = "pntlist/r34/%04d/fake";
$ll[$llc]['filemask'] = "pointr34.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R34 Pointlist";
$ll[$llc]['descfrmt'] = "R34 Pointlist";
$ll[$llc]['format'] = "Fakenet";
$ll[$llc]['startyear'] = 2001;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 70;
$ll[$llc]['list_criterion'] = 74;
$ll[$llc]['dirmask'] = "pntlist/r34/%04d/fake/diff";
$ll[$llc]['filemask'] = "pdiffr34.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R34 Pointdiff";
$ll[$llc]['descfrmt'] = "R34 Pointdiff";
$ll[$llc]['format'] = "Fakenet";
$ll[$llc]['startyear'] = 2001;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 75;
$ll[$llc]['list_criterion'] = 76;
$ll[$llc]['dirmask'] = "pntlist/r45/%04d/poss";
$ll[$llc]['filemask'] = "r45point.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R45 Pointlist";
$ll[$llc]['descfrmt'] = "R45 Pointlist";
$ll[$llc]['format'] = "Poss";
$ll[$llc]['startyear'] = 2004;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 75;
$ll[$llc]['list_criterion'] = 77;
$ll[$llc]['dirmask'] = "pntlist/r45/%04d/poss/diff";
$ll[$llc]['filemask'] = "r45pdiff.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R45 Pointdiff";
$ll[$llc]['descfrmt'] = "R45 Pointdiff";
$ll[$llc]['format'] = "Poss";
$ll[$llc]['startyear'] = 2004;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 80;
$ll[$llc]['list_criterion'] = 81;
$ll[$llc]['dirmask'] = "pntlist/r46/%04d/poss";
$ll[$llc]['filemask'] = "pnt46reg.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R46 Pointlist";
$ll[$llc]['descfrmt'] = "R46 Pointlist";
$ll[$llc]['format'] = "Poss";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 80;
$ll[$llc]['list_criterion'] = 81;
$ll[$llc]['dirmask'] = "pntlist/r46/%04d/poss/diff";
$ll[$llc]['filemask'] = "r46pdiff.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R46 Pointdiff";
$ll[$llc]['descfrmt'] = "R46 Pointdiff";
$ll[$llc]['format'] = "Poss";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 85;
$ll[$llc]['list_criterion'] = 86;
$ll[$llc]['dirmask'] = "pntlist/r48/%04d/boss";
$ll[$llc]['filemask'] = "point_48.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R48 Pointlist";
$ll[$llc]['descfrmt'] = "R48 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 2007;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 85;
$ll[$llc]['list_criterion'] = 87;
$ll[$llc]['dirmask'] = "pntlist/r48/%04d/boss/diff";
$ll[$llc]['filemask'] = "pointd48.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R48 Pointdiff";
$ll[$llc]['descfrmt'] = "R48 Pointdiff";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 2007;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 90;
$ll[$llc]['list_criterion'] = 91;
$ll[$llc]['dirmask'] = "pntlist/r50/%04d/poss";
$ll[$llc]['filemask'] = "r50pnt.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R50 Pointlist";
$ll[$llc]['descfrmt'] = "R50 Pointlist";
$ll[$llc]['format'] = "Poss";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 2007;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 90;
$ll[$llc]['list_criterion'] = 92;
$ll[$llc]['dirmask'] = "pntlist/r50/%04d/poss/diff";
$ll[$llc]['filemask'] = "r50pnt_d.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R50 Pointdiff";
$ll[$llc]['descfrmt'] = "R50 Pointdiff";
$ll[$llc]['format'] = "Poss";
$ll[$llc]['startyear'] = 1997;
$ll[$llc]['lastyear'] = 2007;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 90;
$ll[$llc]['list_criterion'] = 93;
$ll[$llc]['dirmask'] = "pntlist/r50/%04d/boss";
$ll[$llc]['filemask'] = "r50pnt.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R50 Pointlist";
$ll[$llc]['descfrmt'] = "R50 Pointlist";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 2007;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 2;
$ll[$llc]['zone_criterion'] = 90;
$ll[$llc]['list_criterion'] = 94;
$ll[$llc]['dirmask'] = "pntlist/r50/%04d/boss/diff";
$ll[$llc]['filemask'] = "r50pnt_d.z%s";
$ll[$llc]['fmt'] = 2;
$ll[$llc]['description'] = "R50 Pointdiff";
$ll[$llc]['descfrmt'] = "R50 Pointdiff";
$ll[$llc]['format'] = "Boss";
$ll[$llc]['startyear'] = 2007;
$ll[$llc]['lastyear'] = 0;
$llc++;
$ll[$llc]['code_criterion'] = 3;
$ll[$llc]['zone_criterion'] = 0;
$ll[$llc]['list_criterion'] = 3;
$ll[$llc]['dirmask'] = "fidonews/%04d";
$ll[$llc]['filemask'] = "fido%s%s.nws";
$ll[$llc]['fmt'] = 3;
$ll[$llc]['description'] = "Fidonews";
$ll[$llc]['descfrmt'] = "Fidonews";
$ll[$llc]['format'] = "";
$ll[$llc]['startyear'] = 1984;
$ll[$llc]['lastyear'] = 0;
?>
|
Legend
| links in black | = file can be viewed now |
| links in white | = file has not be found by Fido historians |
| links in yellow | = file scheduled to be added to collection |
| links in red | = exceptions, addtl. info available |
| Background dark | = pre makenl distributions |
| Background light | = regular makenl distribution since #219/1987 |
|
|
";
while ($year<=$actyear) {
$sikdatum = $datum;
$year=date("Y",$datum);
// echo "[".$year."]";
$tyr = $year;
$fidoyear=($tyr - 1984)+1;
$day=date("z",$datum)+1; // ???
$week=1;
$sikday = $day;
while (($day<367) && (date("Y",$datum)==$tyr)) {
$day=$day+7;
$week++;
$datum=mktime(0,0,0,date("m",$datum),date("d",$datum)+7,date("Y",$datum));
//if (($day<367) && ($datum<=$heute)) {
if ($datum<=$heute) {
// leap year ?
if ( ((int) ($year/4))==($year/4) ) {
$testday = 367;
} else {
$testday = 366;
}
if ($day<$testday) {
$l5d[1] = $l5d[2];
$l5d[2] = $l5d[3];
$l5d[3] = $l5d[4];
$l5d[4] = $l5d[5];
$l5d[5] = $day;
$l5w[1] = $l5w[2];
$l5w[2] = $l5w[3];
$l5w[3] = $l5w[4];
$l5w[4] = $l5w[5];
$l5w[5] = $week;
$l5y[1] = $l5y[2];
$l5y[2] = $l5y[3];
$l5y[3] = $l5y[4];
$l5y[4] = $l5y[5];
$l5y[5] = date("Y",$datum);
} else {
$l5d[1] = $l5d[2];
$l5d[2] = $l5d[3];
$l5d[3] = $l5d[4];
$l5d[4] = $l5d[5];
$l5d[5] = date("z",$datum)+1;
$l5w[1] = $l5w[2];
$l5w[2] = $l5w[3];
$l5w[3] = $l5w[4];
$l5w[4] = $l5w[5];
$l5w[5] = 1;
$l5y[1] = $l5y[2];
$l5y[2] = $l5y[3];
$l5y[3] = $l5y[4];
$l5y[4] = $l5y[5];
$l5y[5] = date("Y",$datum);
}
}
}
}
// echo " | ";
$year=date("Y",$datum);
$dovos = false;
$dov = "";
$year2 = $year;
echo " | \r\n";
for ($j=1; $j <= 5; $j++) {
echo "".$l5y[$j]." | \r\n";
}
?>
$l5y[5];
$counts = 0;
if (($ll[$lc]['startyear']<=$l5y[1]) && ( ($ll[$lc]['lastyear']==0) || ($l5y[5] <= $ll[$lc]['lastyear']) )) {
$tmpp[0]=sprintf($ll[$lc]['dirmask'],$l5y[1]); // min year
$tmpp[1]=sprintf($ll[$lc]['dirmask'],$l5y[5]); // max year
$tmpd0=$basepath2.$basepath.$tmpp[0];
$tmpd1=$basepath2.$basepath.$tmpp[1];
if ( (is_dir($tmpd0)) || (is_dir($tmpd1)) ) { // first dir exists
echo "";
echo " ".$ll[$lc]['description']." | ";
echo " ";
if ($ll[$lc]['format']!="") {
echo "(".$ll[$lc]['format'].")\n";
}
echo " | \n";
for ($j=1; $j <= 5; $j++) {
// $l5d[1], $l5w[1], $l5y[1]
$tmpp[0]=sprintf($ll[$lc]['dirmask'],$l5y[$j]);
$tmpd = $basepath2.$basepath.$tmpp[0];
if (is_dir($tmpd)) { // first dir exists
$day = $l5d[$j];
$week = $l5w[$j];
$year = $l5y[$j];
$fidoyear=($year - 1984)+1;
// regular daynumber display
$printday=$day;
$printweek=$week;
$filename2="";
switch ($ll[$lc]['fmt']) {
case 1:
// path is no longer in sprintf(), $year removed
$lfnam1 = strtolower(sprintf($ll[$lc]['filemask'],substr($year,2,2),$day));
$ufnam1 = strtoupper(sprintf($ll[$lc]['filemask'],substr($year,2,2),$day));
break;
case 3:
if (($year==1984)) {
$lfnam1 = strtolower(sprintf($ll[$lc]['filemask'],$fidoyear, substr("00".($week-47),strlen(($week-47)),2)));
$ufnam1 = strtoupper(sprintf($ll[$lc]['filemask'],$fidoyear, substr("00".($week-47),strlen(($week-47)),2)));
} else {
$lfnam1 = strtolower(sprintf($ll[$lc]['filemask'],$fidoyear, substr("00".$week,strlen($week),2)));
$ufnam1 = strtoupper(sprintf($ll[$lc]['filemask'],$fidoyear, substr("00".$week,strlen($week),2)));
}
break;
default:
$lfnam1 = strtolower(sprintf($ll[$lc]['filemask'], substr("00".$day,strlen($day),2)));
$ufnam1 = strtoupper(sprintf($ll[$lc]['filemask'], substr("00".$day,strlen($day),2)));
break;
}
$lfnam2 = $basepath.$tmpp[0]."/".$lfnam1;
$ufnam2 = $basepath.$tmpp[0]."/".$ufnam1;
// $tmpd."/".
// echo "[".$lfnam2."]\r\n";
// echo "[".$ufnam2."]\r\n";
// [/pub/fidohist/q:/service/0_archiv/pub/fidohist/nodelist/2009/nl2009-009.zip]
// [/pub/fidohist/q:/service/0_archiv/pub/fidohist/nodelist/2009/NL-.ZIP]
// [/pub/fidohist/nl2009-009.zip]
// [/pub/fidohist/NL-.ZIP]
// [/pub/fidohist/q:/service/0_archiv/pub/fidohist/nodelist/2009/nl2009-009.zip]
// [/pub/fidohist/q:/service/0_archiv/pub/fidohist/nodelist/2009/NL-.ZIP]
// [/pub/fidohist/nodelist/2009/nl2009-009.zip]
// [/pub/fidohist/nodelist/2009/NL-.ZIP]
// [/pub/fidohist/nodelist/2009/nl2009-009.zip]
// [/pub/fidohist/nodelist/2009/NL2009-009.ZIP]
if ( (file_exists($basepath2.$lfnam2)) OR (file_exists($basepath2.$ufnam2)) ) {
$fnrq = "";
if ((file_exists($basepath2.$lfnam2))) {
$fnrq = $basepath.$tmpp[0]."/".$lfnam1;
} else {
if ((file_exists($basepath2.$ufnam2))) {
$fnrq = $basepath.$tmpp[0]."/".$ufnam1;
} else {
$fnrq = "";
}
}
// echo "[".$fnrq."]\r\n";
// [/pub/fidohist/q:/service/0_archiv/pub/fidohist/nodelist/2009/nl2009-009.zip]
// [/pub/fidohist/nl2009-009.zip]
// [/pub/fidohist/q:/service/0_archiv/pub/fidohist/nodelist/2009/nl2009-009.zip]
// [/pub/fidohist/nodelist/2009/nl2009-009.zip]
// [/pub/fidohist/nodelist/2009/nl2009-009.zip]
// should be
// http://ambrosia60.dnsalias.net/archiv/pub/fidohist/nodelist/2009/nl09-009.zip
// |reqpath||-basepath-| |- tmpd ----|
$srch[0]=$ll[$lc]['list_criterion'];
$srch[1]=$year;
$srch[2]=$day;
$fnd = excep_find($srch,$exception);
// echo "[".$reqpath."]\r\n";
// echo "[".$fnrq."]\r\n";
// [/archiv]
// [q:/service/0_archiv/pub/fidohist/nodelist/2009/nl09-044.zip]
// [/archiv]
// [nodelist/2009/nl09-044.zip]
// [/archiv]
// [/pub/fidohist/nodelist/2009/nl09-044.zip]
if ($fnd>-1) {
// Exceptions
$printday="$printday".$exception["note"][$fnd]."";
$printweek="$printweek".$exception["note"][$fnd]."";
} else {
if ((((($year==1987) && ($day>212)) OR (($year>1987))) ) && ($ll[$lc]['list_criterion']!=3)) {
// DEFAULT
$printday="$printday";
$printweek="$printweek";
} else {
$printday="$printday";
$printweek="$printweek";
}
}
} else {
$srch[0]=$ll[$lc]['list_criterion'];
$srch[1]=$year;
$srch[2]=$day;
$fnd = excep_find($srch,$exception);
if ($fnd>-1) {
// Exceptions
$printday="$printday".$exception["note"][$fnd]." ";
$printweek="$printweek".$exception["note"][$fnd]." ";
} else {
if (($year>$actyear-1)) {
$printday="".$printday."\n";
$printweek="".$printweek."\n";
} else {
$printday="".$printday."\n";
$printweek="".$printweek."\n";
}
}
}
} else {
$printday=" ";
$printweek=" ";
}
if ($ll[$lc]['list_criterion']==3) {
echo "";
echo $printweek." | \n";
} else {
if ((($year==1987) && ($day>212)) OR (($year>1987)) ) {
echo "";
} else {
echo " | ";
}
echo $printday." | \n";
}
}
echo " \r\n";
}
}
}
}
?>
|
|
Credits - Original Collection of File
Archives
ftp://ftp.fidonet.org/fidonet/fido-history - FIDO-HISTORY PROJECT (The Original) @ ftp.fidonet.org
(Offline)
Ruth Argust - The Original FidoNet Nodelist Archives @ The Great
White South BBS (550 not avail)
Tony Campbell - FOTI Nodelist / Nodediff Archive Page @ TheLitterBox
BBS
Frank Robbins - The
FidoNet Showcase Project
Michael Cronsten - Swedisch Fidonet
Gisbert Rudolph - Fido History Project (2)
Ulrich Schroeter - Fidonet
Archive - Fido History Project (3) @ Ambrosia60
Steven Leeman - Fidonet
Archive - Reorganized @ skynetbbs
Alex Woick - Wombaz; Michiel v.d. Vlist - @ vlist.eu; Gero Dirk Lachner - @ geros-castle
Oleg Tews - Nodelist Archive (Offline) of
fidonet z2 nodehist robot (Offline)
Pavel Gulchouck - Nodelist archive @ nodehist.fidonet.org.ua
Kees van Eeten - The Mirror Site @ fido.ddutch.nl
|
|
|
|