3 +--------------------------------------------------------------------+
4 | Copyright CiviCRM LLC. All rights reserved. |
6 | This work is published under the GNU AGPLv3 license with some |
7 | permitted exceptions and without any warranty. For full license |
8 | and copyright information, see https://civicrm.org/licensing |
9 +--------------------------------------------------------------------+
13 * This file contains the various menus of the CiviCRM module
16 * @copyright CiviCRM LLC https://civicrm.org/licensing
19 require_once 'CRM/Core/I18n.php';
22 * Class CRM_Core_Menu.
27 * The list of menu items.
31 public static $_items = NULL;
34 * The list of permissioned menu items.
38 public static $_permissionedItems = NULL;
40 public static $_serializedElements = array(
48 public static $_menuCache = NULL;
52 * This function fetches the menu items from xml and xmlMenu hooks.
54 * @param bool $fetchFromXML
55 * Fetch the menu items from xml and not from cache.
59 public static function &xmlItems($fetchFromXML = FALSE) {
60 if (!self
::$_items ||
$fetchFromXML) {
61 $config = CRM_Core_Config
::singleton();
63 // We needs this until Core becomes a component
64 $coreMenuFilesNamespace = 'CRM_Core_xml_Menu';
65 $coreMenuFilesPath = str_replace('_', DIRECTORY_SEPARATOR
, $coreMenuFilesNamespace);
67 $files = CRM_Utils_File
::getFilesByExtension($civicrm_root . DIRECTORY_SEPARATOR
. $coreMenuFilesPath, 'xml');
69 // Grab component menu files
70 $files = array_merge($files,
71 CRM_Core_Component
::xmlMenu()
74 // lets call a hook and get any additional files if needed
75 CRM_Utils_Hook
::xmlMenu($files);
77 self
::$_items = array();
78 foreach ($files as $file) {
79 self
::read($file, self
::$_items);
82 CRM_Utils_Hook
::alterMenu(self
::$_items);
94 * An alterable list of menu items.
98 public static function read($name, &$menu) {
99 $xml = simplexml_load_file($name);
100 self
::readXML($xml, $menu);
104 * @param SimpleXMLElement $xml
105 * An XML document defining a list of menu items.
107 * An alterable list of menu items.
109 public static function readXML($xml, &$menu) {
110 $config = CRM_Core_Config
::singleton();
111 foreach ($xml->item
as $item) {
112 if (!(string ) $item->path
) {
113 CRM_Core_Error
::debug('i', $item);
114 CRM_Core_Error
::fatal();
116 $path = (string ) $item->path
;
117 $menu[$path] = array();
120 if ($item->ids_arguments
) {
122 foreach (array('json' => 'json', 'html' => 'html', 'exception' => 'exceptions') as $tag => $attr) {
123 $ids[$attr] = array();
124 foreach ($item->ids_arguments
->{$tag} as $value) {
125 $ids[$attr][] = (string) $value;
128 $menu[$path]['ids_arguments'] = $ids;
129 unset($item->ids_arguments
);
132 foreach ($item as $key => $value) {
133 $key = (string ) $key;
134 $value = (string ) $value;
135 if (strpos($key, '_callback') &&
138 // FIXME Remove the rewrite at this level. Instead, change downstream call_user_func*($value)
139 // to call_user_func*(Civi\Core\Resolver::singleton()->get($value)).
140 $value = explode('::', $value);
142 elseif ($key == 'access_arguments') {
143 // FIXME Move the permission parser to its own class (or *maybe* CRM_Core_Permission).
144 if (strpos($value, ',') ||
147 if (strpos($value, ',')) {
148 $elements = explode(',', $value);
152 $elements = explode(';', $value);
156 foreach ($elements as $element) {
159 $value = array($items, $op);
162 $value = array(array($value), 'and');
165 elseif ($key == 'is_public' ||
$key == 'is_ssl') {
166 $value = ($value == 'true' ||
$value == 1) ?
1 : 0;
168 $menu[$path][$key] = $value;
174 * This function defines information for various menu items.
176 * @param bool $fetchFromXML
177 * Fetch the menu items from xml and not from cache.
181 public static function &items($fetchFromXML = FALSE) {
182 return self
::xmlItems($fetchFromXML);
186 * Is array true (whatever that means!).
188 * @param array $values
192 public static function isArrayTrue(&$values) {
193 foreach ($values as $name => $value) {
205 * @param string $path
209 public static function fillMenuValues(&$menu, $path) {
210 $fieldsToPropagate = array(
217 $fieldsPresent = array();
218 foreach ($fieldsToPropagate as $field) {
219 $fieldsPresent[$field] = CRM_Utils_Array
::value($field, $menu[$path]) !== NULL ?
TRUE : FALSE;
222 $args = explode('/', $path);
223 while (!self
::isArrayTrue($fieldsPresent) && !empty($args)) {
226 $parentPath = implode('/', $args);
228 foreach ($fieldsToPropagate as $field) {
229 if (!$fieldsPresent[$field]) {
230 if (CRM_Utils_Array
::value($field, CRM_Utils_Array
::value($parentPath, $menu)) !== NULL) {
231 $fieldsPresent[$field] = TRUE;
232 $menu[$path][$field] = $menu[$parentPath][$field];
238 if (self
::isArrayTrue($fieldsPresent)) {
243 foreach ($fieldsToPropagate as $field) {
244 if (!$fieldsPresent[$field]) {
245 $messages[] = ts("Could not find %1 in path tree",
250 CRM_Core_Error
::fatal("'$path': " . implode(', ', $messages));
254 * We use this function to.
256 * 1. Compute the breadcrumb
257 * 2. Compute local tasks value if any
258 * 3. Propagate access argument, access callback, page callback to the menu item
259 * 4. Build the global navigation block
263 public static function build(&$menu) {
264 foreach ($menu as $path => $menuItems) {
265 self
::buildBreadcrumb($menu, $path);
266 self
::fillMenuValues($menu, $path);
267 self
::fillComponentIds($menu, $path);
268 self
::buildReturnUrl($menu, $path);
270 // add add page_type if not present
271 if (!isset($menu[$path]['page_type'])) {
272 $menu[$path]['page_type'] = 0;
276 self
::buildAdminLinks($menu);
280 * This function recomputes menu from xml and populates civicrm_menu.
282 * @param bool $truncate
284 public static function store($truncate = TRUE) {
285 // first clean up the db
287 $query = 'TRUNCATE civicrm_menu';
288 CRM_Core_DAO
::executeQuery($query);
290 $menuArray = self
::items($truncate);
292 self
::build($menuArray);
294 $daoFields = CRM_Core_DAO_Menu
::fields();
296 foreach ($menuArray as $path => $item) {
297 $menu = new CRM_Core_DAO_Menu();
299 $menu->domain_id
= CRM_Core_Config
::domainID();
303 if (!CRM_Core_Config
::isUpgradeMode() ||
304 CRM_Core_BAO_SchemaHandler
::checkIfFieldExists('civicrm_menu', 'module_data', FALSE)
306 // Move unrecognized fields to $module_data.
307 $module_data = array();
308 foreach (array_keys($item) as $key) {
309 if (!isset($daoFields[$key])) {
310 $module_data[$key] = $item[$key];
315 $menu->module_data
= serialize($module_data);
318 $menu->copyValues($item);
320 foreach (self
::$_serializedElements as $element) {
321 if (!isset($item[$element]) ||
322 $item[$element] == 'null'
324 $menu->$element = NULL;
327 $menu->$element = serialize($item[$element]);
340 public static function buildAdminLinks(&$menu) {
343 foreach ($menu as $path => $item) {
344 if (empty($item['adminGroup'])) {
348 $query = !empty($item['path_arguments']) ?
str_replace(',', '&', $item['path_arguments']) . '&reset=1' : 'reset=1';
351 'title' => $item['title'],
352 'desc' => CRM_Utils_Array
::value('desc', $item),
353 'id' => strtr($item['title'], array(
360 'url' => CRM_Utils_System
::url($path, $query,
365 // forceBackend; CRM-14439 work-around; acceptable for now because we don't display breadcrumbs on frontend
368 'icon' => CRM_Utils_Array
::value('icon', $item),
369 'extra' => CRM_Utils_Array
::value('extra', $item),
371 if (!array_key_exists($item['adminGroup'], $values)) {
372 $values[$item['adminGroup']] = array();
373 $values[$item['adminGroup']]['fields'] = array();
375 $weight = CRM_Utils_Array
::value('weight', $item, 0);
376 $values[$item['adminGroup']]['fields']["{weight}.{$item['title']}"] = $value;
377 $values[$item['adminGroup']]['component_id'] = $item['component_id'];
380 foreach ($values as $group => $dontCare) {
381 $values[$group]['perColumn'] = round(count($values[$group]['fields']) / 2);
382 ksort($values[$group]);
385 $menu['admin'] = array('breadcrumb' => $values);
393 public static function &getAdminLinks() {
394 $links = self
::get('admin');
397 !isset($links['breadcrumb'])
402 $values = &$links['breadcrumb'];
407 * Get the breadcrumb for a given path.
410 * An array of all the menu items.
411 * @param string $path
412 * Path for which breadcrumb is to be build.
415 * The breadcrumb for this path
417 public static function buildBreadcrumb(&$menu, $path) {
420 $pathElements = explode('/', $path);
421 array_pop($pathElements);
424 while ($newPath = array_shift($pathElements)) {
425 $currentPath = $currentPath ?
($currentPath . '/' . $newPath) : $newPath;
427 // when we come across breadcrumb which involves ids,
428 // we should skip now and later on append dynamically.
429 if (isset($menu[$currentPath]['skipBreadcrumb'])) {
433 // add to crumb, if current-path exists in params.
434 if (array_key_exists($currentPath, $menu) &&
435 isset($menu[$currentPath]['title'])
437 $urlVar = !empty($menu[$currentPath]['path_arguments']) ?
'&' . $menu[$currentPath]['path_arguments'] : '';
439 'title' => $menu[$currentPath]['title'],
440 'url' => CRM_Utils_System
::url($currentPath,
450 // forceBackend; CRM-14439 work-around; acceptable for now because we don't display breadcrumbs on frontend
456 $menu[$path]['breadcrumb'] = $crumbs;
465 public static function buildReturnUrl(&$menu, $path) {
466 if (!isset($menu[$path]['return_url'])) {
467 list($menu[$path]['return_url'], $menu[$path]['return_url_args']) = self
::getReturnUrl($menu, $path);
477 public static function getReturnUrl(&$menu, $path) {
478 if (!isset($menu[$path]['return_url'])) {
479 $pathElements = explode('/', $path);
480 array_pop($pathElements);
482 if (empty($pathElements)) {
483 return array(NULL, NULL);
485 $newPath = implode('/', $pathElements);
487 return self
::getReturnUrl($menu, $newPath);
491 CRM_Utils_Array
::value('return_url',
494 CRM_Utils_Array
::value('return_url_args',
505 public static function fillComponentIds(&$menu, $path) {
506 static $cache = array();
508 if (array_key_exists('component_id', $menu[$path])) {
512 $args = explode('/', $path);
514 if (count($args) > 1) {
515 $compPath = $args[0] . '/' . $args[1];
518 $compPath = $args[0];
523 if (array_key_exists($compPath, $cache)) {
524 $menu[$path]['component_id'] = $cache[$compPath];
527 if (CRM_Utils_Array
::value('component', CRM_Utils_Array
::value($compPath, $menu))) {
528 $componentId = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_Component',
529 $menu[$compPath]['component'],
533 $menu[$path]['component_id'] = $componentId ?
$componentId : NULL;
534 $cache[$compPath] = $menu[$path]['component_id'];
539 * @param $path string
540 * Path of menu item to retrieve.
545 public static function get($path) {
546 // return null if menu rebuild
547 $config = CRM_Core_Config
::singleton();
549 $args = explode('/', $path);
552 while (!empty($args)) {
553 $string = implode('/', $args);
554 $string = CRM_Core_DAO
::escapeString($string);
555 $elements[] = "'{$string}'";
559 $queryString = implode(', ', $elements);
560 $domainID = CRM_Core_Config
::domainID();
566 WHERE path in ( $queryString )
567 AND domain_id = $domainID
568 ORDER BY length(path) DESC
573 if ($path != 'navigation') {
578 WHERE path IN ( 'navigation' )
579 AND domain_id = $domainID
584 $menu = new CRM_Core_DAO_Menu();
585 $menu->query($query);
587 self
::$_menuCache = array();
589 while ($menu->fetch()) {
590 self
::$_menuCache[$menu->path
] = array();
591 CRM_Core_DAO
::storeValues($menu, self
::$_menuCache[$menu->path
]);
593 // Move module_data into main item.
594 if (isset(self
::$_menuCache[$menu->path
]['module_data'])) {
595 CRM_Utils_Array
::extend(self
::$_menuCache[$menu->path
],
596 CRM_Utils_String
::unserialize(self
::$_menuCache[$menu->path
]['module_data']));
597 unset(self
::$_menuCache[$menu->path
]['module_data']);
600 // Unserialize other elements.
601 foreach (self
::$_serializedElements as $element) {
602 self
::$_menuCache[$menu->path
][$element] = CRM_Utils_String
::unserialize($menu->$element);
604 if (strpos($path, $menu->path
) !== FALSE) {
605 $menuPath = &self
::$_menuCache[$menu->path
];
610 if (strstr($path, 'report/instance')) {
611 $args = explode('/', $path);
612 if (is_numeric(end($args))) {
613 $menuPath['path'] .= '/' . end($args);
617 // *FIXME* : hack for 4.1 -> 4.2 upgrades.
618 if (preg_match('/^civicrm\/(upgrade\/)?queue\//', $path)) {
619 CRM_Queue_Menu
::alter($path, $menuPath);
622 // Part of upgrade framework but not run inside main upgrade because it deletes data
623 // Once we have another example of a 'cleanup' we should generalize the clause below so it grabs string
624 // which follows upgrade/ and checks for existence of a function in Cleanup class.
625 if ($path == 'civicrm/upgrade/cleanup425') {
626 $menuPath['page_callback'] = array('CRM_Upgrade_Page_Cleanup', 'cleanup425');
627 $menuPath['access_arguments'][0][] = 'administer CiviCRM';
628 $menuPath['access_callback'] = array('CRM_Core_Permission', 'checkMenu');
631 if (!empty($menuPath)) {
632 $i18n = CRM_Core_I18n
::singleton();
633 $i18n->localizeTitles($menuPath);
643 public static function getArrayForPathArgs($pathArgs) {
644 if (!is_string($pathArgs)) {
649 $elements = explode(',', $pathArgs);
650 foreach ($elements as $keyVal) {
651 list($key, $val) = explode('=', $keyVal, 2);
655 if (array_key_exists('urlToSession', $arr)) {
656 $urlToSession = array();
658 $params = explode(';', $arr['urlToSession']);
660 foreach ($params as $keyVal) {
661 list($urlToSession[$count]['urlVar'],
662 $urlToSession[$count]['sessionVar'],
663 $urlToSession[$count]['type'],
664 $urlToSession[$count]['default']
665 ) = explode(':', $keyVal);
668 $arr['urlToSession'] = $urlToSession;