Fórum československých telekomunikací
https://classic.ispforum.cz/
Kód: Vybrat vše
# New Client
# Skript ktery kontroluje zda-li nepribyl novy klient do site
# a pokud ano odesle mail
# By Grunt
################################################
### Definice lokalnich promenych
:local macs [:nothing]
:local messages [:nothing]
### Deklarace lokalnich promenych
# Pocet zprav pokud pribude novy klient
:local msgcount 3
# Adresa na kterou bude mail odeslan
:local mailto "petrvlasic@atlas.cz"
# Predmet e-mailu
:local mailsubject "Nove AP v siti"
# Delka prodlevi mezi kontrolami
:local delay 20s
################################################
:foreach ca in=[/interface wireless registration-table find] do={
:set macs ($macs . [/interface wireless registration-table get $ca mac-address] . ",")
:set messages ($messages . "0,")
}
:while (true) do={
:foreach cb in=[/interface wireless registration-table find] do={
:if ([:find $macs [/interface wireless registration-table get $cb mac-address]]) do={:nothing} else={
:set macs ($macs . [/interface wireless registration-table get $cb mac-address] . ",")
:set messages ($messages . $msgcount . ",")
}
}
:foreach cd in=$macs do={
:if ([:pick $messages [:find $macs $cd]] > 0) do={
/tool e-mail send to=$mailto subject=$mailsubject body=("MAC:" . $cd . " Signal:" . [/interface wireless registration-table get [/interface wireless registration-table find mac-address=$cd] signal-strength ])
:set messagesbuffer [:nothing]
:foreach ce in=$macs do={
:if ($ce=$cd) do={
:set messagesbuffer ($messagesbuffer . (([:pick $messages [:find $macs $ce]]) - 1) . ",")
} \
else={
:set messagesbuffer ($messagesbuffer . [:pick $messages [:find $macs $ce]] . ",")
}
}
:set messages $messagesbuffer
}
}
:delay $delay
}
Grunt_Mich_An píše:Toto vlákno patří spíše do sekce Skriptování ,tudíž doporučuji zapnout příkaz mv a přesunout.
Jinak Skript je zde:Kód: Vybrat vše
# New Client
# Skript ktery kontroluje zda-li nepribyl novy klient do site
# a pokud ano odesle mail
# By Grunt
################################################
### Definice lokalnich promenych
:local macs [:nothing]
:local messages [:nothing]
### Deklarace lokalnich promenych
# Pocet zprav pokud pribude novy klient
:local msgcount 3
# Adresa na kterou bude mail odeslan
:local mailto "petrvlasic@atlas.cz"
# Predmet e-mailu
:local mailsubject "Nove AP v siti"
# Delka prodlevi mezi kontrolami
:local delay 20s
################################################
:foreach ca in=[/interface wireless registration-table find] do={
:set macs ($macs . [/interface wireless registration-table get $ca mac-address] . ",")
:set messages ($messages . "0,")
}
:while (true) do={
:foreach cb in=[/interface wireless registration-table find] do={
:if ([:find $macs [/interface wireless registration-table get $cb mac-address]]) do={:nothing} else={
:set macs ($macs . [/interface wireless registration-table get $cb mac-address] . ",")
:set messages ($messages . $msgcount . ",")
}
}
:foreach cd in=$macs do={
:if ([:pick $messages [:find $macs $cd]] > 0) do={
/tool e-mail send to=$mailto subject=$mailsubject body=("MAC:" . $cd . " Signal:" . [/interface wireless registration-table get [/interface wireless registration-table find mac-address=$cd] signal-strength ])
:set messagesbuffer [:nothing]
:foreach ce in=$macs do={
:if ($ce=$cd) do={
:set messagesbuffer ($messagesbuffer . (([:pick $messages [:find $macs $ce]]) - 1) . ",")
} \
else={
:set messagesbuffer ($messagesbuffer . [:pick $messages [:find $macs $ce]] . ",")
}
}
:set messages $messagesbuffer
}
}
:delay $delay
}
Skrip jsem skusil a jede tudíž syntaktickou chybu vylučuji avšak nějaká logická chyba tam bude určitě...je potřeba vyzkoušet a pokud nepojede ,tak se ozvěte a až budu mít trochu víc času ,tak to zkontroluju. Za komentráře se omlouvam ,ale budou muset stačit protože už začal Dr. House.
Libor357 píše:A pokud bych chtěl aby se mi odesílala síla signálu konkrétní IP nebo MAC adresy při spojení s AP?
Nejsem věštec ani jasnovidec ,tudíž nemám ponětí co máte nastavené v NETWATCH ,ale pokud myslíte víšezmíněný skript ,tak pozor...ten nepatří do NETWATCH ,ale do sekce System -> Script.Libor357 píše:Tak jak to mám momentálně nastaveno v NETWATCH, že když dojde ke spojení konkrétní IP přijde mi SMS.
Nevím co k tomu ještě dodat...skript se umístňuje do sekce /system script a přímo ve skriptu přepíšete proměné tak aby vám vyhovovaly...u každé proměné je komentář vysvětlující k čemu proměná slouží ,tudíž by neměl být problém si ji přepsat dle vlastního uvážení.Libor357 píše:Prosím pokud je to možné trošičku podrobněji, jsem začátečník a zatím "opisuji" z Mikrotiků které máme v síti a učím se je nastavovat.
Libor357 píše:Tento skrypt, ale kamarád v naší síti nepoužívá
Grunt_Mich_An píše:Libor357 píše:A pokud bych chtěl aby se mi odesílala síla signálu konkrétní IP nebo MAC adresy při spojení s AP?
Nějak nerozumím otázce.Skript funguje tak ,že si po zapnutí zkopíruje MAC-Adresy ,všech připojených uživatelů do lokální databáze a pak každých 20 sekund(i jiné doby ,podle toho jak si nastavíte v proměné delay) kontroluje zda-li se nepřipojí někdo nový (ten kdo ještě není v databázi) a pokud ano tak to třikrát(či podle toho jak si nastavíte v proměné msgcount) vám to odešle na e-mail(který si nastavujete v proměné mailto) zprávu s MAC Klienta který je nový a jeho sílu signálu (Signal Strength).Nejsem věštec ani jasnovidec ,tudíž nemám ponětí co máte nastavené v NETWATCH ,ale pokud myslíte víšezmíněný skript ,tak pozor...ten nepatří do NETWATCH ,ale do sekce System -> Script.Libor357 píše:Tak jak to mám momentálně nastaveno v NETWATCH, že když dojde ke spojení konkrétní IP přijde mi SMS.Nevím co k tomu ještě dodat...skript se umístňuje do sekce /system script a přímo ve skriptu přepíšete proměné tak aby vám vyhovovaly...u každé proměné je komentář vysvětlující k čemu proměná slouží ,tudíž by neměl být problém si ji přepsat dle vlastního uvážení.Libor357 píše:Prosím pokud je to možné trošičku podrobněji, jsem začátečník a zatím "opisuji" z Mikrotiků které máme v síti a učím se je nastavovat.
BTW. Tak přestaňte "opisovat" a začněte se "učit".zde naleznete sadu tutoriálů ,kterou je si dobré přečíst aby jste se naučil ty nejzákladnější základy s MikroTiky a pak ,až to trochu budete umět můžete rovnou skočit na manuál ,kde je téměř vše vysvětleno do nejmenších podrobností.Libor357 píše:Tento skrypt, ale kamarád v naší síti nepoužívá
Nějak mi uniká souvislost mezi tímto "skryptem" a vaším kamarádem.
Libor357 píše:Jinak v NETWATCH mám nastaveno: v záložce "Host" konkrétní IP kterou budu připojovat a v záložce UP a DOWN toto - tool e-mail send to +420xxxxxxxxx@sms.eurotel.cz subject "jméno Klienta is up nebo down", no a když dojde k připojení nebo odpojení nastavené IP klienta, kterého připojuji na AP (MT), přijde mi SMS. A takto jsem myslel, jestli by to šlo nastavit, s tím rozdílem, že by do té SMSky přibyla ještě síla signálu ((jen toho konkrétního klienta, kterého si v Netwatch (pokud vůbec to jde?) nastavím)).
Libor357 píše:Ještě pro upřesnění: předpokládám, že ten skrypt bude pro použití bez těch popisek v CZ a křížků, nebo se mýlím?
Libor357 píše:A poslední dotaz, jak hodně bude tento skript zatěžovat systémové prostředky MT? Na některých MT je připojeno dost klientů a nerad bych aby ten MT začal být nestabilní, až do něj nakrmím takovéto úlohy.
Grunt_Mich_An píše:Tak potom stačí jen dopsat toto:
/tool e-mail send to="+420xxxxxxxxx@sms.eurotel.cz" subject="jméno Klienta is up" body=("Signal: " . [/interface wireless registration-table get [/interface wireless registration-table find mac-address="XX:XX:XX:XX:XX:XX"] signal-strength]). Jinak doporučuji spíše používat Skripty ze sekce Skriptování pro kontrolu AP...dá se v nich nastavit více věcí.
Libor357 píše:No pokoušel jsem se tam toto nastavit a nic. Pochopitelně jsem dopsal mail i mac adresu. Tak pokud Vás ještě něco napadá, budu Vám vděčný.
Kód: Vybrat vše
/tool e-mail printGrunt_Mich_An píše:Libor357 píše:No pokoušel jsem se tam toto nastavit a nic. Pochopitelně jsem dopsal mail i mac adresu. Tak pokud Vás ještě něco napadá, budu Vám vděčný.
Tak to ale potom musí být chyba někde u vás:
Zkontrolujte si zda-li máte správně nastaveny hodnoty mail Serveru:Kód: Vybrat vše
/tool e-mail print
A zkontrolujte si zda-li maily odcházejí pomocí snifferu.