- Added a test framework to Drupal along with a first batch of tests for
Drupal core! This is an important milestone for the project so enable
the module and check it out ... :)
Thanks to Rok Žlender, Károly Négyesi, Jimmy Berry, Kevin Bridges, Charlie
Gordon, Douglas Hubler, Miglius Alaburda, Andy Kirkham, Dimitri13, Kieran
Lal, Moshe Weitzman, and the many other people that helped with testing
over the past years and that drove this home.
It all works but it is still rough around the edges (i.e. documentation
is still being written, the coding style is not 100% yet, a number of
tests still fail) but we spent the entire weekend working on it in Paris
and made a ton of progress. The best way to help and to get up to speed,
is to start writing and contributing some tests ... as well as fixing
some of the failures.
For those willing to help with improving the test framework, here are
some next steps and issues to resolve:
- How to best approach unit tests and mock functions?
- How to test drupal_mail() and drupal_http_request()?
- How to improve the admin UI so we have a nice progress bar?
- How best to do code coverage?
- See http://g.d.o/node/10099 for more ...
2008-04-20 18:34:43 +00:00
< ? php
// $Id$
/**
* Sample minimal test displayer . Generates only
* failure messages and a pass count .
* @ package SimpleTest
* @ subpackage UnitTester
*/
class HtmlReporter extends SimpleReporter {
var $_character_set ;
/**
* Does nothing yet . The first output will
* be sent on the first test start . For use
* by a web browser .
* @ access public
*/
function HtmlReporter ( $character_set = 'ISO-8859-1' ) {
$this -> SimpleReporter ();
$this -> _character_set = $character_set ;
}
/**
* Paints the top of the web page setting the
* title to the name of the starting test .
* @ param string $test_name Name class of test .
* @ access public
*/
function paintHeader ( $test_name ) {
$this -> sendNoCacheHeaders ();
print " <!DOCTYPE HTML PUBLIC \" -//W3C//DTD HTML 4.01 Transitional//EN \" \" http://www.w3.org/TR/html4/loose.dtd \" > " ;
print " <html> \n <head> \n <title> $test_name </title> \n " ;
print " <meta http-equiv= \" Content-Type \" content= \" text/html; charset= " . $this -> _character_set . " \" > \n " ;
print " <style type= \" text/css \" > \n " ;
print $this -> _getCss () . " \n " ;
print " </style> \n " ;
print " </head> \n <body> \n " ;
print " <h1> $test_name </h1> \n " ;
flush ();
}
/**
* Send the headers necessary to ensure the page is
* reloaded on every request . Otherwise you could be
* scratching your head over out of date test data .
* @ access public
* @ static
*/
function sendNoCacheHeaders () {
if ( ! headers_sent ()) {
header ( " Expires: Mon, 26 Jul 1997 05:00:00 GMT " );
header ( " Last-Modified: " . gmdate ( " D, d M Y H:i:s " ) . " GMT " );
header ( " Cache-Control: no-store, no-cache, must-revalidate " );
header ( " Cache-Control: post-check=0, pre-check=0 " , false );
header ( " Pragma: no-cache " );
}
}
/**
* Paints the CSS . Add additional styles here .
* @ return string CSS code as text .
* @ access protected
*/
function _getCss () {
return " .fail { background-color: inherit; color: red; } " . " .pass { background-color: inherit; color: green; } " . " pre { background-color: lightgray; color: inherit; } " ;
}
/**
* Paints the end of the test with a summary of
* the passes and failures .
* @ param string $test_name Name class of test .
* @ access public
*/
function paintFooter ( $test_name ) {
$colour = ( $this -> getFailCount () + $this -> getExceptionCount () > 0 ? " red " : " green " );
print " <div style= \" " ;
print " padding: 8px; margin-top: 1em; background-color: $colour ; color: white; " ;
print " \" > " ;
print $this -> getTestCaseProgress () . " / " . $this -> getTestCaseCount ();
print " test cases complete: \n " ;
print " <strong> " . $this -> getPassCount () . " </strong> passes, " ;
print " <strong> " . $this -> getFailCount () . " </strong> fails and " ;
print " <strong> " . $this -> getExceptionCount () . " </strong> exceptions. " ;
print " </div> \n " ;
print " </body> \n </html> \n " ;
}
/**
* Paints the test failure with a breadcrumbs
* trail of the nesting test suites below the
* top level test .
* @ param string $message Failure message displayed in
* the context of the other tests .
* @ access public
*/
function paintFail ( $message ) {
parent :: paintFail ( $message );
print " <span class= \" fail \" >Fail</span>: " ;
$breadcrumb = $this -> getTestList ();
array_shift ( $breadcrumb );
print implode ( " -> " , $breadcrumb );
print " -> " . $this -> _htmlEntities ( $message ) . " <br /> \n " ;
}
/**
* Paints a PHP error .
* @ param string $message Message is ignored .
* @ access public
*/
function paintError ( $message ) {
parent :: paintError ( $message );
print " <span class= \" fail \" >Exception</span>: " ;
$breadcrumb = $this -> getTestList ();
array_shift ( $breadcrumb );
print implode ( " -> " , $breadcrumb );
print " -> <strong> " . $this -> _htmlEntities ( $message ) . " </strong><br /> \n " ;
}
/**
* Paints a PHP exception .
* @ param Exception $exception Exception to display .
* @ access public
*/
function paintException ( $exception ) {
parent :: paintException ( $exception );
print " <span class= \" fail \" >Exception</span>: " ;
$breadcrumb = $this -> getTestList ();
array_shift ( $breadcrumb );
print implode ( " -> " , $breadcrumb );
2008-05-10 06:55:09 +00:00
$message = 'Unexpected exception of type [' . get_class ( $exception ) . '] with message [' . $exception -> getMessage () . '] in [' . $exception -> getFile () . ' line ' . $exception -> getLine () . ']' ;
- Added a test framework to Drupal along with a first batch of tests for
Drupal core! This is an important milestone for the project so enable
the module and check it out ... :)
Thanks to Rok Žlender, Károly Négyesi, Jimmy Berry, Kevin Bridges, Charlie
Gordon, Douglas Hubler, Miglius Alaburda, Andy Kirkham, Dimitri13, Kieran
Lal, Moshe Weitzman, and the many other people that helped with testing
over the past years and that drove this home.
It all works but it is still rough around the edges (i.e. documentation
is still being written, the coding style is not 100% yet, a number of
tests still fail) but we spent the entire weekend working on it in Paris
and made a ton of progress. The best way to help and to get up to speed,
is to start writing and contributing some tests ... as well as fixing
some of the failures.
For those willing to help with improving the test framework, here are
some next steps and issues to resolve:
- How to best approach unit tests and mock functions?
- How to test drupal_mail() and drupal_http_request()?
- How to improve the admin UI so we have a nice progress bar?
- How best to do code coverage?
- See http://g.d.o/node/10099 for more ...
2008-04-20 18:34:43 +00:00
print " -> <strong> " . $this -> _htmlEntities ( $message ) . " </strong><br /> \n " ;
}
/**
* Prints the message for skipping tests .
* @ param string $message Text of skip condition .
* @ access public
*/
function paintSkip ( $message ) {
parent :: paintSkip ( $message );
print " <span class= \" pass \" >Skipped</span>: " ;
$breadcrumb = $this -> getTestList ();
array_shift ( $breadcrumb );
print implode ( " -> " , $breadcrumb );
print " -> " . $this -> _htmlEntities ( $message ) . " <br /> \n " ;
}
/**
* Paints formatted text such as dumped variables .
* @ param string $message Text to show .
* @ access public
*/
function paintFormattedMessage ( $message ) {
2008-05-10 06:55:09 +00:00
print '<pre>' . $this -> _htmlEntities ( $message ) . '</pre>' ;
- Added a test framework to Drupal along with a first batch of tests for
Drupal core! This is an important milestone for the project so enable
the module and check it out ... :)
Thanks to Rok Žlender, Károly Négyesi, Jimmy Berry, Kevin Bridges, Charlie
Gordon, Douglas Hubler, Miglius Alaburda, Andy Kirkham, Dimitri13, Kieran
Lal, Moshe Weitzman, and the many other people that helped with testing
over the past years and that drove this home.
It all works but it is still rough around the edges (i.e. documentation
is still being written, the coding style is not 100% yet, a number of
tests still fail) but we spent the entire weekend working on it in Paris
and made a ton of progress. The best way to help and to get up to speed,
is to start writing and contributing some tests ... as well as fixing
some of the failures.
For those willing to help with improving the test framework, here are
some next steps and issues to resolve:
- How to best approach unit tests and mock functions?
- How to test drupal_mail() and drupal_http_request()?
- How to improve the admin UI so we have a nice progress bar?
- How best to do code coverage?
- See http://g.d.o/node/10099 for more ...
2008-04-20 18:34:43 +00:00
}
/**
* Character set adjusted entity conversion .
* @ param string $message Plain text or Unicode message .
* @ return string Browser readable message .
* @ access protected
*/
function _htmlEntities ( $message ) {
return htmlentities ( $message , ENT_COMPAT , $this -> _character_set );
}
}
/**
* Sample minimal test displayer . Generates only
* failure messages and a pass count . For command
* line use . I ' ve tried to make it look like JUnit ,
* but I wanted to output the errors as they arrived
* which meant dropping the dots .
* @ package SimpleTest
* @ subpackage UnitTester
*/
class TextReporter extends SimpleReporter {
/**
* Does nothing yet . The first output will
* be sent on the first test start .
* @ access public
*/
function TextReporter () {
$this -> SimpleReporter ();
}
/**
* Paints the title only .
* @ param string $test_name Name class of test .
* @ access public
*/
function paintHeader ( $test_name ) {
if ( ! SimpleReporter :: inCli ()) {
header ( 'Content-type: text/plain' );
}
print " $test_name\n " ;
flush ();
}
/**
* Paints the end of the test with a summary of
* the passes and failures .
* @ param string $test_name Name class of test .
* @ access public
*/
function paintFooter ( $test_name ) {
if ( $this -> getFailCount () + $this -> getExceptionCount () == 0 ) {
print " OK \n " ;
}
else {
print " FAILURES!!! \n " ;
}
print " Test cases run: " . $this -> getTestCaseProgress () . " / " . $this -> getTestCaseCount () . " , Passes: " . $this -> getPassCount () . " , Failures: " . $this -> getFailCount () . " , Exceptions: " . $this -> getExceptionCount () . " \n " ;
}
/**
* Paints the test failure as a stack trace .
* @ param string $message Failure message displayed in
* the context of the other tests .
* @ access public
*/
function paintFail ( $message ) {
parent :: paintFail ( $message );
print $this -> getFailCount () . " ) $message\n " ;
$breadcrumb = $this -> getTestList ();
array_shift ( $breadcrumb );
print " \t in " . implode ( " \n \t in " , array_reverse ( $breadcrumb ));
print " \n " ;
}
/**
* Paints a PHP error or exception .
* @ param string $message Message to be shown .
* @ access public
* @ abstract
*/
function paintError ( $message ) {
parent :: paintError ( $message );
print " Exception " . $this -> getExceptionCount () . " ! \n $message\n " ;
$breadcrumb = $this -> getTestList ();
array_shift ( $breadcrumb );
print " \t in " . implode ( " \n \t in " , array_reverse ( $breadcrumb ));
print " \n " ;
}
/**
* Paints a PHP error or exception .
* @ param Exception $exception Exception to describe .
* @ access public
* @ abstract
*/
function paintException ( $exception ) {
parent :: paintException ( $exception );
2008-05-10 06:55:09 +00:00
$message = 'Unexpected exception of type [' . get_class ( $exception ) . '] with message [' . $exception -> getMessage () . '] in [' . $exception -> getFile () . ' line ' . $exception -> getLine () . ']' ;
- Added a test framework to Drupal along with a first batch of tests for
Drupal core! This is an important milestone for the project so enable
the module and check it out ... :)
Thanks to Rok Žlender, Károly Négyesi, Jimmy Berry, Kevin Bridges, Charlie
Gordon, Douglas Hubler, Miglius Alaburda, Andy Kirkham, Dimitri13, Kieran
Lal, Moshe Weitzman, and the many other people that helped with testing
over the past years and that drove this home.
It all works but it is still rough around the edges (i.e. documentation
is still being written, the coding style is not 100% yet, a number of
tests still fail) but we spent the entire weekend working on it in Paris
and made a ton of progress. The best way to help and to get up to speed,
is to start writing and contributing some tests ... as well as fixing
some of the failures.
For those willing to help with improving the test framework, here are
some next steps and issues to resolve:
- How to best approach unit tests and mock functions?
- How to test drupal_mail() and drupal_http_request()?
- How to improve the admin UI so we have a nice progress bar?
- How best to do code coverage?
- See http://g.d.o/node/10099 for more ...
2008-04-20 18:34:43 +00:00
print " Exception " . $this -> getExceptionCount () . " ! \n $message\n " ;
$breadcrumb = $this -> getTestList ();
array_shift ( $breadcrumb );
print " \t in " . implode ( " \n \t in " , array_reverse ( $breadcrumb ));
print " \n " ;
}
/**
* Prints the message for skipping tests .
* @ param string $message Text of skip condition .
* @ access public
*/
function paintSkip ( $message ) {
parent :: paintSkip ( $message );
print " Skip: $message\n " ;
}
/**
* Paints formatted text such as dumped variables .
* @ param string $message Text to show .
* @ access public
*/
function paintFormattedMessage ( $message ) {
print " $message\n " ;
flush ();
}
}
