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) # CHANGELOG
16) # 20091003 Code changes to elimiate the need for a trailing slash in addresses for script runtime
17) # 20091004 Code changes to increase out of date tolerance to 48 hours
18) # 20091028 Code changes to increase timout to 30 seconds (attempting to # resolve "unknown" status')
19) # 20091028 Code changes to change user agent of script
20) # 20100807 Remove dead mirrors.

21) 

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

25)     timeout => 30,

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-master.torproject.org"; # this file should always exist

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) 

85)         
86)         mirror000 => {
87)             adminContact => "coralcdn.org",
88)             orgName => "CoralCDN",
89)             isoCC => "INT",
90)             subRegion => "",
91)             region => "INT",
92)             ipv4 => "True",
93)             ipv6 => "False",
94)             loadBalanced => "Yes",
95)             httpWebsiteMirror => "http://www.torproject.org.nyud.net/",
96)             httpsWebsiteMirror => "",
97)             rsyncWebsiteMirror => "",
98)             ftpWebsiteMirror => "",
99)             httpDistMirror => "http://www.torproject.org.nyud.net/dist/",
100)             httpsDistMirror => "",
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://www.oignon.net/",

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

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

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

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

126)        mirror003 => {

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

128)             orgName => "[[:bbs:]]",

129)             isoCC => "DE",
130)             subRegion => "",
131)             region => "Europe",
132)             ipv4 => "True",
133)             ipv6 => "False",
134)             loadBalanced => "Unknown",
135)             httpWebsiteMirror => "http://tor.blingblingsquad.net/",

136)             httpsWebsiteMirror => "https://tor.blingblingsquad.net/",

137)             ftpWebsiteMirror => "",
138)             rsyncWebsiteMirror => "",

139)             httpDistMirror => "",
140)             httpsDistMirror => "",

141)             rsyncDistMirror => "",

142)             updateDate => "Unknown",

143)         },
144) 

145) 	    mirror006 => {

146)             adminContact => "BarkerJr AT barkerjr DOT net",
147)             orgName => "BarkerJr",
148)             isoCC => "US",
149)             subRegion => "",
150)             region => "US",
151)             ipv4 => "True",
152)             ipv6 => "False",
153)             loadBalanced => "No",

154)             httpWebsiteMirror => "http://www.torproject.us/",
155)             httpsWebsiteMirror => "https://www.torproject.us/",

156)             rsyncWebsiteMirror => "rsync://rsync.torproject.us/tor",

157)             ftpWebsiteMirror => "",

158)             httpDistMirror => "http://www.torproject.us/dist/",
159)             httpsDistMirror => "https://www.torproject.us/dist/",

160)             rsyncDistMirror => "rsync://rsync.torproject.us/tor/dist",

161)             hiddenServiceMirror => "",
162)             updateDate => "Unknown",
163)         },
164) 

165)        mirror007 => {

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

167)             orgName => "Zentrum der Gesundheit",

168)             isoCC => "DK",
169)             subRegion => "",
170)             region => "Europe",
171)             ipv4 => "True",
172)             ipv6 => "False",
173)             loadBalanced => "Unknown",

174)             httpWebsiteMirror => "http://tor.idnr.ws/",

175)             ftpWebsiteMirror => "",

176)             rsyncWebsiteMirror => "",

177)             httpDistMirror => "http://tor.idnr.ws/dist/",

178)             rsyncDistMirror => "",

179)             updateDate => "Unknown",

180)         },
181) 

182)        mirror008 => {

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

184)             orgName => "Amorphis",

185)             isoCC => "NL",
186)             subRegion => "",
187)             region => "Europe",
188)             ipv4 => "True",
189)             ipv6 => "False",
190)             loadBalanced => "Unknown",
191)             httpWebsiteMirror => "http://tor.amorphis.eu/",

192)             rsyncWebsiteMirror => "",

193)             ftpWebsiteMirror => "",
194)             httpDistMirror => "http://tor.amorphis.eu/dist/",
195)             rsyncDistMirror => "",

196)             updateDate => "Unknown",

197)         },
198) 

199)        mirror009 => {

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

201)             orgName => "BIT BV",
202)             isoCC => "NL",
203)             subRegion => "",
204)             region => "Europe",
205)             ipv4 => "True",
206)             ipv6 => "False",
207)             loadBalanced => "Unknown",

208)             httpWebsiteMirror => "",

