SWX2200-8PoEの温度上昇を監視する

-- 温度の閾値。この値以上の温度となった場合にメールで通知する(1, 2, ..)
temperature_threshold = (温度の閾値)

-- switch control function get status-poe-temperature コマンドを実行する間隔
-- 単位は秒 (1, 2, ..)
interval_sec = (実行間隔)

--[[
監視対象のスイッチをカンマで区切って列挙する
複数のスイッチを指定可能
MACアドレスまたは、ルーターからスイッチまでの接続ポートの経路情報で指定する
例
　　・MACアドレス指定
　　　sw_list = {"00:a0:de:xx:xx:xx"}
　　・経路指定
　　　sw_list = {
　　　　　"lan1:1",
　　　　　"lan1:2-5-13"(スイッチを複数つなげている場合)
　　　}
]]
sw_list = {
　　-- "(対象となるスイッチ)"
}

-- メールで通知する switch control function get function コマンドを
-- カンマで区切って列挙する
cmd_switch_tbl = {
　　-- "(switch control function get function コマンド1)"
　　-- "(switch control function get function コマンド2)"
}

-- メールの設定
mail_tbl = {
　　smtp_address = "(SMTP サーバーのアドレス)",
　　from = "(送信元メールアドレス)",
　　to = "(宛先メールアドレス)"
}

-- メールの送信失敗および温度取得に失敗時に出力する
-- SYSLOG のレベル (info, debug, notice)
log_level = "(SYSLOG レベル)"

function get_switch_name()
　　local cmd = "switch control function get system-name"
　　local rtn, str, name

　　name = "スイッチ名の取得に失敗しました"
　　rtn, str = rt.command(cmd)
　　if (rtn) and (str) then
　　　　name = str
　　end

　　return name
end

function get_switch_temperature()
　　local cmd = "switch control function get status-poe-temperature"
　　local rtn, str, temperature

　　temperature = nil
　　rtn, str = rt.command(cmd)
　　if (rtn) and (str) then
　　　　temperature = str
　　end

　　return temperature
end

function exec_command(cmd)
　　local rtn, str

　　rtn, str = rt.command(cmd)
　　if (not rtn) or (not str) then
　　　　str = "実行失敗\r\n"
　　end

　　return rtn, string.format("# %s\r\n%s\r\n", cmd, str)
end

function send_mail(sw_name, temperature)
　　local rtn, str

　　mail_tbl.text = "スイッチの温度が閾値以上となりました。\r\n\r\n\スイッチの識別名: "
　　mail_tbl.text = mail_tbl.text .. sw_name .. "\r\n"
　　mail_tbl.text = mail_tbl.text .. "計測された温度: "
　　mail_tbl.text = mail_tbl.text .. temperature .. "\r\n\r\n"

　　for i, cmd in ipairs(cmd_switch_tbl) do
　　　rtn, str = exec_command(cmd)
　　　mail_tbl.text = mail_tbl.text .. str
　　end

　　mail_tbl.subject = string.format("temperature over threshold (%s)", time_stamp())
　　rtn = rt.mail(mail_tbl)

　　return rtn
end

function time_stamp()
　　local t

　　t = os.date("*t")
　　return string.format("%d/%02d/%02d %02d:%02d:%02d",
　　　　t.year, t.month, t.day, t.hour, t.min, t.sec)
end

local rtn, str, sw_name, route, temperature

if temperature_threshold < 1 then
　　error("温度の閾値が不正です。")
end

if interval_sec < 1 then
　　error("温度測定間隔の値が不正です。")
end

while (true) do
　　-- 設定値で登録されているすべての経路で温度を計測する
　　for i, route in ipairs(sw_list) do
　　　assert(route, "スイッチの経路情報が取得できませんでした")

　　　-- 経路を選択する
　　　rtn, str = rt.command("switch select " .. route)
　　　assert(rtn, "スイッチの経路選択に失敗しました")

　　　-- 温度の計測
　　　temperature = get_switch_temperature()
　　　assert(temperature, "温度の計測に失敗しました")
　　　temperature = tonumber(temperature)

　　　-- 閾値以上となっていた場合、メールを送信する
　　　if (temperature >= temperature_threshold) then
　　　　-- スイッチの機器名の取得
　　　　sw_name = get_switch_name()
　　　　-- メールの設定、送信
　　　　rtn = send_mail(sw_name, tostring(temperature))
　　　　if (not rtn) then
　　　　　rt.syslog(log_level, "failed to send mail. (Lua スクリプトファイル名)")
　　　　end
　　　end
　　end

　　-- 設定値で指定された秒数待機する
　　rt.sleep(interval_sec)
end