aboutsummaryrefslogblamecommitdiffstats
path: root/rotate-ntp
blob: 73b9d8a2711e60af693889b63003f7a87c75caf0 (plain) (tree)
1
2
3
4
5
6
7
8
9
                 
                             
                                                         
                                                             
                        
                                                                    
 
                      

                                                           
                
                               
 
                      
 
            
 
                                                     
                                                                
 

                                           
                                    
            




                                                                    
 
                                                                                    
                                              
#!rsc by RouterOS
# RouterOS script: rotate-ntp
# Copyright (c) 2013-2022 Christian Hesse <mail@eworm.de>
# https://git.eworm.de/cgit/routeros-scripts/about/COPYING.md
#
# rotate the ntp servers
# https://git.eworm.de/cgit/routeros-scripts/about/doc/rotate-ntp.md

:local 0 "rotate-ntp";
:global GlobalFunctionsReady;
:while ($GlobalFunctionsReady != true) do={ :delay 500ms; }

:global NtpPool;
:global RotateNtpResolveFailed;

:global LogPrintExit2;

:local Ntp1;
:local Ntp2;

:if ([ /system/ntp/client/get enabled ] != true) do={
  $LogPrintExit2 warning $0 ("NTP client is not enabled!") true;
}

:do {
  :set Ntp1 [ :resolve ("0." . $NtpPool) ];
  :set Ntp2 [ :resolve ("1." . $NtpPool) ];
  :set RotateNtpResolveFailed false;
} on-error={
  :if ($RotateNtpResolveFailed != true) do={
    :set RotateNtpResolveFailed true;
    $LogPrintExit2 warning $0 ("Resolving NTP server failed.") true;
  } else={
    $LogPrintExit2 debug $0 ("Resolving NTP server failed.") true;
  }
}

$LogPrintExit2 info $0 ("Updating NTP servers to " . $Ntp1 . " and " . $Ntp2) false;
/system/ntp/client/set servers=($Ntp1, $Ntp2);