209)             rsyncWebsiteMirror => "",

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

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

212)             rsyncDistMirror => "",

213)             updateDate => "Unknown",

214)         },
215) 

216)        mirror010 => {

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

218)             orgName => "CCC",
219)             isoCC => "NL",
220)             subRegion => "",
221)             region => "Europe",
222)             ipv4 => "True",
223)             ipv6 => "False",
224)             loadBalanced => "Unknown",
225)             httpWebsiteMirror => "http://tor.ccc.de/",

226)             rsyncWebsiteMirror => "",

227)             ftpWebsiteMirror => "",
228)             httpDistMirror => "http://tor.ccc.de/dist/",
229)             rsyncDistMirror => "",

230)             updateDate => "Unknown",

231)         },
232) 

233)        mirror013 => {

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

235)             orgName => "TheOnionRouter",

236)             isoCC => "IS",
237)             subRegion => "",
238)             region => "Iceland",

239)             ipv4 => "True",
240)             ipv6 => "False",
241)             loadBalanced => "Unknown",

242)             httpWebsiteMirror => "http://theonionrouter.com/",
243)             httpsWebsiteMirror => "",

244)             rsyncWebsiteMirror => "",

245)             ftpWebsiteMirror => "",

246)             httpDistMirror => "http://theonionrouter.com/dist/",
247)             httpsDistMirror => "",

248)             rsyncDistMirror => "",

249)             updateDate => "Unknown",

250)         },

251)     mirror014 => {
252)         adminContact => "tormaster AT xpdm DOT us",
253)         orgName => "Xpdm",
254)         isoCC => "US",
255)         subRegion => "",
256)         region => "North America",
257)         ipv4 => "True",
258)         ipv6 => "False",
259)         loadBalanced => "Unknown",
260)         httpWebsiteMirror => "http://torproj.xpdm.us/",
261)         httpsWebsiteMirror => "https://torproj.xpdm.us/",
262)         rsyncWebsiteMirror => "",
263)         ftpWebsiteMirror => "",
264)         httpDistMirror => "http://torproj.xpdm.us/dist/",
265)         httpsDistMirror => "https://torproj.xpdm.us/dist/",
266)         rsyncDistMirror => "",
267)         hiddenServiceMirror => "http://h3prhz46uktgm4tt.onion/",
268)         updateDate => "Unknown",
269)         },

270)         mirror016 => {

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

272)             orgName => "Unknown",
273)             isoCC => "HU",
274)             subRegion => "Hungary",
275)             region => "Europe",
276)             ipv4 => "True",
277)             ipv6 => "False",
278)             loadBalanced => "No",

279)             httpWebsiteMirror => "http://mirror.tor.hu/",

280)             httpsWebsiteMirror => "",

281)             rsyncWebsiteMirror => "",

282)             ftpWebsiteMirror => "",

283)             httpDistMirror => "http://mirror.tor.hu/dist/",

284)             httpsDistMirror => "",
285)             rsyncDistMirror => "",
286)             hiddenServiceMirror => "",
287)             updateDate => "Unknown",

288)         },

289) 

290)         mirror017 => {

291)             adminContact => "",

292)             orgName => "Technica-03",

293)             isoCC => "UA",

294)             subRegion => "Ukraine",
295)             region => "Eastern Europe",
296)             ipv4 => "True",
297)             ipv6 => "False",
298)             loadBalanced => "No",
299)             httpWebsiteMirror => "http://torua.reactor-xg.kiev.ua/",
300)             httpsWebsiteMirror => "",

301)             rsyncWebsiteMirror => "",

302)             ftpWebsiteMirror => "",

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

304)             httpsDistMirror => "",
305)             rsyncDistMirror => "",
306)             hiddenServiceMirror => "",
307)             updateDate => "Unknown",

308)         },

309) 

310) 	    mirror018 => {

311)             adminContact => "",
312)             orgName => "chaos darmstadt",
313)             isoCC => "DE",
314)             subRegion => "Germany",
315)             region => "Europe",
316)             ipv4 => "True",
317)             ipv6 => "False",
318)             loadBalanced => "No",
319)             httpWebsiteMirror => "http://mirrors.chaos-darmstadt.de/tor-mirror/",
320)             httpsWebsiteMirror => "",
321)             rsyncWebsiteMirror => "",
322)             ftpWebsiteMirror => "",
323)             httpDistMirror => "http://mirrors.chaos-darmstadt.de/tor-mirror/dist/",
324)             httpsDistMirror => "",
325)             rsyncDistMirror => "",
326)             hiddenServiceMirror => "",
327)             updateDate => "Unknown",

