tor-webwml.git

1) #!/usr/bin/perl -w
2) use warnings;
3) use strict;
4) use LWP::Simple;
5) use LWP;
6) use Date::Parse;

7) use Date::Format;

8) 

9) #
10) # A quick hack by Jacob Appelbaum <jacob@appelbaum.net>

11) # LWP suggestions by Leigh Honeywell

12) # This is Free Software (GPLv3)
13) # http://www.gnu.org/licenses/gpl-3.0.txt
14) #

15) #Contacted

16) #Kamagurka TIMOUTS (Should be up in about a week)

17) #

18) #CHANGELOG
19) #20091003 Code changes to elimiate the need for a trailing slash in addresses for script runtime
20) #

21) 

22) print "Creating LWP agent ($LWP::VERSION)...\n";
23) my $lua = LWP::UserAgent->new(
24)     keep_alive => 1,

25)     timeout => 15,

26)     agent => "Tor MirrorCheck Agent"
27) );
28) 
29) sub sanitize {
30)     my $taintedData = shift;
31)     my $cleanedData;
32)     my $whitelist = '-a-zA-Z0-9: +';
33) 
34)     # clean the data, return cleaned data
35)     $taintedData =~ s/[^$whitelist]//go;
36)     $cleanedData = $taintedData;
37) 
38)     return $cleanedData;
39) }
40) 
41) sub FetchDate {
42)     my $url = shift; # Base url for mirror

43)     my $trace = "/project/trace/www.torproject.org"; # Location of recent update info

44)     $url = "$url$trace";
45) 
46)     print "Fetching possible date from: $url\n";
47) 
48)     my $request = new HTTP::Request GET => "$url";
49)     my $result = $lua->request($request);

50)     my $code = $result->code();
51)     print "Result code $code\n";

52) 

53)     if ($result->is_success && $code eq "200"){

54)        my $taint = $result->content;
55)        my $content = sanitize($taint);
56)        if ($content) {

57) 

58)             my $date = str2time($content);
59) 
60)             if ($date) {
61)                 print "We've fetched a date $date.\n";
62)                 return $date;
63)             } else {
64)                 print "We've haven't fetched a date.\n";
65)                 return "Unknown";
66)             }
67) 
68)         } else {
69)             print "Unable to fetch date, empty content returned.\n";
70)             return "Unknown";
71)         }

72) 

73)     } else {
74)        print "Our request failed, we had no result.\n";
75)        return "Unknown";
76)     }

77) 
78)     return "Unknown";

79) }
80) 
81) # This is the list of all known Tor mirrors
82) # Add new mirrors to the bottom!

83) my %m = (
84)         mirror000 => {
85)             adminContact => "tor AT goodeid DOT com",

86)             orgName => "Goodeid",

87)             isoCC => "CA",

88)             subRegion => "",

89)             region => "North America",

90)             ipv4 => "True",
91)             ipv6 => "False",
92)             loadBalanced => "No",

93)             httpWebsiteMirror => "http://tor-node.goodeid.com:8081/",
94)             httpsWebsiteMirror => "https://tor-node.goodeid.com:8444/",

95)             rsyncWebsiteMirror => "",
96)             ftpWebsiteMirror => "",

97)             httpDistMirror => "http://tor-node.goodeid.com:8081/dist/",
98)             httpsDistMirror => "https://tor-node.goodeid.com:8444/dist/
99) 
100) ",

101)             rsyncDistMirror => "",
102)             hiddenServiceMirror => "",
103)             updateDate => "Unknown",
104)         },
105) 

106)         mirror001 => {
107)             adminContact => "BarkerJr AT barkerjr DOT net",
108)             orgName => "BarkerJr",
109)             isoCC => "FR",
110)             subRegion => "",
111)             region => "FR",
112)             ipv4 => "True",
113)             ipv6 => "False",
114)             loadBalanced => "No",

115)             httpWebsiteMirror => "http://www.oignon.net/",
116)             httpsWebsiteMirror => "https://oignon.net/",

117)             rsyncWebsiteMirror => "",
118)             ftpWebsiteMirror => "",

119)             httpDistMirror => "http://www.oignon.net/dist/",

120)             httpsDistMirror => "https://oignon.net/dist/",

121)             rsyncDistMirror => "",
122)             hiddenServiceMirror => "",
123)             updateDate => "Unknown",
124)         },
125) 

126)        mirror002 => {

127)             adminContact => "operator AT hermetix DOT org",

128)             orgName => "Hermetix",

129)             isoCC => "CA",
130)             subRegion => "QC",
131)             region => "North America",
132)             ipv4 => "True",
133)             ipv6 => "False",
134)             loadBalanced => "Unknown",
135)             httpWebsiteMirror => "http://tor.hermetix.org/",
136)             rsyncWebsiteMirror => "",

