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) 

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

19)     timeout => 15,

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

44)     my $code = $result->code();
45)     print "Result code $code\n";

46) 

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

48)        my $taint = $result->content;
49)        my $content = sanitize($taint);
50)        if ($content) {

51) 

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

66) 

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

71) 
72)     return "Unknown";

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

77) my %m = (
78)         mirror000 => {
79)             adminContact => "tor AT goodeid DOT com",
80)             orgName => "goodeid.com",
81)             isoCC => "CAN",
82)             subRegion => "",
83)             region => "CAN",
84)             ipv4 => "True",
85)             ipv6 => "False",
86)             loadBalanced => "No",
87)             httpWebsiteMirror => "http://tor-node.goodeid.com/",
88)             httpsWebsiteMirror => "https://tor-node.goodeid.com/",
89)             rsyncWebsiteMirror => "",
90)             ftpWebsiteMirror => "",
91)             httpDistMirror => "http://tor-node.goodeid.com/dist/",
92)             httpsDistMirror => "https://tor-node.goodeid.com/dist/",
93)             rsyncDistMirror => "",
94)             hiddenServiceMirror => "",
95)             updateDate => "Unknown",
96)         },
97) 

98)        mirror001 => {

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

100)             orgName => "Depthstrike",

101)             isoCC => "CA",
102)             subRegion => "NS",
103)             region => "North America",
104)             ipv4 => "True",
105)             ipv6 => "False",
106)             loadBalanced => "Unknown",
107)             httpWebsiteMirror => "http://tor.depthstrike.com/",
108)             ftpWebsiteMirror => "",
109)             rsyncWebsiteMirror => "",
110)             httpDistMirror => "http://tor.depthstrike.com/dist/",
111)             rsyncDistMirror => "",

112)             updateDate => "Unknown",

113)         },
114) 
115)        mirror002 => {

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

117)             orgName => "Hermetix",

118)             isoCC => "CA",
119)             subRegion => "QC",
120)             region => "North America",
121)             ipv4 => "True",
122)             ipv6 => "False",
123)             loadBalanced => "Unknown",
124)             httpWebsiteMirror => "http://tor.hermetix.org/",
125)             rsyncWebsiteMirror => "",

126)             httpDistMirror => "",

127)             rsyncDistMirror => "",

128)             updateDate => "Unknown",

129)         },
130) 
131)        mirror003 => {

132)             adminContact => "",

133)             orgName => "Boinc",

134)             isoCC => "CH",
135)             subRegion => "",
136)             region => "Europe",
137)             ipv4 => "True",
138)             ipv6 => "False",
139)             loadBalanced => "Unknown",
140)             httpWebsiteMirror => "http://tor.boinc.ch/",
141)             ftpWebsiteMirror => "",
142)             rsyncWebsiteMirror => "",
143)             httpDistMirror => "http://tor.boinc.ch/dist/",
144)             rsyncDistMirror => "",

145)             updateDate => "Unknown",

146)         },
147) 
148)        mirror004 => {

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

150)             orgName => "Anonymity",

151)             isoCC => "CN",
152)             subRegion => "",
153)             region => "Asia",
154)             ipv4 => "True",
155)             ipv6 => "False",
156)             loadBalanced => "Unknown",

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

158)             ftpWebsiteMirror => "",
159)             rsyncWebsiteMirror => "",

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

161)             rsyncDistMirror => "",

162)             updateDate => "Unknown",

163)         },
164) 

165)        mirror005 => {

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

167)             orgName => "Bbs",

168)             isoCC => "DE",
169)             subRegion => "",
170)             region => "Europe",
171)             ipv4 => "True",
172)             ipv6 => "False",
173)             loadBalanced => "Unknown",
174)             httpWebsiteMirror => "http://tor.blingblingsquad.net/",
175)             ftpWebsiteMirror => "",
176)             rsyncWebsiteMirror => "",

177)             httpDistMirror => "",

178)             rsyncDistMirror => "",

179)             updateDate => "Unknown",

180)         },
181) 

182)        mirror006 => {

183)             orgName => "Berapla",
184)             isoCC => "DE",
185)             subRegion => "",
186)             region => "Europe",
187)             ipv4 => "True",
188)             ipv6 => "False",
189)             loadBalanced => "Unknown",
190)             httpWebsiteMirror => "http://download.berapla.de/mirrors/tor/",
191)             ftpWebsiteMirror => "",
192)             rsyncWebsiteMirror => "",
193)             httpDistMirror => "http://download.berapla.de/mirrors/tor/dist/",
194)             rsyncDistMirror => "",
195)             updateDate => "Unknown",
196)         },