328)         },

329) 

330) 	mirror019 => {

331)             adminContact => "webmaster AT askapache DOT com",
332)             orgName => "AskApache",

333)             isoCC => "US",
334)             subRegion => "California",
335)             region => "US",
336)             ipv4 => "True",
337)             ipv6 => "False",
338)             loadBalanced => "No",
339)             httpWebsiteMirror => "http://tor.askapache.com/",
340)             httpsWebsiteMirror => "",
341)             rsyncWebsiteMirror => "",
342)             ftpWebsiteMirror => "",

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

344)             httpsDistMirror => "",
345)             rsyncDistMirror => "",
346)             hiddenServiceMirror => "",
347)             updateDate => "Unknown",

348)         },

349) 

350) 	mirror020 => {

351)             adminContact => " mail AT benjamin-meier DOT info ",
352)             orgName => "beme it",

353)             isoCC => "DE",

354)             subRegion => "",

355)             region => "DE",

356)             ipv4 => "True",
357)             ipv6 => "False",
358)             loadBalanced => "No",

359)             httpWebsiteMirror => "http://tor.beme-it.de/",

360)             httpsWebsiteMirror => "https://tor.beme-it.de/",

361)             rsyncWebsiteMirror => "rsync://tor.beme-it.de/tor",

362)             ftpWebsiteMirror => "",

363)             httpDistMirror => "http://tor.beme-it.de/dist/",

364)             httpsDistMirror => "https://tor.beme-it.de/dist/",

365)             rsyncDistMirror => "rsync://tor.beme-it.de/tor/dist",

366)             hiddenServiceMirror => "",
367)             updateDate => "Unknown",

368)         },

369) 

370)         mirror021 => {

371)             adminContact => "",

372)             orgName => "India Tor Fans",

373)             isoCC => "IN",
374)             subRegion => "",
375)             region => "IN",
376)             ipv4 => "True",
377)             ipv6 => "False",
378)             loadBalanced => "No",

379)             httpWebsiteMirror => "http://www.torproject.org.in/",

380)             httpsWebsiteMirror => "",
381)             rsyncWebsiteMirror => "",
382)             ftpWebsiteMirror => "",
383)             httpDistMirror => "http://www.torproject.org.in/dist/",
384)             httpsDistMirror => "",
385)             rsyncDistMirror => "",
386)             hiddenServiceMirror => "",
387)             updateDate => "Unknown",
388)         },
389) 

390)         mirror024 => {

391)             adminContact => "",

392)             orgName => "homosu",

393)             isoCC => "SE",

394)             subRegion => "",

395)             region => "SE",

396)             ipv4 => "True",
397)             ipv6 => "False",
398)             loadBalanced => "No",
399)             httpWebsiteMirror => "http://tor.homosu.net/",
400)             httpsWebsiteMirror => "",
401)             rsyncWebsiteMirror => "",
402)             ftpWebsiteMirror => "",

403)             httpDistMirror => "http://tor.homosu.net/dist/",

404)             httpsDistMirror => "",
405)             rsyncDistMirror => "",

406)             hiddenServiceMirror => "",

407)         },

408) 

409)         mirror025 => {

410)             adminContact => "margus.random at mail.ee",
411)             orgName => "CyberSIDE",

412)             isoCC => "EE",

413)             subRegion => "",
414)             region => "EE",
415)             ipv4 => "True",
416)             ipv6 => "False",
417)             loadBalanced => "No",
418)             httpWebsiteMirror => "http://cyberside.planet.ee/tor/",
419)             httpsWebsiteMirror => "",
420)             rsyncWebsiteMirror => "",
421)             ftpWebsiteMirror => "",

422)             httpDistMirror => "http://cyberside.net.ee/tor/",

423)             httpsDistMirror => "",
424)             rsyncDistMirror => "",

425)             hiddenServiceMirror => "",

426)         },

427) 

428)         mirror028 => {

429)             adminContact => "",

430)             orgName => "NW Linux",

431)             isoCC => "US",
432)             subRegion => "WA",
433)             region => "US",
434)             ipv4 => "True",
435)             ipv6 => "False",
436)             loadBalanced => "No",

437)             httpWebsiteMirror => "http://torproject.nwlinux.us/",

