テラタームの「自動ログローテーション」について考える！

先日、Tera Term（テラターム）のログ取得＆ローテーションについて、以下のようなご質問をいただきました。

サーバ等に接続し取得しているログを一定間隔（日付等）でローテーションさせたい。接続をやり直すのは不可で、起動（接続）したまま人が操作することなくファイルを分割して保存したい。との事でした。

ちょっと考えてみましたが、当初Tera Termマクロの機能だけではちょっと無理かなと考えていました。

マウス・キーボードの操作を記録・再生できるようなPC自動化ソフトと組み合わせて実行すれば可能かと思っていたのですが・・・。

自己解決されたみたいで、実施内容を教えてもらうと・・・

Tera Termマクロの中で周期的に日時を比較し、日付が変わるとログファイルを再作成するようにしたとの事。

「周期的」にがキーワードでした。

私が作ったこれまでのマクロは、見てもらったらわかりますがサーバ等に接続してログ取得を開始するとマクロを終了するものが多くを占めています。これが原点にあったので頭でっかちになってたんですね。

結局以下のマクロで実現可能でしたので、ご参考までにご紹介します。

「そんなの簡単に出来るやん」とか言いっこ無しでお願いしますね。

サンプルでは、1時間単位にログローテーションさせています。
日単位にする場合は比較部分を修正する事で実現可能となっています。

自動ログローテーションマクロ（時刻単位でローテーション版）

;============================================ 
; Filename    : log_rotation.ttl 
; Description : Auto Log Rotation 
; Author      : daihakuriki 
; Created     : 2012/11/10 
; modified    : 
;============================================ 
;; 接続先ホスト／ユーザ名／パスワード設定
HOSTNAME = '192.168.xxx.xxx'
USERNAME = 'ユーザ名’ 
PASSWORD = 'パスワード'
;; ログ保存先指定 
LOGSPATH = 'C:\logs\’ 
;============================================ 
;; ①SSH接続
COMMAND = HOSTNAME
strconcat COMMAND ':22 /ssh /2 /auth=password /user='
strconcat COMMAND strUSERNAME
strconcat COMMAND ' /passwd='
strconcat COMMAND strPASSWORD
connect COMMAND
if result != 2 then
    messagebox 'It could not be connected.' 'Connected error'
    end
endif
 
;; ②初期値設定
logstamp = '2012010101'
str2int intlogstamp logstamp
 
;; ③無限ループ開始
while 1
    ;; ④現在の時刻を取得し文字列を整数値に変換
    getdate nowdate '%Y%m%d%H'
    str2int intlogdate nowdate
    ;; ⑤ログを取得し始めた時刻と現在時刻を比較し
    ;;   時刻が変わっていればログファイル名を設定
    if intlogstamp != intlogdate then
        strLOG_FILE = LOGSPATH
        getdate strLOG_NAME '&h_%Y%m%d_%H%M%S.log'
        strconcat strLOG_FILE strLOG_NAME
        ;; ⑥一応ログ取得状態を確認
        ;;   ログ取得中であれば一旦ログをクローズ
        loginfo temp
        if result != -1 then
            logclose
        endif
        ;; ⑦新しいログファイル名でログ取得開始
        logopen strLOG_FILE 0 0
        ;; ⑧現在の時刻を変数[logstamp]にセット
        getdate logtime '%Y%m%d%H'
        str2int intlogstamp logtime
    endif
    ;; ⑨所定時間待機(1分･･･60　10分･･･600)
    pause 60
endwhile