Commit | Line | Data |
---|---|---|
6a488035 TO |
1 | <?php |
2 | /* | |
3 | +--------------------------------------------------------------------+ | |
fee14197 | 4 | | CiviCRM version 5 | |
6a488035 | 5 | +--------------------------------------------------------------------+ |
6b83d5bd | 6 | | Copyright CiviCRM LLC (c) 2004-2019 | |
6a488035 TO |
7 | +--------------------------------------------------------------------+ |
8 | | This file is a part of CiviCRM. | | |
9 | | | | |
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. | | |
13 | | | | |
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. | | |
18 | | | | |
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 | +--------------------------------------------------------------------+ | |
d25dd0ee | 26 | */ |
6a488035 TO |
27 | |
28 | /** | |
29 | * This class proivdes various helper functions for locating extensions | |
30 | * data. It's designed for compatibility with pre-existing functions from | |
31 | * CRM_Core_Extensions. | |
32 | * | |
33 | * Most of these helper functions originate with the first major iteration | |
34 | * of extensions -- a time when every extension had one eponymous PHP class, | |
35 | * when there was no PHP class-loader, and when there was special-case logic | |
36 | * sprinkled around to handle loading of "extension classes". | |
37 | * | |
38 | * With module-extensions (Civi 4.2+), there are no eponymous classes -- | |
39 | * instead, module-extensions follow the same class-naming and class-loading | |
40 | * practices as core (and don't require special-case logic for class | |
41 | * loading). Consequently, the helpers in here aren't much used with | |
42 | * module-extensions. | |
43 | * | |
44 | * @package CRM | |
6b83d5bd | 45 | * @copyright CiviCRM LLC (c) 2004-2019 |
6a488035 TO |
46 | */ |
47 | class CRM_Extension_Mapper { | |
48 | ||
49 | /** | |
fe482240 | 50 | * An URL for public extensions repository. |
6a488035 | 51 | */ |
6a488035 TO |
52 | |
53 | /** | |
fe482240 | 54 | * Extension info file name. |
6a488035 TO |
55 | */ |
56 | const EXT_TEMPLATES_DIRNAME = 'templates'; | |
57 | ||
58 | /** | |
59 | * @var CRM_Extension_Container_Interface | |
60 | */ | |
61 | protected $container; | |
62 | ||
63 | /** | |
64 | * @var array (key => CRM_Extension_Info) | |
65 | */ | |
be2fb01f | 66 | protected $infos = []; |
6a488035 TO |
67 | |
68 | /** | |
69 | * @var array | |
70 | */ | |
71 | protected $moduleExtensions = NULL; | |
72 | ||
73 | /** | |
74 | * @var CRM_Utils_Cache_Interface | |
75 | */ | |
76 | protected $cache; | |
77 | ||
78 | protected $cacheKey; | |
79 | ||
80 | protected $civicrmPath; | |
81 | ||
82 | protected $civicrmUrl; | |
83 | ||
e0ef6999 EM |
84 | /** |
85 | * @param CRM_Extension_Container_Interface $container | |
86 | * @param CRM_Utils_Cache_Interface $cache | |
87 | * @param null $cacheKey | |
88 | * @param null $civicrmPath | |
89 | * @param null $civicrmUrl | |
90 | */ | |
6a488035 TO |
91 | public function __construct(CRM_Extension_Container_Interface $container, CRM_Utils_Cache_Interface $cache = NULL, $cacheKey = NULL, $civicrmPath = NULL, $civicrmUrl = NULL) { |
92 | $this->container = $container; | |
93 | $this->cache = $cache; | |
94 | $this->cacheKey = $cacheKey; | |
95 | if ($civicrmUrl) { | |
96 | $this->civicrmUrl = rtrim($civicrmUrl, '/'); | |
0db6c3e1 TO |
97 | } |
98 | else { | |
6a488035 TO |
99 | $config = CRM_Core_Config::singleton(); |
100 | $this->civicrmUrl = rtrim($config->resourceBase, '/'); | |
101 | } | |
102 | if ($civicrmPath) { | |
b3a4b879 | 103 | $this->civicrmPath = rtrim($civicrmPath, '/'); |
0db6c3e1 TO |
104 | } |
105 | else { | |
6a488035 | 106 | global $civicrm_root; |
b3a4b879 | 107 | $this->civicrmPath = rtrim($civicrm_root, '/'); |
6a488035 TO |
108 | } |
109 | } | |
110 | ||
111 | /** | |
112 | * Given the class, provides extension's key. | |
113 | * | |
6a488035 | 114 | * |
f41911fd TO |
115 | * @param string $clazz |
116 | * Extension class name. | |
6a488035 | 117 | * |
a6c01b45 CW |
118 | * @return string |
119 | * name of extension key | |
6a488035 TO |
120 | */ |
121 | public function classToKey($clazz) { | |
122 | return str_replace('_', '.', $clazz); | |
123 | } | |
124 | ||
125 | /** | |
126 | * Given the class, provides extension path. | |
127 | * | |
6a488035 | 128 | * |
6c8f6e67 EM |
129 | * @param $clazz |
130 | * | |
a6c01b45 CW |
131 | * @return string |
132 | * full path the extension .php file | |
6a488035 TO |
133 | */ |
134 | public function classToPath($clazz) { | |
135 | $elements = explode('_', $clazz); | |
136 | $key = implode('.', $elements); | |
137 | return $this->keyToPath($key); | |
138 | } | |
139 | ||
140 | /** | |
141 | * Given the string, returns true or false if it's an extension key. | |
142 | * | |
6a488035 | 143 | * |
f41911fd TO |
144 | * @param string $key |
145 | * A string which might be an extension key. | |
6a488035 | 146 | * |
e7483cbe | 147 | * @return bool |
a6c01b45 | 148 | * true if given string is an extension name |
6a488035 TO |
149 | */ |
150 | public function isExtensionKey($key) { | |
151 | // check if the string is an extension name or the class | |
152 | return (strpos($key, '.') !== FALSE) ? TRUE : FALSE; | |
153 | } | |
154 | ||
155 | /** | |
156 | * Given the string, returns true or false if it's an extension class name. | |
157 | * | |
6a488035 | 158 | * |
f41911fd TO |
159 | * @param string $clazz |
160 | * A string which might be an extension class name. | |
6a488035 | 161 | * |
e7483cbe | 162 | * @return bool |
a6c01b45 | 163 | * true if given string is an extension class name |
6a488035 TO |
164 | */ |
165 | public function isExtensionClass($clazz) { | |
166 | ||
167 | if (substr($clazz, 0, 4) != 'CRM_') { | |
168 | return (bool) preg_match('/^[a-z0-9]+(_[a-z0-9]+)+$/', $clazz); | |
169 | } | |
170 | return FALSE; | |
171 | } | |
172 | ||
173 | /** | |
f41911fd TO |
174 | * @param string $key |
175 | * Extension fully-qualified-name. | |
77b97be7 EM |
176 | * @param bool $fresh |
177 | * | |
178 | * @throws CRM_Extension_Exception | |
179 | * @throws Exception | |
c490a46a | 180 | * @return CRM_Extension_Info |
6a488035 TO |
181 | */ |
182 | public function keyToInfo($key, $fresh = FALSE) { | |
183 | if ($fresh || !array_key_exists($key, $this->infos)) { | |
184 | try { | |
185 | $this->infos[$key] = CRM_Extension_Info::loadFromFile($this->container->getPath($key) . DIRECTORY_SEPARATOR . CRM_Extension_Info::FILENAME); | |
0db6c3e1 TO |
186 | } |
187 | catch (CRM_Extension_Exception $e) { | |
6a488035 TO |
188 | // file has more detailed info, but we'll fallback to DB if it's missing -- DB has enough info to uninstall |
189 | $this->infos[$key] = CRM_Extension_System::singleton()->getManager()->createInfoFromDB($key); | |
190 | if (!$this->infos[$key]) { | |
191 | throw $e; | |
192 | } | |
193 | } | |
194 | } | |
195 | return $this->infos[$key]; | |
196 | } | |
197 | ||
198 | /** | |
199 | * Given the key, provides extension's class name. | |
200 | * | |
6a488035 | 201 | * |
f41911fd TO |
202 | * @param string $key |
203 | * Extension key. | |
6a488035 | 204 | * |
a6c01b45 CW |
205 | * @return string |
206 | * name of extension's main class | |
6a488035 TO |
207 | */ |
208 | public function keyToClass($key) { | |
209 | return str_replace('.', '_', $key); | |
210 | } | |
211 | ||
212 | /** | |
213 | * Given the key, provides the path to file containing | |
214 | * extension's main class. | |
215 | * | |
6a488035 | 216 | * |
f41911fd TO |
217 | * @param string $key |
218 | * Extension key. | |
6a488035 | 219 | * |
a6c01b45 CW |
220 | * @return string |
221 | * path to file containing extension's main class | |
6a488035 TO |
222 | */ |
223 | public function keyToPath($key) { | |
224 | $info = $this->keyToInfo($key); | |
225 | return $this->container->getPath($key) . DIRECTORY_SEPARATOR . $info->file . '.php'; | |
226 | } | |
227 | ||
228 | /** | |
229 | * Given the key, provides the path to file containing | |
230 | * extension's main class. | |
231 | * | |
f41911fd TO |
232 | * @param string $key |
233 | * Extension key. | |
a6c01b45 CW |
234 | * @return string |
235 | * local path of the extension source tree | |
6a488035 TO |
236 | */ |
237 | public function keyToBasePath($key) { | |
238 | if ($key == 'civicrm') { | |
239 | return $this->civicrmPath; | |
240 | } | |
241 | return $this->container->getPath($key); | |
242 | } | |
243 | ||
244 | /** | |
245 | * Given the key, provides the path to file containing | |
246 | * extension's main class. | |
247 | * | |
6a488035 | 248 | * |
f41911fd TO |
249 | * @param string $key |
250 | * Extension key. | |
6a488035 | 251 | * |
a6c01b45 CW |
252 | * @return string |
253 | * url for resources in this extension | |
6a488035 TO |
254 | */ |
255 | public function keyToUrl($key) { | |
256 | if ($key == 'civicrm') { | |
dee7a2b1 PJ |
257 | // CRM-12130 Workaround: If the domain's config_backend is NULL at the start of the request, |
258 | // then the Mapper is wrongly constructed with an empty value for $this->civicrmUrl. | |
3d4a4ccf PJ |
259 | if (empty($this->civicrmUrl)) { |
260 | $config = CRM_Core_Config::singleton(); | |
261 | return rtrim($config->resourceBase, '/'); | |
262 | } | |
6a488035 TO |
263 | return $this->civicrmUrl; |
264 | } | |
265 | ||
266 | return $this->container->getResUrl($key); | |
267 | } | |
268 | ||
269 | /** | |
270 | * Fetch the list of active extensions of type 'module' | |
271 | * | |
5a4f6742 CW |
272 | * @param bool $fresh |
273 | * whether to forcibly reload extensions list from canonical store. | |
a6c01b45 CW |
274 | * @return array |
275 | * array(array('prefix' => $, 'file' => $)) | |
6a488035 TO |
276 | */ |
277 | public function getActiveModuleFiles($fresh = FALSE) { | |
62f662b0 | 278 | if (!defined('CIVICRM_DSN')) { |
279 | // hmm, ok | |
280 | return []; | |
6a488035 TO |
281 | } |
282 | ||
283 | $moduleExtensions = NULL; | |
284 | if ($this->cache && !$fresh) { | |
ec2dd0bd | 285 | $moduleExtensions = $this->cache->get($this->cacheKey . '_moduleFiles'); |
6a488035 TO |
286 | } |
287 | ||
288 | if (!is_array($moduleExtensions)) { | |
289 | // Check canonical module list | |
be2fb01f | 290 | $moduleExtensions = []; |
6a488035 TO |
291 | $sql = ' |
292 | SELECT full_name, file | |
293 | FROM civicrm_extension | |
294 | WHERE is_active = 1 | |
295 | AND type = "module" | |
296 | '; | |
297 | $dao = CRM_Core_DAO::executeQuery($sql); | |
298 | while ($dao->fetch()) { | |
299 | try { | |
be2fb01f | 300 | $moduleExtensions[] = [ |
6a488035 TO |
301 | 'prefix' => $dao->file, |
302 | 'filePath' => $this->keyToPath($dao->full_name), | |
be2fb01f | 303 | ]; |
0db6c3e1 TO |
304 | } |
305 | catch (CRM_Extension_Exception $e) { | |
6a488035 TO |
306 | // Putting a stub here provides more consistency |
307 | // in how getActiveModuleFiles when racing between | |
308 | // dirty file-removals and cache-clears. | |
309 | CRM_Core_Session::setStatus($e->getMessage(), '', 'error'); | |
be2fb01f | 310 | $moduleExtensions[] = [ |
6a488035 TO |
311 | 'prefix' => $dao->file, |
312 | 'filePath' => NULL, | |
be2fb01f | 313 | ]; |
6a488035 TO |
314 | } |
315 | } | |
316 | ||
317 | if ($this->cache) { | |
ec2dd0bd | 318 | $this->cache->set($this->cacheKey . '_moduleFiles', $moduleExtensions); |
6a488035 TO |
319 | } |
320 | } | |
321 | return $moduleExtensions; | |
322 | } | |
323 | ||
e7ff7042 | 324 | /** |
fe482240 | 325 | * Get a list of base URLs for all active modules. |
e7ff7042 | 326 | * |
a6c01b45 CW |
327 | * @return array |
328 | * (string $extKey => string $baseUrl) | |
e7ff7042 TO |
329 | */ |
330 | public function getActiveModuleUrls() { | |
331 | // TODO optimization/caching | |
be2fb01f | 332 | $urls = []; |
e7ff7042 TO |
333 | $urls['civicrm'] = $this->keyToUrl('civicrm'); |
334 | foreach ($this->getModules() as $module) { | |
335 | /** @var $module CRM_Core_Module */ | |
336 | if ($module->is_active) { | |
337 | $urls[$module->name] = $this->keyToUrl($module->name); | |
338 | } | |
339 | } | |
340 | return $urls; | |
341 | } | |
342 | ||
3b3f6d23 TO |
343 | /** |
344 | * Get a list of extension keys, filtered by the corresponding file path. | |
345 | * | |
346 | * @param string $pattern | |
347 | * A file path. To search subdirectories, append "*". | |
348 | * Ex: "/var/www/extensions/*" | |
349 | * Ex: "/var/www/extensions/org.foo.bar" | |
350 | * @return array | |
351 | * Array(string $key). | |
352 | * Ex: array("org.foo.bar"). | |
353 | */ | |
354 | public function getKeysByPath($pattern) { | |
be2fb01f | 355 | $keys = []; |
3b3f6d23 TO |
356 | |
357 | if (CRM_Utils_String::endsWith($pattern, '*')) { | |
358 | $prefix = rtrim($pattern, '*'); | |
359 | foreach ($this->container->getKeys() as $key) { | |
360 | $path = CRM_Utils_File::addTrailingSlash($this->container->getPath($key)); | |
361 | if (realpath($prefix) == realpath($path) || CRM_Utils_File::isChildPath($prefix, $path)) { | |
362 | $keys[] = $key; | |
363 | } | |
364 | } | |
365 | } | |
366 | else { | |
367 | foreach ($this->container->getKeys() as $key) { | |
368 | $path = CRM_Utils_File::addTrailingSlash($this->container->getPath($key)); | |
369 | if (realpath($pattern) == realpath($path)) { | |
370 | $keys[] = $key; | |
371 | } | |
372 | } | |
373 | } | |
374 | ||
375 | return $keys; | |
376 | } | |
377 | ||
f8a7cfff TO |
378 | /** |
379 | * @return array | |
380 | * Ex: $result['org.civicrm.foobar'] = new CRM_Extension_Info(...). | |
381 | * @throws \CRM_Extension_Exception | |
382 | * @throws \Exception | |
383 | */ | |
384 | public function getAllInfos() { | |
385 | foreach ($this->container->getKeys() as $key) { | |
386 | $this->keyToInfo($key); | |
387 | } | |
388 | return $this->infos; | |
389 | } | |
390 | ||
e0ef6999 | 391 | /** |
100fef9d | 392 | * @param string $name |
e0ef6999 EM |
393 | * |
394 | * @return bool | |
395 | */ | |
6a488035 TO |
396 | public function isActiveModule($name) { |
397 | $activeModules = $this->getActiveModuleFiles(); | |
398 | foreach ($activeModules as $activeModule) { | |
399 | if ($activeModule['prefix'] == $name) { | |
400 | return TRUE; | |
401 | } | |
402 | } | |
403 | return FALSE; | |
404 | } | |
405 | ||
406 | /** | |
407 | * Get a list of all installed modules, including enabled and disabled ones | |
408 | * | |
a6c01b45 CW |
409 | * @return array |
410 | * CRM_Core_Module | |
6a488035 TO |
411 | */ |
412 | public function getModules() { | |
be2fb01f | 413 | $result = []; |
6a488035 TO |
414 | $dao = new CRM_Core_DAO_Extension(); |
415 | $dao->type = 'module'; | |
416 | $dao->find(); | |
417 | while ($dao->fetch()) { | |
418 | $result[] = new CRM_Core_Module($dao->full_name, $dao->is_active); | |
419 | } | |
420 | return $result; | |
421 | } | |
422 | ||
423 | /** | |
424 | * Given the class, provides the template path. | |
425 | * | |
6a488035 | 426 | * |
f41911fd TO |
427 | * @param string $clazz |
428 | * Extension class name. | |
6a488035 | 429 | * |
a6c01b45 CW |
430 | * @return string |
431 | * path to extension's templates directory | |
6a488035 TO |
432 | */ |
433 | public function getTemplatePath($clazz) { | |
434 | $path = $this->container->getPath($this->classToKey($clazz)); | |
435 | return $path . DIRECTORY_SEPARATOR . self::EXT_TEMPLATES_DIRNAME; | |
436 | /* | |
437 | $path = $this->classToPath($clazz); | |
438 | $pathElm = explode(DIRECTORY_SEPARATOR, $path); | |
439 | array_pop($pathElm); | |
440 | return implode(DIRECTORY_SEPARATOR, $pathElm) . DIRECTORY_SEPARATOR . self::EXT_TEMPLATES_DIRNAME; | |
e70a7fc0 | 441 | */ |
6a488035 TO |
442 | } |
443 | ||
444 | /** | |
445 | * Given te class, provides the template name. | |
446 | * @todo consider multiple templates, support for one template for now | |
447 | * | |
6a488035 | 448 | * |
f41911fd TO |
449 | * @param string $clazz |
450 | * Extension class name. | |
6a488035 | 451 | * |
a6c01b45 CW |
452 | * @return string |
453 | * extension's template name | |
6a488035 TO |
454 | */ |
455 | public function getTemplateName($clazz) { | |
456 | $info = $this->keyToInfo($this->classToKey($clazz)); | |
457 | return (string) $info->file . '.tpl'; | |
458 | } | |
459 | ||
460 | public function refresh() { | |
be2fb01f | 461 | $this->infos = []; |
6a488035 TO |
462 | $this->moduleExtensions = NULL; |
463 | if ($this->cache) { | |
ec2dd0bd | 464 | $this->cache->delete($this->cacheKey . '_moduleFiles'); |
6a488035 | 465 | } |
85c7eb67 TO |
466 | // FIXME: How can code so code wrong be so right? |
467 | CRM_Extension_System::singleton()->getClassLoader()->refresh(); | |
6a488035 | 468 | } |
96025800 | 469 | |
6a488035 | 470 | } |