rocksolid-light/Rocksolid_Light/rslight/scripts/cron.php

352 lines
13 KiB
PHP

<?php
// This file runs maintenance scripts and should be executed by cron regularly
include "config.inc.php";
include "newsportal.php";
include $config_dir . "/scripts/rslight-lib.php";
include $config_dir . "/gpg.conf";
$pid = getmypid();
$logfile = $logdir . '/cron.log';
if (file_exists($config_dir . '/cron.disable') || file_exists($spooldir . '/cron.disable')) {
file_put_contents($logfile, "\n" . date('M d H:i:s') . " " . $config_name . " cron.php disabled by semaphore: cron.disable Exiting...", FILE_APPEND);
chown($logfile, $CONFIG['webserver_user']);
exit();
} else {
file_put_contents($logfile, "\n" . date('M d H:i:s') . " " . $config_name . " cron " . $pid . " started...", FILE_APPEND);
chown($logfile, $CONFIG['webserver_user']);
}
$menulist = get_section_menu_array();
# Start or verify NNTP server
if (isset($CONFIG['enable_nntp']) && $CONFIG['enable_nntp'] == true) {
# Create group list for nntp.php
$fp1 = $spooldir . "/" . $config_name . "/groups.txt";
unlink($fp1);
touch($fp1);
$group_exists = array();
foreach ($menulist as $menu) {
$menuitem = explode(':', $menu);
if ($menuitem[2] == '1') {
$in_gl = file($config_dir . $menuitem[0] . "/groups.txt");
foreach ($in_gl as $ok_group) {
if (($ok_group[0] == ':') || (trim($ok_group) == "")) {
continue;
}
$entry = preg_split("/( |\t)/", trim($ok_group), 2);
if (!isset($group_exists[$entry[0]])) {
file_put_contents($fp1, $entry[0] . "\n", FILE_APPEND);
}
$group_exists[$entry[0]] = true;
}
}
}
$disabled_php = ini_get('disable_functions');
echo $disabled_php;
if (strpos($disabled_php, 'pcntl_fork') !== false) {
echo "\nERROR: pcntl_fork() disabled in php ini file, cannot fork (nntp server will not start).";
file_put_contents($logfile, "\n" . format_log_date() . " ERROR: pcntl_fork() disabled in php ini file, cannot fork (nntp server will not start).", FILE_APPEND);
} else {
exec($CONFIG['php_exec'] . " " . $config_dir . "/scripts/nntp.php > /dev/null 2>&1");
if (is_numeric($CONFIG['local_ssl_port'])) {
exec($CONFIG['php_exec'] . " " . $config_dir . "/scripts/nntp-ssl.php > /dev/null 2>&1");
}
}
}
// Create paths in $config_dir/scripts path file
$config_path_file = $config_dir . '/scripts/paths.inc.php';
if (!file_exists($config_path_file)) {
file_put_contents($config_path_file, '<?php' . "\n");
file_put_contents($config_path_file, '$spoolnews_path = "' . getcwd() . '";', FILE_APPEND);
}
# Generate user count file (must be root)
exec($CONFIG['php_exec'] . " " . $config_dir . "/scripts/count_users.php");
echo "Updated user count\n";
$uinfo = posix_getpwnam($CONFIG['webserver_user']);
$cwd = getcwd();
// Check permissions on some files
$webtmp = preg_replace('/spoolnews/', 'tmp/', $cwd);
$keydir = preg_replace('/spoolnews/', 'pubkey/', $cwd);
$banfile = $config_dir . '/banned_users.conf';
@chown($banfile, $uinfo["uid"]);
@mkdir($webtmp, 0755, 'recursive');
@chown($webtmp, $uinfo["uid"]);
@chgrp($webtmp, $uinfo["gid"]);
@mkdir($keydir, 0755, 'recursive');
@chown($keydir, $uinfo["uid"]);
@chgrp($keydir, $uinfo["gid"]);
@mkdir($ssldir, 0755);
@chown($ssldir, $uinfo["uid"]);
@chgrp($ssldir, $uinfo["gid"]);
$alias_file = $config_dir . '/aliases.conf';
if (! file_exists($alias_file)) {
touch($alias_file);
}
@chown($alias_file, $uinfo["uid"]);
@chgrp($alias_file, $uinfo["gid"]);
$pemfile = $ssldir . '/server.pem';
create_node_ssl_cert($pemfile);
$overview = $spooldir . '/articles-overview.db3';
touch($overview);
@chown($overview, $uinfo["uid"]);
@chgrp($overview, $uinfo["gid"]);
if ($rslight_gpg['enable'] == '1') {
$gnupg = $rslight_gpg['gnupghome'];
if (! is_dir($gnupg)) {
mkdir($gnupg, 0700);
chown($gnupg, $uinfo["uid"]);
chgrp($gnupg, $uinfo["gid"]);
}
}
/* Change to non root user */
change_identity($uinfo["uid"], $uinfo["gid"]);
/* Everything below runs as $CONFIG['webserver_user'] */
@mkdir($logdir, 0755, 'recursive');
@mkdir($lockdir, 0755, 'recursive');
if (isset($CONFIG['enable_nocem']) && $CONFIG['enable_nocem'] == true) {
@mkdir($spooldir . "nocem", 0755, 'recursive');
exec($CONFIG['php_exec'] . " " . $config_dir . "/scripts/nocem.php");
}
// Set up server gpg keys
if ($rslight_gpg['enable'] == '1') {
if (! is_file($keydir . '/server_pubkey.txt')) {
$domain = 'rslight@' . $rslight_gpg['domain_name'];
$pubkey = $keydir . '/server_pubkey.txt';
$fingerprint = $keydir . '/server_fingerprint.txt';
$create_gpg_keys = $config_dir . '/scripts/create_gpg_keys.sh "' . $gnupg . '" "' . $pubkey . '" "' . $fingerprint . '" "' . $domain . '"';
exec($create_gpg_keys);
}
exec($CONFIG['php_exec'] . " " . $config_dir . "/scripts/interBBS_mail.php");
}
check_disk_space();
reset($menulist);
foreach ($menulist as $menu) {
if (($menu[0] == '#') || (trim($menu) == "")) {
continue;
}
$menuitem = explode(':', $menu);
chdir("../" . $menuitem[0]);
$this_config_name = $menuitem[0];
if(file_exists($config_dir.$this_config_name.'.inc.php')) {
$config_file = $config_dir.$this_config_name.'.inc.php';
} else {
$config_file = $config_dir.'rslight.inc.php';
}
$this_CONFIG = include($config_file);
file_put_contents($debug_log, "\n" . format_log_date() . " Using " . $config_file . " for " . $menuitem[0], FILE_APPEND);
if ($this_CONFIG['remote_server'] !== '') {
# Send articles
echo "Sending articles\n";
echo exec($CONFIG['php_exec'] . " " . $config_dir . "/scripts/send.php");
# Refresh spool
if (isset($spoolnews) && ($spoolnews == true)) {
exec($CONFIG['php_exec'] . " " . $config_dir . "/scripts/spoolnews.php");
echo "\nRefreshed spoolnews\n";
}
} else {
file_put_contents($debug_log, "\n" . format_log_date() . " Remote disabled for " . $menuitem[0] . " (no remote server)", FILE_APPEND);
}
# Expire articles
exec($CONFIG['php_exec'] . " " . $config_dir . "/scripts/expire.php");
echo "Expired articles\n";
}
# Expire diskcache
if (file_exists($config_dir . '/cache.inc.php')) {
include $config_dir . '/cache.inc.php';
if ($enable_cache == 'diskcache') {
prune_dir_by_days($cache_dir, $cache_ttl / 86400);
}
}
# Run RSS Feeds
exec($CONFIG['php_exec'] . " " . $config_dir . "/scripts/rss-feeds.php");
echo "RSS Feeds updated\n";
# Reload grouplist
if ((filemtime($grouplist_cache_filename) < (time() - ($grouplist_cache_time - 600)) || ! file_exists($grouplist_cache_filename))) {
exec($CONFIG['php_exec'] . " ../common/grouplist.php .RELOAD");
echo "Refreshed grouplist\n";
}
# Rotate log files
log_rotate();
echo "Log files rotated\n";
# Rotate keys
rotate_keys();
echo "Keys rotated\n";
# Expire files
expire_files();
echo "Removed old files\n";
file_put_contents($logfile, "\n" . date('M d H:i:s') . " " . $config_name . " cron " . $pid . " completed...", FILE_APPEND);
function check_disk_space()
{
global $CONFIG, $OVERRIDES, $logdir, $spooldir;
global $low_spool_disk_space, $min_spool_disk_space, $free_spool_disk_space;
$logfile = $logdir . '/spoolnews.log';
$warning_spool_disk_space = $min_spool_disk_space * 1.1;
if ($free_spool_disk_space < $warning_spool_disk_space) {
$nearing_low_spool_disk_space = true;
} else {
$nearing_low_spool_disk_space = false;
}
if ($nearing_low_spool_disk_space) {
if ($low_spool_disk_space) { // Disk space low. Spooling will pause
print "Low Disk Space (less than " . $min_spool_disk_space . " available)\n";
file_put_contents($logfile, "\n" . format_log_date() . " " . $config_name . " Low Disk Space (less than " . $min_spool_disk_space . "Gb available for spool). Pausing spoolnews", FILE_APPEND);
$subject = "LOW DISK SPACE ON " . $CONFIG['server_path'];
$body = "LOW DISK SPACE ON " . $CONFIG['server_path'] . "\n";
$body .= "Space has fallen below " . $min_spool_disk_space . "GB\n";
$body .= "Space remaining: " . round($free_spool_disk_space) . "GB\n";
$timer_type = "low_spool_disk_space";
} else { // Disk space approaching low (within 10%) This is a warning only
print "Nearing Low Disk Space (less than " . round($warning_spool_disk_space, 1) . "Gb available for spool)\n";
file_put_contents($logfile, "\n" . format_log_date() . " Nearing Low Disk Space (less than " . round($warning_spool_disk_space, 1) . "Gb available for spool)", FILE_APPEND);
$subject = "NEARING LOW DISK SPACE ON " . $CONFIG['server_path'];
$body = "NEARING LOW DISK SPACE ON " . $CONFIG['server_path'] . "\n";
$body .= "Space has fallen below " . round($warning_spool_disk_space) . "GB\n";
$body .= "Space remaining: " . round($free_spool_disk_space) . "GB\n\n";
$body .= "Spooling will pause when space below " . $min_spool_disk_space . "GB\n";
$timer_type = "nearing_low_spool_disk_space";
}
if ($OVERRIDES['send_admin_debug_messages'] === true) {
$date_window = 86400;
$send_email_timer_file = $spooldir . '/email_send_timer.dat';
if (file_exists($send_email_timer_file)) {
$send_email_timer = unserialize(file_get_contents($send_email_timer_file));
} else {
$send_email_timer = array();
}
if (! isset($send_email_timer[$timer_type])) {
$send_email_timer[$timer_type] = 0;
}
if ($send_email_timer[$timer_type] < (time() - $date_window)) {
if ($send_email_timer[$timer_type] != 0) {
$send_email_timer[$timer_type] = 0;
} else {
$send_email_timer[$timer_type] = time();
}
send_internet_email($subject, $body);
}
file_put_contents($send_email_timer_file, serialize($send_email_timer));
}
}
}
function expire_files()
{
global $spooldir, $logdir, $uinfo;
$now = time();
// Days to prune
$nocemdays = 7;
// Days to seconds from now
$nocem = $now - ($nocemdays * 86400);
// Dirs to prune
$nocem_processed = $spooldir . "/nocem/processed/";
$nocem_failed = $spooldir . "/nocem/failed/";
if (! is_dir($nocem_processed)) {
@mkdir($nocem_processed, 0755, 'recursive');
@chown($nocem_processed, $uinfo["uid"]);
@chgrp($nocem_processed, $uinfo["gid"]);
}
if (! is_dir($nocem_failed)) {
@mkdir($nocem_failed, 0755, 'recursive');
@chown($nocem_failed, $uinfo["uid"]);
@chgrp($nocem_failed, $uinfo["gid"]);
}
// $nocem_processed
$filenames = array_diff(scandir($nocem_processed), array(
'..',
'.'
));
foreach ($filenames as $one) {
if (filemtime($nocem_processed . $one) < $nocem) {
unlink($nocem_processed . $one);
}
}
// $nocem_failed
$filenames = array_diff(scandir($nocem_failed), array(
'..',
'.'
));
foreach ($filenames as $one) {
if (filemtime($nocem_failed . $one) < $nocem) {
unlink($nocem_failed . $one);
}
}
}
function log_rotate()
{
global $logdir;
$rotate = filemtime($logdir . '/rotate');
if ((time() - $rotate) > 86400) {
$log_files = scandir($logdir);
foreach ($log_files as $logfile) {
if (substr($logfile, -4) != '.log') {
continue;
}
$logfile = $logdir . '/' . $logfile;
@unlink($logfile . '.5');
@rename($logfile . '.4', $logfile . '.5');
@rename($logfile . '.3', $logfile . '.4');
@rename($logfile . '.2', $logfile . '.3');
@rename($logfile . '.1', $logfile . '.2');
file_put_contents($logfile, "\nLog file rotated", FILE_APPEND);
@rename($logfile, $logfile . '.1');
echo 'Rotated: ' . $logfile . "\n";
}
unlink($logdir . '/rotate');
touch($logdir . '/rotate');
}
}
function rotate_keys()
{
global $spooldir;
$keyfile = $spooldir . '/keys.dat';
$newkeys = array();
if (filemtime($keyfile) + 14400 > time()) {
return;
} else {
$new = true;
if (is_file($keyfile)) {
$keys = unserialize(file_get_contents($keyfile));
$new = false;
}
if ($new !== true) {
$newkeys[0] = base64_encode(openssl_random_pseudo_bytes(44));
$newkeys[1] = $keys[0];
} else {
$newkeys[0] = base64_encode(openssl_random_pseudo_bytes(44));
$newkeys[1] = base64_encode(openssl_random_pseudo_bytes(44));
}
}
file_put_contents($keyfile, serialize($newkeys));
touch($keyfile);
}