137)             httpDistMirror => "",

138)             rsyncDistMirror => "",

139)             updateDate => "Unknown",

140)         },
141) 
142)        mirror003 => {

143)             adminContact => "",

144)             orgName => "Boinc",

145)             isoCC => "CH",
146)             subRegion => "",
147)             region => "Europe",
148)             ipv4 => "True",
149)             ipv6 => "False",
150)             loadBalanced => "Unknown",
151)             httpWebsiteMirror => "http://tor.boinc.ch/",
152)             ftpWebsiteMirror => "",
153)             rsyncWebsiteMirror => "",
154)             httpDistMirror => "http://tor.boinc.ch/dist/",
155)             rsyncDistMirror => "",

156)             updateDate => "Unknown",

157)         },
158) 
159)        mirror004 => {

160)             adminContact => "peihanru AT gmail DOT com",

161)             orgName => "Anonymity",

162)             isoCC => "CN",
163)             subRegion => "",
164)             region => "Asia",
165)             ipv4 => "True",
166)             ipv6 => "False",
167)             loadBalanced => "Unknown",

168)             httpWebsiteMirror => "http://tor.cypherpunks.cn/",

169)             ftpWebsiteMirror => "",
170)             rsyncWebsiteMirror => "",

171)             httpDistMirror => "http://tor.cypherpunks.cn/dist/",

172)             rsyncDistMirror => "",

173)             updateDate => "Unknown",

174)         },
175) 

176)        mirror005 => {

177)             adminContact => "citizen428 AT gmail DOT com",

178)             orgName => "Bbs",

179)             isoCC => "DE",
180)             subRegion => "",
181)             region => "Europe",
182)             ipv4 => "True",
183)             ipv6 => "False",
184)             loadBalanced => "Unknown",
185)             httpWebsiteMirror => "http://tor.blingblingsquad.net/",
186)             ftpWebsiteMirror => "",
187)             rsyncWebsiteMirror => "",

188)             httpDistMirror => "",

189)             rsyncDistMirror => "",

190)             updateDate => "Unknown",

191)         },
192) 

193)        mirror006 => {

194)             orgName => "Berapla",
195)             isoCC => "DE",
196)             subRegion => "",
197)             region => "Europe",
198)             ipv4 => "True",
199)             ipv6 => "False",
200)             loadBalanced => "Unknown",
201)             httpWebsiteMirror => "http://download.berapla.de/mirrors/tor/",
202)             ftpWebsiteMirror => "",
203)             rsyncWebsiteMirror => "",
204)             httpDistMirror => "http://download.berapla.de/mirrors/tor/dist/",
205)             rsyncDistMirror => "",
206)             updateDate => "Unknown",
207)         },

208) 

209)        mirror007 => {

210)             adminContact => "cm AT cybermirror DOT org",

211)             orgName => "Cybermirror",

212)             isoCC => "DE",
213)             subRegion => "",
214)             region => "Europe",
215)             ipv4 => "True",
216)             ipv6 => "False",
217)             loadBalanced => "Unknown",
218)             httpWebsiteMirror => "http://tor.cybermirror.org/",
219)             ftpWebsiteMirror => "",
220)             rsyncWebsiteMirror => "",
221)             httpDistMirror => "http://tor.cybermirror.org/dist/",
222)             rsyncDistMirror => "",

223)             updateDate => "Unknown",

224)         },
225) 

226)        mirror008 => {

227)             adminContact => "contact AT algorithmus DOT com",

228)             orgName => "Spline",
229)             isoCC => "DE",
230)             subRegion => "FU",
231)             region => "Europe",
232)             ipv4 => "True",
233)             ipv6 => "False",
234)             loadBalanced => "Unknown",

235)             httpWebsiteMirror => "",

236)             ftpWebsiteMirror => "",
237)             rsyncWebsiteMirror => "",

238)             httpDistMirror => "http://rem.spline.de/tor/",

239)             rsyncDistMirror => "",

240)             updateDate => "Unknown",

241)         },
242) 

243) 	mirror009 => {
244)             adminContact => "BarkerJr AT barkerjr DOT net",
245)             orgName => "BarkerJr",
246)             isoCC => "US",
247)             subRegion => "",
248)             region => "US",
249)             ipv4 => "True",
250)             ipv6 => "False",
251)             loadBalanced => "No",

252)             httpWebsiteMirror => "http://www.cebolla.us/",
253)             httpsWebsiteMirror => "https://www.cebolla.us/",

