Difference between revisions of "Selenium.class.php"

From Organic Design wiki
(New page: <?php /** * Selenium extension * * ...)
 
m
 
(10 intermediate revisions by the same user not shown)
Line 1: Line 1:
<?php
+
{{legacy}}
 +
<source lang="php"><?php
 
/**
 
/**
 
  * Selenium extension
 
  * Selenium extension
Line 15: Line 16:
  
 
class Selenium {
 
class Selenium {
+
 
 +
var $testCount = array(); # keep track of number of tests in each suite processed
 +
 
 
function __construct() {
 
function __construct() {
global $wgParser;
+
global $wgParser, $egSeleniumTag;
 +
 
 +
# Add the tag hook
 +
$wgParser->setHook($egSeleniumTag, array($this, 'tagSelenium'));
 +
 
 +
# Check the schedule and see if any test-runs should be spawned
 +
$this->checkSchedule();
 +
}
 +
 
 +
/**
 +
* Process a selenium tag with test syntax in it
 +
* - this tag also handles the categorisation of the article into Category:Selenium
 +
*/
 +
public function tagSelenium($text, &$argv, &$parser) {
 +
global $wgOut, $egSeleniumSuiteCat, $egSeleniumTestCat;
  
# Add the tag hooks
+
# The suite being processed is the article title text, keep track of number of tests in it
$wgParser->setHook('body',  array($this, 'tagBody'));
+
$suite = $parser->mTitle->getPrefixedText();
$wgParser->setHook('head',  array($this, 'tagHead'));
+
$this->testCount[$suite] = array_key_exists($suite, $this->testCount) ? $this->testCount[$suite]+1 : 1;
$wgParser->setHook('html', array($this, 'tagParseContent'));
 
$wgParser->setHook('thead', array($this, 'tagParseContent'));
 
$wgParser->setHook('tbody', array($this, 'tagParseContent'));
 
 
 
# todo: check the schedule and see if any test-runs should be spawned
+
# Get name of test from title tag
 +
$name = preg_match("|<title>(.+?)</title>|i", $text, $match) ? $match[1] : 'untitled';
  
 +
# Get rid of unwanted tags
 +
$text = preg_replace("#\\s*<head>.+</head>\\s*#is", "", $text);
 +
$text = preg_replace("#\\s*</?t?(html|head|body)>\\s*#i", "", $text);
 +
 +
# Categorise the article into Selenium tests category if more than one test in this suite
 +
# - todo: and also remove from the cat for individual tests
 +
if ($this->testCount[$suite] > 1) $text .= "[[Category:$egSeleniumSuiteCat]]";
 +
 +
# Parse the content normally and return wrapped in a div of class selenium and id of test name
 +
$out = $parser->parse($text, $parser->mTitle, $parser->mOptions, false, false);
 +
$text = $out->getText();
 +
return "<div class=\"selenium\" id=\"$name\">$text</div><!-- selenium-end -->";
 
}
 
}
  
 
/**
 
/**
* Body tags surround the main test table and should be converted to a div of class "selenium"
+
* Extract the individual tests from the suite indexed by name in selenese HTML format
* - this tag also handles the categorisation of the article into Category:Selenium
+
* - also add the selenese HTML for the whole suite under index of suite name
 
*/
 
*/
public function tagBody($text, &$argv, &$parser) {
+
public static function selenese($suite, $path = false) {
global $egSeleniumCategory;
+
global $wgParser;
$text .= "[[Category:$egSeleniumCategory]]";
+
 
$text = $parser->parse($text, $parser->mTitle, $parser->mOptions, false, false)->getText();
+
# Get the content of the suite article and parse it
return "<div class=\"selenium\">$text</div>";
+
# NOTE: parsing the content results in the head, body, thead, tbody etc being removed,
 +
#      but it seems that the TestRunner doesn't care and can work with the basic table structure
 +
$suiteTitle = Title::newFromText($suite);
 +
$suiteArticle = new Article($suiteTitle);
 +
$text = $wgParser->parse($suiteArticle->getContent(), $suiteTitle, new ParserOptions(), true, true)->getText();
 +
 
 +
# extract the name and content of the individual tests in the suite
 +
$numTests = preg_match_all(
 +
"|<div class=\"selenium\" id=\"(.+?)\">\\s*(.+?)\\s*</div><!-- selenium-end -->|is",
 +
$text,
 +
$matches,
 +
PREG_PATTERN_ORDER
 +
);
 +
 
 +
# Re-organise the matched test content into a hash indexed by test name
 +
$tests = array();
 +
for ($i = 0; $i < $numTests; $i++) $tests[$matches[1][$i]] = $matches[2][$i];
 +
 +
# Create the HTML for the entire suite under index of suite name
 +
$html = "<html><head><meta content=\"text/html; charset=ISO-8859-1\" http-equiv=\"content-type\">
 +
<title>Selenium</title></head><body><table cellpadding=\"1\" cellspacing=\"1\" border=\"1\">
 +
<tbody><tr><td><b>$suite</b></td></tr>\n";
 +
$title = Title::makeTitle(NS_SPECIAL, 'Selenium');
 +
foreach (array_keys($tests) as $test) {
 +
$url = $path ? "$path/wiki-".urlencode($test).".html" : $title->getLocalURL("suite=$suite&test=$test");
 +
$html .= "<tr><td><a href=\"$url\">$test</a></td></tr>\n";
 +
}
 +
$tests[$suite] = "$html</tbody></table></body></html>";
 +
 +
return $tests;
 
}
 
}
  
 
/**
 
/**
* The head tag of a selenium test doesn't need to be rendered, so simply returns an empty string
+
* Check whether any tests should run
 
*/
 
