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) # 001 Timoutes 	Contacted
16) # 002 403 	Contacted

17) 

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

21)     timeout => 15,

22)     agent => "Tor MirrorCheck Agent"
23) );
24) 
25) sub sanitize {
26)     my $taintedData = shift;
27)     my $cleanedData;
28)     my $whitelist = '-a-zA-Z0-9: +';
29) 
30)     # clean the data, return cleaned data
31)     $taintedData =~ s/[^$whitelist]//go;
32)     $cleanedData = $taintedData;
33) 
34)     return $cleanedData;
35) }
36) 
37) sub FetchDate {
38)     my $url = shift; # Base url for mirror
39)     my $trace = "project/trace/www.torproject.org"; # Location of recent update info
40)     $url = "$url$trace";
41) 
42)     print "Fetching possible date from: $url\n";
43) 
44)     my $request = new HTTP::Request GET => "$url";
45)     my $result = $lua->request($request);

46)     my $code = $result->code();
47)     print "Result code $code\n";

48) 

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

50)        my $taint = $result->content;
51)        my $content = sanitize($taint);
52)        if ($content) {

53) 

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

68) 

69)     } else {
70)        print "Our request failed, we had no result.\n";
71)        return "Unknown";
72)     }

73) 
74)     return "Unknown";

75) }
76) 
77) # This is the list of all known Tor mirrors
78) # Add new mirrors to the bottom!

79) my %m = 

80)        mirror001 => {

81)             adminContact => "webmaster AT depthstrike DOT com",

82)             orgName => "Depthstrike",

83)             isoCC => "CA",
84)             subRegion => "NS",
85)             region => "North America",
86)             ipv4 => "True",
87)             ipv6 => "False",
88)             loadBalanced => "Unknown",
89)             httpWebsiteMirror => "http://tor.depthstrike.com/",
90)             ftpWebsiteMirror => "",
91)             rsyncWebsiteMirror => "",
92)             httpDistMirror => "http://tor.depthstrike.com/dist/",
93)             rsyncDistMirror => "",

94)             updateDate => "Unknown",

95)         },
96) 
97)        mirror002 => {

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

99)             orgName => "Hermetix",

100)             isoCC => "CA",
101)             subRegion => "QC",
102)             region => "North America",
103)             ipv4 => "True",
104)             ipv6 => "False",
105)             loadBalanced => "Unknown",
106)             httpWebsiteMirror => "http://tor.hermetix.org/",
107)             rsyncWebsiteMirror => "",

108)             httpDistMirror => "",

109)             rsyncDistMirror => "",

110)             updateDate => "Unknown",

111)         },
112) 
113)        mirror003 => {

114)             adminContact => "",

115)             orgName => "Boinc",

116)             isoCC => "CH",
117)             subRegion => "",
118)             region => "Europe",
119)             ipv4 => "True",
120)             ipv6 => "False",
121)             loadBalanced => "Unknown",
122)             httpWebsiteMirror => "http://tor.boinc.ch/",
123)             ftpWebsiteMirror => "",
124)             rsyncWebsiteMirror => "",
125)             httpDistMirror => "http://tor.boinc.ch/dist/",
126)             rsyncDistMirror => "",

127)             updateDate => "Unknown",

128)         },
129) 
130)        mirror004 => {

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

132)             orgName => "Anonymity",

133)             isoCC => "CN",
134)             subRegion => "",
135)             region => "Asia",
136)             ipv4 => "True",
137)             ipv6 => "False",
138)             loadBalanced => "Unknown",

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

140)             ftpWebsiteMirror => "",
141)             rsyncWebsiteMirror => "",

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

143)             rsyncDistMirror => "",

144)             updateDate => "Unknown",

145)         },
146) 

147)        mirror005 => {

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

149)             orgName => "Bbs",

