Remove ingress from show queueing

1 files changed, 1 insertions, 20 deletions

diff --git a/scripts/vyatta-show-queueing.pl b/scripts/vyatta-show-queueing.pl
index e39a61a..03e3aae 100755
--- a/scripts/vyatta-show-queueing.pl
+++ b/scripts/vyatta-show-queueing.pl
@@ -42,7 +42,6 @@ my %qdisc_types = (
     'htb'        => 'traffic-shaper',
     'pfifo'      => 'drop-tail',
     'red'        => 'random-detect',
-    'ingress'    => 'traffic-limiter',
     'drr'        => 'round-robin',
     'prio'       => 'priority-queue',
     'netem'      => 'network-emulator',
@@ -58,9 +57,6 @@ sub shaper {
 }
 
 sub show_brief {
-    my %ingress;
-
-    print "Output Queues:\n";
     my $fmt = "%-10s %-16s %10s %10s %10s\n";
     printf $fmt, 'Interface', 'Qos-Policy', 'Sent', 'Dropped', 'Overlimit';
 
@@ -97,12 +93,7 @@ sub show_brief {
         # punctuation was never jamal's strong suit
         $drop =~ s/,$//;
 
-        if ( $id eq 'ffff:' ) {
-            $ingress{$ifname} =
-              [ $ifname, shaper($qdisc), $sent, $drop, $over ];
-        }
-        elsif ( $qdisc eq 'dsmark' ) {
-
+        if ( $qdisc eq 'dsmark' ) {
             # dsmark is used as a top-level before htb or gred
             $root = $id;
         }
@@ -119,16 +110,6 @@ sub show_brief {
     }
     close $tc;
     print sort @lines;
-
-    if (%ingress) {
-        print "\nInput:\n";
-        printf $fmt, 'Ifname', 'Qos-Policy', 'Received', 'Dropped', 'Overlimit';
-
-        foreach my $name ( keys %ingress ) {
-            my $args = $ingress{$name};
-            printf $fmt, @$args;
-        }
-    }
 }
 
 # Sort by class id which is a string of form major:minor