3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.7 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2018 |
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 +--------------------------------------------------------------------+
29 * This file contains the various menus of the CiviCRM module
32 * @copyright CiviCRM LLC (c) 2004-2018
35 require_once 'CRM/Core/I18n.php';
38 * Class CRM_Core_Menu.
43 * The list of menu items.
47 static $_items = NULL;
50 * The list of permissioned menu items.
54 static $_permissionedItems = NULL;
56 static $_serializedElements = array(
64 static $_menuCache = NULL;
68 * This function fetches the menu items from xml and xmlMenu hooks.
70 * @param bool $fetchFromXML
71 * Fetch the menu items from xml and not from cache.
75 public static function &xmlItems($fetchFromXML = FALSE) {
76 if (!self
::$_items ||
$fetchFromXML) {
77 $config = CRM_Core_Config
::singleton();
79 // We needs this until Core becomes a component
80 $coreMenuFilesNamespace = 'CRM_Core_xml_Menu';
81 $coreMenuFilesPath = str_replace('_', DIRECTORY_SEPARATOR
, $coreMenuFilesNamespace);
83 $files = CRM_Utils_File
::getFilesByExtension($civicrm_root . DIRECTORY_SEPARATOR
. $coreMenuFilesPath, 'xml');
85 // Grab component menu files
86 $files = array_merge($files,
87 CRM_Core_Component
::xmlMenu()
90 // lets call a hook and get any additional files if needed
91 CRM_Utils_Hook
::xmlMenu($files);
93 self
::$_items = array();
94 foreach ($files as $file) {
95 self
::read($file, self
::$_items);
98 CRM_Utils_Hook
::alterMenu(self
::$_items);
101 return self
::$_items;
107 * @param string $name
110 * An alterable list of menu items.
114 public static function read($name, &$menu) {
115 $xml = simplexml_load_file($name);
116 self
::readXML($xml, $menu);
120 * @param SimpleXMLElement $xml
121 * An XML document defining a list of menu items.
123 * An alterable list of menu items.
125 public static function readXML($xml, &$menu) {
126 $config = CRM_Core_Config
::singleton();
127 foreach ($xml->item
as $item) {
128 if (!(string ) $item->path
) {
129 CRM_Core_Error
::debug('i', $item);
130 CRM_Core_Error
::fatal();
132 $path = (string ) $item->path
;
133 $menu[$path] = array();
136 if ($item->ids_arguments
) {
138 foreach (array('json' => 'json', 'html' => 'html', 'exception' => 'exceptions') as $tag => $attr) {
139 $ids[$attr] = array();
140 foreach ($item->ids_arguments
->{$tag} as $value) {
141 $ids[$attr][] = (string) $value;
144 $menu[$path]['ids_arguments'] = $ids;
145 unset($item->ids_arguments
);
148 foreach ($item as $key => $value) {
149 $key = (string ) $key;
150 $value = (string ) $value;
151 if (strpos($key, '_callback') &&
154 // FIXME Remove the rewrite at this level. Instead, change downstream call_user_func*($value)
155 // to call_user_func*(Civi\Core\Resolver::singleton()->get($value)).
156 $value = explode('::', $value);
158 elseif ($key == 'access_arguments') {
159 // FIXME Move the permission parser to its own class (or *maybe* CRM_Core_Permission).
160 if (strpos($value, ',') ||
163 if (strpos($value, ',')) {
164 $elements = explode(',', $value);
168 $elements = explode(';', $value);
172 foreach ($elements as $element) {
175 $value = array($items, $op);
178 $value = array(array($value), 'and');
181 elseif ($key == 'is_public' ||
$key == 'is_ssl') {
182 $value = ($value == 'true' ||
$value == 1) ?
1 : 0;
184 $menu[$path][$key] = $value;
190 * This function defines information for various menu items.
192 * @param bool $fetchFromXML
193 * Fetch the menu items from xml and not from cache.
197 public static function &items($fetchFromXML = FALSE) {
198 return self
::xmlItems($fetchFromXML);
202 * Is array true (whatever that means!).
204 * @param array $values
208 public static function isArrayTrue(&$values) {
209 foreach ($values as $name => $value) {
221 * @param string $path
225 public static function fillMenuValues(&$menu, $path) {
226 $fieldsToPropagate = array(
233 $fieldsPresent = array();
234 foreach ($fieldsToPropagate as $field) {
235 $fieldsPresent[$field] = CRM_Utils_Array
::value($field, $menu[$path]) !== NULL ?
TRUE : FALSE;
238 $args = explode('/', $path);
239 while (!self
::isArrayTrue($fieldsPresent) && !empty($args)) {
242 $parentPath = implode('/', $args);
244 foreach ($fieldsToPropagate as $field) {
245 if (!$fieldsPresent[$field]) {
246 if (CRM_Utils_Array
::value($field, CRM_Utils_Array
::value($parentPath, $menu)) !== NULL) {
247 $fieldsPresent[$field] = TRUE;
248 $menu[$path][$field] = $menu[$parentPath][$field];
254 if (self
::isArrayTrue($fieldsPresent)) {
259 foreach ($fieldsToPropagate as $field) {
260 if (!$fieldsPresent[$field]) {
261 $messages[] = ts("Could not find %1 in path tree",
266 CRM_Core_Error
::fatal("'$path': " . implode(', ', $messages));
270 * We use this function to.
272 * 1. Compute the breadcrumb
273 * 2. Compute local tasks value if any
274 * 3. Propagate access argument, access callback, page callback to the menu item
275 * 4. Build the global navigation block
279 public static function build(&$menu) {
280 foreach ($menu as $path => $menuItems) {
281 self
::buildBreadcrumb($menu, $path);
282 self
::fillMenuValues($menu, $path);
283 self
::fillComponentIds($menu, $path);
284 self
::buildReturnUrl($menu, $path);
286 // add add page_type if not present
287 if (!isset($menu[$path]['page_type'])) {
288 $menu[$path]['page_type'] = 0;
292 self
::buildAdminLinks($menu);
296 * This function recomputes menu from xml and populates civicrm_menu.
298 * @param bool $truncate
300 public static function store($truncate = TRUE) {
301 // first clean up the db
303 $query = 'TRUNCATE civicrm_menu';
304 CRM_Core_DAO
::executeQuery($query);
306 $menuArray = self
::items($truncate);
308 self
::build($menuArray);
310 $config = CRM_Core_Config
::singleton();
311 $daoFields = CRM_Core_DAO_Menu
::fields();
313 foreach ($menuArray as $path => $item) {
314 $menu = new CRM_Core_DAO_Menu();
316 $menu->domain_id
= CRM_Core_Config
::domainID();
320 if (!CRM_Core_Config
::isUpgradeMode() ||
321 CRM_Core_DAO
::checkFieldExists('civicrm_menu', 'module_data', FALSE)
323 // Move unrecognized fields to $module_data.
324 $module_data = array();
325 foreach (array_keys($item) as $key) {
326 if (!isset($daoFields[$key])) {
327 $module_data[$key] = $item[$key];
332 $menu->module_data
= serialize($module_data);
335 $menu->copyValues($item);
337 foreach (self
::$_serializedElements as $element) {
338 if (!isset($item[$element]) ||
339 $item[$element] == 'null'
341 $menu->$element = NULL;
344 $menu->$element = serialize($item[$element]);
357 public static function buildAdminLinks(&$menu) {
360 foreach ($menu as $path => $item) {
361 if (empty($item['adminGroup'])) {
365 $query = !empty($item['path_arguments']) ?
str_replace(',', '&', $item['path_arguments']) . '&reset=1' : 'reset=1';
368 'title' => $item['title'],
369 'desc' => CRM_Utils_Array
::value('desc', $item),
370 'id' => strtr($item['title'], array(
378 'url' => CRM_Utils_System
::url($path, $query,
383 // forceBackend; CRM-14439 work-around; acceptable for now because we don't display breadcrumbs on frontend
386 'icon' => CRM_Utils_Array
::value('icon', $item),
387 'extra' => CRM_Utils_Array
::value('extra', $item),
389 if (!array_key_exists($item['adminGroup'], $values)) {
390 $values[$item['adminGroup']] = array();
391 $values[$item['adminGroup']]['fields'] = array();
393 $weight = CRM_Utils_Array
::value('weight', $item, 0);
394 $values[$item['adminGroup']]['fields']["{weight}.{$item['title']}"] = $value;
395 $values[$item['adminGroup']]['component_id'] = $item['component_id'];
398 foreach ($values as $group => $dontCare) {
399 $values[$group]['perColumn'] = round(count($values[$group]['fields']) / 2);
400 ksort($values[$group]);
403 $menu['admin'] = array('breadcrumb' => $values);
414 public static function &getNavigation($all = FALSE) {
415 CRM_Core_Error
::fatal();
417 if (!self
::$_menuCache) {
418 self
::get('navigation');
421 if (CRM_Core_Config
::isUpgradeMode()) {
425 if (!array_key_exists('navigation', self
::$_menuCache)) {
426 // problem could be due to menu table empty. Just do a
427 // menu store and try again
431 self
::get('navigation');
432 if (!array_key_exists('navigation', self
::$_menuCache)) {
433 CRM_Core_Error
::fatal();
436 $nav = &self
::$_menuCache['navigation'];
439 !isset($nav['breadcrumb'])
444 $values = &$nav['breadcrumb'];
445 $config = CRM_Core_Config
::singleton();
446 foreach ($values as $index => $item) {
447 if (strpos(CRM_Utils_Array
::value($config->userFrameworkURLVar
, $_REQUEST),
451 $values[$index]['active'] = 'class="active"';
454 $values[$index]['active'] = '';
457 if ($values[$index]['parent']) {
458 $parent = $values[$index]['parent'];
460 // only reset if still a leaf
461 if ($values[$parent]['class'] == 'leaf') {
462 $values[$parent]['class'] = 'collapsed';
465 // if a child or the parent is active, expand the menu
466 if ($values[$index]['active'] ||
467 $values[$parent]['active']
469 $values[$parent]['class'] = 'expanded';
472 // make the parent inactive if the child is active
473 if ($values[$index]['active'] &&
474 $values[$parent]['active']
476 $values[$parent]['active'] = '';
482 // remove all collapsed menu items from the array
483 foreach ($values as $weight => $v) {
485 $values[$v['parent']]['class'] == 'collapsed'
487 unset($values[$weight]);
492 // check permissions for the rest
493 $activeChildren = array();
495 foreach ($values as $weight => $v) {
496 if (CRM_Core_Permission
::checkMenuItem($v)) {
498 $activeChildren[] = $weight;
502 unset($values[$weight]);
506 // add the start / end tags
507 $len = count($activeChildren) - 1;
509 $values[$activeChildren[0]]['start'] = TRUE;
510 $values[$activeChildren[$len]]['end'] = TRUE;
513 ksort($values, SORT_NUMERIC
);
514 $i18n = CRM_Core_I18n
::singleton();
515 $i18n->localizeTitles($values);
525 public static function &getAdminLinks() {
526 $links = self
::get('admin');
529 !isset($links['breadcrumb'])
534 $values = &$links['breadcrumb'];
539 * Get the breadcrumb for a given path.
542 * An array of all the menu items.
543 * @param string $path
544 * Path for which breadcrumb is to be build.
547 * The breadcrumb for this path
549 public static function buildBreadcrumb(&$menu, $path) {
552 $pathElements = explode('/', $path);
553 array_pop($pathElements);
556 while ($newPath = array_shift($pathElements)) {
557 $currentPath = $currentPath ?
($currentPath . '/' . $newPath) : $newPath;
559 // when we come across breadcrumb which involves ids,
560 // we should skip now and later on append dynamically.
561 if (isset($menu[$currentPath]['skipBreadcrumb'])) {
565 // add to crumb, if current-path exists in params.
566 if (array_key_exists($currentPath, $menu) &&
567 isset($menu[$currentPath]['title'])
569 $urlVar = !empty($menu[$currentPath]['path_arguments']) ?
'&' . $menu[$currentPath]['path_arguments'] : '';
571 'title' => $menu[$currentPath]['title'],
572 'url' => CRM_Utils_System
::url($currentPath,
578 TRUE // forceBackend; CRM-14439 work-around; acceptable for now because we don't display breadcrumbs on frontend
583 $menu[$path]['breadcrumb'] = $crumbs;
592 public static function buildReturnUrl(&$menu, $path) {
593 if (!isset($menu[$path]['return_url'])) {
594 list($menu[$path]['return_url'], $menu[$path]['return_url_args']) = self
::getReturnUrl($menu, $path);
604 public static function getReturnUrl(&$menu, $path) {
605 if (!isset($menu[$path]['return_url'])) {
606 $pathElements = explode('/', $path);
607 array_pop($pathElements);
609 if (empty($pathElements)) {
610 return array(NULL, NULL);
612 $newPath = implode('/', $pathElements);
614 return self
::getReturnUrl($menu, $newPath);
618 CRM_Utils_Array
::value('return_url',
621 CRM_Utils_Array
::value('return_url_args',
632 public static function fillComponentIds(&$menu, $path) {
633 static $cache = array();
635 if (array_key_exists('component_id', $menu[$path])) {
639 $args = explode('/', $path);
641 if (count($args) > 1) {
642 $compPath = $args[0] . '/' . $args[1];
645 $compPath = $args[0];
650 if (array_key_exists($compPath, $cache)) {
651 $menu[$path]['component_id'] = $cache[$compPath];
654 if (CRM_Utils_Array
::value('component', CRM_Utils_Array
::value($compPath, $menu))) {
655 $componentId = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_Component',
656 $menu[$compPath]['component'],
660 $menu[$path]['component_id'] = $componentId ?
$componentId : NULL;
661 $cache[$compPath] = $menu[$path]['component_id'];
666 * @param $path string
667 * Path of menu item to retrieve.
672 public static function get($path) {
673 // return null if menu rebuild
674 $config = CRM_Core_Config
::singleton();
678 $args = explode('/', $path);
681 while (!empty($args)) {
682 $string = implode('/', $args);
683 $string = CRM_Core_DAO
::escapeString($string);
684 $elements[] = "'{$string}'";
688 $queryString = implode(', ', $elements);
689 $domainID = CRM_Core_Config
::domainID();
690 $domainWhereClause = " AND domain_id = $domainID ";
691 if ($config->isUpgradeMode() &&
692 !CRM_Core_DAO
::checkFieldExists('civicrm_menu', 'domain_id')
694 //domain_id wouldn't be available for earlier version of
695 //3.0 and therefore can't be used as part of query for
697 $domainWhereClause = "";
704 WHERE path in ( $queryString )
706 ORDER BY length(path) DESC
711 if ($path != 'navigation') {
716 WHERE path IN ( 'navigation' )
722 $menu = new CRM_Core_DAO_Menu();
723 $menu->query($query);
725 self
::$_menuCache = array();
727 while ($menu->fetch()) {
728 self
::$_menuCache[$menu->path
] = array();
729 CRM_Core_DAO
::storeValues($menu, self
::$_menuCache[$menu->path
]);
731 // Move module_data into main item.
732 if (isset(self
::$_menuCache[$menu->path
]['module_data'])) {
733 CRM_Utils_Array
::extend(self
::$_menuCache[$menu->path
],
734 unserialize(self
::$_menuCache[$menu->path
]['module_data']));
735 unset(self
::$_menuCache[$menu->path
]['module_data']);
738 // Unserialize other elements.
739 foreach (self
::$_serializedElements as $element) {
740 self
::$_menuCache[$menu->path
][$element] = unserialize($menu->$element);
742 if (strpos($path, $menu->path
) !== FALSE) {
743 $menuPath = &self
::$_menuCache[$menu->path
];
748 if (strstr($path, 'report/instance')) {
749 $args = explode('/', $path);
750 if (is_numeric(end($args))) {
751 $menuPath['path'] .= '/' . end($args);
755 // *FIXME* : hack for 2.1 -> 2.2 upgrades.
756 if ($path == 'civicrm/upgrade') {
757 $menuPath['page_callback'] = 'CRM_Upgrade_Page_Upgrade';
758 $menuPath['access_arguments'][0][] = 'administer CiviCRM';
759 $menuPath['access_callback'] = array('CRM_Core_Permission', 'checkMenu');
761 // *FIXME* : hack for 4.1 -> 4.2 upgrades.
762 if (preg_match('/^civicrm\/(upgrade\/)?queue\//', $path)) {
763 CRM_Queue_Menu
::alter($path, $menuPath);
766 // Part of upgrade framework but not run inside main upgrade because it deletes data
767 // Once we have another example of a 'cleanup' we should generalize the clause below so it grabs string
768 // which follows upgrade/ and checks for existence of a function in Cleanup class.
769 if ($path == 'civicrm/upgrade/cleanup425') {
770 $menuPath['page_callback'] = array('CRM_Upgrade_Page_Cleanup', 'cleanup425');
771 $menuPath['access_arguments'][0][] = 'administer CiviCRM';
772 $menuPath['access_callback'] = array('CRM_Core_Permission', 'checkMenu');
775 if (!empty($menuPath)) {
776 $i18n = CRM_Core_I18n
::singleton();
777 $i18n->localizeTitles($menuPath);
787 public static function getArrayForPathArgs($pathArgs) {
788 if (!is_string($pathArgs)) {
793 $elements = explode(',', $pathArgs);
794 foreach ($elements as $keyVal) {
795 list($key, $val) = explode('=', $keyVal, 2);
799 if (array_key_exists('urlToSession', $arr)) {
800 $urlToSession = array();
802 $params = explode(';', $arr['urlToSession']);
804 foreach ($params as $keyVal) {
805 list($urlToSession[$count]['urlVar'],
806 $urlToSession[$count]['sessionVar'],
807 $urlToSession[$count]['type'],
808 $urlToSession[$count]['default']
809 ) = explode(':', $keyVal);
812 $arr['urlToSession'] = $urlToSession;