150)             isoCC => "DE",
151)             subRegion => "",
152)             region => "Europe",
153)             ipv4 => "True",
154)             ipv6 => "False",
155)             loadBalanced => "Unknown",
156)             httpWebsiteMirror => "http://tor.blingblingsquad.net/",
157)             ftpWebsiteMirror => "",
158)             rsyncWebsiteMirror => "",

159)             httpDistMirror => "",

160)             rsyncDistMirror => "",

161)             updateDate => "Unknown",

162)         },
163) 

164)        mirror006 => {

165)             orgName => "Berapla",
166)             isoCC => "DE",
167)             subRegion => "",
168)             region => "Europe",
169)             ipv4 => "True",
170)             ipv6 => "False",
171)             loadBalanced => "Unknown",
172)             httpWebsiteMirror => "http://download.berapla.de/mirrors/tor/",
173)             ftpWebsiteMirror => "",
174)             rsyncWebsiteMirror => "",
175)             httpDistMirror => "http://download.berapla.de/mirrors/tor/dist/",
176)             rsyncDistMirror => "",
177)             updateDate => "Unknown",
178)         },

179) 

180)        mirror007 => {

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

182)             orgName => "Cybermirror",

183)             isoCC => "DE",
184)             subRegion => "",
185)             region => "Europe",
186)             ipv4 => "True",
187)             ipv6 => "False",
188)             loadBalanced => "Unknown",
189)             httpWebsiteMirror => "http://tor.cybermirror.org/",
190)             ftpWebsiteMirror => "",
191)             rsyncWebsiteMirror => "",
192)             httpDistMirror => "http://tor.cybermirror.org/dist/",
193)             rsyncDistMirror => "",

194)             updateDate => "Unknown",

195)         },
196) 

197)        mirror008 => {

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

199)             orgName => "Spline",
200)             isoCC => "DE",
201)             subRegion => "FU",
202)             region => "Europe",
203)             ipv4 => "True",
204)             ipv6 => "False",
205)             loadBalanced => "Unknown",

206)             httpWebsiteMirror => "",

207)             ftpWebsiteMirror => "",
208)             rsyncWebsiteMirror => "",

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

210)             rsyncDistMirror => "",

211)             updateDate => "Unknown",

212)         },
213) 
214)        mirror009 => {

215)             adminContact => "beaver AT trash DOT net",

216)             orgName => "Onionland",

217)             isoCC => "DE",
218)             subRegion => "",
219)             region => "Europe",
220)             ipv4 => "True",
221)             ipv6 => "False",
222)             loadBalanced => "Unknown",
223)             httpWebsiteMirror => "http://mirror.onionland.org/",
224)             ftpWebsiteMirror => "",
225)             rsyncWebsiteMirror => "rsync: mirror.onionland.org::tor/",
226)             httpDistMirror => "http://mirror.onionland.org/dist/",

227)             rsyncDistMirror => "rsync://mirror.onionland.org::tor/dist/",

228)             updateDate => "Unknown",

229)         },
230) 

231)        mirror011 => {

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

233)             orgName => "Zentrum der Gesundheit",

234)             isoCC => "DK",
235)             subRegion => "",
236)             region => "Europe",
237)             ipv4 => "True",
238)             ipv6 => "False",
239)             loadBalanced => "Unknown",

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

241)             ftpWebsiteMirror => "",

242)             rsyncWebsiteMirror => "",

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

245)             updateDate => "Unknown",

246)         },
247) 

248)        mirror012 => {

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

250)             orgName => "CRAN",
251)             isoCC => "FR",

252)             subRegion => "Ile de France",

253)             region => "Europe",
254)             ipv4 => "True",
255)             ipv6 => "False",
256)             loadBalanced => "Unknown",

257)             httpWebsiteMirror => "",

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

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

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

261)             rsyncDistMirror => "",

262)             updateDate => "Unknown",

263)         },
264) 

265)        mirror013 => {

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

267)             orgName => "Amorphis",

