<tr>
<td colspan="4"> </td>
</tr>
-<tr>
- <td colspan="4">$Lang::tr{'advproxy wpad notice'}</td>
-</tr>
</table>
<hr size='1'>
if ($_)
{
if (/^\./) { $_ = '*'.$_; }
+ unless (&General::validwildcarddomainname($_)) { $errormessage = $Lang::tr{'advproxy errmsg invalid url'} . ": " . &Header::escape($_); }
$proxysettings{'DST_NOCACHE'} .= $_."\n";
}
}
if ($_)
{
if (/^\./) { $_ = '*'.$_; }
+ unless (&General::validwildcarddomainname($_)) { $errormessage = $Lang::tr{'advproxy errmsg invalid url'} . ": " . &Header::escape($_); }
$proxysettings{'DST_NOPROXY_URL'} .= $_."\n";
}
}
foreach my $network (@networks) {
my ($vpnip, $vpnsub) = split("/", $network);
$vpnsub = &Network::convert_prefix2netmask($vpnsub) || $vpnsub;
+ next if ($vpnip eq "0.0.0.0" || $vpnsub eq "0.0.0.0");
print FILE " (isInNet(host, \"$vpnip\", \"$vpnsub\")) ||\n";
}
}
my @networks = split(/\|/, $ovpnconfig{$key}[11]);
foreach my $network (@networks) {
my ($vpnip, $vpnsub) = split("/", $network);
+ $vpnsub = &Network::convert_prefix2netmask($vpnsub) || $vpnsub;
+ next if ($vpnip eq "0.0.0.0" || $vpnsub eq "0.0.0.0");
print FILE " (isInNet(host, \"$vpnip\", \"$vpnsub\")) ||\n";
}
}
print ASNBLFILE<<END
TESTDATA = (10.0.0.1, 0) (127.0.0.1, 0) (fe80::1, 0)
-ACTIVE_ASNBLS =
+ACTIVE_ASNBLS =
END
;