You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

93 lines
3.2 KiB

<?php
// This file is part of Moodle - http://moodle.org/
//
// Moodle is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle 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 General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
/**
* url_replace cli script. Examines DB for non-https src or data links, and lists broken ones or replaces all links.
*
* @package tool_httpsreplace
* @copyright Copyright (c) 2016 Blackboard Inc. (http://www.blackboard.com)
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
define('CLI_SCRIPT', true);
require(__DIR__ . '/../../../../config.php');
require_once($CFG->libdir.'/clilib.php');
list($options, $unrecognized) = cli_get_params(
array(
'help' => false,
'list' => false,
'replace' => false,
'confirm' => false,
),
array(
'h' => 'help',
'l' => 'list',
'r' => 'replace',
)
);
if ($unrecognized) {
$unrecognized = implode("\n ", $unrecognized);
cli_error(get_string('cliunknowoption', 'admin', $unrecognized), 2);
}
if ($options['help'] || (!$options['list'] && !$options['replace'])) {
$help = "Examines DB for non-https src or data links, and lists broken links or replaces all links.
Options:
-h, --help Print out this help
-l, --list List of http (not https) urls on a site in the DB that would become broken.
-r, --replace List of http (not https) urls on a site in the DB that would become broken.
--confirm Replaces http urls with https across a site's content.
Example:
\$ sudo -u www-data /usr/bin/php admin/tool/httpsreplace/cli/url_replace.php --list \n";
echo $help;
exit(0);
}
if (!$DB->replace_all_text_supported()) {
echo $OUTPUT->notification(get_string('notimplemented', 'tool_httpsreplace'));
exit(1);
}
if (!is_https()) {
echo $OUTPUT->notification(get_string('httpwarning', 'tool_httpsreplace'), 'warning');
echo "\n";
}
if ($options['replace']) {
if ($options['confirm']) {
$urlfinder = new \tool_httpsreplace\url_finder();
$urlfinder->upgrade_http_links();
} else {
echo "Once this is tool run, changes made can't be reverted. \n" .
"A complete backup should be made before running this script. \n\n" .
"There is a low risk that the wrong content will be replaced, introducing problems. \n" .
"If you are sure you want to continue, add --confirm\n\n";
}
} else {
$urlfinder = new \tool_httpsreplace\url_finder();
$results = $urlfinder->http_link_stats();
asort($results);
$fp = fopen('php://stdout', 'w');
fputcsv($fp, ['clientsite', 'httpdomain', 'urlcount']);
foreach ($results as $domain => $count) {
fputcsv($fp, [$SITE->shortname, $domain, $count]);
}
fclose($fp);
}