X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=bin%2Fdaemon.php;h=1ae55be78f6fd9db6c4aa5f6d4b061b6e7dbe2b1;hb=14fde5dc9b1915392601fb94efc6224c01f2b216;hp=6b0e377a3a1bfa0126c8a4bfe9b5d25efebd603c;hpb=f7190ce9714be3e2edbc0915c854fc707cfbbcc6;p=friendica.git diff --git a/bin/daemon.php b/bin/daemon.php index 6b0e377a3a..1ae55be78f 100755 --- a/bin/daemon.php +++ b/bin/daemon.php @@ -6,10 +6,49 @@ * * This script was taken from http://php.net/manual/en/function.pcntl-fork.php */ -function shutdown() { - posix_kill(posix_getpid(), SIGHUP); + +use Friendica\App; +use Friendica\Core\Config; +use Friendica\Core\Logger; +use Friendica\Core\Worker; +use Friendica\Database\DBA; + +// Get options +$shortopts = 'f'; +$longopts = ['foreground']; +$options = getopt($shortopts, $longopts); + +// Ensure that daemon.php is executed from the base path of the installation +if (!file_exists("boot.php") && (sizeof($_SERVER["argv"]) != 0)) { + $directory = dirname($_SERVER["argv"][0]); + + if (substr($directory, 0, 1) != "/") { + $directory = $_SERVER["PWD"] . "/" . $directory; + } + $directory = realpath($directory . "/.."); + + chdir($directory); } +require_once "boot.php"; +require_once "include/dba.php"; + +$a = new App(dirname(__DIR__)); + +if ($a->getMode()->isInstall()) { + die("Friendica isn't properly installed yet.\n"); +} + +Config::load(); + +if (empty(Config::get('system', 'pidfile'))) { + die('Please set system.pidfile in config/local.ini.php. For example:'."\n". + '[system]'."\n". + 'pidfile = /path/to/daemon.pid'."\n"); +} + +$pidfile = Config::get('system', 'pidfile'); + if (in_array("start", $_SERVER["argv"])) { $mode = "start"; } @@ -22,6 +61,8 @@ if (in_array("status", $_SERVER["argv"])) { $mode = "status"; } +$foreground = array_key_exists('f', $options) || array_key_exists('foreground', $options); + if (!isset($mode)) { die("Please use either 'start', 'stop' or 'status'.\n"); } @@ -30,27 +71,15 @@ if (empty($_SERVER["argv"][0])) { die("Unexpected script behaviour. This message should never occur.\n"); } -// Fetch the base directory -$directory = dirname($_SERVER["argv"][0]); +$pid = null; -if (substr($directory, 0, 1) != "/") { - $directory = $_SERVER["PWD"]."/".$directory; +if (is_readable($pidfile)) { + $pid = intval(file_get_contents($pidfile)); } -$directory = realpath($directory."/.."); - -@include($directory."/.htconfig.php"); - -if (!isset($pidfile)) { - die('Please specify a pid file in the variable $pidfile in the .htconfig.php. For example:'."\n". - '$pidfile = "/path/to/daemon.pid";'."\n"); -} - -if (in_array($mode, array("stop", "status"))) { - $pid = @file_get_contents($pidfile); - if (!$pid) { - die("Pidfile wasn't found. Is the daemon running?\n"); - } +if (empty($pid) && in_array($mode, ["stop", "status"])) { + Config::set('system', 'worker_daemon_mode', false); + die("Pidfile wasn't found. Is the daemon running?\n"); } if ($mode == "status") { @@ -60,6 +89,7 @@ if ($mode == "status") { unlink($pidfile); + Config::set('system', 'worker_daemon_mode', false); die("Daemon process $pid isn't running.\n"); } @@ -68,59 +98,102 @@ if ($mode == "stop") { unlink($pidfile); + Logger::log("Worker daemon process $pid was killed.", LOGGER_DEBUG); + + Config::set('system', 'worker_daemon_mode', false); die("Worker daemon process $pid was killed.\n"); } -echo "Starting worker daemon.\n"; - -if (isset($a->config['php_path'])) { - $php = $a->config['php_path']; -} else { - $php = "php"; +if (!empty($pid) && posix_kill($pid, 0)) { + die("Daemon process $pid is already running.\n"); } -// Switch over to daemon mode. -if ($pid = pcntl_fork()) - return; // Parent +Logger::log('Starting worker daemon.', LOGGER_DEBUG); -fclose(STDIN); // Close all of the standard -fclose(STDOUT); // file descriptors as we -fclose(STDERR); // are running as a daemon. +if (!$foreground) { + echo "Starting worker daemon.\n"; -register_shutdown_function('shutdown'); + // Switch over to daemon mode. + if ($pid = pcntl_fork()) { + return; // Parent + } + + fclose(STDIN); // Close all of the standard -if (posix_setsid() < 0) - return; + // Enabling this seem to block a running php process with 100% CPU usage when there is an outpout + // fclose(STDOUT); // file descriptors as we + // fclose(STDERR); // are running as a daemon. -if ($pid = pcntl_fork()) - return; // Parent + DBA::disconnect(); -$pid = getmypid(); -file_put_contents($pidfile, $pid); + register_shutdown_function('shutdown'); + + if (posix_setsid() < 0) { + return; + } + + if ($pid = pcntl_fork()) { + return; // Parent + } + + $pid = getmypid(); + file_put_contents($pidfile, $pid); + + // We lose the database connection upon forking + $a->loadDatabase(); +} + +Config::set('system', 'worker_daemon_mode', true); + +// Just to be sure that this script really runs endlessly +set_time_limit(0); + +$wait_interval = intval(Config::get('system', 'cron_interval', 5)) * 60; + +$do_cron = true; +$last_cron = 0; // Now running as a daemon. while (true) { - // Just to be sure that this script really runs endlessly - set_time_limit(0); - - // Call the worker - $cmdline = $php.' bin/worker.php'; + if (!$do_cron && ($last_cron + $wait_interval) < time()) { + Logger::log('Forcing cron worker call.', LOGGER_DEBUG); + $do_cron = true; + } - $executed = false; + Worker::spawnWorker($do_cron); - if (function_exists('proc_open')) { - $resource = proc_open($cmdline . ' &', array(), $foo, $directory); + if ($do_cron) { + // We force a reconnect of the database connection. + // This is done to ensure that the connection don't get lost over time. + DBA::reconnect(); - if (is_resource($resource)) { - $executed = true; - proc_close($resource); - } + $last_cron = time(); } - if (!$executed) { - exec($cmdline.' spawn'); + Logger::log("Sleeping", LOGGER_DEBUG); + $start = time(); + do { + $seconds = (time() - $start); + + // logarithmic wait time calculation. + // Background: After jobs had been started, they often fork many workers. + // To not waste too much time, the sleep period increases. + $arg = (($seconds + 1) / ($wait_interval / 9)) + 1; + $sleep = round(log10($arg) * 1000000, 0); + usleep($sleep); + + $timeout = ($seconds >= $wait_interval); + } while (!$timeout && !Worker::IPCJobsExists()); + + if ($timeout) { + $do_cron = true; + Logger::log("Woke up after $wait_interval seconds.", LOGGER_DEBUG); + } else { + $do_cron = false; + Logger::log("Worker jobs are calling to be forked.", LOGGER_DEBUG); } +} - // Now sleep for 5 minutes - sleep(300); +function shutdown() { + posix_kill(posix_getpid(), SIGHUP); }