\n"; //echo "[".$zone_criterion."]
\n"; $oscript = $_SERVER["REQUEST_URI"]; ?>
- FIDO-HISTORY PROJECT: Archive -
(3rd Generation, 1984- ff.)
* NodeList's / NodeDiff's
* PointList's / PointDiff's
* Fidonews

More infos about the project you will find on the
Fido-History-Project 3rd Generation Project Site

Fido dog
List(s) Nodelist/Nodediff
Nodelist/Nodediff Pointlist/Pointdiff Pointlist/Pointdiff Fidonews Fidonews Last 5 Last 5
Pointlist Selection

Form based upon: nodelist_search.php Version 1.2
Copyright © 2003 Jerry Schwartz 1:142/928 and WriteByNight
Nodelist lister script adopted from The FidoNet Showcase Project
Modified for Nodelist/Nodediff/Pointlist/Pointdiffs and Fidonews listing by U.Schroeter, 2007-, (v)

Info 1985:
FNEWS(2)#47 to (2)#52 in 1985 doesn't exist by Fido historians..
There is no strict weeks numbering before 1996, so the unpublished issues on 28th January, 11th and 25th February, 8th and 22th March and 8th April '85 results in 6 missing FNews at the end of the year."; // FIDONEWS : (($year==1987) $ei++; $exception["type"][$ei]="3"; $exception["year"][$ei]=1987; $exception["days"][$ei]="338,345,352,359"; $exception["note"][$ei]= " Info 1987:
FNEWS(4)#49 to (4)#52 in 1987 doesn't exist by Fido historians.
There is no strict weeks numbering before 1996, so the unpublished issues on 16th March, 22th June, 18th and 25th October '87 results in 4 missing FNews at the end of the year."; // NODELIST : (($year==1987) && ($day==219) $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=1987; $exception["days"][$ei]="219"; $exception["note"][$ei]= " Info 1987:
The first Nodediff was 1987/219 per the author of MakeNl."; // NODELIST : (($year==1988) && ($day==253) $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=1988; $exception["days"][$ei]="253"; $exception["note"][$ei]= " Info 253/1988:
CRC mismatched."; // R24 pointlist : ((($slct==33) || ($slct==34)) && (($year==1992) && ($day==157)) $ei++; $exception["type"][$ei]="33,34"; $exception["year"][$ei]=1992; $exception["days"][$ei]="157"; $exception["note"][$ei]= " Info:
R24 Fakenet pointlist format change
from R24old to R24 Net-Fake-Region segments.
Only full POINTS24 list distribution.
No DIFF distribution this week."; // R24 pointlist : ($slct>30) && ($slct<35)) && (($year==1993) && ($day==176) // 173/1993 R24 reorganization results in a 3 year split // of R24 into R24 Classic and R24 Light till 215/1996 $ei++; $exception["type"][$ei]="31,32,33,34"; $exception["year"][$ei]=1993; $exception["days"][$ei]="176"; $exception["note"][$ei]= " Info:
R24 reorganization in 1993
Distribution stops for a few weeks.
R24 was split to Fido Classic and Fido Light
(listed in the official Nodelist).
Fido Classic exists for about 3 years
and patched the official Nodelists with the
R24 structure before Nodelist#176/1993.
See also directory Region.24 in the
Fido-History-Project archive.
There are two POINTS24 distributions this time.
One for Classic, one for Light.
Here you'll find the Light distribution."; // NODELIST : ($year==1993) && ($day==176) ) || $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=1993; $exception["days"][$ei]="176"; $exception["note"][$ei]= " Info #176/1993:
R24 reorganization results in a 3 year split of R24 into R24 Classic and R24 Light until 215/1996."; // FIDONEWS : (($year==1996) $ei++; $exception["type"][$ei]="3"; $exception["year"][$ei]=1996; $exception["days"][$ei]="159,166,173,180"; // "23,24,25,26"; $exception["note"][$ei]= " Info 1996:
FNEWS(13)#23 to (13)#26 issue wasn't published in 1996. Next issue: FIDO1327.NWS.
Note from Jim Barchuk:
... the editor changes from Donald Tees to Chris Baker. Donald sort of 'faded out', and it took that long to get Chris installed as the new editor. Chris chose to not use contiguous issue numbers, but to make the numbers match the 'week number of the year'."; // NODELIST : ($year==1997) && ($day==122) // 122/1997 missing zone,2, line $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=1997; $exception["days"][$ei]="122"; $exception["note"][$ei]= " Info #122/1997:
Zone 2 Nodelist exception:
Zone,2,.. line missing
results in Zone 2 nodes becomes Zone 0 nodes.
A 2nd Nodediff.122 was distributed with filedate 2.5.1997 and filetime 10:30.
Fixed with Diff #122/2.
This version in the Fido-History-Project archive is the fixed version."; $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=1999; $exception["days"][$ei]="127"; $exception["note"][$ei]= " Info 127/1999:
Host 2:244 missing, results Net 2:244 Nodes moved into Net 2:2411"; // FIDONEWS : (($year==2000) $ei++; $exception["type"][$ei]="3"; $exception["year"][$ei]=2000; $exception["days"][$ei]="14"; $exception["note"][$ei]= " Info 2000:
FNEWS(17)#02 has a naming error: FNEWS1802
but publishing date is correct.
Renamed to FNEWS1702.NWS."; $ei++; $exception["type"][$ei]="92"; $exception["year"][$ei]=2000; $exception["days"][$ei]="112"; $exception["note"][$ei]= " Info Diff #112/00:
R50PNT_D.112 recovered from informations of R50PNT_D.119 and Z2PNT_D.112."; // R24 pointlist : ((($slct==31) || ($slct==32)) && (($year==2001) && ($day==173)) ) $ei++; $exception["type"][$ei]="31,32"; $exception["year"][$ei]=2001; $exception["days"][$ei]="173"; $exception["note"][$ei]= " Info:
R24PNT and R24PNT_D starts official distribution and starts inclusion into the Z2PNT list.
There is no R24PNT_D Diff before."; $ei++; $exception["type"][$ei]="81,82"; $exception["year"][$ei]=2003; $exception["days"][$ei]="248,255"; $exception["note"][$ei]= " Info Diff 248/03, 255/03:
PNT46REG.248 distribution skipped.
This is a Diff compile by Z2PK from repaired lists #241/03 upto #255/03 and recovery of full lists #248 and #255/03 for continuous diff compile."; $ei++; $exception["type"][$ei]="81"; $exception["year"][$ei]=2003; $exception["days"][$ei]="262,269,276,283,290,297,304,311,318,325,332,339,346,353,360"; $exception["note"][$ei]= " Info PNT46REG 262/03 - 360/03:
recovered lists #255 - #360."; $ei++; $exception["type"][$ei]="81"; $exception["year"][$ei]=2004; $exception["days"][$ei]="002,009,016,023,030"; $exception["note"][$ei]= " Info PNT46REG 002/04 - 030/04:
recovered lists #002 - #030/04."; $ei++; $exception["type"][$ei]="91,92"; $exception["year"][$ei]=2004; $exception["days"][$ei]="184,191"; $exception["note"][$ei]= " Info List/Diff #184/04, #191/04:
R50PNT.184 has as header info day# 191.
Diff #191 doesn't compile.
Just rename'd R50PNT.184 to R50PNT.191"; $ei++; $exception["type"][$ei]="91,92"; $exception["year"][$ei]=2004; $exception["days"][$ei]="331,338,345,352,359,366"; $exception["note"][$ei]= " Info List/Diff #331/04 - #366/04:
R50PNT #331 - #366 has been recovered from diffs #345-#366.
Diff #331 and #338 just copies of #345 with different headers."; $ei++; $exception["type"][$ei]="91,92"; $exception["year"][$ei]=2005; $exception["days"][$ei]="7,14"; $exception["note"][$ei]= " Info List/Diff #007/05, #014/05:
R50PNT.007 and R50PNT.014 have a wrong year (2004) in header information."; // NODELIST : 2005 35 // 035/2005 ? zone 4 problem with 0Ah within lines // results in compile problem by some compilers $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2005; $exception["days"][$ei]="35"; $exception["note"][$ei]= " Info #035/2005:
Zone 4 problem with 0Ah within Nodelist lines results in compile problems by some compilers."; // NODELIST : 2005 42 // 042/2005 2 different diffs distributed, results in confusion $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2005; $exception["days"][$ei]="42"; $exception["note"][$ei]= " Info #042/2005:
2 different Diffs distributed, results in confusion."; // NODELIST : (($year==2006) && ((($day>310) && ($day<343)) // 314/2006 2 different diffs distribution results in // confusion $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2006; $exception["days"][$ei]="314"; $exception["note"][$ei]= " Info #314/2006:
2 different Diffs distributed, results in confusion."; // 321,328,335,342/2006 after disc-crash late distribution, and confusion // about 2 different #314 diffs $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2006; $exception["days"][$ei]="321,328,335,342"; $exception["note"][$ei]= " Info #321-342/2006:
After a disc crash on Wards system #321, #328, #335, #342 is late distributed. There are some confusions about 2 different #314 diffs that was now (late) identified."; // NODELIST : ($year==2006) && ($day==286) // 286/2006 region46.293 segment naming problem ends // in missing r46, so 2 different diffs are // distributed, that results in confusion $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2006; $exception["days"][$ei]="286"; $exception["note"][$ei]= " Info #286/2006:
Region46.293 Segment naming problem ends in missing R46, DIFF redistributed so 2 different Diffs are distributed, that results in confusion."; // NODELIST : ($slct==1) || ($slct==2) // ($year==2007) && ($day==75)) // 075/2007 missing zone,2, and zone,4, lines $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2007; $exception["days"][$ei]="75"; $exception["note"][$ei]= " Info:
Zone 2 Nodelist exception:
Zone,2,.. and Zone,4,.. lines missing
results in Zone 2 nodes becomes Zone 0 nodes
and Zone 4 nodes becomes Zone 3 nodes.
Fixed in #082."; // Z2PNT : ($slct==22) // ($year==2007) && ($day>=096)) // 096-138 Diff Patched /2007 no official distribution $ei++; $exception["type"][$ei]="21,22"; $exception["year"][$ei]=2007; $exception["days"][$ei]="96,103,110,117,124,131,138"; $exception["note"][$ei]= " Info:
Z2PNT exception #138:
Between Z2PNT.089 and Z2PNT.138 there was no official Diff distribution.
Z2PNT.138 was distributed in full.
The missing Diff patches and lists were build by RPK24 to handle an uninterupted Z2PNT and Z2PNT_D distribution."; // R50PNT : ($slct==22) // ($year==2007) && ($day>=096)) // 096-138 Diff Patched /2007 no official distribution $ei++; $exception["type"][$ei]="91"; $exception["year"][$ei]=2007; $exception["days"][$ei]="96,103,110,124,131"; $exception["note"][$ei]= " Info:
R50PNT exceptions:
Between R50PNT.089 and R50PNT.138 there was no official Diff and only two full lists (#117 and #138) distribution.
R50PNT.117 and R50PNT.138 were distributed in full.
The missing Diff patches and lists were build by RPK24 to handle an uninterupted R50PNT and R50PNT_D distribution."; // R50PNT_D : ($slct==22) // ($year==2007) && ($day>=096)) // 096-138 Diff Patched /2007 no official distribution $ei++; $exception["type"][$ei]="91"; $exception["year"][$ei]=2007; $exception["days"][$ei]="138"; $exception["note"][$ei]= " Info:
R50PNT exception:
After R50PNT.138 there was no official R50PNT distribution as Alexey Antonyuk resigned as Z2PK and RPK."; $ei++; $exception["type"][$ei]="92"; $exception["year"][$ei]=2007; $exception["days"][$ei]="96,103,110,117,124,131,138"; $exception["note"][$ei]= " Info:
R50PNT exceptions:
Between R50PNT.089 and R50PNT.138 there was no official Diff and only two full lists (#117 and #138) distribution.
R50PNT.117 and R50PNT.138 were distributed in full.
The missing Diff patches and lists were build by RPK24 to handle an uninterupted R50PNT and R50PNT_D distribution.

There was no R50PNT distribution after #138 as Alexey Antonyuk resigned as Z2PK."; // Z2PNT : ($slct==22) // ($year==2007) && ($day>=096)) // 096-138 Diff Patched /2007 no official distribution $ei++; $exception["type"][$ei]="21,22"; $exception["year"][$ei]=2007; $exception["days"][$ei]="145,152,159,166,173,180,187,194,201,208,215,222,229,236,243,250,257,264,271,278,285,292,299,306,313,320,327,334,341,348"; $exception["note"][$ei]= " Info:
Z2PNT exception 2007:
From Z2PNT.145 to Z2PNT.348 there was no official Z2PNT distribution.
Alexey Antonyuk resigned as Z2PK.
The next official distribution was #355.
"; $ei++; $exception["type"][$ei]="26,27"; $exception["year"][$ei]=2007; $exception["days"][$ei]="145,152,159,166,173,180,187,194,201,208,215,222,229,236,243,250,257,264,271,278,285,292,299,306,313,320,327,334,341,348"; $exception["note"][$ei]= " Info:
Z2PNT exception 2007:
From Z2PNT.145 to Z2PNT.348 there was no official Z2PNT distribution.
Alexey Antonyuk resigned as Z2PK.
The Boss format files in the archive are files from an inofficial late compile of some actual regional segments from the Fido-History-Archive end of Dec '07.
There was no Diff file #145 caused by the format change from Poss to Boss.
The first official distribution was #355.
"; $ei++; $exception["type"][$ei]="76"; $exception["year"][$ei]=2007; $exception["days"][$ei]="313"; $exception["note"][$ei]= " Info #313/07:
recovered R45POINT.313 from #306 and #320."; $ei++; $exception["type"][$ei]="26,27"; $exception["year"][$ei]=2007; $exception["days"][$ei]="355"; $exception["note"][$ei]= " Info:
Z2PNT exception 2007:
Z2PNT.355 reinstalled official Z2PNT distribution.
#355 distributed as list only.
No Diff were released.
Ulrich Schroeter steps in Z2PK.
"; $ei++; $exception["type"][$ei]="76"; $exception["year"][$ei]=2008; $exception["days"][$ei]="109"; $exception["note"][$ei]= " Info #109/08:
recovered R45POINT.109 from #102 and #116."; $ei++; $exception["type"][$ei]="51,52,53,54"; $exception["year"][$ei]=2008; $exception["days"][$ei]="123"; $exception["note"][$ei]= " Info:
R31PNT exception 2008:
Point4d.123 content distributed as Point4d.a16 (overwrites #116)
Point4d.a16 renamed to Point4d.a23."; $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2008; $exception["days"][$ei]="193,200"; $exception["note"][$ei]= " Info 193/08, 200/08:
Late distribution, all changes of #193 and #200 are in #193, #200 for sync only."; $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2008; $exception["days"][$ei]="235,242,249"; $exception["note"][$ei]= " Info 235 - 249/08:
Late distribution."; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2008; $exception["days"][$ei]="277"; $exception["note"][$ei]= " Info 277/08:
First distribution day number #274 as Boss format under new RPK Evgeny Vetrov
not included in Z2PNT.277 yet.
Segment contains an addtl. Ctrl+Z that prevents inclusion of full segment."; $ei++; $exception["type"][$ei]="26,27"; $exception["year"][$ei]=2008; $exception["days"][$ei]="284"; $exception["note"][$ei]= " Info 284/08:
Starting Z2PNT.284 added R50PNT distribution.
Included a repaired R50PNT segment (as of R50PNT.284 Ctrl+Z and CRC problems).
Z2PNT_D.284 distributed in full as a side effect of R50PNT inclusion (too many differences).
Diff#284 Download version is a late compiled Diff."; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2008; $exception["days"][$ei]="284"; $exception["note"][$ei]= " Info 284/08:
R50PNT and R50PNT_D #284 crc errors
Segment contains an addtl. Ctrl+Z that prevents inclusion and/or compile of full list.
There is also an official #283 distributed."; $ei++; $exception["type"][$ei]="94"; $exception["year"][$ei]=2008; $exception["days"][$ei]="291"; $exception["note"][$ei]= " Info Diff 291/08:
R50PNT.284 and R50PNT_D.291 doesnt match.
Diff contains a different first line as the official #284 full list."; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2008; $exception["days"][$ei]="312"; $exception["note"][$ei]= " Info List/Diff 312/08:
No official R50PNT.312 distribution.
This is a repair compile from
#305 and #319 that works with the
#319 Diff for editnl compilers."; $ei++; $exception["type"][$ei]="51"; $exception["year"][$ei]=2008; $exception["days"][$ei]="186"; $exception["note"][$ei]= " Info R31 Pointlist:
#186 Boss format list has been recovered."; $ei++; $exception["type"][$ei]="51,53"; $exception["year"][$ei]=2008; $exception["days"][$ei]="207"; $exception["note"][$ei]= " Info R31 Pointlist:
#207 Point and Boss format lists has been recovered."; $ei++; $exception["type"][$ei]="31,32"; $exception["year"][$ei]=2008; $exception["days"][$ei]="333"; $exception["note"][$ei]= " R24PNT Info #333/08:
Changed Boss format starting R24PNT.333 to be FTS-5000 aware.
Removed mandatory leading commas."; $ei++; $exception["type"][$ei]="26,27"; $exception["year"][$ei]=2008; $exception["days"][$ei]="333"; $exception["note"][$ei]= " Z2PNT Info 333/08:
Changed Boss format starting Z2PNT.333 to be FTS-5000 aware.
Removed mandatory leading commas."; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2008; $exception["days"][$ei]="333,340"; $exception["note"][$ei]= " Info List/Diff 333/08:
No official R50PNT.333 distribution.
This is a repair compile from
the #326 and #340 full lists that works with the
#333 Diff for editnl compilers.
#340 is also a fixed Diff version for distribution."; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2008; $exception["days"][$ei]="361"; $exception["note"][$ei]= " Info List/Diff 361/08:
R50PNT #361 distributed as R50PNT.2
with a wrong daynumber and a wrong header
line. This is a repair compile."; $ei++; $exception["type"][$ei]="26,27"; $exception["year"][$ei]=2008; $exception["days"][$ei]="361"; $exception["note"][$ei]= " Info 361/08:
Starting Z2PNT.361 added R46PNT distribution."; $ei++; $exception["type"][$ei]="61"; $exception["year"][$ei]=2008; $exception["days"][$ei]="004,011,018,025,032,039,046,053,060,067,074,081,088,095,102,109,116,123,130,137,144,151,158,165,172,179,186,193,200"; $exception["note"][$ei]= " Info List #004/08 - #200/08:
Some R23PNT missing
and wrong line termination problems
Fixed with Diffing #004/08 - #200/08
CRC recalculated."; $ei++; $exception["type"][$ei]="62"; $exception["year"][$ei]=2008; $exception["days"][$ei]="011,018,025,032,039,046,053,060,067,074,081,088,095,102,109,116,123,130,137,144,151,158,165,172,179,186,193,200"; $exception["note"][$ei]= " Info List #004/08 - #200/08:
Some R23PNT missing
and wrong line termination problems
Fixed with Diffing #004/08 - #200/08
CRC recalculated."; $ei++; $exception["type"][$ei]="61"; $exception["year"][$ei]=2008; $exception["days"][$ei]="207,214,221,228,235,242,249,256,263,270,277,284,291,298,305,312,319,326,333,340,347,354,361"; $exception["note"][$ei]= " Info List #207/08 - #326/08 - #361/08:
R23PNT missing
and wrong line termination problems
Fixed with Diffing #207/08 - #326/08
and #326/08 - #226/09
CRC recalculated."; $ei++; $exception["type"][$ei]="62"; $exception["year"][$ei]=2008; $exception["days"][$ei]="207,214,221,228,235,242,249,256,263,270,277,284,291,298,305,312,319,326,333,340,347,354,361"; $exception["note"][$ei]= " Info List #214/08 - #326/08 - #361/08:
R23PNT's missing
and wrong line termination problems
Fixed with Diffing
CRC recalculated."; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="002"; $exception["note"][$ei]= " Info List/Diff 002/09:
R50PNT.002 distributed as R50PNT.361
with a wrong daynumber and a wrong header
line. This is a repair compile."; $ei++; $exception["type"][$ei]="94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="009"; $exception["note"][$ei]= " Info Diff 009/09:
R50PNT.009 distributed w/o Diff.
This is a Diff compile by Z2PK from repaired lists #361/08 and #002/09."; $ei++; $exception["type"][$ei]="94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="016,023"; $exception["note"][$ei]= " Info Diff 016-023/09:
R50PNT.016 and R50PNT.023 distributed w/o Diff.
This is a Diff compile by Z2PK."; $ei++; $exception["type"][$ei]="94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="030,037,044,079,086,156,219"; // $exception["note"][$ei]= " Info Diff #030, 037 and others:
Missing R50PNT Diff.
Diff created by Z2PK.
Re-Diffing replaces
heavily increased DIFFs
build with new PLDiff 1.10-b6"; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="058,065"; $exception["note"][$ei]= " Info Diff 058-065/09:
R50PNT.058 distributed twice times. The first one with CRC 07722, the 2nd one is a #058 replacement with CRC 09335 to which Diff #065 relates.
Diff #058 archive contains both Diff versions. R50PNT.058 is the last corrected one."; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="093,100"; $exception["note"][$ei]= " Info List/Diff 093/09 and 100/09:
Missing R50PNT.093.
R50PNT.100 w/o CRC.
Wrong day# extension (z0).
This is a repair compile / diff."; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="107"; $exception["note"][$ei]= " Info List/Diff 107/09:
R50PNT.107 w/o CRC.
Wrong day# extension (z7).
This is a repair compile / diff."; $ei++; $exception["type"][$ei]="93,94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="114,121,128"; $exception["note"][$ei]= " Info List/Diff 114, 121, 128/09:
R50PNT w/o CRC.
Diff missing.
This is a repair compile / diff."; $ei++; $exception["type"][$ei]="94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="135,142,149,163,170,177,184,191,198,205,212,226,233,240,247,254,261,268,275,282,289"; // ,219,226,233,240,247,254,261,268,275"; $exception["note"][$ei]= " Info List/Diff #135 ff.:
Missing R50PNT Diff.
Diff created by Z2PK."; $ei++; $exception["type"][$ei]="93"; $exception["year"][$ei]=2009; $exception["days"][$ei]="184,191,198"; $exception["note"][$ei]= " Info List #184/09, #191/09, #198/09:
R50PNT archive exception
Orig archive contains also segments from last year (i.e. #284/08)
file that confuses test script
that prevents Z2PNT inclusion."; $ei++; $exception["type"][$ei]="56"; $exception["year"][$ei]=2009; $exception["days"][$ei]="212"; $exception["note"][$ei]= " Info List #212/09:
R22PNT #212 missing
compiled from #205 and #219 by Z2PK"; $ei++; $exception["type"][$ei]="93"; $exception["year"][$ei]=2009; $exception["days"][$ei]="247,254"; $exception["note"][$ei]= " Info List #247/09, #254/09:
R50PNT missing
Repaired from generated Diff's."; $ei++; $exception["type"][$ei]="61,62"; $exception["year"][$ei]=2009; $exception["days"][$ei]="002,009,016,023,030,037,044,051,058,065,072,079,086,093,100,107,114,121,128,135,142,149,156,163,170,177,184,191,198,205,212,219,226,233,240,247,254,261"; $exception["note"][$ei]= " Info List #002/09 - #261/09:
R23PNT's missing
and wrong line termination problems
Fixed with Diffing #326/08 - #261/09
CRC recalculated."; $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2009; $exception["days"][$ei]="268"; $exception["note"][$ei]= " Info:
Zone 2 Nodelist exception:
Zone,2,.. line missing
results in Zone 2 nodes becomes Zone 0 nodes."; $ei++; $exception["type"][$ei]="56"; $exception["year"][$ei]=2009; $exception["days"][$ei]="282"; $exception["note"][$ei]= " Info List #282/09:
R22PNT #282 missing
compiled from #275 and #289 by Z2PK"; $ei++; $exception["type"][$ei]="26,27"; $exception["year"][$ei]=2009; $exception["days"][$ei]="037,289"; $exception["note"][$ei]= " Info: Z2PNT and Z2PNT_D exception #289/2009:
Z2PNT.289 tic'd as Z37.
That overwrites Z37 released 6.2.09
Repaired by Z2PK.
Archives Z37 contains 037 and
Z89 containts #289 files."; $ei++; $exception["type"][$ei]="61,62"; $exception["year"][$ei]=2009; $exception["days"][$ei]="268,275,282,289"; $exception["note"][$ei]= " Info List #268/09 - #282/09
and Diffs #268/09 - #289/09:

R23PNT's missing
and wrong line termination problems
Fixed with Diffing #261/09 - #289/09
CRC recalculated."; $ei++; $exception["type"][$ei]="93"; $exception["year"][$ei]=2009; $exception["days"][$ei]="296"; $exception["note"][$ei]= " Info List #296/09:
R50PNT missing
Repaired from generated Diff's."; $ei++; $exception["type"][$ei]="94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="296,303"; $exception["note"][$ei]= " Info List/Diff #296 ff.:
Missing R50PNT Diff.
Diff created by Z2PK."; $ei++; $exception["type"][$ei]="56"; $exception["year"][$ei]=2009; $exception["days"][$ei]="303"; $exception["note"][$ei]= " Info List #303/09:
R22PNT #303 missing
compiled from #296 and #310 by Z2PK"; $ei++; $exception["type"][$ei]="61,62"; $exception["year"][$ei]=2009; $exception["days"][$ei]="296,303,310,317"; $exception["note"][$ei]= " Info List #296/09 - #310/09
and Diffs #296/09 - #317/09:

R23PNT's missing
and wrong line termination problems
Fixed with Diffing #289/09 - #317/09
CRC recalculated."; $ei++; $exception["type"][$ei]="94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="310,317"; $exception["note"][$ei]= " Info List/Diff #310 ff.:
Missing R50PNT Diff.
Diff created by Z2PK."; $ei++; $exception["type"][$ei]="56"; $exception["year"][$ei]=2009; $exception["days"][$ei]="324"; $exception["note"][$ei]= " Info List #324/09:
R22PNT #324 missing
compiled from #317 and #331 by Z2PK"; $ei++; $exception["type"][$ei]="61,62"; $exception["year"][$ei]=2009; $exception["days"][$ei]="324,331"; $exception["note"][$ei]= " Info List #324/09 - #331/09
R23PNT's missing
and wrong line termination problems
Fixed with Diffing #317/09 - #331/09
CRC recalculated."; $ei++; $exception["type"][$ei]="1,2"; $exception["year"][$ei]=2009; $exception["days"][$ei]="338"; $exception["note"][$ei]= " Info #338/2009:
Zone 2 Nodediff/Nodelist exception:
late distribution."; $ei++; $exception["type"][$ei]="94"; $exception["year"][$ei]=2009; $exception["days"][$ei]="324,331,338,345"; $exception["note"][$ei]= " Info List/Diff #324 ff.:
Missing R50PNT Diff.
Diff created by Z2PK."; // NODELIST, POINTLISTS, FIDONEWS EXCEPTIONS -- End // :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: // some local functions // rat returns last position of string searched function rat($such,$string) { $rtlen = strlen($string); $slen = strlen($such); $rtpos = 0; for ($j=$rtlen; $j > 0; $j--) { $rtchr = substr($string,$j,$slen); if ($rtchr==$such) { if ($rtpos==0) { $rtpos = $j; $j = 0; } } } return $rtpos; } // returns first position of string searched function at($such,$string) { $slen = strlen($such); $rtlen = strlen($string); $rtpos = 0; for ($j=0; $j < $rtlen; $j++) { $rtchr = substr($string,$j,$slen); if ($rtchr==$such) { if ($rtpos==0) { $rtpos = $j; $j = $rtlen; } } } return $rtpos; } // macro for strlen() function len($t) { return strlen($t); } // :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: $datum=mktime(0,0,0,01,06,1984); // startdate 6.1.1984 // skip to start year? // if startyear > actyear do nothing if ($code_criterion!=4) { if ($code_criterion<2) { $startyear=1984; // nodelist } else { if ($code_criterion==3) { $startyear=1984; // fidonews } else { if ($zone_criterion==20) { // z2pnt $startyear=1999; } else { if (($zone_criterion==30)) { // r24 // formats: Fake, Boss $startyear=1989; } else { if (($zone_criterion==40)) { // r28 // formats: Fidouser, Boss $startyear=1997; } else { if (($zone_criterion==50)) { // r31 // formats: V7, Boss $startyear=1998; } else { if (($zone_criterion==55)) { // r22 // formats: Poss $startyear=2008; } else { if (($zone_criterion==60)) { // r23 // formats: Boss, Fake $startyear=1992; // $lastyear =2005; } else { if (($zone_criterion==70)) { // r34 // formats: Boss, Fake $startyear=2001; } else { if (($zone_criterion==75)) { // r45 // formats: Poss $startyear=2004; } else { if (($zone_criterion==80)) { // r46 // formats: Poss $startyear=1997; } else { if (($zone_criterion==85)) { // r48 // formats: Boss $startyear=2007; } else { if (($zone_criterion==90)) { // r50 // formats: Poss, Boss $startyear=1997; } else { if (($zone_criterion==100)) { // r29 // formats: Boss, V7 $startyear=1997; $lastyear =2001; } } } } } } } } } } } } } } $fidoyear = ($startyear-1984)+1; $testyear=date("Y",$datum); if ($testyear<$startyear) { while ($year<$startyear-1) { $sikdatum = $datum; $year=date("Y",$datum); $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)); } } } $year=date("Y",$datum); $dovos = false; $dov = ""; $year2 = $year; ?>
$year2 "; } else { if ($dovos) { $dov .= "| $year2 "; } else { $dovos = true; $dov .= "$year2 "; } } $year2++; } echo "Index:
".$dov."
\n"; ?>
"; echo "\n"; if ($slct==3) { $teller=0; } else { if ($day!=1) { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { 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 "\n"; } else { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { echo "\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 "\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
$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)."    ".$listtype; } else { echo "
  ".$listtype; } if ($ptype!="") { echo "
(".$ptype.")\n"; } echo "
"; } else { echo ""; } echo "  "; echo $printweek.""; } else { echo ""; } echo $printday."
"; } else { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { echo ""; } else { echo ""; } } echo " 
"; $year=date("Y",$datum); $dovos = false; $dov = ""; $year2 = $year; echo "\r\n"; for ($j=1; $j <= 5; $j++) { echo "\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 ""; 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 "\n"; } else { if ((($year==1987) && ($day>212)) OR (($year>1987)) ) { echo "\n"; } } echo "\r\n"; } } } } ?>
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 "
 ".$l5y[$j]."
  ".$ll[$lc]['description']."    "; if ($ll[$lc]['format']!="") { echo "(".$ll[$lc]['format'].")\n"; } echo ""; echo $printweek.""; } else { echo ""; } echo $printday."
 
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