home *** CD-ROM | disk | FTP | other *** search
/ Cricao de Sites - 650 Layouts Prontos / WebMasters.iso / Servidores / xampp-win32-1.6.7-installer.exe / php / PEAR / PHPUnit2 / Util / Fileloader.php < prev    next >
Encoding:
PHP Script  |  2008-07-02  |  3.7 KB  |  110 lines
  1. <?php
  2. /* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
  3.  
  4. /**
  5.  * PHP Version 5
  6.  *
  7.  * Copyright (c) 2002-2006, Sebastian Bergmann <sb@sebastian-bergmann.de>.
  8.  * All rights reserved.
  9.  *
  10.  * Redistribution and use in source and binary forms, with or without
  11.  * modification, are permitted provided that the following conditions
  12.  * are met:
  13.  *
  14.  *   * Redistributions of source code must retain the above copyright
  15.  *     notice, this list of conditions and the following disclaimer.
  16.  * 
  17.  *   * Redistributions in binary form must reproduce the above copyright
  18.  *     notice, this list of conditions and the following disclaimer in
  19.  *     the documentation and/or other materials provided with the
  20.  *     distribution.
  21.  *
  22.  *   * Neither the name of Sebastian Bergmann nor the names of his
  23.  *     contributors may be used to endorse or promote products derived
  24.  *     from this software without specific prior written permission.
  25.  *
  26.  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  27.  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  28.  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
  29.  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
  30.  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
  31.  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
  32.  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  33.  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
  34.  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRIC
  35.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
  36.  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  37.  * POSSIBILITY OF SUCH DAMAGE.
  38.  *
  39.  * @category   Testing
  40.  * @package    PHPUnit2
  41.  * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
  42.  * @copyright  2002-2006 Sebastian Bergmann <sb@sebastian-bergmann.de>
  43.  * @license    http://www.opensource.org/licenses/bsd-license.php  BSD License
  44.  * @version    CVS: $Id: Fileloader.php,v 1.1.2.6 2005/12/19 05:43:56 sebastian Exp $
  45.  * @link       http://pear.php.net/package/PHPUnit2
  46.  * @since      File available since Release 2.3.0
  47.  */
  48.  
  49. /**
  50.  * 
  51.  *
  52.  * @category   Testing
  53.  * @package    PHPUnit2
  54.  * @author     Sebastian Bergmann <sb@sebastian-bergmann.de>
  55.  * @copyright  2002-2006 Sebastian Bergmann <sb@sebastian-bergmann.de>
  56.  * @license    http://www.opensource.org/licenses/bsd-license.php  BSD License
  57.  * @version    Release: 2.3.6
  58.  * @link       http://pear.php.net/package/PHPUnit2
  59.  * @since      Class available since Release 2.3.0
  60.  */
  61. class PHPUnit2_Util_Fileloader {
  62.     /**
  63.      * Checks if a PHP sourcefile is readable and contains no syntax errors.
  64.      * If that is the case, the sourcefile is loaded through include_once().
  65.      *
  66.      * @param  string   $filename
  67.      * @throws Exception
  68.      * @access public
  69.      * @static
  70.      */
  71.     public static function checkAndLoad($filename) {
  72.         if (!is_readable($filename)) {
  73.             $filename = './' . $filename;
  74.         }
  75.  
  76.         if (!is_readable($filename)) {
  77.             throw new Exception(
  78.               sprintf(
  79.                 '%s could not be found or is not readable.',
  80.  
  81.                 str_replace('./', '', $filename)
  82.               )
  83.             );
  84.         }
  85.  
  86.         $output = shell_exec('php -l ' . escapeshellarg($filename));
  87.  
  88.         if (strpos($output, 'No syntax errors detected in') === FALSE) {
  89.             throw new Exception(
  90.               sprintf(
  91.                 'Syntax error in %s.',
  92.  
  93.                 str_replace('./', '', $filename)
  94.               )
  95.             );
  96.         }
  97.  
  98.         include_once $filename;
  99.     }
  100. }
  101.  
  102. /*
  103.  * Local variables:
  104.  * tab-width: 4
  105.  * c-basic-offset: 4
  106.  * c-hanging-comment-ender-p: nil
  107.  * End:
  108.  */
  109. ?>
  110.