diff options
Diffstat (limited to 'lib')
-rw-r--r-- | lib/Vyatta/Qos/IngressLimit.pm (renamed from lib/Vyatta/Qos/TrafficLimiter.pm) | 14 |
1 files changed, 4 insertions, 10 deletions
diff --git a/lib/Vyatta/Qos/TrafficLimiter.pm b/lib/Vyatta/Qos/IngressLimit.pm index 1ac61b2..4a24ea5 100644 --- a/lib/Vyatta/Qos/TrafficLimiter.pm +++ b/lib/Vyatta/Qos/IngressLimit.pm @@ -1,5 +1,4 @@ -# Traffic limiter -# This is a rate limiter based on ingress qdisc +# Ingress traffic limit # # **** License **** # This program is free software; you can redistribute it and/or modify @@ -12,26 +11,22 @@ # General Public License for more details. # # This code was originally developed by Vyatta, Inc. -# Portions created by Vyatta are Copyright (C) 2008 Vyatta, Inc. +# Portions created by Vyatta are Copyright (C) 2010 Vyatta, Inc. # All Rights Reserved. # **** End License **** -package Vyatta::Qos::TrafficLimiter; +package Vyatta::Qos::IngressLimit; use strict; use warnings; require Vyatta::Config; require Vyatta::Qos::LimiterClass; -my %fields = ( - _level => undef, - _classes => undef, -); # Create a new instance based on config information sub new { my ( $that, $config, $name ) = @_; - my $self = {%fields}; + my $self = {}; my $class = ref($that) || $that; bless $self, $class; @@ -41,7 +36,6 @@ sub new { } # Setup new instance. -# Assumes caller has done $config->setLevel to "traffic-limiter $name" sub _define { my ( $self, $config ) = @_; my $level = $config->setLevel(); |