3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.4 |
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
37 * Main page for viewing contact.
40 class CRM_Contact_Page_View
extends CRM_Core_Page
{
43 * the id of the object being viewed (note/relationship etc)
51 * the contact id of the contact being viewed
56 protected $_contactId;
59 * The action that we are performing
67 * The permission we have on this contact
72 protected $_permission;
75 * Heart of the viewing process. The runner gets all the meta data for
76 * the contact and calls the appropriate type of page to view.
82 function preProcess() {
84 $this->_id
= CRM_Utils_Request
::retrieve('id', 'Positive', $this);
85 $this->assign('id', $this->_id
);
87 $qfKey = CRM_Utils_Request
::retrieve('key', 'String', $this);
89 if (!CRM_Utils_Rule
::qfKey($qfKey)) {
92 $this->assign('searchKey', $qfKey);
94 // retrieve the group contact id, so that we can get contact id
95 $gcid = CRM_Utils_Request
::retrieve('gcid', 'Positive', $this);
98 $this->_contactId
= CRM_Utils_Request
::retrieve('cid', 'Positive', $this, TRUE);
101 $this->_contactId
= CRM_Core_DAO
::getFieldValue('CRM_Contact_DAO_GroupContact', $gcid, 'contact_id');
104 if (!$this->_contactId
) {
105 CRM_Core_Error
::statusBounce(
106 ts('We could not find a contact id.'),
107 CRM_Utils_System
::url('civicrm/dashboard', 'reset=1')
111 // ensure that the id does exist
112 if ( CRM_Core_DAO
::getFieldValue( 'CRM_Contact_DAO_Contact', $this->_contactId
, 'id' ) != $this->_contactId
) {
113 CRM_Core_Error
::statusBounce(
114 ts('A Contact with that ID does not exist: %1', array(1 => $this->_contactId
)),
115 CRM_Utils_System
::url('civicrm/dashboard', 'reset=1')
119 $this->assign('contactId', $this->_contactId
);
121 // see if we can get prev/next positions from qfKey
122 $navContacts = array(
123 'prevContactID' => NULL,
124 'prevContactName' => NULL,
125 'nextContactID' => NULL,
126 'nextContactName' => NULL,
127 'nextPrevError' => 0,
130 $pos = CRM_Core_BAO_PrevNextCache
::getPositions("civicrm search $qfKey",
136 if (isset($pos['prev'])) {
137 $navContacts['prevContactID'] = $pos['prev']['id1'];
138 $navContacts['prevContactName'] = $pos['prev']['data'];
142 if (isset($pos['next'])) {
143 $navContacts['nextContactID'] = $pos['next']['id1'];
144 $navContacts['nextContactName'] = $pos['next']['data'];
149 // seems like we did not find any contacts
150 // maybe due to bug CRM-9096
151 // however we should account for 1 contact results (which dont have prev next)
152 if (!$pos['foundEntry']) {
153 $navContacts['nextPrevError'] = 1;
157 $this->assign($navContacts);
159 $path = CRM_Utils_System
::url('civicrm/contact/view', 'reset=1&cid=' . $this->_contactId
);
160 CRM_Utils_System
::appendBreadCrumb(array(array('title' => ts('View Contact'), 'url' => $path,)));
162 if ($image_URL = CRM_Core_DAO
::getFieldValue('CRM_Contact_DAO_Contact', $this->_contactId
, 'image_URL')) {
163 //CRM-7265 --time being fix.
164 $config = CRM_Core_Config
::singleton();
165 $image_URL = str_replace('https://', 'http://', $image_URL);
166 if (CRM_Core_BAO_Setting
::getItem(CRM_Core_BAO_Setting
::SYSTEM_PREFERENCES_NAME
, 'enableSSL')) {
167 $image_URL = str_replace('http://', 'https://', $image_URL);
170 list($imageWidth, $imageHeight) = getimagesize($image_URL);
171 list($imageThumbWidth, $imageThumbHeight) = CRM_Contact_BAO_Contact
::getThumbSize($imageWidth, $imageHeight);
172 $this->assign("imageWidth", $imageWidth);
173 $this->assign("imageHeight", $imageHeight);
174 $this->assign("imageThumbWidth", $imageThumbWidth);
175 $this->assign("imageThumbHeight", $imageThumbHeight);
176 $this->assign("imageURL", $image_URL);
179 // also store in session for future use
180 $session = CRM_Core_Session
::singleton();
181 $session->set('view.id', $this->_contactId
);
183 $this->_action
= CRM_Utils_Request
::retrieve('action', 'String', $this, FALSE, 'browse');
184 $this->assign('action', $this->_action
);
186 // check logged in user permission
187 self
::checkUserPermission($this);
189 list($displayName, $contactImage,
190 $contactType, $contactSubtype, $contactImageUrl
191 ) = self
::getContactDetails($this->_contactId
);
192 $this->assign('displayName', $displayName);
194 $this->set('contactType', $contactType);
196 // note: there could still be multiple subtypes. We just trimming the outer separator.
197 $this->set('contactSubtype', trim($contactSubtype, CRM_Core_DAO
::VALUE_SEPARATOR
));
199 // add to recently viewed block
200 $isDeleted = (bool) CRM_Core_DAO
::getFieldValue('CRM_Contact_DAO_Contact', $this->_contactId
, 'is_deleted');
202 $recentOther = array(
203 'imageUrl' => $contactImageUrl,
204 'subtype' => $contactSubtype,
205 'isDeleted' => $isDeleted,
208 if (CRM_Contact_BAO_Contact_Permission
::allow($this->_contactId
, CRM_Core_Permission
::EDIT
)) {
209 $recentOther['editUrl'] = CRM_Utils_System
::url('civicrm/contact/add', "reset=1&action=update&cid={$this->_contactId}");
212 if (($session->get('userID') != $this->_contactId
) && CRM_Core_Permission
::check('delete contacts')
215 $recentOther['deleteUrl'] = CRM_Utils_System
::url('civicrm/contact/view/delete', "reset=1&delete=1&cid={$this->_contactId}");
218 CRM_Utils_Recent
::add($displayName,
219 CRM_Utils_System
::url('civicrm/contact/view', "reset=1&cid={$this->_contactId}"),
226 $this->assign('isDeleted', $isDeleted);
229 $title = self
::setTitle($this->_contactId
, $isDeleted);
230 $this->assign('title', $title);
232 // Check if this is default domain contact CRM-10482
233 if (CRM_Contact_BAO_Contact
::checkDomainContact($this->_contactId
)) {
234 $this->assign('domainContact', TRUE);
236 $this->assign('domainContact', FALSE);
239 // Add links for actions menu
240 self
::addUrls($this, $this->_contactId
);
242 if ($contactType == 'Organization' &&
243 CRM_Core_Permission
::check('administer Multiple Organizations') &&
244 CRM_Core_BAO_Setting
::getItem(CRM_Core_BAO_Setting
::MULTISITE_PREFERENCES_NAME
,
248 //check is any relationship between the organization and groups
249 $groupOrg = CRM_Contact_BAO_GroupOrganization
::hasGroupAssociated($this->_contactId
);
251 $groupOrganizationUrl = CRM_Utils_System
::url('civicrm/group',
252 "reset=1&oid={$this->_contactId}"
254 $this->assign('groupOrganizationUrl', $groupOrganizationUrl);
260 * Get meta details of the contact.
262 * @return array contact fields in fixed order
265 static function getContactDetails($contactId) {
266 return list($displayName,
271 ) = CRM_Contact_BAO_Contact
::getDisplayAndImage($contactId,
277 static function checkUserPermission($page, $contactID = NULL) {
278 // check for permissions
279 $page->_permission
= NULL;
282 $contactID = $page->_contactId
;
285 // automatically grant permissin for users on their own record. makes
286 // things easier in dashboard
287 $session = CRM_Core_Session
::singleton();
289 if ($session->get('userID') == $contactID && CRM_Core_Permission
::check('edit my contact')) {
290 $page->assign('permission', 'edit');
291 $page->_permission
= CRM_Core_Permission
::EDIT
;
292 // deleted contacts’ stuff should be (at best) only viewable
294 elseif (CRM_Core_DAO
::getFieldValue('CRM_Contact_DAO_Contact', $contactID, 'is_deleted') and CRM_Core_Permission
::check('access deleted contacts')) {
295 $page->assign('permission', 'view');
296 $page->_permission
= CRM_Core_Permission
::VIEW
;
298 elseif (CRM_Contact_BAO_Contact_Permission
::allow($contactID, CRM_Core_Permission
::EDIT
)) {
299 $page->assign('permission', 'edit');
300 $page->_permission
= CRM_Core_Permission
::EDIT
;
302 elseif (CRM_Contact_BAO_Contact_Permission
::allow($contactID, CRM_Core_Permission
::VIEW
)) {
303 $page->assign('permission', 'view');
304 $page->_permission
= CRM_Core_Permission
::VIEW
;
307 $session->pushUserContext(CRM_Utils_System
::url('civicrm', 'reset=1'));
308 CRM_Core_Error
::statusBounce(ts('You do not have the necessary permission to view this contact.'));
312 static function setTitle($contactId, $isDeleted = FALSE) {
313 static $contactDetails;
314 $displayName = $contactImage = NULL;
315 if (!isset($contactDetails[$contactId])) {
316 list($displayName, $contactImage) = self
::getContactDetails($contactId);
317 $contactDetails[$contactId] = array(
318 'displayName' => $displayName,
319 'contactImage' => $contactImage,
323 $displayName = $contactDetails[$contactId]['displayName'];
324 $contactImage = $contactDetails[$contactId]['contactImage'];
328 $title = "{$contactImage} {$displayName}";
330 $title = "<del>{$title}</del>";
333 // Inline-edit places its own title on the page
334 CRM_Utils_System
::setTitle('CiviCRM', '<span id="crm-remove-title" style="display:none">CiviCRM</span>');
340 * Add urls for display in the actions menu
342 static function addUrls(&$obj, $cid) {
343 // TODO rewrite without so many hard-coded CMS bits; use abstractions like CRM_Core_Permission::check('cms:...') and CRM_Utils_System
345 $config = CRM_Core_Config
::singleton();
346 $session = CRM_Core_Session
::singleton();
347 $uid = CRM_Core_BAO_UFMatch
::getUFId($cid);
348 $userRecordUrl = NULL;
350 if ($config->userSystem
->is_drupal
== '1' &&
351 ($session->get('userID') == $cid || CRM_Core_Permission
::checkAnyPerm(array('cms:administer users', 'cms:view user account')))
353 $userRecordUrl = CRM_Utils_System
::url('user/' . $uid);
355 elseif ($config->userFramework
== 'Joomla') {
356 $userRecordUrl = NULL;
357 // if logged in user is super user, then he can view other users joomla profile
358 if (JFactory
::getUser()->authorise('core.admin')) {
359 $userRecordUrl = $config->userFrameworkBaseURL
. "index.php?option=com_users&view=user&task=user.edit&id=" . $uid;
361 elseif ($session->get('userID') == $cid) {
362 $userRecordUrl = $config->userFrameworkBaseURL
. "index.php?option=com_admin&view=profile&layout=edit&id=" . $uid;
365 // For WordPress, provide link to user profile is contact belongs to logged in user OR user has administrator role
366 elseif ($config->userFramework
== 'WordPress' &&
367 ($session->get('userID') == $cid || CRM_Core_Permission
::checkAnyPerm(array('cms:administer users')))
369 $userRecordUrl = $config->userFrameworkBaseURL
. "wp-admin/user-edit.php?user_id=" . $uid;
371 $obj->assign('userRecordUrl', $userRecordUrl);
372 $obj->assign('userRecordId', $uid);
374 elseif (($config->userSystem
->is_drupal
== '1' && CRM_Core_Permission
::check('administer users')) ||
375 ($config->userFramework
== 'Joomla' &&
376 JFactory
::getUser()->authorise('core.create', 'com_users')
379 $userAddUrl = CRM_Utils_System
::url('civicrm/contact/view/useradd',
380 'reset=1&action=add&cid=' . $cid
382 $obj->assign('userAddUrl', $userAddUrl);
385 if (CRM_Core_Permission
::check('access Contact Dashboard')) {
386 $dashboardURL = CRM_Utils_System
::url('civicrm/user',
389 $obj->assign('dashboardURL', $dashboardURL);
392 // See if other modules want to add links to the activtity bar
393 $hookLinks = CRM_Utils_Hook
::links('view.contact.activity',
396 CRM_Core_DAO
::$_nullObject,
397 CRM_Core_DAO
::$_nullObject
399 if (is_array($hookLinks)) {
400 $obj->assign('hookLinks', $hookLinks);