Skript kontroly queues a dhcp serveru: Porovnání verzí
Z Wiki UnArt Slavičín
Skočit na navigaciSkočit na vyhledávání
Bez shrnutí editace |
Bez shrnutí editace |
||
Řádek 2: | Řádek 2: | ||
:global parent "none" | :global parent "none" | ||
# Omezeni ip adres z DHCP serveru, bez omezeni nechte hodnotu "0.0.0.0/0" | # Omezeni ip adres z DHCP serveru, bez omezeni nechte hodnotu "0.0.0.0/0" | ||
:global range 10.143.230. | :global range 10.143.230.125/32 | ||
# Pomocne promenne | # Pomocne promenne |
Verze z 10. 2. 2012, 14:07
# Omezeni queues na parent, bez omezeni nechte hodnotu "none" :global parent "none" # Omezeni ip adres z DHCP serveru, bez omezeni nechte hodnotu "0.0.0.0/0" :global range 10.143.230.125/32 # Pomocne promenne :global found :global ip :global comment :foreach ipid in=[/ip dhcp-server lease find] do={ :set ip [:toip [/ip dhcp-server lease get $ipid address]] :set comment [/ip dhcp-server lease get $ipid comment] :if ($ip in $range) do={ :set found 0 :foreach i in=[/queue simple find parent=$parent] do={ :put ([/queue simple get $i target-addresses]." ".($ip."/32")." ".[:find [/queue simple get $i target-addresses] ($ip."/32")]) :if ([:tobool [:find [/queue simple get $i target-addresses] ($ip."/32")]]) do={ :set found 1 } } # :if ($found=0) do={ # :put ("IP adresa ".$ip." s komentarem ".$comment." neni v queues!") # } } }