3 +--------------------------------------------------------------------+
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2019 |
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-2019
33 class CRM_ACL_Page_ACL
extends CRM_Core_Page_Basic
{
35 public $useLivePageJS = TRUE;
38 * The action links that we need to display for the browse screen.
42 static $_links = NULL;
50 public function getBAOName() {
51 return 'CRM_ACL_BAO_ACL';
58 * (reference) of action links
60 public function &links() {
61 if (!(self
::$_links)) {
62 self
::$_links = array(
63 CRM_Core_Action
::UPDATE
=> array(
65 'url' => 'civicrm/acl',
66 'qs' => 'reset=1&action=update&id=%%id%%',
67 'title' => ts('Edit ACL'),
69 CRM_Core_Action
::DISABLE
=> array(
70 'name' => ts('Disable'),
71 'ref' => 'crm-enable-disable',
72 'title' => ts('Disable ACL'),
74 CRM_Core_Action
::ENABLE
=> array(
75 'name' => ts('Enable'),
76 'ref' => 'crm-enable-disable',
77 'title' => ts('Enable ACL'),
79 CRM_Core_Action
::DELETE
=> array(
80 'name' => ts('Delete'),
81 'url' => 'civicrm/acl',
82 'qs' => 'reset=1&action=delete&id=%%id%%',
83 'title' => ts('Delete ACL'),
93 * Set the breadcrumb before beginning the standard page run.
95 public function run() {
96 // set breadcrumb to append to admin/access
99 'title' => ts('Access Control'),
100 'url' => CRM_Utils_System
::url('civicrm/admin/access',
105 CRM_Utils_System
::appendBreadCrumb($breadCrumb);
108 return parent
::run();
114 public function browse() {
115 // get all acl's sorted by weight
120 WHERE ( object_table IN ( 'civicrm_saved_search', 'civicrm_uf_group', 'civicrm_custom_group', 'civicrm_event' ) )
123 $dao = CRM_Core_DAO
::executeQuery($query);
125 $roles = CRM_Core_OptionGroup
::values('acl_role');
128 '-1' => ts('- select -'),
129 '0' => ts('All Groups'),
130 ) + CRM_Core_PseudoConstant
::group();
131 $customGroup = array(
132 '-1' => ts('- select -'),
133 '0' => ts('All Custom Groups'),
134 ) + CRM_Core_PseudoConstant
::get('CRM_Core_DAO_CustomField', 'custom_group_id');
136 '-1' => ts('- select -'),
137 '0' => ts('All Profiles'),
138 ) + CRM_Core_PseudoConstant
::get('CRM_Core_DAO_UFField', 'uf_group_id');
141 '-1' => ts('- select -'),
142 '0' => ts('All Events'),
143 ) + CRM_Event_PseudoConstant
::event();
145 while ($dao->fetch()) {
146 $acl[$dao->id
] = array();
147 $acl[$dao->id
]['name'] = $dao->name
;
148 $acl[$dao->id
]['operation'] = $dao->operation
;
149 $acl[$dao->id
]['entity_id'] = $dao->entity_id
;
150 $acl[$dao->id
]['entity_table'] = $dao->entity_table
;
151 $acl[$dao->id
]['object_table'] = $dao->object_table
;
152 $acl[$dao->id
]['object_id'] = $dao->object_id
;
153 $acl[$dao->id
]['is_active'] = $dao->is_active
;
155 if ($acl[$dao->id
]['entity_id']) {
156 $acl[$dao->id
]['entity'] = CRM_Utils_Array
::value($acl[$dao->id
]['entity_id'], $roles);
159 $acl[$dao->id
]['entity'] = ts('Everyone');
162 switch ($acl[$dao->id
]['object_table']) {
163 case 'civicrm_saved_search':
164 $acl[$dao->id
]['object'] = CRM_Utils_Array
::value($acl[$dao->id
]['object_id'], $group);
165 $acl[$dao->id
]['object_name'] = ts('Group');
168 case 'civicrm_uf_group':
169 $acl[$dao->id
]['object'] = CRM_Utils_Array
::value($acl[$dao->id
]['object_id'], $ufGroup);
170 $acl[$dao->id
]['object_name'] = ts('Profile');
173 case 'civicrm_custom_group':
174 $acl[$dao->id
]['object'] = CRM_Utils_Array
::value($acl[$dao->id
]['object_id'], $customGroup);
175 $acl[$dao->id
]['object_name'] = ts('Custom Group');
178 case 'civicrm_event':
179 $acl[$dao->id
]['object'] = CRM_Utils_Array
::value($acl[$dao->id
]['object_id'], $event);
180 $acl[$dao->id
]['object_name'] = ts('Event');
184 // form all action links
185 $action = array_sum(array_keys($this->links()));
187 if ($dao->is_active
) {
188 $action -= CRM_Core_Action
::ENABLE
;
191 $action -= CRM_Core_Action
::DISABLE
;
194 $acl[$dao->id
]['action'] = CRM_Core_Action
::formLink(
197 array('id' => $dao->id
),
205 $this->assign('rows', $acl);
209 * Get name of edit form.
212 * Classname of edit form.
214 public function editForm() {
215 return 'CRM_ACL_Form_ACL';
219 * Get edit form name.
224 public function editName() {
236 public function userContext($mode = NULL) {
237 return 'civicrm/acl';
244 * What mode for the form ?.
246 * Id of the entity (for update, view operations).
247 * @param bool $imageUpload
248 * Not used in this case, but extended from CRM_Core_Page_Basic.
249 * @param bool $pushUserContext
250 * Not used in this case, but extended from CRM_Core_Page_Basic.
252 public function edit($mode, $id = NULL, $imageUpload = FALSE, $pushUserContext = TRUE) {
253 if ($mode & (CRM_Core_Action
::UPDATE
)) {
255 $aclName = CRM_Core_DAO
::getFieldValue('CRM_ACL_DAO_ACL', $id);
256 CRM_Utils_System
::setTitle(ts('Edit ACL – %1', array(1 => $aclName)));
259 parent
::edit($mode, $id, $imageUpload, $pushUserContext);