1e2a378d3SGreg Roach<?php 2e2a378d3SGreg Roach/** 3e2a378d3SGreg Roach * webtrees: online genealogy 41062a142SGreg Roach * Copyright (C) 2018 webtrees development team 5e2a378d3SGreg Roach * This program is free software: you can redistribute it and/or modify 6e2a378d3SGreg Roach * it under the terms of the GNU General Public License as published by 7e2a378d3SGreg Roach * the Free Software Foundation, either version 3 of the License, or 8e2a378d3SGreg Roach * (at your option) any later version. 9e2a378d3SGreg Roach * This program is distributed in the hope that it will be useful, 10e2a378d3SGreg Roach * but WITHOUT ANY WARRANTY; without even the implied warranty of 11e2a378d3SGreg Roach * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12e2a378d3SGreg Roach * GNU General Public License for more details. 13e2a378d3SGreg Roach * You should have received a copy of the GNU General Public License 14e2a378d3SGreg Roach * along with this program. If not, see <http://www.gnu.org/licenses/>. 15e2a378d3SGreg Roach */ 16e7f56f2aSGreg Roachdeclare(strict_types=1); 17e7f56f2aSGreg Roach 1876692c8bSGreg Roachnamespace Fisharebest\Webtrees\Module; 1976692c8bSGreg Roach 200e62c4b8SGreg Roachuse Fisharebest\Webtrees\Auth; 210e62c4b8SGreg Roachuse Fisharebest\Webtrees\Database; 220e62c4b8SGreg Roachuse Fisharebest\Webtrees\Tree; 23e2ae4578SGreg Roachuse Symfony\Component\HttpFoundation\Response; 24e2a378d3SGreg Roach 25e2a378d3SGreg Roach/** 26e2a378d3SGreg Roach * Class AbstractModule - common functions for blocks 27e2a378d3SGreg Roach */ 28c1010edaSGreg Roachabstract class AbstractModule 29c1010edaSGreg Roach{ 30e2a378d3SGreg Roach /** @var string The directory where the module is installed */ 31e2a378d3SGreg Roach private $directory; 32e2a378d3SGreg Roach 33e2a378d3SGreg Roach /** @var string[] A cached copy of the module settings */ 34e2a378d3SGreg Roach private $settings; 35e2a378d3SGreg Roach 3687503df0SGreg Roach /** @var string For custom modules - optional (recommended) version number */ 3787503df0SGreg Roach const CUSTOM_VERSION = ''; 3887503df0SGreg Roach 3987503df0SGreg Roach /** @var string For custom modules - link for support, upgrades, etc. */ 4087503df0SGreg Roach const CUSTOM_WEBSITE = ''; 4187503df0SGreg Roach 42e2ae4578SGreg Roach protected $layout = 'layouts/default'; 43e2ae4578SGreg Roach 44e2a378d3SGreg Roach /** 45e2a378d3SGreg Roach * Create a new module. 46e2a378d3SGreg Roach * 47e2a378d3SGreg Roach * @param string $directory Where is this module installed 48e2a378d3SGreg Roach */ 49*027c6af4SGreg Roach public function __construct(string $directory) 50c1010edaSGreg Roach { 51e2a378d3SGreg Roach $this->directory = $directory; 52e2a378d3SGreg Roach } 53e2a378d3SGreg Roach 54e2a378d3SGreg Roach /** 5576692c8bSGreg Roach * Get a block setting. 5676692c8bSGreg Roach * 57cbc1590aSGreg Roach * @param int $block_id 58e2a378d3SGreg Roach * @param string $setting_name 5972ac996dSGreg Roach * @param string $default_value 60e2a378d3SGreg Roach * 6172ac996dSGreg Roach * @return string 62e2a378d3SGreg Roach */ 63acf76a54SGreg Roach public function getBlockSetting(int $block_id, string $setting_name, string $default_value = ''): string 64c1010edaSGreg Roach { 65e2a378d3SGreg Roach $setting_value = Database::prepare( 66e5588fb0SGreg Roach "SELECT setting_value FROM `##block_setting` WHERE block_id = :block_id AND setting_name = :setting_name" 6713abd6f3SGreg Roach )->execute([ 68e2a378d3SGreg Roach 'block_id' => $block_id, 69e2a378d3SGreg Roach 'setting_name' => $setting_name, 7013abd6f3SGreg Roach ])->fetchOne(); 71e2a378d3SGreg Roach 7225c4634fSRico Sonntag return $setting_value ?? $default_value; 73e2a378d3SGreg Roach } 74e2a378d3SGreg Roach 75e2a378d3SGreg Roach /** 7676692c8bSGreg Roach * Set a block setting. 7776692c8bSGreg Roach * 78cbc1590aSGreg Roach * @param int $block_id 79e2a378d3SGreg Roach * @param string $setting_name 8020ac4041SGreg Roach * @param string $setting_value 81e2a378d3SGreg Roach * 82e2a378d3SGreg Roach * @return $this 83e2a378d3SGreg Roach */ 848f53f488SRico Sonntag public function setBlockSetting(int $block_id, string $setting_name, string $setting_value): self 85c1010edaSGreg Roach { 86e2a378d3SGreg Roach Database::prepare( 87e2a378d3SGreg Roach "REPLACE INTO `##block_setting` (block_id, setting_name, setting_value) VALUES (:block_id, :setting_name, :setting_value)" 8813abd6f3SGreg Roach )->execute([ 89e2a378d3SGreg Roach 'block_id' => $block_id, 90e2a378d3SGreg Roach 'setting_name' => $setting_name, 91e2a378d3SGreg Roach 'setting_value' => $setting_value, 9213abd6f3SGreg Roach ]); 93e2a378d3SGreg Roach 94e2a378d3SGreg Roach return $this; 95e2a378d3SGreg Roach } 96e2a378d3SGreg Roach 97e2a378d3SGreg Roach /** 98e2a378d3SGreg Roach * What is the default access level for this module? 99e2a378d3SGreg Roach * 100e2a378d3SGreg Roach * Some modules are aimed at admins or managers, and are not generally shown to users. 101e2a378d3SGreg Roach * 102cbc1590aSGreg Roach * @return int 103e2a378d3SGreg Roach */ 1048f53f488SRico Sonntag public function defaultAccessLevel(): int 105c1010edaSGreg Roach { 106e2a378d3SGreg Roach // Returns one of: Auth::PRIV_HIDE, Auth::PRIV_PRIVATE, Auth::PRIV_USER, WT_PRIV_ADMIN 107e2a378d3SGreg Roach return Auth::PRIV_PRIVATE; 108e2a378d3SGreg Roach } 109e2a378d3SGreg Roach 110e2a378d3SGreg Roach /** 111e2a378d3SGreg Roach * Provide a unique internal name for this module 112e2a378d3SGreg Roach * 113e2a378d3SGreg Roach * @return string 114e2a378d3SGreg Roach */ 1158f53f488SRico Sonntag public function getName(): string 116c1010edaSGreg Roach { 117e2a378d3SGreg Roach return basename($this->directory); 118e2a378d3SGreg Roach } 119e2a378d3SGreg Roach 120e2a378d3SGreg Roach /** 121e2a378d3SGreg Roach * Load all the settings for the module into a cache. 122e2a378d3SGreg Roach * 123e2a378d3SGreg Roach * Since modules may have many settings, and will probably want to use 124e2a378d3SGreg Roach * lots of them, load them all at once and cache them. 12518d7a90dSGreg Roach * 12618d7a90dSGreg Roach * @return void 127e2a378d3SGreg Roach */ 128c1010edaSGreg Roach private function loadAllSettings() 129c1010edaSGreg Roach { 130e2a378d3SGreg Roach if ($this->settings === null) { 131e2a378d3SGreg Roach $this->settings = Database::prepare( 132e5588fb0SGreg Roach "SELECT setting_name, setting_value FROM `##module_setting` WHERE module_name = ?" 13313abd6f3SGreg Roach )->execute([$this->getName()])->fetchAssoc(); 134e2a378d3SGreg Roach } 135e2a378d3SGreg Roach } 136e2a378d3SGreg Roach 137e2a378d3SGreg Roach /** 138e2a378d3SGreg Roach * Get a module setting. Return a default if the setting is not set. 139e2a378d3SGreg Roach * 140e2a378d3SGreg Roach * @param string $setting_name 141e2a378d3SGreg Roach * @param string $default 142e2a378d3SGreg Roach * 14315d603e7SGreg Roach * @return string 144e2a378d3SGreg Roach */ 145c1010edaSGreg Roach public function getPreference($setting_name, $default = '') 146c1010edaSGreg Roach { 147e2a378d3SGreg Roach $this->loadAllSettings(); 148e2a378d3SGreg Roach 149e2a378d3SGreg Roach if (array_key_exists($setting_name, $this->settings)) { 150e2a378d3SGreg Roach return $this->settings[$setting_name]; 151e2a378d3SGreg Roach } 152b2ce94c6SRico Sonntag 153b2ce94c6SRico Sonntag return $default; 154e2a378d3SGreg Roach } 155e2a378d3SGreg Roach 156e2a378d3SGreg Roach /** 157e2a378d3SGreg Roach * Set a module setting. 158e2a378d3SGreg Roach * 159e2a378d3SGreg Roach * Since module settings are NOT NULL, setting a value to NULL will cause 160e2a378d3SGreg Roach * it to be deleted. 161e2a378d3SGreg Roach * 162e2a378d3SGreg Roach * @param string $setting_name 163e2a378d3SGreg Roach * @param string $setting_value 16415d603e7SGreg Roach * 16515d603e7SGreg Roach * @return $this 166e2a378d3SGreg Roach */ 1678f53f488SRico Sonntag public function setPreference($setting_name, $setting_value): self 168c1010edaSGreg Roach { 169e2a378d3SGreg Roach $this->loadAllSettings(); 170e2a378d3SGreg Roach 171b7ee5e66SCarmen Pijpers if (!array_key_exists($setting_name, $this->settings)) { 172b7ee5e66SCarmen Pijpers Database::prepare( 173b7ee5e66SCarmen Pijpers "INSERT INTO `##module_setting` (module_name, setting_name, setting_value) VALUES (?, ?, ?)" 174c1010edaSGreg Roach )->execute([ 175c1010edaSGreg Roach $this->getName(), 176c1010edaSGreg Roach $setting_name, 177c1010edaSGreg Roach $setting_value, 178c1010edaSGreg Roach ]); 179b7ee5e66SCarmen Pijpers 180b7ee5e66SCarmen Pijpers $this->settings[$setting_name] = $setting_value; 181b7ee5e66SCarmen Pijpers } elseif ($setting_value !== $this->getPreference($setting_name)) { 182e2a378d3SGreg Roach Database::prepare( 183e2a378d3SGreg Roach "UPDATE `##module_setting` SET setting_value = ? WHERE module_name = ? AND setting_name = ?" 184c1010edaSGreg Roach )->execute([ 185c1010edaSGreg Roach $setting_value, 186c1010edaSGreg Roach $this->getName(), 187c1010edaSGreg Roach $setting_name, 188c1010edaSGreg Roach ]); 18915d603e7SGreg Roach 190e2a378d3SGreg Roach $this->settings[$setting_name] = $setting_value; 191e2a378d3SGreg Roach } 19215d603e7SGreg Roach 19315d603e7SGreg Roach return $this; 194e2a378d3SGreg Roach } 195e2a378d3SGreg Roach 196e2a378d3SGreg Roach /** 197e2a378d3SGreg Roach * Get a the current access level for a module 198e2a378d3SGreg Roach * 199e2a378d3SGreg Roach * @param Tree $tree 200cbc1590aSGreg Roach * @param string $component tab, block, menu, etc 201e2a378d3SGreg Roach * 202cbc1590aSGreg Roach * @return int 203e2a378d3SGreg Roach */ 204c1010edaSGreg Roach public function getAccessLevel(Tree $tree, $component) 205c1010edaSGreg Roach { 206e2a378d3SGreg Roach $access_level = Database::prepare( 207e2a378d3SGreg Roach "SELECT access_level FROM `##module_privacy` WHERE gedcom_id = :gedcom_id AND module_name = :module_name AND component = :component" 20813abd6f3SGreg Roach )->execute([ 209e2a378d3SGreg Roach 'gedcom_id' => $tree->getTreeId(), 210e2a378d3SGreg Roach 'module_name' => $this->getName(), 211e2a378d3SGreg Roach 'component' => $component, 21213abd6f3SGreg Roach ])->fetchOne(); 213e2a378d3SGreg Roach 214e2a378d3SGreg Roach if ($access_level === null) { 215e2a378d3SGreg Roach return $this->defaultAccessLevel(); 216e2a378d3SGreg Roach } 217b2ce94c6SRico Sonntag 218b2ce94c6SRico Sonntag return (int) $access_level; 219e2a378d3SGreg Roach } 220e2ae4578SGreg Roach 221e2ae4578SGreg Roach /** 222e2ae4578SGreg Roach * Create a response object from a view. 223e2ae4578SGreg Roach * 224e2ae4578SGreg Roach * @param string $view_name 225e2ae4578SGreg Roach * @param mixed[] $view_data 226e2ae4578SGreg Roach * @param int $status 227e2ae4578SGreg Roach * 228e2ae4578SGreg Roach * @return Response 229e2ae4578SGreg Roach */ 230c1010edaSGreg Roach protected function viewResponse($view_name, $view_data, $status = Response::HTTP_OK): Response 231c1010edaSGreg Roach { 232e2ae4578SGreg Roach // Make the view's data available to the layout. 233e2ae4578SGreg Roach $layout_data = $view_data; 234e2ae4578SGreg Roach 235e2ae4578SGreg Roach // Render the view 236e2ae4578SGreg Roach $layout_data['content'] = view($view_name, $view_data); 237e2ae4578SGreg Roach 238e2ae4578SGreg Roach // Insert the view into the layout 239e2ae4578SGreg Roach $html = view($this->layout, $layout_data); 240e2ae4578SGreg Roach 241e2ae4578SGreg Roach return new Response($html, $status); 242e2ae4578SGreg Roach } 243e2a378d3SGreg Roach} 244