Автоматическое переключение на другой сервер

Если флажок снят, то следующее соединение будет устанавливаться с настройками, 
указанными в следующей строке списка «Информация о соединениях». Для 
этого необходимо упорядочить список доступных соединений с помощью кнопок 
«вверх» и «вниз» в соответствии с желаемой очередностью перебора соединений. 
 

-- скрипт обеспечивает последовательное переключение между двумя серверами при потере связи
-- и невозможности восстановить подключение к текущему серверу в течение timeout секунд

timeout = 240  -- задержка (в секундах) перед сменой сервера

function OnInit(script_path)
  stopped = false
  count = -1  -- отсчет времени до переключения на другой сервер сейчас не ведется
  local sys_root = os.getenv("SystemRoot")  -- определяем расположение каталога с работающей сейчас системой Windows
  if sys_root == nil then
    message("Не удалось найти каталог Windows", 2)
    stopped = true
  else
    Directory = sys_root .. "\\system32\\drivers\\etc\\"  -- каталог с файлом hosts
  end
end

function OnStop(stop_flag)
  stopped = true
end

function OnDisconnected()
  count = timeout  -- запускаем отсчет времени до переключения на другой сервер
end

function OnConnected()
  count = -1  -- останавливаем отсчет времени до переключения на другой сервер
end

-- Функция проверяет существование файла с заданным именем fname. Если файл существует, возвращает true, иначе - false
function exist(fname)
  local file = io.open(fname, "r")  -- пытаемся открыть файл для чтения
  if file == nil then  -- скорей всего файла с таким именем нет
    return false
  else  -- файл с таким именем существует
    file:close()
    return true
  end
end

function switch_server()
  local f_old = ""
  local f_new = ""
  if exist(Directory .. "hosts.s2") and (not exist(Directory .. "hosts.s1")) and exist(Directory .. "hosts") then
    f_old = "hosts.s1"  -- имя файла, используемого сейчас
    f_new = "hosts.s2"  -- имя файла, который будем использовать
  elseif exist(Directory .. "hosts.s1") and (not exist(Directory .. "hosts.s2")) and exist(Directory .. "hosts") then
    f_old = "hosts.s2"  -- имя файла, используемого сейчас
    f_new = "hosts.s1"  -- имя файла, который будем использовать
  end
  if f_old ~= "" then
    local res, err = os.rename(Directory .. "hosts", Directory .. f_old)  -- переименовываем файл hosts в hosts.s1 или hosts.s2
    if res == nil then
      message("Ошибка при переименовании файла " .. err, 2)
    else
      res, err = os.rename(Directory .. f_new, Directory .. "hosts")  -- переименовываем файл hosts.s1 или hosts.s2 в hosts
      if res == nil then
        message("Ошибка при переименовании файла " .. err, 2)
      else
        message("Переключаемся на другой сервер", 1)
      end
    end
  end
  count = timeout  -- запускаем отсчет по-новой
end

function main()
  while not stopped do
    if count >= 0 then
      count = count - 1
    end
    if count == 0 then
      switch_server()
    end
    sleep(1000)
  end
end