* @license GNU Affero General Public License http://www.gnu.org/licenses/
*/
+$_startTime = microtime(true);
+$_perfCounters = array();
+
+// We provide all our dependencies through our own autoload.
+// This will probably be configurable for distributing with
+// system packages (like with Debian apt etc. where included
+// libraries are maintained through repositories)
+set_include_path('.'); // mainly fixes an issue where /usr/share/{pear,php*}/DB/DataObject.php is _old_ on various systems...
+
define('INSTALLDIR', dirname(__FILE__));
-define('STATUSNET', true);
-define('LACONICA', true); // compatibility
+define('GNUSOCIAL', true);
+define('STATUSNET', true); // compatibility
$user = null;
$action = null;
function getPath($req)
{
+ $p = null;
+
if ((common_config('site', 'fancy') || !array_key_exists('PATH_INFO', $_SERVER))
&& array_key_exists('p', $req)
) {
- return $req['p'];
+ $p = $req['p'];
} else if (array_key_exists('PATH_INFO', $_SERVER)) {
$path = $_SERVER['PATH_INFO'];
$script = $_SERVER['SCRIPT_NAME'];
if (substr($path, 0, mb_strlen($script)) == $script) {
- return substr($path, mb_strlen($script));
+ $p = substr($path, mb_strlen($script) + 1);
} else {
- return $path;
+ $p = $path;
}
} else {
- return null;
+ $p = null;
}
+
+ // Trim all initial '/'
+
+ $p = ltrim($p, '/');
+
+ return $p;
}
/**
return;
}
- $logmsg = "PEAR error: " . $error->getMessage();
+ $logmsg = "Exception thrown: " . _ve($error->getMessage());
if ($error instanceof PEAR_Exception && common_config('site', 'logdebug')) {
- $logmsg .= " : ". $error->toText();
+ $logmsg .= " PEAR: ". $error->toText();
}
// DB queries often end up with a lot of newlines; merge to a single line
// for easier grepability...
$_cur = null;
$msg = sprintf(
- _(
- 'The database for %s isn\'t responding correctly, '.
- 'so the site won\'t work properly. '.
- 'The site admins probably know about the problem, '.
- 'but you can contact them at %s to make sure. '.
- 'Otherwise, wait a few minutes and try again.'
+ // TRANS: Database error message.
+ _('The database for %1$s is not responding correctly, '.
+ 'so the site will not work properly. '.
+ 'The site admins probably know about the problem, '.
+ 'but you can contact them at %2$s to make sure. '.
+ 'Otherwise, wait a few minutes and try again.'
),
common_config('site', 'name'),
common_config('site', 'email')
);
+
+ $erraction = new DBErrorAction($msg, 500);
+ } elseif ($error instanceof ClientException) {
+ $erraction = new ClientErrorAction($error->getMessage(), $error->getCode());
+ } elseif ($error instanceof ServerException) {
+ $erraction = new ServerErrorAction($error->getMessage(), $error->getCode(), $error);
} else {
- $msg = _(
- 'An important error occured, probably related to email setup. '.
- 'Check logfiles for more info..'
- );
+ // If it wasn't specified more closely which kind of exception it was
+ $erraction = new ServerErrorAction($error->getMessage(), 500, $error);
}
-
- $dac = new DBErrorAction($msg, 500);
- $dac->showPage();
+ $erraction->showPage();
} catch (Exception $e) {
+ // TRANS: Error message.
echo _('An error occurred.');
+ exit(-1);
}
exit(-1);
}
set_exception_handler('handleError');
+// quick check for fancy URL auto-detection support in installer.
+if (preg_replace("/\?.+$/", "", $_SERVER['REQUEST_URI']) === preg_replace("/^\/$/", "", (dirname($_SERVER['REQUEST_URI']))) . '/check-fancy') {
+ die("Fancy URL support detection succeeded. We suggest you enable this to get fancy (pretty) URLs.");
+}
+
require_once INSTALLDIR . '/lib/common.php';
/**
static $alwaysRW = array('session', 'remember_me');
- // We ensure that these tables always are used
- // on the master DB
+ $rwdb = $config['db']['database'];
- $config['db']['database_rw'] = $config['db']['database'];
- $config['db']['ini_rw'] = INSTALLDIR.'/classes/statusnet.ini';
+ if (Event::handle('StartReadWriteTables', array(&$alwaysRW, &$rwdb))) {
- foreach ($alwaysRW as $table) {
- $config['db']['table_'.$table] = 'rw';
- }
-}
+ // We ensure that these tables always are used
+ // on the master DB
-function checkMirror($action_obj, $args)
-{
- global $config;
+ $config['db']['database_rw'] = $rwdb;
+ $config['db']['ini_rw'] = INSTALLDIR.'/classes/statusnet.ini';
- if (common_config('db', 'mirror') && $action_obj->isReadOnly($args)) {
- if (is_array(common_config('db', 'mirror'))) {
- // "load balancing", ha ha
- $arr = common_config('db', 'mirror');
- $k = array_rand($arr);
- $mirror = $arr[$k];
- } else {
- $mirror = common_config('db', 'mirror');
+ foreach ($alwaysRW as $table) {
+ $config['db']['table_'.$table] = 'rw';
}
- // everyone else uses the mirror
-
- $config['db']['database'] = $mirror;
+ Event::handle('EndReadWriteTables', array($alwaysRW, $rwdb));
}
+
+ return;
}
function isLoginAction($action)
{
- static $loginActions = array('login', 'recoverpassword', 'api', 'doc', 'register', 'publicxrds', 'otp', 'opensearch', 'rsd', 'hostmeta');
+ static $loginActions = array('login', 'recoverpassword', 'api', 'doc', 'register', 'publicxrds', 'otp', 'opensearch', 'rsd');
$login = null;
function main()
{
- // fake HTTP redirects using lighttpd's 404 redirects
- if (strpos($_SERVER['SERVER_SOFTWARE'], 'lighttpd') !== false) {
- $_lighty_url = $_SERVER['REQUEST_URI'];
- $_lighty_url = @parse_url($_lighty_url);
-
- if ($_lighty_url['path'] != '/index.php' && $_lighty_url['path'] != '/') {
- $_lighty_path = preg_replace('/^'.preg_quote(common_config('site', 'path')).'\//', '', substr($_lighty_url['path'], 1));
- $_SERVER['QUERY_STRING'] = 'p='.$_lighty_path;
- if (isset($_lighty_url['query']) && $_lighty_url['query'] != '') {
- $_SERVER['QUERY_STRING'] .= '&'.$_lighty_url['query'];
- parse_str($_lighty_url['query'], $_lighty_query);
- foreach ($_lighty_query as $key => $val) {
- $_GET[$key] = $_REQUEST[$key] = $val;
- }
- }
- $_GET['p'] = $_REQUEST['p'] = $_lighty_path;
- }
- }
- $_SERVER['REDIRECT_URL'] = preg_replace("/\?.+$/", "", $_SERVER['REQUEST_URI']);
-
- // quick check for fancy URL auto-detection support in installer.
- if (isset($_SERVER['REDIRECT_URL']) && (preg_replace("/^\/$/", "", (dirname($_SERVER['REQUEST_URI']))) . '/check-fancy') === $_SERVER['REDIRECT_URL']) {
- die("Fancy URL support detection succeeded. We suggest you enable this to get fancy (pretty) URLs.");
- }
global $user, $action;
- Snapshot::check();
-
if (!_have_config()) {
$msg = sprintf(
- _(
- "No configuration file found. Try running ".
- "the installation program first."
+ // TRANS: Error message displayed when there is no StatusNet configuration file.
+ _("No configuration file found. Try running ".
+ "the installation program first."
)
);
$sac = new ServerErrorAction($msg);
$args = $r->map($path);
- if (!$args) {
- $cac = new ClientErrorAction(_('Unknown page'), 404);
- $cac->showPage();
- return;
- }
-
- $site_ssl = common_config('site', 'ssl');
-
// If the request is HTTP and it should be HTTPS...
- if ($site_ssl != 'never' && !StatusNet::isHTTPS() && common_is_sensitive($args['action'])) {
+ if (GNUsocial::useHTTPS() && !GNUsocial::isHTTPS()) {
common_redirect(common_local_url($args['action'], $args));
- return;
}
$args = array_merge($args, $_REQUEST);
Event::handle('ArgsInitialize', array(&$args));
- $action = $args['action'];
+ $action = basename($args['action']);
if (!$action || !preg_match('/^[a-zA-Z0-9_-]*$/', $action)) {
common_redirect(common_local_url('public'));
- return;
}
// If the site is private, and they're not on one of the "public"
common_set_returnto(common_local_url($action, $rargs));
common_redirect(common_local_url('login'));
- return;
}
$action_class = ucfirst($action).'Action';
if (!class_exists($action_class)) {
- $cac = new ClientErrorAction(_('Unknown action'), 404);
- $cac->showPage();
- } else {
- $action_obj = new $action_class();
-
- checkMirror($action_obj, $args);
-
- try {
- if ($action_obj->prepare($args)) {
- $action_obj->handle($args);
- }
- } catch (ClientException $cex) {
- $cac = new ClientErrorAction($cex->getMessage(), $cex->getCode());
- $cac->showPage();
- } catch (ServerException $sex) { // snort snort guffaw
- $sac = new ServerErrorAction($sex->getMessage(), $sex->getCode(), $sex);
- $sac->showPage();
- } catch (Exception $ex) {
- $sac = new ServerErrorAction($ex->getMessage(), 500, $ex);
- $sac->showPage();
- }
+ // TRANS: Error message displayed when trying to perform an undefined action.
+ throw new ClientException(_('Unknown action'), 404);
}
+
+ call_user_func("$action_class::run", $args);
}
main();