NOC:ctwug qos

Script

/queue simple

local qos

foreach qos in [find] do={

 :if ( [:pick [get $qos comment] 0 4] = "AUTO" ) do=[remove $qos]

} /interface

local qos

foreach qos in [find] do={

 :local com [get $qos comment]
 :if ( [:pick $com 0 6] = "client" ) do={
   :local name [get $qos name]
   :local p1 ([:find $com ";"] + 1)
   :local p2 [:find $com ";" $p1]
   :local mb ([:pick $com $p1 $p2]*1000)
   :local com ("AUTO ".$name." BULK")
   /queue simple add interface=$name name=$com packet-marks=BULK comment=$com max-limit=("0/".$mb) direction=download disabled=yes
 }

} /system script run ctwug_run

WMS

Wug Management System