2 // This file is part of GNU social - https://www.gnu.org/software/social
4 // GNU social is free software: you can redistribute it and/or modify
5 // it under the terms of the GNU Affero General Public License as published by
6 // the Free Software Foundation, either version 3 of the License, or
7 // (at your option) any later version.
9 // GNU social is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 // GNU Affero General Public License for more details.
14 // You should have received a copy of the GNU Affero General Public License
15 // along with GNU social. If not, see <http://www.gnu.org/licenses/>.
18 * Bootstrapping code to initialize the application.
21 * @author Evan Prodromou
22 * @author Shashi Gowda
23 * @author Neil E. Hodges
24 * @author Brion Vibber
25 * @author Mikael Nordfeldth <mmn@hethane.se>
26 * @copyright 2010-2019 Free Software Foundation, Inc http://www.fsf.org
27 * @license https://www.gnu.org/licenses/agpl.html GNU AGPL v3 or later
30 defined('GNUSOCIAL') || die();
32 define('GNUSOCIAL_ENGINE', 'GNU social');
33 define('GNUSOCIAL_ENGINE_URL', 'https://www.gnu.org/software/social/');
35 define('GNUSOCIAL_BASE_VERSION', '1.26.1');
36 define('GNUSOCIAL_LIFECYCLE', 'dev'); // 'dev', 'alpha[0-9]+', 'beta[0-9]+', 'rc[0-9]+', 'release'
38 define('GNUSOCIAL_VERSION', GNUSOCIAL_BASE_VERSION . '-' . GNUSOCIAL_LIFECYCLE);
40 define('GNUSOCIAL_CODENAME', 'Undecided');
42 define('AVATAR_PROFILE_SIZE', 96);
43 define('AVATAR_STREAM_SIZE', 48);
44 define('AVATAR_MINI_SIZE', 24);
46 define('NOTICES_PER_PAGE', 20);
47 define('PROFILES_PER_PAGE', 20);
48 define('MESSAGES_PER_PAGE', 20);
49 define('GROUPS_PER_PAGE', 20);
50 define('APPS_PER_PAGE', 20);
51 define('PEOPLETAGS_PER_PAGE', 20);
53 define('GROUPS_PER_MINILIST', 8);
54 define('PROFILES_PER_MINILIST', 8);
56 define('FOREIGN_NOTICE_SEND', 1);
57 define('FOREIGN_NOTICE_RECV', 2);
58 define('FOREIGN_NOTICE_SEND_REPLY', 4);
59 define('FOREIGN_NOTICE_SEND_REPEAT', 8);
61 define('FOREIGN_FRIEND_SEND', 1);
62 define('FOREIGN_FRIEND_RECV', 2);
64 define('NOTICE_INBOX_SOURCE_SUB', 1);
65 define('NOTICE_INBOX_SOURCE_GROUP', 2);
66 define('NOTICE_INBOX_SOURCE_REPLY', 3);
67 define('NOTICE_INBOX_SOURCE_FORWARD', 4);
68 define('NOTICE_INBOX_SOURCE_PROFILE_TAG', 5);
69 define('NOTICE_INBOX_SOURCE_GATEWAY', -1);
72 * StatusNet had this string as valid path characters: '\pN\pL\,\!\(\)\.\:\-\_\+\/\=\&\;\%\~\*\$\'\@'
73 * Some of those characters can be troublesome when auto-linking plain text. Such as "http://some.com/)"
74 * URL encoding should be used whenever a weird character is used, the following strings are not definitive.
76 define('URL_REGEX_VALID_PATH_CHARS', '\pN\pL\,\!\.\:\-\_\+\/\@\=\;\%\~\*\(\)');
77 define('URL_REGEX_VALID_QSTRING_CHARS', URL_REGEX_VALID_PATH_CHARS . '\&');
78 define('URL_REGEX_VALID_FRAGMENT_CHARS', URL_REGEX_VALID_QSTRING_CHARS . '\?\#');
79 define('URL_REGEX_EXCLUDED_END_CHARS', '\?\.\,\!\#\:\''); // don't include these if they are directly after a URL
80 define('URL_REGEX_DOMAIN_NAME', '(?:(?!-)[A-Za-z0-9\-]{1,63}(?<!-)\.)+[A-Za-z]{2,10}');
82 // append our extlib dir as the last-resort place to find libs
84 set_include_path(get_include_path() . PATH_SEPARATOR . INSTALLDIR . '/extlib/');
86 // To protect against upstream libraries which haven't updated
87 // for PHP 5.3 where dl() function may not be present...
88 if (!function_exists('dl')) {
89 // function_exists() returns false for things in disable_functions,
90 // but they still exist and we'll die if we try to redefine them.
92 // Fortunately trying to call the disabled one will only trigger
93 // a warning, not a fatal, so it's safe to leave it for our case.
94 // Callers will be suppressing warnings anyway.
95 $disabled = array_filter(array_map('trim', explode(',', ini_get('disable_functions'))));
96 if (!in_array('dl', $disabled)) {
97 function dl($library) {
103 // global configuration object
105 require_once 'PEAR.php';
106 require_once 'PEAR/Exception.php';
109 $_PEAR->setErrorHandling(PEAR_ERROR_CALLBACK, 'PEAR_ErrorToPEAR_Exception');
111 require_once 'DB.php';
112 require_once 'DB/DataObject.php';
113 require_once 'DB/DataObject/Cast.php'; # for dates
117 require_once(INSTALLDIR.'/lib/language.php');
119 // This gets included before the config file, so that admin code and plugins
122 require_once(INSTALLDIR.'/lib/event.php');
123 require_once(INSTALLDIR.'/lib/plugin.php');
125 function addPlugin($name, array $attrs=array())
127 return GNUsocial::addPlugin($name, $attrs);
130 function _have_config()
132 return GNUsocial::haveConfig();
135 function GNUsocial_class_autoload($cls)
137 if (file_exists(INSTALLDIR.'/classes/' . $cls . '.php')) {
138 require_once(INSTALLDIR.'/classes/' . $cls . '.php');
139 } else if (file_exists(INSTALLDIR.'/lib/' . strtolower($cls) . '.php')) {
140 require_once(INSTALLDIR.'/lib/' . strtolower($cls) . '.php');
141 } else if (mb_substr($cls, -6) == 'Action' &&
142 file_exists(INSTALLDIR.'/actions/' . strtolower(mb_substr($cls, 0, -6)) . '.php')) {
143 require_once(INSTALLDIR.'/actions/' . strtolower(mb_substr($cls, 0, -6)) . '.php');
144 } else if ($cls === 'OAuthRequest' || $cls === 'OAuthException') {
145 require_once('OAuth.php');
147 Event::handle('Autoload', array(&$cls));
151 // Autoload function queue, starting with our own discovery method
152 spl_autoload_register('GNUsocial_class_autoload');
155 * Extlibs with namespaces (or directly in extlib/)
156 * This covers libraries such as: Validate and \Michelf\Markdown
158 * The namespaced based structure is called "PSR-0 autoloading standard":
159 * \<Vendor Name>\(<Namespace>\)*<Class Name>
160 * and is available here: http://www.php-fig.org/psr/psr-0/
162 spl_autoload_register(function($class){
163 $class_base = preg_replace('{\\\\|_(?!.*\\\\)}', DIRECTORY_SEPARATOR, ltrim($class, '\\'));
164 $file = INSTALLDIR."/extlib/{$class_base}.php";
165 if (file_exists($file)) {
170 # Try if the system has this external library
171 $file = "/usr/share/php/{$class_base}.php";
172 if (file_exists($file)) {
178 require_once INSTALLDIR.'/lib/util.php';
179 require_once INSTALLDIR.'/lib/action.php';
180 require_once INSTALLDIR.'/lib/mail.php';
182 //set PEAR error handling to use regular PHP exceptions
183 function PEAR_ErrorToPEAR_Exception(PEAR_Error $err)
185 //DB_DataObject throws error when an empty set would be returned
186 //That behavior is weird, and not how the rest of StatusNet works.
187 //So just ignore those errors.
188 if ($err->getCode() == DB_DATAOBJECT_ERROR_NODATA) {
192 $msg = $err->getMessage();
193 $userInfo = $err->getUserInfo();
195 // Log this; push the message up as an exception
197 common_log(LOG_ERR, "PEAR Error: $msg ($userInfo)");
199 // HACK: queue handlers get kicked by the long-query killer, and
200 // keep the same broken connection. We die here to get a new
203 if (php_sapi_name() == 'cli' && preg_match('/nativecode=2006/', $userInfo)) {
204 common_log(LOG_ERR, "Lost DB connection; dying.");
208 if ($err->getCode()) {
209 throw new PEAR_Exception($err->getMessage(), $err->getCode());
211 throw new PEAR_Exception($err->getMessage());