lib/framework.php

   1 <?php
   2 // This file is part of GNU social - https://www.gnu.org/software/social
   3 //
   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.
   8 //
   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.
  13 //
  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/>.
  16
  17 /**
  18  * Bootstrapping code to initialize the application.
  19  *
  20  * @package   GNUsocial
  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
  28  */
  29
  30 defined('GNUSOCIAL') || die();
  31
  32 define('GNUSOCIAL_ENGINE', 'GNU social');
  33 define('GNUSOCIAL_ENGINE_URL', 'https://www.gnu.org/software/social/');
  34
  35 define('GNUSOCIAL_BASE_VERSION', '2.0.0');
  36 define('GNUSOCIAL_LIFECYCLE', 'dev'); // 'dev', 'alpha[0-9]+', 'beta[0-9]+', 'rc[0-9]+', 'release'
  37
  38 define('GNUSOCIAL_VERSION', GNUSOCIAL_BASE_VERSION . '-' . GNUSOCIAL_LIFECYCLE);
  39
  40 define('GNUSOCIAL_CODENAME', 'THIS. IS. GNU social!!!!');
  41
  42 define('AVATAR_PROFILE_SIZE', 96);
  43 define('AVATAR_STREAM_SIZE', 48);
  44 define('AVATAR_MINI_SIZE', 24);
  45
  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);
  52
  53 define('GROUPS_PER_MINILIST', 8);
  54 define('PROFILES_PER_MINILIST', 8);
  55
  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);
  60
  61 define('FOREIGN_FRIEND_SEND', 1);
  62 define('FOREIGN_FRIEND_RECV', 2);
  63
  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);
  70
  71 /**
  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.
  75  */
  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}');
  81
  82 // Autoload composer dependencies
  83 require_once INSTALLDIR . '/vendor/autoload.php';
  84
  85 // append our extlib dir as the last-resort place to find libs
  86 set_include_path(get_include_path() . PATH_SEPARATOR . INSTALLDIR . '/extlib/');
  87
  88 // global configuration object
  89
  90 require_once 'PEAR.php';
  91 require_once 'PEAR/Exception.php';
  92 global $_PEAR;
  93 $_PEAR = new PEAR;
  94 $_PEAR->setErrorHandling(PEAR_ERROR_CALLBACK, 'PEAR_ErrorToPEAR_Exception');
  95
  96 require_once 'DB.php';
  97 require_once 'DB/DataObject.php';
  98 require_once 'DB/DataObject/Cast.php'; # for dates
  99 global $_DB;
 100 $_DB = new DB;
 101
 102 require_once(INSTALLDIR.'/lib/language.php');
 103
 104 // This gets included before the config file, so that admin code and plugins
 105 // can use it
 106
 107 require_once(INSTALLDIR.'/lib/event.php');
 108 require_once(INSTALLDIR.'/lib/plugin.php');
 109
 110 function addPlugin($name, array $attrs=array())
 111 {
 112     return GNUsocial::addPlugin($name, $attrs);
 113 }
 114
 115 function _have_config()
 116 {
 117     return GNUsocial::haveConfig();
 118 }
 119
 120 function GNUsocial_class_autoload($cls)
 121 {
 122     if (file_exists(INSTALLDIR.'/classes/' . $cls . '.php')) {
 123         require_once(INSTALLDIR.'/classes/' . $cls . '.php');
 124     } else if (file_exists(INSTALLDIR.'/lib/' . strtolower($cls) . '.php')) {
 125         require_once(INSTALLDIR.'/lib/' . strtolower($cls) . '.php');
 126     } else if (mb_substr($cls, -6) == 'Action' &&
 127                file_exists(INSTALLDIR.'/actions/' . strtolower(mb_substr($cls, 0, -6)) . '.php')) {
 128         require_once(INSTALLDIR.'/actions/' . strtolower(mb_substr($cls, 0, -6)) . '.php');
 129     } else if ($cls === 'OAuthRequest' || $cls === 'OAuthException') {
 130         require_once('OAuth.php');
 131     } else {
 132         Event::handle('Autoload', array(&$cls));
 133     }
 134 }
 135
 136 // Autoload function queue, starting with our own discovery method
 137 spl_autoload_register('GNUsocial_class_autoload');
 138
 139 /**
 140  * Extlibs with namespaces (or directly in extlib/)
 141  * This covers libraries such as: Validate and \Michelf\Markdown
 142  *
 143  * The namespaced based structure is called "PSR-0 autoloading standard":
 144  *    \<Vendor Name>\(<Namespace>\)*<Class Name>
 145  * and is available here: http://www.php-fig.org/psr/psr-0/
 146 */
 147 spl_autoload_register(function($class){
 148     $class_base = preg_replace('{\\\\|_(?!.*\\\\)}', DIRECTORY_SEPARATOR, ltrim($class, '\\'));
 149     $file = INSTALLDIR."/extlib/{$class_base}.php";
 150     if (file_exists($file)) {
 151         require_once $file;
 152         return;
 153     }
 154
 155     # Try if the system has this external library
 156     $file = "/usr/share/php/{$class_base}.php";
 157     if (file_exists($file)) {
 158         require_once $file;
 159         return;
 160     }
 161 });
 162 require_once INSTALLDIR.'/lib/util.php';
 163 require_once INSTALLDIR.'/lib/action.php';
 164 require_once INSTALLDIR.'/lib/mail.php';
 165
 166 //set PEAR error handling to use regular PHP exceptions
 167 function PEAR_ErrorToPEAR_Exception(PEAR_Error $err)
 168 {
 169     //DB_DataObject throws error when an empty set would be returned
 170     //That behavior is weird, and not how the rest of StatusNet works.
 171     //So just ignore those errors.
 172     if ($err->getCode() == DB_DATAOBJECT_ERROR_NODATA) {
 173         return;
 174     }
 175
 176     $msg      = $err->getMessage();
 177     $userInfo = $err->getUserInfo();
 178
 179     // Log this; push the message up as an exception
 180
 181     common_log(LOG_ERR, "PEAR Error: $msg ($userInfo)");
 182
 183     // HACK: queue handlers get kicked by the long-query killer, and
 184     // keep the same broken connection. We die here to get a new
 185     // process started.
 186
 187     if (php_sapi_name() == 'cli' && preg_match('/nativecode=2006/', $userInfo)) {
 188         common_log(LOG_ERR, "Lost DB connection; dying.");
 189         exit(100);
 190     }
 191
 192     if ($err->getCode()) {
 193         throw new PEAR_Exception($err->getMessage(), $err->getCode());
 194     }
 195     throw new PEAR_Exception($err->getMessage());
 196 }