# host network related utility functions
+our $PHYSICAL_NIC_RE = qr/(?:eth\d+|en[^:.]+|ib\d+)/;
+
our $ipv4_reverse_mask = [
'0.0.0.0',
'128.0.0.0',
run_command("/sbin/tc filter add dev $iface parent ffff: " .
"prio 50 basic " .
"police rate ${rate}bps burst ${burst}b mtu 64kb " .
- "drop flowid :1");
+ "drop");
if ($debug) {
print "DEBUG tc settings\n";
$ip = addr_to_ip($res[0]->{addr})
};
if ($@) {
- die "hostname lookup failed:\n$@" if !$noerr;
+ die "hostname lookup '$hostname' failed - $@" if !$noerr;
return undef;
}
if ($ip =~ m/^127\.|^::1$/) {
- die "hostname lookup failed - got local IP address ($hostname = $ip)\n" if !$noerr;
+ die "hostname lookup '$hostname' failed - got local IP address '$ip'\n" if !$noerr;
return undef;
}