comunque vi chiedo subito aiuto per un problema in cui sono incappato, in pratica sto utilizzando 2 apparati Mikrotik Sextant G 5HPnD, sono configurate come bridge utilizzando la modalità WDS e fino a qui nessun problema, tutto funziona alla perfezione. Il problema è che dovrei recuperare dalle wireless registration table dei parametri in modo da poterli salvare su un file di testo, abbiamo scritto uno script che si dovrebbe occupare di recuperare i parametri dalle tabelle e poi dovrebbe salvarli su dei file di testo, ma in pratica il codice crea unicamente i file di testo senza poi salvarci dentro i dati, non sappiamo più dove sbattere la testa, dove sbaglio ?
Grazie a tutti per l'aiuto
- Codice: Seleziona tutto
#inizializzazione file SNR
:if ([:len [/file find name="snr.txt"]] != 1) do={
/file print file=snr
:delay 2s;
/file set snr.txt contents="";
}
#inizializzazione file ccq in trasmissione
:if ([:len [/file find name="ccqtx.txt"]] != 1) do={
/file print file=ccqtx
:delay 2s;
/file set ccqtx.txt contents="";
}
#inizializzazione file ccq in ricezione
:if ([:len [/file find name="ccqrx.txt"]] != 1) do={
/file print file=ccqrx
:delay 2s;
/file set ccqrx.txt contents="";
}
#inizializzazione file noise floor in ricezione
:if ([:len [/file find name="noisefloor.txt"]] != 1) do={
/file print file=noisefloor
:delay 2s;
/file set noisefloor.txt contents="";
}
#inizializzazione file rxstr - potenza segnale in ricezione
:if ([:len [/file find name="rxstr.txt"]] != 1) do={
/file print file=rxstr
:delay 2s;
/file set rxstr.txt contents="";
}
#inizializzazione file txstr - potenza segnale in trasmissione
:if ([:len [/file find name="txstr.txt"]] != 1) do={
/file print file=txstr
:delay 2s;
/file set txstr.txt contents="";
}
#definizione variabili
:global snr;
:global filesnr;
:global ccqtx;
:global filetxccq;
:global ccqrx;
:global filerxccq;
:global noisefloor;
:global filenoisef;
:global rxstrenght;
:global filerxstr;
:global txstrenght;
:global filetxstr;
:global noisefloor;
:global filenoisefloor;
#Aggiornamento file snr.txt con i valori del SNR
:set snr [/interface wireless registration-table get 0 signal-to-noise];
:set rxstrenght [/interface wireless registration-table get 0 signal-strengthch0];
:set filesnr [/file get snr.txt contents];
:set filesnr ($filesnr . $snr);
/file set snr.txt contents=($filesnr . "\r\n");
#Aggiornamento file ccqtx con i valori del ccq in trasmissione
:set ccqtx [/interface wireless registration-table get 0 tx-ccq];
:set filetxccq [/file get ccqtx.txt contents];
:set filetxccq ($filetxccq . $ccqtx);
/file set ccqtx.txt contents=($filetxccq . "\r\n");
#Aggiornamento file ccqrx con i valori del ccq in ricezione
:set ccqrx [/interface wireless registration-table get 0 rx-ccq];
:set filerxccq [/file get ccqrx.txt contents];
:set filerxccq ($filerxccq . $ccqrx);
/file set ccqrx.txt contents=($filerxccq . "\r\n");
#Aggiornamento file rxstr con i valori della potenza del segnale in ricezione
#:set rxstrenght [/interface wireless registration-table get 0 signal-strengthch0];
:set filerxstr [/file get rxstr.txt contents];
:set filerxstr ($filerxstr . $rxstrenght);
/file set rxstr.txt contents=($filerxstr . "\r\n");
#Aggiornamento file txstr con i valori della potenza del segnale in trasmissione
:set txstrenght [/interface wireless registration-table get 0 tx-signalstrength-
ch0];
:set filetxstr [/file get txstr.txt contents];
:set filetxstr ($filetxstr . $txstrenght);
/file set txstr.txt contents=($filetxstr . "\r\n");
#Aggiornamento file noisefloor.txt con i valori del noisefloor in ricezione
:set noisefloor ($rxstrenght - $snr) ;
:set filenoisefloor [/file get noisefloor.txt contents];
:set filenoisefloor ($filenoisefloor . $noisefloor);
/file set noisefloor.txt contents=($fileno