254)             rsyncWebsiteMirror => "",
255)             ftpWebsiteMirror => "",
256)             httpDistMirror => "http://www.cebolla.us/dist/",
257)             httpsDistMirror => "https://www.cebolla.us/dist/",
258)             rsyncDistMirror => "",
259)             hiddenServiceMirror => "",
260)             updateDate => "Unknown",
261)         },
262) 
263) 	mirror010 => {
264)             adminContact => "",
265)             orgName => "zuola",
266)             isoCC => "CN",
267)             subRegion => "",
268)             region => "CN",
269)             ipv4 => "True",
270)             ipv6 => "False",
271)             loadBalanced => "No",
272)             httpWebsiteMirror => "http://tor.zuo.la/",
273)             httpsWebsiteMirror => "",
274)             rsyncWebsiteMirror => "",
275)             ftpWebsiteMirror => "",
276)             httpDistMirror => "http://tor.zuo.la/dist/",
277)             httpsDistMirror => "",
278)             rsyncDistMirror => "",
279)             hiddenServiceMirror => "",
280)             updateDate => "Unknown",
281)         },
282) 

283)        mirror011 => {

284)             adminContact => "info AT zentrum-der-gesundheit DOT de",

285)             orgName => "Zentrum der Gesundheit",

286)             isoCC => "DK",
287)             subRegion => "",
288)             region => "Europe",
289)             ipv4 => "True",
290)             ipv6 => "False",
291)             loadBalanced => "Unknown",

292)             httpWebsiteMirror => "http://tor.zdg-gmbh.eu/",

293)             ftpWebsiteMirror => "",

294)             rsyncWebsiteMirror => "",

295)             httpDistMirror => "http://tor.zdg-gmbh.eu/dist/",
296)             rsyncDistMirror => "",

297)             updateDate => "Unknown",

298)         },
299) 

300)        mirror012 => {

301)             adminContact => "kurt AT miroir-francais DOT fr",

302)             orgName => "CRAN",
303)             isoCC => "FR",

304)             subRegion => "Ile de France",

305)             region => "Europe",
306)             ipv4 => "True",
307)             ipv6 => "False",
308)             loadBalanced => "Unknown",

309)             httpWebsiteMirror => "",

310)             rsyncWebsiteMirror => "rsync://miroir-francais.fr::tor",

311)             ftpWebsiteMirror => "ftp://miroir-francais.fr/pub/tor/",

312)             httpDistMirror => "http://tor.miroir-francais.fr/",

313)             rsyncDistMirror => "",

314)             updateDate => "Unknown",

315)         },
316) 

317)        mirror013 => {

318)             adminContact => "root AT amorphis DOT eu",

319)             orgName => "Amorphis",

320)             isoCC => "NL",
321)             subRegion => "",
322)             region => "Europe",
323)             ipv4 => "True",
324)             ipv6 => "False",
325)             loadBalanced => "Unknown",
326)             httpWebsiteMirror => "http://tor.amorphis.eu/",

327)             rsyncWebsiteMirror => "",

328)             ftpWebsiteMirror => "",
329)             httpDistMirror => "http://tor.amorphis.eu/dist/",
330)             rsyncDistMirror => "",

331)             updateDate => "Unknown",

332)         },
333) 

334)        mirror014 => {

335)             adminContact => "mirror AT bit DOT nl",

336)             orgName => "BIT BV",
337)             isoCC => "NL",
338)             subRegion => "",
339)             region => "Europe",
340)             ipv4 => "True",
341)             ipv6 => "False",
342)             loadBalanced => "Unknown",

343)             httpWebsiteMirror => "",

344)             rsyncWebsiteMirror => "",

345)             ftpWebsiteMirror => "ftp://ftp.bit.nl/mirror/tor/",

346)             httpDistMirror => "http://ftp.bit.nl/mirror/tor/",

347)             rsyncDistMirror => "",

348)             updateDate => "Unknown",

349)         },
350) 

351)        mirror015 => {

352)             adminContact => "webmaster AT ccc DOT de",

353)             orgName => "CCC",
354)             isoCC => "NL",
355)             subRegion => "",
356)             region => "Europe",
357)             ipv4 => "True",
358)             ipv6 => "False",
359)             loadBalanced => "Unknown",
360)             httpWebsiteMirror => "http://tor.ccc.de/",

361)             rsyncWebsiteMirror => "",

362)             ftpWebsiteMirror => "",
363)             httpDistMirror => "http://tor.ccc.de/dist/",
364)             rsyncDistMirror => "",

365)             updateDate => "Unknown",

366)         },
367) 

368)        mirror016 => {

369)             adminContact => "root AT kamagurka DOT org",

370)             orgName => "Kamagurka",

