]> git.mxchange.org Git - quix0rs-gnu-social.git/blob - classes/Status_network.php
Merge branch '1.0.x' of gitorious.org:statusnet/mainline into 1.0.x
[quix0rs-gnu-social.git] / classes / Status_network.php
1 <?php
2 /**
3  * Table Definition for status_network
4  *
5  * StatusNet - the distributed open-source microblogging tool
6  * Copyright (C) 2009, StatusNet, Inc.
7  *
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.
12  *
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.
17  *
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/>.
20  */
21
22 if (!defined('STATUSNET') && !defined('LACONICA')) { exit(1); }
23
24 class Status_network extends Safe_DataObject
25 {
26     ###START_AUTOCODE
27     /* the code below is auto generated do not remove the above tag */
28
29     public $__table = 'status_network';                  // table name
30     public $site_id;                         // int(4) primary_key not_null
31     public $nickname;                        // varchar(64)   unique_key not_null
32     public $hostname;                        // varchar(255)  unique_key
33     public $pathname;                        // varchar(255)  unique_key
34     public $dbhost;                          // varchar(255)
35     public $dbuser;                          // varchar(255)
36     public $dbpass;                          // varchar(255)
37     public $dbname;                          // varchar(255)
38     public $sitename;                        // varchar(255)
39     public $theme;                           // varchar(255)
40     public $logo;                            // varchar(255)
41     public $created;                         // datetime()   not_null
42     public $modified;                        // timestamp()   not_null default_CURRENT_TIMESTAMP
43
44     /* Static get */
45     function staticGet($k,$v=NULL) {
46         $i = DB_DataObject::staticGet('Status_network',$k,$v);
47
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']);
53         return $i;
54     }
55
56     /* the code above is auto generated do not remove the tag below */
57     ###END_AUTOCODE
58
59     static $cache = null;
60     static $cacheInitialized = false;
61     static $base = null;
62     static $wildcard = null;
63
64     /**
65      * @param string $dbhost
66      * @param string $dbuser
67      * @param string $dbpass
68      * @param string $dbname
69      * @param array $servers memcached servers to use for caching config info
70      */
71     static function setupDB($dbhost, $dbuser, $dbpass, $dbname, $servers)
72     {
73         global $config;
74
75         $config['db']['database_'.$dbname] = "mysqli://$dbuser:$dbpass@$dbhost/$dbname";
76         $config['db']['ini_'.$dbname] = INSTALLDIR.'/classes/status_network.ini';
77         $config['db']['table_status_network'] = $dbname;
78
79         if (class_exists('Memcache')) {
80             self::$cache = new Memcache();
81
82             // If we're a parent command-line process we need
83             // to be able to close out the connection after
84             // forking, so disable persistence.
85             //
86             // We'll turn it back on again the second time
87             // through which will either be in a child process,
88             // or a single-process script which is switching
89             // configurations.
90             $persist = php_sapi_name() != 'cli' || self::$cacheInitialized;
91             if (is_array($servers)) {
92                 foreach($servers as $server) {
93                     self::$cache->addServer($server, 11211, $persist);
94                 }
95             } else {
96                 self::$cache->addServer($servers, 11211, $persist);
97             }
98             self::$cacheInitialized = true;
99         }
100
101         self::$base = $dbname;
102     }
103
104     static function cacheKey($k, $v) {
105         return 'statusnet:' . self::$base . ':status_network:'.$k.':'.$v;
106     }
107
108     static function memGet($k, $v)
109     {
110         if (!self::$cache) {
111             return self::staticGet($k, $v);
112         }
113
114         $ck = self::cacheKey($k, $v);
115
116         $sn = self::$cache->get($ck);
117
118         if (empty($sn)) {
119             $sn = self::staticGet($k, $v);
120             if (!empty($sn)) {
121                 self::$cache->set($ck, clone($sn));
122             }
123         }
124
125         return $sn;
126     }
127
128     function decache()
129     {
130         if (self::$cache) {
131             $keys = array('nickname', 'hostname', 'pathname');
132             foreach ($keys as $k) {
133                 $ck = self::cacheKey($k, $this->$k);
134                 self::$cache->delete($ck);
135             }
136         }
137     }
138
139     function update($orig=null)
140     {
141         if (is_object($orig)) {
142             $orig->decache(); # might be different keys
143         }
144         return parent::update($orig);
145     }
146
147     /**
148      * DB_DataObject doesn't allow updating keys (even non-primary)
149      */
150     function updateKeys(&$orig)
151     {
152         $this->_connect();
153         foreach (array('hostname', 'pathname') as $k) {
154             if (strcmp($this->$k, $orig->$k) != 0) {
155                 $parts[] = $k . ' = ' . $this->_quote($this->$k);
156             }
157         }
158         if (count($parts) == 0) {
159             // No changes
160             return true;
161         }
162
163         $toupdate = implode(', ', $parts);
164
165         $table = common_database_tablename($this->tableName());
166         $qry = 'UPDATE ' . $table . ' SET ' . $toupdate .
167             ' WHERE nickname = ' . $this->_quote($this->nickname);
168         $orig->decache();
169         $result = $this->query($qry);
170         $this->decache();
171
172         return $result;
173     }
174
175     function delete()
176     {
177         $this->decache(); # while we still have the values!
178         return parent::delete();
179     }
180
181     /**
182      * @param string $servername hostname
183      * @param string $wildcard hostname suffix to match wildcard config
184      * @return mixed Status_network or null
185      */
186     static function getFromHostname($servername, $wildcard)
187     {
188         $sn = null;
189         if (0 == strncasecmp(strrev($wildcard), strrev($servername), strlen($wildcard))) {
190             // special case for exact match
191             if (0 == strcasecmp($servername, $wildcard)) {
192                 $sn = self::memGet('nickname', '');
193             } else {
194                 $parts = explode('.', $servername);
195                 $sn = self::memGet('nickname', strtolower($parts[0]));
196             }
197         } else {
198             $sn = self::memGet('hostname', strtolower($servername));
199
200             if (empty($sn)) {
201                 // Try for a no-www address
202                 if (0 == strncasecmp($servername, 'www.', 4)) {
203                     $sn = self::memGet('hostname', strtolower(substr($servername, 4)));
204                 }
205             }
206         }
207         return $sn;
208     }
209
210     /**
211      * @param string $servername hostname
212      * @param string $pathname URL base path
213      * @param string $wildcard hostname suffix to match wildcard config
214      */
215     static function setupSite($servername, $pathname, $wildcard)
216     {
217         global $config;
218
219         $sn = null;
220
221         // XXX I18N, probably not crucial for hostnames
222         // XXX This probably needs a tune up
223         $sn = self::getFromHostname($servername, $wildcard);
224
225         if (!empty($sn)) {
226
227             // Redirect to the right URL
228
229             if (!empty($sn->hostname) &&
230                 empty($_SERVER['HTTPS']) &&
231                 0 != strcasecmp($sn->hostname, $servername)) {
232                 $sn->redirectTo('http://'.$sn->hostname.$_SERVER['REQUEST_URI']);
233             } else if (!empty($_SERVER['HTTPS']) &&
234                        0 != strcasecmp($sn->hostname, $servername) &&
235                        0 != strcasecmp($sn->nickname.'.'.$wildcard, $servername)) {
236                 $sn->redirectTo('https://'.$sn->nickname.'.'.$wildcard.$_SERVER['REQUEST_URI']);
237             }
238
239             $dbhost = (empty($sn->dbhost)) ? 'localhost' : $sn->dbhost;
240             $dbuser = (empty($sn->dbuser)) ? $sn->nickname : $sn->dbuser;
241             $dbpass = $sn->dbpass;
242             $dbname = (empty($sn->dbname)) ? $sn->nickname : $sn->dbname;
243
244             $config['db']['database'] = "mysqli://$dbuser:$dbpass@$dbhost/$dbname";
245
246             $config['site']['name'] = $sn->sitename;
247             $config['site']['nickname'] = $sn->nickname;
248
249             self::$wildcard = $wildcard;
250
251             $config['site']['wildcard'] =& self::$wildcard;
252
253             if (!empty($sn->hostname)) {
254                 $config['site']['server'] = $sn->hostname;
255             }
256
257             if (!empty($sn->theme)) {
258                 $config['site']['theme'] = $sn->theme;
259             }
260             if (!empty($sn->logo)) {
261                 $config['site']['logo'] = $sn->logo;
262             }
263
264             return $sn;
265         } else {
266             return null;
267         }
268     }
269
270     // Code partially mooked from http://www.richler.de/en/php-redirect/
271     // (C) 2006 by Heiko Richler  http://www.richler.de/
272     // LGPL
273
274     function redirectTo($destination)
275     {
276         $old = 'http'.
277           (($_SERVER['HTTPS'] == 'on') ? 'S' : '').
278           '://'.
279           $_SERVER['HTTP_HOST'].
280           $_SERVER['REQUEST_URI'].
281           $_SERVER['QUERY_STRING'];
282         if ($old == $destination) { // this would be a loop!
283             // error_log(...) ?
284             return false;
285         }
286
287         header('HTTP/1.1 301 Moved Permanently');
288         header("Location: $destination");
289
290         print "<a href='$destination'>$destination</a>\n";
291
292         exit;
293     }
294
295     function getServerName()
296     {
297         if (!empty($this->hostname)) {
298             return $this->hostname;
299         } else {
300             return $this->nickname . '.' . self::$wildcard;
301         }
302     }
303
304     /**
305      * Return site meta-info tags as an array
306      * @return array of strings
307      */
308     function getTags()
309     {
310         $result = Status_network_tag::getTags($this->site_id);
311
312         // XXX : for backwards compatibility
313         if (empty($result)) {
314             return explode('|', $this->tags);
315         }
316
317         return $result;
318     }
319
320     /**
321      * Save a given set of tags
322      * @param array tags
323      * @fixme only add/remove differentials
324      */
325     function setTags($tags)
326     {
327         $this->clearTags();
328         foreach ($tags as $tag) {
329             if (!empty($tag)) {
330                 $snt = new Status_network_tag();
331                 $snt->site_id = $this->site_id;
332                 $snt->tag = $tag;
333                 $snt->created = common_sql_now();
334
335                 $id = $snt->insert();
336                 if (!$id) {
337                     // TRANS: Exception thrown when a tag cannot be saved.
338                     throw new Exception(_("Unable to save tag."));
339                 }
340             }
341         }
342
343         return true;
344     }
345
346     function clearTags()
347     {
348         $tag = new Status_network_tag();
349         $tag->site_id = $this->site_id;
350
351         if ($tag->find()) {
352             while($tag->fetch()) {
353                 $tag->delete();
354             }
355         }
356
357         $tag->free();
358     }
359
360     /**
361      * Check if this site record has a particular meta-info tag attached.
362      * @param string $tag
363      * @return bool
364      */
365     function hasTag($tag)
366     {
367         return in_array($tag, $this->getTags());
368     }
369 }