3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.3 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2013 |
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-2013
35 class CRM_Contact_BAO_Group
extends CRM_Contact_DAO_Group
{
40 function __construct() {
41 parent
::__construct();
45 * Takes a bunch of params that are needed to match certain criteria and
46 * retrieves the relevant objects. Typically the valid params are only
47 * group_id. We'll tweak this function to be more full featured over a period
48 * of time. This is the inverse function of create. It also stores all the retrieved
49 * values in the default array
51 * @param array $params (reference ) an assoc array of name/value pairs
52 * @param array $defaults (reference ) an assoc array to hold the flattened values
54 * @return object CRM_Contact_BAO_Group object
58 static function retrieve(&$params, &$defaults) {
59 $group = new CRM_Contact_DAO_Group();
60 $group->copyValues($params);
61 if ($group->find(TRUE)) {
62 CRM_Core_DAO
::storeValues($group, $defaults);
70 * Function to delete the group and all the object that connect to
71 * this group. Incredibly destructive
73 * @param int $id group id
80 static function discard($id) {
81 CRM_Utils_Hook
::pre('delete', 'Group', $id, CRM_Core_DAO
::$_nullArray);
83 $transaction = new CRM_Core_Transaction();
85 // added for CRM-1631 and CRM-1794
86 // delete all subscribed mails with the selected group id
87 $subscribe = new CRM_Mailing_Event_DAO_Subscribe();
88 $subscribe->group_id
= $id;
91 // delete all Subscription records with the selected group id
92 $subHistory = new CRM_Contact_DAO_SubscriptionHistory();
93 $subHistory->group_id
= $id;
94 $subHistory->delete();
96 // delete all crm_group_contact records with the selected group id
97 $groupContact = new CRM_Contact_DAO_GroupContact();
98 $groupContact->group_id
= $id;
99 $groupContact->delete();
101 // make all the 'add_to_group_id' field of 'civicrm_uf_group table', pointing to this group, as null
102 $params = array(1 => array($id, 'Integer'));
103 $query = "UPDATE civicrm_uf_group SET `add_to_group_id`= NULL WHERE `add_to_group_id` = %1";
104 CRM_Core_DAO
::executeQuery($query, $params);
106 $query = "UPDATE civicrm_uf_group SET `limit_listings_group_id`= NULL WHERE `limit_listings_group_id` = %1";
107 CRM_Core_DAO
::executeQuery($query, $params);
109 // make sure u delete all the entries from civicrm_mailing_group and civicrm_campaign_group
111 $query = "DELETE FROM civicrm_mailing_group where entity_table = 'civicrm_group' AND entity_id = %1";
112 CRM_Core_DAO
::executeQuery($query, $params);
114 $query = "DELETE FROM civicrm_campaign_group where entity_table = 'civicrm_group' AND entity_id = %1";
115 CRM_Core_DAO
::executeQuery($query, $params);
117 $query = "DELETE FROM civicrm_acl_entity_role where entity_table = 'civicrm_group' AND entity_id = %1";
118 CRM_Core_DAO
::executeQuery($query, $params);
120 if (CRM_Core_BAO_Setting
::getItem(CRM_Core_BAO_Setting
::MULTISITE_PREFERENCES_NAME
,
123 // clear any descendant groups cache if exists
124 $finalGroups = CRM_Core_BAO_Cache
::deleteGroup('descendant groups for an org');
127 // delete from group table
128 $group = new CRM_Contact_DAO_Group();
132 $transaction->commit();
134 CRM_Utils_Hook
::post('delete', 'Group', $id, $group);
136 // delete the recently created Group
137 $groupRecent = array(
141 CRM_Utils_Recent
::del($groupRecent);
145 * Returns an array of the contacts in the given group.
148 static function getGroupContacts($id) {
149 $params = array(array('group', 'IN', array($id => 1), 0, 0));
150 list($contacts, $_) = CRM_Contact_BAO_Query
::apiQuery($params, array('contact_id'));
155 * Get the count of a members in a group with the specific status
157 * @param int $id group id
158 * @param enum $status status of members in group
160 * @return int count of members in the group with above status
163 static function memberCount($id, $status = 'Added', $countChildGroups = FALSE) {
164 $groupContact = new CRM_Contact_DAO_GroupContact();
165 $groupIds = array($id);
166 if ($countChildGroups) {
167 $groupIds = CRM_Contact_BAO_GroupNesting
::getDescendentGroupIds($groupIds);
171 $contacts = self
::getGroupContacts($id);
173 foreach ($groupIds as $groupId) {
175 $groupContacts = self
::getGroupContacts($groupId);
176 foreach ($groupContacts as $gcontact) {
177 if ($groupId != $id) {
178 // Loop through main group's contacts
179 // and subtract from the count for each contact which
180 // matches one in the present group, if it is not the
182 foreach ($contacts as $contact) {
183 if ($contact['contact_id'] == $gcontact['contact_id']) {
189 $groupContact->group_id
= $groupId;
190 if (isset($status)) {
191 $groupContact->status
= $status;
193 $groupContact->_query
['condition'] = 'WHERE contact_id NOT IN (SELECT id FROM civicrm_contact WHERE is_deleted = 1)';
194 $count +
= $groupContact->count();
200 * Get the list of member for a group id
202 * @param int $lngGroupId this is group id
204 * @return array $aMembers this arrray contains the list of members for this group id
208 static function &getMember($groupID, $useCache = TRUE) {
209 $params = array(array('group', 'IN', array($groupID => 1), 0, 0));
210 $returnProperties = array('contact_id');
211 list($contacts, $_) = CRM_Contact_BAO_Query
::apiQuery($params, $returnProperties, NULL, NULL, 0, 0, $useCache);
214 foreach ($contacts as $contact) {
215 $aMembers[$contact['contact_id']] = 1;
222 * Returns array of group object(s) matching a set of one or Group properties.
224 * @param array $param Array of one or more valid property_name=>value pairs.
225 * Limits the set of groups returned.
226 * @param array $returnProperties Which properties should be included in the returned group objects.
227 * (member_count should be last element.)
229 * @return An array of group objects.
233 * @todo other BAO functions that use returnProperties (e.g. Query Objects) receive the array flipped & filled with 1s and
234 * add in essential fields (e.g. id). This should follow a regular pattern like the others
236 static function getGroups(
238 $returnProperties = NULL,
243 $dao = new CRM_Contact_DAO_Group();
246 foreach ($params as $k => $v) {
247 if ($k == 'name' ||
$k == 'title') {
248 $dao->whereAdd($k . ' LIKE "' . CRM_Core_DAO
::escapeString($v) . '"');
250 elseif (is_array($v)) {
251 $dao->whereAdd($k . ' IN (' . implode(',', $v) . ')');
259 if ($offset ||
$rowCount) {
260 $offset = ($offset > 0) ?
$offset : 0;
261 $rowCount = ($rowCount > 0) ?
$rowCount : 25;
262 $dao->limit($offset, $rowCount);
266 $dao->orderBy($sort);
269 // return only specific fields if returnproperties are sent
270 if (!empty($returnProperties)) {
272 $dao->selectAdd(implode(',', $returnProperties));
276 $flag = $returnProperties && in_array('member_count', $returnProperties) ?
1 : 0;
279 while ($dao->fetch()) {
280 $group = new CRM_Contact_DAO_Group();
282 $dao->member_count
= CRM_Contact_BAO_Group
::memberCount($dao->id
);
284 $groups[] = clone($dao);
290 * make sure that the user has permission to access this group
292 * @param int $id the id of the object
294 * @return string the permission that the user has (or null)
298 static function checkPermission($id) {
299 $allGroups = CRM_Core_PseudoConstant
::allGroup();
302 if (CRM_Core_Permission
::check('edit all contacts') ||
303 CRM_ACL_API
::groupPermission(CRM_ACL_API
::EDIT
, $id, NULL,
304 'civicrm_saved_search', $allGroups
307 $permissions[] = CRM_Core_Permission
::EDIT
;
310 if (CRM_Core_Permission
::check('view all contacts') ||
311 CRM_ACL_API
::groupPermission(CRM_ACL_API
::VIEW
, $id, NULL,
312 'civicrm_saved_search', $allGroups
315 $permissions[] = CRM_Core_Permission
::VIEW
;
318 if (!empty($permissions) && CRM_Core_Permission
::check('delete contacts')) {
319 // Note: using !empty() in if condition, restricts the scope of delete
320 // permission to groups/contacts that are editable/viewable.
321 // We can remove this !empty condition once we have ACL support for delete functionality.
322 $permissions[] = CRM_Core_Permission
::DELETE
;
331 * @param array $params Associative array of parameters
333 * @return object|null The new group BAO (if created)
337 public static function &create(&$params) {
339 if (CRM_Utils_Array
::value('id', $params)) {
340 CRM_Utils_Hook
::pre('edit', 'Group', $params['id'], $params);
343 CRM_Utils_Hook
::pre('create', 'Group', NULL, $params);
346 // form the name only if missing: CRM-627
347 if (!CRM_Utils_Array
::value('name', $params) &&
348 !CRM_Utils_Array
::value('id', $params)
350 $params['name'] = CRM_Utils_String
::titleToVar($params['title']);
353 // convert params if array type
354 if (isset($params['group_type'])) {
355 if (is_array($params['group_type'])) {
356 $params['group_type'] = CRM_Core_DAO
::VALUE_SEPARATOR
. implode(CRM_Core_DAO
::VALUE_SEPARATOR
,
357 array_keys($params['group_type'])
358 ) . CRM_Core_DAO
::VALUE_SEPARATOR
;
362 $params['group_type'] = '';
365 $session = CRM_Core_Session
::singleton( );
366 if ($cid = $session->get('userID')) {
367 $params['created_id'] = $cid;
370 $group = new CRM_Contact_BAO_Group();
371 $group->copyValues($params);
373 if (!CRM_Utils_Array
::value('id', $params)) {
374 $group->name
.= "_tmp";
382 if (!CRM_Utils_Array
::value('id', $params)) {
383 $group->name
= substr($group->name
, 0, -4) . "_{$group->id}";
386 $group->buildClause();
389 // add custom field values
390 if (CRM_Utils_Array
::value('custom', $params)) {
391 CRM_Core_BAO_CustomValueTable
::store($params['custom'], 'civicrm_group', $group->id
);
394 // make the group, child of domain/site group by default.
395 $domainGroupID = CRM_Core_BAO_Domain
::getGroupId();
396 if (CRM_Utils_Array
::value('no_parent', $params) !== 1) {
397 if (empty($params['parents']) &&
398 $domainGroupID != $group->id
&&
399 CRM_Core_BAO_Setting
::getItem(CRM_Core_BAO_Setting
::MULTISITE_PREFERENCES_NAME
,
402 !CRM_Contact_BAO_GroupNesting
::hasParentGroups($group->id
)
404 // if no parent present and the group doesn't already have any parents,
405 // make sure site group goes as parent
406 $params['parents'] = array($domainGroupID => 1);
408 elseif (array_key_exists('parents', $params) && !is_array($params['parents'])) {
409 $params['parents'] = array($params['parents'] => 1);
412 if (!empty($params['parents'])) {
413 foreach ($params['parents'] as $parentId => $dnc) {
414 if ($parentId && !CRM_Contact_BAO_GroupNesting
::isParentChild($parentId, $group->id
)) {
415 CRM_Contact_BAO_GroupNesting
::add($parentId, $group->id
);
420 // clear any descendant groups cache if exists
421 $finalGroups = CRM_Core_BAO_Cache
::deleteGroup('descendant groups for an org');
423 // this is always required, since we don't know when a
424 // parent group is removed
425 CRM_Contact_BAO_GroupNestingCache
::update();
427 // update group contact cache for all parent groups
428 $parentIds = CRM_Contact_BAO_GroupNesting
::getParentGroupIds($group->id
);
429 foreach ($parentIds as $parentId) {
430 CRM_Contact_BAO_GroupContactCache
::add($parentId);
434 if (CRM_Utils_Array
::value('organization_id', $params)) {
437 $groupOrg['group_id'] = $group->id
;
438 CRM_Contact_BAO_GroupOrganization
::add($groupOrg);
441 CRM_Contact_BAO_GroupContactCache
::add($group->id
);
443 if (CRM_Utils_Array
::value('id', $params)) {
444 CRM_Utils_Hook
::post('edit', 'Group', $group->id
, $group);
447 CRM_Utils_Hook
::post('create', 'Group', $group->id
, $group);
450 $recentOther = array();
451 if (CRM_Core_Permission
::check('edit groups')) {
452 $recentOther['editUrl'] = CRM_Utils_System
::url('civicrm/group', 'reset=1&action=update&id=' . $group->id
);
453 // currently same permission we are using for delete a group
454 $recentOther['deleteUrl'] = CRM_Utils_System
::url('civicrm/group', 'reset=1&action=delete&id=' . $group->id
);
457 // add the recently added group (unless hidden: CRM-6432)
458 if (!$group->is_hidden
) {
459 CRM_Utils_Recent
::add($group->title
,
460 CRM_Utils_System
::url('civicrm/group/search', 'reset=1&force=1&context=smog&gid=' . $group->id
),
472 * given a saved search compute the clause and the tables
473 * and store it for future use
475 function buildClause() {
476 $params = array(array('group', 'IN', array($this->id
=> 1), 0, 0));
478 if (!empty($params)) {
479 $tables = $whereTables = array();
480 $this->where_clause
= CRM_Contact_BAO_Query
::getWhereClause($params, NULL, $tables, $whereTables);
481 if (!empty($tables)) {
482 $this->select_tables
= serialize($tables);
484 if (!empty($whereTables)) {
485 $this->where_tables
= serialize($whereTables);
493 * Defines a new smart group
495 * @param array $params Associative array of parameters
497 * @return object|null The new group BAO (if created)
501 public static function createSmartGroup(&$params) {
502 if (CRM_Utils_Array
::value('formValues', $params)) {
504 unset($ssParams['id']);
505 if (isset($ssParams['saved_search_id'])) {
506 $ssParams['id'] = $ssParams['saved_search_id'];
509 $savedSearch = CRM_Contact_BAO_SavedSearch
::create($params);
511 $params['saved_search_id'] = $savedSearch->id
;
517 return self
::create($params);
521 * update the is_active flag in the db
523 * @param int $id id of the database record
524 * @param boolean $isActive value we want to set the is_active field
526 * @return Object DAO object on sucess, null otherwise
529 static function setIsActive($id, $isActive) {
530 return CRM_Core_DAO
::setFieldValue('CRM_Contact_DAO_Group', $id, 'is_active', $isActive);
534 * build the condition to retrieve groups.
536 * @param string $groupType type of group(Access/Mailing) OR the key of the group
537 * @param boolen $excludeHidden exclude hidden groups.
539 * @return string $condition
542 static function groupTypeCondition($groupType = NULL, $excludeHidden = TRUE) {
544 if ($groupType == 'Mailing') {
545 $value = CRM_Core_DAO
::VALUE_SEPARATOR
. '2' . CRM_Core_DAO
::VALUE_SEPARATOR
;
547 elseif ($groupType == 'Access') {
548 $value = CRM_Core_DAO
::VALUE_SEPARATOR
. '1' . CRM_Core_DAO
::VALUE_SEPARATOR
;
550 elseif (!empty($groupType)){
551 // ie we have been given the group key
552 $value = CRM_Core_DAO
::VALUE_SEPARATOR
. $groupType . CRM_Core_DAO
::VALUE_SEPARATOR
;
556 if ($excludeHidden) {
557 $condition = "is_hidden = 0";
562 $condition .= " AND group_type LIKE '%$value%'";
565 $condition = "group_type LIKE '%$value%'";
572 public function __toString() {
577 * This function create the hidden smart group when user perform
578 * contact seach and want to send mailing to search contacts.
580 * @param array $params ( reference ) an assoc array of name/value pairs
582 * @return array ( smartGroupId, ssId ) smart group id and saved search id
586 static function createHiddenSmartGroup($params) {
587 $ssId = CRM_Utils_Array
::value('saved_search_id', $params);
589 //add mapping record only for search builder saved search
591 if ($params['search_context'] == 'builder') {
592 //save the mapping for search builder
594 //save record in mapping table
596 $mappingParams = array('mapping_type' => 'Search Builder');
597 $mapping = CRM_Core_BAO_Mapping
::add($mappingParams, $temp);
598 $mappingId = $mapping->id
;
601 //get the mapping id from saved search
602 $savedSearch = new CRM_Contact_BAO_SavedSearch();
603 $savedSearch->id
= $ssId;
604 $savedSearch->find(TRUE);
605 $mappingId = $savedSearch->mapping_id
;
608 //save mapping fields
609 CRM_Core_BAO_Mapping
::saveMappingFields($params['form_values'], $mappingId);
612 //create/update saved search record.
613 $savedSearch = new CRM_Contact_BAO_SavedSearch();
614 $savedSearch->id
= $ssId;
615 $savedSearch->form_values
= serialize($params['form_values']);
616 $savedSearch->mapping_id
= $mappingId;
617 $savedSearch->search_custom_id
= CRM_Utils_Array
::value('search_custom_id', $params);
618 $savedSearch->save();
620 $ssId = $savedSearch->id
;
625 $smartGroupId = NULL;
626 if (CRM_Utils_Array
::value('saved_search_id', $params)) {
627 $smartGroupId = CRM_Core_DAO
::getFieldValue('CRM_Contact_DAO_Group', $ssId, 'id', 'saved_search_id');
630 //create group only when new saved search.
631 $groupParams = array(
632 'title' => "Hidden Smart Group {$ssId}",
633 'is_active' => CRM_Utils_Array
::value('is_active', $params, 1),
634 'is_hidden' => CRM_Utils_Array
::value('is_hidden', $params, 1),
635 'group_type' => CRM_Utils_Array
::value('group_type', $params),
636 'visibility' => CRM_Utils_Array
::value('visibility', $params),
637 'saved_search_id' => $ssId,
640 $smartGroup = self
::create($groupParams);
641 $smartGroupId = $smartGroup->id
;
644 return array($smartGroupId, $ssId);
648 * This function is a wrapper for ajax group selector
650 * @param array $params associated array for params record id.
652 * @return array $groupList associated array of group list
655 public function getGroupListSelector(&$params) {
657 $params['offset'] = ($params['page'] - 1) * $params['rp'];
658 $params['rowCount'] = $params['rp'];
659 $params['sort'] = CRM_Utils_Array
::value('sortBy', $params);
662 $groups = CRM_Contact_BAO_Group
::getGroupList($params);
664 //skip total if we are making call to show only children
665 if ( !CRM_Utils_Array
::value('parent_id', $params) ) {
667 $params['total'] = CRM_Contact_BAO_Group
::getGroupCount($params);
669 // get all the groups
670 $allGroups = CRM_Core_PseudoConstant
::allGroup();
673 // format params and add links
674 $groupList = array();
675 if (!empty($groups)) {
676 foreach ($groups as $id => $value) {
677 $groupList[$id]['group_id'] = $value['id'];
678 $groupList[$id]['group_name'] = $value['title'];
679 $groupList[$id]['class'] = $value['class'];
681 // append parent names if in search mode
682 if ( !CRM_Utils_Array
::value('parent_id', $params) &&
683 CRM_Utils_Array
::value( 'parents', $value ) ) {
684 $groupIds = explode(',', $value['parents']);
686 foreach($groupIds as $gId) {
687 $title[] = $allGroups[$gId];
689 $groupList[$id]['group_name'] .= '<div class="crm-row-parent-name"><em>'.ts('Child of').'</em>: ' . implode(', ', $title) . '</div>';
690 $groupList[$id]['class'] = '';
693 $groupList[$id]['group_description'] = CRM_Utils_Array
::value('description', $value);
694 if ( CRM_Utils_Array
::value('group_type', $value) ) {
695 $groupList[$id]['group_type'] = $value['group_type'];
698 $groupList[$id]['group_type'] = '';
700 $groupList[$id]['visibility'] = $value['visibility'];
701 $groupList[$id]['links'] = $value['action'];
702 $groupList[$id]['org_info'] = CRM_Utils_Array
::value('org_info', $value);
703 $groupList[$id]['created_by'] = CRM_Utils_Array
::value('created_by', $value);
705 $groupList[$id]['is_parent'] = $value['is_parent'];
712 * This function to get list of groups
714 * @param array $params associated array for params
717 static function getGroupList(&$params) {
718 $config = CRM_Core_Config
::singleton();
720 $whereClause = self
::whereClause($params, FALSE);
722 //$this->pagerAToZ( $whereClause, $params );
724 if (!empty($params['rowCount']) &&
725 $params['rowCount'] > 0
727 $limit = " LIMIT {$params['offset']}, {$params['rowCount']} ";
730 $orderBy = ' ORDER BY groups.title asc';
731 if (CRM_Utils_Array
::value('sort', $params)) {
732 $orderBy = ' ORDER BY ' . CRM_Utils_Array
::value('sort', $params);
735 $select = $from = $where = "";
737 if (CRM_Core_Permission
::check('administer Multiple Organizations') &&
738 CRM_Core_Permission
::isMultisiteEnabled()
740 $select = ", contact.display_name as org_name, contact.id as org_id";
741 $from = " LEFT JOIN civicrm_group_organization gOrg
742 ON gOrg.group_id = groups.id
743 LEFT JOIN civicrm_contact contact
744 ON contact.id = gOrg.organization_id ";
746 //get the Organization ID
747 $orgID = CRM_Utils_Request
::retrieve('oid', 'Positive', CRM_Core_DAO
::$_nullObject);
749 $where = " AND gOrg.organization_id = {$orgID}";
756 SELECT groups.*, createdBy.sort_name as created_by {$select}
757 FROM civicrm_group groups
758 LEFT JOIN civicrm_contact createdBy
759 ON createdBy.id = groups.created_id
761 WHERE $whereClause {$where}
765 $object = CRM_Core_DAO
::executeQuery($query, $params, TRUE, 'CRM_Contact_DAO_Group');
767 //FIXME CRM-4418, now we are handling delete separately
768 //if we introduce 'delete for group' make sure to handle here.
769 $groupPermissions = array(CRM_Core_Permission
::VIEW
);
770 if (CRM_Core_Permission
::check('edit groups')) {
771 $groupPermissions[] = CRM_Core_Permission
::EDIT
;
772 $groupPermissions[] = CRM_Core_Permission
::DELETE
;
776 $reservedPermission = CRM_Core_Permission
::check('administer reserved groups');
778 $links = self
::actionLinks();
780 $allTypes = CRM_Core_OptionGroup
::values('group_type');
783 while ($object->fetch()) {
784 $permission = CRM_Contact_BAO_Group
::checkPermission($object->id
, $object->title
);
787 $values[$object->id
] = array();
788 CRM_Core_DAO
::storeValues($object, $values[$object->id
]);
789 if ($object->saved_search_id
) {
790 $values[$object->id
]['title'] .= ' (' . ts('Smart Group') . ')';
791 // check if custom search, if so fix view link
792 $customSearchID = CRM_Core_DAO
::getFieldValue(
793 'CRM_Contact_DAO_SavedSearch',
794 $object->saved_search_id
,
798 if ($customSearchID) {
799 $newLinks[CRM_Core_Action
::VIEW
]['url'] = 'civicrm/contact/search/custom';
800 $newLinks[CRM_Core_Action
::VIEW
]['qs'] = "reset=1&force=1&ssID={$object->saved_search_id}";
804 $action = array_sum(array_keys($newLinks));
807 if (array_key_exists('is_reserved', $object)) {
808 //if group is reserved and I don't have reserved permission, suppress delete/edit
809 if ($object->is_reserved
&& !$reservedPermission) {
810 $action -= CRM_Core_Action
::DELETE
;
811 $action -= CRM_Core_Action
::UPDATE
;
812 $action -= CRM_Core_Action
::DISABLE
;
816 $values[$object->id
]['class'] = '';
817 if (array_key_exists('is_active', $object)) {
818 if ($object->is_active
) {
819 $action -= CRM_Core_Action
::ENABLE
;
822 $values[$object->id
]['class'] = 'disabled';
823 $action -= CRM_Core_Action
::VIEW
;
824 $action -= CRM_Core_Action
::DISABLE
;
828 $action = $action & CRM_Core_Action
::mask($groupPermissions);
830 $values[$object->id
]['visibility'] = CRM_Contact_DAO_Group
::tsEnum('visibility',
831 $values[$object->id
]['visibility']
833 if (isset($values[$object->id
]['group_type'])) {
834 $groupTypes = explode(CRM_Core_DAO
::VALUE_SEPARATOR
,
835 substr($values[$object->id
]['group_type'], 1, -1)
838 foreach ($groupTypes as $type) {
839 $types[] = CRM_Utils_Array
::value($type, $allTypes);
841 $values[$object->id
]['group_type'] = implode(', ', $types);
843 $values[$object->id
]['action'] = CRM_Core_Action
::formLink($newLinks,
847 'ssid' => $object->saved_search_id
,
851 // If group has children, add class for link to view children
852 $values[$object->id
]['is_parent'] = false;
853 if (array_key_exists('children', $values[$object->id
])) {
854 $values[$object->id
]['class'] = "crm-group-parent";
855 $values[$object->id
]['is_parent'] = true;
858 // If group is a child, add child class
859 if (array_key_exists('parents', $values[$object->id
])) {
860 $values[$object->id
]['class'] = "crm-group-child";
863 if (array_key_exists('children', $values[$object->id
])
864 && array_key_exists('parents', $values[$object->id
])) {
865 $values[$object->id
]['class'] = "crm-group-child crm-group-parent";
869 if ($object->org_id
) {
870 $contactUrl = CRM_Utils_System
::url('civicrm/contact/view', "reset=1&cid={$object->org_id}");
871 $values[$object->id
]['org_info'] = "<a href='{$contactUrl}'>{$object->org_name}</a>";
874 $values[$object->id
]['org_info'] = ''; // Empty cell
878 $values[$object->id
]['org_info'] = NULL; // Collapsed column if all cells are NULL
880 if ($object->created_id
) {
881 $contactUrl = CRM_Utils_System
::url('civicrm/contact/view', "reset=1&cid={$object->created_id}");
882 $values[$object->id
]['created_by'] = "<a href='{$contactUrl}'>{$object->created_by}</a>";
891 * This function to get hierarchical list of groups (parent followed by children)
893 * @param array $groupIDs array of group ids
897 static function getGroupsHierarchy (
900 $spacer = '<span class="child-indent"></span>',
903 if (empty($groupIDs)) {
907 $groupIdString = '(' . implode(',', array_keys($groupIDs)) . ')';
908 // <span class="child-icon"></span>
909 // need to return id, title (w/ spacer), description, visibility
911 // We need to build a list of tags ordered by hierarchy and sorted by
912 // name. The heirarchy will be communicated by an accumulation of
913 // separators in front of the name to give it a visual offset.
914 // Instead of recursively making mysql queries, we'll make one big
915 // query and build the heirarchy with the algorithm below.
917 $args = array(1 => array($groupIdString, 'String'));
919 SELECT id, title, description, visibility, parents
921 WHERE id IN $groupIdString
924 // group can have > 1 parent so parents may be comma separated list (eg. '1,2,5'). We just grab and match on 1st parent.
925 $parentArray = explode(',', $parents);
926 $parent = $parentArray[0];
927 $args[2] = array($parent, 'Integer');
928 $query .= " AND SUBSTRING_INDEX(parents, ',', 1) = %2";
930 $query .= " ORDER BY title";
931 $dao = CRM_Core_DAO
::executeQuery($query, $args);
933 // Sort the groups into the correct storage by the parent
934 // $roots represent the current leaf nodes that need to be checked for
935 // children. $rows represent the unplaced nodes
936 $roots = $rows = $allGroups = array();
937 while ($dao->fetch()) {
938 $allGroups[$dao->id
] = array('title' => $dao->title
,
939 'visibility' => $dao->visibility
,
940 'description' => $dao->description
);
942 if ($dao->parents
== $parents) {
943 $roots[] = array('id' => $dao->id
,
945 'title' => $dao->title
);
948 // group can have > 1 parent so $dao->parents may be comma separated list (eg. '1,2,5'). Grab and match on 1st parent.
949 $parentArray = explode(',', $dao->parents
);
950 $parent = $parentArray[0];
951 $rows[] = array('id' => $dao->id
,
953 'title' => $dao->title
,
954 'parents' => $parent);
958 // While we have nodes left to build, shift the first (alphabetically)
959 // node of the list, place it in our groups list and loop through the
960 // list of unplaced nodes to find its children. We make a copy to
961 // iterate through because we must modify the unplaced nodes list
963 while (count($roots)) {
964 $new_roots = array();
965 $current_rows = $rows;
966 $root = array_shift($roots);
967 $groups[$root['id']] = array($root['prefix'], $root['title']);
969 // As you find the children, append them to the end of the new set
970 // of roots (maintain alphabetical ordering). Also remove the node
971 // from the set of unplaced nodes.
972 if (is_array($current_rows)) {
973 foreach ($current_rows as $key => $row) {
974 if ($row['parents'] == $root['id']) {
975 $new_roots[] = array('id' => $row['id'], 'prefix' => $groups[$root['id']][0] . $spacer, 'title' => $row['title']);
981 //As a group, insert the new roots into the beginning of the roots
982 //list. This maintains the hierarchical ordering of the tags.
983 $roots = array_merge($new_roots, $roots);
986 // Prefix titles with the calcuated spacing to give the visual
987 // appearance of ordering when transformed into HTML in the form layer. Add description and visibility.
988 $groupsReturn = array();
989 foreach ($groups as $key=>$value) {
991 $groupsReturn[$key] = $value[0] . $value[1];
993 $groupsReturn[$key] = array(
994 'title' => $value[0] . $value[1],
995 'description' => $allGroups[$key]['description'],
996 'visibility' => $allGroups[$key]['visibility'],
1001 return $groupsReturn;
1004 static function getGroupCount(&$params) {
1005 $whereClause = self
::whereClause($params, FALSE);
1006 $query = "SELECT COUNT(*) FROM civicrm_group groups";
1008 if (CRM_Utils_Array
::value('created_by', $params)) {
1010 INNER JOIN civicrm_contact createdBy
1011 ON createdBy.id = groups.created_id";
1014 WHERE {$whereClause}";
1015 return CRM_Core_DAO
::singleValueQuery($query, $params);
1018 function whereClause(&$params, $sortBy = TRUE, $excludeHidden = TRUE) {
1022 $title = CRM_Utils_Array
::value('title', $params);
1024 $clauses[] = "groups.title LIKE %1";
1025 if (strpos($title, '%') !== FALSE) {
1026 $params[1] = array($title, 'String', FALSE);
1029 $params[1] = array($title, 'String', TRUE);
1033 $groupType = CRM_Utils_Array
::value('group_type', $params);
1035 $types = explode(',', $groupType);
1036 if (!empty($types)) {
1037 $clauses[] = 'groups.group_type LIKE %2';
1038 $typeString = CRM_Core_DAO
::VALUE_SEPARATOR
. implode(CRM_Core_DAO
::VALUE_SEPARATOR
, $types) . CRM_Core_DAO
::VALUE_SEPARATOR
;
1039 $params[2] = array($typeString, 'String', TRUE);
1043 $visibility = CRM_Utils_Array
::value('visibility', $params);
1045 $clauses[] = 'groups.visibility = %3';
1046 $params[3] = array($visibility, 'String');
1049 $groupStatus = CRM_Utils_Array
::value('status', $params);
1051 switch ($groupStatus) {
1053 $clauses[] = 'groups.is_active = 1';
1054 $params[4] = array($groupStatus, 'Integer');
1058 $clauses[] = 'groups.is_active = 0';
1059 $params[4] = array($groupStatus, 'Integer');
1063 $clauses[] = '(groups.is_active = 0 OR groups.is_active = 1 )';
1068 $parentsOnly = CRM_Utils_Array
::value('parentsOnly', $params);
1070 $clauses[] = 'groups.parents IS NULL';
1073 // only show child groups of a specific parent group
1074 $parent_id = CRM_Utils_Array
::value('parent_id', $params);
1076 $clauses[] = 'groups.id IN (SELECT child_group_id FROM civicrm_group_nesting WHERE parent_group_id = %5)';
1077 $params[5] = array($parent_id, 'Integer');
1080 if ($createdBy = CRM_Utils_Array
::value('created_by', $params)) {
1081 $clauses[] = "createdBy.sort_name LIKE %6";
1082 if (strpos($createdBy, '%') !== FALSE) {
1083 $params[6] = array($createdBy, 'String', FALSE);
1086 $params[6] = array($createdBy, 'String', TRUE);
1092 $this->_sortByCharacter !== null ) {
1094 "groups.title LIKE '" .
1095 strtolower(CRM_Core_DAO::escapeWildCardString($this->_sortByCharacter)) .
1099 // dont do a the below assignement when doing a
1100 // AtoZ pager clause
1102 if ( count( $clauses ) > 1 ) {
1103 $this->assign( 'isSearch', 1 );
1105 $this->assign( 'isSearch', 0 );
1111 if (empty($clauses)) {
1112 $clauses[] = 'groups.is_active = 1';
1115 if ($excludeHidden) {
1116 $clauses[] = 'groups.is_hidden = 0';
1119 return implode(' AND ', $clauses);
1123 * Function to define action links
1125 * @return array $links array of action links
1128 static function actionLinks() {
1130 CRM_Core_Action
::VIEW
=> array(
1131 'name' => ts('Contacts'),
1132 'url' => 'civicrm/group/search',
1133 'qs' => 'reset=1&force=1&context=smog&gid=%%id%%',
1134 'title' => ts('Group Contacts'),
1136 CRM_Core_Action
::UPDATE
=> array(
1137 'name' => ts('Settings'),
1138 'url' => 'civicrm/group',
1139 'qs' => 'reset=1&action=update&id=%%id%%',
1140 'title' => ts('Edit Group'),
1142 CRM_Core_Action
::DISABLE
=> array(
1143 'name' => ts('Disable'),
1144 'extra' => 'onclick = "enableDisable( %%id%%,\'' . 'CRM_Contact_BAO_Group' . '\',\'' . 'enable-disable' . '\' );"',
1145 'ref' => 'disable-action',
1146 'title' => ts('Disable Group'),
1148 CRM_Core_Action
::ENABLE
=> array(
1149 'name' => ts('Enable'),
1150 'extra' => 'onclick = "enableDisable( %%id%%,\'' . 'CRM_Contact_BAO_Group' . '\',\'' . 'disable-enable' . '\' );"',
1151 'ref' => 'enable-action',
1152 'title' => ts('Enable Group'),
1154 CRM_Core_Action
::DELETE
=> array(
1155 'name' => ts('Delete'),
1156 'url' => 'civicrm/group',
1157 'qs' => 'reset=1&action=delete&id=%%id%%',
1158 'title' => ts('Delete Group'),
1165 function pagerAtoZ($whereClause, $whereParams) {
1167 SELECT DISTINCT UPPER(LEFT(groups.title, 1)) as sort_name
1168 FROM civicrm_group groups
1170 ORDER BY LEFT(groups.title, 1)
1172 $dao = CRM_Core_DAO
::executeQuery($query, $whereParams);
1174 return CRM_Utils_PagerAToZ
::getAToZBar($dao, $this->_sortByCharacter
, TRUE);