*/
public function tagHead(&$text, &$argv, &$parser) {
+
public function checkSchedule() {
return '';
+
global $egSeleniumSchdeule;
 +
if (isset($_REQUEST['action']) && $_REQUEST['action'] == 'runtests') $this->runTests();
 +
$ts = date('H:i');
 +
if (in_array($ts, $egSeleniumSchdeule)) {
 +
$ts = date('d M Y').", $ts";
 +
 
 +
# Get the last log entry
 +
 
 +
# If tests for this time and day haven't run yet, run them now
 +
if ("Last log entry time stamp not equal to current") $this->runTests();
 +
}
 
}
 
}
  
 
/**
 
/**
* The html, thead and tbody tags need to parse and return their content
+
* Run all the tests in the schedule in Selenium Remote Control (SRC)
 
*/
 
*/
public function tagParseContent(&$text, &$argv, &$parser) {
+
public function runTests() {
return $parser->parse($text, $parser->mTitle, $parser->mOptions, false, false)->getText();
+
global $IP, $egSeleniumSchedule, $egSeleniumPath, $egSeleniumDir;
 +
 +
# Update the log with tests start message
 +
 +
# Define paths for the java server, the HTML test files and the results file
 +
$jar  = "$egSeleniumDir/selenium-server/selenium-server.jar";
 +
$tests = "$egSeleniumDir/selenium-core/tests";
 +
$out  = "$egSeleniumDir/selenium-core/tests/results.txt";
 +
 
 +
# We need to flip the operation to work by domain on the outer loop
 +
# - because it needs to build a set of selenese suite/test files for each site
 +
#  since the parser-functions used in the tests must be resolved my the wiki being tested
 +
 
 +
foreach ($egSeleniumSchedule as $suite => $domains) if (!is_numeric($suite)) {
 +
$es = urlencode($suite);
 +
 
 +
# Copy the suite and its tests as selenese HTML into the place SRC expects to find them
 +
foreach (Selenium::selenese($suite, "/selenium-server/tests") as $k => $v) {
 +
$ek = urlencode($k);
 +
file_put_contents("$tests/wiki-$ek.html", $v);
 +
}
 +
 
 +
# Run the suite for each domain
 +
foreach ($domains as $domain) {
 +
shell_exec("java -jar $jar -htmlSuite \"*custom /usr/bin/firefox\" \"$domain\" \"$tests/wiki-$es.html\" \"$out\"");
 +
$results = file_get_contents($out);
 +
}
 +
}
 +
 +
# Update the log with test results
 
}
 
}
  
Line 62: Line 157:
 
}
 
}
 
}
 
}
 +
</source>

Latest revision as of 14:56, 27 February 2020

Legacy.svg Legacy: This article describes a concept that has been superseded in the course of ongoing development on the Organic Design wiki. Please do not develop this any further or base work on this concept, this is only useful for a historic record of work done. You may find a link to the currently used concept or function in this article, if not you can contact the author to find out what has taken the place of this legacy item.
<?php
/**
 * Selenium extension
 *
 * See http://www.mediawiki.org/Extension:Selenium for installation and usage details
 * See http://www.organicdesign.co.nz/Extension_talk:Selenium.php for development notes and disucssion
 * 
 * @package MediaWiki
 * @subpackage Extensions
 * @author Marcus Davy [http://www.organicdesign.co.nz/User:Sven User:Sven]
 * @copyright © 2007 Marcus Davy
 * @licence GNU General Public Licence 2.0 or later
 */
if (!defined('MEDIAWIKI')) die('Not an entry point.');

class Selenium {

	var $testCount = array(); # keep track of number of tests in each suite processed

	function __construct() {
		global $wgParser, $egSeleniumTag;

		# Add the tag hook
		$wgParser->setHook($egSeleniumTag, array($this, 'tagSelenium'));

		# Check the schedule and see if any test-runs should be spawned
		$this->checkSchedule();
	}