268)             isoCC => "NL",
269)             subRegion => "",
270)             region => "Europe",
271)             ipv4 => "True",
272)             ipv6 => "False",
273)             loadBalanced => "Unknown",
274)             httpWebsiteMirror => "http://tor.amorphis.eu/",

275)             rsyncWebsiteMirror => "",

276)             ftpWebsiteMirror => "",
277)             httpDistMirror => "http://tor.amorphis.eu/dist/",
278)             rsyncDistMirror => "",

279)             updateDate => "Unknown",

280)         },
281) 

282)        mirror014 => {

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

284)             orgName => "BIT BV",
285)             isoCC => "NL",
286)             subRegion => "",
287)             region => "Europe",
288)             ipv4 => "True",
289)             ipv6 => "False",
290)             loadBalanced => "Unknown",

291)             httpWebsiteMirror => "",

292)             rsyncWebsiteMirror => "",

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

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

295)             rsyncDistMirror => "",

296)             updateDate => "Unknown",

297)         },
298) 

299)        mirror015 => {

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

301)             orgName => "CCC",
302)             isoCC => "NL",
303)             subRegion => "",
304)             region => "Europe",
305)             ipv4 => "True",
306)             ipv6 => "False",
307)             loadBalanced => "Unknown",
308)             httpWebsiteMirror => "http://tor.ccc.de/",

309)             rsyncWebsiteMirror => "",

310)             ftpWebsiteMirror => "",
311)             httpDistMirror => "http://tor.ccc.de/dist/",
312)             rsyncDistMirror => "",

313)             updateDate => "Unknown",

314)         },
315) 

316)        mirror016 => {

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

318)             orgName => "Kamagurka",

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

326)             rsyncWebsiteMirror => "",

327)             ftpWebsiteMirror => "",
328)             httpDistMirror => "http://tor.kamagurka.org/dist/",
329)             rsyncDistMirror => "",

330)             updateDate => "Unknown",

331)         },
332) 

333)        mirror017 => {

334)             adminContact => "mirrorsosmirror.nl",

335)             orgName => "OS Mirror",
336)             isoCC => "NL",
337)             subRegion => "",
338)             region => "Europe",
339)             ipv4 => "True",
340)             ipv6 => "False",
341)             loadBalanced => "Unknown",

342)             httpWebsiteMirror => "",

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

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

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

346)             rsyncDistMirror => "",

347)             updateDate => "Unknown",

348)         },
349) 
350) 

351)        mirror018 => {

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

353)             orgName => "Meulie",

354)             isoCC => "NO",
355)             subRegion => "",
356)             region => "Europe",
357)             ipv4 => "True",
358)             ipv6 => "False",
359)             loadBalanced => "Unknown",

360)             httpWebsiteMirror => "",

361)             rsyncWebsiteMirror => "",

362)             ftpWebsiteMirror => "",

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

364)             rsyncDistMirror => "",

365)             updateDate => "Unknown",

366)         },
367) 

368)        mirror019 => {

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

370)             orgName => "Ghirai",

371)             isoCC => "UK",
372)             subRegion => "London",
373)             region => "Europe",
374)             ipv4 => "True",
375)             ipv6 => "False",
376)             loadBalanced => "Unknown",

377)             httpWebsiteMirror => "",

378)             rsyncWebsiteMirror => "",

379)             ftpWebsiteMirror => "",

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

381)             rsyncDistMirror => "",

382)             updateDate => "Unknown",

383)         },
384) 

385)        mirror020 => {

386) 	    adminContact => "bjw AT bjwonline DOT com",

387)             orgName => "BJWOnline",

388)             isoCC => "US",
389)             subRegion => "California",
390)             region => "North America",
391)             ipv4 => "True",
392)             ipv6 => "False",
393)             loadBalanced => "Unknown",
394)             httpWebsiteMirror => "http://mirror.bjwonline.com/tor/",

395)             rsyncWebsiteMirror => "",

396)             ftpWebsiteMirror => "",

397)             httpDistMirror => "http://mirror.bjwonline.com/tor/dist/",

