From 48e90eba37dbb57347ce9f780c92a67f18785a60 Mon Sep 17 00:00:00 2001 From: jack9603301 Date: Wed, 10 Mar 2021 18:24:54 +0800 Subject: mirror: T3305: Repair the failure of the redirect function In 63913252 (mirror: t3089: delete the mirror...), in order to prevent the conflict with the port image, we modified the handle. Now it seems that some problems are caused by modifying the address back to fffe --- scripts/vyatta-qos.pl | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/scripts/vyatta-qos.pl b/scripts/vyatta-qos.pl index 3a9a3cc..9743a1a 100755 --- a/scripts/vyatta-qos.pl +++ b/scripts/vyatta-qos.pl @@ -111,7 +111,7 @@ sub list_policy { my %delcmd = ( 'out' => 'root', - 'in' => 'parent fffe:', + 'in' => 'parent ffff:', ); ## delete_interface('eth0') @@ -160,13 +160,13 @@ sub apply_openvpn_action { die "Unknown interface type: $dev" unless $interface; # Clear existing ingress - system("/sbin/tc qdisc del dev $dev parent fffe: 2>/dev/null"); + system("/sbin/tc qdisc del dev $dev parent ffff: 2>/dev/null"); - system("/sbin/tc qdisc add dev $dev handle fffe: ingress") == 0 + system("/sbin/tc qdisc add dev $dev handle ffff: ingress") == 0 or die "tc qdisc ingress failed"; my $cmd = - "/sbin/tc filter add dev $dev parent fffe:" + "/sbin/tc filter add dev $dev parent ffff:" . " protocol all prio 10 u32" . " match u32 0 0 flowid 1:1" . " action mirred egress $action dev $target"; @@ -174,7 +174,7 @@ sub apply_openvpn_action { system($cmd) == 0 or die "tc action $action command failed"; - system("/sbin/tc qdisc del dev $dev parent fffe: 2>/dev/null") + system("/sbin/tc qdisc del dev $dev parent ffff: 2>/dev/null") if ($action eq '__undef'); } @@ -329,13 +329,13 @@ sub apply_action{ if ($ingress); # Clear existing ingress - system("/sbin/tc qdisc del dev $dev parent fffe: 2>/dev/null"); + system("/sbin/tc qdisc del dev $dev parent ffff: 2>/dev/null"); - system("/sbin/tc qdisc add dev $dev handle fffe: ingress") == 0 + system("/sbin/tc qdisc add dev $dev handle ffff: ingress") == 0 or die "tc qdisc ingress failed"; my $cmd = - "/sbin/tc filter add dev $dev parent fffe:" + "/sbin/tc filter add dev $dev parent ffff:" . " protocol all prio 10 u32" . " match u32 0 0 flowid 1:1" . " action mirred egress $action dev $target"; @@ -347,7 +347,7 @@ sub apply_action{ } # Drop what ever was there before... - system("/sbin/tc qdisc del dev $dev parent fffe: 2>/dev/null") + system("/sbin/tc qdisc del dev $dev parent ffff: 2>/dev/null") unless($ingress); } @@ -387,7 +387,7 @@ sub check_target { sub delete_action { foreach my $dev (@_) { - system("/sbin/tc qdisc del dev $dev parent fffe: 2>/dev/null"); + system("/sbin/tc qdisc del dev $dev parent ffff: 2>/dev/null"); } } -- cgit v1.2.3