gtk.php

一个用PHP编写的

<?php
/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */

/**
 * PHP Version 4
 *
 * Copyright (c) 2002-2005, Sebastian Bergmann <[e-mail]>.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 *   * Redistributions of source code must retain the above copyright
 *     notice, this list of conditions and the following disclaimer.
 * 
 *   * Redistributions in binary form must reproduce the above copyright
 *     notice, this list of conditions and the following disclaimer in
 *     the documentation and/or other materials provided with the
 *     distribution.
 *
 *   * Neither the name of Sebastian Bergmann nor the names of his
 *     contributors may be used to endorse or promote products derived
 *     from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
 * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRIC
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 *
 * @category   Testing
 * @package    PHPUnit
 * @author     Scott Mattocks <[e-mail]>
 * @copyright  2002-2005 Sebastian Bergmann <[e-mail]>
 * @license    http://www.opensource.org/licenses/bsd-license.php  BSD License
 * @version    CVS: $Id: Gtk.php,v 1.6 2005/11/10 09:47:15 sebastian Exp $
 * @link       http://pear.php.net/package/PHPUnit
 * @since      File available since Release 1.2.0
 */

if (!function_exists('is_a')) {
    require_once 'PHP/Compat/Function/is_a.php';
}

/**
 * GTK GUI interface for PHPUnit.
 *
 * This class is a PHP port of junit.awtui.testrunner. Documentation
 * for junit.awtui.testrunner can be found at
 * http://junit.sourceforge.net
 *
 * Due to the limitations of PHP4 and PHP-Gtk, this class can not
 * duplicate all of the functionality of the JUnit GUI. Some of the
 * things this class cannot do include:
 * - Reloading the class for each run
 * - Stopping the test in progress
 *
 * To use simply intantiate the class and call main()
 * $gtk =& new PHPUnit_GUI_Gtk;
 * $gtk->main();
 *
 * Once the window has finished loading, you can enter the name of
 * a class that has been loaded (include/require some where in your
 * code, or you can pass the name of the file containing the class.
 *
 * You can also load classes using the SetupDecorator class.
 * require_once 'PHPUnit/GUI/SetupDecorator.php';
 * require_once 'PHPUnit/GUI/Gtk.php';
 * $gui = new PHPUnit_GUI_SetupDecorator(new PHPUnit_GUI_Gtk());
 * $gui->getSuitesFromDir('/path/to/test','.*\.php$',array('index.php','sql.php'));
 * $gui->show();
 *
 *
 * @category   Testing
 * @package    PHPUnit
 * @author     Scott Mattocks <[e-mail]>
 * @copyright  2002-2005 Sebastian Bergmann <[e-mail]>
 * @license    http://www.opensource.org/licenses/bsd-license.php  BSD License
 * @version    Release: @package_version@
 * @link       http://pear.php.net/package/PHPUnit
 * @since      Class available since Release 1.2.0
 * @todo       Allow file drop. (Gtk_FileDrop)
 */
class PHPUnit_GUI_Gtk {

    /**
     * The main gtk window
     * @var object
     */
    var $gui;
    /**
     * The text entry that contains the name of the
     * file that holds the test(s)/suite(s).
     * @var object
     */
    var $suiteField;
    /**
     * The label that shows the number of tests that
     * were run.
     * @var object
     */
    var $numberOfRuns;
    /**
     * The label that shows the number of errors that
     * were encountered.
     * @var object
     */
    var $numberOfErrors;
    /**
     * The label that shows the number of failures
     * that were encountered.
     * @var object
     */
    var $numberOfFailures;
    /**
     * The label for reporting user messages.
     * @var object
     */
    var $statusLine;
    /**
     * The text area for reporting messages from successful
     * test runs. (not necessarily successful tests)
     * @var object
     */
    var $reportArea;
    /**
     * The text area for reporting errors encountered when
     * running tests.
     * @var object
     */
    var $dumpArea;
    /**
     * The progress bar indicator. Shows the percentage of
     * passed tests.
     * @var object
     */
    var $progress;
    /**
     * A checkbox for the user to indicate whether or not they
     * would like to see results from all tests or just failures.
     * @object
     */
    var $showPassed;

