Merge pull request #2818 from davecivicrm/CRM-14417
[civicrm-core.git] / CRM / Profile / Selector / Listings.php
1 <?php
2 /*
3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.5 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2014 |
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
9 | |
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. |
13 | |
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. |
18 | |
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 +--------------------------------------------------------------------+
26 */
27
28 /**
29 *
30 * @package CRM
31 * @copyright CiviCRM LLC (c) 2004-2014
32 * $Id$
33 *
34 */
35
36 /**
37 * This class is used to retrieve and display a range of
38 * contacts that match the given criteria (specifically for
39 * results of advanced search options.
40 *
41 */
42 class CRM_Profile_Selector_Listings extends CRM_Core_Selector_Base implements CRM_Core_Selector_API {
43
44 /**
45 * array of supported links, currenly view and edit
46 *
47 * @var array
48 * @static
49 */
50 static $_links = NULL;
51
52 /**
53 * we use desc to remind us what that column is, name is used in the tpl
54 *
55 * @var array
56 * @static
57 */
58 static $_columnHeaders;
59
60 /**
61 * The sql params we use to get the list of contacts
62 *
63 * @var string
64 * @access protected
65 */
66 protected $_params;
67
68 /**
69 * the public visible fields to be shown to the user
70 *
71 * @var array
72 * @access protected
73 */
74 protected $_fields;
75
76 /**
77 * the custom fields for this domain
78 *
79 * @var array
80 * @access protected
81 */
82 protected $_customFields;
83
84 /**
85 * cache the query object
86 *
87 * @var object
88 * @access protected
89 */
90 protected $_query;
91
92 /**
93 * cache the expanded options list if any
94 *
95 * @var object
96 * @access protected
97 */
98 protected $_options;
99
100 /**
101 * The group id that we are editing
102 *
103 * @var int
104 */
105 protected $_gid;
106
107 /**
108 * Do we enable mapping of users
109 *
110 * @var boolean
111 */
112 protected $_map;
113
114 /**
115 * Do we enable edit link
116 *
117 * @var boolean
118 */
119 protected $_editLink;
120
121 /**
122 * Should we link to the UF Profile
123 *
124 * @var boolean
125 */
126 protected $_linkToUF;
127
128 /**
129 * Store profile ids if multiple profile ids are passed using comma separated.
130 * Currently lets implement this functionality only for dialog mode
131 */
132 protected $_profileIds = array();
133
134 protected $_multiRecordTableName = NULL;
135 /**
136 * Class constructor
137 *
138 * @param string params the params for the where clause
139 *
140 * @return CRM_Contact_Selector_Profile
141 * @access public
142 */
143 function __construct(
144 &$params,
145 &$customFields,
146 $ufGroupIds = NULL,
147 $map = FALSE,
148 $editLink = FALSE,
149 $linkToUF = FALSE
150 ) {
151 $this->_params = $params;
152
153 if (is_array($ufGroupIds)) {
154 $this->_profileIds = $ufGroupIds;
155 $this->_gid = $ufGroupIds[0];
156 }
157 else {
158 $this->_profileIds = array($ufGroupIds);
159 $this->_gid = $ufGroupIds;
160 }
161
162 $this->_map = $map;
163 $this->_editLink = $editLink;
164 $this->_linkToUF = $linkToUF;
165
166 //get the details of the uf group
167 if ($this->_gid) {
168 $groupId = CRM_Core_DAO::getFieldValue('CRM_Core_BAO_UFGroup',
169 $this->_gid, 'limit_listings_group_id'
170 );
171 }
172
173 // add group id to params if a uf group belong to a any group
174 if ($groupId) {
175 if (!empty($this->_params['group'])) {
176 $this->_params['group'][$groupId] = 1;
177 }
178 else {
179 $this->_params['group'] = array($groupId => 1);
180 }
181 }
182
183 $this->_fields = CRM_Core_BAO_UFGroup::getListingFields(CRM_Core_Action::VIEW,
184 CRM_Core_BAO_UFGroup::PUBLIC_VISIBILITY |
185 CRM_Core_BAO_UFGroup::LISTINGS_VISIBILITY,
186 FALSE, $this->_profileIds
187 );
188
189 $this->_customFields = &$customFields;
190
191 $returnProperties = CRM_Contact_BAO_Contact::makeHierReturnProperties($this->_fields);
192 $returnProperties['contact_type'] = 1;
193 $returnProperties['contact_sub_type'] = 1;
194 $returnProperties['sort_name'] = 1;
195
196 $queryParams = CRM_Contact_BAO_Query::convertFormValues($this->_params, 1);
197 $this->_query = new CRM_Contact_BAO_Query($queryParams, $returnProperties, $this->_fields);
198
199 //the below is done for query building for multirecord custom field listing
200 //to show all the custom field multi valued records of a particular contact
201 $this->setMultiRecordTableName($this->_fields);
202
203 $this->_options = &$this->_query->_options;
204 }
205 //end of constructor
206
207 /**
208 * This method returns the links that are given for each search row.
209 *
210 * @return array
211 * @access public
212 *
213 */
214 static function &links($map = FALSE, $editLink = FALSE, $ufLink = FALSE, $gids = NULL) {
215 if (!self::$_links) {
216 self::$_links = array();
217
218 $viewPermission = TRUE;
219 if ($gids) {
220 // check view permission for each profile id, in case multiple profile ids are rendered
221 // then view action is disabled if any profile returns false
222 foreach ($gids as $profileId) {
223 $viewPermission = CRM_Core_Permission::ufGroupValid($profileId, CRM_Core_Permission::VIEW);
224 if (!$viewPermission) {
225 break;
226 }
227 }
228 }
229
230 if ($viewPermission) {
231 self::$_links[CRM_Core_Action::VIEW] = array(
232 'name' => ts('View'),
233 'url' => 'civicrm/profile/view',
234 'qs' => 'reset=1&id=%%id%%&gid=%%gid%%',
235 'title' => ts('View Profile Details'),
236 );
237 }
238
239 if ($editLink) {
240 self::$_links[CRM_Core_Action::UPDATE] = array(
241 'name' => ts('Edit'),
242 'url' => 'civicrm/profile/edit',
243 'qs' => 'reset=1&id=%%id%%&gid=%%gid%%',
244 'title' => ts('Edit'),
245 );
246 }
247
248 if ($ufLink) {
249 self::$_links[CRM_Core_Action::PROFILE] = array(
250 'name' => ts('Website Profile'),
251 'url' => 'user/%%ufID%%',
252 'qs' => ' ',
253 'title' => ts('View Website Profile'),
254 );
255 }
256
257 if ($map) {
258 self::$_links[CRM_Core_Action::MAP] = array(
259 'name' => ts('Map'),
260 'url' => 'civicrm/profile/map',
261 'qs' => 'reset=1&cid=%%id%%&gid=%%gid%%',
262 'title' => ts('Map'),
263 );
264 }
265 }
266 return self::$_links;
267 }
268 //end of function
269
270 /**
271 * getter for array of the parameters required for creating pager.
272 *
273 * @param
274 * @access public
275 */
276 function getPagerParams($action, &$params) {
277 $status =
278 CRM_Utils_System::isNull($this->_multiRecordTableName) ? ts('Contact %%StatusMessage%%') : ts('Contact Multi Records %%StatusMessage%%');
279 $params['status'] = $status;
280 $params['csvString'] = NULL;
281 $params['rowCount'] = CRM_Utils_Pager::ROWCOUNT;
282
283 $params['buttonTop'] = 'PagerTopButton';
284 $params['buttonBottom'] = 'PagerBottomButton';
285 }
286 //end of function
287
288 /**
289 * returns the column headers as an array of tuples:
290 * (name, sortName (key to the sort array))
291 *
292 * @param string $action the action being performed
293 * @param enum $output what should the result set include (web/email/csv)
294 *
295 * @return array the column headers that need to be displayed
296 * @access public
297 */
298 function &getColumnHeaders($action = NULL, $output = NULL) {
299 static $skipFields = array('group', 'tag');
300 $multipleFields = array('url');
301 $direction = CRM_Utils_Sort::ASCENDING;
302 $empty = TRUE;
303 if (!isset(self::$_columnHeaders)) {
304 self::$_columnHeaders = array(array('name' => ''),
305 array(
306 'name' => ts('Name'),
307 'sort' => 'sort_name',
308 'direction' => CRM_Utils_Sort::ASCENDING,
309 'field_name' => 'sort_name',
310 ),
311 );
312
313 $locationTypes = CRM_Core_PseudoConstant::get('CRM_Core_DAO_Address', 'location_type_id');
314
315 foreach ($this->_fields as $name => $field) {
316 // skip pseudo fields
317 if (substr($name, 0, 9) == 'phone_ext') {
318 continue;
319 }
320
321 if (!empty($field['in_selector']) &&
322 !in_array($name, $skipFields)
323 ) {
324
325 if (strpos($name, '-') !== FALSE) {
326 $value = explode('-', $name);
327 $fieldName = CRM_Utils_Array::value(0, $value);
328 $lType = CRM_Utils_Array::value(1, $value);
329 $type = CRM_Utils_Array::value(2, $value);
330
331 if (!in_array($fieldName, $multipleFields)) {
332 if ($lType == 'Primary') {
333 $locationTypeName = 1;
334 }
335 else {
336 $locationTypeName = $locationTypes[$lType];
337 }
338
339 if (in_array($fieldName, array(
340 'phone', 'im', 'email'))) {
341 if ($type) {
342 $name = "`$locationTypeName-$fieldName-$type`";
343 }
344 else {
345 $name = "`$locationTypeName-$fieldName`";
346 }
347 }
348 else {
349 $name = "`$locationTypeName-$fieldName`";
350 }
351 }
352 else {
353 $name = "website-{$lType}-{$fieldName}";
354 }
355 }
356
357 self::$_columnHeaders[] = array(
358 'name' => $field['title'],
359 'sort' => $name,
360 'direction' => $direction,
361 'field_name' => CRM_Core_BAO_UFField::isValidFieldName($name) ? $name : $fieldName,
362 );
363
364 $direction = CRM_Utils_Sort::DONTCARE;
365 $empty = FALSE;
366 }
367 }
368
369 // if we dont have any valid columns, dont add the implicit ones
370 // this allows the template to check on emptiness of column headers
371 if ($empty) {
372 self::$_columnHeaders = array();
373 }
374 else {
375 self::$_columnHeaders[] = array('desc' => ts('Actions'));
376 }
377 }
378 return self::$_columnHeaders;
379 }
380
381 /**
382 * Returns total number of rows for the query.
383 *
384 * @param
385 *
386 * @return int Total number of rows
387 * @access public
388 */
389 function getTotalCount($action) {
390 $additionalWhereClause = 'contact_a.is_deleted = 0';
391 $additionalFromClause = NULL;
392 $returnQuery = NULL;
393
394 if ($this->_multiRecordTableName &&
395 !array_key_exists($this->_multiRecordTableName, $this->_query->_whereTables)) {
396 $additionalFromClause = CRM_Utils_Array::value($this->_multiRecordTableName, $this->_query->_tables);
397 $returnQuery = TRUE;
398 }
399
400 $countVal = $this->_query->searchQuery(0, 0, NULL, TRUE, NULL, NULL, NULL,
401 $returnQuery, $additionalWhereClause, NULL, $additionalFromClause
402 );
403
404 if (!$returnQuery) {
405 return $countVal;
406 }
407
408 if ($returnQuery) {
409 $sql = preg_replace('/DISTINCT/', '', $countVal);
410 return CRM_Core_DAO::singleValueQuery($sql);
411 }
412 }
413
414 /**
415 * Return the qill for this selector
416 *
417 * @return string
418 * @access public
419 */
420 function getQill() {
421 return $this->_query->qill();
422 }
423
424 /**
425 * returns all the rows in the given offset and rowCount
426 *
427 * @param enum $action the action being performed
428 * @param int $offset the row number to start from
429 * @param int $rowCount the number of rows to return
430 * @param string $sort the sql string that describes the sort order
431 * @param enum $output what should the result set include (web/email/csv)
432 *
433 * @return int the total number of rows for this action
434 */
435 function &getRows($action, $offset, $rowCount, $sort, $output = NULL) {
436
437 $multipleFields = array('url');
438 //$sort object processing for location fields
439 if ($sort) {
440 $vars = $sort->_vars;
441 $varArray = array();
442 foreach ($vars as $key => $field) {
443 $field = $vars[$key];
444 $fieldArray = explode('-', $field['name']);
445 $fieldType = CRM_Utils_Array::value('2', $fieldArray);
446 if (is_numeric(CRM_Utils_Array::value('1', $fieldArray))) {
447 if (!in_array($fieldType, $multipleFields)) {
448 $locationType = new CRM_Core_DAO_LocationType();
449 $locationType->id = $fieldArray[1];
450 $locationType->find(TRUE);
451 if ($fieldArray[0] == 'email' || $fieldArray[0] == 'im' || $fieldArray[0] == 'phone') {
452 $field['name'] = "`" . $locationType->name . "-" . $fieldArray[0] . "-1`";
453 }
454 else {
455 $field['name'] = "`" . $locationType->name . "-" . $fieldArray[0] . "`";
456 }
457 }
458 else {
459 $field['name'] = "`website-" . $fieldArray[1] . "-{$fieldType}`";
460 }
461 }
462 $varArray[$key] = $field;
463 }
464 $sort->_vars = $varArray;
465 }
466
467 $additionalWhereClause = 'contact_a.is_deleted = 0';
468 $returnQuery = NULL;
469 if ($this->_multiRecordTableName) {
470 $returnQuery = TRUE;
471 }
472
473 $result = $this->_query->searchQuery($offset, $rowCount, $sort, NULL, NULL,
474 NULL, NULL, $returnQuery, $additionalWhereClause
475 );
476
477 if ($returnQuery) {
478 $resQuery = preg_replace('/GROUP BY contact_a.id[\s]+ORDER BY/', ' ORDER BY', $result);
479 $result = CRM_Core_DAO::executeQuery($resQuery);
480 }
481
482 // process the result of the query
483 $rows = array();
484
485 // check if edit is configured in profile settings
486 if ($this->_gid) {
487 $editLink = CRM_Core_DAO::getFieldValue('CRM_Core_DAO_UFGroup', $this->_gid, 'is_edit_link');
488 }
489
490 //FIXME : make sure to handle delete separately. CRM-4418
491 $mask = CRM_Core_Action::mask(array(CRM_Core_Permission::getPermission()));
492 if ($editLink && ($mask & CRM_Core_Permission::EDIT)) {
493 // do not allow edit for anon users in joomla frontend, CRM-4668
494 $config = CRM_Core_Config::singleton();
495 if (!$config->userFrameworkFrontend) {
496 $this->_editLink = TRUE;
497 }
498 }
499 $links = self::links($this->_map, $this->_editLink, $this->_linkToUF, $this->_profileIds);
500
501 $locationTypes = CRM_Core_PseudoConstant::get('CRM_Core_DAO_Address', 'location_type_id');
502
503 $names = array();
504 static $skipFields = array('group', 'tag');
505
506 foreach ($this->_fields as $key => $field) {
507 // skip pseudo fields
508 if (substr($key, 0, 9) == 'phone_ext') {
509 continue;
510 }
511
512 if (!empty($field['in_selector']) &&
513 !in_array($key, $skipFields)
514 ) {
515 if (strpos($key, '-') !== FALSE) {
516 $value = explode('-', $key);
517 $fieldName = CRM_Utils_Array::value(0, $value);
518 $id = CRM_Utils_Array::value(1, $value);
519 $type = CRM_Utils_Array::value(2, $value);
520
521 if (!in_array($fieldName, $multipleFields)) {
522 $locationTypeName = NULL;
523 if (is_numeric($id)) {
524 $locationTypeName = CRM_Utils_Array::value($id, $locationTypes);
525 }
526 else {
527 if ($id == 'Primary') {
528 $locationTypeName = 1;
529 }
530 }
531
532 if (!$locationTypeName) {
533 continue;
534 }
535 $locationTypeName = str_replace(' ', '_', $locationTypeName);
536 if (in_array($fieldName, array(
537 'phone', 'im', 'email'))) {
538 if ($type) {
539 $names[] = "{$locationTypeName}-{$fieldName}-{$type}";
540 }
541 else {
542 $names[] = "{$locationTypeName}-{$fieldName}";
543 }
544 }
545 else {
546 $names[] = "{$locationTypeName}-{$fieldName}";
547 }
548 }
549 else {
550 $names[] = "website-{$id}-{$fieldName}";
551 }
552 }
553 elseif ($field['name'] == 'id') {
554 $names[] = 'contact_id';
555 }
556 else {
557 $names[] = $field['name'];
558 }
559 }
560 }
561
562
563 $multipleSelectFields = array('preferred_communication_method' => 1);
564 $multiRecordTableId = NULL;
565 if ($this->_multiRecordTableName) {
566 $multiRecordTableId = "{$this->_multiRecordTableName}_id";
567 }
568
569 // we need to determine of overlay profile should be shown
570 $showProfileOverlay = CRM_Core_BAO_UFGroup::showOverlayProfile();
571
572 while ($result->fetch()) {
573 $this->_query->convertToPseudoNames($result);
574
575 if (isset($result->country)) {
576 // the query returns the untranslated country name
577 $i18n = CRM_Core_I18n::singleton();
578 $result->country = $i18n->translate($result->country);
579 }
580 $row = array();
581 $empty = TRUE;
582 $row[] = CRM_Contact_BAO_Contact_Utils::getImage($result->contact_sub_type ?
583 $result->contact_sub_type : $result->contact_type,
584 FALSE,
585 $result->contact_id,
586 $showProfileOverlay
587 );
588 if ($result->sort_name) {
589 $row[] = $result->sort_name;
590 $empty = FALSE;
591 }
592 else {
593 continue;
594 }
595
596 foreach ($names as $name) {
597 if ($cfID = CRM_Core_BAO_CustomField::getKeyID($name)) {
598 $row[] = CRM_Core_BAO_CustomField::getDisplayValue($result->$name,
599 $cfID,
600 $this->_options,
601 $result->contact_id
602 );
603 }
604 elseif (substr($name, -4) == '-url' &&
605 !empty($result->$name)
606 ) {
607 $url = CRM_Utils_System::fixURL($result->$name);
608 $typeId = substr($name, 0, -4) . "-website_type_id";
609 $typeName = CRM_Core_PseudoConstant::getLabel('CRM_Core_DAO_Website', 'website_type_id', $result->$typeId);
610 if ($typeName) {
611 $row[] = "<a href=\"$url\">{$result->$name} (${typeName})</a>";
612 }
613 else {
614 $row[] = "<a href=\"$url\">{$result->$name}</a>";
615 }
616 }
617 elseif ($name == 'preferred_language') {
618 $row[] = CRM_Core_PseudoConstant::getLabel('CRM_Contact_DAO_Contact', 'preferred_language', $result->$name);
619 }
620 elseif ($multipleSelectFields &&
621 array_key_exists($name, $multipleSelectFields)
622 ) {
623 $paramsNew = array($name => $result->$name);
624 $name = array($name => array('newName' => $name, 'groupName' => $name));
625
626 CRM_Core_OptionGroup::lookupValues($paramsNew, $name, FALSE);
627 $row[] = $paramsNew[$key];
628 }
629 elseif (strpos($name, '-im')) {
630 if (!empty($result->$name)) {
631 $providerId = $name . "-provider_id";
632 $providerName = CRM_Core_PseudoConstant::getLabel('CRM_Core_DAO_IM', 'provider_id', $result->$providerId);
633 $row[] = $result->$name . " ({$providerName})";
634 }
635 else {
636 $row[] = '';
637 }
638 }
639 elseif (strpos($name, '-phone-')) {
640 $phoneExtField = str_replace('phone', 'phone_ext', $name);
641 if (isset($result->$phoneExtField)) {
642 $row[] = $result->$name . " (" . $result->$phoneExtField . ")";
643 }
644 else {
645 $row[] = $result->$name;
646 }
647 }
648 elseif (in_array($name, array(
649 'addressee', 'email_greeting', 'postal_greeting'))) {
650 $dname = $name . '_display';
651 $row[] = $result->$dname;
652 }
653 elseif (in_array($name, array(
654 'birth_date', 'deceased_date'))) {
655 $row[] = CRM_Utils_Date::customFormat($result->$name);
656 }
657 elseif (isset($result->$name)) {
658 $row[] = $result->$name;
659 }
660 else {
661 $row[] = '';
662 }
663
664 if (!empty($result->$name)) {
665 $empty = FALSE;
666 }
667 }
668
669 $newLinks = $links;
670 $params = array(
671 'id' => $result->contact_id,
672 'gid' => implode(',', $this->_profileIds),
673 );
674
675 // pass record id param to view url for multi record view
676 if ($multiRecordTableId && $newLinks) {
677 if ($result->$multiRecordTableId){
678 if ($newLinks[CRM_Core_Action::VIEW]['url'] == 'civicrm/profile/view') {
679 $newLinks[CRM_Core_Action::VIEW]['qs'] .= "&multiRecord=view&recordId=%%recordId%%&allFields=1";
680 $params['recordId'] = $result->$multiRecordTableId;
681 }
682 }
683 }
684
685 if ($this->_linkToUF) {
686 $ufID = CRM_Core_BAO_UFMatch::getUFId($result->contact_id);
687 if (!$ufID) {
688 unset($newLinks[CRM_Core_Action::PROFILE]);
689 }
690 else {
691 $params['ufID'] = $ufID;
692 }
693 }
694
695 $row[] = CRM_Core_Action::formLink($newLinks,
696 $mask,
697 $params,
698 ts('more'),
699 FALSE,
700 'profile.selector.row',
701 'Contact',
702 $result->contact_id
703 );
704
705 if (!$empty) {
706 $rows[] = $row;
707 }
708 }
709 return $rows;
710 }
711
712 /**
713 * name of export file.
714 *
715 * @param string $output type of output
716 *
717 * @return string name of the file
718 */
719 function getExportFileName($output = 'csv') {
720 return ts('CiviCRM Profile Listings');
721 }
722
723 /**
724 * set the _multiRecordTableName to display the result set
725 * according to multi record custom field values
726 */
727 function setMultiRecordTableName($fields) {
728 $customGroupId = $multiRecordTableName = NULL;
729 $selectorSet = FALSE;
730
731 foreach ($fields as $field => $properties) {
732 if (!CRM_Core_BAO_CustomField::getKeyID($field)) {
733 continue;
734 }
735 if ($cgId = CRM_Core_BAO_CustomField::isMultiRecordField($field)) {
736 $customGroupId = CRM_Utils_System::isNull($customGroupId) ? $cgId : $customGroupId;
737
738 //if the field is submitted set multiRecordTableName
739 if ($customGroupId) {
740 $isSubmitted = FALSE;
741 foreach ($this->_query->_params as $key => $value) {
742 //check the query params 'where' element
743 if ($value[0] == $field) {
744 $isSubmitted = TRUE;
745 break;
746 }
747 }
748
749 if ($isSubmitted) {
750 $this->_multiRecordTableName = $multiRecordTableName =
751 CRM_Core_DAO::getFieldValue('CRM_Core_DAO_CustomGroup', $customGroupId, 'table_name');
752 if ($multiRecordTableName) {
753 return;
754 }
755 }
756
757 if (!empty($properties['in_selector'])) {
758 $selectorSet = TRUE;
759 }
760 }
761 }
762 }
763
764 if (!isset($customGroupId) || !$customGroupId) {
765 return;
766 }
767
768 //if the field is in selector and not a searchable field
769 //get the proper customvalue table name
770 if ($selectorSet) {
771 $this->_multiRecordTableName = $multiRecordTableName =
772 CRM_Core_DAO::getFieldValue('CRM_Core_DAO_CustomGroup', $customGroupId, 'table_name');
773 }
774 } //func close
775 }
776 //end of class
777