Předem děkuji za odpověď
Kód: Vybrat vše
/queue simple; :foreach i in=[find] \
do={ \
:set sqName [get $i name]; \
:set sqTotalBytes [get $i total-bytes]; \
:set sqLevel [:find $sqName "uzivatel1"]; \
:if ($sqLevel >= 0) do={ \
set $i limit-at=512000/512000 max-limit=1000000/4000000; \
:if ($sqTotalBytes > (400 * 1048576)) do = { \
set $i limit-at=192000/512000 max-limit=192000/512000; \
}; \
} else {
:set sqLevel [:find $sqName "uzivatel2"]; \
:if ($sqLevel >= 0) do={ \
set $i limit-at=512000/512000 max-limit=1000000/4000000; \
:if ($sqTotalBytes > (400 * 1048576)) do = { \
set $i limit-at=192000/512000 max-limit=192000/512000; \
}; \
} else {
:set sqLevel [:find $sqName "uzivatel3"]; \
:if ($sqLevel >= 0) do={ \
set $i limit-at=512000/512000 max-limit=1000000/4000000; \
:if ($sqTotalBytes > (300 * 1048576)) do = { \
set $i limit-at=192000/512000 max-limit=192000/512000; \
}; \
} else {
:set sqLevel [:find $sqName "uzivatel4"]; \
:if ($sqLevel >= 0) do={ \
set $i limit-at=512000/512000 max-limit=1000000/4000000; \
:if ($sqTotalBytes > (300 * 1048576)) do = { \
set $i limit-at=192000/384000 max-limit=192000/384000; \
}; \
} else {
:set sqLevel [:find $sqName "uzivatel5"]; \
:if ($sqLevel >= 0) do={ \
set $i limit-at=512000/512000 max-limit=1000000/4000000; \
:if ($sqTotalBytes > (300 * 1048576)) do = { \
set $i limit-at=192000/384000 max-limit=192000/384000; \
}; \
} else {
:set sqLevel [:find $sqName "uzivatel6"]; \
:if ($sqLevel >= 0) do={ \
set $i limit-at=512000/512000 max-limit=2000000/4000000; \
:if ($sqTotalBytes > (1000 * 1048576)) do = { \
set $i limit-at=192000/384000 max-limit=192000/384000; \
}; \
}; \
}; \
}; \
}; \
}; \
}; \
:if ($sqLevel >= 0) do { \
:put ([get $i name] . " : " . [get $i limit-at] . " : " . [get $i max-limit] . " : " . [get $i burst-limit] . " : " . [get $i burst-threshold] . " : " . [get $i burst-time]) ; \
}; \
}