3 // This file is part of Moodle - http://moodle.org/
5 // Moodle is free software: you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published by
7 // the Free Software Foundation, either version 3 of the License, or
8 // (at your option) any later version.
10 // Moodle is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 // GNU General Public License for more details.
15 // You should have received a copy of the GNU General Public License
16 // along with Moodle. If not, see <http://www.gnu.org/licenses/>.
20 * A namespace contains license specific functions
25 * @copyright 2010 Dongsheng Cai <dongsheng@moodle.com>
26 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
29 defined('MOODLE_INTERNAL') ||
die();
31 class license_manager
{
34 * License is a core license and can not be updated or deleted.
36 const CORE_LICENSE
= 0;
39 * License is a custom license and can be updated and/or deleted.
41 const CUSTOM_LICENSE
= 1;
44 * Integer representation of boolean for a license that is enabled.
46 const LICENSE_ENABLED
= 1;
49 * Integer representation of boolean for a license that is disabled.
51 const LICENSE_DISABLED
= 0;
54 * Integer for moving a license up order.
56 const LICENSE_MOVE_UP
= -1;
59 * Integer for moving a license down order.
61 const LICENSE_MOVE_DOWN
= 1;
64 * Save a license record.
66 * @param object $license {
67 * shortname => string a shortname of license, will be refered by files table[required]
68 * fullname => string the fullname of the license [required]
69 * source => string the homepage of the license type[required]
70 * enabled => int is it enabled?
71 * version => int a version number used by moodle [required]
74 static public function save($license) {
76 $existinglicense = self
::get_license_by_shortname($license->shortname
);
78 if (!empty($existinglicense)) {
79 $id = $existinglicense->id
;
80 if ($existinglicense->custom
== self
::CORE_LICENSE
) {
81 // Can only update the enabled status and sortorder for core licenses.
82 $existinglicense->enabled
= $license->enabled
;
83 $existinglicense->sortorder
= $license->sortorder
;
84 $license = $existinglicense;
87 self
::update($license);
89 self
::create($license);
96 * @deprecated Since Moodle 3.9, MDL-45184.
98 public function add() {
99 throw new coding_exception('license_manager::add() is deprecated. Please use license_manager::save() instead.');
103 * Create a license record.
105 * @param object $license the license to create record for.
107 static protected function create($license) {
110 $licensecount = count(self
::get_licenses());
111 $license->sortorder
= $licensecount +
1;
112 // Enable all created license by default.
113 $license->enabled
= self
::LICENSE_ENABLED
;
114 // API can only create custom licenses, core licenses
115 // are directly created at install or upgrade.
116 $license->custom
= self
::CUSTOM_LICENSE
;
118 $DB->insert_record('license', $license);
119 self
::reset_license_cache();
120 // Update the config setting of active licenses.
121 self
::set_active_licenses();
125 * Read licens record(s) from database.
127 * @param array $params license parameters to return licenses for.
129 * @return array $filteredlicenses object[] of licenses.
131 static public function read(array $params = []) {
132 $licenses = self
::get_licenses();
134 $filteredlicenses = [];
136 foreach ($licenses as $shortname => $license) {
138 foreach ($params as $key => $value) {
139 if ($license->$key != $value) {
140 $filtermatch = false;
144 $filteredlicenses[$shortname] = $license;
147 return $filteredlicenses;
152 * Update a license record.
154 * @param object $license the license to update record for.
156 * @throws \moodle_exception if attempting to update a core license.
158 static protected function update($license) {
161 $DB->update_record('license', $license);
162 self
::reset_license_cache();
166 * Delete a custom license.
168 * @param string $licenseshortname the shortname of license.
170 * @throws \moodle_exception when attempting to delete a license you are not allowed to.
172 static public function delete($licenseshortname) {
175 $licensetodelete = self
::get_license_by_shortname($licenseshortname);
177 if (!empty($licensetodelete)) {
178 if ($licensetodelete->custom
== self
::CUSTOM_LICENSE
) {
179 // Check that the license is not in use by any files, if so it cannot be deleted.
180 $countfilesusinglicense = $DB->count_records('files', ['license' => $licenseshortname]);
181 if ($countfilesusinglicense > 0) {
182 throw new moodle_exception('cannotdeletelicenseinuse', 'license');
184 $deletedsortorder = $licensetodelete->sortorder
;
185 $DB->delete_records('license', ['id' => $licensetodelete->id
]);
187 // We've deleted a license, so update our list of licenses so we don't save the deleted license again.
188 self
::reset_license_cache();
189 $licenses = self
::get_licenses();
191 foreach ($licenses as $license) {
192 if ($license->sortorder
> $deletedsortorder) {
193 $license->sortorder
= $license->sortorder
- 1;
194 self
::save($license);
198 // Update the config setting of active licenses as well.
199 self
::set_active_licenses();
202 throw new moodle_exception('cannotdeletecore', 'license');
205 throw new moodle_exception('licensenotfoundshortname', 'license', $licenseshortname);
210 * Get license records.
212 * @return array|false object[] of license records of false if none.
214 static public function get_licenses() {
217 $cache = \cache
::make('core', 'license');
218 $licenses = $cache->get('licenses');
220 if ($licenses === false) {
222 $records = $DB->get_records_select('license', null, null, 'sortorder ASC');
223 foreach ($records as $license) {
224 $licenses[$license->shortname
] = $license;
226 $cache->set('licenses', $licenses);
229 foreach ($licenses as $license) {
230 // Localise the license names.
231 if ($license->custom
== self
::CORE_LICENSE
) {
232 $license->fullname
= get_string($license->shortname
, 'core_license');
234 $license->fullname
= format_string($license->fullname
);
242 * Change the sort order of a license (and it's sibling license as a result).
244 * @param int $direction value to change sortorder of license by.
245 * @param string $licenseshortname the shortname of license to changes sortorder for.
247 * @throws \moodle_exception if attempting to use invalid direction value.
249 static public function change_license_sortorder(int $direction, string $licenseshortname) : void
{
251 if ($direction != self
::LICENSE_MOVE_UP
&& $direction != self
::LICENSE_MOVE_DOWN
) {
252 throw new coding_exception(
253 'Must use a valid licence API move direction constant (LICENSE_MOVE_UP or LICENSE_MOVE_DOWN)');
256 $licenses = self
::get_licenses();
257 $licensetoupdate = $licenses[$licenseshortname];
259 $currentsortorder = $licensetoupdate->sortorder
;
260 $targetsortorder = $currentsortorder +
$direction;
262 if ($targetsortorder > 0 && $targetsortorder <= count($licenses) ) {
263 foreach ($licenses as $license) {
264 if ($license->sortorder
== $targetsortorder) {
265 $license->sortorder
= $license->sortorder
- $direction;
266 self
::update($license);
269 $licensetoupdate->sortorder
= $targetsortorder;
270 self
::update($licensetoupdate);
275 * Get license record by shortname
277 * @param string $name the shortname of license
278 * @return object|null the license or null if no license found.
280 static public function get_license_by_shortname(string $name) {
281 $licenses = self
::read(['shortname' => $name]);
283 if (!empty($licenses)) {
284 $license = reset($licenses);
294 * @param string $license the shortname of license
297 static public function enable($license) {
298 if ($license = self
::get_license_by_shortname($license)) {
299 $license->enabled
= self
::LICENSE_ENABLED
;
300 self
::update($license);
302 self
::set_active_licenses();
309 * @param string $license the shortname of license
312 static public function disable($license) {
314 // Site default license cannot be disabled!
315 if ($license == $CFG->sitedefaultlicense
) {
316 throw new \
moodle_exception('error');
318 if ($license = self
::get_license_by_shortname($license)) {
319 $license->enabled
= self
::LICENSE_DISABLED
;
320 self
::update($license);
322 self
::set_active_licenses();
328 * Store active licenses in global config.
330 static protected function set_active_licenses() {
331 $licenses = self
::read(['enabled' => self
::LICENSE_ENABLED
]);
333 foreach ($licenses as $l) {
334 $result[] = $l->shortname
;
336 set_config('licenses', implode(',', $result));
340 * Get the globally configured active licenses.
342 * @return array of license objects.
343 * @throws \coding_exception
345 static public function get_active_licenses() {
350 if (!empty($CFG->licenses
)) {
351 $activelicenses = explode(',', $CFG->licenses
);
352 $licenses = self
::get_licenses();
353 foreach ($licenses as $license) {
354 if (in_array($license->shortname
, $activelicenses)) {
355 $result[$license->shortname
] = $license;
364 * Get the globally configured active licenses as an array.
366 * @return array $licenses an associative array of licenses shaped as ['shortname' => 'fullname']
368 static public function get_active_licenses_as_array() {
369 $activelicenses = self
::get_active_licenses();
372 foreach ($activelicenses as $license) {
373 $licenses[$license->shortname
] = $license->fullname
;
380 * Install moodle built-in licenses.
382 static public function install_licenses() {
385 require_once($CFG->libdir
. '/db/upgradelib.php');
387 upgrade_core_licenses();
391 * Reset the license cache so it rebuilds next time licenses are fetched.
393 static public function reset_license_cache() {
394 $cache = \cache
::make('core', 'license');
395 $cache->delete('licenses');