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
33 class CRM_Core_BAO_Navigation
extends CRM_Core_DAO_Navigation
{
35 // Number of characters in the menu js cache key
36 const CACHE_KEY_STRLEN
= 8;
41 public function __construct() {
42 parent
::__construct();
46 * Update the is_active flag in the db.
49 * Id of the database record.
50 * @param bool $is_active
51 * Value we want to set the is_active field.
53 * @return CRM_Core_DAO_Navigation|NULL
54 * DAO object on success, NULL otherwise
56 public static function setIsActive($id, $is_active) {
57 return CRM_Core_DAO
::setFieldValue('CRM_Core_DAO_Navigation', $id, 'is_active', $is_active);
61 * Get existing / build navigation for CiviCRM Admin Menu.
66 public static function getMenus() {
69 $menu = new CRM_Core_DAO_Menu();
70 $menu->domain_id
= CRM_Core_Config
::domainID();
73 while ($menu->fetch()) {
75 $menus[$menu->path
] = $menu->title
;
82 * Add/update navigation record.
84 * @param array $params Submitted values
86 * @return CRM_Core_DAO_Navigation
89 public static function add(&$params) {
90 $navigation = new CRM_Core_DAO_Navigation();
91 if (empty($params['id'])) {
92 $params['is_active'] = CRM_Utils_Array
::value('is_active', $params, FALSE);
93 $params['has_separator'] = CRM_Utils_Array
::value('has_separator', $params, FALSE);
96 if (!isset($params['id']) ||
97 (CRM_Utils_Array
::value('parent_id', $params) != CRM_Utils_Array
::value('current_parent_id', $params))
99 /* re/calculate the weight, if the Parent ID changed OR create new menu */
101 if ($navName = CRM_Utils_Array
::value('name', $params)) {
102 $params['name'] = $navName;
104 elseif ($navLabel = CRM_Utils_Array
::value('label', $params)) {
105 $params['name'] = $navLabel;
108 $params['weight'] = self
::calculateWeight(CRM_Utils_Array
::value('parent_id', $params));
111 if (array_key_exists('permission', $params) && is_array($params['permission'])) {
112 $params['permission'] = implode(',', $params['permission']);
115 $navigation->copyValues($params);
117 $navigation->domain_id
= CRM_Core_Config
::domainID();
124 * Fetch object based on array of properties.
126 * @param array $params
127 * (reference ) an assoc array of name/value pairs.
128 * @param array $defaults
129 * (reference ) an assoc array to hold the flattened values.
131 * @return CRM_Core_BAO_Navigation|null
132 * object on success, NULL otherwise
134 public static function retrieve(&$params, &$defaults) {
135 $navigation = new CRM_Core_DAO_Navigation();
136 $navigation->copyValues($params);
138 $navigation->domain_id
= CRM_Core_Config
::domainID();
140 if ($navigation->find(TRUE)) {
141 CRM_Core_DAO
::storeValues($navigation, $defaults);
148 * Calculate navigation weight.
150 * @param int $parentID
151 * Parent_id of a menu.
158 public static function calculateWeight($parentID = NULL, $menuID = NULL) {
159 $domainID = CRM_Core_Config
::domainID();
162 // we reset weight for each parent, i.e we start from 1 to n
163 // calculate max weight for top level menus, if parent id is absent
165 $query = "SELECT max(weight) as weight FROM civicrm_navigation WHERE parent_id IS NULL AND domain_id = $domainID";
168 // if parent is passed, we need to get max weight for that particular parent
169 $query = "SELECT max(weight) as weight FROM civicrm_navigation WHERE parent_id = {$parentID} AND domain_id = $domainID";
172 $dao = CRM_Core_DAO
::executeQuery($query);
174 return $weight = $weight +
$dao->weight
;
178 * Get formatted menu list.
181 * returns associated array
183 public static function getNavigationList() {
184 $cacheKeyString = "navigationList";
187 $config = CRM_Core_Config
::singleton();
189 // check if we can retrieve from database cache
190 $navigations = CRM_Core_BAO_Cache
::getItem('navigation', $cacheKeyString);
193 $domainID = CRM_Core_Config
::domainID();
195 SELECT id, label, parent_id, weight, is_active, name
196 FROM civicrm_navigation WHERE domain_id = $domainID {$whereClause} ORDER BY parent_id, weight ASC";
197 $result = CRM_Core_DAO
::executeQuery($query);
199 $pidGroups = array();
200 while ($result->fetch()) {
201 $pidGroups[$result->parent_id
][$result->label
] = $result->id
;
204 foreach ($pidGroups[''] as $label => $val) {
205 $pidGroups[''][$label] = self
::_getNavigationValue($val, $pidGroups);
208 $navigations = array();
209 self
::_getNavigationLabel($pidGroups[''], $navigations);
211 CRM_Core_BAO_Cache
::setItem($navigations, 'navigation', $cacheKeyString);
217 * Helper function for getNavigationList().
221 * @param array $navigations
223 * @param string $separator
226 public static function _getNavigationLabel($list, &$navigations, $separator = '') {
227 $i18n = CRM_Core_I18n
::singleton();
228 foreach ($list as $label => $val) {
229 if ($label == 'navigation_id') {
232 $translatedLabel = $i18n->crm_translate($label, array('context' => 'menu'));
233 $navigations[is_array($val) ?
$val['navigation_id'] : $val] = "{$separator}{$translatedLabel}";
234 if (is_array($val)) {
235 self
::_getNavigationLabel($val, $navigations, $separator . ' ');
241 * Helper function for getNavigationList().
245 * @param array $pidGroups
250 public static function _getNavigationValue($val, &$pidGroups) {
251 if (array_key_exists($val, $pidGroups)) {
252 $list = array('navigation_id' => $val);
253 foreach ($pidGroups[$val] as $label => $id) {
254 $list[$label] = self
::_getNavigationValue($id, $pidGroups);
256 unset($pidGroups[$val]);
265 * Build navigation tree.
267 * @param array $navigationTree
268 * Nested array of menus.
269 * @param int $parentID
271 * @param bool $navigationMenu
272 * True when called for building top navigation menu.
275 * nested array of menus
277 public static function buildNavigationTree(&$navigationTree, $parentID, $navigationMenu = TRUE) {
278 $whereClause = " parent_id IS NULL";
281 $whereClause = " parent_id = {$parentID}";
284 $domainID = CRM_Core_Config
::domainID();
286 // get the list of menus
288 SELECT id, label, url, permission, permission_operator, has_separator, parent_id, is_active, name
289 FROM civicrm_navigation
291 AND domain_id = $domainID
292 ORDER BY parent_id, weight";
294 $navigation = CRM_Core_DAO
::executeQuery($query);
295 $config = CRM_Core_Config
::singleton();
296 while ($navigation->fetch()) {
297 $label = $navigation->label
;
298 if (!$navigationMenu) {
299 $label = addcslashes($label, '"');
302 // for each menu get their children
303 $navigationTree[$navigation->id
] = array(
304 'attributes' => array(
306 'name' => $navigation->name
,
307 'url' => $navigation->url
,
308 'permission' => $navigation->permission
,
309 'operator' => $navigation->permission_operator
,
310 'separator' => $navigation->has_separator
,
311 'parentID' => $navigation->parent_id
,
312 'navID' => $navigation->id
,
313 'active' => $navigation->is_active
,
316 self
::buildNavigationTree($navigationTree[$navigation->id
]['child'], $navigation->id
, $navigationMenu);
319 return $navigationTree;
326 * By default output is html.
327 * @param bool $navigationMenu
328 * True when called for building top navigation menu.
331 * html or json string
333 public static function buildNavigation($json = FALSE, $navigationMenu = TRUE) {
334 $navigations = array();
335 self
::buildNavigationTree($navigations, $parent = NULL, $navigationMenu);
336 $navigationString = NULL;
338 // run the Navigation through a hook so users can modify it
339 CRM_Utils_Hook
::navigationMenu($navigations);
340 self
::fixNavigationMenu($navigations);
342 $i18n = CRM_Core_I18n
::singleton();
344 //skip children menu item if user don't have access to parent menu item
345 $skipMenuItems = array();
346 foreach ($navigations as $key => $value) {
348 if ($navigationString) {
349 $navigationString .= '},';
351 $data = $value['attributes']['label'];
353 if (!$value['attributes']['active']) {
354 $class = ', "attr": { "class" : "disabled"} ';
356 $l10nName = $i18n->crm_translate($data, array('context' => 'menu'));
357 $navigationString .= ' { "attr": { "id" : "node_' . $key . '"}, "data": { "title":"' . $l10nName . '"' . $class . '}';
360 // Home is a special case
361 if ($value['attributes']['name'] != 'Home') {
362 $name = self
::getMenuName($value, $skipMenuItems);
365 if (isset($value['attributes']['separator']) && $value['attributes']['separator'] == 2) {
366 $navigationString .= '<li class="menu-separator"></li>';
368 $removeCharacters = array('/', '!', '&', '*', ' ', '(', ')', '.');
369 $navigationString .= '<li class="menumain crm-' . str_replace($removeCharacters, '_', $value['attributes']['label']) . '">' . $name;
374 self
::recurseNavigation($value, $navigationString, $json, $skipMenuItems);
378 $navigationString = '[' . $navigationString . '}]';
381 // clean up - Need to remove empty <ul>'s, this happens when user don't have
382 // permission to access parent
383 $navigationString = str_replace('<ul></ul></li>', '', $navigationString);
386 return $navigationString;
390 * Recursively check child menus.
392 * @param array $value
393 * @param string $navigationString
395 * @param bool $skipMenuItems
399 public static function recurseNavigation(&$value, &$navigationString, $json, $skipMenuItems) {
401 if (!empty($value['child'])) {
402 $navigationString .= ', "children": [ ';
405 return $navigationString;
408 if (!empty($value['child'])) {
411 foreach ($value['child'] as $k => $val) {
412 if ($count == count($value['child'])) {
413 $appendComma = FALSE;
415 $data = $val['attributes']['label'];
417 if (!$val['attributes']['active']) {
418 $class = ', "attr": { "class" : "disabled"} ';
420 $navigationString .= ' { "attr": { "id" : "node_' . $k . '"}, "data": { "title":"' . $data . '"' . $class . '}';
421 self
::recurseNavigation($val, $navigationString, $json, $skipMenuItems);
422 $navigationString .= $appendComma ?
' },' : ' }';
427 if (!empty($value['child'])) {
428 $navigationString .= ' ]';
432 if (!empty($value['child'])) {
433 $navigationString .= '<ul>';
436 $navigationString .= '</li>';
437 //locate separator after
438 if (isset($value['attributes']['separator']) && $value['attributes']['separator'] == 1) {
439 $navigationString .= '<li class="menu-separator"></li>';
443 if (!empty($value['child'])) {
444 foreach ($value['child'] as $val) {
445 $name = self
::getMenuName($val, $skipMenuItems);
447 //locate separator before
448 if (isset($val['attributes']['separator']) && $val['attributes']['separator'] == 2) {
449 $navigationString .= '<li class="menu-separator"></li>';
451 $removeCharacters = array('/', '!', '&', '*', ' ', '(', ')', '.');
452 $navigationString .= '<li class="crm-' . str_replace($removeCharacters, '_', $val['attributes']['label']) . '">' . $name;
453 self
::recurseNavigation($val, $navigationString, $json, $skipMenuItems);
457 if (!empty($value['child'])) {
458 $navigationString .= '</ul></li>';
459 if (isset($value['attributes']['separator']) && $value['attributes']['separator'] == 1) {
460 $navigationString .= '<li class="menu-separator"></li>';
464 return $navigationString;
468 * Given a navigation menu, generate navIDs for any items which are
471 * @param array $nodes
472 * Each key is a numeral; each value is a node in
473 * the menu tree (with keys "child" and "attributes").
475 public static function fixNavigationMenu(&$nodes) {
477 array_walk_recursive($nodes, function($item, $key) use (&$maxNavID) {
478 if ($key === 'navID') {
479 $maxNavID = max($maxNavID, $item);
482 self
::_fixNavigationMenu($nodes, $maxNavID, NULL);
486 * @param array $nodes
487 * Each key is a numeral; each value is a node in
488 * the menu tree (with keys "child" and "attributes").
489 * @param int $maxNavID
490 * @param int $parentID
492 private static function _fixNavigationMenu(&$nodes, &$maxNavID, $parentID) {
493 $origKeys = array_keys($nodes);
494 foreach ($origKeys as $origKey) {
495 if (!isset($nodes[$origKey]['attributes']['parentID']) && $parentID !== NULL) {
496 $nodes[$origKey]['attributes']['parentID'] = $parentID;
498 // If no navID, then assign navID and fix key.
499 if (!isset($nodes[$origKey]['attributes']['navID'])) {
500 $newKey = ++
$maxNavID;
501 $nodes[$origKey]['attributes']['navID'] = $newKey;
502 $nodes[$newKey] = $nodes[$origKey];
503 unset($nodes[$origKey]);
506 if (isset($nodes[$origKey]['child']) && is_array($nodes[$origKey]['child'])) {
507 self
::_fixNavigationMenu($nodes[$origKey]['child'], $maxNavID, $nodes[$origKey]['attributes']['navID']);
516 * @param array $skipMenuItems
518 * @return bool|string
520 public static function getMenuName(&$value, &$skipMenuItems) {
521 // we need to localise the menu labels (CRM-5456) and don’t
522 // want to use ts() as it would throw the ts-extractor off
523 $i18n = CRM_Core_I18n
::singleton();
525 $name = $i18n->crm_translate($value['attributes']['label'], array('context' => 'menu'));
526 $url = CRM_Utils_Array
::value('url', $value['attributes']);
527 $permission = CRM_Utils_Array
::value('permission', $value['attributes']);
528 $operator = CRM_Utils_Array
::value('operator', $value['attributes']);
529 $parentID = CRM_Utils_Array
::value('parentID', $value['attributes']);
530 $navID = CRM_Utils_Array
::value('navID', $value['attributes']);
531 $active = CRM_Utils_Array
::value('active', $value['attributes']);
532 $menuName = CRM_Utils_Array
::value('name', $value['attributes']);
533 $target = CRM_Utils_Array
::value('target', $value['attributes']);
535 if (in_array($parentID, $skipMenuItems) ||
!$active) {
536 $skipMenuItems[] = $navID;
540 //we need to check core view/edit or supported acls.
541 if (in_array($menuName, array(
545 if (!CRM_Core_Permission
::giveMeAllACLs()) {
546 $skipMenuItems[] = $navID;
551 $config = CRM_Core_Config
::singleton();
554 if (isset($url) && $url) {
555 if (substr($url, 0, 4) !== 'http') {
556 //CRM-7656 --make sure to separate out url path from url params,
557 //as we'r going to validate url path across cross-site scripting.
558 $urlParam = explode('?', $url);
559 if (empty($urlParam[1])) {
562 $url = CRM_Utils_System
::url($urlParam[0], $urlParam[1], FALSE, NULL, TRUE);
564 elseif (strpos($url, '&') === FALSE) {
565 $url = htmlspecialchars($url);
570 static $allComponents;
571 if (!$allComponents) {
572 $allComponents = CRM_Core_Component
::getNames();
575 if (isset($permission) && $permission) {
576 $permissions = explode(',', $permission);
578 $hasPermission = FALSE;
579 foreach ($permissions as $key) {
583 //get the component name from permission.
584 $componentName = CRM_Core_Permission
::getComponentName($key);
586 if ($componentName) {
587 if (!in_array($componentName, $config->enableComponents
) ||
588 !CRM_Core_Permission
::check($key)
591 if ($operator == 'AND') {
592 $skipMenuItems[] = $navID;
597 $hasPermission = TRUE;
600 elseif (!CRM_Core_Permission
::check($key)) {
602 if ($operator == 'AND') {
603 $skipMenuItems[] = $navID;
608 $hasPermission = TRUE;
612 if (!$showItem && !$hasPermission) {
613 $skipMenuItems[] = $navID;
619 $url = CRM_Utils_System
::evalUrl($url);
621 $name = "<a href=\"{$url}\" target=\"{$target}\">{$name}</a>";
624 $name = "<a href=\"{$url}\">{$name}</a>";
632 * Create navigation for CiviCRM Admin Menu.
634 * @param int $contactID
638 * returns navigation html
640 public static function createNavigation($contactID) {
641 $config = CRM_Core_Config
::singleton();
643 $navigation = self
::buildNavigation();
647 //add additional navigation items
648 $logoutURL = CRM_Utils_System
::url('civicrm/logout', 'reset=1');
650 // get home menu from db
651 $homeParams = array('name' => 'Home');
653 $homeIcon = '<span class="crm-logo-sm" ></span>';
654 self
::retrieve($homeParams, $homeNav);
656 list($path, $q) = explode('?', $homeNav['url']);
657 $homeURL = CRM_Utils_System
::url($path, $q);
658 $homeLabel = $homeNav['label'];
659 // CRM-6804 (we need to special-case this as we don’t ts()-tag variables)
660 if ($homeLabel == 'Home') {
661 $homeLabel = ts('CiviCRM Home');
665 $homeURL = CRM_Utils_System
::url('civicrm/dashboard', 'reset=1');
666 $homeLabel = ts('CiviCRM Home');
668 // Link to hide the menubar
669 $hideLabel = ts('Hide Menu');
672 <li class='menumain crm-link-home'>$homeIcon
673 <ul id='civicrm-home'>
674 <li><a href='$homeURL'>$homeLabel</a></li>
675 <li><a href='#' class='crm-hidemenu'>$hideLabel</a></li>
676 <li><a href='$logoutURL' class='crm-logout-link'>" . ts('Log out') . "</a></li>
678 // <li> tag doesn't need to be closed
680 return $prepandString . $navigation;
684 * Reset navigation for all contacts or a specified contact.
686 * @param int $contactID
687 * Reset only entries belonging to that contact ID.
691 public static function resetNavigation($contactID = NULL) {
692 $newKey = CRM_Utils_String
::createRandom(self
::CACHE_KEY_STRLEN
, CRM_Utils_String
::ALPHANUMERIC
);
694 $query = "UPDATE civicrm_setting SET value = '$newKey' WHERE name='navigation' AND contact_id IS NOT NULL";
695 CRM_Core_DAO
::executeQuery($query);
696 CRM_Core_BAO_Cache
::deleteGroup('navigation');
699 // before inserting check if contact id exists in db
700 // this is to handle weird case when contact id is in session but not in db
701 $contact = new CRM_Contact_DAO_Contact();
702 $contact->id
= $contactID;
703 if ($contact->find(TRUE)) {
704 CRM_Core_BAO_Setting
::setItem(
706 CRM_Core_BAO_Setting
::PERSONAL_PREFERENCES_NAME
,
714 // also reset the dashlet cache in case permissions have changed etc
715 // FIXME: decouple this
716 CRM_Core_BAO_Dashboard
::resetDashletCache($contactID);
722 * Process navigation.
724 * @param array $params
725 * Associated array, $_GET.
727 public static function processNavigation(&$params) {
728 $nodeID = (int) str_replace("node_", "", $params['id']);
729 $referenceID = (int) str_replace("node_", "", $params['ref_id']);
730 $position = $params['ps'];
731 $type = $params['type'];
732 $label = CRM_Utils_Array
::value('data', $params);
736 self
::processMove($nodeID, $referenceID, $position);
740 self
::processRename($nodeID, $label);
744 self
::processDelete($nodeID);
748 //reset navigation menus
749 self
::resetNavigation();
750 CRM_Utils_System
::civiExit();
754 * Process move action.
757 * Node that is being moved.
758 * @param $referenceID
759 * Parent id where node is moved. 0 mean no parent.
761 * New position of the nod, it starts with 0 - n.
763 public static function processMove($nodeID, $referenceID, $position) {
764 // based on the new position we need to get the weight of the node after moved node
765 // 1. update the weight of $position + 1 nodes to weight + 1
766 // 2. weight of the ( $position -1 ) node - 1 is the new weight of the node being moved
768 // check if there is parent id, which means node is moved inside existing parent container, so use parent id
769 // to find the correct position else use NULL to get the weights of parent ( $position - 1 )
770 // accordingly set the new parent_id
772 $newParentID = $referenceID;
773 $parentClause = "parent_id = {$referenceID} ";
776 $newParentID = 'NULL';
777 $parentClause = 'parent_id IS NULL';
780 $incrementOtherNodes = TRUE;
781 $sql = "SELECT weight from civicrm_navigation WHERE {$parentClause} ORDER BY weight LIMIT %1, 1";
782 $params = array(1 => array($position, 'Positive'));
783 $newWeight = CRM_Core_DAO
::singleValueQuery($sql, $params);
785 // this means node is moved to last position, so you need to get the weight of last element + 1
787 // If this is not the first item being added to a parent
789 $lastPosition = $position - 1;
790 $sql = "SELECT weight from civicrm_navigation WHERE {$parentClause} ORDER BY weight LIMIT %1, 1";
791 $params = array(1 => array($lastPosition, 'Positive'));
792 $newWeight = CRM_Core_DAO
::singleValueQuery($sql, $params);
794 // since last node increment + 1
795 $newWeight = $newWeight +
1;
801 // since this is a last node we don't need to increment other nodes
802 $incrementOtherNodes = FALSE;
805 $transaction = new CRM_Core_Transaction();
807 // now update the existing nodes to weight + 1, if required.
808 if ($incrementOtherNodes) {
809 $query = "UPDATE civicrm_navigation SET weight = weight + 1
810 WHERE {$parentClause} AND weight >= {$newWeight}";
812 CRM_Core_DAO
::executeQuery($query);
815 // finally set the weight of current node
816 $query = "UPDATE civicrm_navigation SET weight = {$newWeight}, parent_id = {$newParentID} WHERE id = {$nodeID}";
817 CRM_Core_DAO
::executeQuery($query);
819 $transaction->commit();
823 * Function to process rename action for tree.
828 public static function processRename($nodeID, $label) {
829 CRM_Core_DAO
::setFieldValue('CRM_Core_DAO_Navigation', $nodeID, 'label', $label);
833 * Process delete action for tree.
837 public static function processDelete($nodeID) {
838 $query = "DELETE FROM civicrm_navigation WHERE id = {$nodeID}";
839 CRM_Core_DAO
::executeQuery($query);
843 * Get the info on navigation item.
845 * @param int $navigationID
851 public static function getNavigationInfo($navigationID) {
852 $query = "SELECT parent_id, weight FROM civicrm_navigation WHERE id = %1";
853 $params = array($navigationID, 'Integer');
854 $dao = CRM_Core_DAO
::executeQuery($query, array(1 => $params));
857 'parent_id' => $dao->parent_id
,
858 'weight' => $dao->weight
,
865 * @param array $params
866 * @param array $newParams
867 * New value of params.
869 public static function processUpdate($params, $newParams) {
870 $dao = new CRM_Core_DAO_Navigation();
871 $dao->copyValues($params);
872 if ($dao->find(TRUE)) {
873 $dao->copyValues($newParams);
879 * Rebuild reports menu.
881 * All Contact reports will become sub-items of 'Contact Reports' and so on.
883 * @param int $domain_id
885 public static function rebuildReportsNavigation($domain_id) {
886 $component_to_nav_name = array(
887 'CiviContact' => 'Contact Reports',
888 'CiviContribute' => 'Contribution Reports',
889 'CiviMember' => 'Membership Reports',
890 'CiviEvent' => 'Event Reports',
891 'CiviPledge' => 'Pledge Reports',
892 'CiviGrant' => 'Grant Reports',
893 'CiviMail' => 'Mailing Reports',
894 'CiviCampaign' => 'Campaign Reports',
897 // Create or update the top level Reports link.
898 $reports_nav = self
::createOrUpdateTopLevelReportsNavItem($domain_id);
900 // Get all active report instances grouped by component.
901 $components = self
::getAllActiveReportsByComponent($domain_id);
902 foreach ($components as $component_id => $component) {
903 // Create or update the per component reports links.
904 $component_nav_name = $component['name'];
905 if (isset($component_to_nav_name[$component_nav_name])) {
906 $component_nav_name = $component_to_nav_name[$component_nav_name];
908 $permission = "access {$component['name']}";
909 if ($component['name'] === 'CiviContact') {
910 $permission = "administer CiviCRM";
912 elseif ($component['name'] === 'CiviCampaign') {
913 $permission = "access CiviReport";
915 $component_nav = self
::createOrUpdateReportNavItem($component_nav_name, 'civicrm/report/list',
916 "compid={$component_id}&reset=1", $reports_nav->id
, $permission, $domain_id, TRUE);
917 foreach ($component['reports'] as $report_id => $report) {
918 // Create or update the report instance links.
919 $report_nav = self
::createOrUpdateReportNavItem($report['title'], $report['url'], 'reset=1', $component_nav->id
, $report['permission'], $domain_id);
920 // Update the report instance to include the navigation id.
921 $query = "UPDATE civicrm_report_instance SET navigation_id = %1 WHERE id = %2";
923 1 => array($report_nav->id
, 'Integer'),
924 2 => array($report_id, 'Integer'),
926 CRM_Core_DAO
::executeQuery($query, $params);
930 // Create or update the All Reports link.
931 self
::createOrUpdateReportNavItem('All Reports', 'civicrm/report/list', 'reset=1', $reports_nav->id
, 'access CiviReport', $domain_id);
935 * Create the top level 'Reports' item in the navigation tree.
937 * @param int $domain_id
939 * @return bool|\CRM_Core_DAO
941 static public function createOrUpdateTopLevelReportsNavItem($domain_id) {
944 $dao = new CRM_Core_BAO_Navigation();
945 $dao->name
= 'Reports';
946 $dao->domain_id
= $domain_id;
947 // The first selectAdd clears it - so that we only retrieve the one field.
949 $dao->selectAdd('id');
950 if ($dao->find(TRUE)) {
954 $nav = self
::createReportNavItem('Reports', NULL, NULL, NULL, 'access CiviReport', $id, $domain_id);
959 * Retrieve a navigation item using it's url.
962 * @param array $url_params
964 * @param int|null $parent_id
965 * Optionally restrict to one parent.
967 * @return bool|\CRM_Core_BAO_Navigation
969 public static function getNavItemByUrl($url, $url_params, $parent_id = NULL) {
970 $nav = new CRM_Core_BAO_Navigation();
971 $nav->url
= "{$url}?{$url_params}";
972 $nav->parent_id
= $parent_id;
973 if ($nav->find(TRUE)) {
980 * Get all active reports, organised by component.
982 * @param int $domain_id
986 public static function getAllActiveReportsByComponent($domain_id) {
989 civicrm_report_instance.id, civicrm_report_instance.title, civicrm_report_instance.permission, civicrm_component.name, civicrm_component.id AS component_id
993 civicrm_option_value ON civicrm_option_value.option_group_id = civicrm_option_group.id AND civicrm_option_group.name = 'report_template'
995 civicrm_report_instance ON civicrm_option_value.value = civicrm_report_instance.report_id
997 civicrm_component ON civicrm_option_value.component_id = civicrm_component.id
999 civicrm_option_value.is_active = 1
1001 civicrm_report_instance.domain_id = %1
1002 ORDER BY civicrm_option_value.weight";
1004 $dao = CRM_Core_DAO
::executeQuery($sql, array(
1005 1 => array($domain_id, 'Integer'),
1008 while ($dao->fetch()) {
1009 $component_name = is_null($dao->name
) ?
'CiviContact' : $dao->name
;
1010 $component_id = is_null($dao->component_id
) ?
99 : $dao->component_id
;
1011 $rows[$component_id]['name'] = $component_name;
1012 $rows[$component_id]['reports'][$dao->id
] = array(
1013 'title' => $dao->title
,
1014 'url' => "civicrm/report/instance/{$dao->id}",
1015 'permission' => $dao->permission
,
1022 * Create or update a navigation item for a report instance.
1024 * The function will check whether create or update is required.
1026 * @param string $name
1027 * @param string $url
1028 * @param string $url_params
1029 * @param int $parent_id
1030 * @param string $permission
1031 * @param int $domain_id
1033 * @param bool $onlyMatchParentID
1034 * If True then do not match with a url that has a different parent
1035 * (This is because for top level items there is a risk of 'stealing' rows that normally
1036 * live under 'Contact' and intentionally duplicate the report examples.)
1038 * @return \CRM_Core_DAO_Navigation
1040 protected static function createOrUpdateReportNavItem($name, $url, $url_params, $parent_id, $permission,
1041 $domain_id, $onlyMatchParentID = FALSE) {
1043 $existing_nav = CRM_Core_BAO_Navigation
::getNavItemByUrl($url, $url_params, ($onlyMatchParentID ?
$parent_id : NULL));
1044 if ($existing_nav) {
1045 $id = $existing_nav->id
;
1048 $nav = self
::createReportNavItem($name, $url, $url_params, $parent_id, $permission, $id, $domain_id);
1053 * Create a navigation item for a report instance.
1055 * @param string $name
1056 * @param string $url
1057 * @param string $url_params
1058 * @param int $parent_id
1059 * @param string $permission
1061 * @param int $domain_id
1062 * ID of domain to create item in.
1064 * @return \CRM_Core_DAO_Navigation
1066 public static function createReportNavItem($name, $url, $url_params, $parent_id, $permission, $id, $domain_id) {
1067 if ($url !== NULL) {
1068 $url = "{$url}?{$url_params}";
1072 'label' => ts($name),
1074 'parent_id' => $parent_id,
1075 'is_active' => TRUE,
1076 'permission' => array(
1079 'domain_id' => $domain_id,
1082 $params['id'] = $id;
1084 return CRM_Core_BAO_Navigation
::add($params);
1092 * @return object|string
1094 public static function getCacheKey($cid) {
1095 $key = CRM_Core_BAO_Setting
::getItem(
1096 CRM_Core_BAO_Setting
::PERSONAL_PREFERENCES_NAME
,
1102 if (strlen($key) !== self
::CACHE_KEY_STRLEN
) {
1103 $key = self
::resetNavigation($cid);