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.
351 lines
11 KiB
351 lines
11 KiB
2 years ago
|
<?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/>.
|
||
|
|
/**
|
||
|
|
* @package moodlecore
|
||
|
|
* @subpackage backup-imscc
|
||
|
|
* @copyright 2009 Mauro Rondinelli (mauro.rondinelli [AT] uvcms.com)
|
||
|
|
* @copyright 2011 Darko Miletic (dmiletic@moodlerooms.com)
|
||
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||
|
|
*/
|
||
|
|
|
||
|
|
defined('MOODLE_INTERNAL') or die('Direct access to this script is forbidden.');
|
||
|
|
|
||
|
|
class entities {
|
||
|
|
/**
|
||
|
|
* Prepares convert for inclusion into XML
|
||
|
|
*
|
||
|
|
* @param string $value
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
public static function safexml($value) {
|
||
|
|
$result = htmlspecialchars(html_entity_decode($value, ENT_QUOTES, 'UTF-8'),
|
||
|
|
ENT_NOQUOTES,
|
||
|
|
'UTF-8',
|
||
|
|
false);
|
||
|
|
return $result;
|
||
|
|
}
|
||
|
|
|
||
|
|
protected function prepare_content($content) {
|
||
|
|
$result = $content;
|
||
|
|
if (empty($result)) {
|
||
|
|
return '';
|
||
|
|
}
|
||
|
|
$encoding = null;
|
||
|
|
$xml_error = new libxml_errors_mgr();
|
||
|
|
$dom = new DOMDocument();
|
||
|
|
$dom->validateOnParse = false;
|
||
|
|
$dom->strictErrorChecking = false;
|
||
|
|
if ($dom->loadHTML($content)) {
|
||
|
|
$encoding = $dom->xmlEncoding;
|
||
|
|
}
|
||
|
|
if (empty($encoding)) {
|
||
|
|
$encoding = mb_detect_encoding($content, 'auto', true);
|
||
|
|
}
|
||
|
|
if (!empty($encoding) && !mb_check_encoding($content, 'UTF-8')) {
|
||
|
|
$result = mb_convert_encoding($content, 'UTF-8', $encoding);
|
||
|
|
}
|
||
|
|
|
||
|
|
// See if we can strip off body tag and anything outside of it.
|
||
|
|
foreach (array('body', 'html') as $tagname) {
|
||
|
|
$regex = str_replace('##', $tagname, "/<##[^>]*>(.+)<\/##>/is");
|
||
|
|
if (preg_match($regex, $result, $matches)) {
|
||
|
|
$result = $matches[1];
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return $result;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function load_xml_resource($path_to_file) {
|
||
|
|
|
||
|
|
$resource = new DOMDocument();
|
||
|
|
|
||
|
|
cc2moodle::log_action('Load the XML resource file: '.$path_to_file);
|
||
|
|
|
||
|
|
if (!$resource->load($path_to_file)) {
|
||
|
|
cc2moodle::log_action('Cannot load the XML resource file: ' . $path_to_file, true);
|
||
|
|
}
|
||
|
|
|
||
|
|
return $resource;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function update_sources($html, $root_path = '') {
|
||
|
|
|
||
|
|
$document = $this->load_html($html);
|
||
|
|
|
||
|
|
$tags = array('img' => 'src' , 'a' => 'href');
|
||
|
|
|
||
|
|
foreach ($tags as $tag => $attribute) {
|
||
|
|
|
||
|
|
$elements = $document->getElementsByTagName($tag);
|
||
|
|
|
||
|
|
foreach ($elements as $element) {
|
||
|
|
|
||
|
|
$attribute_value = $element->getAttribute($attribute);
|
||
|
|
$protocol = parse_url($attribute_value, PHP_URL_SCHEME);
|
||
|
|
|
||
|
|
if (empty($protocol)) {
|
||
|
|
$attribute_value = str_replace("\$IMS-CC-FILEBASE\$", "", $attribute_value);
|
||
|
|
$attribute_value = $this->full_path($root_path . "/" . $attribute_value, "/");
|
||
|
|
$attribute_value = "\$@FILEPHP@\$" . "/" . $attribute_value;
|
||
|
|
}
|
||
|
|
|
||
|
|
$element->setAttribute($attribute, $attribute_value);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
$html = $this->html_insidebody($document);
|
||
|
|
|
||
|
|
return $html;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function full_path($path, $dir_sep = DIRECTORY_SEPARATOR) {
|
||
|
|
|
||
|
|
$token = '$IMS-CC-FILEBASE$';
|
||
|
|
$path = str_replace($token, '', $path);
|
||
|
|
|
||
|
|
if (is_string($path) && ($path != '')) {
|
||
|
|
$dot_dir = '.';
|
||
|
|
$up_dir = '..';
|
||
|
|
$length = strlen($path);
|
||
|
|
$rtemp = trim($path);
|
||
|
|
$start = strrpos($path, $dir_sep);
|
||
|
|
$can_continue = ($start !== false);
|
||
|
|
$result = $can_continue ? '' : $path;
|
||
|
|
$rcount = 0;
|
||
|
|
|
||
|
|
while ($can_continue) {
|
||
|
|
|
||
|
|
$dir_part = ($start !== false) ? substr($rtemp, $start + 1, $length - $start) : $rtemp;
|
||
|
|
$can_continue = ($dir_part !== false);
|
||
|
|
|
||
|
|
if ($can_continue) {
|
||
|
|
if ($dir_part != $dot_dir) {
|
||
|
|
if ($dir_part == $up_dir) {
|
||
|
|
$rcount++;
|
||
|
|
} else {
|
||
|
|
if ($rcount > 0) {
|
||
|
|
$rcount --;
|
||
|
|
} else {
|
||
|
|
$result = ($result == '') ? $dir_part : $dir_part . $dir_sep . $result;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
$rtemp = substr($path, 0, $start);
|
||
|
|
$start = strrpos($rtemp, $dir_sep);
|
||
|
|
$can_continue = (($start !== false) || (strlen($rtemp) > 0));
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return $result;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function include_titles ($html) {
|
||
|
|
|
||
|
|
$document = $this->load_html($html);
|
||
|
|
|
||
|
|
$images = $document->getElementsByTagName('img');
|
||
|
|
|
||
|
|
foreach ($images as $image) {
|
||
|
|
|
||
|
|
$src = $image->getAttribute('src');
|
||
|
|
$alt = $image->getAttribute('alt');
|
||
|
|
$title = $image->getAttribute('title');
|
||
|
|
|
||
|
|
$filename = pathinfo($src);
|
||
|
|
$filename = $filename['filename'];
|
||
|
|
|
||
|
|
$alt = empty($alt) ? $filename : $alt;
|
||
|
|
$title = empty($title) ? $filename : $title;
|
||
|
|
|
||
|
|
$image->setAttribute('alt', $alt);
|
||
|
|
$image->setAttribute('title', $title);
|
||
|
|
}
|
||
|
|
|
||
|
|
$html = $this->html_insidebody($document);
|
||
|
|
|
||
|
|
return $html;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function get_external_xml ($identifier) {
|
||
|
|
|
||
|
|
$xpath = cc2moodle::newx_path(cc2moodle::$manifest, cc2moodle::$namespaces);
|
||
|
|
|
||
|
|
$files = $xpath->query('/imscc:manifest/imscc:resources/imscc:resource[@identifier="'.
|
||
|
|
$identifier.'"]/imscc:file/@href');
|
||
|
|
|
||
|
|
if (empty($files)) {
|
||
|
|
$response = '';
|
||
|
|
} else {
|
||
|
|
$response = $files->item(0)->nodeValue;
|
||
|
|
}
|
||
|
|
|
||
|
|
return $response;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function move_files($files, $destination_folder) {
|
||
|
|
global $CFG, $OUTPUT;
|
||
|
|
|
||
|
|
if (!empty($files)) {
|
||
|
|
|
||
|
|
foreach ($files as $file) {
|
||
|
|
$source = cc2moodle::$path_to_manifest_folder . DIRECTORY_SEPARATOR . $file;
|
||
|
|
$destination = $destination_folder . DIRECTORY_SEPARATOR . $file;
|
||
|
|
|
||
|
|
$destination_directory = dirname($destination);
|
||
|
|
|
||
|
|
cc2moodle::log_action('Copy the file: ' . $source . ' to ' . $destination);
|
||
|
|
|
||
|
|
if (!file_exists($destination_directory)) {
|
||
|
|
mkdir($destination_directory, $CFG->directorypermissions, true);
|
||
|
|
}
|
||
|
|
|
||
|
|
$copy_success = true;
|
||
|
|
if (is_file($source)) {
|
||
|
|
$copy_success = @copy($source, $destination);
|
||
|
|
}
|
||
|
|
|
||
|
|
if (!$copy_success) {
|
||
|
|
echo $OUTPUT->notification('WARNING: Cannot copy the file ' . $source . ' to ' . $destination);
|
||
|
|
cc2moodle::log_action('Cannot copy the file ' . $source . ' to ' . $destination, false);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
protected function get_all_files () {
|
||
|
|
global $CFG;
|
||
|
|
|
||
|
|
$all_files = array();
|
||
|
|
|
||
|
|
$xpath = cc2moodle::newx_path(cc2moodle::$manifest, cc2moodle::$namespaces);
|
||
|
|
|
||
|
|
foreach (cc2moodle::$restypes as $type) {
|
||
|
|
|
||
|
|
$files = $xpath->query('/imscc:manifest/imscc:resources/imscc:resource[@type="' . $type . '"]/imscc:file/@href');
|
||
|
|
|
||
|
|
if (!empty($files) && ($files->length > 0)) {
|
||
|
|
foreach ($files as $file) {
|
||
|
|
// Omit html files.
|
||
|
|
$ext = strtolower(pathinfo($file->nodeValue, PATHINFO_EXTENSION));
|
||
|
|
if (in_array($ext, array('html', 'htm', 'xhtml'))) {
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
$all_files[] = $file->nodeValue;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
unset($files);
|
||
|
|
}
|
||
|
|
|
||
|
|
// Are there any labels?
|
||
|
|
$xquery = "//imscc:item/imscc:item/imscc:item[imscc:title][not(@identifierref)]";
|
||
|
|
$labels = $xpath->query($xquery);
|
||
|
|
if (!empty($labels) && ($labels->length > 0)) {
|
||
|
|
$tname = 'course_files';
|
||
|
|
$dpath = cc2moodle::$path_to_manifest_folder . DIRECTORY_SEPARATOR . $tname;
|
||
|
|
$rfpath = 'files.gif';
|
||
|
|
$fpath = $dpath . DIRECTORY_SEPARATOR . $rfpath;
|
||
|
|
|
||
|
|
if (!file_exists($dpath)) {
|
||
|
|
mkdir($dpath, $CFG->directorypermissions, true);
|
||
|
|
}
|
||
|
|
// Copy the folder.gif file.
|
||
|
|
$folder_gif = "{$CFG->dirroot}/pix/i/files.gif";
|
||
|
|
copy($folder_gif, $fpath);
|
||
|
|
$all_files[] = $rfpath;
|
||
|
|
}
|
||
|
|
|
||
|
|
$all_files = empty($all_files) ? '' : $all_files;
|
||
|
|
|
||
|
|
return $all_files;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function move_all_files() {
|
||
|
|
|
||
|
|
$files = $this->get_all_files();
|
||
|
|
|
||
|
|
if (!empty($files)) {
|
||
|
|
$this->move_files($files, cc2moodle::$path_to_manifest_folder . DIRECTORY_SEPARATOR . 'course_files', true);
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @param string $html
|
||
|
|
* @return DOMDocument
|
||
|
|
*/
|
||
|
|
private function load_html($html) {
|
||
|
|
// Need to make sure that the html passed has charset meta tag.
|
||
|
|
$metatag = '<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />';
|
||
|
|
if (strpos($html, $metatag) === false) {
|
||
|
|
$html = '<html><head>'.$metatag.'</head><body>'.$html.'</body></html>';
|
||
|
|
}
|
||
|
|
|
||
|
|
$document = new DOMDocument();
|
||
|
|
@$document->loadHTML($html);
|
||
|
|
|
||
|
|
return $document;
|
||
|
|
}
|
||
|
|
|
||
|
|
/**
|
||
|
|
* @param DOMDocument $domdocument
|
||
|
|
* @return string
|
||
|
|
*/
|
||
|
|
private function html_insidebody($domdocument) {
|
||
|
|
$html = '';
|
||
|
|
$bodyitems = $domdocument->getElementsByTagName('body');
|
||
|
|
if ($bodyitems->length > 0) {
|
||
|
|
$body = $bodyitems->item(0);
|
||
|
|
$html = str_ireplace(array('<body>', '</body>'), '', $body->C14N());
|
||
|
|
}
|
||
|
|
|
||
|
|
return $html;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function generate_random_string ($length = 6) {
|
||
|
|
|
||
|
|
$response = '';
|
||
|
|
$source = 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ';
|
||
|
|
|
||
|
|
if ($length > 0) {
|
||
|
|
|
||
|
|
$response = '';
|
||
|
|
$source = str_split($source, 1);
|
||
|
|
|
||
|
|
for ($i = 1; $i <= $length; $i++) {
|
||
|
|
$num = mt_rand(1, count($source));
|
||
|
|
$response .= $source[$num - 1];
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return $response;
|
||
|
|
}
|
||
|
|
|
||
|
|
public function truncate_text($text, $max, $remove_html) {
|
||
|
|
|
||
|
|
if ($max > 10) {
|
||
|
|
$text = substr($text, 0, ($max - 6)) . ' [...]';
|
||
|
|
} else {
|
||
|
|
$text = substr($text, 0, $max);
|
||
|
|
}
|
||
|
|
|
||
|
|
$text = $remove_html ? strip_tags($text) : $text;
|
||
|
|
|
||
|
|
return $text;
|
||
|
|
}
|
||
|
|
}
|