438)             httpsWebsiteMirror => "",

439)             rsyncWebsiteMirror => "rsync://nwlinux.us/tor-web",

440)             ftpWebsiteMirror => "",

441)             httpDistMirror => "http://torproject.nwlinux.us/dist/",

442)             httpsDistMirror => "",

443)             rsyncDistMirror => "rsync://nwlinux.us/tor-dist",

444)             hiddenServiceMirror => "",
445)         },

446)         mirror029 => {

447)             adminContact => "",
448)             orgName => "LazyTiger",
449)             isoCC => "FR",
450)             subRegion => "",
451)             region => "FR",
452)             ipv4 => "True",
453)             ipv6 => "False",
454)             loadBalanced => "No",
455)             httpWebsiteMirror => "http://tor.taiga-san.net/",
456)             httpsWebsiteMirror => "",
457)             rsyncWebsiteMirror => "",
458)             ftpWebsiteMirror => "",

459)             httpDistMirror => "http://tor.taiga-san.net/dist/",

460)             httpsDistMirror => "",
461)             rsyncDistMirror => "",

462)             hiddenServiceMirror => "",
463)         },

464)         mirror030 => {

465)             adminContact => "",
466)             orgName => "searchprivate",
467)             isoCC => "US",
468)             subRegion => "TX",
469)             region => "US",
470)             ipv4 => "True",
471)             ipv6 => "False",
472)             loadBalanced => "No",

473)             httpWebsiteMirror => "http://tor.searchprivate.com/",

474)             httpsWebsiteMirror => "",
475)             rsyncWebsiteMirror => "",
476)             ftpWebsiteMirror => "",

477)             httpDistMirror => "http://tor.searchprivate.com/dist/",

478)             httpsDistMirror => "",
479)             rsyncDistMirror => "",

480)             hiddenServiceMirror => "",
481)         },

482)         mirror031 => {

483)             adminContact => "",
484)             orgName => "cyberarmy",
485)             isoCC => "AT",
486)             subRegion => "",
487)             region => "AT",
488)             ipv4 => "True",
489)             ipv6 => "False",
490)             loadBalanced => "No",

491)             httpWebsiteMirror => "http://tor.cyberarmy.at/",

492)             httpsWebsiteMirror => "",
493)             rsyncWebsiteMirror => "",
494)             ftpWebsiteMirror => "",

495)             httpDistMirror => "",

496)             httpsDistMirror => "",
497)             rsyncDistMirror => "",
498)             hiddenServiceMirror => "",
499)         },
500)         mirror032 => {
501)             adminContact => "",

502)             orgName => "torproject.is",

503)             isoCC => "IS",
504)             subRegion => "",
505)             region => "IS",
506)             ipv4 => "True",
507)             ipv6 => "False",
508)             loadBalanced => "No",

509)             httpWebsiteMirror => "http://torproject.is/",

510)             httpsWebsiteMirror => "",
511)             rsyncWebsiteMirror => "",
512)             ftpWebsiteMirror => "",

513)             httpDistMirror => "http://torproject.is/dist/",

514)             httpsDistMirror => "",
515)             rsyncDistMirror => "",

516)             hiddenServiceMirror => "",

517)         },
518)         mirror033 => {
519)             adminContact => "",
520)             orgName => "torservers",
521)             isoCC => "DE",
522)             subRegion => "",
523)             region => "DE",
524)             ipv4 => "True",
525)             ipv6 => "False",
526)             loadBalanced => "No",
527)             httpWebsiteMirror => "http://www.torservers.net/mirrors/torproject.org/",
528)             httpsWebsiteMirror => "https://www.torservers.net/mirrors/torproject.org/",
529)             rsyncWebsiteMirror => "",
530)             ftpWebsiteMirror => "",

531)             httpDistMirror => "http://www.torservers.net/mirrors/torproject.org/dist/",
532)             httpsDistMirror => "https://www.torservers.net/mirrors/torproject.org/dist/",

533)             rsyncDistMirror => "",
534)             hiddenServiceMirror => "http://hbpvnydyyjbmhx6b.onion/mirrors/torproject.org/",

535)         },

536)         mirror036 => {
537)             adminContact => "",
538)             orgName => "",
539)             isoCC => "NL",
540)             subRegion => "",
541)             region => "NL",
542)             ipv4 => "True",
543)             ipv6 => "False",
544)             loadBalanced => "No",
545)             httpWebsiteMirror => "",
546)             httpsWebsiteMirror => "",
547)             rsyncWebsiteMirror => "",
548)             ftpWebsiteMirror => "",
549)             httpDistMirror => "",

