CRM/Core/Block.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | Copyright CiviCRM LLC. All rights reserved.                        |
   5  |                                                                    |
   6  | This work is published under the GNU AGPLv3 license with some      |
   7  | permitted exceptions and without any warranty. For full license    |
   8  | and copyright information, see https://civicrm.org/licensing       |
   9  +--------------------------------------------------------------------+
  10  */
  11
  12 /**
  13  *
  14  * @package CRM
  15  * @copyright CiviCRM LLC https://civicrm.org/licensing
  16  */
  17
  18 /**
  19  * Defines a simple implementation of a drupal block.
  20  *
  21  * Blocks definitions and html are in a smarty template file.
  22  */
  23 class CRM_Core_Block {
  24
  25   /**
  26    * The following blocks are supported.
  27    *
  28    * @var int
  29    */
  30   const
  31     CREATE_NEW = 1,
  32     RECENTLY_VIEWED = 2,
  33     DASHBOARD = 3,
  34     ADD = 4,
  35     LANGSWITCH = 5,
  36     EVENT = 6,
  37     FULLTEXT_SEARCH = 7;
  38
  39   /**
  40    * Template file names for the above blocks.
  41    * @var array
  42    */
  43   public static $_properties = NULL;
  44
  45   /**
  46    * Class constructor.
  47    */
  48   public function __construct() {
  49   }
  50
  51   /**
  52    * Initialises the $_properties array
  53    */
  54   public static function initProperties() {
  55     if (!defined('BLOCK_CACHE_GLOBAL')) {
  56       define('BLOCK_CACHE_GLOBAL', 0x0008);
  57     }
  58
  59     if (!defined('BLOCK_CACHE_PER_PAGE')) {
  60       define('BLOCK_CACHE_PER_PAGE', 0x0004);
  61     }
  62
  63     if (!defined('BLOCK_NO_CACHE')) {
  64       define('BLOCK_NO_CACHE', -1);
  65     }
  66
  67     if (!(self::$_properties)) {
  68       $config = CRM_Core_Config::singleton();
  69       self::$_properties = array(
  70         // set status item to 0 to disable block by default (at install)
  71         self::CREATE_NEW => array(
  72           'template' => 'CreateNew.tpl',
  73           'info' => ts('CiviCRM Create New Record'),
  74           'subject' => '',
  75           'active' => TRUE,
  76           'cache' => BLOCK_CACHE_GLOBAL,
  77           'visibility' => 1,
  78           'weight' => -100,
  79           'status' => 1,
  80           'pages' => "civicrm\ncivicrm/*",
  81           'region' => $config->userSystem->getDefaultBlockLocation(),
  82         ),
  83         self::RECENTLY_VIEWED => array(
  84           'template' => 'RecentlyViewed.tpl',
  85           'info' => ts('CiviCRM Recent Items'),
  86           'subject' => ts('Recent Items'),
  87           'active' => TRUE,
  88           'cache' => BLOCK_NO_CACHE,
  89           'visibility' => 1,
  90           'weight' => -99,
  91           'status' => 1,
  92           'pages' => "civicrm\ncivicrm/*",
  93           'region' => $config->userSystem->getDefaultBlockLocation(),
  94         ),
  95         self::DASHBOARD => array(
  96           'template' => 'Dashboard.tpl',
  97           'info' => ts('CiviCRM Contact Dashboard'),
  98           'subject' => '',
  99           'active' => TRUE,
 100           'cache' => BLOCK_NO_CACHE,
 101           'visibility' => 1,
 102           'weight' => -98,
 103           'status' => 1,
 104           'pages' => "civicrm\ncivicrm/*",
 105           'region' => $config->userSystem->getDefaultBlockLocation(),
 106         ),
 107         self::ADD => array(
 108           'template' => 'Add.tpl',
 109           'info' => ts('CiviCRM Quick Add'),
 110           'subject' => ts('New Individual'),
 111           'active' => TRUE,
 112           'cache' => BLOCK_NO_CACHE,
 113           'visibility' => 1,
 114           'weight' => -97,
 115           'status' => 1,
 116           'pages' => "civicrm\ncivicrm/*",
 117           'region' => $config->userSystem->getDefaultBlockLocation(),
 118         ),
 119         self::LANGSWITCH => array(
 120           'template' => 'LangSwitch.tpl',
 121           'info' => ts('CiviCRM Language Switcher'),
 122           'subject' => '',
 123           'templateValues' => [],
 124           'active' => TRUE,
 125           'cache' => BLOCK_NO_CACHE,
 126           'visibility' => 1,
 127           'weight' => -96,
 128           'status' => 1,
 129           'pages' => "civicrm\ncivicrm/*",
 130           'region' => $config->userSystem->getDefaultBlockLocation(),
 131         ),
 132         self::EVENT => array(
 133           'template' => 'Event.tpl',
 134           'info' => ts('CiviCRM Upcoming Events'),
 135           'subject' => ts('Upcoming Events'),
 136           'templateValues' => [],
 137           'active' => TRUE,
 138           'cache' => BLOCK_NO_CACHE,
 139           'visibility' => 1,
 140           'weight' => -95,
 141           'status' => 0,
 142           'pages' => "civicrm\ncivicrm/*",
 143           'region' => $config->userSystem->getDefaultBlockLocation(),
 144         ),
 145         self::FULLTEXT_SEARCH => array(
 146           'template' => 'FullTextSearch.tpl',
 147           'info' => ts('CiviCRM Full-text Search'),
 148           'subject' => ts('Full-text Search'),
 149           'active' => TRUE,
 150           'cache' => BLOCK_NO_CACHE,
 151           'visibility' => 1,
 152           'weight' => -94,
 153           'status' => 0,
 154           'pages' => "civicrm\ncivicrm/*",
 155           'region' => $config->userSystem->getDefaultBlockLocation(),
 156         ),
 157       );
 158
 159       ksort(self::$_properties);
 160     }
 161   }
 162
 163   /**
 164    * Returns the desired property from the $_properties array
 165    *
 166    * @param int $id
 167    *   One of the class constants (ADD, SEARCH, etc.).
 168    * @param string $property
 169    *   The desired property.
 170    *
 171    * @return string
 172    *   the value of the desired property
 173    */
 174   public static function getProperty($id, $property) {
 175     if (!(self::$_properties)) {
 176       self::initProperties();
 177     }
 178     return self::$_properties[$id][$property] ?? NULL;
 179   }
 180
 181   /**
 182    * Sets the desired property in the $_properties array
 183    *
 184    * @param int $id
 185    *   One of the class constants (ADD, SEARCH, etc.).
 186    * @param string $property
 187    *   The desired property.
 188    * @param string $value
 189    *   The value of the desired property.
 190    */
 191   public static function setProperty($id, $property, $value) {
 192     if (!(self::$_properties)) {
 193       self::initProperties();
 194     }
 195     self::$_properties[$id][$property] = $value;
 196   }
 197
 198   /**
 199    * Returns the whole $_properties array.
 200    *
 201    * @return array
 202    *   the $_properties array
 203    */
 204   public static function properties() {
 205     if (!(self::$_properties)) {
 206       self::initProperties();
 207     }
 208     return self::$_properties;
 209   }
 210
 211   /**
 212    * Creates the info block for drupal.
 213    *
 214    * @return array
 215    */
 216   public static function getInfo() {
 217
 218     $block = [];
 219     foreach (self::properties() as $id => $value) {
 220       if ($value['active']) {
 221         if (in_array($id, array(
 222           self::ADD,
 223           self::CREATE_NEW,
 224         ))) {
 225           $hasAccess = TRUE;
 226           if (!CRM_Core_Permission::check('add contacts') &&
 227             !CRM_Core_Permission::check('edit groups')
 228           ) {
 229             $hasAccess = FALSE;
 230           }
 231           //validate across edit/view - CRM-5666
 232           if ($hasAccess && ($id == self::ADD)) {
 233             $hasAccess = CRM_Core_Permission::giveMeAllACLs();
 234           }
 235           if (!$hasAccess) {
 236             continue;
 237           }
 238         }
 239
 240         if ($id == self::EVENT &&
 241           (!CRM_Core_Permission::access('CiviEvent', FALSE) ||
 242             !CRM_Core_Permission::check('view event info')
 243           )
 244         ) {
 245           continue;
 246         }
 247
 248         $block[$id] = array(
 249           'info' => $value['info'],
 250           'cache' => $value['cache'],
 251           'region' => $value['region'],
 252           'visibility' => $value['visibility'],
 253           'pages' => $value['pages'],
 254           'status' => $value['status'],
 255           'weight' => $value['weight'],
 256         );
 257       }
 258     }
 259
 260     return $block;
 261   }
 262
 263   /**
 264    * Set the post action values for the block.
 265    *
 266    * php is lame and u cannot call functions from static initializers
 267    * hence this hack
 268    *
 269    * @param int $id
 270    */
 271   private static function setTemplateValues($id) {
 272     switch ($id) {
 273       case self::CREATE_NEW:
 274         self::setTemplateShortcutValues();
 275         break;
 276
 277       case self::DASHBOARD:
 278         self::setTemplateDashboardValues();
 279         break;
 280
 281       case self::ADD:
 282         $defaultLocation = CRM_Core_BAO_LocationType::getDefault();
 283         $defaultPrimaryLocationId = $defaultLocation->id;
 284         $values = array(
 285           'postURL' => CRM_Utils_System::url('civicrm/contact/add', 'reset=1&ct=Individual'),
 286           'primaryLocationType' => $defaultPrimaryLocationId,
 287         );
 288
 289         foreach (CRM_Contact_BAO_Contact::$_greetingTypes as $greeting) {
 290           $values[$greeting . '_id'] = CRM_Contact_BAO_Contact_Utils::defaultGreeting('Individual', $greeting);
 291         }
 292
 293         self::setProperty(self::ADD,
 294           'templateValues',
 295           $values
 296         );
 297         break;
 298
 299       case self::LANGSWITCH:
 300         // gives the currentPath without trailing empty lcMessages to be completed
 301         $values = array('queryString' => CRM_Utils_System::getLinksUrl('lcMessages', TRUE, FALSE, FALSE));
 302         self::setProperty(self::LANGSWITCH, 'templateValues', $values);
 303         break;
 304
 305       case self::FULLTEXT_SEARCH:
 306         $urlArray = array(
 307           'fullTextSearchID' => CRM_Core_DAO::getFieldValue('CRM_Core_DAO_OptionValue',
 308             'CRM_Contact_Form_Search_Custom_FullText', 'value', 'name'
 309           ),
 310         );
 311         self::setProperty(self::FULLTEXT_SEARCH, 'templateValues', $urlArray);
 312         break;
 313
 314       case self::RECENTLY_VIEWED:
 315         $recent = CRM_Utils_Recent::get();
 316         self::setProperty(self::RECENTLY_VIEWED, 'templateValues', array('recentlyViewed' => $recent));
 317         break;
 318
 319       case self::EVENT:
 320         self::setTemplateEventValues();
 321         break;
 322     }
 323   }
 324
 325   /**
 326    * Create the list of options to create New objects for the application and format is as a block.
 327    */
 328   private static function setTemplateShortcutValues() {
 329     $config = CRM_Core_Config::singleton();
 330
 331     static $shortCuts = [];
 332
 333     if (!($shortCuts)) {
 334       if (CRM_Core_Permission::check('add contacts')) {
 335         if (CRM_Core_Permission::giveMeAllACLs()) {
 336           $shortCuts = CRM_Contact_BAO_ContactType::getCreateNewList();
 337         }
 338       }
 339
 340       // new activity (select target contact)
 341       $shortCuts = array_merge($shortCuts, array(
 342         array(
 343           'path' => 'civicrm/activity',
 344           'query' => 'action=add&reset=1&context=standalone',
 345           'ref' => 'new-activity',
 346           'title' => ts('Activity'),
 347         ),
 348       ));
 349
 350       $components = CRM_Core_Component::getEnabledComponents();
 351
 352       if (!empty($config->enableComponents)) {
 353         // check if we can process credit card contribs
 354         $newCredit = CRM_Core_Config::isEnabledBackOfficeCreditCardPayments();
 355
 356         foreach ($components as $componentName => $obj) {
 357           if (in_array($componentName, $config->enableComponents)) {
 358             $obj->creatNewShortcut($shortCuts, $newCredit);
 359           }
 360         }
 361       }
 362
 363       // new email (select recipients)
 364       $shortCuts = array_merge($shortCuts, array(
 365         array(
 366           'path' => 'civicrm/activity/email/add',
 367           'query' => 'atype=3&action=add&reset=1&context=standalone',
 368           'ref' => 'new-email',
 369           'title' => ts('Email'),
 370         ),
 371       ));
 372
 373       if (CRM_Core_Permission::check('edit groups')) {
 374         $shortCuts = array_merge($shortCuts, array(
 375           array(
 376             'path' => 'civicrm/group/add',
 377             'query' => 'reset=1',
 378             'ref' => 'new-group',
 379             'title' => ts('Group'),
 380           ),
 381         ));
 382       }
 383
 384       if (CRM_Core_Permission::check('manage tags')) {
 385         $shortCuts = array_merge($shortCuts, array(
 386           array(
 387             'path' => 'civicrm/tag',
 388             'query' => 'reset=1&action=add',
 389             'ref' => 'new-tag',
 390             'title' => ts('Tag'),
 391           ),
 392         ));
 393       }
 394
 395       if (empty($shortCuts)) {
 396         return NULL;
 397       }
 398     }
 399
 400     $values = [];
 401     foreach ($shortCuts as $key => $short) {
 402       $values[$key] = self::setShortCutValues($short);
 403     }
 404
 405     // Deprecated hook with typo.  Please don't use this!
 406     CRM_Utils_Hook::links('create.new.shorcuts',
 407       NULL,
 408       CRM_Core_DAO::$_nullObject,
 409       $values
 410     );
 411
 412     // Hook that enables extensions to add user-defined links
 413     CRM_Utils_Hook::links('create.new.shortcuts',
 414       NULL,
 415       CRM_Core_DAO::$_nullObject,
 416       $values
 417     );
 418
 419     foreach ($values as $key => $val) {
 420       if (!empty($val['title'])) {
 421         $values[$key]['name'] = CRM_Utils_Array::value('name', $val, $val['title']);
 422       }
 423     }
 424
 425     self::setProperty(self::CREATE_NEW, 'templateValues', array('shortCuts' => $values));
 426   }
 427
 428   /**
 429    * @param $short
 430    *
 431    * @return array
 432    */
 433   private static function setShortcutValues($short) {
 434     $value = [];
 435     if (isset($short['url'])) {
 436       $value['url'] = $short['url'];
 437     }
 438     elseif (isset($short['path'])) {
 439       $value['url'] = CRM_Utils_System::url($short['path'], $short['query'], FALSE);
 440     }
 441     $value['title'] = $short['title'];
 442     $value['ref'] = $short['ref'] ?? '';
 443     $value['shortCuts'] = [];
 444     if (!empty($short['shortCuts'])) {
 445       foreach ($short['shortCuts'] as $shortCut) {
 446         $value['shortCuts'][] = self::setShortcutValues($shortCut);
 447       }
 448     }
 449     return $value;
 450   }
 451
 452   /**
 453    * Create the list of dashboard links.
 454    */
 455   private static function setTemplateDashboardValues() {
 456     static $dashboardLinks = [];
 457     if (CRM_Core_Permission::check('access Contact Dashboard')) {
 458       $dashboardLinks = array(
 459         array(
 460           'path' => 'civicrm/user',
 461           'query' => 'reset=1',
 462           'title' => ts('My Contact Dashboard'),
 463         ),
 464       );
 465     }
 466
 467     if (empty($dashboardLinks)) {
 468       return NULL;
 469     }
 470
 471     $values = [];
 472     foreach ($dashboardLinks as $dash) {
 473       $value = [];
 474       if (isset($dash['url'])) {
 475         $value['url'] = $dash['url'];
 476       }
 477       else {
 478         $value['url'] = CRM_Utils_System::url($dash['path'], $dash['query'], FALSE);
 479       }
 480       $value['title'] = $dash['title'];
 481       $value['key'] = $dash['key'] ?? NULL;
 482       $values[] = $value;
 483     }
 484     self::setProperty(self::DASHBOARD, 'templateValues', array('dashboardLinks' => $values));
 485   }
 486
 487   /**
 488    * Create the list of mail urls for the application and format is as a block.
 489    */
 490   private static function setTemplateMailValues() {
 491     static $shortCuts = NULL;
 492
 493     if (!($shortCuts)) {
 494       $shortCuts = array(
 495         array(
 496           'path' => 'civicrm/mailing/send',
 497           'query' => 'reset=1',
 498           'title' => ts('Send Mailing'),
 499         ),
 500         array(
 501           'path' => 'civicrm/mailing/browse',
 502           'query' => 'reset=1',
 503           'title' => ts('Browse Sent Mailings'),
 504         ),
 505       );
 506     }
 507
 508     $values = [];
 509     foreach ($shortCuts as $short) {
 510       $value = [];
 511       $value['url'] = CRM_Utils_System::url($short['path'], $short['query']);
 512       $value['title'] = $short['title'];
 513       $values[] = $value;
 514     }
 515     self::setProperty(self::MAIL, 'templateValues', array('shortCuts' => $values));
 516   }
 517
 518   /**
 519    * Create the event blocks for upcoming events.
 520    */
 521   private static function setTemplateEventValues() {
 522     $config = CRM_Core_Config::singleton();
 523
 524     $info = CRM_Event_BAO_Event::getCompleteInfo(date("Ymd"));
 525
 526     if ($info) {
 527       $session = CRM_Core_Session::singleton();
 528       // check if registration link should be displayed
 529       foreach ($info as $id => $event) {
 530         //@todo FIXME  - validRegistraionRequest takes eventID not contactID as a param
 531         // this is called via an obscure patch from Joomla event block rendering (only)
 532         $info[$id]['onlineRegistration'] = CRM_Event_BAO_Event::validRegistrationRequest($event,
 533           $session->get('userID')
 534         );
 535       }
 536
 537       self::setProperty(self::EVENT, 'templateValues', array('eventBlock' => $info));
 538     }
 539   }
 540
 541   /**
 542    * Given an id creates a subject/content array
 543    *
 544    * @param int $id
 545    *   Id of the block.
 546    *
 547    * @return array
 548    */
 549   public static function getContent($id) {
 550     // return if upgrade mode
 551     $config = CRM_Core_Config::singleton();
 552     if ($config->isUpgradeMode()) {
 553       return NULL;
 554     }
 555
 556     if (!self::getProperty($id, 'active')) {
 557       return NULL;
 558     }
 559
 560     if ($id == self::EVENT &&
 561       CRM_Core_Permission::check('view event info')
 562     ) {
 563       // is CiviEvent enabled?
 564       if (!CRM_Core_Permission::access('CiviEvent', FALSE)) {
 565         return NULL;
 566       }
 567       // do nothing
 568     }
 569     // require 'access CiviCRM' permissons, except for the language switch block
 570     elseif (!CRM_Core_Permission::check('access CiviCRM') && $id != self::LANGSWITCH) {
 571       return NULL;
 572     }
 573     elseif ($id == self::ADD) {
 574       $hasAccess = TRUE;
 575       if (!CRM_Core_Permission::check('add contacts') &&
 576         !CRM_Core_Permission::check('edit groups')
 577       ) {
 578         $hasAccess = FALSE;
 579       }
 580       //validate across edit/view - CRM-5666
 581       if ($hasAccess) {
 582         $hasAccess = CRM_Core_Permission::giveMeAllACLs();
 583       }
 584       if (!$hasAccess) {
 585         return NULL;
 586       }
 587     }
 588
 589     self::setTemplateValues($id);
 590
 591     // Suppress Recent Items block if it's empty - CRM-5188
 592     if ($id == self::RECENTLY_VIEWED) {
 593       $recent = self::getProperty($id, 'templateValues');
 594       if (CRM_Utils_Array::crmIsEmptyArray($recent)) {
 595         return NULL;
 596       }
 597     }
 598
 599     // Suppress Language switcher if language is inherited from CMS - CRM-9971
 600     $config = CRM_Core_Config::singleton();
 601     if ($id == self::LANGSWITCH && $config->inheritLocale) {
 602       return NULL;
 603     }
 604
 605     $block = [];
 606     $block['name'] = 'block-civicrm';
 607     $block['id'] = $block['name'] . '_' . $id;
 608     $block['subject'] = self::fetch($id, 'Subject.tpl',
 609       array('subject' => self::getProperty($id, 'subject'))
 610     );
 611     $block['content'] = self::fetch($id, self::getProperty($id, 'template'),
 612       self::getProperty($id, 'templateValues')
 613     );
 614
 615     return $block;
 616   }
 617
 618   /**
 619    * Given an id and a template, fetch the contents
 620    *
 621    * @param int $id
 622    *   Id of the block.
 623    * @param string $fileName
 624    *   Name of the template file.
 625    * @param array $properties
 626    *   Template variables.
 627    *
 628    * @return array
 629    */
 630   public static function fetch($id, $fileName, $properties) {
 631     $template = CRM_Core_Smarty::singleton();
 632
 633     if ($properties) {
 634       $template->assign($properties);
 635     }
 636
 637     return $template->fetch('CRM/Block/' . $fileName);
 638   }
 639
 640 }