Changeset 7380 in genesis for tools/proxy-8.0/wleiden.pl
- Timestamp:
- Jan 20, 2010, 7:31:19 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
tools/proxy-8.0/wleiden.pl
r7148 r7380 218 218 my $masterNotUsed = master_ipNotUsed(); 219 219 $output.= 220 "hostname=\"$node type$nodename.$domain\"\n" .220 "hostname=\"$nodename.$domain\"\n" . 221 221 "location=\"$location\"\n" . 222 222 "\n"; 223 223 if( $gateway ) { 224 $output .= 225 "defaultrouter='$gateway'\n" 226 } 224 227 if( $tproxy ) { 225 228 if( $tproxy =~ m/\d+\.\d+\.\d+\.\d+\/\d+/ ) { … … 281 284 my $output = genHeader"#"; 282 285 283 $output .= 284 "search wleiden.net.\n" . 285 "# Try local (cache) first \n" . 286 "nameserver 127.0.0.1\n" . 287 "# Direct neighboors\n" . 288 "\n"; 289 290 foreach my $if (sort keys %config) { 291 if( exists $POINT_TO_POINT{$if} ) { 292 foreach my $ip ($POINT_TO_POINT{$if}) { 293 $output .= "nameserver $ip # $DESC{$if}\n"; 294 }; 295 }; 296 }; 286 # $output .= 287 # "search wleiden.net.\n" . 288 # "# Try local (cache) first \n" . 289 # "nameserver 127.0.0.1\n" . 290 # "# Direct neighboors\n" . 291 # "\n"; 292 # 293 # foreach my $if (sort keys %config) { 294 # if( exists $POINT_TO_POINT{$if} ) { 295 # foreach my $ip ($POINT_TO_POINT{$if}) { 296 # $output .= "nameserver $ip # $DESC{$if}\n"; 297 # }; 298 # }; 299 # }; 300 # 301 # $output .= 302 # "\n" . 303 # "# Last resort/backup remote nameservers \n" . 304 # "nameserver 172.17.8.68 # proxy1\n" . 305 # "nameserver 172.17.143.4 # proxy2\n" . 306 # "nameserver 172.20.128.98 # proxy3\n" . 307 # "nameserver 172.16.2.254 # proxy4\n" . 308 # "nameserver 172.19.168.66 # proxy5\n"; 297 309 298 310 $output .= 299 "\n" . 300 "# Last resort/backup remote nameservers \n" . 301 "nameserver 172.17.8.68 # proxy1\n" . 302 "nameserver 172.17.143.4 # proxy2\n" . 303 "nameserver 172.20.128.98 # proxy3\n" . 304 "nameserver 172.16.2.254 # proxy4\n" . 305 "nameserver 172.19.168.66 # proxy5\n"; 311 "nameserver 195.169.86.131\n" . 312 "search wirelessleiden.nl"; 306 313 307 314 return($output);
Note:
See TracChangeset
for help on using the changeset viewer.