forked from Cavemanon/cavepaintings
store enabled exts in a config file, rather than moving directories around
This commit is contained in:
Shish
647
lib/simpletest/xml.php
Executable file
647
lib/simpletest/xml.php
Executable file
@ -0,0 +1,647 @@
|
||||
<?php
|
||||
/**
|
||||
* base include file for SimpleTest
|
||||
* @package SimpleTest
|
||||
* @subpackage UnitTester
|
||||
* @version $Id: xml.php 1787 2008-04-26 20:35:39Z pp11 $
|
||||
*/
|
||||
|
||||
/**#@+
|
||||
* include other SimpleTest class files
|
||||
*/
|
||||
require_once(dirname(__FILE__) . '/scorer.php');
|
||||
/**#@-*/
|
||||
|
||||
/**
|
||||
* Creates the XML needed for remote communication
|
||||
* by SimpleTest.
|
||||
* @package SimpleTest
|
||||
* @subpackage UnitTester
|
||||
*/
|
||||
class XmlReporter extends SimpleReporter {
|
||||
private $indent;
|
||||
private $namespace;
|
||||
|
||||
/**
|
||||
* Sets up indentation and namespace.
|
||||
* @param string $namespace Namespace to add to each tag.
|
||||
* @param string $indent Indenting to add on each nesting.
|
||||
* @access public
|
||||
*/
|
||||
function __construct($namespace = false, $indent = ' ') {
|
||||
parent::__construct();
|
||||
$this->namespace = ($namespace ? $namespace . ':' : '');
|
||||
$this->indent = $indent;
|
||||
}
|
||||
|
||||
/**
|
||||
* Calculates the pretty printing indent level
|
||||
* from the current level of nesting.
|
||||
* @param integer $offset Extra indenting level.
|
||||
* @return string Leading space.
|
||||
* @access protected
|
||||
*/
|
||||
protected function getIndent($offset = 0) {
|
||||
return str_repeat(
|
||||
$this->indent,
|
||||
count($this->getTestList()) + $offset);
|
||||
}
|
||||
|
||||
/**
|
||||
* Converts character string to parsed XML
|
||||
* entities string.
|
||||
* @param string text Unparsed character data.
|
||||
* @return string Parsed character data.
|
||||
* @access public
|
||||
*/
|
||||
function toParsedXml($text) {
|
||||
return str_replace(
|
||||
array('&', '<', '>', '"', '\''),
|
||||
array('&', '<', '>', '"', '''),
|
||||
$text);
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints the start of a group test.
|
||||
* @param string $test_name Name of test that is starting.
|
||||
* @param integer $size Number of test cases starting.
|
||||
* @access public
|
||||
*/
|
||||
function paintGroupStart($test_name, $size) {
|
||||
parent::paintGroupStart($test_name, $size);
|
||||
print $this->getIndent();
|
||||
print "<" . $this->namespace . "group size=\"$size\">\n";
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "name>" .
|
||||
$this->toParsedXml($test_name) .
|
||||
"</" . $this->namespace . "name>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints the end of a group test.
|
||||
* @param string $test_name Name of test that is ending.
|
||||
* @access public
|
||||
*/
|
||||
function paintGroupEnd($test_name) {
|
||||
print $this->getIndent();
|
||||
print "</" . $this->namespace . "group>\n";
|
||||
parent::paintGroupEnd($test_name);
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints the start of a test case.
|
||||
* @param string $test_name Name of test that is starting.
|
||||
* @access public
|
||||
*/
|
||||
function paintCaseStart($test_name) {
|
||||
parent::paintCaseStart($test_name);
|
||||
print $this->getIndent();
|
||||
print "<" . $this->namespace . "case>\n";
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "name>" .
|
||||
$this->toParsedXml($test_name) .
|
||||
"</" . $this->namespace . "name>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints the end of a test case.
|
||||
* @param string $test_name Name of test that is ending.
|
||||
* @access public
|
||||
*/
|
||||
function paintCaseEnd($test_name) {
|
||||
print $this->getIndent();
|
||||
print "</" . $this->namespace . "case>\n";
|
||||
parent::paintCaseEnd($test_name);
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints the start of a test method.
|
||||
* @param string $test_name Name of test that is starting.
|
||||
* @access public
|
||||
*/
|
||||
function paintMethodStart($test_name) {
|
||||
parent::paintMethodStart($test_name);
|
||||
print $this->getIndent();
|
||||
print "<" . $this->namespace . "test>\n";
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "name>" .
|
||||
$this->toParsedXml($test_name) .
|
||||
"</" . $this->namespace . "name>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints the end of a test method.
|
||||
* @param string $test_name Name of test that is ending.
|
||||
* @param integer $progress Number of test cases ending.
|
||||
* @access public
|
||||
*/
|
||||
function paintMethodEnd($test_name) {
|
||||
print $this->getIndent();
|
||||
print "</" . $this->namespace . "test>\n";
|
||||
parent::paintMethodEnd($test_name);
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints pass as XML.
|
||||
* @param string $message Message to encode.
|
||||
* @access public
|
||||
*/
|
||||
function paintPass($message) {
|
||||
parent::paintPass($message);
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "pass>";
|
||||
print $this->toParsedXml($message);
|
||||
print "</" . $this->namespace . "pass>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints failure as XML.
|
||||
* @param string $message Message to encode.
|
||||
* @access public
|
||||
*/
|
||||
function paintFail($message) {
|
||||
parent::paintFail($message);
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "fail>";
|
||||
print $this->toParsedXml($message);
|
||||
print "</" . $this->namespace . "fail>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints error as XML.
|
||||
* @param string $message Message to encode.
|
||||
* @access public
|
||||
*/
|
||||
function paintError($message) {
|
||||
parent::paintError($message);
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "exception>";
|
||||
print $this->toParsedXml($message);
|
||||
print "</" . $this->namespace . "exception>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints exception as XML.
|
||||
* @param Exception $exception Exception to encode.
|
||||
* @access public
|
||||
*/
|
||||
function paintException($exception) {
|
||||
parent::paintException($exception);
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "exception>";
|
||||
$message = 'Unexpected exception of type [' . get_class($exception) .
|
||||
'] with message ['. $exception->getMessage() .
|
||||
'] in ['. $exception->getFile() .
|
||||
' line ' . $exception->getLine() . ']';
|
||||
print $this->toParsedXml($message);
|
||||
print "</" . $this->namespace . "exception>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints the skipping message and tag.
|
||||
* @param string $message Text to display in skip tag.
|
||||
* @access public
|
||||
*/
|
||||
function paintSkip($message) {
|
||||
parent::paintSkip($message);
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "skip>";
|
||||
print $this->toParsedXml($message);
|
||||
print "</" . $this->namespace . "skip>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints a simple supplementary message.
|
||||
* @param string $message Text to display.
|
||||
* @access public
|
||||
*/
|
||||
function paintMessage($message) {
|
||||
parent::paintMessage($message);
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "message>";
|
||||
print $this->toParsedXml($message);
|
||||
print "</" . $this->namespace . "message>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints a formatted ASCII message such as a
|
||||
* privateiable dump.
|
||||
* @param string $message Text to display.
|
||||
* @access public
|
||||
*/
|
||||
function paintFormattedMessage($message) {
|
||||
parent::paintFormattedMessage($message);
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "formatted>";
|
||||
print "<![CDATA[$message]]>";
|
||||
print "</" . $this->namespace . "formatted>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Serialises the event object.
|
||||
* @param string $type Event type as text.
|
||||
* @param mixed $payload Message or object.
|
||||
* @access public
|
||||
*/
|
||||
function paintSignal($type, $payload) {
|
||||
parent::paintSignal($type, $payload);
|
||||
print $this->getIndent(1);
|
||||
print "<" . $this->namespace . "signal type=\"$type\">";
|
||||
print "<![CDATA[" . serialize($payload) . "]]>";
|
||||
print "</" . $this->namespace . "signal>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints the test document header.
|
||||
* @param string $test_name First test top level
|
||||
* to start.
|
||||
* @access public
|
||||
* @abstract
|
||||
*/
|
||||
function paintHeader($test_name) {
|
||||
if (! SimpleReporter::inCli()) {
|
||||
header('Content-type: text/xml');
|
||||
}
|
||||
print "<?xml version=\"1.0\"";
|
||||
if ($this->namespace) {
|
||||
print " xmlns:" . $this->namespace .
|
||||
"=\"www.lastcraft.com/SimpleTest/Beta3/Report\"";
|
||||
}
|
||||
print "?>\n";
|
||||
print "<" . $this->namespace . "run>\n";
|
||||
}
|
||||
|
||||
/**
|
||||
* Paints the test document footer.
|
||||
* @param string $test_name The top level test.
|
||||
* @access public
|
||||
* @abstract
|
||||
*/
|
||||
function paintFooter($test_name) {
|
||||
print "</" . $this->namespace . "run>\n";
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Accumulator for incoming tag. Holds the
|
||||
* incoming test structure information for
|
||||
* later dispatch to the reporter.
|
||||
* @package SimpleTest
|
||||
* @subpackage UnitTester
|
||||
*/
|
||||
class NestingXmlTag {
|
||||
private $name;
|
||||
private $attributes;
|
||||
|
||||
/**
|
||||
* Sets the basic test information except
|
||||
* the name.
|
||||
* @param hash $attributes Name value pairs.
|
||||
* @access public
|
||||
*/
|
||||
function NestingXmlTag($attributes) {
|
||||
$this->name = false;
|
||||
$this->attributes = $attributes;
|
||||
}
|
||||
|
||||
/**
|
||||
* Sets the test case/method name.
|
||||
* @param string $name Name of test.
|
||||
* @access public
|
||||
*/
|
||||
function setName($name) {
|
||||
$this->name = $name;
|
||||
}
|
||||
|
||||
/**
|
||||
* Accessor for name.
|
||||
* @return string Name of test.
|
||||
* @access public
|
||||
*/
|
||||
function getName() {
|
||||
return $this->name;
|
||||
}
|
||||
|
||||
/**
|
||||
* Accessor for attributes.
|
||||
* @return hash All attributes.
|
||||
* @access protected
|
||||
*/
|
||||
protected function getAttributes() {
|
||||
return $this->attributes;
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Accumulator for incoming method tag. Holds the
|
||||
* incoming test structure information for
|
||||
* later dispatch to the reporter.
|
||||
* @package SimpleTest
|
||||
* @subpackage UnitTester
|
||||
*/
|
||||
class NestingMethodTag extends NestingXmlTag {
|
||||
|
||||
/**
|
||||
* Sets the basic test information except
|
||||
* the name.
|
||||
* @param hash $attributes Name value pairs.
|
||||
* @access public
|
||||
*/
|
||||
function NestingMethodTag($attributes) {
|
||||
$this->NestingXmlTag($attributes);
|
||||
}
|
||||
|
||||
/**
|
||||
* Signals the appropriate start event on the
|
||||
* listener.
|
||||
* @param SimpleReporter $listener Target for events.
|
||||
* @access public
|
||||
*/
|
||||
function paintStart(&$listener) {
|
||||
$listener->paintMethodStart($this->getName());
|
||||
}
|
||||
|
||||
/**
|
||||
* Signals the appropriate end event on the
|
||||
* listener.
|
||||
* @param SimpleReporter $listener Target for events.
|
||||
* @access public
|
||||
*/
|
||||
function paintEnd(&$listener) {
|
||||
$listener->paintMethodEnd($this->getName());
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Accumulator for incoming case tag. Holds the
|
||||
* incoming test structure information for
|
||||
* later dispatch to the reporter.
|
||||
* @package SimpleTest
|
||||
* @subpackage UnitTester
|
||||
*/
|
||||
class NestingCaseTag extends NestingXmlTag {
|
||||
|
||||
/**
|
||||
* Sets the basic test information except
|
||||
* the name.
|
||||
* @param hash $attributes Name value pairs.
|
||||
* @access public
|
||||
*/
|
||||
function NestingCaseTag($attributes) {
|
||||
$this->NestingXmlTag($attributes);
|
||||
}
|
||||
|
||||
/**
|
||||
* Signals the appropriate start event on the
|
||||
* listener.
|
||||
* @param SimpleReporter $listener Target for events.
|
||||
* @access public
|
||||
*/
|
||||
function paintStart(&$listener) {
|
||||
$listener->paintCaseStart($this->getName());
|
||||
}
|
||||
|
||||
/**
|
||||
* Signals the appropriate end event on the
|
||||
* listener.
|
||||
* @param SimpleReporter $listener Target for events.
|
||||
* @access public
|
||||
*/
|
||||
function paintEnd(&$listener) {
|
||||
$listener->paintCaseEnd($this->getName());
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Accumulator for incoming group tag. Holds the
|
||||
* incoming test structure information for
|
||||
* later dispatch to the reporter.
|
||||
* @package SimpleTest
|
||||
* @subpackage UnitTester
|
||||
*/
|
||||
class NestingGroupTag extends NestingXmlTag {
|
||||
|
||||
/**
|
||||
* Sets the basic test information except
|
||||
* the name.
|
||||
* @param hash $attributes Name value pairs.
|
||||
* @access public
|
||||
*/
|
||||
function NestingGroupTag($attributes) {
|
||||
$this->NestingXmlTag($attributes);
|
||||
}
|
||||
|
||||
/**
|
||||
* Signals the appropriate start event on the
|
||||
* listener.
|
||||
* @param SimpleReporter $listener Target for events.
|
||||
* @access public
|
||||
*/
|
||||
function paintStart(&$listener) {
|
||||
$listener->paintGroupStart($this->getName(), $this->getSize());
|
||||
}
|
||||
|
||||
/**
|
||||
* Signals the appropriate end event on the
|
||||
* listener.
|
||||
* @param SimpleReporter $listener Target for events.
|
||||
* @access public
|
||||
*/
|
||||
function paintEnd(&$listener) {
|
||||
$listener->paintGroupEnd($this->getName());
|
||||
}
|
||||
|
||||
/**
|
||||
* The size in the attributes.
|
||||
* @return integer Value of size attribute or zero.
|
||||
* @access public
|
||||
*/
|
||||
function getSize() {
|
||||
$attributes = $this->getAttributes();
|
||||
if (isset($attributes['SIZE'])) {
|
||||
return (integer)$attributes['SIZE'];
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Parser for importing the output of the XmlReporter.
|
||||
* Dispatches that output to another reporter.
|
||||
* @package SimpleTest
|
||||
* @subpackage UnitTester
|
||||
*/
|
||||
class SimpleTestXmlParser {
|
||||
private $listener;
|
||||
private $expat;
|
||||
private $tag_stack;
|
||||
private $in_content_tag;
|
||||
private $content;
|
||||
private $attributes;
|
||||
|
||||
/**
|
||||
* Loads a listener with the SimpleReporter
|
||||
* interface.
|
||||
* @param SimpleReporter $listener Listener of tag events.
|
||||
* @access public
|
||||
*/
|
||||
function SimpleTestXmlParser(&$listener) {
|
||||
$this->listener = &$listener;
|
||||
$this->expat = &$this->createParser();
|
||||
$this->tag_stack = array();
|
||||
$this->in_content_tag = false;
|
||||
$this->content = '';
|
||||
$this->attributes = array();
|
||||
}
|
||||
|
||||
/**
|
||||
* Parses a block of XML sending the results to
|
||||
* the listener.
|
||||
* @param string $chunk Block of text to read.
|
||||
* @return boolean True if valid XML.
|
||||
* @access public
|
||||
*/
|
||||
function parse($chunk) {
|
||||
if (! xml_parse($this->expat, $chunk)) {
|
||||
trigger_error('XML parse error with ' .
|
||||
xml_error_string(xml_get_error_code($this->expat)));
|
||||
return false;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
/**
|
||||
* Sets up expat as the XML parser.
|
||||
* @return resource Expat handle.
|
||||
* @access protected
|
||||
*/
|
||||
protected function &createParser() {
|
||||
$expat = xml_parser_create();
|
||||
xml_set_object($expat, $this);
|
||||
xml_set_element_handler($expat, 'startElement', 'endElement');
|
||||
xml_set_character_data_handler($expat, 'addContent');
|
||||
xml_set_default_handler($expat, 'defaultContent');
|
||||
return $expat;
|
||||
}
|
||||
|
||||
/**
|
||||
* Opens a new test nesting level.
|
||||
* @return NestedXmlTag The group, case or method tag
|
||||
* to start.
|
||||
* @access private
|
||||
*/
|
||||
protected function pushNestingTag($nested) {
|
||||
array_unshift($this->tag_stack, $nested);
|
||||
}
|
||||
|
||||
/**
|
||||
* Accessor for current test structure tag.
|
||||
* @return NestedXmlTag The group, case or method tag
|
||||
* being parsed.
|
||||
* @access private
|
||||
*/
|
||||
protected function &getCurrentNestingTag() {
|
||||
return $this->tag_stack[0];
|
||||
}
|
||||
|
||||
/**
|
||||
* Ends a nesting tag.
|
||||
* @return NestedXmlTag The group, case or method tag
|
||||
* just finished.
|
||||
* @access private
|
||||
*/
|
||||
protected function popNestingTag() {
|
||||
return array_shift($this->tag_stack);
|
||||
}
|
||||
|
||||
/**
|
||||
* Test if tag is a leaf node with only text content.
|
||||
* @param string $tag XML tag name.
|
||||
* @return @boolean True if leaf, false if nesting.
|
||||
* @private
|
||||
*/
|
||||
protected function isLeaf($tag) {
|
||||
return in_array($tag, array(
|
||||
'NAME', 'PASS', 'FAIL', 'EXCEPTION', 'SKIP', 'MESSAGE', 'FORMATTED', 'SIGNAL'));
|
||||
}
|
||||
|
||||
/**
|
||||
* Handler for start of event element.
|
||||
* @param resource $expat Parser handle.
|
||||
* @param string $tag Element name.
|
||||
* @param hash $attributes Name value pairs.
|
||||
* Attributes without content
|
||||
* are marked as true.
|
||||
* @access protected
|
||||
*/
|
||||
protected function startElement($expat, $tag, $attributes) {
|
||||
$this->attributes = $attributes;
|
||||
if ($tag == 'GROUP') {
|
||||
$this->pushNestingTag(new NestingGroupTag($attributes));
|
||||
} elseif ($tag == 'CASE') {
|
||||
$this->pushNestingTag(new NestingCaseTag($attributes));
|
||||
} elseif ($tag == 'TEST') {
|
||||
$this->pushNestingTag(new NestingMethodTag($attributes));
|
||||
} elseif ($this->isLeaf($tag)) {
|
||||
$this->in_content_tag = true;
|
||||
$this->content = '';
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* End of element event.
|
||||
* @param resource $expat Parser handle.
|
||||
* @param string $tag Element name.
|
||||
* @access protected
|
||||
*/
|
||||
protected function endElement($expat, $tag) {
|
||||
$this->in_content_tag = false;
|
||||
if (in_array($tag, array('GROUP', 'CASE', 'TEST'))) {
|
||||
$nesting_tag = $this->popNestingTag();
|
||||
$nesting_tag->paintEnd($this->listener);
|
||||
} elseif ($tag == 'NAME') {
|
||||
$nesting_tag = &$this->getCurrentNestingTag();
|
||||
$nesting_tag->setName($this->content);
|
||||
$nesting_tag->paintStart($this->listener);
|
||||
} elseif ($tag == 'PASS') {
|
||||
$this->listener->paintPass($this->content);
|
||||
} elseif ($tag == 'FAIL') {
|
||||
$this->listener->paintFail($this->content);
|
||||
} elseif ($tag == 'EXCEPTION') {
|
||||
$this->listener->paintError($this->content);
|
||||
} elseif ($tag == 'SKIP') {
|
||||
$this->listener->paintSkip($this->content);
|
||||
} elseif ($tag == 'SIGNAL') {
|
||||
$this->listener->paintSignal(
|
||||
$this->attributes['TYPE'],
|
||||
unserialize($this->content));
|
||||
} elseif ($tag == 'MESSAGE') {
|
||||
$this->listener->paintMessage($this->content);
|
||||
} elseif ($tag == 'FORMATTED') {
|
||||
$this->listener->paintFormattedMessage($this->content);
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Content between start and end elements.
|
||||
* @param resource $expat Parser handle.
|
||||
* @param string $text Usually output messages.
|
||||
* @access protected
|
||||
*/
|
||||
protected function addContent($expat, $text) {
|
||||
if ($this->in_content_tag) {
|
||||
$this->content .= $text;
|
||||
}
|
||||
return true;
|
||||
}
|
||||
|
||||
/**
|
||||
* XML and Doctype handler. Discards all such content.
|
||||
* @param resource $expat Parser handle.
|
||||
* @param string $default Text of default content.
|
||||
* @access protected
|
||||
*/
|
||||
protected function defaultContent($expat, $default) {
|
||||
}
|
||||
}
|
||||
?>
|
||||
Reference in New Issue
Block a user