371)             isoCC => "NL",
372)             subRegion => "Haarlem",
373)             region => "Europe",
374)             ipv4 => "True",
375)             ipv6 => "False",
376)             loadBalanced => "Unknown",
377)             httpWebsiteMirror => "http://tor.kamagurka.org/",

378)             rsyncWebsiteMirror => "",

379)             ftpWebsiteMirror => "",
380)             httpDistMirror => "http://tor.kamagurka.org/dist/",
381)             rsyncDistMirror => "",

382)             updateDate => "Unknown",

383)         },
384) 

385)        mirror017 => {

386)             adminContact => "mirrorsosmirror.nl",

387)             orgName => "OS Mirror",
388)             isoCC => "NL",
389)             subRegion => "",
390)             region => "Europe",
391)             ipv4 => "True",
392)             ipv6 => "False",
393)             loadBalanced => "Unknown",

394)             httpWebsiteMirror => "",

395)             rsyncWebsiteMirror => "rsync://rsync.osmirror.nl::tor/",

396)             ftpWebsiteMirror => "ftp://ftp.osmirror.nl/pub/tor/",

397)             httpDistMirror => "http://tor.osmirror.nl/",

398)             rsyncDistMirror => "",

399)             updateDate => "Unknown",

400)         },
401) 
402) 

403)        mirror018 => {

404)             adminContact => "evert AT meulie DOT net",

405)             orgName => "Meulie",

406)             isoCC => "NO",
407)             subRegion => "",
408)             region => "Europe",
409)             ipv4 => "True",
410)             ipv6 => "False",
411)             loadBalanced => "Unknown",

412)             httpWebsiteMirror => "",

413)             rsyncWebsiteMirror => "",

414)             ftpWebsiteMirror => "",

415)             httpDistMirror => "http://tor.meulie.net/",

416)             rsyncDistMirror => "",

417)             updateDate => "Unknown",

418)         },
419) 

420)        mirror019 => {

421)             adminContact => "ghirai AT ghirai DOT com",

422)             orgName => "Ghirai",

423)             isoCC => "UK",
424)             subRegion => "London",
425)             region => "Europe",
426)             ipv4 => "True",
427)             ipv6 => "False",
428)             loadBalanced => "Unknown",

429)             httpWebsiteMirror => "",

430)             rsyncWebsiteMirror => "",

431)             ftpWebsiteMirror => "",

432)             httpDistMirror => "http://www.ghirai.com/tor/",

433)             rsyncDistMirror => "",

434)             updateDate => "Unknown",

435)         },
436) 

437) 	mirror020 => {
438)             adminContact => "",
439)             orgName => "ax",
440)             isoCC => "DE",
441)             subRegion => "",
442)             region => "DE",
443)             ipv4 => "True",
444)             ipv6 => "False",
445)             loadBalanced => "No",
446)             httpWebsiteMirror => "",
447)             httpsWebsiteMirror => "",
448)             rsyncWebsiteMirror => "",
449)             ftpWebsiteMirror => "",
450)             httpDistMirror => "http://tor.initrd.net/dist/",
451)             httpsDistMirror => "",
452)             rsyncDistMirror => "",
453)             hiddenServiceMirror => "",
454)             updateDate => "Unknown",
455)         },
456) 

457)        mirror021 => {

458) 	    adminContact => "hostmaster AT zombiewerks DOT com",

459)             orgName => "TheOnionRouter",

460)             isoCC => "US",

461)             subRegion => "New Jersey",

462)             region => "North America",
463)             ipv4 => "True",
464)             ipv6 => "False",
465)             loadBalanced => "Unknown",
466)             httpWebsiteMirror => "http://www.theonionrouter.com/",

467)             rsyncWebsiteMirror => "",

468)             ftpWebsiteMirror => "",
469)             httpDistMirror => "http://www.theonionrouter.com/dist/",
470)             rsyncDistMirror => "",

471)             updateDate => "Unknown",

472)         },
473) 

474)        mirror022 => {

475)             adminContact => "jeroen AT unfix DOT org",

476)             orgName => "Unfix",

477)             isoCC => "CH",
478)             subRegion => "",
479)             region => "Europe",
480)             ipv4 => "True",
481)             ipv6 => "True",
482)             loadBalanced => "Unknown",
483)             httpWebsiteMirror => "http://tor.unfix.org/",

484)             rsyncWebsiteMirror => "",

485)             ftpWebsiteMirror => "",

486)             httpDistMirror => "http://tor.unfix.org/dist/",

487)             rsyncDistMirror => "",

488)             updateDate => "Unknown",

489)         },
490) 

491)        mirror023 => {

492)             adminContact => "jeroen AT unfix DOT org",

