web-dev-qa-db-ja.com

/etc/init.dスクリプトでのデーモンの呼び出しがブロックされており、バックグラウンドで実行されていません

デーモン化したいPerlスクリプトがあります。基本的に、このPerlスクリプトは、30秒ごとにディレクトリを読み取り、見つかったファイルを読み取ってから、データを処理します。ここで簡単にするために、次のPerlスクリプトを検討してください(synpipe_serverと呼ばれ、このスクリプトのシンボリックリンクが/usr/sbin/にあります)。

#!/usr/bin/Perl
use strict;
use warnings;

my $continue = 1;
$SIG{'TERM'}  = sub { $continue = 0; print "Caught TERM signal\n"; };
$SIG{'INT'} = sub { $continue = 0; print "Caught INT signal\n"; };

my $i = 0;
while ($continue) {
     #do stuff
     print "Hello, I am running " . ++$i . "\n";
     sleep 3;
}

したがって、このスクリプトは基本的に3秒ごとに何かを出力します。

次に、このスクリプトをデーモン化したいので、このbashスクリプト(synpipe_serverとも呼ばれます)を/etc/init.d/に配置しました。

#!/bin/bash
# synpipe_server : This starts and stops synpipe_server
#
# chkconfig: 12345 12 88
# description: Monitors all production pipelines
# processname: synpipe_server
# pidfile: /var/run/synpipe_server.pid
# Source function library.
. /etc/rc.d/init.d/functions

pname="synpipe_server"
exe="/usr/sbin/synpipe_server"
pidfile="/var/run/${pname}.pid"
lockfile="/var/lock/subsys/${pname}"

[ -x $exe ] || exit 0

RETVAL=0

start() {
    echo -n "Starting $pname : "
    daemon ${exe}
    RETVAL=$?
    PID=$!
    echo
    [ $RETVAL -eq 0 ] && touch ${lockfile}
    echo $PID > ${pidfile}
}

stop() {
    echo -n "Shutting down $pname : "
    killproc ${exe}
    RETVAL=$?
    echo
    if [ $RETVAL -eq 0 ]; then
        rm -f ${lockfile}
        rm -f ${pidfile}
    fi
}

restart() {
    echo -n "Restarting $pname : "
    stop
    sleep 2
    start
}

case "$1" in
    start)
        start
    ;;
    stop)
        stop
    ;;
    status)
        status ${pname}
    ;;
    restart)
        restart
    ;;
    *)
        echo "Usage: $0 {start|stop|status|restart}"
    ;; esac

exit 0

したがって、(デーモンのドキュメントをよく理解している場合)Perlスクリプトはバックグラウンドで実行され、実行すると出力は/dev/nullにリダイレクトされます。

service synpipe_server start

しかし、これが私が代わりに得るものです:

[root@master init.d]# service synpipe_server start
Starting synpipe_server : Hello, I am running 1
Hello, I am running 2
Hello, I am running 3
Hello, I am running 4
Caught INT signal
                                                           [  OK  ]
[root@master init.d]# 

そのため、Perlスクリプトを開始しますが、現在のターミナルセッションから切り離さずに実行し、コンソールに出力が出力されるのを確認できます...これは実際には期待していたことではありません。さらに、PIDファイルは空です(または改行のみの場合、daemonによって返されるpidはありません)。

誰かが私が間違っていることについて何か考えを持っていますか?

編集:多分私はRedHatマシンを使用していると言うべきです。

Scientific Linux SL release 5.4 (Boron)

デーモン関数を使用する代わりに、次のようなものを使用した場合、それは仕事をしますか?

Nohup ${exe} >/dev/null 2>&1 &

initスクリプトで?

9
tony

Redhatinitスクリプトdaemon関数の追加レイヤーを追加するのではなく、Perlスクリプトを直接デーモン化することをお勧めします。自分でデーモンを作成しようとすると、デーモンを正しく取得するのは困難です。 Proc :: Daemon は非常に簡単です。

また、 Perlデーモンの書き方 についても説明します。

ボーナス回答: daemontools および Proc :: Daemontools を使用してください。これは包括的なデーモン管理システムを提供し、おそらくすでにdaemontoolsがインストールされています。デーモンツールを嫌う人もいますが、それで仕事は終わります。

何度書いてもデーモンは変な感じがします。多分私はデーモンを使うべきです。

4
Phil Hollenback

Debianとその派生物を使用している場合は、start-stop-daemonと-bオプションを使用して、問題なくプロセスを開始します。

2
Dom