398)             rsyncDistMirror => "",

399)             updateDate => "Unknown",

400)         },
401) 

402)        mirror021 => {

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

404)             orgName => "TheOnionRouter",

405)             isoCC => "US",

406)             subRegion => "New Jersey",

407)             region => "North America",
408)             ipv4 => "True",
409)             ipv6 => "False",
410)             loadBalanced => "Unknown",
411)             httpWebsiteMirror => "http://www.theonionrouter.com/",

412)             rsyncWebsiteMirror => "",

413)             ftpWebsiteMirror => "",
414)             httpDistMirror => "http://www.theonionrouter.com/dist/",
415)             rsyncDistMirror => "",

416)             updateDate => "Unknown",

417)         },
418) 

419)        mirror022 => {

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

421)             orgName => "Unfix",

422)             isoCC => "CH",
423)             subRegion => "",
424)             region => "Europe",
425)             ipv4 => "True",
426)             ipv6 => "True",
427)             loadBalanced => "Unknown",
428)             httpWebsiteMirror => "http://tor.unfix.org/",

429)             rsyncWebsiteMirror => "",

430)             ftpWebsiteMirror => "",

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

432)             rsyncDistMirror => "",

433)             updateDate => "Unknown",

434)         },
435) 

436)        mirror023 => {

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

438)             orgName => "Sixx",

439)             isoCC => "CH",

440)             subRegion => "",
441)             region => "Europe",
442)             ipv4 => "True",
443)             ipv6 => "True",
444)             loadBalanced => "Unknown",
445)             httpWebsiteMirror => "http://tor.sixxs.net/",

446)             rsyncWebsiteMirror => "",

447)             ftpWebsiteMirror => "",

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

449)             rsyncDistMirror => "",

450)             updateDate => "Unknown",

451)         },

452) 

453)        mirror024 => {

454)             adminContact => "",

455)             orgName => "Crypto",

456)             isoCC => "US",
457)             subRegion => "",
458)             region => "North America",
459)             ipv4 => "True",
460)             ipv6 => "False",
461)             loadBalanced => "Unknown",
462)             httpWebsiteMirror => "http://crypto.nsa.org/tor/",

463)             rsyncWebsiteMirror => "",

464)             ftpWebsiteMirror => "",
465)             httpDistMirror => "http://crypto.nsa.org/tor/dist/",
466)             rsyncDistMirror => "",
467)             updateDate => "Unknown",
468)         },

469) 

470)        mirror025 => {

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

472)             orgName => "Wiretapped",
473)             isoCC => "AU",
474)             subRegion => "Sydney",
475)             region => "Oceania",
476)             ipv4 => "True",
477)             ipv6 => "False",
478)             loadBalanced => "Unknown",
479)             httpWebsiteMirror => "",

480)             rsyncWebsiteMirror => "",

481)             ftpWebsiteMirror => "ftp://ftp.mirrors.wiretapped.net/pub/security/cryptography/network/tor/",
482)             httpDistMirror => "http://www.mirrors.wiretapped.net/security/cryptography/network/tor/",
483)             rsyncDistMirror => "",
484)             updateDate => "Unknown",

485)         },

486) 

487)         mirror026 => {

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

489)             orgName => "Xpdm",

490)             isoCC => "US",
491)             subRegion => "",
492)             region => "North America",
493)             ipv4 => "True",
494)             ipv6 => "False",
495)             loadBalanced => "Unknown",
496)             httpWebsiteMirror => "http://torproj.xpdm.us/",

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

498)             rsyncWebsiteMirror => "",

499)             ftpWebsiteMirror => "",

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

502)             rsyncDistMirror => "",
503)             hiddenServiceMirror => "http://h3prhz46uktgm4tt.onion/",
504)             updateDate => "Unknown",

505)         },

506) 

