Linux サーバプロセス監視プログラム

---------------------------------------------------------------------------------

         perl で作成したプロセスを監視するプログラムの一例です。
---------------------------------------------------------------------------------
  プログラムは、match関数を使ったコードを使用しています。
  match関数は、一般的には、~ m/(一致を取りたい文字列)/mですが、m を前置すると
  正規表現を囲う記号にスラッシュ以外を用いることができるので　" [ , ] " を使用
  し、パス文字列中の " / " と混在しない様にしました。
  match関数の後ろの m は、すべての行を検索対象にする指定です。
---------------------------------------------------------------------------------
  監視しなければならないプロセスは、httpd,sshd,proftpd,vsftpd,DiCE があります。
  各プロセスの起動確認情報は、コマンド ps -ef の出力文字列に下記に列挙した
  文字列が有るか無いかで判断しています。

  httpd   --->  /usr/local/apache2/bin/httpd
  sshd    --->  /usr/sbin/sshd
  proftpd --->  proftpd:
  vsftpd  --->  /usr/sbin/vsftpd
  DiCE    --->  /usr/local/DiCE/diced

---------------------------------------------------------------------------------
  crontab への設定は、下記の様にします。/○○/○○○.pl は、プログラムの保存先
  ディレクトリとプログラム名です。 > /dev/null 2>&1 は、忘れないようにして下さい。
  忘れた場合には、root 宛てのメールに「 実行結果 」が 1 分毎に記録されます。

  参考までに、/dev/null ： nullデバイスでコマンド等の実行結果をすべて捨てる
                           指定です。
                           ここに書込むことによってメッセージは、すべて破棄
                           されます。
                   2>&1 ： エラーメッセージを捨てる指定です。

  * * * * * /var/www/○○/○○○.pl > /dev/null 2>&1
---------------------------------------------------------------------------------

#!/usr/bin/perl
#----------------------------------------------------------
# 
# sshd, httpd, proftpd or vsftpd, DiCE の動作プロセスを監視
# 停止している時には、起動させます
#
#----------------------------------------------------------
use strict;
my $F_SSHD  = 0;   #  起動チェックフラグ OFF
my $F_HTTPD = 0;
my $F_FTPD  = 0;
my $F_DICE  = 0;
#-------------   ps コマンド起動   ------------------------
#
my $PS_DATA = `ps -ef`;
#
#----------------   sshd   --------------------------------------------------
  if ( $PS_DATA=~ m[/usr/sbin/sshd]m) { $F_SSHD++; }
#----------------   httpd-2.4-10  -------------------------------------------
  if ( $PS_DATA=~ m[/usr/local/apache2/bin/httpd]m) { $F_HTTPD++; }
#----------------  proftpd  -------------------------------------------------
  if ( $PS_DATA=~ m[proftpd:]m) { $F_FTPD++; }
#----------------  vsftpd  --------------------------------------------------
  if ( $PS_DATA=~ m[/usr/sbin/vsftpd]m) { $F_FTPD++; }
#----------------   DiCE   --------------------------------------------------
  if ( $PS_DATA=~ m[/usr/local/DiCE/diced]m) { $F_DICE++; }
#----------------------------------------------------------------------------
#  起動チェックフラグが 0 だったら起動する。
#  起動チェックフラグが 1 の時には、起動中のメッセージ表示をする。 
#----------------------------------------------------------------------------
if ( $F_SSHD == 0 )   { system("/etc/rc.d/init.d/sshd start"); }
   else { print "sshd    active (running)\n"; }

if ( $F_HTTPD == 0 )  { system("/usr/local/apache2/bin/apachectl start"); }
   else { print "httpd   active (running)\n"; }

#if ( $F_FTPD == 0 )   {	system("/etc/rc.d/init.d/vsftpd start"); }
#   else { print "vsftpd active (running)\n"; }

if ( $F_FTPD == 0 ) {	system("/etc/rc.d/init.d/proftpd start"); }
   else { print "proftpd active (running)\n"; }

if ( $F_DICE == 0 ) { system("/usr/local/DiCE/diced -d -l"); }
   else { print "DiCE    active (running)\n"; }
#----------------------------------------------------------------------------

---------------------------------------------------------------------------------
この perl のプログラムを実行した結果は、下記の様になります。
チェックしたプロセスは、すべて稼働している状態です。

sshd    active (running)
httpd   active (running)
proftpd active (running)
DiCE    active (running)