c74aea589d
- Multiplexing queues into groups and for multiple sites. - Sharing vs breakout configurable per site and per queue via $config['queue']['breakout'] - Detect how many times a message is redelivered, discard if it's killed too many daemons - count configurable with $config['queue']['max_retries'] - can dump the items to files in $config['queue']['dead_letter_dir'] Queue daemon memory & resource leak fixes: - avoid unnecessary reconnections to memcached server (switch persistent connections back in on second initialization, assuming it's child process) - monkey-patch for leaky .ini loads in DB_DataObject::databaseStructure() - was leaking 200k per active switch - applied leak fixes to Status_network as well, using intermediate base Safe_DataObject for both it and Memcache_DataObject Misc queue fixes: - correct handling of child processes exiting due to signal termination instead of regular exit - shutdown instead of infinite respawn loop if we're already past the soft memory limit at startup - Added --all option for xmppdaemon... still opens one xmpp connection per site that has xmpp active Cache updates: - add Cache::increment() method with native support for memcached atomic increment
284 lines
9.0 KiB
PHP
284 lines
9.0 KiB
PHP
<?php
|
|
/**
|
|
* Table Definition for status_network
|
|
*
|
|
* StatusNet - the distributed open-source microblogging tool
|
|
* Copyright (C) 2009, StatusNet, Inc.
|
|
*
|
|
* This program is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Affero General Public License as published by
|
|
* the Free Software Foundation, either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU Affero General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Affero General Public License
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
if (!defined('STATUSNET') && !defined('LACONICA')) { exit(1); }
|
|
|
|
class Status_network extends Safe_DataObject
|
|
{
|
|
###START_AUTOCODE
|
|
/* the code below is auto generated do not remove the above tag */
|
|
|
|
public $__table = 'status_network'; // table name
|
|
public $nickname; // varchar(64) primary_key not_null
|
|
public $hostname; // varchar(255) unique_key
|
|
public $pathname; // varchar(255) unique_key
|
|
public $dbhost; // varchar(255)
|
|
public $dbuser; // varchar(255)
|
|
public $dbpass; // varchar(255)
|
|
public $dbname; // varchar(255)
|
|
public $sitename; // varchar(255)
|
|
public $theme; // varchar(255)
|
|
public $logo; // varchar(255)
|
|
public $created; // datetime() not_null
|
|
public $modified; // timestamp() not_null default_CURRENT_TIMESTAMP
|
|
public $tags; // text
|
|
|
|
/* Static get */
|
|
function staticGet($k,$v=NULL) {
|
|
$i = DB_DataObject::staticGet('Status_network',$k,$v);
|
|
|
|
// Don't use local process cache; if we're fetching multiple
|
|
// times it's because we're reloading it in a long-running
|
|
// process; we need a fresh copy!
|
|
global $_DB_DATAOBJECT;
|
|
unset($_DB_DATAOBJECT['CACHE']['status_network']);
|
|
return $i;
|
|
}
|
|
|
|
/* the code above is auto generated do not remove the tag below */
|
|
###END_AUTOCODE
|
|
|
|
static $cache = null;
|
|
static $cacheInitialized = false;
|
|
static $base = null;
|
|
static $wildcard = null;
|
|
|
|
/**
|
|
* @param string $dbhost
|
|
* @param string $dbuser
|
|
* @param string $dbpass
|
|
* @param string $dbname
|
|
* @param array $servers memcached servers to use for caching config info
|
|
*/
|
|
static function setupDB($dbhost, $dbuser, $dbpass, $dbname, $servers)
|
|
{
|
|
global $config;
|
|
|
|
$config['db']['database_'.$dbname] = "mysqli://$dbuser:$dbpass@$dbhost/$dbname";
|
|
$config['db']['ini_'.$dbname] = INSTALLDIR.'/classes/status_network.ini';
|
|
$config['db']['table_status_network'] = $dbname;
|
|
|
|
if (class_exists('Memcache')) {
|
|
self::$cache = new Memcache();
|
|
|
|
// If we're a parent command-line process we need
|
|
// to be able to close out the connection after
|
|
// forking, so disable persistence.
|
|
//
|
|
// We'll turn it back on again the second time
|
|
// through which will either be in a child process,
|
|
// or a single-process script which is switching
|
|
// configurations.
|
|
$persist = php_sapi_name() != 'cli' || self::$cacheInitialized;
|
|
if (is_array($servers)) {
|
|
foreach($servers as $server) {
|
|
self::$cache->addServer($server, 11211, $persist);
|
|
}
|
|
} else {
|
|
self::$cache->addServer($servers, 11211, $persist);
|
|
}
|
|
self::$cacheInitialized = true;
|
|
}
|
|
|
|
self::$base = $dbname;
|
|
}
|
|
|
|
static function cacheKey($k, $v) {
|
|
return 'statusnet:' . self::$base . ':status_network:'.$k.':'.$v;
|
|
}
|
|
|
|
static function memGet($k, $v)
|
|
{
|
|
if (!self::$cache) {
|
|
return self::staticGet($k, $v);
|
|
}
|
|
|
|
$ck = self::cacheKey($k, $v);
|
|
|
|
$sn = self::$cache->get($ck);
|
|
|
|
if (empty($sn)) {
|
|
$sn = self::staticGet($k, $v);
|
|
if (!empty($sn)) {
|
|
self::$cache->set($ck, clone($sn));
|
|
}
|
|
}
|
|
|
|
return $sn;
|
|
}
|
|
|
|
function decache()
|
|
{
|
|
if (self::$cache) {
|
|
$keys = array('nickname', 'hostname', 'pathname');
|
|
foreach ($keys as $k) {
|
|
$ck = self::cacheKey($k, $this->$k);
|
|
self::$cache->delete($ck);
|
|
}
|
|
}
|
|
}
|
|
|
|
function update($orig=null)
|
|
{
|
|
if (is_object($orig)) {
|
|
$orig->decache(); # might be different keys
|
|
}
|
|
return parent::update($orig);
|
|
}
|
|
|
|
function delete()
|
|
{
|
|
$this->decache(); # while we still have the values!
|
|
return parent::delete();
|
|
}
|
|
|
|
/**
|
|
* @param string $servername hostname
|
|
* @param string $pathname URL base path
|
|
* @param string $wildcard hostname suffix to match wildcard config
|
|
*/
|
|
static function setupSite($servername, $pathname, $wildcard)
|
|
{
|
|
global $config;
|
|
|
|
$sn = null;
|
|
|
|
// XXX I18N, probably not crucial for hostnames
|
|
// XXX This probably needs a tune up
|
|
|
|
if (0 == strncasecmp(strrev($wildcard), strrev($servername), strlen($wildcard))) {
|
|
// special case for exact match
|
|
if (0 == strcasecmp($servername, $wildcard)) {
|
|
$sn = self::memGet('nickname', '');
|
|
} else {
|
|
$parts = explode('.', $servername);
|
|
$sn = self::memGet('nickname', strtolower($parts[0]));
|
|
}
|
|
} else {
|
|
$sn = self::memGet('hostname', strtolower($servername));
|
|
|
|
if (empty($sn)) {
|
|
// Try for a no-www address
|
|
if (0 == strncasecmp($servername, 'www.', 4)) {
|
|
$sn = self::memGet('hostname', strtolower(substr($servername, 4)));
|
|
}
|
|
}
|
|
}
|
|
|
|
if (!empty($sn)) {
|
|
|
|
// Redirect to the right URL
|
|
|
|
if (!empty($sn->hostname) &&
|
|
empty($_SERVER['HTTPS']) &&
|
|
0 != strcasecmp($sn->hostname, $servername)) {
|
|
$sn->redirectTo('http://'.$sn->hostname.$_SERVER['REQUEST_URI']);
|
|
} else if (!empty($_SERVER['HTTPS']) &&
|
|
0 != strcasecmp($sn->hostname, $servername) &&
|
|
0 != strcasecmp($sn->nickname.'.'.$wildcard, $servername)) {
|
|
$sn->redirectTo('https://'.$sn->nickname.'.'.$wildcard.$_SERVER['REQUEST_URI']);
|
|
}
|
|
|
|
$dbhost = (empty($sn->dbhost)) ? 'localhost' : $sn->dbhost;
|
|
$dbuser = (empty($sn->dbuser)) ? $sn->nickname : $sn->dbuser;
|
|
$dbpass = $sn->dbpass;
|
|
$dbname = (empty($sn->dbname)) ? $sn->nickname : $sn->dbname;
|
|
|
|
$config['db']['database'] = "mysqli://$dbuser:$dbpass@$dbhost/$dbname";
|
|
|
|
$config['site']['name'] = $sn->sitename;
|
|
$config['site']['nickname'] = $sn->nickname;
|
|
|
|
self::$wildcard = $wildcard;
|
|
|
|
$config['site']['wildcard'] =& self::$wildcard;
|
|
|
|
if (!empty($sn->hostname)) {
|
|
$config['site']['server'] = $sn->hostname;
|
|
}
|
|
|
|
if (!empty($sn->theme)) {
|
|
$config['site']['theme'] = $sn->theme;
|
|
}
|
|
if (!empty($sn->logo)) {
|
|
$config['site']['logo'] = $sn->logo;
|
|
}
|
|
|
|
return $sn;
|
|
} else {
|
|
return null;
|
|
}
|
|
}
|
|
|
|
// Code partially mooked from http://www.richler.de/en/php-redirect/
|
|
// (C) 2006 by Heiko Richler http://www.richler.de/
|
|
// LGPL
|
|
|
|
function redirectTo($destination)
|
|
{
|
|
$old = 'http'.
|
|
(($_SERVER['HTTPS'] == 'on') ? 'S' : '').
|
|
'://'.
|
|
$_SERVER['HTTP_HOST'].
|
|
$_SERVER['REQUEST_URI'].
|
|
$_SERVER['QUERY_STRING'];
|
|
if ($old == $destination) { // this would be a loop!
|
|
// error_log(...) ?
|
|
return false;
|
|
}
|
|
|
|
header('HTTP/1.1 301 Moved Permanently');
|
|
header("Location: $destination");
|
|
|
|
print "<a href='$destination'>$destination</a>\n";
|
|
|
|
exit;
|
|
}
|
|
|
|
function getServerName()
|
|
{
|
|
if (!empty($this->hostname)) {
|
|
return $this->hostname;
|
|
} else {
|
|
return $this->nickname . '.' . self::$wildcard;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Return site meta-info tags as an array
|
|
* @return array of strings
|
|
*/
|
|
function getTags()
|
|
{
|
|
return array_filter(explode("|", strval($this->tags)));
|
|
}
|
|
|
|
/**
|
|
* Check if this site record has a particular meta-info tag attached.
|
|
* @param string $tag
|
|
* @return bool
|
|
*/
|
|
function hasTag($tag)
|
|
{
|
|
return in_array($tag, $this->getTags());
|
|
}
|
|
}
|