507)         mirror027 => {

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

509)             orgName => "Unknown",
510)             isoCC => "CN",
511)             subRegion => "China",
512)             region => "Asia",
513)             ipv4 => "True",
514)             ipv6 => "False",
515)             loadBalanced => "No",
516)             httpWebsiteMirror => "http://free.be.ijing2008.cn/tor/",
517)             httpsWebsiteMirror => "",

518)             rsyncWebsiteMirror => "",

519)             ftpWebsiteMirror => "",
520)             httpDistMirror => "http://free.be.ijing2008.cn/tor/dist/",
521)             httpsDistMirror => "",
522)             rsyncDistMirror => "",
523)             hiddenServiceMirror => "",
524)             updateDate => "Unknown",

525)         },

526) 

527)         mirror028 => {

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

529)             orgName => "Unknown",
530)             isoCC => "HU",
531)             subRegion => "Hungary",
532)             region => "Europe",
533)             ipv4 => "True",
534)             ipv6 => "False",
535)             loadBalanced => "No",
536)             httpWebsiteMirror => "http://mirror.tor.hu/",
537)             httpsWebsiteMirror => "",

538)             rsyncWebsiteMirror => "",

539)             ftpWebsiteMirror => "",
540)             httpDistMirror => "http://mirror.tor.hu/dist/",
541)             httpsDistMirror => "",
542)             rsyncDistMirror => "",
543)             hiddenServiceMirror => "",
544)             updateDate => "Unknown",

545)         },

546) 

547)         mirror029 => {

548)             adminContact => "",

549)             orgName => "Technica-03",

550)             isoCC => "UA",

551)             subRegion => "Ukraine",
552)             region => "Eastern Europe",
553)             ipv4 => "True",
554)             ipv6 => "False",
555)             loadBalanced => "No",
556)             httpWebsiteMirror => "http://torua.reactor-xg.kiev.ua/",
557)             httpsWebsiteMirror => "",

558)             rsyncWebsiteMirror => "",

559)             ftpWebsiteMirror => "",
560)             httpDistMirror => "http://tordistua.reactor-xg.kiev.ua",
561)             httpsDistMirror => "",
562)             rsyncDistMirror => "",
563)             hiddenServiceMirror => "",
564)             updateDate => "Unknown",

565)         },

566) 

567) 	mirror030 => {

568)             adminContact => "",
569)             orgName => "chaos darmstadt",
570)             isoCC => "DE",
571)             subRegion => "Germany",
572)             region => "Europe",
573)             ipv4 => "True",
574)             ipv6 => "False",
575)             loadBalanced => "No",
576)             httpWebsiteMirror => "http://mirrors.chaos-darmstadt.de/tor-mirror/",
577)             httpsWebsiteMirror => "",
578)             rsyncWebsiteMirror => "",
579)             ftpWebsiteMirror => "",
580)             httpDistMirror => "http://mirrors.chaos-darmstadt.de/tor-mirror/dist/",
581)             httpsDistMirror => "",
582)             rsyncDistMirror => "",
583)             hiddenServiceMirror => "",
584)             updateDate => "Unknown",

585)         },

586) 

587) 	mirror031 => {
588)             adminContact => "",
589)             orgName => "Ask Apache",
590)             isoCC => "US",
591)             subRegion => "California",
592)             region => "US",
593)             ipv4 => "True",
594)             ipv6 => "False",
595)             loadBalanced => "No",
596)             httpWebsiteMirror => "http://tor.askapache.com/",
597)             httpsWebsiteMirror => "",
598)             rsyncWebsiteMirror => "",
599)             ftpWebsiteMirror => "",

600)             httpDistMirror => "",

601)             httpsDistMirror => "",
602)             rsyncDistMirror => "",
603)             hiddenServiceMirror => "",
604)             updateDate => "Unknown",

605)         },

606) 

