1. ホーム
  2. 設定例
  3. ルーター／ファイアウォール
  4. ルーターの状態を監視
  5. Luaスクリプト機能
  6. 複数のホストを監視する（FWX120を利用）

複数のホストを監視する（FWX120を利用）

図 複数のホストを監視する

指定したIPアドレス宛てに一定の間隔でpingを実行し、pingへの応答が無かった場合に、管理者へメールで通知するLuaスクリプトです。
pingを実行する宛先IPアドレスには、複数のホストを指定することができます。

設定例はこちら

Luaスクリプト例はこちら

FWX120の設定例

下記の設定（Config）を取り出すことができます。

LANの
インタフェースの設定
（LAN1ポートを使用）		 ip lan1 address 192.168.0.1/24
WANの
インタフェースの設定
（LAN2ポートを使用）		 pp select 1
pp always-on on
pppoe use lan2
pp auth accept pap chap
pp auth myname (ISPに接続するID) (ISPに接続するパスワード)
ppp lcp mru on 1454
ppp ipcp ipaddress on
ppp ipcp msext on
ip pp mtu 1454
ip pp nat descriptor 1
pp enable 1
ip route default gateway pp 1
NATの設定 nat descriptor type 1 masquerade
DHCPの設定 dhcp service server
dhcp scope 1 192.168.0.2-192.168.0.100/24
DNSの設定 dns server (ISPより指定されたDNSサーバーのIPアドレス)
dns private address spoof on
フィルタの設定 ip inbound filter 1001 reject-nolog * * tcp,udp * 135
ip inbound filter 1002 reject-nolog * * tcp,udp 135 *
ip inbound filter 1003 reject-nolog * * tcp,udp * netbios_ns-netbios_ssn
ip inbound filter 1004 reject-nolog * * tcp,udp netbios_ns-netbios_ssn *
ip inbound filter 1005 reject-nolog * * tcp,udp * 445
ip inbound filter 1006 reject-nolog * * tcp,udp 445 *
ip inbound filter 1007 reject-nolog 192.168.0.0/24 * * * *
ip inbound filter 1099 pass-nolog * * * * *
ip policy interface group 101 name=Private local lan1
ip policy address group 101 name=Private 192.168.0.0/24
ip policy address group 102 name=Any *
ip policy service group 101 name="Open Services"
ip policy service group 102 name=General dns
ip policy service group 103 name=Mail pop3 smtp
ip policy filter 1100 reject-nolog lan1 * * * *
ip policy filter 1110 pass-nolog * * * * 102
ip policy filter 1122 static-pass-nolog * lan1 * * *
ip policy filter 1123 static-pass-nolog * local * * *
ip policy filter 1124 static-pass-log * * 192.168.0.0/24 * http
ip policy filter 1150 pass-nolog * pp1 * * *
ip policy filter 1500 reject-nolog pp* * * * *
ip policy filter 1520 pass-log * lan1 * * 101
ip policy filter 1700 pass-nolog local * * * *
ip policy filter 1710 static-pass-nolog * lan1 * * *
ip policy filter 3000 reject-nolog * * * * *
ip policy filter set 101 name="Internet Access" 1100 [1110 1123 [1124] 1122 1150] 1500 [1520] 1700 [1710] 3000
ip policy filter set enable 101
pp select 1
ip pp inbound filter list 1001 1002 1003 1004 1005 1006 1007 1099
Luaスクリプトのスケジュール設定 schedule at 1 startup * lua (Luaスクリプトファイル名)

Luaスクリプト例

下記のLuaスクリプトを取り出すことができます。

設定値

-- 監視間隔 (1-864000 秒)
idle_time = (監視間隔)

-- pingを実行する宛先IPアドレス
dst_tbl = {
　"(宛先IPアドレス1)",
　"(宛先IPアドレス2)"
}

-- ping への応答がない、または応答が回復したと判断する連続回数（1, 2 ..）
count = (回数)

-- 応答が回復したときにもメールを送るか否か（送る:true / 送らない:false）
down_mail = (true / false)

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

-- メールの送信に失敗した時に出力する SYSLOG のレベル（info, debug, notice）
log_level = "(SYSLOGレベル)"
pingを実行し、到達したか
どうかを返す関数

function ping_reach(adr)
　local rtn, str, loss
　local reach = false
　local cmd = "ping " .. adr
　local ptn = "(%d+)%.%d+%%"

　rtn, str = rt.command(cmd)
　if (rtn) and (str) then
　　loss = str:match(ptn)
　　if (loss) then
　　　loss = tonumber(loss)
　　　if (loss == 0) then
　　　　reach = true
　　　end
　　end
　end

　return rtn, reach, str
end

連続何回pingに応答がないかを
示すカウンタの処理関数

function count_proc(t, reach, th)
　local rtn = 0

　if (not reach) then
　　if (not t.flag) then
　　　t.ng = t.ng + 1
　　　if (t.ng == th) then
　　　　rtn = 1
　　　　t.flag = true
　　　end
　　else
　　　if (t.ok > 0) then
　　　　t.ok = 0
　　　end
　　end
　else
　　if (t.flag) then
　　　t.ok = t.ok + 1
　　　if (t.ok == th) then
　　　　rtn = -1
　　　　t.flag = false
　　　　t.ng = 0
　　　　t.ok = 0
　　　end
　　else
　　　if (t.ng > 0) then
　　　　t.ng = 0
　　　end
　　end
　end

　return rtn
end

メール本文を作成する関数

function make_pingmsg(tbl, reach, adr, cnt, sec, down)
　local rtn
　local str = ""

　rtn = count_proc(tbl, reach, cnt)
　if (rtn < 0) then
　　if (down) then
　　　str = "pingの応答が回復しました。\r\n"
　　　str = str .. string.format(" 送信先: %s\r\n 監視間隔: %d(秒)\r\n\r\n",adr, sec)
　　end
　elseif (rtn > 0) then
　　str = "pingの応答がありません。\r\n"
　　str = str .. string.format(" 送信先: %s\r\n 応答がなかった回数: %d回\r\n 監視間隔: %d(秒)\r\n\r\n",
　　 　　adr, cnt, sec)
　end

　return str
end

連続不応答回数を記録する
テーブルの初期化関数		 function init_count_tbl(n, cnt_t)
　for i = 1, n do
　　cnt_t[i] = {ng = 0, ok = 0, flag = false}
　end
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, reach, str, adr
local cnt_tbl = {}

init_count_tbl(#dst_tbl, cnt_tbl)

while (true) do
　mail_tbl.text = ""

　for i, adr in ipairs(dst_tbl) do
　　rtn, reach, str = ping_reach(adr)
　　if (rtn) then
　　　mail_tbl.text = mail_tbl.text .. make_pingmsg(cnt_tbl[i], reach, adr,
　　　　　　　　　count, idle_time, down_mail)
　　else
　　　mail_tbl.text = string.format("%s (ping送信先: %s\r\n\r\n)", str, dst_tbl[i])
　　end
　end

　if (mail_tbl.text:len() > 0) then
　　mail_tbl.subject = string.format("watch ping : multi destination (%s)", time_stamp())
　　rtn = rt.mail(mail_tbl)
　　if (not rtn) then
　　　rt.syslog(log_level, "failed to send mail. (Luaスクリプトファイル名)")
　　end
　end

　rt.sleep(idle_time)
end

メール

ご相談・お問い合わせ