<?php

/***************************************************
// Database table setup
//--------------------------------------------------

	CREATE TABLE prefix_report (
		id int(11) NOT NULL auto_increment,
		type tinytext NOT NULL,
		created datetime NOT NULL,
		message text NOT NULL,
		request tinytext NOT NULL,
		referer tinytext NOT NULL,
		ip tinytext NOT NULL,
		PRIMARY KEY  (id)
	)

//--------------------------------------------------
// End of database table setup
***************************************************/

//--------------------------------------------------
// Function to report to the admin

	function addReport($message, $type = 'notice') {

		//--------------------------------------------------
		// Collect variables

			if (isset($_SERVER['HTTP_X_FORWARDED_FOR'])) {
				$remote = 'XForward=[' . $_SERVER['HTTP_X_FORWARDED_FOR'] . ']';
			} else if (isset($_SERVER['REMOTE_ADDR'])) {
				$remote = $_SERVER['REMOTE_ADDR'];
			} else {
				$remote = 'N/A';
			}

			$domain  = (isset($_SERVER['HTTP_HOST'])    ? $_SERVER['HTTP_HOST']    : 'N/A');
			$request = (isset($_SERVER['REQUEST_URI'])  ? $_SERVER['REQUEST_URI']  : 'N/A');
			$referer = (isset($_SERVER['HTTP_REFERER']) ? $_SERVER['HTTP_REFERER'] : 'N/A');

			if ($request == 'N/A' && isset($_SERVER['SCRIPT_FILENAME'])) {
				$request = $_SERVER['SCRIPT_FILENAME'];
			}

			$website = (isset($_SERVER['HTTPS']) && $_SERVER['HTTPS'] == 'on' ? 'https://' : 'http://') . $domain;

		//--------------------------------------------------
		// Strip out the site address from the referer

			$referer = preg_replace('/^([a-z]+:\/\/)' . preg_quote($domain, '/') . '/', '', $referer);

		//--------------------------------------------------
		// Send an email to the admin, if necessary

			if (($type == 'error' || $type == 'notice') && isset($GLOBALS['emailError'])) {

				$emailSubject = 'System ' . ucfirst($type) . ': ' . $domain;

				if (isset($GLOBALS['emailFromName']) && isset($GLOBALS['emailFromAddress'])) {
					$emailHeaders = 'From: "' . $GLOBALS['emailFromName'] . '" <' . $GLOBALS['emailFromAddress'] .'>';
				} else {
					$emailHeaders = 'From: noreply@domain.com';
				}

				$emailBody  = 'Occurred: ' . date('l jS F Y, G:i:s') . "\n";
				$emailBody .= 'Website:  ' . $website . "\n";
				$emailBody .= 'Request:  ' . $request . "\n";
				$emailBody .= 'Referer:  ' . $referer . "\n";
				$emailBody .= 'Remote:   ' . $remote . "\n";
				$emailBody .= 'Message:- ' . "\n\n";
				$emailBody .= preg_replace('/^/m', '  ', $message) . "\n";

				if (!is_array($GLOBALS['emailError'])) {
					$GLOBALS['emailError'] = array($GLOBALS['emailError']);
				}

				foreach ($GLOBALS['emailError'] as $emailAddress) {
					mail($emailAddress, $emailSubject, $emailBody, $emailHeaders);
				}

			}

		//--------------------------------------------------
		// Add report to the database

			if (is_file(ROOT . '/a/php/database.php') && isset($GLOBALS['db'])) {

				$db = $GLOBALS['db'];

				$db->query('INSERT INTO ' . DB_PREFIX . 'report (
								id,
								type,
								created,
								message,
								request,
								referer,
								ip
							) VALUES (
								"",
								"' . $db->escape($type) . '",
								"' . $db->escape(date('Y-m-d H:i:s')) . '",
								"' . $db->escape($message) . '",
								"' . $db->escape($request) . '",
								"' . $db->escape($referer) . '",
								"' . $db->escape($remote) . '"
							)');

			}

	}

//--------------------------------------------------
// Function to call when a serious error occurs

	function exit_with_error($message, $hiddenInfo = NULL, $type = 'error') {

		//--------------------------------------------------
		// Report the error

			$errorReport = $message;

			if ($hiddenInfo !== NULL) {
				$errorReport .= "\n\n--------------------------------------------------\n\n";
				$errorReport .= $hiddenInfo;
			}

			addReport($errorReport, $type);

		//--------------------------------------------------
		// Return the primary contacts email address.

			if (isset($GLOBALS['emailError'])) {
				if (is_array($GLOBALS['emailError'])) {
					$contactEmail = reset($GLOBALS['emailError']);
				} else {
					$contactEmail = $GLOBALS['emailError'];
				}
			} else {
				$contactEmail = '';
			}

		//--------------------------------------------------
		// Override the pageId... don't want page specific
		// styles playing havoc!

			$GLOBALS['tplPageId'] = 'pError';

		//--------------------------------------------------
		// Tell the user

			if (php_sapi_name() == 'cli') {

				echo "\n" . '--------------------------------------------------' . "\n\n";
				echo 'Error:' . "\n\n";
				echo $message . "\n\n";

				if ($hiddenInfo !== NULL && $contactEmail == '') {
					echo $hiddenInfo . "\n\n";
				}

				echo '--------------------------------------------------' . "\n\n";

			} else {

				if (!headers_sent()) {

					header('HTTP/1.0 500 Internal Server Error');
					setMimeType('text/html');

				}

				if (is_file(ROOT . '/a/inc/global/pageTop.php')) {

					require_once(ROOT . '/a/inc/global/pageTop.php');

				} else if (is_file(ROOT . '/a/inc/pageTop.php')) {

					require_once(ROOT . '/a/inc/pageTop.php');

				}

				echo '
					<h2>Error</h2>
					<p>' . nl2br(html($message)) . '</p>
					<p>Sorry, this should not have happened, and is not your fault. The admin has been informed, and will try to fix the problem soon' . ($contactEmail == '' ? '.' : ', but please can you help by sending an email to <a href="mailto:' . html($contactEmail) . '">' . html($contactEmail) . '</a> with details of what you were doing at the time.') . '</p>';

				if ($hiddenInfo !== NULL && $contactEmail == '') {
					echo '
						<hr />
						<p>' . nl2br(html($hiddenInfo)) . '</p>';
				}

				if (is_file(ROOT . '/a/inc/global/pageBottom.php')) {

					require_once(ROOT . '/a/inc/global/pageBottom.php');

				} else if (is_file(ROOT . '/a/inc/pageBottom.php')) {

					require_once(ROOT . '/a/inc/pageBottom.php');

				}

			}

		//--------------------------------------------------
		// Exit script execution

			exit();

	}

?>