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 array $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     $values = [];
 468     foreach ($dashboardLinks as $dash) {
 469       $value = [];
 470       if (isset($dash['url'])) {
 471         $value['url'] = $dash['url'];
 472       }
 473       else {
 474         $value['url'] = CRM_Utils_System::url($dash['path'], $dash['query'], FALSE);
 475       }
 476       $value['title'] = $dash['title'];
 477       $value['key'] = $dash['key'] ?? NULL;
 478       $values[] = $value;
 479     }
 480     self::setProperty(self::DASHBOARD, 'templateValues', array('dashboardLinks' => $values));
 481   }
 482
 483   /**
 484    * Create the list of mail urls for the application and format is as a block.
 485    */
 486   private static function setTemplateMailValues() {
 487     static $shortCuts = NULL;
 488
 489     if (!($shortCuts)) {
 490       $shortCuts = array(
 491         array(
 492           'path' => 'civicrm/mailing/send',
 493           'query' => 'reset=1',
 494           'title' => ts('Send Mailing'),
 495         ),
 496         array(
 497           'path' => 'civicrm/mailing/browse',
 498           'query' => 'reset=1',
 499           'title' => ts('Browse Sent Mailings'),
 500         ),
 501       );
 502     }
 503
 504     $values = [];
 505     foreach ($shortCuts as $short) {
 506       $value = [];
 507       $value['url'] = CRM_Utils_System::url($short['path'], $short['query']);
 508       $value['title'] = $short['title'];
 509       $values[] = $value;
 510     }
 511     self::setProperty(self::MAIL, 'templateValues', array('shortCuts' => $values));
 512   }
 513
 514   /**
 515    * Create the event blocks for upcoming events.
 516    */
 517   private static function setTemplateEventValues() {
 518     $config = CRM_Core_Config::singleton();
 519
 520     $info = CRM_Event_BAO_Event::getCompleteInfo(date("Ymd"));
 521
 522     if ($info) {
 523       $session = CRM_Core_Session::singleton();
 524       // check if registration link should be displayed
 525       foreach ($info as $id => $event) {
 526         //@todo FIXME  - validRegistraionRequest takes eventID not contactID as a param
 527         // this is called via an obscure patch from Joomla event block rendering (only)
 528         $info[$id]['onlineRegistration'] = CRM_Event_BAO_Event::validRegistrationRequest($event,
 529           $session->get('userID')
 530         );
 531       }
 532
 533       self::setProperty(self::EVENT, 'templateValues', array('eventBlock' => $info));
 534     }
 535   }
 536
 537   /**
 538    * Given an id creates a subject/content array
 539    *
 540    * @param int $id
 541    *   Id of the block.
 542    *
 543    * @return array
 544    */
 545   public static function getContent($id) {
 546     // return if upgrade mode
 547     $config = CRM_Core_Config::singleton();
 548     if ($config->isUpgradeMode()) {
 549       return NULL;
 550     }
 551     CRM_Core_Smarty::singleton()->ensureVariablesAreAssigned(['langSwitch', 'breadcrumb', 'pageTitle']);
 552
 553     if (!self::getProperty($id, 'active')) {
 554       return NULL;
 555     }
 556
 557     if ($id == self::EVENT &&
 558       CRM_Core_Permission::check('view event info')
 559     ) {
 560       // is CiviEvent enabled?
 561       if (!CRM_Core_Permission::access('CiviEvent', FALSE)) {
 562         return NULL;
 563       }
 564       // do nothing
 565     }
 566     // require 'access CiviCRM' permissons, except for the language switch block
 567     elseif (!CRM_Core_Permission::check('access CiviCRM') && $id != self::LANGSWITCH) {
 568       return NULL;
 569     }
 570     elseif ($id == self::ADD) {
 571       $hasAccess = TRUE;
 572       if (!CRM_Core_Permission::check('add contacts') &&
 573         !CRM_Core_Permission::check('edit groups')
 574       ) {
 575         $hasAccess = FALSE;
 576       }
 577       //validate across edit/view - CRM-5666
 578       if ($hasAccess) {
 579         $hasAccess = CRM_Core_Permission::giveMeAllACLs();
 580       }
 581       if (!$hasAccess) {
 582         return NULL;
 583       }
 584     }
 585
 586     self::setTemplateValues($id);
 587
 588     // Suppress Recent Items block if it's empty - CRM-5188
 589     if ($id == self::RECENTLY_VIEWED) {
 590       $recent = self::getProperty($id, 'templateValues');
 591       if (CRM_Utils_Array::crmIsEmptyArray($recent)) {
 592         return NULL;
 593       }
 594     }
 595
 596     // Suppress Language switcher if language is inherited from CMS - CRM-9971
 597     $config = CRM_Core_Config::singleton();
 598     if ($id == self::LANGSWITCH && $config->inheritLocale) {
 599       return NULL;
 600     }
 601
 602     $block = [];
 603     $block['name'] = 'block-civicrm';
 604     $block['id'] = $block['name'] . '_' . $id;
 605     $block['subject'] = self::fetch($id, 'Subject.tpl',
 606       array('subject' => self::getProperty($id, 'subject'))
 607     );
 608     $block['content'] = self::fetch($id, self::getProperty($id, 'template'),
 609       self::getProperty($id, 'templateValues')
 610     );
 611
 612     return $block;
 613   }
 614
 615   /**
 616    * Given an id and a template, fetch the contents
 617    *
 618    * @param int $id
 619    *   Id of the block.
 620    * @param string $fileName
 621    *   Name of the template file.
 622    * @param array $properties
 623    *   Template variables.
 624    *
 625    * @return array
 626    */
 627   public static function fetch($id, $fileName, $properties) {
 628     $template = CRM_Core_Smarty::singleton();
 629
 630     if ($properties) {
 631       $template->assign($properties);
 632     }
 633
 634     return $template->fetch('CRM/Block/' . $fileName);
 635   }
 636
 637 }