-<?php\r
-/**\r
- * @file src/Core/Addon.php\r
- */\r
-namespace Friendica\Core;\r
-\r
-use Friendica\Core\Config;\r
-use Friendica\Database\DBM;\r
-\r
-use dba;\r
-\r
-require_once 'include/dba.php';\r
-\r
-/**\r
- * Some functions to handle addons\r
- */\r
-class Addon\r
-{\r
- /**\r
- * @brief uninstalls an addon.\r
- *\r
- * @param string $addon name of the addon\r
- * @return boolean\r
- */\r
- public static function uninstall($addon)\r
- {\r
- logger("Addons: uninstalling " . $addon);\r
- dba::delete('addon', ['name' => $addon]);\r
-\r
- @include_once('addon/' . $addon . '/' . $addon . '.php');\r
- if (function_exists($addon . '_uninstall')) {\r
- $func = $addon . '_uninstall';\r
- $func();\r
- }\r
- }\r
-\r
- /**\r
- * @brief installs an addon.\r
- *\r
- * @param string $addon name of the addon\r
- * @return bool\r
- */\r
- public static function install($addon)\r
- {\r
- // silently fail if addon was removed\r
-\r
- if (!file_exists('addon/' . $addon . '/' . $addon . '.php')) {\r
- return false;\r
- }\r
- logger("Addons: installing " . $addon);\r
- $t = @filemtime('addon/' . $addon . '/' . $addon . '.php');\r
- @include_once('addon/' . $addon . '/' . $addon . '.php');\r
- if (function_exists($addon . '_install')) {\r
- $func = $addon . '_install';\r
- $func();\r
-\r
- $addon_admin = (function_exists($addon."_addon_admin") ? 1 : 0);\r
-\r
- dba::insert('addon', ['name' => $addon, 'installed' => true,\r
- 'timestamp' => $t, 'plugin_admin' => $addon_admin]);\r
-\r
- // we can add the following with the previous SQL\r
- // once most site tables have been updated.\r
- // This way the system won't fall over dead during the update.\r
-\r
- if (file_exists('addon/' . $addon . '/.hidden')) {\r
- dba::update('addon', ['hidden' => true], ['name' => $addon]);\r
- }\r
- return true;\r
- } else {\r
- logger("Addons: FAILED installing " . $addon);\r
- return false;\r
- }\r
- }\r
-\r
- /**\r
- * reload all updated addons\r
- */\r
- public static function reload()\r
- {\r
- $addons = Config::get('system', 'addon');\r
- if (strlen($addons)) {\r
- $r = dba::select('addon', [], ['installed' => 1]);\r
- if (DBM::is_result($r)) {\r
- $installed = dba::inArray($r);\r
- } else {\r
- $installed = [];\r
- }\r
-\r
- $addon_list = explode(',', $addons);\r
-\r
- if (count($addon_list)) {\r
- foreach ($addon_list as $addon) {\r
- $addon = trim($addon);\r
- $fname = 'addon/' . $addon . '/' . $addon . '.php';\r
-\r
- if (file_exists($fname)) {\r
- $t = @filemtime($fname);\r
- foreach ($installed as $i) {\r
- if (($i['name'] == $addon) && ($i['timestamp'] != $t)) {\r
- logger('Reloading addon: ' . $i['name']);\r
- @include_once($fname);\r
-\r
- if (function_exists($addon . '_uninstall')) {\r
- $func = $addon . '_uninstall';\r
- $func();\r
- }\r
- if (function_exists($addon . '_install')) {\r
- $func = $addon . '_install';\r
- $func();\r
- }\r
- dba::update('addon', ['timestamp' => $t], ['id' => $i['id']]);\r
- }\r
- }\r
- }\r
- }\r
- }\r
- }\r
- }\r
-\r
- /**\r
- * @brief check if addon is enabled\r
- *\r
- * @param string $addon\r
- * @return boolean\r
- */\r
- public static function isEnabled($addon)\r
- {\r
- return dba::exists('addon', ['installed' => true, 'name' => $addon]);\r
- }\r
-\r
-\r
- /**\r
- * @brief registers a hook.\r
- *\r
- * @param string $hook the name of the hook\r
- * @param string $file the name of the file that hooks into\r
- * @param string $function the name of the function that the hook will call\r
- * @param int $priority A priority (defaults to 0)\r
- * @return mixed|bool\r
- */\r
- public static function registerHook($hook, $file, $function, $priority = 0)\r
- {\r
- $condition = ['hook' => $hook, 'file' => $file, 'function' => $function];\r
- $exists = dba::exists('hook', $condition);\r
- if ($exists) {\r
- return true;\r
- }\r
-\r
- $r = dba::insert('hook', ['hook' => $hook, 'file' => $file, 'function' => $function, 'priority' => $priority]);\r
-\r
- return $r;\r
- }\r
-\r
- /**\r
- * @brief unregisters a hook.\r
- *\r
- * @param string $hook the name of the hook\r
- * @param string $file the name of the file that hooks into\r
- * @param string $function the name of the function that the hook called\r
- * @return array\r
- */\r
- public static function unregisterHook($hook, $file, $function)\r
- {\r
- $condition = ['hook' => $hook, 'file' => $file, 'function' => $function];\r
- $r = dba::delete('hook', $condition);\r
- return $r;\r
- }\r
-\r
- /**\r
- * Load hooks\r
- */\r
- public static function loadHooks()\r
- {\r
- $a = get_app();\r
- $a->hooks = [];\r
- $r = dba::select('hook', ['hook', 'file', 'function'], [], ['order' => ['priority' => 'desc', 'file']]);\r
-\r
- while ($rr = dba::fetch($r)) {\r
- if (! array_key_exists($rr['hook'], $a->hooks)) {\r
- $a->hooks[$rr['hook']] = [];\r
- }\r
- $a->hooks[$rr['hook']][] = [$rr['file'],$rr['function']];\r
- }\r
- dba::close($r);\r
- }\r
-\r
- /**\r
- * @brief Calls a hook.\r
- *\r
- * Use this function when you want to be able to allow a hook to manipulate\r
- * the provided data.\r
- *\r
- * @param string $name of the hook to call\r
- * @param string|array &$data to transmit to the callback handler\r
- */\r
- public static function callHooks($name, &$data = null)\r
- {\r
- $a = get_app();\r
-\r
- if (is_array($a->hooks) && array_key_exists($name, $a->hooks)) {\r
- foreach ($a->hooks[$name] as $hook) {\r
- self::callSingleHook($a, $name, $hook, $data);\r
- }\r
- }\r
- }\r
-\r
- /**\r
- * @brief Calls a single hook.\r
- *\r
- * @param string $name of the hook to call\r
- * @param array $hook Hook data\r
- * @param string|array &$data to transmit to the callback handler\r
- */\r
- public static function callSingleHook($a, $name, $hook, &$data = null)\r
- {\r
- // Don't run a theme's hook if the user isn't using the theme\r
- if (strpos($hook[0], 'view/theme/') !== false && strpos($hook[0], 'view/theme/'.current_theme()) === false) {\r
- return;\r
- }\r
-\r
- @include_once($hook[0]);\r
- if (function_exists($hook[1])) {\r
- $func = $hook[1];\r
- $func($a, $data);\r
- } else {\r
- // remove orphan hooks\r
- $condition = ['hook' => $name, 'file' => $hook[0], 'function' => $hook[1]];\r
- dba::delete('hook', $condition);\r
- }\r
- }\r
-\r
- /**\r
- * check if an app_menu hook exist for addon $name.\r
- * Return true if the addon is an app\r
- */\r
- public static function isApp($name)\r
- {\r
- $a = get_app();\r
-\r
- if (is_array($a->hooks) && (array_key_exists('app_menu', $a->hooks))) {\r
- foreach ($a->hooks['app_menu'] as $hook) {\r
- if ($hook[0] == 'addon/'.$name.'/'.$name.'.php') {\r
- return true;\r
- }\r
- }\r
- }\r
-\r
- return false;\r
- }\r
-\r
- /**\r
- * @brief Parse addon comment in search of addon infos.\r
- *\r
- * like\r
- * \code\r
- * * Name: addon\r
- * * Description: An addon which plugs in\r
- * . * Version: 1.2.3\r
- * * Author: John <profile url>\r
- * * Author: Jane <email>\r
- * * Maintainer: Jess <email>\r
- * *\r
- * *\endcode\r
- * @param string $addon the name of the addon\r
- * @return array with the addon information\r
- */\r
- public static function getInfo($addon)\r
- {\r
- $a = get_app();\r
-\r
- $info = [\r
- 'name' => $addon,\r
- 'description' => "",\r
- 'author' => [],\r
- 'maintainer' => [],\r
- 'version' => "",\r
- 'status' => ""\r
- ];\r
-\r
- if (!is_file("addon/$addon/$addon.php")) {\r
- return $info;\r
- }\r
-\r
- $stamp1 = microtime(true);\r
- $f = file_get_contents("addon/$addon/$addon.php");\r
- $a->save_timestamp($stamp1, "file");\r
-\r
- $r = preg_match("|/\*.*\*/|msU", $f, $m);\r
-\r
- if ($r) {\r
- $ll = explode("\n", $m[0]);\r
- foreach ($ll as $l) {\r
- $l = trim($l, "\t\n\r */");\r
- if ($l != "") {\r
- list($type, $v) = array_map("trim", explode(":", $l, 2));\r
- $type = strtolower($type);\r
- if ($type == "author" || $type == "maintainer") {\r
- $r = preg_match("|([^<]+)<([^>]+)>|", $v, $m);\r
- if ($r) {\r
- $info[$type][] = ['name' => $m[1], 'link' => $m[2]];\r
- } else {\r
- $info[$type][] = ['name' => $v];\r
- }\r
- } else {\r
- if (array_key_exists($type, $info)) {\r
- $info[$type] = $v;\r
- }\r
- }\r
- }\r
- }\r
- }\r
- return $info;\r
- }\r
-}\r
+<?php
+/**
+ * @copyright Copyright (C) 2010-2022, the Friendica project
+ *
+ * @license GNU AGPL version 3 or any later version
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Affero General Public License as
+ * published by the Free Software Foundation, either version 3 of the
+ * License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU Affero General Public License for more details.
+ *
+ * You should have received a copy of the GNU Affero General Public License
+ * along with this program. If not, see <https://www.gnu.org/licenses/>.
+ *
+ */
+
+namespace Friendica\Core;
+
+use Friendica\Database\DBA;
+use Friendica\DI;
+use Friendica\Model\Contact;
+use Friendica\Util\Strings;
+
+/**
+ * Some functions to handle addons
+ */
+class Addon
+{
+ /**
+ * The addon sub-directory
+ * @var string
+ */
+ const DIRECTORY = 'addon';
+
+ /**
+ * List of the names of enabled addons
+ *
+ * @var array
+ */
+ private static $addons = [];
+
+ /**
+ * Returns the list of available addons with their current status and info.
+ * This list is made from scanning the addon/ folder.
+ * Unsupported addons are excluded unless they already are enabled or system.show_unsupported_addon is set.
+ *
+ * @return array
+ * @throws \Exception
+ */
+ public static function getAvailableList()
+ {
+ $addons = [];
+ $files = glob('addon/*/');
+ if (is_array($files)) {
+ foreach ($files as $file) {
+ if (is_dir($file)) {
+ list($tmp, $addon) = array_map('trim', explode('/', $file));
+ $info = self::getInfo($addon);
+
+ if (DI::config()->get('system', 'show_unsupported_addons')
+ || strtolower($info['status']) != 'unsupported'
+ || self::isEnabled($addon)
+ ) {
+ $addons[] = [$addon, (self::isEnabled($addon) ? 'on' : 'off'), $info];
+ }
+ }
+ }
+ }
+
+ return $addons;
+ }
+
+ /**
+ * Returns a list of addons that can be configured at the node level.
+ * The list is formatted for display in the admin panel aside.
+ *
+ * @return array
+ * @throws \Exception
+ */
+ public static function getAdminList()
+ {
+ $addons_admin = [];
+ $addonsAdminStmt = DBA::select('addon', ['name'], ['plugin_admin' => 1], ['order' => ['name']]);
+ while ($addon = DBA::fetch($addonsAdminStmt)) {
+ $addons_admin[$addon['name']] = [
+ 'url' => 'admin/addons/' . $addon['name'],
+ 'name' => $addon['name'],
+ 'class' => 'addon'
+ ];
+ }
+ DBA::close($addonsAdminStmt);
+
+ return $addons_admin;
+ }
+
+
+ /**
+ * Synchronize addons:
+ *
+ * system.addon contains a comma-separated list of names
+ * of addons which are used on this system.
+ * Go through the database list of already installed addons, and if we have
+ * an entry, but it isn't in the config list, call the uninstall procedure
+ * and mark it uninstalled in the database (for now we'll remove it).
+ * Then go through the config list and if we have a addon that isn't installed,
+ * call the install procedure and add it to the database.
+ *
+ */
+ public static function loadAddons()
+ {
+ $installed_addons = DBA::selectToArray('addon', ['name'], ['installed' => true]);
+ self::$addons = array_column($installed_addons, 'name');
+ }
+
+ /**
+ * uninstalls an addon.
+ *
+ * @param string $addon name of the addon
+ * @return void
+ * @throws \Exception
+ */
+ public static function uninstall($addon)
+ {
+ $addon = Strings::sanitizeFilePathItem($addon);
+
+ Logger::notice("Addon {addon}: {action}", ['action' => 'uninstall', 'addon' => $addon]);
+ DBA::delete('addon', ['name' => $addon]);
+
+ @include_once('addon/' . $addon . '/' . $addon . '.php');
+ if (function_exists($addon . '_uninstall')) {
+ $func = $addon . '_uninstall';
+ $func();
+ }
+
+ Hook::delete(['file' => 'addon/' . $addon . '/' . $addon . '.php']);
+
+ unset(self::$addons[array_search($addon, self::$addons)]);
+ }
+
+ /**
+ * installs an addon.
+ *
+ * @param string $addon name of the addon
+ * @return bool
+ * @throws \Exception
+ */
+ public static function install($addon)
+ {
+ $addon = Strings::sanitizeFilePathItem($addon);
+
+ $addon_file_path = 'addon/' . $addon . '/' . $addon . '.php';
+
+ // silently fail if addon was removed of if $addon is funky
+ if (!file_exists($addon_file_path)) {
+ return false;
+ }
+
+ Logger::notice("Addon {addon}: {action}", ['action' => 'install', 'addon' => $addon]);
+ $t = @filemtime($addon_file_path);
+ @include_once($addon_file_path);
+ if (function_exists($addon . '_install')) {
+ $func = $addon . '_install';
+ $func(DI::app());
+ }
+
+ DBA::insert('addon', [
+ 'name' => $addon,
+ 'installed' => true,
+ 'timestamp' => $t,
+ 'plugin_admin' => function_exists($addon . '_addon_admin'),
+ 'hidden' => file_exists('addon/' . $addon . '/.hidden')
+ ]);
+
+ if (!self::isEnabled($addon)) {
+ self::$addons[] = $addon;
+ }
+
+ return true;
+ }
+
+ /**
+ * reload all updated addons
+ */
+ public static function reload()
+ {
+ $addons = DBA::selectToArray('addon', [], ['installed' => true]);
+
+ foreach ($addons as $addon) {
+ $addonname = Strings::sanitizeFilePathItem(trim($addon['name']));
+ $addon_file_path = 'addon/' . $addonname . '/' . $addonname . '.php';
+ if (file_exists($addon_file_path) && $addon['timestamp'] == filemtime($addon_file_path)) {
+ // Addon unmodified, skipping
+ continue;
+ }
+
+ Logger::notice("Addon {addon}: {action}", ['action' => 'reload', 'addon' => $addon['name']]);
+
+ self::uninstall($addon['name']);
+ self::install($addon['name']);
+ }
+ }
+
+ /**
+ * Parse addon comment in search of addon infos.
+ *
+ * like
+ * \code
+ * * Name: addon
+ * * Description: An addon which plugs in
+ * . * Version: 1.2.3
+ * * Author: John <profile url>
+ * * Author: Jane <email>
+ * * Maintainer: Jess <email>
+ * *
+ * *\endcode
+ * @param string $addon the name of the addon
+ * @return array with the addon information
+ * @throws \Exception
+ */
+ public static function getInfo($addon)
+ {
+ $addon = Strings::sanitizeFilePathItem($addon);
+
+ $info = [
+ 'name' => $addon,
+ 'description' => "",
+ 'author' => [],
+ 'maintainer' => [],
+ 'version' => "",
+ 'status' => ""
+ ];
+
+ if (!is_file("addon/$addon/$addon.php")) {
+ return $info;
+ }
+
+ DI::profiler()->startRecording('file');
+ $f = file_get_contents("addon/$addon/$addon.php");
+ DI::profiler()->stopRecording();
+
+ $r = preg_match("|/\*.*\*/|msU", $f, $m);
+
+ if ($r) {
+ $ll = explode("\n", $m[0]);
+ foreach ($ll as $l) {
+ $l = trim($l, "\t\n\r */");
+ if ($l != "") {
+ $addon_info = array_map("trim", explode(":", $l, 2));
+ if (count($addon_info) < 2) {
+ continue;
+ }
+
+ list($type, $v) = $addon_info;
+ $type = strtolower($type);
+ if ($type == "author" || $type == "maintainer") {
+ $r = preg_match("|([^<]+)<([^>]+)>|", $v, $m);
+ if ($r) {
+ if (!empty($m[2]) && empty(parse_url($m[2], PHP_URL_SCHEME))) {
+ $contact = Contact::getByURL($m[2], false);
+ if (!empty($contact['url'])) {
+ $m[2] = $contact['url'];
+ }
+ }
+ $info[$type][] = ['name' => $m[1], 'link' => $m[2]];
+ } else {
+ $info[$type][] = ['name' => $v];
+ }
+ } else {
+ if (array_key_exists($type, $info)) {
+ $info[$type] = $v;
+ }
+ }
+ }
+ }
+ }
+ return $info;
+ }
+
+ /**
+ * Checks if the provided addon is enabled
+ *
+ * @param string $addon
+ * @return boolean
+ */
+ public static function isEnabled($addon)
+ {
+ return in_array($addon, self::$addons);
+ }
+
+ /**
+ * Returns a list of the enabled addon names
+ *
+ * @return array
+ */
+ public static function getEnabledList()
+ {
+ return self::$addons;
+ }
+
+ /**
+ * Returns the list of non-hidden enabled addon names
+ *
+ * @return array
+ * @throws \Exception
+ */
+ public static function getVisibleList()
+ {
+ $visible_addons = [];
+ $stmt = DBA::select('addon', ['name'], ['hidden' => false, 'installed' => true]);
+ if (DBA::isResult($stmt)) {
+ foreach (DBA::toArray($stmt) as $addon) {
+ $visible_addons[] = $addon['name'];
+ }
+ }
+
+ return $visible_addons;
+ }
+}