3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.6 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2014 |
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-2014
35 class CRM_Contact_BAO_GroupNestingCache
{
36 static public function update() {
37 // lets build the tree in memory first
40 SELECT n.child_group_id as child ,
41 n.parent_group_id as parent
42 FROM civicrm_group_nesting n,
45 WHERE n.child_group_id = gc.id
46 AND n.parent_group_id = gp.id
49 $dao = CRM_Core_DAO
::executeQuery($sql);
52 while ($dao->fetch()) {
53 if (!array_key_exists($dao->child
, $tree)) {
54 $tree[$dao->child
] = array(
55 'children' => array(),
60 if (!array_key_exists($dao->parent
, $tree)) {
61 $tree[$dao->parent
] = array(
62 'children' => array(),
67 $tree[$dao->child
]['parents'][] = $dao->parent
;
68 $tree[$dao->parent
]['children'][] = $dao->child
;
71 if (self
::checkCyclicGraph($tree)) {
72 CRM_Core_Error
::fatal(ts('We detected a cycle which we cant handle. aborting'));
75 // first reset the current cache entries
81 CRM_Core_DAO
::executeQuery($sql);
84 foreach (array_keys($tree) as $id) {
85 $parents = implode(',', $tree[$id]['parents']);
86 $children = implode(',', $tree[$id]['children']);
87 $parents = $parents == NULL ?
'null' : "'$parents'";
88 $children = $children == NULL ?
'null' : "'$children'";
91 SET parents = $parents ,
95 CRM_Core_DAO
::executeQuery($sql);
98 // this tree stuff is quite useful, so lets store it in the cache
99 CRM_Core_BAO_Cache
::setItem($tree, 'contact groups', 'nestable tree hierarchy');
107 public static function checkCyclicGraph(&$tree) {
108 // lets keep this simple, we should probably use a graph algoritm here at some stage
110 // foreach group that has a parent or a child, ensure that
111 // the ancestors and descendants dont intersect
112 foreach ($tree as $id => $dontCare) {
113 if (self
::isCyclic($tree, $id)) {
127 public static function isCyclic(&$tree, $id) {
128 $parents = $children = array();
129 self
::getAll($parent, $tree, $id, 'parents');
130 self
::getAll($child, $tree, $id, 'children');
132 $one = array_intersect($parents, $children);
133 $two = array_intersect($children, $parents);
137 CRM_Core_Error
::debug($id, $tree);
138 CRM_Core_Error
::debug($id, $one);
139 CRM_Core_Error
::debug($id, $two);
151 public static function getPotentialCandidates($id, &$groups) {
152 $tree = CRM_Core_BAO_Cache
::getItem('contact groups', 'nestable tree hierarchy');
154 if ($tree === NULL) {
156 $tree = CRM_Core_BAO_Cache
::getItem('contact groups', 'nestable tree hierarchy');
159 $potential = $groups;
161 // remove all descendants
162 self
::invalidate($potential, $tree, $id, 'children');
164 // remove all ancestors
165 self
::invalidate($potential, $tree, $id, 'parents');
167 return array_keys($potential);
176 public static function invalidate(&$potential, &$tree, $id, $token) {
177 unset($potential[$id]);
179 if (!isset($tree[$id]) ||
180 empty($tree[$id][$token])
185 foreach ($tree[$id][$token] as $tokenID) {
186 self
::invalidate($potential, $tree, $tokenID, $token);
196 public static function getAll(&$all, &$tree, $id, $token) {
197 // if seen before, dont do anything
198 if (isset($all[$id])) {
203 if (!isset($tree[$id]) ||
204 empty($tree[$id][$token])
209 foreach ($tree[$id][$token] as $tokenID) {
210 self
::getAll($all, $tree, $tokenID, $token);
217 public static function json() {
218 $tree = CRM_Core_BAO_Cache
::getItem('contact groups', 'nestable tree hierarchy');
220 if ($tree === NULL) {
222 $tree = CRM_Core_BAO_Cache
::getItem('contact groups', 'nestable tree hierarchy');
225 // get all the groups
226 $groups = CRM_Core_PseudoConstant
::group();
228 foreach ($groups as $id => $name) {
229 $string = "id:'$id', name:'$name'";
230 if (isset($tree[$id])) {
232 if (!empty($tree[$id]['children'])) {
233 foreach ($tree[$id]['children'] as $child) {
234 $children[] = "{_reference:'$child'}";
236 $children = implode(',', $children);
237 $string .= ", children:[$children]";
238 if (empty($tree[$id]['parents'])) {
239 $string .= ", type:'rootGroup'";
242 $string .= ", type:'middleGroup'";
246 $string .= ", type:'leafGroup'";
250 $string .= ", children:[], type:'rootGroup'";
252 $values[] = "{ $string }";
255 $items = implode(",\n", $values);