ttrss/update_daemon2.php

264 lines
6.9 KiB
PHP
Raw Permalink Normal View History

2012-06-22 04:09:42 +00:00
#!/usr/bin/env php
2008-01-23 09:19:36 +00:00
<?php
2021-02-22 14:38:46 +00:00
set_include_path(__DIR__ ."/include" . PATH_SEPARATOR .
get_include_path());
2008-01-23 09:19:36 +00:00
declare(ticks = 1);
2021-02-22 14:38:46 +00:00
chdir(__DIR__);
2008-01-23 09:19:36 +00:00
define('DISABLE_SESSIONS', true);
2008-01-23 09:19:36 +00:00
2013-04-17 11:36:34 +00:00
require_once "autoload.php";
2012-08-12 07:18:03 +00:00
require_once "functions.php";
Config::sanity_check();
if (!function_exists('pcntl_fork')) {
die("error: This script requires PHP compiled with PCNTL module.\n");
}
2014-02-06 19:04:27 +00:00
$options = getopt("");
if (!is_array($options)) {
die("error: getopt() failed. ".
"Most probably you are using PHP CGI to run this script ".
"instead of required PHP CLI. Check tt-rss wiki page on updating feeds for ".
"additional information.\n");
}
2014-02-06 19:04:27 +00:00
$master_handlers_installed = false;
$children = array();
2010-08-25 14:16:07 +00:00
$ctimes = array();
2008-01-23 09:19:36 +00:00
$last_checkpoint = -1;
2017-04-26 12:44:56 +00:00
/**
* @SuppressWarnings(unused)
*/
2021-11-10 21:38:25 +00:00
function reap_children(): int {
global $children;
global $ctimes;
$tmp = array();
foreach ($children as $pid) {
if (pcntl_waitpid($pid, $status, WNOHANG) != $pid) {
if (file_is_locked("update_daemon-$pid.lock")) {
array_push($tmp, $pid);
} else {
Debug::log("Child process with PID $pid seems active but lockfile is unlocked.");
unset($ctimes[$pid]);
}
} else {
Debug::log("Child process with PID $pid reaped.");
2010-08-25 14:16:07 +00:00
unset($ctimes[$pid]);
}
}
$children = $tmp;
return count($tmp);
}
2021-11-10 21:38:25 +00:00
function check_ctimes(): void {
2010-08-25 14:16:07 +00:00
global $ctimes;
2010-08-25 14:16:07 +00:00
foreach (array_keys($ctimes) as $pid) {
$started = $ctimes[$pid];
2021-02-22 19:35:27 +00:00
if (time() - $started > Config::get(Config::DAEMON_MAX_CHILD_RUNTIME)) {
Debug::log("Child process with PID $pid seems to be stuck, aborting...");
2010-09-30 13:03:02 +00:00
posix_kill($pid, SIGKILL);
2010-08-25 14:16:07 +00:00
}
}
}
2017-04-26 12:44:56 +00:00
/**
* @SuppressWarnings(unused)
2021-11-10 21:53:28 +00:00
* @param mixed $siginfo
2017-04-26 12:44:56 +00:00
*/
2021-11-10 21:53:28 +00:00
function sigchld_handler(int $signo, $siginfo): void {
$running_jobs = reap_children();
Debug::log("Received SIGCHLD, $running_jobs active tasks left.");
2008-01-23 09:19:36 +00:00
pcntl_waitpid(-1, $status, WNOHANG);
}
2021-11-10 21:38:25 +00:00
function shutdown(int $caller_pid): void {
if ($caller_pid == posix_getpid()) {
2021-02-22 18:47:48 +00:00
if (file_exists(Config::get(Config::LOCK_DIRECTORY) . "/update_daemon.lock")) {
Debug::log("Removing lockfile (master)...");
2021-02-22 18:47:48 +00:00
unlink(Config::get(Config::LOCK_DIRECTORY) . "/update_daemon.lock");
}
}
}
2021-11-10 21:38:25 +00:00
function task_shutdown(): void {
$pid = posix_getpid();
2021-02-22 18:47:48 +00:00
if (file_exists(Config::get(Config::LOCK_DIRECTORY) . "/update_daemon-$pid.lock")) {
Debug::log("Removing task lockfile for PID $pid...");
2021-02-22 18:47:48 +00:00
unlink(Config::get(Config::LOCK_DIRECTORY) . "/update_daemon-$pid.lock");
}
}
2021-11-10 21:38:25 +00:00
function sigint_handler(): void {
Debug::log("[MASTER] SIG_INT received, shutting down master process.");
shutdown(posix_getpid());
die;
}
2021-11-10 21:38:25 +00:00
function task_sigint_handler(): void {
Debug::log("[TASK] SIG_INT received, shutting down task.");
task_shutdown();
die;
}
2008-01-23 09:19:36 +00:00
pcntl_signal(SIGCHLD, 'sigchld_handler');
2008-01-23 09:30:55 +00:00
$longopts = array("log:",
"log-level:",
"tasks:",
"interval:",
"quiet",
"help");
$options = getopt("", $longopts);
if ($options === false || isset($options["help"]) ) {
print "Tiny Tiny RSS update daemon.\n\n";
print "Options:\n";
print " --log FILE - log messages to FILE\n";
print " --log-level N - log verbosity level\n";
print " --tasks N - amount of update tasks to spawn\n";
2021-02-22 19:35:27 +00:00
print " default: " . Config::get(Config::DAEMON_MAX_JOBS) . "\n";
print " --interval N - task spawn interval\n";
2021-02-22 19:35:27 +00:00
print " default: " . Config::get(Config::DAEMON_SLEEP_INTERVAL) . " seconds.\n";
print " --quiet - don't output messages to stdout\n";
return;
}
Debug::set_enabled(true);
if (isset($options["log-level"])) {
Debug::set_loglevel(Debug::map_loglevel((int)$options["log-level"]));
}
if (isset($options["log"])) {
Debug::set_quiet(isset($options['quiet']));
Debug::set_logfile($options["log"]);
Debug::log("Logging to " . $options["log"]);
} else {
if (isset($options['quiet'])) {
Debug::set_loglevel(Debug::LOG_DISABLED);
}
}
if (isset($options["tasks"])) {
Debug::log("Set to spawn " . $options["tasks"] . " children.");
$max_jobs = (int) $options["tasks"];
} else {
2021-02-22 19:35:27 +00:00
$max_jobs = Config::get(Config::DAEMON_MAX_JOBS);
}
if ($max_jobs < 1) {
$max_jobs = 1;
Debug::log("Enforced minimum task count of $max_jobs.");
}
if (isset($options["interval"])) {
Debug::log("Spawn interval: " . $options["interval"] . " seconds.");
$spawn_interval = (int) $options["interval"];
} else {
2021-02-22 19:35:27 +00:00
$spawn_interval = Config::get(Config::DAEMON_SLEEP_INTERVAL);
}
// let's enforce a minimum spawn interval as to not forkbomb the host
if ($spawn_interval < 60) {
$spawn_interval = 60;
Debug::log("Enforced minimum task spawn interval of $spawn_interval seconds.");
}
2008-01-23 11:43:11 +00:00
if (file_is_locked("update_daemon.lock")) {
die("error: Can't create lockfile. ".
2008-01-23 09:30:55 +00:00
"Maybe another daemon is already running.\n");
}
2008-01-23 09:19:36 +00:00
2013-02-25 17:28:34 +00:00
// Try to lock a file in order to avoid concurrent update.
$lock_handle = make_lockfile("update_daemon.lock");
if (!$lock_handle) {
die("error: Can't create lockfile. ".
"Maybe another daemon is already running.\n");
}
if (Config::is_migration_needed()) {
die("Schema version is wrong, please upgrade the database.\n");
}
// Protip: children close shared database handle when terminating, it's a bad idea to
// do database stuff on main process from now on.
2008-01-23 09:19:36 +00:00
while (true) {
// Since sleep is interupted by SIGCHLD, we need another way to
// respect the spawn interval
$next_spawn = $last_checkpoint + $spawn_interval - time();
2008-01-23 09:19:36 +00:00
2013-03-29 09:04:05 +00:00
if ($next_spawn % 60 == 0) {
$running_jobs = count($children);
Debug::log("$running_jobs active tasks, next spawn at $next_spawn sec.");
}
2008-01-23 09:19:36 +00:00
if ($last_checkpoint + $spawn_interval < time()) {
2010-08-25 14:16:07 +00:00
check_ctimes();
reap_children();
for ($j = count($children); $j < $max_jobs; $j++) {
2008-01-23 09:19:36 +00:00
$pid = pcntl_fork();
if ($pid == -1) {
die("fork failed!\n");
} else if ($pid) {
if (!$master_handlers_installed) {
Debug::log("Installing shutdown handlers");
pcntl_signal(SIGINT, 'sigint_handler');
pcntl_signal(SIGTERM, 'sigint_handler');
register_shutdown_function('shutdown', posix_getpid());
$master_handlers_installed = true;
}
Debug::log("Spawned child process with PID $pid for task $j.");
array_push($children, $pid);
2010-08-25 14:16:07 +00:00
$ctimes[$pid] = time();
2008-01-23 09:19:36 +00:00
} else {
pcntl_signal(SIGCHLD, SIG_IGN);
pcntl_signal(SIGINT, 'task_sigint_handler');
register_shutdown_function('task_shutdown');
$quiet = (isset($options["quiet"])) ? "--quiet" : "";
$log = function_exists("flock") && isset($options['log']) ? '--log '.$options['log'] : '';
2013-03-30 12:23:34 +00:00
$my_pid = posix_getpid();
2021-02-22 18:47:48 +00:00
passthru(Config::get(Config::PHP_EXECUTABLE) . " update.php --daemon-loop $quiet $log --task $j --pidlock $my_pid");
sleep(1);
// We exit in order to avoid fork bombing.
2008-01-23 09:19:36 +00:00
exit(0);
}
}
$last_checkpoint = time();
}
sleep(1);
}
?>