VRRPと併用する冗長構成

while (true) do
　　SW1 = nil
　　--ルーター LAN1 port1 がリンクダウン(SW1 の detect down ログを監視)
　　log = "%p" ..mac_sw1.. "%p: detect down"
　　rt.syslogwatch(log, 1)

　　-- ルーター LAN1 port2 の shutdown を解除 --
　　rt.command("no lan shutdown lan1 2")
　　rt.syslog(log_level,"no lan shutdown lan1 2")

　　-- SW2 発見ログを監視 --
　　log = "%p" .. mac_sw2.. "%p: find switch"
　　rt.syslogwatch(log, 1)
　　rt.sleep(2)

　　--[[
　　SW1のMACアドレス検索。発見できなかった場合、SW1のport1ケーブルの切断
　　ではなくSW1の電源が切断されていると判断し、SW2のport3,4,5 をリンクアップ
　　]]
　　rtn,str = rt.command("show status switching-hub macaddress " ..mac_sw1)
　　if (rtn) and (str) then
　　　　port = string.match(str,"port (%d):")
　　　　if (port == nil) then
　　　　　　SW1="PW-down"
　　　　　　rtn, str = rt.command("switch select " ..mac_sw2)
　　　　　　if (rtn) then
　　　　　　　　rt.command("switch control function set port-use 3 on")
　　　　　　　　rt.syslog(log_level,"SW2 port-use 3 on")
　　　　　　　　rt.command("switch control function set port-use 4 on")
　　　　　　　　rt.syslog(log_level,"SW2 port-use 4 on")
　　　　　　　　rt.command("switch control function set port-use 5 on")
　　　　　　　　rt.syslog(log_level,"SW2 port-use 5 on")
　　　　　　end
　　　　end
　　end

　　--[[
　　ルーター LAN1 port1 がリンクアップ
　　 SW1 の電源投入によって復旧した場合 → SW2のport8の復旧ログを監視
　　 SW1 のport1ケーブルが復旧した場合 → SW1のport1の復旧ログを監視
　　]]
　　if (SW1 == "PW-down") then
　　　　log = "%p" ..mac_sw2.. "%p: PORT8 link up"
　　　　rt.syslogwatch(log, 1)
　　else
　　　　log = "%p" ..mac_sw1.. "%p: PORT1 link up"
　　　　rt.syslogwatch(log, 1)
　　end

　　--[[
　　ループを防ぐため、上記ログが出たらすぐにSW2とルーターの設定を初期状態に戻す
　　SW1 の電源投入によって復旧した場合、SW2のport3,4,5とルーターのLAN1 port2を
　　リンクダウンさせる
　　SW1 のport1ケーブルが復旧した場合、ルーターのLAN1 port2をリンクダウンさせる
　　]]
　　if (SW1 == "PW-down") then
　　　　rtn, str = rt.command("switch select" ..mac_sw2)
　　　　if (rtn) then
　　　　　　rt.command("switch control function set port-use 3 off")
　　　　　　rt.syslog(log_level,"SW2 port-use 3 off")
　　　　　　rt.command("switch control function set port-use 4 off")
　　　　　　rt.syslog(log_level,"SW2 port-use 4 off")
　　　　　　rt.command("switch control function set port-use 5 off")
　　　　　　rt.syslog(log_level,"SW2 port-use 5 off")
　　　　end
　　end

　　rtn, str = rt.command("lan shutdown lan1 2")
　　rt.syslog(log_level,"lan shutdown lan1 2")
　　rt.sleep(3)
end

function port_use(on_off, sw, port, swname)
　　rtn, str = rt.command("switch select " ..sw)
　　if (rtn) then
　　　　rt.command("switch control function set port-use "..port.." "..on_off)
　　　　rt.syslog(log_level, swname.." port-use "..port.." "..on_off)
　　end
end

while (true) do
　　-- SW1 port のdown監視 --
　　log = "%p" ..mac_sw1.. "%p: PORT" ..port.. " link down"
　　rt.syslogwatch(log, 1)
　　rt.sleep(1)

　　-- SW2 port をリンクアップ --
　　port_use("on", mac_sw2, port, "SW2")

　　-- SW1 port のup監視 --
　　log = "%p"..mac_sw1.."%p: PORT" ..port.. " link up"
　　rt.syslogwatch(log, 1)

　　-- SW2 port をリンクダウン --
　　port_use("off", mac_sw2, port, "SW2")

　　--[[
　　上記のSW1 port のup 検知が遅れた場合、まれにループが始まりSW2の設定が
　　正常にできない場合がある。
　　その場合は、SW2の同期処理が終了するまでSW1のポートを閉じてループを回避する。
　　]]
　　rtn, array = rt.syslogwatch("sync start", 1, 6)
　　rt.sleep(1)
　　if (rtn > 0) then
　　　　port_use("off", mac_sw1, port, "SW1")
　　　　d = 0
　　　　while (d < 1) do
　　　　　　rt.syslogwatch("sync done", 1)
　　　　　　d = d + 1
　　　　end
　　　　rt.sleep(1)
　　　　port_use("on", mac_sw1, port, "SW1")
　　end
end