Chris@76: <?php
Chris@76: 
Chris@76: /**
Chris@76:  * Simple Machines Forum (SMF)
Chris@76:  *
Chris@76:  * @package SMF
Chris@76:  * @author Simple Machines http://www.simplemachines.org
Chris@76:  * @copyright 2011 Simple Machines
Chris@76:  * @license http://www.simplemachines.org/about/smf/license.php BSD
Chris@76:  *
Chris@76:  * @version 2.0
Chris@76:  */
Chris@76: 
Chris@76: if (!defined('SMF'))
Chris@76: 	die('Hacking attempt...');
Chris@76: 
Chris@76: /*	This file contains functions that are specifically done by administrators.
Chris@76: 	The most important function in this file for mod makers happens to be the
Chris@76: 	updateSettingsFile() function, but it shouldn't be used often anyway.
Chris@76: 
Chris@76: 	void getServerVersions(array checkFor)
Chris@76: 		- get a list of versions that are currently installed on the server.
Chris@76: 
Chris@76: 	void getFileVersions(array versionOptions)
Chris@76: 		- get detailed version information about the physical SMF files on the
Chris@76: 		  server.
Chris@76: 		- the input parameter allows to set whether to include SSI.php and
Chris@76: 		  whether the results should be sorted.
Chris@76: 		- returns an array containing information on source files, templates
Chris@76: 		  and language files found in the default theme directory (grouped by
Chris@76: 		  language).
Chris@76: 
Chris@76: 	void updateSettingsFile(array config_vars)
Chris@76: 		- updates the Settings.php file with the changes in config_vars.
Chris@76: 		- expects config_vars to be an associative array, with the keys as the
Chris@76: 		  variable names in Settings.php, and the values the varaible values.
Chris@76: 		- does not escape or quote values.
Chris@76: 		- preserves case, formatting, and additional options in file.
Chris@76: 		- writes nothing if the resulting file would be less than 10 lines
Chris@76: 		  in length (sanity check for read lock.)
Chris@76: 
Chris@76: 	void updateAdminPreferences()
Chris@76: 		- saves the admins current preferences to the database.
Chris@76: 
Chris@76: 	void emailAdmins(string $template, array $replacements = array(), additional_recipients = array())
Chris@76: 		- loads all users who are admins or have the admin forum permission.
Chris@76: 		- uses the email template and replacements passed in the parameters.
Chris@76: 		- sends them an email.
Chris@76: 
Chris@76: 	bool updateLastDatabaseError()
Chris@76: 		- attempts to use the backup file first, to store the last database error
Chris@76: 		- and only update Settings.php if the first was successful.
Chris@76: 
Chris@76: */
Chris@76: 
Chris@76: function getServerVersions($checkFor)
Chris@76: {
Chris@76: 	global $txt, $db_connection, $_PHPA, $smcFunc, $memcached, $modSettings;
Chris@76: 
Chris@76: 	loadLanguage('Admin');
Chris@76: 
Chris@76: 	$versions = array();
Chris@76: 
Chris@76: 	// Is GD available?  If it is, we should show version information for it too.
Chris@76: 	if (in_array('gd', $checkFor) && function_exists('gd_info'))
Chris@76: 	{
Chris@76: 		$temp = gd_info();
Chris@76: 		$versions['gd'] = array('title' => $txt['support_versions_gd'], 'version' => $temp['GD Version']);
Chris@76: 	}
Chris@76: 
Chris@76: 	// Now lets check for the Database.
Chris@76: 	if (in_array('db_server', $checkFor))
Chris@76: 	{
Chris@76: 		db_extend();
Chris@76: 		if (!isset($db_connection) || $db_connection === false)
Chris@76: 			trigger_error('getServerVersions(): you need to be connected to the database in order to get its server version', E_USER_NOTICE);
Chris@76: 		else
Chris@76: 		{
Chris@76: 			$versions['db_server'] = array('title' => sprintf($txt['support_versions_db'], $smcFunc['db_title']), 'version' => '');
Chris@76: 			$versions['db_server']['version'] = $smcFunc['db_get_version']();
Chris@76: 		}
Chris@76: 	}
Chris@76: 
Chris@76: 	// If we're using memcache we need the server info.
Chris@76: 	if (empty($memcached) && function_exists('memcache_get') && isset($modSettings['cache_memcached']) && trim($modSettings['cache_memcached']) != '')
Chris@76: 		get_memcached_server();
Chris@76: 
Chris@76: 	// Check to see if we have any accelerators installed...
Chris@76: 	if (in_array('mmcache', $checkFor) && defined('MMCACHE_VERSION'))
Chris@76: 		$versions['mmcache'] = array('title' => 'Turck MMCache', 'version' => MMCACHE_VERSION);
Chris@76: 	if (in_array('eaccelerator', $checkFor) && defined('EACCELERATOR_VERSION'))
Chris@76: 		$versions['eaccelerator'] = array('title' => 'eAccelerator', 'version' => EACCELERATOR_VERSION);
Chris@76: 	if (in_array('phpa', $checkFor) && isset($_PHPA))
Chris@76: 		$versions['phpa'] = array('title' => 'ionCube PHP-Accelerator', 'version' => $_PHPA['VERSION']);
Chris@76: 	if (in_array('apc', $checkFor) && extension_loaded('apc'))
Chris@76: 		$versions['apc'] = array('title' => 'Alternative PHP Cache', 'version' => phpversion('apc'));
Chris@76: 	if (in_array('memcache', $checkFor) && function_exists('memcache_set'))
Chris@76: 		$versions['memcache'] = array('title' => 'Memcached', 'version' => empty($memcached) ? '???' : memcache_get_version($memcached));
Chris@76: 	if (in_array('xcache', $checkFor) && function_exists('xcache_set'))
Chris@76: 		$versions['xcache'] = array('title' => 'XCache', 'version' => XCACHE_VERSION);
Chris@76: 	if (in_array('php', $checkFor))
Chris@76: 		$versions['php'] = array('title' => 'PHP', 'version' => PHP_VERSION);
Chris@76: 
Chris@76: 	if (in_array('server', $checkFor))
Chris@76: 		$versions['server'] = array('title' => $txt['support_versions_server'], 'version' => $_SERVER['SERVER_SOFTWARE']);
Chris@76: 
Chris@76: 	return $versions;
Chris@76: }
Chris@76: 
Chris@76: // Search through source, theme and language files to determine their version.
Chris@76: function getFileVersions(&$versionOptions)
Chris@76: {
Chris@76: 	global $boarddir, $sourcedir, $settings;
Chris@76: 
Chris@76: 	// Default place to find the languages would be the default theme dir.
Chris@76: 	$lang_dir = $settings['default_theme_dir'] . '/languages';
Chris@76: 
Chris@76: 	$version_info = array(
Chris@76: 		'file_versions' => array(),
Chris@76: 		'default_template_versions' => array(),
Chris@76: 		'template_versions' => array(),
Chris@76: 		'default_language_versions' => array(),
Chris@76: 	);
Chris@76: 
Chris@76: 	// Find the version in SSI.php's file header.
Chris@76: 	if (!empty($versionOptions['include_ssi']) && file_exists($boarddir . '/SSI.php'))
Chris@76: 	{
Chris@76: 		$fp = fopen($boarddir . '/SSI.php', 'rb');
Chris@76: 		$header = fread($fp, 4096);
Chris@76: 		fclose($fp);
Chris@76: 
Chris@76: 		// The comment looks rougly like... that.
Chris@76: 		if (preg_match('~\*\s@version\s+(.+)[\s]{2}~i', $header, $match) == 1)
Chris@76: 			$version_info['file_versions']['SSI.php'] = $match[1];
Chris@76: 		// Not found!  This is bad.
Chris@76: 		else
Chris@76: 			$version_info['file_versions']['SSI.php'] = '??';
Chris@76: 	}
Chris@76: 
Chris@76: 	// Do the paid subscriptions handler?
Chris@76: 	if (!empty($versionOptions['include_subscriptions']) && file_exists($boarddir . '/subscriptions.php'))
Chris@76: 	{
Chris@76: 		$fp = fopen($boarddir . '/subscriptions.php', 'rb');
Chris@76: 		$header = fread($fp, 4096);
Chris@76: 		fclose($fp);
Chris@76: 
Chris@76: 		// Found it?
Chris@76: 		if (preg_match('~\*\s@version\s+(.+)[\s]{2}~i', $header, $match) == 1)
Chris@76: 			$version_info['file_versions']['subscriptions.php'] = $match[1];
Chris@76: 		// If we haven't how do we all get paid?
Chris@76: 		else
Chris@76: 			$version_info['file_versions']['subscriptions.php'] = '??';
Chris@76: 	}
Chris@76: 
Chris@76: 	// Load all the files in the Sources directory, except this file and the redirect.
Chris@76: 	$sources_dir = dir($sourcedir);
Chris@76: 	while ($entry = $sources_dir->read())
Chris@76: 	{
Chris@76: 		if (substr($entry, -4) === '.php' && !is_dir($sourcedir . '/' . $entry) && $entry !== 'index.php')
Chris@76: 		{
Chris@76: 			// Read the first 4k from the file.... enough for the header.
Chris@76: 			$fp = fopen($sourcedir . '/' . $entry, 'rb');
Chris@76: 			$header = fread($fp, 4096);
Chris@76: 			fclose($fp);
Chris@76: 
Chris@76: 			// Look for the version comment in the file header.
Chris@76: 			if (preg_match('~\*\s@version\s+(.+)[\s]{2}~i', $header, $match) == 1)
Chris@76: 				$version_info['file_versions'][$entry] = $match[1];
Chris@76: 			// It wasn't found, but the file was... show a '??'.
Chris@76: 			else
Chris@76: 				$version_info['file_versions'][$entry] = '??';
Chris@76: 		}
Chris@76: 	}
Chris@76: 	$sources_dir->close();
Chris@76: 
Chris@76: 	// Load all the files in the default template directory - and the current theme if applicable.
Chris@76: 	$directories = array('default_template_versions' => $settings['default_theme_dir']);
Chris@76: 	if ($settings['theme_id'] != 1)
Chris@76: 		$directories += array('template_versions' => $settings['theme_dir']);
Chris@76: 
Chris@76: 	foreach ($directories as $type => $dirname)
Chris@76: 	{
Chris@76: 		$this_dir = dir($dirname);
Chris@76: 		while ($entry = $this_dir->read())
Chris@76: 		{
Chris@76: 			if (substr($entry, -12) == 'template.php' && !is_dir($dirname . '/' . $entry))
Chris@76: 			{
Chris@76: 				// Read the first 768 bytes from the file.... enough for the header.
Chris@76: 				$fp = fopen($dirname . '/' . $entry, 'rb');
Chris@76: 				$header = fread($fp, 768);
Chris@76: 				fclose($fp);
Chris@76: 
Chris@76: 				// Look for the version comment in the file header.
Chris@76: 				if (preg_match('~\*\s@version\s+(.+)[\s]{2}~i', $header, $match) == 1)
Chris@76: 					$version_info[$type][$entry] = $match[1];
Chris@76: 				// It wasn't found, but the file was... show a '??'.
Chris@76: 				else
Chris@76: 					$version_info[$type][$entry] = '??';
Chris@76: 			}
Chris@76: 		}
Chris@76: 		$this_dir->close();
Chris@76: 	}
Chris@76: 
Chris@76: 	// Load up all the files in the default language directory and sort by language.
Chris@76: 	$this_dir = dir($lang_dir);
Chris@76: 	while ($entry = $this_dir->read())
Chris@76: 	{
Chris@76: 		if (substr($entry, -4) == '.php' && $entry != 'index.php' && !is_dir($lang_dir . '/' . $entry))
Chris@76: 		{
Chris@76: 			// Read the first 768 bytes from the file.... enough for the header.
Chris@76: 			$fp = fopen($lang_dir . '/' . $entry, 'rb');
Chris@76: 			$header = fread($fp, 768);
Chris@76: 			fclose($fp);
Chris@76: 
Chris@76: 			// Split the file name off into useful bits.
Chris@76: 			list ($name, $language) = explode('.', $entry);
Chris@76: 
Chris@76: 			// Look for the version comment in the file header.
Chris@76: 			if (preg_match('~(?://|/\*)\s*Version:\s+(.+?);\s*' . preg_quote($name, '~') . '(?:[\s]{2}|\*/)~i', $header, $match) == 1)
Chris@76: 				$version_info['default_language_versions'][$language][$name] = $match[1];
Chris@76: 			// It wasn't found, but the file was... show a '??'.
Chris@76: 			else
Chris@76: 				$version_info['default_language_versions'][$language][$name] = '??';
Chris@76: 		}
Chris@76: 	}
Chris@76: 	$this_dir->close();
Chris@76: 
Chris@76: 	// Sort the file versions by filename.
Chris@76: 	if (!empty($versionOptions['sort_results']))
Chris@76: 	{
Chris@76: 		ksort($version_info['file_versions']);
Chris@76: 		ksort($version_info['default_template_versions']);
Chris@76: 		ksort($version_info['template_versions']);
Chris@76: 		ksort($version_info['default_language_versions']);
Chris@76: 
Chris@76: 		// For languages sort each language too.
Chris@76: 		foreach ($version_info['default_language_versions'] as $language => $dummy)
Chris@76: 			ksort($version_info['default_language_versions'][$language]);
Chris@76: 	}
Chris@76: 	return $version_info;
Chris@76: }
Chris@76: 
Chris@76: // Update the Settings.php file.
Chris@76: function updateSettingsFile($config_vars)
Chris@76: {
Chris@76: 	global $boarddir, $cachedir;
Chris@76: 
Chris@76: 	// When is Settings.php last changed?
Chris@76: 	$last_settings_change = filemtime($boarddir . '/Settings.php');
Chris@76: 
Chris@76: 	// Load the file.  Break it up based on \r or \n, and then clean out extra characters.
Chris@76: 	$settingsArray = trim(file_get_contents($boarddir . '/Settings.php'));
Chris@76: 	if (strpos($settingsArray, "\n") !== false)
Chris@76: 		$settingsArray = explode("\n", $settingsArray);
Chris@76: 	elseif (strpos($settingsArray, "\r") !== false)
Chris@76: 		$settingsArray = explode("\r", $settingsArray);
Chris@76: 	else
Chris@76: 		return;
Chris@76: 
Chris@76: 	// Make sure we got a good file.
Chris@76: 	if (count($config_vars) == 1 && isset($config_vars['db_last_error']))
Chris@76: 	{
Chris@76: 		$temp = trim(implode("\n", $settingsArray));
Chris@76: 		if (substr($temp, 0, 5) != '<?php' || substr($temp, -2) != '?' . '>')
Chris@76: 			return;
Chris@76: 		if (strpos($temp, 'sourcedir') === false || strpos($temp, 'boarddir') === false || strpos($temp, 'cookiename') === false)
Chris@76: 			return;
Chris@76: 	}
Chris@76: 
Chris@76: 	// Presumably, the file has to have stuff in it for this function to be called :P.
Chris@76: 	if (count($settingsArray) < 10)
Chris@76: 		return;
Chris@76: 
Chris@76: 	foreach ($settingsArray as $k => $dummy)
Chris@76: 		$settingsArray[$k] = strtr($dummy, array("\r" => '')) . "\n";
Chris@76: 
Chris@76: 	for ($i = 0, $n = count($settingsArray); $i < $n; $i++)
Chris@76: 	{
Chris@76: 		// Don't trim or bother with it if it's not a variable.
Chris@76: 		if (substr($settingsArray[$i], 0, 1) != '$')
Chris@76: 			continue;
Chris@76: 
Chris@76: 		$settingsArray[$i] = trim($settingsArray[$i]) . "\n";
Chris@76: 
Chris@76: 		// Look through the variables to set....
Chris@76: 		foreach ($config_vars as $var => $val)
Chris@76: 		{
Chris@76: 			if (strncasecmp($settingsArray[$i], '$' . $var, 1 + strlen($var)) == 0)
Chris@76: 			{
Chris@76: 				$comment = strstr(substr($settingsArray[$i], strpos($settingsArray[$i], ';')), '#');
Chris@76: 				$settingsArray[$i] = '$' . $var . ' = ' . $val . ';' . ($comment == '' ? '' : "\t\t" . rtrim($comment)) . "\n";
Chris@76: 
Chris@76: 				// This one's been 'used', so to speak.
Chris@76: 				unset($config_vars[$var]);
Chris@76: 			}
Chris@76: 		}
Chris@76: 
Chris@76: 		if (substr(trim($settingsArray[$i]), 0, 2) == '?' . '>')
Chris@76: 			$end = $i;
Chris@76: 	}
Chris@76: 
Chris@76: 	// This should never happen, but apparently it is happening.
Chris@76: 	if (empty($end) || $end < 10)
Chris@76: 		$end = count($settingsArray) - 1;
Chris@76: 
Chris@76: 	// Still more?  Add them at the end.
Chris@76: 	if (!empty($config_vars))
Chris@76: 	{
Chris@76: 		if (trim($settingsArray[$end]) == '?' . '>')
Chris@76: 			$settingsArray[$end++] = '';
Chris@76: 		else
Chris@76: 			$end++;
Chris@76: 
Chris@76: 		foreach ($config_vars as $var => $val)
Chris@76: 			$settingsArray[$end++] = '$' . $var . ' = ' . $val . ';' . "\n";
Chris@76: 		$settingsArray[$end] = '?' . '>';
Chris@76: 	}
Chris@76: 	else
Chris@76: 		$settingsArray[$end] = trim($settingsArray[$end]);
Chris@76: 
Chris@76: 	// Sanity error checking: the file needs to be at least 12 lines.
Chris@76: 	if (count($settingsArray) < 12)
Chris@76: 		return;
Chris@76: 
Chris@76: 	// Try to avoid a few pitfalls:
Chris@76: 	// like a possible race condition,
Chris@76: 	// or a failure to write at low diskspace
Chris@76: 
Chris@76: 	// Check before you act: if cache is enabled, we can do a simple test
Chris@76: 	// Can we even write things on this filesystem?
Chris@76: 	if ((empty($cachedir) || !file_exists($cachedir)) && file_exists($boarddir . '/cache'))
Chris@76: 		$cachedir = $boarddir . '/cache';
Chris@76: 	$test_fp = @fopen($cachedir . '/settings_update.tmp', "w+");
Chris@76: 	if ($test_fp)
Chris@76: 	{
Chris@76: 		fclose($test_fp);
Chris@76: 
Chris@76: 		$test_fp = @fopen($cachedir . '/settings_update.tmp', 'r+');
Chris@76: 		$written_bytes = fwrite($test_fp, "test");
Chris@76: 		fclose($test_fp);
Chris@76: 		@unlink($cachedir . '/settings_update.tmp');
Chris@76: 
Chris@76: 		if ($written_bytes !== strlen("test"))
Chris@76: 		{
Chris@76: 			// Oops. Low disk space, perhaps. Don't mess with Settings.php then.
Chris@76: 			// No means no. :P
Chris@76: 			return;
Chris@76: 		}
Chris@76: 	}
Chris@76: 
Chris@76: 	// Protect me from what I want! :P
Chris@76: 	clearstatcache();
Chris@76: 	if (filemtime($boarddir . '/Settings.php') === $last_settings_change)
Chris@76: 	{
Chris@76: 		// You asked for it...
Chris@76: 		// Blank out the file - done to fix a oddity with some servers.
Chris@76: 		$fp = @fopen($boarddir . '/Settings.php', 'w');
Chris@76: 
Chris@76: 		// Is it even writable, though?
Chris@76: 		if ($fp)
Chris@76: 		{
Chris@76: 			fclose($fp);
Chris@76: 
Chris@76: 			$fp = fopen($boarddir . '/Settings.php', 'r+');
Chris@76: 			foreach ($settingsArray as $line)
Chris@76: 				fwrite($fp, strtr($line, "\r", ''));
Chris@76: 			fclose($fp);
Chris@76: 		}
Chris@76: 	}
Chris@76: }
Chris@76: 
Chris@76: function updateAdminPreferences()
Chris@76: {
Chris@76: 	global $options, $context, $smcFunc, $settings, $user_info;
Chris@76: 
Chris@76: 	// This must exist!
Chris@76: 	if (!isset($context['admin_preferences']))
Chris@76: 		return false;
Chris@76: 
Chris@76: 	// This is what we'll be saving.
Chris@76: 	$options['admin_preferences'] = serialize($context['admin_preferences']);
Chris@76: 
Chris@76: 	// Just check we haven't ended up with something theme exclusive somehow.
Chris@76: 	$smcFunc['db_query']('', '
Chris@76: 		DELETE FROM {db_prefix}themes
Chris@76: 		WHERE id_theme != {int:default_theme}
Chris@76: 		AND variable = {string:admin_preferences}',
Chris@76: 		array(
Chris@76: 			'default_theme' => 1,
Chris@76: 			'admin_preferences' => 'admin_preferences',
Chris@76: 		)
Chris@76: 	);
Chris@76: 
Chris@76: 	// Update the themes table.
Chris@76: 	$smcFunc['db_insert']('replace',
Chris@76: 		'{db_prefix}themes',
Chris@76: 		array('id_member' => 'int', 'id_theme' => 'int', 'variable' => 'string-255', 'value' => 'string-65534'),
Chris@76: 		array($user_info['id'], 1, 'admin_preferences', $options['admin_preferences']),
Chris@76: 		array('id_member', 'id_theme', 'variable')
Chris@76: 	);
Chris@76: 
Chris@76: 	// Make sure we invalidate any cache.
Chris@76: 	cache_put_data('theme_settings-' . $settings['theme_id'] . ':' . $user_info['id'], null, 0);
Chris@76: }
Chris@76: 
Chris@76: // Send all the administrators a lovely email.
Chris@76: function emailAdmins($template, $replacements = array(), $additional_recipients = array())
Chris@76: {
Chris@76: 	global $smcFunc, $sourcedir, $language, $modSettings;
Chris@76: 
Chris@76: 	// We certainly want this.
Chris@76: 	require_once($sourcedir . '/Subs-Post.php');
Chris@76: 
Chris@76: 	// Load all groups which are effectively admins.
Chris@76: 	$request = $smcFunc['db_query']('', '
Chris@76: 		SELECT id_group
Chris@76: 		FROM {db_prefix}permissions
Chris@76: 		WHERE permission = {string:admin_forum}
Chris@76: 			AND add_deny = {int:add_deny}
Chris@76: 			AND id_group != {int:id_group}',
Chris@76: 		array(
Chris@76: 			'add_deny' => 1,
Chris@76: 			'id_group' => 0,
Chris@76: 			'admin_forum' => 'admin_forum',
Chris@76: 		)
Chris@76: 	);
Chris@76: 	$groups = array(1);
Chris@76: 	while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76: 		$groups[] = $row['id_group'];
Chris@76: 	$smcFunc['db_free_result']($request);
Chris@76: 
Chris@76: 	$request = $smcFunc['db_query']('', '
Chris@76: 		SELECT id_member, member_name, real_name, lngfile, email_address
Chris@76: 		FROM {db_prefix}members
Chris@76: 		WHERE (id_group IN ({array_int:group_list}) OR FIND_IN_SET({raw:group_array_implode}, additional_groups) != 0)
Chris@76: 			AND notify_types != {int:notify_types}
Chris@76: 		ORDER BY lngfile',
Chris@76: 		array(
Chris@76: 			'group_list' => $groups,
Chris@76: 			'notify_types' => 4,
Chris@76: 			'group_array_implode' => implode(', additional_groups) != 0 OR FIND_IN_SET(', $groups),
Chris@76: 		)
Chris@76: 	);
Chris@76: 	$emails_sent = array();
Chris@76: 	while ($row = $smcFunc['db_fetch_assoc']($request))
Chris@76: 	{
Chris@76: 		// Stick their particulars in the replacement data.
Chris@76: 		$replacements['IDMEMBER'] = $row['id_member'];
Chris@76: 		$replacements['REALNAME'] = $row['member_name'];
Chris@76: 		$replacements['USERNAME'] = $row['real_name'];
Chris@76: 
Chris@76: 		// Load the data from the template.
Chris@76: 		$emaildata = loadEmailTemplate($template, $replacements, empty($row['lngfile']) || empty($modSettings['userLanguage']) ? $language : $row['lngfile']);
Chris@76: 
Chris@76: 		// Then send the actual email.
Chris@76: 		sendmail($row['email_address'], $emaildata['subject'], $emaildata['body'], null, null, false, 1);
Chris@76: 
Chris@76: 		// Track who we emailed so we don't do it twice.
Chris@76: 		$emails_sent[] = $row['email_address'];
Chris@76: 	}
Chris@76: 	$smcFunc['db_free_result']($request);
Chris@76: 
Chris@76: 	// Any additional users we must email this to?
Chris@76: 	if (!empty($additional_recipients))
Chris@76: 		foreach ($additional_recipients as $recipient)
Chris@76: 		{
Chris@76: 			if (in_array($recipient['email'], $emails_sent))
Chris@76: 				continue;
Chris@76: 
Chris@76: 			$replacements['IDMEMBER'] = $recipient['id'];
Chris@76: 			$replacements['REALNAME'] = $recipient['name'];
Chris@76: 			$replacements['USERNAME'] = $recipient['name'];
Chris@76: 
Chris@76: 			// Load the template again.
Chris@76: 			$emaildata = loadEmailTemplate($template, $replacements, empty($recipient['lang']) || empty($modSettings['userLanguage']) ? $language : $recipient['lang']);
Chris@76: 
Chris@76: 			// Send off the email.
Chris@76: 			sendmail($recipient['email'], $emaildata['subject'], $emaildata['body'], null, null, false, 1);
Chris@76: 		}
Chris@76: }
Chris@76: 
Chris@76: function updateLastDatabaseError()
Chris@76: {
Chris@76: 	global $boarddir;
Chris@76: 
Chris@76: 	// Find out this way if we can even write things on this filesystem.
Chris@76: 	// In addition, store things first in the backup file
Chris@76: 
Chris@76: 	$last_settings_change = @filemtime($boarddir . '/Settings.php');
Chris@76: 
Chris@76: 	// Make sure the backup file is there...
Chris@76: 	$file = $boarddir . '/Settings_bak.php';
Chris@76: 	if ((!file_exists($file) || filesize($file) == 0) && !copy($boarddir . '/Settings.php', $file))
Chris@76: 			return false;
Chris@76: 
Chris@76: 	// ...and writable!
Chris@76: 	if (!is_writable($file))
Chris@76: 	{
Chris@76: 		chmod($file, 0755);
Chris@76: 		if (!is_writable($file))
Chris@76: 		{
Chris@76: 			chmod($file, 0775);
Chris@76: 			if (!is_writable($file))
Chris@76: 			{
Chris@76: 				chmod($file, 0777);
Chris@76: 				if (!is_writable($file))
Chris@76: 						return false;
Chris@76: 			}
Chris@76: 		}
Chris@76: 	}
Chris@76: 
Chris@76: 	// Put the new timestamp.
Chris@76: 	$data = file_get_contents($file);
Chris@76: 	$data = preg_replace('~\$db_last_error = \d+;~', '$db_last_error = ' . time() . ';', $data);
Chris@76: 
Chris@76: 	// Open the backup file for writing
Chris@76: 	if ($fp = @fopen($file, 'w'))
Chris@76: 	{
Chris@76: 		// Reset the file buffer.
Chris@76: 		set_file_buffer($fp, 0);
Chris@76: 
Chris@76: 		// Update the file.
Chris@76: 		$t = flock($fp, LOCK_EX);
Chris@76: 		$bytes = fwrite($fp, $data);
Chris@76: 		flock($fp, LOCK_UN);
Chris@76: 		fclose($fp);
Chris@76: 
Chris@76: 		// Was it a success?
Chris@76: 		// ...only relevant if we're still dealing with the same good ole' settings file.
Chris@76: 		clearstatcache();
Chris@76: 		if (($bytes == strlen($data)) && (filemtime($boarddir . '/Settings.php') === $last_settings_change))
Chris@76: 		{
Chris@76: 			// This is our new Settings file...
Chris@76: 			// At least this one is an atomic operation
Chris@76: 			@copy($file, $boarddir . '/Settings.php');
Chris@76: 			return true;
Chris@76: 		}
Chris@76: 		else
Chris@76: 		{
Chris@76: 			// Oops. Someone might have been faster
Chris@76: 			// or we have no more disk space left, troubles, troubles...
Chris@76: 			// Copy the file back and run for your life!
Chris@76: 			@copy($boarddir . '/Settings.php', $file);
Chris@76: 		}
Chris@76: 	}
Chris@76: 
Chris@76: 	return false;
Chris@76: }
Chris@76: 
Chris@76: ?>