607) 	mirror032 => {
608)             adminContact => "",
609)             orgName => "I'm on the roof",
610)             isoCC => "US",
611)             subRegion => "",
612)             region => "US",
613)             ipv4 => "True",
614)             ipv6 => "False",
615)             loadBalanced => "No",
616)             httpWebsiteMirror => "http://mirror.imontheroof.com/tor-mirror/",
617)             httpsWebsiteMirror => "",
618)             rsyncWebsiteMirror => "",
619)             ftpWebsiteMirror => "",
620)             httpDistMirror => "http://mirror.imontheroof.com/tor-mirror/dist/",
621)             httpsDistMirror => "",
622)             rsyncDistMirror => "",
623)             hiddenServiceMirror => "",
624)             updateDate => "Unknown",

625)         },

626) 

627) 	mirror033 => {
628)             adminContact => "",

629)             orgName => "bullog",

630)             isoCC => "CN",
631)             subRegion => "",
632)             region => "CN",
633)             ipv4 => "True",
634)             ipv6 => "False",
635)             loadBalanced => "No",
636)             httpWebsiteMirror => "http://tor.bullog.org/",
637)             httpsWebsiteMirror => "",
638)             rsyncWebsiteMirror => "",
639)             ftpWebsiteMirror => "",
640)             httpDistMirror => "http://tor.bullog.org/dist/",
641)             httpsDistMirror => "",
642)             rsyncDistMirror => "",
643)             hiddenServiceMirror => "",
644)             updateDate => "Unknown",

645)         },

646) 

647) 	mirror034 => {
648)             adminContact => "",

649)             orgName => "digitip",

650)             isoCC => "CN",
651)             subRegion => "",
652)             region => "CN",
653)             ipv4 => "True",
654)             ipv6 => "False",
655)             loadBalanced => "No",
656)             httpWebsiteMirror => "http://tor.digitip.net/",
657)             httpsWebsiteMirror => "",
658)             rsyncWebsiteMirror => "",
659)             ftpWebsiteMirror => "",
660)             httpDistMirror => "http://tor.digitip.net/dist/",
661)             httpsDistMirror => "",
662)             rsyncDistMirror => "",
663)             hiddenServiceMirror => "",
664)             updateDate => "Unknown",

665)         },

666) 

667) 	mirror035 => {
668)             adminContact => "",

669)             orgName => "shizhao",

670)             isoCC => "CN",
671)             subRegion => "",
672)             region => "CN",
673)             ipv4 => "True",
674)             ipv6 => "False",
675)             loadBalanced => "No",
676)             httpWebsiteMirror => "http://tor.shizhao.org/",
677)             httpsWebsiteMirror => "",
678)             rsyncWebsiteMirror => "",
679)             ftpWebsiteMirror => "",
680)             httpDistMirror => "http://tor.shizhao.org/dist/",
681)             httpsDistMirror => "",
682)             rsyncDistMirror => "",
683)             hiddenServiceMirror => "",
684)             updateDate => "Unknown",

685)         },

686) 

687) 	mirror036 => {
688)             adminContact => "",

689)             orgName => "ranyunfei",

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

705)         },

706) 

707) 	mirror037 => {
708)             adminContact => "",

709)             orgName => "wuerkaixi",

710)             isoCC => "CN",
711)             subRegion => "",
712)             region => "CN",
713)             ipv4 => "True",
714)             ipv6 => "False",
715)             loadBalanced => "No",
716)             httpWebsiteMirror => "http://tor.wuerkaixi.com/",
717)             httpsWebsiteMirror => "",
718)             rsyncWebsiteMirror => "",
719)             ftpWebsiteMirror => "",
720)             httpDistMirror => "http://tor.wuerkaixi.com/dist/",
721)             httpsDistMirror => "",
722)             rsyncDistMirror => "",
723)             hiddenServiceMirror => "",
724)             updateDate => "Unknown",

725)         },

726) 

727) 	mirror038 => {
728)             adminContact => "",

729)             orgName => "izaobao",

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

745)         },

746) 

747) 	mirror039 => {
748)             adminContact => "",

749)             orgName => "anothr",

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

765)         },

