Current File : /home/vacivi36/ava/admin/tool/brickfield/classes/local/htmlchecker/reporters/report_demo.php
<?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/>.
namespace tool_brickfield\local\htmlchecker\reporters;
use tool_brickfield\local\htmlchecker\brickfield_accessibility;
use tool_brickfield\local\htmlchecker\brickfield_accessibility_reporter;
/**
* Returns the entire document marked-up to highlight problems.
*
* @package tool_brickfield
* @copyright 2020 onward: Brickfield Education Labs, www.brickfield.ie
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
class report_demo extends brickfield_accessibility_reporter {
/**
* @var array An array of the classnames to be associated with items
*/
public $classnames = [
brickfield_accessibility::BA_TEST_SEVERE => 'testlevel_severe',
brickfield_accessibility::BA_TEST_MODERATE => 'testlevel_moderate',
brickfield_accessibility::BA_TEST_SUGGESTION => 'testlevel_suggestion',
];
/**
* The get_report method - we iterate through every test item and
* add additional attributes to build the report UI.
* @return string A fully-formed HTML document.
*/
public function get_report(): string {
$problems = $this->guideline->get_report();
if (is_array($problems)) {
foreach ($problems as $testname => $test) {
if (!isset($this->options->display_level) ||
($this->options->display_level >= $test['severity'] && is_array($test))) {
foreach ($test as $problem) {
if (is_object($problem) && property_exists($problem, 'element') && is_object($problem->element)) {
$existing = $problem->element->getAttribute('style');
$problem->element->setAttribute('style',
$existing .'; border: 2px solid red;');
if (isset($this->options->image_url)) {
$image = $this->dom->createElement('img');
$image = $problem->element->parentNode->insertBefore($image, $problem->element);
$image->setAttribute('alt', $testname);
if ($problem->message) {
$image->setAttribute('title', $problem->message);
}
$image->setAttribute('src', $this->options->image_url[$test['severity']]);
}
}
}
}
}
}
return $this->complete_urls($this->dom->saveHTML(), implode('/', $this->path));
}
/**
* Finds the final postion of a needle in the haystack.
*
* @param mixed $haystack
* @param mixed $needle
* @param mixed $occurance
* @param int $pos
* @return false|int
*/
public function strnpos($haystack, $needle, $occurance, int $pos = 0) {
for ($i = 1; $i <= $occurance; $i++) {
$pos = strpos($haystack, $needle, $pos) + 1;
}
return $pos - 1;
}
/**
* A helper function for completeURLs. Parses a URL into an the scheme, host, and path
* @param string $url The URL to parse
* @return array An array that includes the scheme, host, and path of the URL
*/
public function parse_url(string $url): array {
$pattern = "/^(?:(http[s]?):\/\/(?:(.*):(.*)@)?([^\/]+))?((?:[\/])?(?:[^\.]*?)?(?:[\/])?)?(?:([^\/^\.]+)\." .
"([^\?]+))?(?:\?(.+))?$/i";
preg_match($pattern, $url, $matches);
$uriparts["scheme"] = $matches[1];
$uriparts["host"] = $matches[4];
$uriparts["path"] = $matches[5];
return $uriparts;
}
/**
* Turns all relative links to absolute links so that the page can be rendered correctly.
* @param string $html A complete HTML document
* @param string $url The absolute URL to the document
* @return string A HTML document with all the relative links converted to absolute links
*/
public function complete_urls(string $html, string $url) {
$uriparts = $this->parse_url($url);
$path = trim($uriparts["path"], "/");
$hosturl = trim($uriparts["host"], "/");
$host = $uriparts["scheme"]."://".$hosturl."/".$path."/";
$hostnopath = $uriparts["scheme"]."://".$hosturl."/";
// Proxifies local META redirects.
$html = preg_replace('@<META HTTP-EQUIV(.*)URL=/@',
"<META HTTP-EQUIV\$1URL=".$_SERVER['PHP_SELF']."?url=".$hostnopath, $html);
// Make sure the host doesn't end in '//'.
$host = rtrim($host, '/')."/";
// Replace '//' with 'http://'.
$pattern = "#(?<=\"|'|=)\/\/#"; // The '|=' is experimental as it's probably not necessary.
$html = preg_replace($pattern, "http://", $html);
// Fully qualifies '"/'.
$html = preg_replace("#\"\/#", "\"".$host, $html);
// Fully qualifies "'/".
$html = preg_replace("#\'\/#", "\'".$host, $html);
// Matches [src|href|background|action]="/ because in the following pattern the '/' shouldn't stay.
$html = preg_replace("#(src|href|background|action)(=\"|='|=(?!'|\"))\/#i", "\$1\$2".$hostnopath, $html);
$html = preg_replace("#(href|src|background|action)(=\"|=(?!'|\")|=')(?!http|ftp|https|\"|'|javascript:|mailto:)#i",
"\$1\$2".$host, $html);
// Points all form actions back to the proxy.
$html = preg_replace('/<form.+?action=\s*(["\']?)([^>\s"\']+)\\1[^>]*>/i',
"<form action=\"{$_SERVER['PHP_SELF']}\"><input type=\"hidden\" name=\"original_url\" value=\"$2\">", $html);
// Matches '/[any assortment of chars or nums]/../'.
$html = preg_replace("#\/(\w*?)\/\.\.\/(.*?)>#ims", "/\$2>", $html);
// Matches '/./'.
$html = preg_replace("#\/\.\/(.*?)>#ims", "/\$1>", $html);
// Handles CSS2 imports.
if (strpos($html, "import url(\"http") == false && (strpos($html, "import \"http") == false)
&& strpos($html, "import url(\"www") == false && (strpos($html, "import \"www") == false)) {
$pattern = "#import .(.*?).;#ims";
$mainurl = substr($host, 0, $this->strnpos($host, "/", 3));
$replace = "import '".$mainurl."\$1';";
$html = preg_replace($pattern, $replace, $html);
}
return $html;
}
}
Mini Shell