Civi/Angular/Page/Modules.php

   1 <?php
   2
   3 namespace Civi\Angular\Page;
   4
   5 /**
   6  * This page aggregates data from Angular modules.
   7  *
   8  * Example: Aggregate metadata about all modules in JSON format.
   9  *   civicrm/ajax/angular-modules?format=json
  10  *
  11  * Example: Aggregate metadata for crmUi and crmUtil modules.
  12  *    civicrm/ajax/angular-modules?format=json&modules=crmUi,crmUtil
  13  *
  14  * Example: Aggregate *.js files for all modules.
  15  *   civicrm/ajax/angular-modules?format=js
  16  *
  17  * Example: Aggregate *.css files for all modules.
  18  *   civicrm/ajax/angular-modules?format=css
  19  */
  20 class Modules extends \CRM_Core_Page {
  21
  22   /**
  23    * Generate asset content (when accessed via older, custom
  24    * "civicrm/ajax/anulgar-modules" route).
  25    *
  26    * @deprecated
  27    *
  28    * @throws \CRM_Core_Exception
  29    */
  30   public function run() {
  31     /**
  32      * @var \Civi\Angular\Manager $angular
  33      */
  34     $angular = \Civi::service('angular');
  35     $moduleNames = $this->parseModuleNames(\CRM_Utils_Request::retrieve('modules', 'String'), $angular);
  36
  37     switch (\CRM_Utils_Request::retrieve('format', 'String')) {
  38       case 'json':
  39       case '':
  40         $this->send(
  41           'application/javascript',
  42           json_encode($this->getMetadata($moduleNames, $angular))
  43         );
  44         break;
  45
  46       case 'js':
  47         $this->send(
  48           'application/javascript',
  49           $this->digestJs($angular->getResources($moduleNames, 'js', 'path'))
  50         );
  51         break;
  52
  53       case 'css':
  54         $this->send(
  55           'text/css',
  56           \CRM_Utils_File::concat($angular->getResources($moduleNames, 'css', 'path'), "\n")
  57         );
  58         break;
  59
  60       default:
  61         throw new \CRM_Core_Exception("Unrecognized format");
  62     }
  63
  64     \CRM_Utils_System::civiExit();
  65   }
  66
  67   /**
  68    * Generate asset content (when accessed via AssetBuilder).
  69    *
  70    * @param \Civi\Core\Event\GenericHookEvent $event
  71    * @see CRM_Utils_hook::buildAsset()
  72    * @see \Civi\Core\AssetBuilder
  73    */
  74   public static function buildAngularModules($event) {
  75     $page = new Modules();
  76     $angular = \Civi::service('angular');
  77
  78     switch ($event->asset) {
  79       case 'angular-modules.json':
  80         $moduleNames = $page->parseModuleNames($event->params['modules'] ?? NULL, $angular);
  81         $event->mimeType = 'application/json';
  82         $event->content = json_encode($page->getMetadata($moduleNames, $angular));
  83         break;
  84
  85       case 'angular-modules.js':
  86         $moduleNames = $page->parseModuleNames($event->params['modules'] ?? NULL, $angular);
  87         $event->mimeType = 'application/javascript';
  88         $event->content = $page->digestJs($angular->getResources($moduleNames, 'js', 'path'));
  89         break;
  90
  91       case 'angular-modules.css':
  92         $moduleNames = $page->parseModuleNames($event->params['modules'] ?? NULL, $angular);
  93         $event->mimeType = 'text/css';
  94         $event->content = \CRM_Utils_File::concat($angular->getResources($moduleNames, 'css', 'path'), "\n");
  95
  96       default:
  97         // Not our problem.
  98     }
  99   }
 100
 101   /**
 102    * @param array $files
 103    *   File paths.
 104    * @return string
 105    */
 106   public function digestJs($files) {
 107     $scripts = [];
 108     foreach ($files as $file) {
 109       $scripts[] = file_get_contents($file);
 110     }
 111     $scripts = \CRM_Utils_JS::dedupeClosures(
 112       $scripts,
 113       ['angular', '$', '_'],
 114       ['angular', 'CRM.$', 'CRM._']
 115     );
 116     // This impl of stripComments currently adds 10-20ms and cuts ~7%
 117     return \CRM_Utils_JS::stripComments(implode("\n", $scripts));
 118   }
 119
 120   /**
 121    * @param string $modulesExpr
 122    *   Comma-separated list of module names.
 123    * @param \Civi\Angular\Manager $angular
 124    * @return array
 125    *   Any well-formed module names. All if moduleExpr is blank.
 126    */
 127   public function parseModuleNames($modulesExpr, $angular) {
 128     if ($modulesExpr) {
 129       $moduleNames = preg_grep(
 130         '/^[a-zA-Z0-9\-_\.]+$/',
 131         explode(',', $modulesExpr)
 132       );
 133       return $moduleNames;
 134     }
 135     else {
 136       $moduleNames = array_keys($angular->getModules());
 137       return $moduleNames;
 138     }
 139   }
 140
 141   /**
 142    * @param array $moduleNames
 143    *   List of module names.
 144    * @param \Civi\Angular\Manager $angular
 145    * @return array
 146    */
 147   public function getMetadata($moduleNames, $angular) {
 148     $modules = $angular->getModules();
 149     $result = [];
 150     foreach ($moduleNames as $moduleName) {
 151       if (isset($modules[$moduleName])) {
 152         $result[$moduleName] = [];
 153         $result[$moduleName]['domain'] = $modules[$moduleName]['ext'];
 154         $result[$moduleName]['js'] = $angular->getResources($moduleName, 'js', 'rawUrl');
 155         $result[$moduleName]['css'] = $angular->getResources($moduleName, 'css', 'rawUrl');
 156         $result[$moduleName]['partials'] = $angular->getPartials($moduleName);
 157         $result[$moduleName]['strings'] = $angular->getTranslatedStrings($moduleName);
 158       }
 159     }
 160     return $result;
 161   }
 162
 163   /**
 164    * Send a response.
 165    *
 166    * @param string $type
 167    *   Content type.
 168    * @param string $data
 169    *   Content.
 170    */
 171   public function send($type, $data) {
 172     // Encourage browsers to cache for a long time - 1 year
 173     $ttl = 60 * 60 * 24 * 364;
 174     \CRM_Utils_System::setHttpHeader('Expires', gmdate('D, d M Y H:i:s \G\M\T', time() + $ttl));
 175     \CRM_Utils_System::setHttpHeader("Content-Type", $type);
 176     \CRM_Utils_System::setHttpHeader("Cache-Control", "max-age=$ttl, public");
 177     echo $data;
 178   }
 179
 180 }