766) 

767) 	mirror040 => {
768)             adminContact => "",

769)             orgName => "zuola",

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

785)         },
786) 
787) 	mirror041 => {

788)             adminContact => "scream AT nonvocalscream DOT com",

789)             orgName => "NVS",
790)             isoCC => "US",
791)             subRegion => "",
792)             region => "US",
793)             ipv4 => "True",
794)             ipv6 => "False",
795)             loadBalanced => "No",
796)             httpWebsiteMirror => "http://tor.nonvocalscream.com/",

797)             httpsWebsiteMirror => "https://tor.nonvocalscream.com/",

798)             rsyncWebsiteMirror => "",
799)             ftpWebsiteMirror => "",
800)             httpDistMirror => "http://tor.nonvocalscream.com/dist/",

801)             httpsDistMirror => "https://tor.nonvocalscream.com/dist/",

802)             rsyncDistMirror => "",
803)             hiddenServiceMirror => "",
804)             updateDate => "Unknown",

805)         },
806) 
807) 	mirror042 => {
808)             adminContact => "",
809)             orgName => "ax",
810)             isoCC => "DE",
811)             subRegion => "",
812)             region => "DE",
813)             ipv4 => "True",
814)             ipv6 => "False",
815)             loadBalanced => "No",
816)             httpWebsiteMirror => "",
817)             httpsWebsiteMirror => "",
818)             rsyncWebsiteMirror => "",
819)             ftpWebsiteMirror => "",
820)             httpDistMirror => "http://tor.initrd.net/dist/",
821)             httpsDistMirror => "",
822)             rsyncDistMirror => "",
823)             hiddenServiceMirror => "",
824)             updateDate => "Unknown",

825)         },
826)         mirror043 => {

827)             adminContact => "BarkerJr AT barkerjr DOT net",

828)             orgName => "BarkerJr",
829)             isoCC => "FR",
830)             subRegion => "",
831)             region => "FR",
832)             ipv4 => "True",
833)             ipv6 => "False",
834)             loadBalanced => "No",
835)             httpWebsiteMirror => "",
836)             httpsWebsiteMirror => "",
837)             rsyncWebsiteMirror => "",
838)             ftpWebsiteMirror => "",
839)             httpDistMirror => "http://tor.megahal.org/dist/",
840)             httpsDistMirror => "",
841)             rsyncDistMirror => "",
842)             hiddenServiceMirror => "",
843)             updateDate => "Unknown",

844)         },       mirror044 => {
845)             adminContact => "tor AT goodeid DOT com",
846)             orgName => "goodeid.com",
847)             isoCC => "CAN",
848)             subRegion => "",
849)             region => "CAN",
850)             ipv4 => "True",
851)             ipv6 => "False",
852)             loadBalanced => "No",
853)             httpWebsiteMirror => "http://tor-node.goodeid.com/",

854)             httpsWebsiteMirror => "https://tor-node.goodeid.com/",

855)             rsyncWebsiteMirror => "",
856)             ftpWebsiteMirror => "",
857)             httpDistMirror => "http://tor-node.goodeid.com/dist/",

858)             httpsDistMirror => "https://tor-node.goodeid.com/dist/",

859)             rsyncDistMirror => "",
860)             hiddenServiceMirror => "",
861)             updateDate => "Unknown",

862)         }

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

869) my $tortime;
870) $tortime = FetchDate("http://www.torproject.org/");
871) print "The official time for Tor is $tortime. \n";
872) 

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

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

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

915)      my $time;

916)      if ( "$m{$server}{'updateDate'}" ne "Unknown") {
917) 	  if ( "$m{$server}{'updateDate'}" eq "$tortime" ) {

918) 	    $time = "Up to date";
919) 	  } else { $time = "Out of date"; }

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

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

938)      {
939)         if ($m{$server}{"$precious"}) {
940)             print OUT "    <td><a href=\"" . $m{$server}{$precious} . "\">" .

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