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