197) 

198)        mirror007 => {

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

200)             orgName => "Cybermirror",

201)             isoCC => "DE",
202)             subRegion => "",
203)             region => "Europe",
204)             ipv4 => "True",
205)             ipv6 => "False",
206)             loadBalanced => "Unknown",
207)             httpWebsiteMirror => "http://tor.cybermirror.org/",
208)             ftpWebsiteMirror => "",
209)             rsyncWebsiteMirror => "",
210)             httpDistMirror => "http://tor.cybermirror.org/dist/",
211)             rsyncDistMirror => "",

212)             updateDate => "Unknown",

213)         },
214) 

215)        mirror008 => {

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

217)             orgName => "Spline",
218)             isoCC => "DE",
219)             subRegion => "FU",
220)             region => "Europe",
221)             ipv4 => "True",
222)             ipv6 => "False",
223)             loadBalanced => "Unknown",

224)             httpWebsiteMirror => "",

225)             ftpWebsiteMirror => "",
226)             rsyncWebsiteMirror => "",

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

228)             rsyncDistMirror => "",

229)             updateDate => "Unknown",

230)         },
231) 
232)        mirror009 => {

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

234)             orgName => "Onionland",

235)             isoCC => "DE",
236)             subRegion => "",
237)             region => "Europe",
238)             ipv4 => "True",
239)             ipv6 => "False",
240)             loadBalanced => "Unknown",
241)             httpWebsiteMirror => "http://mirror.onionland.org/",
242)             ftpWebsiteMirror => "",
243)             rsyncWebsiteMirror => "rsync: mirror.onionland.org::tor/",
244)             httpDistMirror => "http://mirror.onionland.org/dist/",

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

246)             updateDate => "Unknown",

247)         },
248) 

249)        mirror011 => {

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

251)             orgName => "Zentrum der Gesundheit",

252)             isoCC => "DK",
253)             subRegion => "",
254)             region => "Europe",
255)             ipv4 => "True",
256)             ipv6 => "False",
257)             loadBalanced => "Unknown",

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

259)             ftpWebsiteMirror => "",

260)             rsyncWebsiteMirror => "",

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

263)             updateDate => "Unknown",

264)         },
265) 

266)        mirror012 => {

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

268)             orgName => "CRAN",
269)             isoCC => "FR",

270)             subRegion => "Ile de France",

271)             region => "Europe",
272)             ipv4 => "True",
273)             ipv6 => "False",
274)             loadBalanced => "Unknown",

275)             httpWebsiteMirror => "",

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

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

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

279)             rsyncDistMirror => "",

280)             updateDate => "Unknown",

281)         },
282) 

283)        mirror013 => {

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

285)             orgName => "Amorphis",

286)             isoCC => "NL",
287)             subRegion => "",
288)             region => "Europe",
289)             ipv4 => "True",
290)             ipv6 => "False",
291)             loadBalanced => "Unknown",
292)             httpWebsiteMirror => "http://tor.amorphis.eu/",

293)             rsyncWebsiteMirror => "",

294)             ftpWebsiteMirror => "",
295)             httpDistMirror => "http://tor.amorphis.eu/dist/",
296)             rsyncDistMirror => "",

297)             updateDate => "Unknown",

298)         },
299) 

300)        mirror014 => {

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

302)             orgName => "BIT BV",
303)             isoCC => "NL",
304)             subRegion => "",
305)             region => "Europe",
306)             ipv4 => "True",
307)             ipv6 => "False",
308)             loadBalanced => "Unknown",

309)             httpWebsiteMirror => "",

310)             rsyncWebsiteMirror => "",

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

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

313)             rsyncDistMirror => "",

314)             updateDate => "Unknown",

315)         },
316) 

317)        mirror015 => {

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

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

327)             rsyncWebsiteMirror => "",

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

331)             updateDate => "Unknown",

332)         },
333) 

334)        mirror016 => {

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

336)             orgName => "Kamagurka",