    /**
     * Constructor.
     *
     * The constructor checks for the gtk extension and loads it
     * if needed. Then it creates the GUI. The GUI is not shown
     * nor is the main gtk loop started until main() is called.
     *
     * @access public
     * @param  none
     * @return void
     */
    function PHPUnit_GUI_Gtk()
    {
        // Check for php-gtk extension.
        if (!extension_loaded('gtk')) {
            dl( 'php_gtk.' . PHP_SHLIB_SUFFIX);
        }

        // Create the interface but don't start the loop
        $this->_createUI();
    }
    /**
     * Start the main gtk loop.
     *
     * main() first sets the default state of the showPassed
     * check box. Next all widgets that are part of the GUI
     * are shown. Finally the main gtk loop is started.
     *
     * @access public
     * @param  boolean $showPassed
     * @return void
     */
    function main($showPassed = true)
    {
        $this->showPassed->set_active($showPassed);
        $this->gui->show_all();

        gtk::main();
    }
    /**
     * Create the user interface.
     *
     * The user interface is pretty simple. It consists of a
     * menu, text entry, run button, some labels, a progress
     * indicator, and a couple of areas for notification of
     * any messages.
     *
     * @access private
     * @param  none
     * @return void
     */
    function _createUI()
    {
        // Create a window.
        $window =& new GtkWindow;
        $window->set_title('PHPUnit Gtk');
        $window->set_usize(400, -1);

        // Create the main box.
        $mainBox =& new GtkVBox;
        $window->add($mainBox);

        // Start with the menu.
        $mainBox->pack_start($this->_createMenu());

        // Then add the suite field entry.
        $mainBox->pack_start($this->_createSuiteEntry());

        // Then add the report labels.
        $mainBox->pack_start($this->_createReportLabels());

        // Next add the progress bar.
        $mainBox->pack_start($this->_createProgressBar());

        // Then add the report area and the dump area.
        $mainBox->pack_start($this->_createReportAreas());

        // Finish off with the status line.
        $mainBox->pack_start($this->_createStatusLine());

        // Connect the destroy signal.
        $window->connect_object('destroy', array('gtk', 'main_quit'));

        // Assign the member.
        $this->gui =& $window;
    }
    /**
     * Create the menu.
     *
     * The menu is very simple. It an exit menu item, which exits
     * the application, and an about menu item, which shows some
     * basic information about the application itself.
     *
     * @access private
     * @param  none
     * @return &object The GtkMenuBar
     */
    function &_createMenu()
    {
        // Create the menu bar.
        $menuBar =& new GtkMenuBar;

        // Create the main (only) menu item.
        $phpHeader =& new GtkMenuItem('PHPUnit');

        // Add the menu item to the menu bar.
        $menuBar->append($phpHeader);

        // Create the PHPUnit menu.
        $phpMenu =& new GtkMenu;

        // Add the menu items
        $about =& new GtkMenuItem('About...');
        $about->connect('activate', array(&$this, 'about'));
        $phpMenu->append($about);

        $exit =& new GtkMenuItem('Exit');
        $exit->connect_object('activate', array('gtk', 'main_quit'));
        $phpMenu->append($exit);

        // Complete the menu.
        $phpHeader->set_submenu($phpMenu);

        return $menuBar;
    }
    /**
     * Create the suite entry and related widgets.
     *
     * The suite entry has some supporting components such as a
     * label, the show passed check box and the run button. All
     * of these items are packed into two nested boxes.
     *
     * @access private
     * @param  none
     * @return &object A box that contains all of the suite entry pieces.
     */
    function &_createSuiteEntry()
    {
        // Create the outermost box.
        $outerBox         =& new GtkVBox;

        // Create the suite label, box, and field.
        $suiteLabel       =& new GtkLabel('Test class name:');
        $suiteBox         =& new GtkHBox;
        $this->suiteField =& new GtkEntry;
        $this->suiteField->set_text($suiteName != NULL ? $suiteName : '');

        // Create the button the user will use to start the test.
        $runButton =& new GtkButton('Run');
        $runButton->connect_object('clicked', array(&$this, 'run'));

        // Create the check box that lets the user show only failures.
        $this->showPassed =& new GtkCheckButton('Show passed tests');

        // Add the components to their respective boxes.
        $suiteLabel->set_alignment(0, 0);
        $outerBox->pack_start($suiteLabel);
        $outerBox->pack_start($suiteBox);
        $outerBox->pack_start($this->showPassed);

        $suiteBox->pack_start($this->suiteField);
        $suiteBox->pack_start($runButton);

        return $outerBox;
    }

    /**
     * Create the labels that tell the user what has happened.
     *
     * There are three labels, one each for total runs, errors and
     * failures. There is also one label for each of these that
     * describes what the label is. It could be done with one label
     * instead of two but that would make updates much harder.
     *
     * @access private
     * @param  none
     * @return &object A box containing the labels.
     */
    function &_createReportLabels()
    {
        // Create a box to hold everything.
        $labelBox         =& new GtkHBox;

        // Create the non-updated labels.
        $numberOfRuns     =& new GtkLabel('Runs:');
        $numberOfErrors   =& new GtkLabel('Errors:');
        $numberOfFailures =& new GtkLabel('Failures:');

        // Create the labels that will be updated.
        // These are asssigned to members to make it easier to
        // set their values later.
        $this->numberOfRuns     =& new GtkLabel(0);
        $this->numberOfErrors   =& new GtkLabel(0);
        $this->numberOfFailures =& new GtkLabel(0);

        // Pack everything in.
        $labelBox->pack_start($numberOfRuns);
        $labelBox->pack_start($this->numberOfRuns);
        $labelBox->pack_start($numberOfErrors);
        $labelBox->pack_start($this->numberOfErrors);
        $labelBox->pack_start($numberOfFailures);
        $labelBox->pack_start($this->numberOfFailures);

        return $labelBox;
    }

    /**
     * Create the success/failure indicator.
     *
     * A GtkProgressBar is used to visually indicate how many
     * tests were successful compared to how many were not. The
     * progress bar shows the percentage of success and will
     * change from green to red if there are any failures.
     *
     * @access private
     * @param  none
     * @return &object The progress bar
     */
    function &_createProgressBar()