lib/framework.php

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