550)             httpsDistMirror => "https://www.coevoet.nl/tor/dist/",

551)             rsyncDistMirror => "",
552)             hiddenServiceMirror => "",

553)       },

554)         mirror037 => {
555)             adminContact => "",

556)             orgName => "crypto.is",

557)             isoCC => "IS",
558)             subRegion => "",

559)             region => "Iceland",

560)             ipv4 => "True",
561)             ipv6 => "False",
562)             loadBalanced => "No",

563)             httpWebsiteMirror => "https://torproject.crypto.is/",
564)             httpsWebsiteMirror => "https://torproject.crypto.is/",

565)             rsyncWebsiteMirror => "",
566)             ftpWebsiteMirror => "",

567)             httpDistMirror => "https://torproject.crypto.is/dist/",
568)             httpsDistMirror => "https://torproject.crypto.is/dist/",

569)             rsyncDistMirror => "",
570)             hiddenServiceMirror => "",
571)       },
572)         mirror038 => {
573)             adminContact => "",
574)             orgName => "",
575)             isoCC => "LT",
576)             subRegion => "",
577)             region => "LT",
578)             ipv4 => "True",
579)             ipv6 => "False",
580)             loadBalanced => "No",

581)             httpWebsiteMirror => "http://tor.vesta.nu/",

582)             httpsWebsiteMirror => "",
583)             rsyncWebsiteMirror => "",
584)             ftpWebsiteMirror => "",

585)             httpDistMirror => "http://tor.vesta.nu/dist/",

586)             httpsDistMirror => "",
587)             rsyncDistMirror => "",

588)             hiddenServiceMirror => "",

589)       },
590)         mirror040 => {
591)             adminContact => "",
592)             orgName => "",
593)             isoCC => "DE",
594)             subRegion => "",
595)             region => "DE",
596)             ipv4 => "True",
597)             ipv6 => "False",
598)             loadBalanced => "No",

599)             httpWebsiteMirror => "http://tor.freie-re.de/",

600)             httpsWebsiteMirror => "",
601)             rsyncWebsiteMirror => "",
602)             ftpWebsiteMirror => "",

603)             httpDistMirror => "http://tor.freie-re.de/dist/",

604)             httpsDistMirror => "",
605)             rsyncDistMirror => "",

606)             hiddenServiceMirror => "",
607)       },
608)         mirror041 => {
609)             adminContact => "",

610)             orgName => "Host4site",

611)             isoCC => "IL",
612)             subRegion => "",
613)             region => "IL",
614)             ipv4 => "True",
615)             ipv6 => "False",
616)             loadBalanced => "No",
617)             httpWebsiteMirror => "http://mirror.host4site.co.il/torproject.org/",
618)             httpsWebsiteMirror => "",
619)             rsyncWebsiteMirror => "",
620)             ftpWebsiteMirror => "",

621)             httpDistMirror => "http://mirror.host4site.co.il/torproject.org/dist/",

622)             httpsDistMirror => "",
623)             rsyncDistMirror => "",

624)             hiddenServiceMirror => "",

625)       },
626)         mirror043 => {
627)             adminContact => "",
628)             orgName => "factor.cc",

629)             isoCC => "DE",

630)             subRegion => "",

631)             region => "DE",

632)             ipv4 => "True",
633)             ipv6 => "False",
634)             loadBalanced => "No",
635)             httpWebsiteMirror => "http://tor.factor.cc/",

636)             httpsWebsiteMirror => "https://factor.cc/tor/",

637)             rsyncWebsiteMirror => "",
638)             ftpWebsiteMirror => "",
639)             httpDistMirror => "http://tor.factor.cc/dist/",

640)             httpsDistMirror => "https://factor.cc/tor/dist/",

641)             rsyncDistMirror => "",

642)             hiddenServiceMirror => "",
643)       },
644)         mirror044 => {
645)             adminContact => "",

646)             orgName => "torproject.nl",