493)             orgName => "Sixx",

494)             isoCC => "CH",

495)             subRegion => "",
496)             region => "Europe",
497)             ipv4 => "True",
498)             ipv6 => "True",
499)             loadBalanced => "Unknown",
500)             httpWebsiteMirror => "http://tor.sixxs.net/",

501)             rsyncWebsiteMirror => "",

502)             ftpWebsiteMirror => "",

503)             httpDistMirror => "http://tor.sixxs.net/dist/",

504)             rsyncDistMirror => "",

505)             updateDate => "Unknown",

506)         },

507) 

508) 	mirror024 => {
509)             adminContact => "scream AT nonvocalscream DOT com",
510)             orgName => "NVS",
511)             isoCC => "US",
512)             subRegion => "",
513)             region => "US",
514)             ipv4 => "True",
515)             ipv6 => "False",
516)             loadBalanced => "No",
517)             httpWebsiteMirror => "http://tor.nonvocalscream.com/",
518)             httpsWebsiteMirror => "https://tor.nonvocalscream.com/",
519)             rsyncWebsiteMirror => "",
520)             ftpWebsiteMirror => "",
521)             httpDistMirror => "http://tor.nonvocalscream.com/dist/",
522)             httpsDistMirror => "https://tor.nonvocalscream.com/dist/",
523)             rsyncDistMirror => "",
524)             hiddenServiceMirror => "",
525)             updateDate => "Unknown",
526)         },
527) 

528)        mirror025 => {

529)             adminContact => "web2005a AT year2005a.wiretapped DOT net",

530)             orgName => "Wiretapped",
531)             isoCC => "AU",
532)             subRegion => "Sydney",
533)             region => "Oceania",
534)             ipv4 => "True",
535)             ipv6 => "False",
536)             loadBalanced => "Unknown",
537)             httpWebsiteMirror => "",

538)             rsyncWebsiteMirror => "",

539)             ftpWebsiteMirror => "ftp://ftp.mirrors.wiretapped.net/pub/security/cryptography/network/tor/",
540)             httpDistMirror => "http://www.mirrors.wiretapped.net/security/cryptography/network/tor/",
541)             rsyncDistMirror => "",
542)             updateDate => "Unknown",

543)         },

544) 

545)         mirror026 => {

546)             adminContact => "tormaster AT xpdm DOT us",

547)             orgName => "Xpdm",

548)             isoCC => "US",
549)             subRegion => "",
550)             region => "North America",
551)             ipv4 => "True",
552)             ipv6 => "False",
553)             loadBalanced => "Unknown",
554)             httpWebsiteMirror => "http://torproj.xpdm.us/",

555)             httpsWebsiteMirror => "https://torproj.xpdm.us/",

556)             rsyncWebsiteMirror => "",

557)             ftpWebsiteMirror => "",

558)             httpDistMirror => "http://torproj.xpdm.us/dist/",
559)             httpsDistMirror => "https://torproj.xpdm.us/dist/",

560)             rsyncDistMirror => "",
561)             hiddenServiceMirror => "http://h3prhz46uktgm4tt.onion/",
562)             updateDate => "Unknown",

563)         },

564) 

565)         mirror027 => {

566)             adminContact => "internetfreebeijing AT gmail DOT com",

567)             orgName => "Unknown",
568)             isoCC => "CN",
569)             subRegion => "China",
570)             region => "Asia",
571)             ipv4 => "True",
572)             ipv6 => "False",
573)             loadBalanced => "No",
574)             httpWebsiteMirror => "http://free.be.ijing2008.cn/tor/",
575)             httpsWebsiteMirror => "",

576)             rsyncWebsiteMirror => "",

577)             ftpWebsiteMirror => "",
578)             httpDistMirror => "http://free.be.ijing2008.cn/tor/dist/",
579)             httpsDistMirror => "",
580)             rsyncDistMirror => "",
581)             hiddenServiceMirror => "",
582)             updateDate => "Unknown",

583)         },

584) 

585)         mirror028 => {

586)             adminContact => "security AT hostoffice DOT hu",

587)             orgName => "Unknown",
588)             isoCC => "HU",
589)             subRegion => "Hungary",
590)             region => "Europe",
591)             ipv4 => "True",
592)             ipv6 => "False",
593)             loadBalanced => "No",
594)             httpWebsiteMirror => "http://mirror.tor.hu/",
595)             httpsWebsiteMirror => "",

596)             rsyncWebsiteMirror => "",

597)             ftpWebsiteMirror => "",
598)             httpDistMirror => "http://mirror.tor.hu/dist/",
599)             httpsDistMirror => "",
600)             rsyncDistMirror => "",
601)             hiddenServiceMirror => "",
602)             updateDate => "Unknown",

