update_daemon2.php

   1 #!/usr/bin/env php
   2 <?php
   3         set_include_path(get_include_path() . PATH_SEPARATOR .
   4                 dirname(__FILE__) . "/include");
   5
   6         // This is an experimental multiprocess update daemon.
   7         // Some configurable variable may be found below.
   8
   9         declare(ticks = 1);
  10         chdir(dirname(__FILE__));
  11
  12         define('DISABLE_SESSIONS', true);
  13
  14         require_once "version.php";
  15
  16         if (strpos(VERSION, ".99") !== false || getenv('DAEMON_XDEBUG')) {
  17                 define('DAEMON_EXTENDED_DEBUG', true);
  18         }
  19
  20         define('PURGE_INTERVAL', 3600); // seconds
  21         define('MAX_CHILD_RUNTIME', 600); // seconds
  22
  23         require_once "functions.php";
  24         require_once "rssfuncs.php";
  25         require_once "sanity_check.php";
  26         require_once "config.php";
  27         require_once "db.php";
  28         require_once "db-prefs.php";
  29         require_once "lib/magpierss/rss_fetch.inc";
  30
  31         define('MAX_JOBS', 2);
  32         define('SPAWN_INTERVAL', DAEMON_SLEEP_INTERVAL);
  33
  34         if (!function_exists('pcntl_fork')) {
  35                 die("error: This script requires PHP compiled with PCNTL module.\n");
  36         }
  37
  38         $children = array();
  39         $ctimes = array();
  40
  41         $last_checkpoint = -1;
  42
  43         function reap_children() {
  44                 global $children;
  45                 global $ctimes;
  46
  47                 $tmp = array();
  48
  49                 foreach ($children as $pid) {
  50                         if (pcntl_waitpid($pid, $status, WNOHANG) != $pid) {
  51
  52                                 if (file_is_locked("update_daemon-$pid.lock")) {
  53                                         array_push($tmp, $pid);
  54                                 } else {
  55                                         _debug("[reap_children] child $pid seems active but lockfile is unlocked.");
  56                                         unset($ctimes[$pid]);
  57
  58                                 }
  59                         } else {
  60                                 _debug("[reap_children] child $pid reaped.");
  61                                 unset($ctimes[$pid]);
  62                         }
  63                 }
  64
  65                 $children = $tmp;
  66
  67                 return count($tmp);
  68         }
  69
  70         function check_ctimes() {
  71                 global $ctimes;
  72
  73                 foreach (array_keys($ctimes) as $pid) {
  74                         $started = $ctimes[$pid];
  75
  76                         if (time() - $started > MAX_CHILD_RUNTIME) {
  77                                 _debug("[MASTER] child process $pid seems to be stuck, aborting...");
  78                                 posix_kill($pid, SIGKILL);
  79                         }
  80                 }
  81         }
  82
  83         function sigchld_handler($signal) {
  84                 $running_jobs = reap_children();
  85
  86                 _debug("[SIGCHLD] jobs left: $running_jobs");
  87
  88                 pcntl_waitpid(-1, $status, WNOHANG);
  89         }
  90
  91         function shutdown() {
  92                 if (file_exists(LOCK_DIRECTORY . "/update_daemon.lock"))
  93                         unlink(LOCK_DIRECTORY . "/update_daemon.lock");
  94         }
  95
  96         function task_shutdown() {
  97                 $pid = posix_getpid();
  98
  99                 if (file_exists(LOCK_DIRECTORY . "/update_daemon-$pid.lock"))
 100                         unlink(LOCK_DIRECTORY . "/update_daemon-$pid.lock");
 101         }
 102
 103         function sigint_handler() {
 104                 shutdown();
 105                 die("[SIGINT] removing lockfile and exiting.\n");
 106         }
 107
 108         function task_sigint_handler() {
 109                 task_shutdown();
 110                 die("[SIGINT] removing lockfile and exiting.\n");
 111         }
 112
 113         pcntl_signal(SIGCHLD, 'sigchld_handler');
 114
 115         if (file_is_locked("update_daemon.lock")) {
 116                 die("error: Can't create lockfile. ".
 117                         "Maybe another daemon is already running.\n");
 118         }
 119
 120         if (!pcntl_fork()) {
 121                 pcntl_signal(SIGINT, 'sigint_handler');
 122                 register_shutdown_function('shutdown');
 123
 124                 // Try to lock a file in order to avoid concurrent update.
 125                 $lock_handle = make_lockfile("update_daemon.lock");
 126
 127                 if (!$lock_handle) {
 128                         die("error: Can't create lockfile. ".
 129                                 "Maybe another daemon is already running.\n");
 130                 }
 131
 132                 while (true) { sleep(100); }
 133         }
 134
 135         // Testing database connection.
 136         // It is unnecessary to start the fork loop if database is not ok.
 137         $link = db_connect(DB_HOST, DB_USER, DB_PASS, DB_NAME);
 138
 139         if (!init_connection($link)) return;
 140
 141         db_close($link);
 142
 143         while (true) {
 144
 145                 // Since sleep is interupted by SIGCHLD, we need another way to
 146                 // respect the SPAWN_INTERVAL
 147                 $next_spawn = $last_checkpoint + SPAWN_INTERVAL - time();
 148
 149                 if ($next_spawn % 10 == 0) {
 150                         $running_jobs = count($children);
 151                         _debug("[MASTER] active jobs: $running_jobs, next spawn at $next_spawn sec.");
 152                 }
 153
 154                 if ($last_checkpoint + SPAWN_INTERVAL < time()) {
 155
 156                         check_ctimes();
 157                         reap_children();
 158
 159                         for ($j = count($children); $j < MAX_JOBS; $j++) {
 160                                 $pid = pcntl_fork();
 161                                 if ($pid == -1) {
 162                                         die("fork failed!\n");
 163                                 } else if ($pid) {
 164                                         _debug("[MASTER] spawned client $j [PID:$pid]...");
 165                                         array_push($children, $pid);
 166                                         $ctimes[$pid] = time();
 167                                 } else {
 168                                         pcntl_signal(SIGCHLD, SIG_IGN);
 169                                         pcntl_signal(SIGINT, 'task_sigint_handler');
 170
 171                                         register_shutdown_function('task_shutdown');
 172
 173                                         $my_pid = posix_getpid();
 174                                         $lock_filename = "update_daemon-$my_pid.lock";
 175
 176                                         $lock_handle = make_lockfile($lock_filename);
 177
 178                                         if (!$lock_handle) {
 179                                                 die("error: Can't create lockfile ($lock_filename). ".
 180                                                 "Maybe another daemon is already running.\n");
 181                                         }
 182
 183                                         // ****** Updating RSS code *******
 184                                         // Only run in fork process.
 185
 186                                         $start_timestamp = time();
 187
 188                                         $link = db_connect(DB_HOST, DB_USER, DB_PASS, DB_NAME);
 189
 190                                         if (!init_connection($link)) return;
 191
 192                                         // We disable stamp file, since it is of no use in a multiprocess update.
 193                                         // not really, tho for the time being -fox
 194                                         if (!make_stampfile('update_daemon.stamp')) {
 195                                                 print "warning: unable to create stampfile";
 196                                         }
 197
 198                                         // Call to the feed batch update function
 199                                         // or regenerate feedbrowser cache
 200
 201                                         if (rand(0,100) > 30) {
 202                                                 update_daemon_common($link);
 203                                         } else {
 204                                                 $count = update_feedbrowser_cache($link);
 205                                                 _debug("Feedbrowser updated, $count feeds processed.");
 206
 207                                                 purge_orphans($link, true);
 208
 209                                                 $rc = cleanup_tags($link, 14, 50000);
 210
 211                                                 _debug("Cleaned $rc cached tags.");
 212
 213                                                 _debug("Updating linked feeds...");
 214                                                 get_linked_feeds($link);
 215
 216                                         }
 217
 218                                         _debug("Elapsed time: " . (time() - $start_timestamp) . " second(s)");
 219
 220                                         db_close($link);
 221
 222                                         // We are in a fork.
 223                                         // We wait a little before exiting to avoid to be faster than our parent process.
 224                                         sleep(1);
 225
 226                                         unlink(LOCK_DIRECTORY . "/$lock_filename");
 227
 228                                         // We exit in order to avoid fork bombing.
 229                                         exit(0);
 230                                 }
 231
 232                                 // We wait a little time before the next fork, in order to let the first fork
 233                                 // mark the feeds it update :
 234                                 sleep(1);
 235                         }
 236                         $last_checkpoint = time();
 237                 }
 238                 sleep(1);
 239         }
 240
 241 ?>