647)             isoCC => "NL",
648)             subRegion => "",
649)             region => "NL",
650)             ipv4 => "True",
651)             ipv6 => "False",
652)             loadBalanced => "No",
653)             httpWebsiteMirror => "http://www.torproject.nl/",
654)             httpsWebsiteMirror => "https://www.torproject.nl/",
655)             rsyncWebsiteMirror => "",
656)             ftpWebsiteMirror => "",
657)             httpDistMirror => "http://www.torproject.nl/dist/",
658)             httpsDistMirror => "https://www.torproject.nl/dist/",
659)             rsyncDistMirror => "",

660)             hiddenServiceMirror => "",
661)       },
662)         mirror045 => {
663)             adminContact => "",
664)             orgName => "",
665)             isoCC => "TN",
666)             subRegion => "",
667)             region => "TN",
668)             ipv4 => "True",
669)             ipv6 => "False",
670)             loadBalanced => "No",
671)             httpWebsiteMirror => "http://tor.mirror.tn/",
672)             httpsWebsiteMirror => "",
673)             rsyncWebsiteMirror => "",
674)             ftpWebsiteMirror => "",
675)             httpDistMirror => "http://tor.mirror.tn/dist/",
676)             httpsDistMirror => "",
677)             rsyncDistMirror => "",

678)             hiddenServiceMirror => "",

679)       },

680)         mirror045 => {

681)             adminContact => "",
682)             orgName => "",

683)             isoCC => "TN",

684)             subRegion => "",

685)             region => "TN",

686)             ipv4 => "True",
687)             ipv6 => "False",
688)             loadBalanced => "No",
689)             httpWebsiteMirror => "",

690)             httpsWebsiteMirror => "https://torproject.antagonism.org/",
691)             rsyncWebsiteMirror => "",
692)             ftpWebsiteMirror => "",
693)             httpDistMirror => "https://torproject.antagonism.org/dist/",
694)             httpsDistMirror => "",
695)             rsyncDistMirror => "",

696)             hiddenServiceMirror => "",
697)       },
698)         mirror046 => {
699)             adminContact => "",
700)             orgName => "",
701)             isoCC => "DE",
702)             subRegion => "",
703)             region => "DE",
704)             ipv4 => "True",
705)             ipv6 => "False",
706)             loadBalanced => "No",
707)             httpWebsiteMirror => "http://mirror.open-networx.org/torproject.org/",
708)             httpsWebsiteMirror => "https://mirror.open-networx.org/torproject.org/",
709)             rsyncWebsiteMirror => "",
710)             ftpWebsiteMirror => "",
711)             httpDistMirror => "http://mirror.open-networx.org/torproject.org/dist/",
712)             httpsDistMirror => "https://mirror.open-networx.org/torproject.org/dist/",
713)             rsyncDistMirror => "",

714)             hiddenServiceMirror => "",

715)       },
716)         mirror048 => {
717)             adminContact => "",
718)             orgName => "",
719)             isoCC => "AT",
720)             subRegion => "",
721)             region => "AT",
722)             ipv4 => "True",
723)             ipv6 => "True",
724)             loadBalanced => "No",
725)             httpWebsiteMirror => "http://tor.dont-know-me.at/",
726)             httpsWebsiteMirror => "",
727)             rsyncWebsiteMirror => "",
728)             ftpWebsiteMirror => "",
729)             httpDistMirror => "http://tor.dont-know-me.at/dist/",
730)             httpsDistMirror => "",
731)             rsyncDistMirror => "",

732)             hiddenServiceMirror => "",
733)         },
734)         mirror049 => {
735)             adminContact => "IceBear",

736)             orgName => "myRL.net",

737)             isoCC => "IS",
738)             subRegion => "",
739)             region => "IS",
740)             ipv4 => "True",
741)             ipv6 => "False",
742)             loadBalanced => "No",
743)             httpWebsiteMirror => "http://tor.myrl.net/",
744)             httpsWebsiteMirror => "https://tor.myrl.net/",
745)             rsyncWebsiteMirror => "",
746)             ftpWebsiteMirror => "",
747)             httpDistMirror => "http://tor.myrl.net/dist/",
748)             httpsDistMirror => "https://tor.myrl.net/dist/",
749)             rsyncDistMirror => "",

750)             hiddenServiceMirror => "",
751)         },
752)         mirror050 => {
753)             adminContact => "",

754)             orgName => "borgmann.tv",