603)         },

604) 

605)         mirror029 => {

606)             adminContact => "",

607)             orgName => "Technica-03",

608)             isoCC => "UA",

609)             subRegion => "Ukraine",
610)             region => "Eastern Europe",
611)             ipv4 => "True",
612)             ipv6 => "False",
613)             loadBalanced => "No",
614)             httpWebsiteMirror => "http://torua.reactor-xg.kiev.ua/",
615)             httpsWebsiteMirror => "",

616)             rsyncWebsiteMirror => "",

617)             ftpWebsiteMirror => "",

618)             httpDistMirror => "http://tordistua.reactor-xg.kiev.ua/",

619)             httpsDistMirror => "",
620)             rsyncDistMirror => "",
621)             hiddenServiceMirror => "",
622)             updateDate => "Unknown",

623)         },

624) 

625) 	mirror030 => {

626)             adminContact => "",
627)             orgName => "chaos darmstadt",
628)             isoCC => "DE",
629)             subRegion => "Germany",
630)             region => "Europe",
631)             ipv4 => "True",
632)             ipv6 => "False",
633)             loadBalanced => "No",
634)             httpWebsiteMirror => "http://mirrors.chaos-darmstadt.de/tor-mirror/",
635)             httpsWebsiteMirror => "",
636)             rsyncWebsiteMirror => "",
637)             ftpWebsiteMirror => "",
638)             httpDistMirror => "http://mirrors.chaos-darmstadt.de/tor-mirror/dist/",
639)             httpsDistMirror => "",
640)             rsyncDistMirror => "",
641)             hiddenServiceMirror => "",
642)             updateDate => "Unknown",

643)         },

644) 

645) 	mirror031 => {

646)             adminContact => "webmaster AT askapache DOT com",
647)             orgName => "AskApache",

648)             isoCC => "US",
649)             subRegion => "California",
650)             region => "US",
651)             ipv4 => "True",
652)             ipv6 => "False",
653)             loadBalanced => "No",
654)             httpWebsiteMirror => "http://tor.askapache.com/",
655)             httpsWebsiteMirror => "",
656)             rsyncWebsiteMirror => "",
657)             ftpWebsiteMirror => "",

658)             httpDistMirror => "http://tor.askapache.com/dist/",

659)             httpsDistMirror => "",
660)             rsyncDistMirror => "",
661)             hiddenServiceMirror => "",
662)             updateDate => "Unknown",

663)         },

664) 

665) 	mirror032 => {
666)             adminContact => "",
667)             orgName => "I'm on the roof",
668)             isoCC => "US",
669)             subRegion => "",
670)             region => "US",
671)             ipv4 => "True",
672)             ipv6 => "False",
673)             loadBalanced => "No",
674)             httpWebsiteMirror => "http://mirror.imontheroof.com/tor-mirror/",
675)             httpsWebsiteMirror => "",
676)             rsyncWebsiteMirror => "",
677)             ftpWebsiteMirror => "",
678)             httpDistMirror => "http://mirror.imontheroof.com/tor-mirror/dist/",
679)             httpsDistMirror => "",
680)             rsyncDistMirror => "",
681)             hiddenServiceMirror => "",
682)             updateDate => "Unknown",

683)         },

684) 

685) 	mirror033 => {
686)             adminContact => "",

687)             orgName => "bullog",

688)             isoCC => "CN",
689)             subRegion => "",
690)             region => "CN",
691)             ipv4 => "True",
692)             ipv6 => "False",
693)             loadBalanced => "No",
694)             httpWebsiteMirror => "http://tor.bullog.org/",
695)             httpsWebsiteMirror => "",
696)             rsyncWebsiteMirror => "",
697)             ftpWebsiteMirror => "",
698)             httpDistMirror => "http://tor.bullog.org/dist/",
699)             httpsDistMirror => "",
700)             rsyncDistMirror => "",
701)             hiddenServiceMirror => "",
702)             updateDate => "Unknown",

703)         },

704) 

705) 	mirror034 => {

706)             adminContact => " mail AT benjamin-meier DOT info ",
707)             orgName => "beme it",
708)             isoCC => " ",

709)             subRegion => "",

710)             region => "DE",

711)             ipv4 => "True",
712)             ipv6 => "False",
713)             loadBalanced => "No",

714)             httpWebsiteMirror => "http://tor.beme-it.de/",
715)             httpsWebsiteMirror => "https://tor.beme-it.de/",

716)             rsyncWebsiteMirror => "",
717)             ftpWebsiteMirror => "",

718)             httpDistMirror => "http://tor.beme-it.de/dist/",
719)             httpsDistMirror => "https://tor.beme-it.de/dist/",

