3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.7 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2015 |
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
10 | CiviCRM is free software; you can copy, modify, and distribute it |
11 | under the terms of the GNU Affero General Public License |
12 | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
14 | CiviCRM is distributed in the hope that it will be useful, but |
15 | WITHOUT ANY WARRANTY; without even the implied warranty of |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
17 | See the GNU Affero General Public License for more details. |
19 | You should have received a copy of the GNU Affero General Public |
20 | License and the CiviCRM Licensing Exception along |
21 | with this program; if not, contact CiviCRM LLC |
22 | at info[AT]civicrm[DOT]org. If you have questions about the |
23 | GNU Affero General Public License or the licensing of CiviCRM, |
24 | see the CiviCRM license FAQ at http://civicrm.org/licensing |
25 +--------------------------------------------------------------------+
31 * @copyright CiviCRM LLC (c) 2004-2015
35 * System wide utilities.
37 class CRM_Utils_System
{
39 static $_callbacks = NULL;
42 * @var string Page title
47 * Compose a new URL string from the current URL string.
49 * Used by all the framework components, specifically,
52 * @param string $urlVar
53 * The url variable being considered (i.e. crmPageID, crmSortID etc).
54 * @param bool $includeReset
55 * (optional) Whether to include the reset GET string (if present).
56 * @param bool $includeForce
57 * (optional) Whether to include the force GET string (if present).
59 * (optional) The path to use for the new url.
60 * @param bool|string $absolute
61 * (optional) Whether to return an absolute URL.
66 public static function makeURL($urlVar, $includeReset = FALSE, $includeForce = TRUE, $path = NULL, $absolute = FALSE) {
68 $config = CRM_Core_Config
::singleton();
69 $path = CRM_Utils_Array
::value($config->userFrameworkURLVar
, $_GET);
78 CRM_Utils_System
::getLinksUrl($urlVar, $includeReset, $includeForce),
84 * Get the query string and clean it up.
86 * Strips some variables that should not be propagated, specifically variables
87 * like 'reset'. Also strips any side-affect actions (e.g. export).
89 * This function is copied mostly verbatim from Pager.php (_getLinksUrl)
91 * @param string $urlVar
92 * The URL variable being considered (e.g. crmPageID, crmSortID etc).
93 * @param bool $includeReset
94 * (optional) By default this is FALSE, meaning that the reset parameter
95 * is skipped. Set to TRUE to leave the reset parameter as-is.
96 * @param bool $includeForce
98 * @param bool $skipUFVar
103 public static function getLinksUrl($urlVar, $includeReset = FALSE, $includeForce = TRUE, $skipUFVar = TRUE) {
104 // Sort out query string to prevent messy urls
105 $querystring = array();
109 if (!empty($_SERVER['QUERY_STRING'])) {
110 $qs = explode('&', str_replace('&', '&', $_SERVER['QUERY_STRING']));
111 for ($i = 0, $cnt = count($qs); $i < $cnt; $i++
) {
112 // check first if exist a pair
113 if (strstr($qs[$i], '=') !== FALSE) {
114 list($name, $value) = explode('=', $qs[$i]);
115 if ($name != $urlVar) {
116 $name = rawurldecode($name);
117 //check for arrays in parameters: site.php?foo[]=1&foo[]=2&foo[]=3
118 if ((strpos($name, '[') !== FALSE) &&
119 (strpos($name, ']') !== FALSE)
139 // Ok this is a big assumption but usually works
140 // If we are in snippet mode, retain the 'section' param, if not, get rid
142 if (!empty($qs['snippet'])) {
143 unset($qs['snippet']);
146 unset($qs['section']);
150 $config = CRM_Core_Config
::singleton();
151 unset($qs[$config->userFrameworkURLVar
]);
154 foreach ($qs as $name => $value) {
155 if ($name != 'reset' ||
$includeReset) {
156 $querystring[] = $name . '=' . $value;
160 $querystring = array_merge($querystring, array_unique($arrays));
162 $url = implode('&', $querystring);
164 $url .= (!empty($querystring) ?
'&' : '') . $urlVar . '=';
171 * If we are using a theming system, invoke theme, else just print the
174 * @param string $content
175 * The content that will be themed.
177 * (optional) Are we displaying to the screen or bypassing theming?
178 * @param bool $maintenance
179 * (optional) For maintenance mode.
183 public static function theme(
188 $config = &CRM_Core_Config
::singleton();
189 return $config->userSystem
->theme($content, $print, $maintenance);
193 * Generate a query string if input is an array.
195 * @param array|string $query
198 public static function makeQueryString($query) {
199 if (is_array($query)) {
201 foreach ($query as $key => $value) {
202 $buf .= ($buf ?
'&' : '') . urlencode($key) . '=' . urlencode($value);
210 * Generate an internal CiviCRM URL.
212 * @param string $path
213 * The path being linked to, such as "civicrm/add".
214 * @param array|string $query
215 * A query string to append to the link, or an array of key-value pairs.
216 * @param bool $absolute
217 * Whether to force the output to be an absolute link (beginning with a
218 * URI-scheme such as 'http:'). Useful for links that will be displayed
219 * outside the site, such as in an RSS feed.
220 * @param string $fragment
221 * A fragment identifier (named anchor) to append to the link.
223 * @param bool $htmlize
224 * @param bool $frontend
225 * @param bool $forceBackend
227 * An HTML string containing a link to the given path.
229 public static function url(
236 $forceBackend = FALSE
238 $query = self
::makeQueryString($query);
240 // we have a valid query and it has not yet been transformed
241 if ($htmlize && !empty($query) && strpos($query, '&') === FALSE) {
242 $query = htmlentities($query);
245 $config = CRM_Core_Config
::singleton();
246 return $config->userSystem
->url($path, $query, $absolute, $fragment, $htmlize, $frontend, $forceBackend);
253 * @param bool $absolute
254 * @param null $fragment
255 * @param bool $htmlize
256 * @param bool $frontend
257 * @param bool $forceBackend
261 public static function href(
262 $text, $path = NULL, $query = NULL, $absolute = TRUE,
263 $fragment = NULL, $htmlize = TRUE, $frontend = FALSE, $forceBackend = FALSE
265 $url = self
::url($path, $query, $absolute, $fragment, $htmlize, $frontend, $forceBackend);
266 return "<a href=\"$url\">$text</a>";
272 public static function permissionDenied() {
273 $config = CRM_Core_Config
::singleton();
274 return $config->userSystem
->permissionDenied();
280 public static function logout() {
281 $config = CRM_Core_Config
::singleton();
282 return $config->userSystem
->logout();
286 * this is a very drupal specific function for now.
288 public static function updateCategories() {
289 $config = CRM_Core_Config
::singleton();
290 if ($config->userSystem
->is_drupal
) {
291 $config->userSystem
->updateCategories();
296 * What menu path are we currently on. Called for the primary tpl
299 * the current menu path
301 public static function currentPath() {
302 $config = CRM_Core_Config
::singleton();
303 return trim(CRM_Utils_Array
::value($config->userFrameworkURLVar
, $_GET), '/');
307 * called from a template to compose a url.
309 * @param array $params
310 * List of parameters.
315 public static function crmURL($params) {
316 $p = CRM_Utils_Array
::value('p', $params);
318 $p = self
::currentPath();
323 CRM_Utils_Array
::value('q', $params),
324 CRM_Utils_Array
::value('a', $params, FALSE),
325 CRM_Utils_Array
::value('f', $params),
326 CRM_Utils_Array
::value('h', $params, TRUE),
327 CRM_Utils_Array
::value('fe', $params, FALSE),
328 CRM_Utils_Array
::value('fb', $params, FALSE)
333 * Sets the title of the page.
335 * @param string $title
336 * @param string $pageTitle
338 public static function setTitle($title, $pageTitle = NULL) {
339 self
::$title = $title;
340 $config = CRM_Core_Config
::singleton();
341 return $config->userSystem
->setTitle($title, $pageTitle);
345 * Figures and sets the userContext.
347 * Uses the referer if valid else uses the default.
349 * @param array $names
350 * Refererer should match any str in this array.
351 * @param string $default
352 * (optional) The default userContext if no match found.
354 public static function setUserContext($names, $default = NULL) {
357 $session = CRM_Core_Session
::singleton();
358 $referer = CRM_Utils_Array
::value('HTTP_REFERER', $_SERVER);
360 if ($referer && !empty($names)) {
361 foreach ($names as $name) {
362 if (strstr($referer, $name)) {
370 $session->pushUserContext($url);
375 * Gets a class name for an object.
377 * @param object $object
378 * Object whose class name is needed.
381 * The class name of the object.
383 public static function getClassName($object) {
384 return get_class($object);
388 * Redirect to another URL.
391 * The URL to provide to the browser via the Location header.
393 public static function redirect($url = NULL) {
395 $url = self
::url('civicrm/dashboard', 'reset=1');
398 // replace the & characters with &
399 // this is kinda hackish but not sure how to do it right
400 $url = str_replace('&', '&', $url);
402 // If we are in a json context, respond appropriately
403 if (CRM_Utils_Array
::value('snippet', $_GET) === 'json') {
404 CRM_Core_Page_AJAX
::returnJsonResponse(array(
405 'status' => 'redirect',
406 'userContext' => $url,
410 self
::setHttpHeader('Location', $url);
415 * Redirect to another URL using JavaScript.
417 * Use an html based file with javascript embedded to redirect to another url
418 * This prevent the too many redirect errors emitted by various browsers
421 * (optional) The destination URL.
422 * @param string $title
423 * (optional) The page title to use for the redirect page.
424 * @param string $message
425 * (optional) The message to provide in the body of the redirect page.
427 public static function jsRedirect(
433 $url = self
::url('civicrm/dashboard', 'reset=1');
437 $title = ts('CiviCRM task in progress');
441 $message = ts('A long running CiviCRM task is currently in progress. This message will be refreshed till the task is completed');
444 // replace the & characters with &
445 // this is kinda hackish but not sure how to do it right
446 $url = str_replace('&', '&', $url);
448 $template = CRM_Core_Smarty
::singleton();
449 $template->assign('redirectURL', $url);
450 $template->assign('title', $title);
451 $template->assign('message', $message);
453 $html = $template->fetch('CRM/common/redirectJS.tpl');
461 * Append an additional breadcrumb tag to the existing breadcrumbs.
463 * @param $breadCrumbs
465 public static function appendBreadCrumb($breadCrumbs) {
466 $config = CRM_Core_Config
::singleton();
467 return $config->userSystem
->appendBreadCrumb($breadCrumbs);
471 * Reset an additional breadcrumb tag to the existing breadcrumb.
473 public static function resetBreadCrumb() {
474 $config = CRM_Core_Config
::singleton();
475 return $config->userSystem
->resetBreadCrumb();
479 * Append a string to the head of the HTML file.
483 public static function addHTMLHead($bc) {
484 $config = CRM_Core_Config
::singleton();
485 return $config->userSystem
->addHTMLHead($bc);
489 * Determine the post URL for a form.
492 * The default action if one is pre-specified.
495 * The URL to post the form.
497 public static function postURL($action) {
498 $config = CRM_Core_Config
::singleton();
499 return $config->userSystem
->postURL($action);
503 * Rewrite various system URLs to https.
505 public static function mapConfigToSSL() {
506 $config = CRM_Core_Config
::singleton();
507 $config->userFrameworkResourceURL
= str_replace('http://', 'https://', $config->userFrameworkResourceURL
);
508 $config->resourceBase
= $config->userFrameworkResourceURL
;
510 if (!empty($config->extensionsURL
)) {
511 $config->extensionsURL
= str_replace('http://', 'https://', $config->extensionsURL
);
514 return $config->userSystem
->mapConfigToSSL();
518 * Get the base URL of the system.
522 public static function baseURL() {
523 $config = CRM_Core_Config
::singleton();
524 return $config->userFrameworkBaseURL
;
529 public static function authenticateAbort($message, $abort) {
541 * (optional) Whether to exit; defaults to true.
545 public static function authenticateKey($abort = TRUE) {
546 // also make sure the key is sent and is valid
547 $key = trim(CRM_Utils_Array
::value('key', $_REQUEST));
549 $docAdd = "More info at:" . CRM_Utils_System
::docURL2("Managing Scheduled Jobs", TRUE, NULL, NULL, NULL, "wiki");
552 return self
::authenticateAbort(
553 "ERROR: You need to send a valid key to execute this file. " . $docAdd . "\n",
558 $siteKey = defined('CIVICRM_SITE_KEY') ? CIVICRM_SITE_KEY
: NULL;
560 if (!$siteKey ||
empty($siteKey)) {
561 return self
::authenticateAbort(
562 "ERROR: You need to set a valid site key in civicrm.settings.php. " . $docAdd . "\n",
567 if (strlen($siteKey) < 8) {
568 return self
::authenticateAbort(
569 "ERROR: Site key needs to be greater than 7 characters in civicrm.settings.php. " . $docAdd . "\n",
574 if ($key !== $siteKey) {
575 return self
::authenticateAbort(
576 "ERROR: Invalid key value sent. " . $docAdd . "\n",
588 * @param bool $storeInSession
589 * @param bool $loadCMSBootstrap
590 * @param bool $requireKey
594 public static function authenticateScript($abort = TRUE, $name = NULL, $pass = NULL, $storeInSession = TRUE, $loadCMSBootstrap = TRUE, $requireKey = TRUE) {
595 // auth to make sure the user has a login/password to do a shell operation
596 // later on we'll link this to acl's
598 $name = trim(CRM_Utils_Array
::value('name', $_REQUEST));
599 $pass = trim(CRM_Utils_Array
::value('pass', $_REQUEST));
602 // its ok to have an empty password
604 return self
::authenticateAbort(
605 "ERROR: You need to send a valid user name and password to execute this file\n",
610 if ($requireKey && !self
::authenticateKey($abort)) {
614 $result = CRM_Utils_System
::authenticate($name, $pass, $loadCMSBootstrap);
616 return self
::authenticateAbort(
617 "ERROR: Invalid username and/or password\n",
621 elseif ($storeInSession) {
622 // lets store contact id and user id in session
623 list($userID, $ufID, $randomNumber) = $result;
624 if ($userID && $ufID) {
625 $config = CRM_Core_Config
::singleton();
626 $config->userSystem
->setUserSession(array($userID, $ufID));
629 return self
::authenticateAbort(
630 "ERROR: Unexpected error, could not match userID and contactID",
640 * Authenticate the user against the uf db.
642 * In case of successful authentication, returns an array consisting of
643 * (contactID, ufID, unique string). Returns FALSE if authentication is
646 * @param string $name
648 * @param string $password
650 * @param bool $loadCMSBootstrap
653 * @return false|array
655 public static function authenticate($name, $password, $loadCMSBootstrap = FALSE, $realPath = NULL) {
656 $config = CRM_Core_Config
::singleton();
658 /* Before we do any loading, let's start the session and write to it.
659 * We typically call authenticate only when we need to bootstrap the CMS
660 * directly via Civi and hence bypass the normal CMS auth and bootstrap
661 * process typically done in CLI and cron scripts. See: CRM-12648
663 * Q: Can we move this to the userSystem class so that it can be tuned
664 * per-CMS? For example, when dealing with UnitTests UF, there's no
667 $session = CRM_Core_Session
::singleton();
668 $session->set('civicrmInitSession', TRUE);
670 if ($config->userFrameworkDSN
) {
671 $dbDrupal = DB
::connect($config->userFrameworkDSN
);
673 return $config->userSystem
->authenticate($name, $password, $loadCMSBootstrap, $realPath);
677 * Set a message in the UF to display to a user.
679 * @param string $message
680 * The message to set.
682 public static function setUFMessage($message) {
683 $config = CRM_Core_Config
::singleton();
684 return $config->userSystem
->setMessage($message);
689 * Determine whether a value is null-ish.
692 * The value to check for null.
695 public static function isNull($value) {
696 // FIXME: remove $value = 'null' string test when we upgrade our DAO code to handle passing null in a better way.
697 if (!isset($value) ||
$value === NULL ||
$value === '' ||
$value === 'null') {
700 if (is_array($value)) {
701 // @todo Reuse of the $value variable = asking for trouble.
702 foreach ($value as $key => $value) {
703 if (!self
::isNull($value)) {
713 * Obscure all but the last few digits of a credit card number.
715 * @param string $number
716 * The credit card number to obscure.
718 * (optional) The number of digits to preserve unmodified.
720 * The obscured credit card number.
722 public static function mungeCreditCard($number, $keep = 4) {
723 $number = trim($number);
724 if (empty($number)) {
727 $replace = str_repeat('*', strlen($number) - $keep);
728 return substr_replace($number, $replace, 0, -$keep);
732 * Determine which PHP modules are loaded.
736 private static function parsePHPModules() {
738 phpinfo(INFO_MODULES
);
739 $s = ob_get_contents();
742 $s = strip_tags($s, '<h2><th><td>');
743 $s = preg_replace('/<th[^>]*>([^<]+)<\/th>/', "<info>\\1</info>", $s);
744 $s = preg_replace('/<td[^>]*>([^<]+)<\/td>/', "<info>\\1</info>", $s);
745 $vTmp = preg_split('/(<h2>[^<]+<\/h2>)/', $s, -1, PREG_SPLIT_DELIM_CAPTURE
);
747 for ($i = 1; $i < count($vTmp); $i++
) {
748 if (preg_match('/<h2>([^<]+)<\/h2>/', $vTmp[$i], $vMat)) {
749 $vName = trim($vMat[1]);
750 $vTmp2 = explode("\n", $vTmp[$i +
1]);
751 foreach ($vTmp2 as $vOne) {
752 $vPat = '<info>([^<]+)<\/info>';
753 $vPat3 = "/$vPat\s*$vPat\s*$vPat/";
754 $vPat2 = "/$vPat\s*$vPat/";
756 if (preg_match($vPat3, $vOne, $vMat)) {
757 $vModules[$vName][trim($vMat[1])] = array(trim($vMat[2]), trim($vMat[3]));
760 elseif (preg_match($vPat2, $vOne, $vMat)) {
761 $vModules[$vName][trim($vMat[1])] = trim($vMat[2]);
770 * Get a setting from a loaded PHP module.
772 public static function getModuleSetting($pModuleName, $pSetting) {
773 $vModules = self
::parsePHPModules();
774 return $vModules[$pModuleName][$pSetting];
781 * @return mixed|string
783 public static function memory($title = NULL) {
786 $pid = posix_getpid();
789 $memory = str_replace("\n", '', shell_exec("ps -p" . $pid . " -o rss="));
790 $memory .= ", " . time();
792 CRM_Core_Error
::debug_var($title, $memory);
798 * @param string $name
799 * @param string $mimeType
802 * @param bool $output
803 * @param string $disposition
805 public static function download(
806 $name, $mimeType, &$buffer,
809 $disposition = 'attachment'
811 $now = gmdate('D, d M Y H:i:s') . ' GMT';
813 self
::setHttpHeader('Content-Type', $mimeType);
814 self
::setHttpHeader('Expires', $now);
816 // lem9 & loic1: IE need specific headers
817 $isIE = strstr($_SERVER['HTTP_USER_AGENT'], 'MSIE');
819 $fileString = "filename=\"{$name}.{$ext}\"";
822 $fileString = "filename=\"{$name}\"";
825 self
::setHttpHeader("Content-Disposition", "inline; $fileString");
826 self
::setHttpHeader('Cache-Control', 'must-revalidate, post-check=0, pre-check=0');
827 self
::setHttpHeader('Pragma', 'public');
830 self
::setHttpHeader("Content-Disposition", "$disposition; $fileString");
831 self
::setHttpHeader('Pragma', 'no-cache');
841 * Gather and print (and possibly log) amount of used memory.
843 * @param string $title
845 * (optional) Whether to log the memory usage information.
847 public static function xMemory($title = NULL, $log = FALSE) {
848 $mem = (float ) xdebug_memory_usage() / (float ) (1024);
849 $mem = number_format($mem, 5) . ", " . time();
851 echo "<p>$title: $mem<p>";
853 CRM_Core_Error
::debug_var($title, $mem);
856 echo "<p>$title: $mem<p>";
862 * Take a URL (or partial URL) and make it better.
864 * Currently, URLs pass straight through unchanged unless they are "seriously
865 * malformed" (see http://us2.php.net/parse_url).
868 * The URL to operate on.
872 public static function fixURL($url) {
873 $components = parse_url($url);
879 // at some point we'll add code here to make sure the url is not
880 // something that will mess up up, so we need to clean it up here
885 * Make sure a callback is valid in the current context.
887 * @param string $callback
888 * Name of the function to check.
892 public static function validCallback($callback) {
893 if (self
::$_callbacks === NULL) {
894 self
::$_callbacks = array();
897 if (!array_key_exists($callback, self
::$_callbacks)) {
898 if (strpos($callback, '::') !== FALSE) {
899 list($className, $methodName) = explode('::', $callback);
900 $fileName = str_replace('_', DIRECTORY_SEPARATOR
, $className) . '.php';
901 // ignore errors if any
902 @include_once
$fileName;
903 if (!class_exists($className)) {
904 self
::$_callbacks[$callback] = FALSE;
907 // instantiate the class
908 $object = new $className();
909 if (!method_exists($object, $methodName)) {
910 self
::$_callbacks[$callback] = FALSE;
913 self
::$_callbacks[$callback] = TRUE;
918 self
::$_callbacks[$callback] = function_exists($callback);
921 return self
::$_callbacks[$callback];
925 * Like PHP's built-in explode(), but always return an array of $limit items.
927 * This serves as a wrapper to the PHP explode() function. In the event that
928 * PHP's explode() returns an array with fewer than $limit elements, pad
929 * the end of the array with NULLs.
931 * @param string $separator
932 * @param string $string
936 public static function explode($separator, $string, $limit) {
937 $result = explode($separator, $string, $limit);
938 for ($i = count($result); $i < $limit; $i++
) {
947 * @param bool $addCookie
952 public static function checkURL($url, $addCookie = FALSE) {
953 // make a GET request to $url
954 $ch = curl_init($url);
956 curl_setopt($ch, CURLOPT_COOKIE
, http_build_query($_COOKIE));
958 // it's quite alright to use a self-signed cert
959 curl_setopt($ch, CURLOPT_SSL_VERIFYPEER
, 0);
961 // lets capture the return stuff rather than echo
962 curl_setopt($ch, CURLOPT_RETURNTRANSFER
, TRUE);
964 // CRM-13227, CRM-14744: only return the SSL error status
965 return (curl_exec($ch) !== FALSE);
969 * Assert that we are running on a particular PHP version.
972 * The major version of PHP that is required.
974 * (optional) Whether to fatally abort if the version requirement is not
975 * met. Defaults to TRUE.
977 * Returns TRUE if the requirement is met, FALSE if the requirement is not
978 * met and we're not aborting due to the failed requirement. If $abort is
979 * TRUE and the requirement fails, this function does not return.
981 public static function checkPHPVersion($ver = 5, $abort = TRUE) {
982 $phpVersion = substr(PHP_VERSION
, 0, 1);
983 if ($phpVersion >= $ver) {
988 CRM_Core_Error
::fatal(ts('This feature requires PHP Version %1 or greater',
997 * @param bool $encode
1001 public static function formatWikiURL($string, $encode = FALSE) {
1002 $items = explode(' ', trim($string), 2);
1003 if (count($items) == 2) {
1011 $url = $encode ? self
::urlEncode($items[0]) : $items[0];
1012 return "<a href=\"$url\">$title</a>";
1016 * @param string $url
1018 * @return null|string
1020 public static function urlEncode($url) {
1021 $items = parse_url($url);
1022 if ($items === FALSE) {
1026 if (empty($items['query'])) {
1030 $items['query'] = urlencode($items['query']);
1032 $url = $items['scheme'] . '://';
1033 if (!empty($items['user'])) {
1034 $url .= "{$items['user']}:{$items['pass']}@";
1037 $url .= $items['host'];
1038 if (!empty($items['port'])) {
1039 $url .= ":{$items['port']}";
1042 $url .= "{$items['path']}?{$items['query']}";
1043 if (!empty($items['fragment'])) {
1044 $url .= "#{$items['fragment']}";
1051 * Return the running civicrm version.
1056 public static function version() {
1060 $verFile = implode(DIRECTORY_SEPARATOR
,
1061 array(dirname(__FILE__
), '..', '..', 'civicrm-version.php')
1063 if (file_exists($verFile)) {
1064 require_once $verFile;
1065 if (function_exists('civicrmVersion')) {
1066 $info = civicrmVersion();
1067 $version = $info['version'];
1071 // svn installs don't have version.txt by default. In that case version.xml should help -
1072 $verFile = implode(DIRECTORY_SEPARATOR
,
1073 array(dirname(__FILE__
), '..', '..', 'xml', 'version.xml')
1075 if (file_exists($verFile)) {
1076 $str = file_get_contents($verFile);
1077 $xmlObj = simplexml_load_string($str);
1078 $version = (string) $xmlObj->version_no
;
1083 if (!CRM_Utils_System
::isVersionFormatValid($version)) {
1084 CRM_Core_Error
::fatal('Unknown codebase version.');
1092 * Determines whether a string is a valid CiviCRM version string.
1094 * @param string $version
1095 * Version string to be checked.
1098 public static function isVersionFormatValid($version) {
1099 return preg_match("/^(\d{1,2}\.){2,3}(\d{1,2}|(alpha|beta)\d{1,2})(\.upgrade)?$/", $version);
1103 * Wraps or emulates PHP's getallheaders() function.
1105 public static function getAllHeaders() {
1106 if (function_exists('getallheaders')) {
1107 return getallheaders();
1110 // emulate get all headers
1111 // http://www.php.net/manual/en/function.getallheaders.php#66335
1113 foreach ($_SERVER as $name => $value) {
1114 if (substr($name, 0, 5) == 'HTTP_') {
1115 $headers[str_replace(' ',
1117 ucwords(strtolower(str_replace('_',
1130 public static function getRequestHeaders() {
1131 if (function_exists('apache_request_headers')) {
1132 return apache_request_headers();
1140 * Determine whether this is an SSL request.
1142 * Note that we inline this function in install/civicrm.php, so if you change
1143 * this function, please go and change the code in the install script as well.
1145 public static function isSSL() {
1147 (isset($_SERVER['HTTPS']) &&
1148 !empty($_SERVER['HTTPS']) &&
1149 strtolower($_SERVER['HTTPS']) != 'off') ?
TRUE : FALSE;
1154 public static function redirectToSSL($abort = FALSE) {
1155 $config = CRM_Core_Config
::singleton();
1156 $req_headers = self
::getRequestHeaders();
1157 // FIXME: Shouldn't the X-Forwarded-Proto check be part of CRM_Utils_System::isSSL()?
1158 if (CRM_Core_BAO_Setting
::getItem(CRM_Core_BAO_Setting
::SYSTEM_PREFERENCES_NAME
, 'enableSSL') &&
1160 strtolower(CRM_Utils_Array
::value('X_FORWARDED_PROTO', $req_headers)) != 'https'
1162 // ensure that SSL is enabled on a civicrm url (for cookie reasons etc)
1163 $url = "https://{$_SERVER['HTTP_HOST']}{$_SERVER['REQUEST_URI']}";
1164 if (!self
::checkURL($url, TRUE)) {
1166 CRM_Core_Error
::fatal('HTTPS is not set up on this machine');
1169 CRM_Core_Session
::setStatus(ts('HTTPS is not set up on this machine'), ts('Warning'), 'alert');
1170 // admin should be the only one following this
1171 // since we dont want the user stuck in a bad place
1175 CRM_Utils_System
::redirect($url);
1180 * Get logged in user's IP address.
1182 * Get IP address from HTTP REMOTE_ADDR header. If the CMS is Drupal then use
1183 * the Drupal function as this also handles reverse proxies (based on proper
1184 * configuration in settings.php)
1186 * @param bool $strictIPV4
1187 * (optional) Whether to return only IPv4 addresses.
1190 * IP address of logged in user.
1192 public static function ipAddress($strictIPV4 = TRUE) {
1193 $address = CRM_Utils_Array
::value('REMOTE_ADDR', $_SERVER);
1195 $config = CRM_Core_Config
::singleton();
1196 if ($config->userSystem
->is_drupal
&& function_exists('ip_address')) {
1197 //drupal function handles the server being behind a proxy securely. We still have legacy ipn methods
1198 // that reach this point without bootstrapping hence the check that the fn exists
1199 $address = ip_address();
1203 if ($address == '::1') {
1204 $address = '127.0.0.1';
1207 // when we need to have strictly IPV4 ip address
1208 // convert ipV6 to ipV4
1210 // this converts 'IPV4 mapped IPV6 address' to IPV4
1211 if (filter_var($address, FILTER_VALIDATE_IP
, FILTER_FLAG_IPV6
) && strstr($address, '::ffff:')) {
1212 $address = ltrim($address, '::ffff:');
1220 * Get the referring / previous page URL.
1223 * The previous page URL
1225 public static function refererPath() {
1226 return CRM_Utils_Array
::value('HTTP_REFERER', $_SERVER);
1230 * Get the documentation base URL.
1233 * Base URL of the CRM documentation.
1235 public static function getDocBaseURL() {
1236 // FIXME: move this to configuration at some stage
1237 return 'http://book.civicrm.org/';
1241 * Returns wiki (alternate) documentation URL base.
1246 public static function getWikiBaseURL() {
1247 // FIXME: move this to configuration at some stage
1248 return 'http://wiki.civicrm.org/confluence/display/CRMDOC/';
1252 * Returns URL or link to documentation page, based on provided parameters.
1254 * For use in PHP code.
1255 * WARNING: Always returns URL, if ts function is not defined ($URLonly has
1258 * @param string $page
1259 * Title of documentation wiki page.
1260 * @param bool $URLonly
1261 * (optional) Whether to return URL only or full HTML link (default).
1262 * @param string $text
1263 * (optional) Text of HTML link (no effect if $URLonly = false).
1264 * @param string $title
1265 * (optional) Tooltip text for HTML link (no effect if $URLonly = false)
1266 * @param string $style
1267 * (optional) Style attribute value for HTML link (no effect if $URLonly = false)
1269 * @param null $resource
1272 * URL or link to documentation page, based on provided parameters.
1274 public static function docURL2($page, $URLonly = FALSE, $text = NULL, $title = NULL, $style = NULL, $resource = NULL) {
1275 // if ts function doesn't exist, it means that CiviCRM hasn't been fully initialised yet -
1276 // return just the URL, no matter what other parameters are defined
1277 if (!function_exists('ts')) {
1278 if ($resource == 'wiki') {
1279 $docBaseURL = self
::getWikiBaseURL();
1282 $docBaseURL = self
::getDocBaseURL();
1284 return $docBaseURL . str_replace(' ', '+', $page);
1289 'URLonly' => $URLonly,
1293 'resource' => $resource,
1295 return self
::docURL($params);
1300 * Returns URL or link to documentation page, based on provided parameters.
1302 * For use in templates code.
1304 * @param array $params
1305 * An array of parameters (see CRM_Utils_System::docURL2 method for names)
1307 * @return null|string
1308 * URL or link to documentation page, based on provided parameters.
1310 public static function docURL($params) {
1312 if (!isset($params['page'])) {
1316 if (CRM_Utils_Array
::value('resource', $params) == 'wiki') {
1317 $docBaseURL = self
::getWikiBaseURL();
1320 $docBaseURL = self
::getDocBaseURL();
1323 if (!isset($params['title']) or $params['title'] === NULL) {
1324 $params['title'] = ts('Opens documentation in a new window.');
1327 if (!isset($params['text']) or $params['text'] === NULL) {
1328 $params['text'] = ts('(learn more...)');
1331 if (!isset($params['style']) ||
$params['style'] === NULL) {
1335 $style = "style=\"{$params['style']}\"";
1338 $link = $docBaseURL . str_replace(' ', '+', $params['page']);
1340 if (isset($params['URLonly']) && $params['URLonly'] == TRUE) {
1344 return "<a href=\"{$link}\" $style target=\"_blank\" class=\"crm-doc-link no-popup\" title=\"{$params['title']}\">{$params['text']}</a>";
1349 * Get the locale set in the hosting CMS.
1352 * The used locale or null for none.
1354 public static function getUFLocale() {
1355 $config = CRM_Core_Config
::singleton();
1356 return $config->userSystem
->getUFLocale();
1360 * Execute external or internal URLs and return server response.
1362 * @param string $url
1364 * @param bool $addCookie
1365 * Whether to provide a cookie. Should be true to access internal URLs.
1368 * Response from URL.
1370 public static function getServerResponse($url, $addCookie = TRUE) {
1371 CRM_Core_TemporaryErrorScope
::ignoreException();
1372 require_once 'HTTP/Request.php';
1373 $request = new HTTP_Request($url);
1376 foreach ($_COOKIE as $name => $value) {
1377 $request->addCookie($name, $value);
1381 if (isset($_SERVER['AUTH_TYPE'])) {
1382 $request->setBasicAuth($_SERVER['PHP_AUTH_USER'], $_SERVER['PHP_AUTH_PW']);
1385 $config = CRM_Core_Config
::singleton();
1386 if ($config->userFramework
== 'WordPress') {
1387 session_write_close();
1390 $request->sendRequest();
1391 $response = $request->getResponseBody();
1397 * Exit with provided exit code.
1399 * @param int $status
1400 * (optional) Code with which to exit.
1402 public static function civiExit($status = 0) {
1403 // move things to CiviCRM cache as needed
1404 CRM_Core_Session
::storeSessionObjects();
1410 * Reset the various system caches and some important static variables.
1412 public static function flushCache() {
1413 // flush out all cache entries so we can reload new data
1414 // a bit aggressive, but livable for now
1415 $cache = CRM_Utils_Cache
::singleton();
1418 // also reset the various static memory caches
1420 // reset the memory or array cache
1421 CRM_Core_BAO_Cache
::deleteGroup('contact fields', NULL, FALSE);
1424 CRM_ACL_BAO_Cache
::resetCache();
1426 // reset various static arrays used here
1427 CRM_Contact_BAO_Contact
::$_importableFields = CRM_Contact_BAO_Contact
::$_exportableFields
1428 = CRM_Contribute_BAO_Contribution
::$_importableFields
1429 = CRM_Contribute_BAO_Contribution
::$_exportableFields
1430 = CRM_Pledge_BAO_Pledge
::$_exportableFields = CRM_Contribute_BAO_Query
::$_contributionFields
1431 = CRM_Core_BAO_CustomField
::$_importFields
1432 = CRM_Core_BAO_Cache
::$_cache = CRM_Core_DAO
::$_dbColumnValueCache = NULL;
1434 CRM_Core_OptionGroup
::flushAll();
1435 CRM_Utils_PseudoConstant
::flushAll();
1439 * Load CMS bootstrap.
1441 * @param array $params
1442 * Array with uid name and pass
1443 * @param bool $loadUser
1444 * Boolean load user or not.
1445 * @param bool $throwError
1448 public static function loadBootStrap($params = array(), $loadUser = TRUE, $throwError = TRUE, $realPath = NULL) {
1449 if (!is_array($params)) {
1452 $config = CRM_Core_Config
::singleton();
1453 return $config->userSystem
->loadBootStrap($params, $loadUser, $throwError, $realPath);
1457 * Check if user is logged in.
1461 public static function isUserLoggedIn() {
1462 $config = CRM_Core_Config
::singleton();
1463 return $config->userSystem
->isUserLoggedIn();
1467 * Get current logged in user id.
1470 * ufId, currently logged in user uf id.
1472 public static function getLoggedInUfID() {
1473 $config = CRM_Core_Config
::singleton();
1474 return $config->userSystem
->getLoggedInUfID();
1479 public static function baseCMSURL() {
1480 static $_baseURL = NULL;
1482 $config = CRM_Core_Config
::singleton();
1483 $_baseURL = $userFrameworkBaseURL = $config->userFrameworkBaseURL
;
1485 if ($config->userFramework
== 'Joomla') {
1487 // we need to remove the administrator/ from the end
1488 $_baseURL = str_replace("/administrator/", "/", $userFrameworkBaseURL);
1492 global $civicrm_root;
1493 if (strpos($civicrm_root,
1494 DIRECTORY_SEPARATOR
. 'sites' .
1495 DIRECTORY_SEPARATOR
. 'all' .
1496 DIRECTORY_SEPARATOR
. 'modules'
1499 $startPos = strpos($civicrm_root,
1500 DIRECTORY_SEPARATOR
. 'sites' . DIRECTORY_SEPARATOR
1502 $endPos = strpos($civicrm_root,
1503 DIRECTORY_SEPARATOR
. 'modules' . DIRECTORY_SEPARATOR
1505 if ($startPos && $endPos) {
1506 // if component is in sites/SITENAME/modules
1507 $siteName = substr($civicrm_root,
1509 $endPos - $startPos - 7
1512 $_baseURL = $userFrameworkBaseURL . "sites/$siteName/";
1521 * Given a URL, return a relative URL if possible.
1523 * @param string $url
1526 public static function relativeURL($url) {
1527 // check if url is relative, if so return immediately
1528 if (substr($url, 0, 4) != 'http') {
1532 // make everything relative from the baseFilePath
1533 $baseURL = self
::baseCMSURL();
1535 // check if baseURL is a substr of $url, if so
1536 // return rest of string
1537 if (substr($url, 0, strlen($baseURL)) == $baseURL) {
1538 return substr($url, strlen($baseURL));
1541 // return the original value
1546 * Produce an absolute URL from a possibly-relative URL.
1548 * @param string $url
1549 * @param bool $removeLanguagePart
1553 public static function absoluteURL($url, $removeLanguagePart = FALSE) {
1554 // check if url is already absolute, if so return immediately
1555 if (substr($url, 0, 4) == 'http') {
1559 // make everything absolute from the baseFileURL
1560 $baseURL = self
::baseCMSURL();
1562 //CRM-7622: drop the language from the URL if requested (and it’s there)
1563 $config = CRM_Core_Config
::singleton();
1564 if ($removeLanguagePart) {
1565 $baseURL = self
::languageNegotiationURL($baseURL, FALSE, TRUE);
1568 return $baseURL . $url;
1572 * Clean url, replaces first '&' with '?'
1574 * @param string $url
1579 public static function cleanUrl($url) {
1584 if ($pos = strpos($url, '&')) {
1585 $url = substr_replace($url, '?', $pos, 1);
1592 * Format the url as per language Negotiation.
1594 * @param string $url
1596 * @param bool $addLanguagePart
1597 * @param bool $removeLanguagePart
1602 public static function languageNegotiationURL(
1604 $addLanguagePart = TRUE,
1605 $removeLanguagePart = FALSE
1607 $config = &CRM_Core_Config
::singleton();
1608 return $config->userSystem
->languageNegotiationURL($url, $addLanguagePart, $removeLanguagePart);
1612 * Append the contents of an 'extra' smarty template file if it is present in
1613 * the custom template directory. This does not work if there are
1614 * multiple custom template directories
1616 * @param string $fileName
1617 * The name of the tpl file that we are processing.
1618 * @param string $content
1619 * The current content string. May be modified by this function.
1620 * @param string $overideFileName
1621 * (optional) Sent by contribution/event reg/profile pages which uses a id
1622 * specific extra file name if present.
1624 public static function appendTPLFile(
1627 $overideFileName = NULL
1629 $template = CRM_Core_Smarty
::singleton();
1630 if ($overideFileName) {
1631 $additionalTPLFile = $overideFileName;
1634 $additionalTPLFile = str_replace('.tpl', '.extra.tpl', $fileName);
1637 if ($template->template_exists($additionalTPLFile)) {
1638 $content .= $template->fetch($additionalTPLFile);
1643 * Get a list of all files that are found within the directories
1644 * that are the result of appending the provided relative path to
1645 * each component of the PHP include path.
1647 * @author Ken Zalewski
1649 * @param string $relpath
1650 * A relative path, typically pointing to a directory with multiple class
1654 * An array of files that exist in one or more of the directories that are
1655 * referenced by the relative path when appended to each element of the PHP
1658 public static function listIncludeFiles($relpath) {
1659 $file_list = array();
1660 $inc_dirs = explode(PATH_SEPARATOR
, get_include_path());
1661 foreach ($inc_dirs as $inc_dir) {
1662 $target_dir = $inc_dir . DIRECTORY_SEPARATOR
. $relpath;
1663 if (is_dir($target_dir)) {
1664 $cur_list = scandir($target_dir);
1665 foreach ($cur_list as $fname) {
1666 if ($fname != '.' && $fname != '..') {
1667 $file_list[$fname] = $fname;
1674 // listIncludeFiles()
1677 * Get a list of all "plugins" (PHP classes that implement a piece of
1678 * functionality using a well-defined interface) that are found in a
1679 * particular CiviCRM directory (both custom and core are searched).
1681 * @author Ken Zalewski
1683 * @param string $relpath
1684 * A relative path referencing a directory that contains one or more
1686 * @param string $fext
1687 * (optional) Only files with this extension will be considered to be
1689 * @param array $skipList
1690 * (optional) List of files to skip.
1693 * List of plugins, where the plugin name is both the key and the value of
1696 public static function getPluginList($relpath, $fext = '.php', $skipList = array()) {
1697 $fext_len = strlen($fext);
1699 $inc_files = CRM_Utils_System
::listIncludeFiles($relpath);
1700 foreach ($inc_files as $inc_file) {
1701 if (substr($inc_file, 0 - $fext_len) == $fext) {
1702 $plugin_name = substr($inc_file, 0, 0 - $fext_len);
1703 if (!in_array($plugin_name, $skipList)) {
1704 $plugins[$plugin_name] = $plugin_name;
1714 public static function executeScheduledJobs() {
1715 $facility = new CRM_Core_JobManager();
1716 $facility->execute(FALSE);
1718 $redirectUrl = self
::url('civicrm/admin/job', 'reset=1');
1720 CRM_Core_Session
::setStatus(
1721 ts('Scheduled jobs have been executed according to individual timing settings. Please check log for messages.'),
1722 ts('Complete'), 'success');
1724 CRM_Utils_System
::redirect($redirectUrl);
1728 * Evaluate any tokens in a URL.
1730 * @param string|FALSE $url
1731 * @return string|FALSE
1733 public static function evalUrl($url) {
1734 if ($url === FALSE) {
1738 $config = CRM_Core_Config
::singleton();
1740 '{ver}' => CRM_Utils_System
::version(),
1741 '{uf}' => $config->userFramework
,
1742 '{php}' => phpversion(),
1743 '{sid}' => md5('sid_' . (defined('CIVICRM_SITE_KEY') ? CIVICRM_SITE_KEY
: '') . '_' . $config->userFrameworkBaseURL
),
1744 '{baseUrl}' => $config->userFrameworkBaseURL
,
1745 '{lang}' => $config->lcMessages
,
1746 '{co}' => $config->defaultContactCountry
,
1748 foreach (array_keys($vars) as $k) {
1749 $vars[$k] = urlencode($vars[$k]);
1751 return strtr($url, $vars);
1757 * Determine whether this is a developmental system.
1761 public static function isDevelopment() {
1762 static $cache = NULL;
1763 if ($cache === NULL) {
1764 global $civicrm_root;
1765 $cache = file_exists("{$civicrm_root}/.svn") ||
file_exists("{$civicrm_root}/.git");
1773 public static function isInUpgradeMode() {
1774 $args = explode('/', $_GET['q']);
1775 $upgradeInProcess = CRM_Core_Session
::singleton()->get('isUpgradePending');
1776 if ((isset($args[1]) && $args[1] == 'upgrade') ||
$upgradeInProcess) {
1785 * Determine the standard URL for viewing or editing the specified link.
1787 * This function delegates the decision-making to (a) the hook system and
1788 * (b) the BAO system.
1790 * @param array $crudLinkSpec
1792 * - action: int, CRM_Core_Action::UPDATE or CRM_Core_Action::VIEW [default: VIEW]
1793 * - entity_table: string, eg "civicrm_contact"
1795 * @return array|NULL
1796 * NULL if unavailable, or an array. array has keys:
1802 public static function createDefaultCrudLink($crudLinkSpec) {
1803 $crudLinkSpec['action'] = CRM_Utils_Array
::value('action', $crudLinkSpec, CRM_Core_Action
::VIEW
);
1804 $daoClass = CRM_Core_DAO_AllCoreTables
::getClassForTable($crudLinkSpec['entity_table']);
1809 $baoClass = str_replace('_DAO_', '_BAO_', $daoClass);
1810 if (!class_exists($baoClass)) {
1814 $bao = new $baoClass();
1815 $bao->id
= $crudLinkSpec['entity_id'];
1816 if (!$bao->find(TRUE)) {
1821 CRM_Utils_Hook
::crudLink($crudLinkSpec, $bao, $link);
1822 if (empty($link) && is_callable(array($bao, 'createDefaultCrudLink'))) {
1823 $link = $bao->createDefaultCrudLink($crudLinkSpec);
1826 if (!empty($link)) {
1827 if (!isset($link['url'])) {
1828 $link['url'] = self
::url($link['path'], $link['query'], TRUE, NULL, FALSE);
1837 * @param string $name
1838 * @param string $value
1840 public static function setHttpHeader($name, $value) {
1841 CRM_Core_Config
::singleton()->userSystem
->setHttpHeader($name, $value);