755)             isoCC => "DE",
756)             subRegion => "",
757)             region => "DE",
758)             ipv4 => "True",
759)             ipv6 => "False",
760)             loadBalanced => "No",
761)             httpWebsiteMirror => "http://tor.borgmann.tv/",
762)             httpsWebsiteMirror => "",
763)             rsyncWebsiteMirror => "",
764)             ftpWebsiteMirror => "",
765)             httpDistMirror => "http://tor.borgmann.tv/dist/",
766)             httpsDistMirror => "",
767)             rsyncDistMirror => "",

768)             hiddenServiceMirror => "",

769)         },
770)         mirror051 => {
771)             adminContact => "",
772)             orgName => "torland",

773)             isoCC => "GB",

774)             subRegion => "",

775)             region => "GB",

776)             ipv4 => "True",
777)             ipv6 => "False",
778)             loadBalanced => "No",

779)             httpWebsiteMirror => "http://mirror.torland.me/torproject.org/",
780)             httpsWebsiteMirror => "https://mirror.torland.me/torproject.org/",

781)             rsyncWebsiteMirror => "",
782)             ftpWebsiteMirror => "",

783)             httpDistMirror => "http://mirror.torland.me/torproject.org/dist/",
784)             httpsDistMirror => "https://mirror.torland.me/torproject.org/dist/",

785)             rsyncDistMirror => "",
786)             hiddenServiceMirror => "",
787)         },
788)         mirror052 => {
789)             adminContact => "",
790)             orgName => "spline",
791)             isoCC => "DE",
792)             subRegion => "",
793)             region => "DE",
794)             ipv4 => "True",
795)             ipv6 => "False",
796)             loadBalanced => "No",
797)             httpWebsiteMirror => "http://tor.spline.de/",

798)             httpsWebsiteMirror => "https://tor.spline.inf.fu-berlin.de/",

799)             rsyncWebsiteMirror => "rsync://ftp.spline.de/tor",
800)             ftpWebsiteMirror => "ftp://ftp.spline.de/pub/tor",
801)             httpDistMirror => "http://tor.spline.de/dist/",

802)             httpsDistMirror => "https://tor.spline.inf.fu-berlin.de/dist/",

803)             rsyncDistMirror => "rsync://ftp.spline.de/tor/dist",
804)             hiddenServiceMirror => "",

805)         },
806)         mirror053 => {
807)             adminContact => "",
808)             orgName => "",
809)             isoCC => "AT",
810)             subRegion => "",
811)             region => "AT",
812)             ipv4 => "True",
813)             ipv6 => "False",
814)             loadBalanced => "No",
815)             httpWebsiteMirror => "http://torproject.ph3x.at/",
816)             httpsWebsiteMirror => "",
817)             rsyncWebsiteMirror => "",
818)             ftpWebsiteMirror => "",
819)             httpDistMirror => "http://torproject.ph3x.at/dist/",
820)             httpsDistMirror => "",
821)             rsyncDistMirror => "",

822)             hiddenServiceMirror => "",
823)         },
824)         mirror054 => {
825)             adminContact => "",

826)             orgName => "hessmo",

827)             isoCC => "US",
828)             subRegion => "",
829)             region => "US",
830)             ipv4 => "True",
831)             ipv6 => "False",
832)             loadBalanced => "No",
833)             httpWebsiteMirror => "http://mirror.hessmo.com/tor/",
834)             httpsWebsiteMirror => "",
835)             rsyncWebsiteMirror => "",
836)             ftpWebsiteMirror => "",

837)             httpDistMirror => "http://mirror.hessmo.com/tor/dist/",

838)             httpsDistMirror => "",
839)             rsyncDistMirror => "",

840)             hiddenServiceMirror => "",
841)         },
842)         mirror055 => {
843)             adminContact => "",
844)             orgName => "",
845)             isoCC => "EU",
846)             subRegion => "",
847)             region => "EU",
848)             ipv4 => "True",
849)             ipv6 => "True",
850)             loadBalanced => "No",
851)             httpWebsiteMirror => "http://tor.unregistered.eu/",
852)             httpsWebsiteMirror => "",
853)             rsyncWebsiteMirror => "",
854)             ftpWebsiteMirror => "",
855)             httpDistMirror => "http://tor.unregistered.eu/dist/",
856)             httpsDistMirror => "",
857)             rsyncDistMirror => "",

858)             hiddenServiceMirror => "",
859)         },
860)         mirror056 => {
861)             adminContact => "",
862)             orgName => "",

863)             isoCC => "IT",

864)             subRegion => "",

865)             region => "IT",