720)             rsyncDistMirror => "",
721)             hiddenServiceMirror => "",
722)             updateDate => "Unknown",

723)         },

724) 

725) 	mirror035 => {
726)             adminContact => "",

727)             orgName => "shizhao",

728)             isoCC => "CN",
729)             subRegion => "",
730)             region => "CN",
731)             ipv4 => "True",
732)             ipv6 => "False",
733)             loadBalanced => "No",
734)             httpWebsiteMirror => "http://tor.shizhao.org/",
735)             httpsWebsiteMirror => "",
736)             rsyncWebsiteMirror => "",
737)             ftpWebsiteMirror => "",
738)             httpDistMirror => "http://tor.shizhao.org/dist/",
739)             httpsDistMirror => "",
740)             rsyncDistMirror => "",
741)             hiddenServiceMirror => "",
742)             updateDate => "Unknown",

743)         },

744) 

745) 	mirror036 => {
746)             adminContact => "",

747)             orgName => "ranyunfei",

748)             isoCC => "CN",
749)             subRegion => "",
750)             region => "CN",
751)             ipv4 => "True",
752)             ipv6 => "False",
753)             loadBalanced => "No",
754)             httpWebsiteMirror => "http://tor.ranyunfei.com/",
755)             httpsWebsiteMirror => "",
756)             rsyncWebsiteMirror => "",
757)             ftpWebsiteMirror => "",
758)             httpDistMirror => "http://tor.ranyunfei.com/dist/",
759)             httpsDistMirror => "",
760)             rsyncDistMirror => "",
761)             hiddenServiceMirror => "",
762)             updateDate => "Unknown",

763)         },

764) 

765) 	mirror037 => {
766)             adminContact => "",

767)             orgName => "wuerkaixi",

768)             isoCC => "CN",
769)             subRegion => "",
770)             region => "CN",
771)             ipv4 => "True",
772)             ipv6 => "False",
773)             loadBalanced => "No",
774)             httpWebsiteMirror => "http://tor.wuerkaixi.com/",
775)             httpsWebsiteMirror => "",
776)             rsyncWebsiteMirror => "",
777)             ftpWebsiteMirror => "",
778)             httpDistMirror => "http://tor.wuerkaixi.com/dist/",
779)             httpsDistMirror => "",
780)             rsyncDistMirror => "",
781)             hiddenServiceMirror => "",
782)             updateDate => "Unknown",

783)         },

784) 

785) 	mirror038 => {
786)             adminContact => "",

787)             orgName => "izaobao",

788)             isoCC => "CN",
789)             subRegion => "",
790)             region => "CN",
791)             ipv4 => "True",
792)             ipv6 => "False",
793)             loadBalanced => "No",
794)             httpWebsiteMirror => "http://tor.izaobao.com/",
795)             httpsWebsiteMirror => "",
796)             rsyncWebsiteMirror => "",
797)             ftpWebsiteMirror => "",
798)             httpDistMirror => "http://tor.izaobao.com/dist/",
799)             httpsDistMirror => "",
800)             rsyncDistMirror => "",
801)             hiddenServiceMirror => "",
802)             updateDate => "Unknown",

803)         },

804) 

805) 	mirror039 => {
806)             adminContact => "",

807)             orgName => "anothr",

808)             isoCC => "CN",
809)             subRegion => "",
810)             region => "CN",
811)             ipv4 => "True",
812)             ipv6 => "False",
813)             loadBalanced => "No",
814)             httpWebsiteMirror => "http://tor.anothr.com/",
815)             httpsWebsiteMirror => "",
816)             rsyncWebsiteMirror => "",
817)             ftpWebsiteMirror => "",
818)             httpDistMirror => "http://tor.anothr.com/dist/",
819)             httpsDistMirror => "",
820)             rsyncDistMirror => "",
821)             hiddenServiceMirror => "",
822)             updateDate => "Unknown",

823)         },

824) 

825) mirror039 => {
826)             adminContact => "",

827)             orgName => " cybervalley ",

828)             isoCC => " ",
829)             subRegion => "",
830)             region => " ",
831)             ipv4 => "True",
832)             ipv6 => "False",
833)             loadBalanced => "No",
834)             httpWebsiteMirror => "http://torproject.cybervalley.org/",
835)             httpsWebsiteMirror => "",
836)             rsyncWebsiteMirror => "",
837)             ftpWebsiteMirror => "",
838)             httpDistMirror => "",
839)             httpsDistMirror => "",
840)             rsyncDistMirror => "",
841)             hiddenServiceMirror => "",

