3 * Table Definition for status_network
5 * StatusNet - the distributed open-source microblogging tool
6 * Copyright (C) 2009, StatusNet, Inc.
8 * This program is free software: you can redistribute it and/or modify
9 * it under the terms of the GNU Affero General Public License as published by
10 * the Free Software Foundation, either version 3 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU Affero General Public License for more details.
18 * You should have received a copy of the GNU Affero General Public License
19 * along with this program. If not, see <http://www.gnu.org/licenses/>.
22 if (!defined('STATUSNET') && !defined('LACONICA')) { exit(1); }
24 class Status_network extends DB_DataObject
27 /* the code below is auto generated do not remove the above tag */
29 public $__table = 'status_network'; // table name
30 public $nickname; // varchar(64) primary_key not_null
31 public $hostname; // varchar(255) unique_key
32 public $pathname; // varchar(255) unique_key
33 public $dbhost; // varchar(255)
34 public $dbuser; // varchar(255)
35 public $dbpass; // varchar(255)
36 public $dbname; // varchar(255)
37 public $sitename; // varchar(255)
38 public $theme; // varchar(255)
39 public $logo; // varchar(255)
40 public $created; // datetime() not_null
41 public $modified; // timestamp() not_null default_CURRENT_TIMESTAMP
45 function staticGet($k,$v=NULL) {
46 $i = DB_DataObject::staticGet('Status_network',$k,$v);
48 // Don't use local process cache; if we're fetching multiple
49 // times it's because we're reloading it in a long-running
50 // process; we need a fresh copy!
51 global $_DB_DATAOBJECT;
52 unset($_DB_DATAOBJECT['CACHE']['status_network']);
56 /* the code above is auto generated do not remove the tag below */
61 static $wildcard = null;
64 * @param string $dbhost
65 * @param string $dbuser
66 * @param string $dbpass
67 * @param string $dbname
68 * @param array $servers memcached servers to use for caching config info
70 static function setupDB($dbhost, $dbuser, $dbpass, $dbname, $servers)
74 $config['db']['database_'.$dbname] = "mysqli://$dbuser:$dbpass@$dbhost/$dbname";
75 $config['db']['ini_'.$dbname] = INSTALLDIR.'/classes/status_network.ini';
76 $config['db']['table_status_network'] = $dbname;
78 if (class_exists('Memcache')) {
79 self::$cache = new Memcache();
81 // Can't close persistent connections, making forking painful.
83 // @fixme only do this in *parent* CLI processes.
84 // single-process and child-processes *should* use persistent.
85 $persist = php_sapi_name() != 'cli';
86 if (is_array($servers)) {
87 foreach($servers as $server) {
88 self::$cache->addServer($server, 11211, $persist);
91 self::$cache->addServer($servers, 11211, $persist);
95 self::$base = $dbname;
98 static function cacheKey($k, $v) {
99 return 'statusnet:' . self::$base . ':status_network:'.$k.':'.$v;
102 static function memGet($k, $v)
105 return self::staticGet($k, $v);
108 $ck = self::cacheKey($k, $v);
110 $sn = self::$cache->get($ck);
113 $sn = self::staticGet($k, $v);
115 self::$cache->set($ck, clone($sn));
125 $keys = array('nickname', 'hostname', 'pathname');
126 foreach ($keys as $k) {
127 $ck = self::cacheKey($k, $this->$k);
128 self::$cache->delete($ck);
133 function update($orig=null)
135 if (is_object($orig)) {
136 $orig->decache(); # might be different keys
138 return parent::update($orig);
143 $this->decache(); # while we still have the values!
144 return parent::delete();
148 * @param string $servername hostname
149 * @param string $pathname URL base path
150 * @param string $wildcard hostname suffix to match wildcard config
152 static function setupSite($servername, $pathname, $wildcard)
158 // XXX I18N, probably not crucial for hostnames
159 // XXX This probably needs a tune up
161 if (0 == strncasecmp(strrev($wildcard), strrev($servername), strlen($wildcard))) {
162 // special case for exact match
163 if (0 == strcasecmp($servername, $wildcard)) {
164 $sn = self::memGet('nickname', '');
166 $parts = explode('.', $servername);
167 $sn = self::memGet('nickname', strtolower($parts[0]));
170 $sn = self::memGet('hostname', strtolower($servername));
173 // Try for a no-www address
174 if (0 == strncasecmp($servername, 'www.', 4)) {
175 $sn = self::memGet('hostname', strtolower(substr($servername, 4)));
182 // Redirect to the right URL
184 if (!empty($sn->hostname) &&
185 empty($_SERVER['HTTPS']) &&
186 0 != strcasecmp($sn->hostname, $servername)) {
187 $sn->redirectTo('http://'.$sn->hostname.$_SERVER['REQUEST_URI']);
188 } else if (!empty($_SERVER['HTTPS']) &&
189 0 != strcasecmp($sn->hostname, $servername) &&
190 0 != strcasecmp($sn->nickname.'.'.$wildcard, $servername)) {
191 $sn->redirectTo('https://'.$sn->nickname.'.'.$wildcard.$_SERVER['REQUEST_URI']);
194 $dbhost = (empty($sn->dbhost)) ? 'localhost' : $sn->dbhost;
195 $dbuser = (empty($sn->dbuser)) ? $sn->nickname : $sn->dbuser;
196 $dbpass = $sn->dbpass;
197 $dbname = (empty($sn->dbname)) ? $sn->nickname : $sn->dbname;
199 $config['db']['database'] = "mysqli://$dbuser:$dbpass@$dbhost/$dbname";
201 $config['site']['name'] = $sn->sitename;
202 $config['site']['nickname'] = $sn->nickname;
204 self::$wildcard = $wildcard;
206 $config['site']['wildcard'] =& self::$wildcard;
208 if (!empty($sn->hostname)) {
209 $config['site']['server'] = $sn->hostname;
212 if (!empty($sn->theme)) {
213 $config['site']['theme'] = $sn->theme;
215 if (!empty($sn->logo)) {
216 $config['site']['logo'] = $sn->logo;
225 // Code partially mooked from http://www.richler.de/en/php-redirect/
226 // (C) 2006 by Heiko Richler http://www.richler.de/
229 function redirectTo($destination)
232 (($_SERVER['HTTPS'] == 'on') ? 'S' : '').
234 $_SERVER['HTTP_HOST'].
235 $_SERVER['REQUEST_URI'].
236 $_SERVER['QUERY_STRING'];
237 if ($old == $destination) { // this would be a loop!
242 header('HTTP/1.1 301 Moved Permanently');
243 header("Location: $destination");
245 print "<a href='$destination'>$destination</a>\n";
250 function getServerName()
252 if (!empty($this->hostname)) {
253 return $this->hostname;
255 return $this->nickname . '.' . self::$wildcard;
260 * Return site meta-info tags as an array
261 * @return array of strings
265 return array_filter(explode("|", strval($this->tags)));
269 * Check if this site record has a particular meta-info tag attached.
273 function hasTag($tag)
275 return in_array($tag, $this->getTags());