2004.10.22 Friday
TeraTermマクロ:一定間隔でログを取得していくマクロ例
<メインマクロ(main.ttl)>
inputbox 'FileNAME:' 'FileOPEN'
filename = "c:\log\" <--- ログ格納ディレクトリ適宜変更
strconcat filename inputstr
strconcat filename ".txt"
logopen filename 1 0
include "log.ttl" <--- インクルードファイルに移動
timeout = 10 <--- ログ取得間隔
:loop
wait "!END" <--- 終了条件
if result=1 then
logclose
end
endif
include "log.ttl" <--- インクルードファイルに移動
goto loop
<インクルードファイル(log.ttl)>
sendln "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
sendln "!"
sendln "!"
sendln "sh clock"
sendln "!"
sendln "ter len 0"
sendln "sh proc cpu"
sendln "!"
sendln "sh interface"
sendln "!"
sendln "!"
sendln "ter len 24"
sendln "sh mem"
sendln "!"
exit
インクルードファイルはsendlnコマンドで取りたいコマンドに置き換えてください。
なお、インクルードファイルを使わずにsendfileコマンドでテキストファイルを投入することでも可能です。
<例>
sendfile "log.txt',0
inputbox 'FileNAME:' 'FileOPEN'
filename = "c:\log\" <--- ログ格納ディレクトリ適宜変更
strconcat filename inputstr
strconcat filename ".txt"
logopen filename 1 0
include "log.ttl" <--- インクルードファイルに移動
timeout = 10 <--- ログ取得間隔
:loop
wait "!END" <--- 終了条件
if result=1 then
logclose
end
endif
include "log.ttl" <--- インクルードファイルに移動
goto loop
<インクルードファイル(log.ttl)>
sendln "!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
sendln "!"
sendln "!"
sendln "sh clock"
sendln "!"
sendln "ter len 0"
sendln "sh proc cpu"
sendln "!"
sendln "sh interface"
sendln "!"
sendln "!"
sendln "ter len 24"
sendln "sh mem"
sendln "!"
exit
インクルードファイルはsendlnコマンドで取りたいコマンドに置き換えてください。
なお、インクルードファイルを使わずにsendfileコマンドでテキストファイルを投入することでも可能です。
<例>
sendfile "log.txt',0