842)             updateDate => "Unknown",
843)         },
844) 
845) mirror040 => {
846)             adminContact => "doc DOT kuehn AT nexgo DOT de",

847)             orgName => " spacecowboy ",

848)             isoCC => " ",
849)             subRegion => "",
850)             region => "DE",
851)             ipv4 => "True",
852)             ipv6 => "False",
853)             loadBalanced => "No",
854)             httpWebsiteMirror => "http://tor-proxy.de/tor-mirror/",
855)             httpsWebsiteMirror => "https://tor-proxy.de/tor-mirror/",
856)             rsyncWebsiteMirror => "",
857)             ftpWebsiteMirror => "",
858)             httpDistMirror => "http://tor-proxy.de/tor-mirror/dist/",
859)             httpsDistMirror => "https://tor-proxy.de/tor-mirror/dist/",
860)             rsyncDistMirror => "",
861)             hiddenServiceMirror => "",

862)             updateDate => "Unknown",
863)         },
864) 

865) );
866) 
867) my $count = values %m;
868) print "We have a total of $count mirrors\n";
869) print "Fetching the last updated date for each mirror.\n";
870) 

871) my $tortime;
872) $tortime = FetchDate("http://www.torproject.org/");

873) # Adjust offical Tor time by out-of-date offset: number of days * seconds per day 
874) $tortime -= 1 * 86400; 

875) print "The official time for Tor is $tortime. \n";
876) 

877) foreach my $server ( keys %m ) {
878) 
879)     print "Attempting to fetch from $m{$server}{'orgName'}\n";
880) 
881)     if ($m{$server}{'httpWebsiteMirror'}) {
882)         print "Attempt to fetch via HTTP.\n";
883)         $m{$server}{"updateDate"} = FetchDate("$m{$server}{'httpWebsiteMirror'}");
884)     } elsif ($m{$server}{'httpsWebsiteMirror'}) {
885)         print "Attempt to fetch via HTTPS.\n";
886)         $m{$server}{"updateDate"} = FetchDate("$m{$server}{'httpsWebsiteMirror'}");
887)     } elsif ($m{$server}{'ftpWebsiteMirror'}) {
888)         print "Attempt to fetch via FTP.\n";
889)         $m{$server}{"updateDate"} = FetchDate("$m{$server}{'ftpWebsiteMirror'}");
890)     } else {
891)         print "We were unable to fetch or store anything. We still have the following: $m{$server}{'updateDate'}\n";
892)     }
893) 
894)     print "We fetched and stored the following: $m{$server}{'updateDate'}\n";
895) 
896)  }
897) 
898) 
899) print "We sorted the following mirrors by their date of last update: \n";
900) foreach my $server ( sort { $m{$b}{'updateDate'} <=> $m{$a}{'updateDate'}} keys %m ) {
901) 
902)      print "\n";
903)      print "Mirror $m{$server}{'orgName'}: \n";
904) 
905)      foreach my $attrib ( sort keys %{$m{$server}} ) {
906)         print "$attrib = $m{$server}{$attrib}";
907)         print "\n";
908)      };
909) }
910) 
911) my $outFile = "include/mirrors-table.wmi";
912) my $html;
913) open(OUT, "> $outFile") or die "Can't open $outFile: $!";
914) 

915) # Here's where we open a file and print some wml include goodness

916) # This is storted from last known recent update to unknown update times
917) foreach my $server ( sort { $m{$b}{'updateDate'} <=> $m{$a}{'updateDate'}} keys %m ) {
918) 

919)      my $time;

920)      if ( "$m{$server}{'updateDate'}" ne "Unknown") {

921) 	  if ( $m{$server}{'updateDate'} > $tortime ) {

922) 	    $time = "Up to date";
923) 	  } else { $time = "Out of date"; }

924)      } else { $time = "Unknown"; }

925) print OUT <<"END";
926)      \n<tr>\n
927)          <td>$m{$server}{'isoCC'}</td>\n
928)          <td>$m{$server}{'orgName'}</td>\n
929)          <td>$time</td>\n
930) END
931) 
932)      my %prettyNames = (
933)                         httpWebsiteMirror => "http",
934)                         httpsWebsiteMirror => "https",
935)                         ftpWebsiteMirror => "ftp",
936)                         rsyncWebsiteMirror => "rsync",
937)                         httpDistMirror => "http",
938)                         httpsDistMirror => "https",
939)                         rsyncDistMirrors => "rsync", );
940) 
941)      foreach my $precious ( sort keys %prettyNames )

942)      {
943)         if ($m{$server}{"$precious"}) {
944)             print OUT "    <td><a href=\"" . $m{$server}{$precious} . "\">" .

945)                       "$prettyNames{$precious}</a></td>\n";