Changeset - 2d63fa6d1598
[Not reviewed]
default
0 1 0
Tyler Durden (virii) - 11 years ago 2014-02-10 21:22:33
virii@c3l.lu
Support for scramblesuit bridges
1 file changed with 2 insertions and 2 deletions:
0 comments (0 inline, 0 general)
Scripts/update_server.pl
Show inline comments
 
@@ -26,34 +26,34 @@ if (-e '/etc/ennstatus_updater.conf') {
 
    $ennstatus_url = $API_url;
 
}
 
######## [loop through configs] ########
 
for (1..scalar @configs) {
 
    open config, "<", "/etc/tor/" . $configs[$_ -1] || die "Cannot open $configs[$_ -1]\n";
 
        while (<config>) {
 
            $server_name = $1       if /^Nickname (\w+)/i;
 
            $server_type = 'Exit'   if /^ExitPolicy accept \*:\*/i;
 
            $server_type = 'Relay'  if /^ExitPolicy reject \*:\*/i and $server_type ne 'Bridge';
 
            $server_type = 'Bridge' if /^BridgeRelay 1/i;
 
            $data_dir    = $1       if /^DataDirectory (.*)/i;
 
            $pidfile     = $1       if /^PidFile (.*)/i;
 
            $obfs        = 'True'   if /^ServerTransportPlugin obfs2,obfs3/i;
 
            $obfs        = 'True'   if /^ServerTransportPlugin (obfs\d+|scramblesuit)/i;
 
            $ip          = $1       if /^OutboundBindAddress (\d+\.\d+\.\d+\.\d+)/i;
 
        }
 
    close config;
 
######## [obfs check] ########  
 
    $obfs = 'False' if $obfs ne 'True' and $server_type eq 'Bridge';
 
print $obfs . "\n";
 
######## [ip check] ########    
 
    if ($ip == "") {
 
        $socket = new IO::Socket::INET ( PeerAddr => "google.com",
 
        $socket = new IO::Socket::INET ( PeerAddr => "enn.lu",
 
                                         PeerPort => 80,
 
                                         Proto => 'tcp');
 
        $ip = $socket->sockhost;
 
        close $socket;
 
    }
 
######## [fingerprint] ######## 
 
    open fingerprint, "<", $data_dir . '/fingerprint';
 
        $read_in = <fingerprint>;
 
        $fingerprint = $1 if $read_in =~ /^\w+ (\w{40})/i;
 
    close fingerprint;
 
######## [pid check] ########   
 
    open pidfile, "<", $pidfile;
0 comments (0 inline, 0 general)