	/**
	 * Process a selenium tag with test syntax in it
	 * - this tag also handles the categorisation of the article into Category:Selenium
	 */
	public function tagSelenium($text, &$argv, &$parser) {
		global $wgOut, $egSeleniumSuiteCat, $egSeleniumTestCat;

		# The suite being processed is the article title text, keep track of number of tests in it
		$suite = $parser->mTitle->getPrefixedText();
		$this->testCount[$suite] = array_key_exists($suite, $this->testCount) ? $this->testCount[$suite]+1 : 1;
		
		# Get name of test from title tag
		$name = preg_match("|<title>(.+?)</title>|i", $text, $match) ? $match[1] : 'untitled';

		# Get rid of unwanted tags
		$text = preg_replace("#\\s*<head>.+</head>\\s*#is", "", $text);
		$text = preg_replace("#\\s*</?t?(html|head|body)>\\s*#i", "", $text);

		# Categorise the article into Selenium tests category if more than one test in this suite
		# - todo: and also remove from the cat for individual tests
		if ($this->testCount[$suite] > 1) $text .= "[[Category:$egSeleniumSuiteCat]]";

		# Parse the content normally and return wrapped in a div of class selenium and id of test name
		$out = $parser->parse($text, $parser->mTitle, $parser->mOptions, false, false);
		$text = $out->getText();
		return "<div class=\"selenium\" id=\"$name\">$text</div><!-- selenium-end -->";
	}

	/**
	 * Extract the individual tests from the suite indexed by name in selenese HTML format
	 * - also add the selenese HTML for the whole suite under index of suite name
	 */
	public static function selenese($suite, $path = false) {
		global $wgParser;

		# Get the content of the suite article and parse it
		# NOTE: parsing the content results in the head, body, thead, tbody etc being removed,
		#       but it seems that the TestRunner doesn't care and can work with the basic table structure
		$suiteTitle = Title::newFromText($suite);
		$suiteArticle = new Article($suiteTitle);
		$text = $wgParser->parse($suiteArticle->getContent(), $suiteTitle, new ParserOptions(), true, true)->getText();

		# extract the name and content of the individual tests in the suite
		$numTests = preg_match_all(
			"|<div class=\"selenium\" id=\"(.+?)\">\\s*(.+?)\\s*</div><!-- selenium-end -->|is",
			$text,
			$matches,
			PREG_PATTERN_ORDER
		);

		# Re-organise the matched test content into a hash indexed by test name
		$tests = array();
		for ($i = 0; $i < $numTests; $i++) $tests[$matches[1][$i]] = $matches[2][$i];
		
		# Create the HTML for the entire suite under index of suite name
		$html = "<html><head><meta content=\"text/html; charset=ISO-8859-1\" http-equiv=\"content-type\">
			<title>Selenium</title></head><body><table cellpadding=\"1\" cellspacing=\"1\" border=\"1\">
			<tbody><tr><td><b>$suite</b></td></tr>\n";
		$title = Title::makeTitle(NS_SPECIAL, 'Selenium');
		foreach (array_keys($tests) as $test) {
			$url = $path ? "$path/wiki-".urlencode($test).".html" : $title->getLocalURL("suite=$suite&test=$test");
			$html .= "<tr><td><a href=\"$url\">$test</a></td></tr>\n";
		}
		$tests[$suite] = "$html</tbody></table></body></html>";
		
		return $tests;
	}

	/**
	 * Check whether any tests should run
	 */
	public function checkSchedule() {
		global $egSeleniumSchdeule;
		if (isset($_REQUEST['action']) && $_REQUEST['action'] == 'runtests') $this->runTests();
		$ts = date('H:i');
		if (in_array($ts, $egSeleniumSchdeule)) {
			$ts = date('d M Y').", $ts";

			# Get the last log entry

			# If tests for this time and day haven't run yet, run them now
			if ("Last log entry time stamp not equal to current") $this->runTests();
		}
	}

	/**
	 * Run all the tests in the schedule in Selenium Remote Control (SRC)
	 */
	public function runTests() {
		global $IP, $egSeleniumSchedule, $egSeleniumPath, $egSeleniumDir;
		
		# Update the log with tests start message
		
		# Define paths for the java server, the HTML test files and the results file
		$jar   = "$egSeleniumDir/selenium-server/selenium-server.jar";
		$tests = "$egSeleniumDir/selenium-core/tests";
		$out   = "$egSeleniumDir/selenium-core/tests/results.txt";

		# We need to flip the operation to work by domain on the outer loop
		# - because it needs to build a set of selenese suite/test files for each site
		#   since the parser-functions used in the tests must be resolved my the wiki being tested

		foreach ($egSeleniumSchedule as $suite => $domains) if (!is_numeric($suite)) {
			$es = urlencode($suite);

			# Copy the suite and its tests as selenese HTML into the place SRC expects to find them
			foreach (Selenium::selenese($suite, "/selenium-server/tests") as $k => $v) {
				$ek = urlencode($k);
				file_put_contents("$tests/wiki-$ek.html", $v);
			}

			# Run the suite for each domain
			foreach ($domains as $domain) {
				shell_exec("java -jar $jar -htmlSuite \"*custom /usr/bin/firefox\" \"$domain\" \"$tests/wiki-$es.html\" \"$out\"");
				$results = file_get_contents($out);
			}
		}
		
		# Update the log with test results
	}

	/**
	 * Needed in some versions to prevent Special:Version from breaking
	 */
	private function __toString() {
		return __CLASS__;
	}
}