866)             ipv4 => "True",
867)             ipv6 => "True",
868)             loadBalanced => "No",
869)             httpWebsiteMirror => "http://torproject.jcsh.it/",
870)             httpsWebsiteMirror => "",
871)             rsyncWebsiteMirror => "",
872)             ftpWebsiteMirror => "",
873)             httpDistMirror => "http://torproject.jcsh.it/dist/",
874)             httpsDistMirror => "",
875)             rsyncDistMirror => "",

876)             hiddenServiceMirror => "",
877)         },
878)         mirror057 => {
879)             adminContact => "",
880)             orgName => "",
881)             isoCC => "PT",
882)             subRegion => "",
883)             region => "PT",
884)             ipv4 => "True",
885)             ipv6 => "True",
886)             loadBalanced => "No",
887)             httpWebsiteMirror => "",
888)             httpsWebsiteMirror => "",
889)             rsyncWebsiteMirror => "",
890)             ftpWebsiteMirror => "",
891)             httpDistMirror => "https://5coluna.com/downloads/tor/",
892)             httpsDistMirror => "",
893)             rsyncDistMirror => "",

894)             hiddenServiceMirror => "",

895)         }

896) );
897) 
898) my $count = values %m;
899) print "We have a total of $count mirrors\n";
900) print "Fetching the last updated date for each mirror.\n";
901) 

902) my $tortime;

903) $tortime = FetchDate("https://www.torproject.org/");

904) # Adjust offical Tor time by out-of-date offset: number of days * seconds per day 

905) $tortime -= 1 * 172800; 

906) print "The official time for Tor is $tortime. \n";
907) 

908) foreach my $server ( keys %m ) {
909) 
910)     print "Attempting to fetch from $m{$server}{'orgName'}\n";
911) 
912)     if ($m{$server}{'httpWebsiteMirror'}) {
913)         print "Attempt to fetch via HTTP.\n";
914)         $m{$server}{"updateDate"} = FetchDate("$m{$server}{'httpWebsiteMirror'}");
915)     } elsif ($m{$server}{'httpsWebsiteMirror'}) {
916)         print "Attempt to fetch via HTTPS.\n";
917)         $m{$server}{"updateDate"} = FetchDate("$m{$server}{'httpsWebsiteMirror'}");
918)     } elsif ($m{$server}{'ftpWebsiteMirror'}) {
919)         print "Attempt to fetch via FTP.\n";
920)         $m{$server}{"updateDate"} = FetchDate("$m{$server}{'ftpWebsiteMirror'}");
921)     } else {
922)         print "We were unable to fetch or store anything. We still have the following: $m{$server}{'updateDate'}\n";
923)     }
924) 
925)     print "We fetched and stored the following: $m{$server}{'updateDate'}\n";
926) 
927)  }
928) 
929) 
930) print "We sorted the following mirrors by their date of last update: \n";
931) foreach my $server ( sort { $m{$b}{'updateDate'} <=> $m{$a}{'updateDate'}} keys %m ) {
932) 
933)      print "\n";
934)      print "Mirror $m{$server}{'orgName'}: \n";
935) 
936)      foreach my $attrib ( sort keys %{$m{$server}} ) {
937)         print "$attrib = $m{$server}{$attrib}";
938)         print "\n";
939)      };
940) }
941) 
942) my $outFile = "include/mirrors-table.wmi";
943) my $html;
944) open(OUT, "> $outFile") or die "Can't open $outFile: $!";
945) 

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

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

950)      my $time;

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

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

953) 	    $time = "Up to date";
954) 	  } else { $time = "Out of date"; }

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

956) print OUT <<"END";
957)      \n<tr>\n
958)          <td>$m{$server}{'isoCC'}</td>\n
959)          <td>$m{$server}{'orgName'}</td>\n
960)          <td>$time</td>\n
961) END
962) 
963)      my %prettyNames = (
964)                         httpWebsiteMirror => "http",
965)                         httpsWebsiteMirror => "https",
966)                         ftpWebsiteMirror => "ftp",
967)                         rsyncWebsiteMirror => "rsync",
968)                         httpDistMirror => "http",
969)                         httpsDistMirror => "https",
970)                         rsyncDistMirrors => "rsync", );
971) 
972)      foreach my $precious ( sort keys %prettyNames )

973)      {
974)         if ($m{$server}{"$precious"}) {
975)             print OUT "    <td><a href=\"" . $m{$server}{$precious} . "\">" .

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