337)             isoCC => "NL",
338)             subRegion => "Haarlem",
339)             region => "Europe",
340)             ipv4 => "True",
341)             ipv6 => "False",
342)             loadBalanced => "Unknown",
343)             httpWebsiteMirror => "http://tor.kamagurka.org/",

344)             rsyncWebsiteMirror => "",

345)             ftpWebsiteMirror => "",
346)             httpDistMirror => "http://tor.kamagurka.org/dist/",
347)             rsyncDistMirror => "",

348)             updateDate => "Unknown",

349)         },
350) 

351)        mirror017 => {

352)             adminContact => "mirrorsosmirror.nl",

353)             orgName => "OS Mirror",
354)             isoCC => "NL",
355)             subRegion => "",
356)             region => "Europe",
357)             ipv4 => "True",
358)             ipv6 => "False",
359)             loadBalanced => "Unknown",

360)             httpWebsiteMirror => "",

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

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

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

364)             rsyncDistMirror => "",

365)             updateDate => "Unknown",

366)         },
367) 
368) 

369)        mirror018 => {

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

371)             orgName => "Meulie",

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

378)             httpWebsiteMirror => "",

379)             rsyncWebsiteMirror => "",

380)             ftpWebsiteMirror => "",

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

382)             rsyncDistMirror => "",

383)             updateDate => "Unknown",

384)         },
385) 

386)        mirror019 => {

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

388)             orgName => "Ghirai",

389)             isoCC => "UK",
390)             subRegion => "London",
391)             region => "Europe",
392)             ipv4 => "True",
393)             ipv6 => "False",
394)             loadBalanced => "Unknown",

395)             httpWebsiteMirror => "",

396)             rsyncWebsiteMirror => "",

397)             ftpWebsiteMirror => "",

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

399)             rsyncDistMirror => "",

400)             updateDate => "Unknown",

401)         },
402) 

403)        mirror020 => {

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

405)             orgName => "BJWOnline",

406)             isoCC => "US",
407)             subRegion => "California",
408)             region => "North America",
409)             ipv4 => "True",
410)             ipv6 => "False",
411)             loadBalanced => "Unknown",
412)             httpWebsiteMirror => "http://mirror.bjwonline.com/tor/",

413)             rsyncWebsiteMirror => "",

414)             ftpWebsiteMirror => "",

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

416)             rsyncDistMirror => "",

417)             updateDate => "Unknown",

418)         },
419) 

420)        mirror021 => {

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

422)             orgName => "TheOnionRouter",

423)             isoCC => "US",

424)             subRegion => "New Jersey",

425)             region => "North America",
426)             ipv4 => "True",
427)             ipv6 => "False",
428)             loadBalanced => "Unknown",
429)             httpWebsiteMirror => "http://www.theonionrouter.com/",

430)             rsyncWebsiteMirror => "",

431)             ftpWebsiteMirror => "",
432)             httpDistMirror => "http://www.theonionrouter.com/dist/",
433)             rsyncDistMirror => "",

434)             updateDate => "Unknown",

435)         },
436) 

437)        mirror022 => {

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

439)             orgName => "Unfix",

440)             isoCC => "CH",
441)             subRegion => "",
442)             region => "Europe",
443)             ipv4 => "True",
444)             ipv6 => "True",
445)             loadBalanced => "Unknown",
446)             httpWebsiteMirror => "http://tor.unfix.org/",

447)             rsyncWebsiteMirror => "",

448)             ftpWebsiteMirror => "",

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

450)             rsyncDistMirror => "",

451)             updateDate => "Unknown",

452)         },
453) 

454)        mirror023 => {

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

456)             orgName => "Sixx",

457)             isoCC => "CH",

458)             subRegion => "",
459)             region => "Europe",
460)             ipv4 => "True",
461)             ipv6 => "True",
462)             loadBalanced => "Unknown",
463)             httpWebsiteMirror => "http://tor.sixxs.net/",

464)             rsyncWebsiteMirror => "",

465)             ftpWebsiteMirror => "",

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

467)             rsyncDistMirror => "",

468)             updateDate => "Unknown",

469)         },

470) 

471)        mirror024 => {

472)             adminContact => "",

473)             orgName => "Crypto",

474)             isoCC => "US",
475)             subRegion => "",
476)             region => "North America",
477)             ipv4 => "True",
478)             ipv6 => "False",
479)             loadBalanced => "Unknown",
480)             httpWebsiteMirror => "http://crypto.nsa.org/tor/",

