<?php
    /**
     *	base include file for SimpleTest
     *	@package	SimpleTest
     *	@subpackage	UnitTester
     *	@version	$Id$
     */

    /**#@+
     *	include other SimpleTest class files
     */
    require_once(dirname(__FILE__) . '/scorer.php');
    /**#@-*/

    /**
     *    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(" -&gt; ", $breadcrumb);
            print " -&gt; " . $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(" -&gt; ", $breadcrumb);
            print " -&gt; <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(" -&gt; ", $breadcrumb);
            $message = 'Unexpected exception of type [' . get_class($exception) .
                    '] with message ['. $exception->getMessage() .
                    '] in ['. $exception->getFile() .
                    ' line ' . $exception->getLine() . ']';
            print " -&gt; <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(" -&gt; ", $breadcrumb);
            print " -&gt; " . $this->_htmlEntities($message) . "<br />\n";
		}

        /**
         *    Paints formatted text such as dumped variables.
         *    @param string $message        Text to show.
         *    @access public
         */
        function paintFormattedMessage($message) {
            print '<pre>' . $this->_htmlEntities($message) . '</pre>';
        }

        /**
         *    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 "\tin " . implode("\n\tin ", 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";
        }

        /**
         *    Paints a PHP error or exception.
         *    @param Exception $exception      Exception to describe.
         *    @access public
         *    @abstract
         */
        function paintException($exception) {
            parent::paintException($exception);
            $message = 'Unexpected exception of type [' . get_class($exception) .
                    '] with message ['. $exception->getMessage() .
                    '] in ['. $exception->getFile() .
                    ' line ' . $exception->getLine() . ']';
            print "Exception " . $this->getExceptionCount() . "!\n$message\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();
        }
    }

    /**
     *    Runs just a single test group, a single case or
     *    even a single test within that case.
	 *	  @package SimpleTest
	 *	  @subpackage UnitTester
     */
    class SelectiveReporter extends SimpleReporterDecorator {
        var $_just_this_case =false;
        var $_just_this_test = false;
        var $_within_test_case = true;

        /**
         *    Selects the test case or group to be run,
         *    and optionally a specific test.
         *    @param SimpleScorer $reporter    Reporter to receive events.
         *    @param string $just_this_case    Only this case or group will run.
         *    @param string $just_this_test    Only this test method will run.
         */
        function SelectiveReporter(&$reporter, $just_this_case = false, $just_this_test = false) {
            if (isset($just_this_case) && $just_this_case) {
                $this->_just_this_case = strtolower($just_this_case);
                $this->_within_test_case = false;
            }
            if (isset($just_this_test) && $just_this_test) {
                $this->_just_this_test = strtolower($just_this_test);
            }
            $this->SimpleReporterDecorator($reporter);
        }

        /**
         *    Compares criteria to actual the case/group name.
         *    @param string $test_case    The incoming test.
         *    @return boolean             True if matched.
         *    @access protected
         */
        function _isCaseMatch($test_case) {
            if ($this->_just_this_case) {
                return $this->_just_this_case == strtolower($test_case);
            }
            return false;
        }

        /**
         *    Compares criteria to actual the test name.
         *    @param string $method       The incoming test method.
         *    @return boolean             True if matched.
         *    @access protected
         */
        function _isTestMatch($method) {
            if ($this->_just_this_test) {
                return $this->_just_this_test == strtolower($method);
            }
            return true;
        }

        /**
         *    Veto everything that doesn't match the method wanted.
         *    @param string $test_case       Name of test case.
         *    @param string $method          Name of test method.
         *    @return boolean                True if test should be run.
         *    @access public
         */
        function shouldInvoke($test_case, $method) {
            if ($this->_within_test_case && $this->_isTestMatch($method)) {
                return $this->_reporter->shouldInvoke($test_case, $method);
            }
            return false;
        }

        /**
         *    Paints the start of a group test.
         *    @param string $test_case     Name of test or other label.
         *    @param integer $size         Number of test cases starting.
         *    @access public
         */
        function paintGroupStart($test_case, $size) {
            if ($this->_isCaseMatch($test_case)) {
                $this->_within_test_case = true;
            }
            if ($this->_within_test_case) {
                $this->_reporter->paintGroupStart($test_case, $size);
            }
        }

        /**
         *    Paints the end of a group test.
         *    @param string $test_case     Name of test or other label.
         *    @access public
         */
        function paintGroupEnd($test_case) {
            if ($this->_within_test_case) {
                $this->_reporter->paintGroupEnd($test_case);
            }
            if ($this->_isCaseMatch($test_case)) {
                $this->_within_test_case = false;
            }
        }

        /**
         *    Paints the start of a test case.
         *    @param string $test_case     Name of test or other label.
         *    @access public
         */
        function paintCaseStart($test_case) {
            if ($this->_isCaseMatch($test_case)) {
                $this->_within_test_case = true;
            }
            if ($this->_within_test_case) {
                $this->_reporter->paintCaseStart($test_case);
            }
        }

        /**
         *    Paints the end of a test case.
         *    @param string $test_case     Name of test or other label.
         *    @access public
         */
        function paintCaseEnd($test_case) {
            if ($this->_within_test_case) {
                $this->_reporter->paintCaseEnd($test_case);
            }
            if ($this->_isCaseMatch($test_case)) {
                $this->_within_test_case = false;
            }
        }
    }
?>