]> git.mxchange.org Git - friendica.git/blob - include/plugin.php
New class "System"
[friendica.git] / include / plugin.php
1 <?php
2 /**
3  * @file include/plugin.php
4  *
5  * @brief Some functions to handle addons and themes.
6  */
7
8 use Friendica\App;
9 use Friendica\Core\System;
10
11 /**
12  * @brief uninstalls an addon.
13  *
14  * @param string $plugin name of the addon
15  * @return boolean
16  */
17 if (! function_exists('uninstall_plugin')){
18 function uninstall_plugin($plugin){
19         logger("Addons: uninstalling " . $plugin);
20         q("DELETE FROM `addon` WHERE `name` = '%s' ",
21                 dbesc($plugin)
22         );
23
24         @include_once('addon/' . $plugin . '/' . $plugin . '.php');
25         if (function_exists($plugin . '_uninstall')) {
26                 $func = $plugin . '_uninstall';
27                 $func();
28         }
29 }}
30
31 /**
32  * @brief installs an addon.
33  *
34  * @param string $plugin name of the addon
35  * @return bool
36  */
37 if (! function_exists('install_plugin')){
38 function install_plugin($plugin) {
39         // silently fail if plugin was removed
40
41         if (! file_exists('addon/' . $plugin . '/' . $plugin . '.php'))
42                 return false;
43         logger("Addons: installing " . $plugin);
44         $t = @filemtime('addon/' . $plugin . '/' . $plugin . '.php');
45         @include_once('addon/' . $plugin . '/' . $plugin . '.php');
46         if (function_exists($plugin . '_install')) {
47                 $func = $plugin . '_install';
48                 $func();
49
50                 $plugin_admin = (function_exists($plugin."_plugin_admin") ? 1 : 0);
51
52                 dba::insert('addon', array('name' => $plugin, 'installed' => true,
53                                         'timestamp' => $t, 'plugin_admin' => $plugin_admin));
54
55                 // we can add the following with the previous SQL
56                 // once most site tables have been updated.
57                 // This way the system won't fall over dead during the update.
58
59                 if (file_exists('addon/' . $plugin . '/.hidden')) {
60                         dba::update('addon', array('hidden' => true), array('name' => $plugin));
61                 }
62                 return true;
63         }
64         else {
65                 logger("Addons: FAILED installing " . $plugin);
66                 return false;
67         }
68
69 }}
70
71 // reload all updated plugins
72
73 if (! function_exists('reload_plugins')) {
74 function reload_plugins() {
75         $plugins = get_config('system','addon');
76         if (strlen($plugins)) {
77
78                 $r = q("SELECT * FROM `addon` WHERE `installed` = 1");
79                 if (dbm::is_result($r))
80                         $installed = $r;
81                 else
82                         $installed = array();
83
84                 $parr = explode(',',$plugins);
85
86                 if (count($parr)) {
87                         foreach ($parr as $pl) {
88
89                                 $pl = trim($pl);
90
91                                 $fname = 'addon/' . $pl . '/' . $pl . '.php';
92
93                                 if (file_exists($fname)) {
94                                         $t = @filemtime($fname);
95                                         foreach ($installed as $i) {
96                                                 if (($i['name'] == $pl) && ($i['timestamp'] != $t)) {
97                                                         logger('Reloading plugin: ' . $i['name']);
98                                                         @include_once($fname);
99
100                                                         if (function_exists($pl . '_uninstall')) {
101                                                                 $func = $pl . '_uninstall';
102                                                                 $func();
103                                                         }
104                                                         if (function_exists($pl . '_install')) {
105                                                                 $func = $pl . '_install';
106                                                                 $func();
107                                                         }
108                                                         dba::update('addon', array('timestamp' => $t), array('id' => $i['id']));
109                                                 }
110                                         }
111                                 }
112                         }
113                 }
114         }
115
116 }}
117
118 /**
119  * @brief check if addon is enabled
120  *
121  * @param string $plugin
122  * @return boolean
123  */
124 function plugin_enabled($plugin) {
125         return dba::exists('addon', array('installed' => true, 'name' => $plugin));
126 }
127
128
129 /**
130  * @brief registers a hook.
131  *
132  * @param string $hook the name of the hook
133  * @param string $file the name of the file that hooks into
134  * @param string $function the name of the function that the hook will call
135  * @param int $priority A priority (defaults to 0)
136  * @return mixed|bool
137  */
138 if (! function_exists('register_hook')) {
139 function register_hook($hook,$file,$function,$priority=0) {
140
141         $r = q("SELECT * FROM `hook` WHERE `hook` = '%s' AND `file` = '%s' AND `function` = '%s' LIMIT 1",
142                 dbesc($hook),
143                 dbesc($file),
144                 dbesc($function)
145         );
146         if (dbm::is_result($r))
147                 return true;
148
149         $r = dba::insert('hook', array('hook' => $hook, 'file' => $file, 'function' => $function, 'priority' => $priority));
150
151         return $r;
152 }}
153
154 /**
155  * @brief unregisters a hook.
156  *
157  * @param string $hook the name of the hook
158  * @param string $file the name of the file that hooks into
159  * @param string $function the name of the function that the hook called
160  * @return array
161  */
162 if (! function_exists('unregister_hook')) {
163 function unregister_hook($hook,$file,$function) {
164
165         $r = q("DELETE FROM `hook` WHERE `hook` = '%s' AND `file` = '%s' AND `function` = '%s'",
166                 dbesc($hook),
167                 dbesc($file),
168                 dbesc($function)
169         );
170         return $r;
171 }}
172
173
174 function load_hooks() {
175         $a = get_app();
176         $a->hooks = array();
177         $r = dba::select('hook', array('hook', 'file', 'function'), array(), array('order' => array('priority' => 'desc', 'file')));
178
179         while ($rr = dba::fetch($r)) {
180                 if (! array_key_exists($rr['hook'],$a->hooks)) {
181                         $a->hooks[$rr['hook']] = array();
182                 }
183                 $a->hooks[$rr['hook']][] = array($rr['file'],$rr['function']);
184         }
185         dba::close($r);
186 }
187
188 /**
189  * @brief Calls a hook.
190  *
191  * Use this function when you want to be able to allow a hook to manipulate
192  * the provided data.
193  *
194  * @param string $name of the hook to call
195  * @param string|array &$data to transmit to the callback handler
196  */
197 function call_hooks($name, &$data = null) {
198         $stamp1 = microtime(true);
199
200         $a = get_app();
201
202         if (is_array($a->hooks) && array_key_exists($name, $a->hooks))
203                 foreach ($a->hooks[$name] as $hook)
204                         call_single_hook($a, $name, $hook, $data);
205 }
206
207 /**
208  * @brief Calls a single hook.
209  *
210  * @param string $name of the hook to call
211  * @param array $hook Hook data
212  * @param string|array &$data to transmit to the callback handler
213  */
214 function call_single_hook($a, $name, $hook, &$data = null) {
215         // Don't run a theme's hook if the user isn't using the theme
216         if (strpos($hook[0], 'view/theme/') !== false && strpos($hook[0], 'view/theme/'.current_theme()) === false)
217                 return;
218
219         @include_once($hook[0]);
220         if (function_exists($hook[1])) {
221                 $func = $hook[1];
222                 $func($a, $data);
223         } else {
224                 // remove orphan hooks
225                 q("DELETE FROM `hook` WHERE `hook` = '%s' AND `file` = '%s' AND `function` = '%s'",
226                         dbesc($name),
227                         dbesc($hook[0]),
228                         dbesc($hook[1])
229                 );
230         }
231 }
232
233 //check if an app_menu hook exist for plugin $name.
234 //Return true if the plugin is an app
235 if (! function_exists('plugin_is_app')) {
236 function plugin_is_app($name) {
237         $a = get_app();
238
239         if (is_array($a->hooks) && (array_key_exists('app_menu',$a->hooks))) {
240                 foreach ($a->hooks['app_menu'] as $hook) {
241                         if ($hook[0] == 'addon/'.$name.'/'.$name.'.php')
242                                 return true;
243                 }
244         }
245
246         return false;
247 }}
248
249 /**
250  * @brief Parse plugin comment in search of plugin infos.
251  *
252  * like
253  * \code
254  *...* Name: Plugin
255  *   * Description: A plugin which plugs in
256  * . * Version: 1.2.3
257  *   * Author: John <profile url>
258  *   * Author: Jane <email>
259  *   *
260  *  *\endcode
261  * @param string $plugin the name of the plugin
262  * @return array with the plugin information
263  */
264
265 if (! function_exists('get_plugin_info')){
266 function get_plugin_info($plugin){
267
268         $a = get_app();
269
270         $info=Array(
271                 'name' => $plugin,
272                 'description' => "",
273                 'author' => array(),
274                 'version' => "",
275                 'status' => ""
276         );
277
278         if (!is_file("addon/$plugin/$plugin.php")) return $info;
279
280         $stamp1 = microtime(true);
281         $f = file_get_contents("addon/$plugin/$plugin.php");
282         $a->save_timestamp($stamp1, "file");
283
284         $r = preg_match("|/\*.*\*/|msU", $f, $m);
285
286         if ($r){
287                 $ll = explode("\n", $m[0]);
288                 foreach ( $ll as $l ) {
289                         $l = trim($l,"\t\n\r */");
290                         if ($l!=""){
291                                 list($k,$v) = array_map("trim", explode(":",$l,2));
292                                 $k= strtolower($k);
293                                 if ($k=="author"){
294                                         $r=preg_match("|([^<]+)<([^>]+)>|", $v, $m);
295                                         if ($r) {
296                                                 $info['author'][] = array('name'=>$m[1], 'link'=>$m[2]);
297                                         } else {
298                                                 $info['author'][] = array('name'=>$v);
299                                         }
300                                 } else {
301                                         if (array_key_exists($k,$info)){
302                                                 $info[$k]=$v;
303                                         }
304                                 }
305
306                         }
307                 }
308
309         }
310         return $info;
311 }}
312
313
314 /**
315  * @brief Parse theme comment in search of theme infos.
316  *
317  * like
318  * \code
319  * ..* Name: My Theme
320  *   * Description: My Cool Theme
321  * . * Version: 1.2.3
322  *   * Author: John <profile url>
323  *   * Maintainer: Jane <profile url>
324  *   *
325  * \endcode
326  * @param string $theme the name of the theme
327  * @return array
328  */
329
330 if (! function_exists('get_theme_info')){
331 function get_theme_info($theme){
332         $info=Array(
333                 'name' => $theme,
334                 'description' => "",
335                 'author' => array(),
336                 'maintainer' => array(),
337                 'version' => "",
338                 'credits' => "",
339                 'experimental' => false,
340                 'unsupported' => false
341         );
342
343         if (file_exists("view/theme/$theme/experimental"))
344                 $info['experimental'] = true;
345         if (file_exists("view/theme/$theme/unsupported"))
346                 $info['unsupported'] = true;
347
348         if (!is_file("view/theme/$theme/theme.php")) return $info;
349
350         $a = get_app();
351         $stamp1 = microtime(true);
352         $f = file_get_contents("view/theme/$theme/theme.php");
353         $a->save_timestamp($stamp1, "file");
354
355         $r = preg_match("|/\*.*\*/|msU", $f, $m);
356
357         if ($r){
358                 $ll = explode("\n", $m[0]);
359                 foreach ( $ll as $l ) {
360                         $l = trim($l,"\t\n\r */");
361                         if ($l!=""){
362                                 list($k,$v) = array_map("trim", explode(":",$l,2));
363                                 $k= strtolower($k);
364                                 if ($k=="author"){
365
366                                         $r=preg_match("|([^<]+)<([^>]+)>|", $v, $m);
367                                         if ($r) {
368                                                 $info['author'][] = array('name'=>$m[1], 'link'=>$m[2]);
369                                         } else {
370                                                 $info['author'][] = array('name'=>$v);
371                                         }
372                                 }
373                                 elseif ($k=="maintainer"){
374                                         $r=preg_match("|([^<]+)<([^>]+)>|", $v, $m);
375                                         if ($r) {
376                                                 $info['maintainer'][] = array('name'=>$m[1], 'link'=>$m[2]);
377                                         } else {
378                                                 $info['maintainer'][] = array('name'=>$v);
379                                         }
380                                 } else {
381                                         if (array_key_exists($k,$info)){
382                                                 $info[$k]=$v;
383                                         }
384                                 }
385
386                         }
387                 }
388
389         }
390         return $info;
391 }}
392
393 /**
394  * @brief Returns the theme's screenshot.
395  *
396  * The screenshot is expected as view/theme/$theme/screenshot.[png|jpg].
397  *
398  * @param sring $theme The name of the theme
399  * @return string
400  */
401 function get_theme_screenshot($theme) {
402         $exts = array('.png','.jpg');
403         foreach ($exts as $ext) {
404                 if (file_exists('view/theme/' . $theme . '/screenshot' . $ext)) {
405                         return(App::get_baseurl() . '/view/theme/' . $theme . '/screenshot' . $ext);
406                 }
407         }
408         return(App::get_baseurl() . '/images/blank.png');
409 }
410
411 // install and uninstall theme
412 if (! function_exists('uninstall_theme')){
413 function uninstall_theme($theme){
414         logger("Addons: uninstalling theme " . $theme);
415
416         include_once("view/theme/$theme/theme.php");
417         if (function_exists("{$theme}_uninstall")) {
418                 $func = "{$theme}_uninstall";
419                 $func();
420         }
421 }}
422
423 if (! function_exists('install_theme')){
424 function install_theme($theme) {
425         // silently fail if theme was removed
426
427         if (! file_exists("view/theme/$theme/theme.php")) {
428                 return false;
429         }
430
431         logger("Addons: installing theme $theme");
432
433         include_once("view/theme/$theme/theme.php");
434
435         if (function_exists("{$theme}_install")) {
436                 $func = "{$theme}_install";
437                 $func();
438                 return true;
439         } else {
440                 logger("Addons: FAILED installing theme $theme");
441                 return false;
442         }
443
444 }}
445
446
447
448 // check service_class restrictions. If there are no service_classes defined, everything is allowed.
449 // if $usage is supplied, we check against a maximum count and return true if the current usage is
450 // less than the subscriber plan allows. Otherwise we return boolean true or false if the property
451 // is allowed (or not) in this subscriber plan. An unset property for this service plan means
452 // the property is allowed, so it is only necessary to provide negative properties for each plan,
453 // or what the subscriber is not allowed to do.
454
455
456 function service_class_allows($uid,$property,$usage = false) {
457
458         if ($uid == local_user()) {
459                 $service_class = $a->user['service_class'];
460         } else {
461                 $r = q("SELECT `service_class` FROM `user` WHERE `uid` = %d LIMIT 1",
462                         intval($uid)
463                 );
464                 if (dbm::is_result($r)) {
465                         $service_class = $r[0]['service_class'];
466                 }
467         }
468
469         if (! x($service_class)) {
470                 // everything is allowed
471                 return true;
472         }
473
474         $arr = get_config('service_class',$service_class);
475         if (! is_array($arr) || (! count($arr))) {
476                 return true;
477         }
478
479         if ($usage === false) {
480                 return ((x($arr[$property])) ? (bool) $arr['property'] : true);
481         } else {
482                 if (! array_key_exists($property,$arr)) {
483                         return true;
484                 }
485                 return (((intval($usage)) < intval($arr[$property])) ? true : false);
486         }
487 }
488
489
490 function service_class_fetch($uid,$property) {
491
492         if ($uid == local_user()) {
493                 $service_class = $a->user['service_class'];
494         } else {
495                 $r = q("SELECT `service_class` FROM `user` WHERE `uid` = %d LIMIT 1",
496                         intval($uid)
497                 );
498                 if (dbm::is_result($r)) {
499                         $service_class = $r[0]['service_class'];
500                 }
501         }
502         if (! x($service_class))
503                 return false; // everything is allowed
504
505         $arr = get_config('service_class',$service_class);
506         if (! is_array($arr) || (! count($arr)))
507                 return false;
508
509         return((array_key_exists($property,$arr)) ? $arr[$property] : false);
510
511 }
512
513 function upgrade_link($bbcode = false) {
514         $l = get_config('service_class','upgrade_link');
515         if (! $l) {
516                 return '';
517         }
518         if ($bbcode) {
519                 $t = sprintf('[url=%s]' . t('Click here to upgrade.') . '[/url]', $l);
520         } else {
521                 $t = sprintf('<a href="%s">' . t('Click here to upgrade.') . '</div>', $l);
522         }
523         return $t;
524 }
525
526 function upgrade_message($bbcode = false) {
527         $x = upgrade_link($bbcode);
528         return t('This action exceeds the limits set by your subscription plan.') . (($x) ? ' ' . $x : '') ;
529 }
530
531 function upgrade_bool_message($bbcode = false) {
532         $x = upgrade_link($bbcode);
533         return t('This action is not available under your subscription plan.') . (($x) ? ' ' . $x : '') ;
534 }
535
536 /**
537  * @brief Get the full path to relevant theme files by filename
538  *
539  * This function search in the theme directory (and if not present in global theme directory)
540  * if there is a directory with the file extension and  for a file with the given
541  * filename.
542  *
543  * @param string $file Filename
544  * @param string $root Full root path
545  * @return string Path to the file or empty string if the file isn't found
546  */
547 function theme_include($file, $root = '') {
548         $file = basename($file);
549
550         // Make sure $root ends with a slash / if it's not blank
551         if ($root !== '' && $root[strlen($root)-1] !== '/') {
552                 $root = $root . '/';
553         }
554         $theme_info = get_app()->theme_info;
555         if (is_array($theme_info) && array_key_exists('extends',$theme_info)) {
556                 $parent = $theme_info['extends'];
557         } else {
558                 $parent = 'NOPATH';
559         }
560         $theme = current_theme();
561         $thname = $theme;
562         $ext = substr($file,strrpos($file,'.')+1);
563         $paths = array(
564                 "{$root}view/theme/$thname/$ext/$file",
565                 "{$root}view/theme/$parent/$ext/$file",
566                 "{$root}view/$ext/$file",
567         );
568         foreach ($paths as $p) {
569                 // strpos() is faster than strstr when checking if one string is in another (http://php.net/manual/en/function.strstr.php)
570                 if (strpos($p,'NOPATH') !== false) {
571                         continue;
572                 } elseif (file_exists($p)) {
573                         return $p;
574                 }
575         }
576         return '';
577 }