481)             rsyncWebsiteMirror => "",

482)             ftpWebsiteMirror => "",
483)             httpDistMirror => "http://crypto.nsa.org/tor/dist/",
484)             rsyncDistMirror => "",
485)             updateDate => "Unknown",
486)         },

487) 

488)        mirror025 => {

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

490)             orgName => "Wiretapped",
491)             isoCC => "AU",
492)             subRegion => "Sydney",
493)             region => "Oceania",
494)             ipv4 => "True",
495)             ipv6 => "False",
496)             loadBalanced => "Unknown",
497)             httpWebsiteMirror => "",

498)             rsyncWebsiteMirror => "",

499)             ftpWebsiteMirror => "ftp://ftp.mirrors.wiretapped.net/pub/security/cryptography/network/tor/",
500)             httpDistMirror => "http://www.mirrors.wiretapped.net/security/cryptography/network/tor/",
501)             rsyncDistMirror => "",
502)             updateDate => "Unknown",

503)         },

504) 

505)         mirror026 => {

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

507)             orgName => "Xpdm",

508)             isoCC => "US",
509)             subRegion => "",
510)             region => "North America",
511)             ipv4 => "True",
512)             ipv6 => "False",
513)             loadBalanced => "Unknown",
514)             httpWebsiteMirror => "http://torproj.xpdm.us/",

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

516)             rsyncWebsiteMirror => "",

517)             ftpWebsiteMirror => "",

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

520)             rsyncDistMirror => "",
521)             hiddenServiceMirror => "http://h3prhz46uktgm4tt.onion/",
522)             updateDate => "Unknown",

523)         },

524) 

525)         mirror027 => {

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

527)             orgName => "Unknown",
528)             isoCC => "CN",
529)             subRegion => "China",
530)             region => "Asia",
531)             ipv4 => "True",
532)             ipv6 => "False",
533)             loadBalanced => "No",
534)             httpWebsiteMirror => "http://free.be.ijing2008.cn/tor/",
535)             httpsWebsiteMirror => "",

536)             rsyncWebsiteMirror => "",

537)             ftpWebsiteMirror => "",
538)             httpDistMirror => "http://free.be.ijing2008.cn/tor/dist/",
539)             httpsDistMirror => "",
540)             rsyncDistMirror => "",
541)             hiddenServiceMirror => "",
542)             updateDate => "Unknown",

543)         },

544) 

545)         mirror028 => {

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

547)             orgName => "Unknown",
548)             isoCC => "HU",
549)             subRegion => "Hungary",
550)             region => "Europe",
551)             ipv4 => "True",
552)             ipv6 => "False",
553)             loadBalanced => "No",
554)             httpWebsiteMirror => "http://mirror.tor.hu/",
555)             httpsWebsiteMirror => "",

556)             rsyncWebsiteMirror => "",

557)             ftpWebsiteMirror => "",
558)             httpDistMirror => "http://mirror.tor.hu/dist/",
559)             httpsDistMirror => "",
560)             rsyncDistMirror => "",
561)             hiddenServiceMirror => "",
562)             updateDate => "Unknown",

563)         },

564) 

565)         mirror029 => {

566)             adminContact => "",

567)             orgName => "Technica-03",

568)             isoCC => "UA",

569)             subRegion => "Ukraine",
570)             region => "Eastern Europe",
571)             ipv4 => "True",
572)             ipv6 => "False",
573)             loadBalanced => "No",
574)             httpWebsiteMirror => "http://torua.reactor-xg.kiev.ua/",
575)             httpsWebsiteMirror => "",

576)             rsyncWebsiteMirror => "",

577)             ftpWebsiteMirror => "",
578)             httpDistMirror => "http://tordistua.reactor-xg.kiev.ua",
579)             httpsDistMirror => "",
580)             rsyncDistMirror => "",
581)             hiddenServiceMirror => "",
582)             updateDate => "Unknown",

583)         },

584) 

585) 	mirror030 => {

586)             adminContact => "",
587)             orgName => "chaos darmstadt",
588)             isoCC => "DE",
589)             subRegion => "Germany",
590)             region => "Europe",
591)             ipv4 => "True",
592)             ipv6 => "False",
593)             loadBalanced => "No",
594)             httpWebsiteMirror => "http://mirrors.chaos-darmstadt.de/tor-mirror/",
595)             httpsWebsiteMirror => "",
596)             rsyncWebsiteMirror => "",
597)             ftpWebsiteMirror => "",
598)             httpDistMirror => "http://mirrors.chaos-darmstadt.de/tor-mirror/dist/",
599)             httpsDistMirror => "",
600)             rsyncDistMirror => "",
601)             hiddenServiceMirror => "",
602)             updateDate => "Unknown",

