summaryrefslogtreecommitdiff
path: root/lib/Vyatta/Qos
diff options
context:
space:
mode:
authorStephen Hemminger <stephen.hemminger@vyatta.com>2010-06-07 10:31:08 -0700
committerStephen Hemminger <stephen.hemminger@vyatta.com>2010-06-07 10:31:08 -0700
commit4f12cc5f730a7759bc668b56165fe79b058dcfcd (patch)
treecef522671cb4575f9bca05ea61323e2956753557 /lib/Vyatta/Qos
parentc5bbc092581f7113d7aa967105ab46668314e9bc (diff)
downloadvyatta-cfg-qos-4f12cc5f730a7759bc668b56165fe79b058dcfcd.tar.gz
vyatta-cfg-qos-4f12cc5f730a7759bc668b56165fe79b058dcfcd.zip
Revert "Move traffic-limiter to input-policy"
This reverts commit b75a66a4d5768f22a4b995d49ba442de8762a800.
Diffstat (limited to 'lib/Vyatta/Qos')
-rw-r--r--lib/Vyatta/Qos/TrafficLimiter.pm (renamed from lib/Vyatta/Qos/IngressLimit.pm)14
1 files changed, 10 insertions, 4 deletions
diff --git a/lib/Vyatta/Qos/IngressLimit.pm b/lib/Vyatta/Qos/TrafficLimiter.pm
index e9e2fbb..246d593 100644
--- a/lib/Vyatta/Qos/IngressLimit.pm
+++ b/lib/Vyatta/Qos/TrafficLimiter.pm
@@ -1,4 +1,5 @@
-# Ingress traffic limit
+# Traffic limiter
+# This is a rate limiter based on ingress qdisc
#
# **** License ****
# This program is free software; you can redistribute it and/or modify
@@ -11,22 +12,26 @@
# General Public License for more details.
#
# This code was originally developed by Vyatta, Inc.
-# Portions created by Vyatta are Copyright (C) 2010 Vyatta, Inc.
+# Portions created by Vyatta are Copyright (C) 2008 Vyatta, Inc.
# All Rights Reserved.
# **** End License ****
-package Vyatta::Qos::IngressLimit;
+package Vyatta::Qos::TrafficLimiter;
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 = {};
+ my $self = {%fields};
my $class = ref($that) || $that;
bless $self, $class;
@@ -36,6 +41,7 @@ sub new {
}
# Setup new instance.
+# Assumes caller has done $config->setLevel to "traffic-limiter $name"
sub _define {
my ( $self, $config ) = @_;
my $level = $config->setLevel();