603)         },

604) 

605) 	mirror031 => {
606)             adminContact => "",
607)             orgName => "Ask Apache",
608)             isoCC => "US",
609)             subRegion => "California",
610)             region => "US",
611)             ipv4 => "True",
612)             ipv6 => "False",
613)             loadBalanced => "No",
614)             httpWebsiteMirror => "http://tor.askapache.com/",
615)             httpsWebsiteMirror => "",
616)             rsyncWebsiteMirror => "",
617)             ftpWebsiteMirror => "",

618)             httpDistMirror => "",

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

623)         },

624) 

625) 	mirror032 => {
626)             adminContact => "",
627)             orgName => "I'm on the roof",
628)             isoCC => "US",
629)             subRegion => "",
630)             region => "US",
631)             ipv4 => "True",
632)             ipv6 => "False",
633)             loadBalanced => "No",
634)             httpWebsiteMirror => "http://mirror.imontheroof.com/tor-mirror/",
635)             httpsWebsiteMirror => "",
636)             rsyncWebsiteMirror => "",
637)             ftpWebsiteMirror => "",
638)             httpDistMirror => "http://mirror.imontheroof.com/tor-mirror/dist/",
639)             httpsDistMirror => "",
640)             rsyncDistMirror => "",
641)             hiddenServiceMirror => "",
642)             updateDate => "Unknown",

643)         },

644) 

645) 	mirror033 => {
646)             adminContact => "",

647)             orgName => "bullog",

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

663)         },

664) 

665) 	mirror034 => {
666)             adminContact => "",

667)             orgName => "digitip",

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

683)         },

684) 

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

687)             orgName => "shizhao",

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

703)         },

704) 

705) 	mirror036 => {
706)             adminContact => "",

707)             orgName => "ranyunfei",

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

723)         },

724) 

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

727)             orgName => "wuerkaixi",

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

743)         },

744) 

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

747)             orgName => "izaobao",

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

763)         },

764) 

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

767)             orgName => "anothr",

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

783)         },

784) 

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

787)             orgName => "zuola",

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

803)         },
804) 
805) 	mirror041 => {

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

807)             orgName => "NVS",
808)             isoCC => "US",
809)             subRegion => "",
810)             region => "US",
811)             ipv4 => "True",
812)             ipv6 => "False",
813)             loadBalanced => "No",
814)             httpWebsiteMirror => "http://tor.nonvocalscream.com/",

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

816)             rsyncWebsiteMirror => "",
817)             ftpWebsiteMirror => "",
818)             httpDistMirror => "http://tor.nonvocalscream.com/dist/",

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

820)             rsyncDistMirror => "",
821)             hiddenServiceMirror => "",
822)             updateDate => "Unknown",

823)         },
824) 
825) 	mirror042 => {
826)             adminContact => "",
827)             orgName => "ax",
828)             isoCC => "DE",
829)             subRegion => "",
830)             region => "DE",
831)             ipv4 => "True",
832)             ipv6 => "False",
833)             loadBalanced => "No",
834)             httpWebsiteMirror => "",
835)             httpsWebsiteMirror => "",
836)             rsyncWebsiteMirror => "",
837)             ftpWebsiteMirror => "",
838)             httpDistMirror => "http://tor.initrd.net/dist/",
839)             httpsDistMirror => "",
840)             rsyncDistMirror => "",
841)             hiddenServiceMirror => "",
842)             updateDate => "Unknown",

843)         },
844)         mirror043 => {

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

846)             orgName => "BarkerJr",
847)             isoCC => "FR",
848)             subRegion => "",
849)             region => "FR",
850)             ipv4 => "True",
851)             ipv6 => "False",
852)             loadBalanced => "No",
853)             httpWebsiteMirror => "",
854)             httpsWebsiteMirror => "",
855)             rsyncWebsiteMirror => "",
856)             ftpWebsiteMirror => "",
857)             httpDistMirror => "http://tor.megahal.org/dist/",
858)             httpsDistMirror => "",
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";