249 lines
		
	
	
		
			7.9 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			249 lines
		
	
	
		
			7.9 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| <?php
 | |
| /**
 | |
|  * PEAR_Installer_Role
 | |
|  *
 | |
|  * PHP versions 4 and 5
 | |
|  *
 | |
|  * LICENSE: This source file is subject to version 3.0 of the PHP license
 | |
|  * that is available through the world-wide-web at the following URI:
 | |
|  * http://www.php.net/license/3_0.txt.  If you did not receive a copy of
 | |
|  * the PHP License and are unable to obtain it through the web, please
 | |
|  * send a note to license@php.net so we can mail you a copy immediately.
 | |
|  *
 | |
|  * @category   pear
 | |
|  * @package    PEAR
 | |
|  * @author     Greg Beaver <cellog@php.net>
 | |
|  * @copyright  1997-2006 The PHP Group
 | |
|  * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
 | |
|  * @version    CVS: $Id: Role.php,v 1.13 2006/01/06 04:47:36 cellog Exp $
 | |
|  * @link       http://pear.php.net/package/PEAR
 | |
|  * @since      File available since Release 1.4.0a1
 | |
|  */
 | |
| 
 | |
| /**
 | |
|  * base class for installer roles
 | |
|  */
 | |
| require_once 'PEAR/Installer/Role/Common.php';
 | |
| require_once 'PEAR/XMLParser.php';
 | |
| //$GLOBALS['_PEAR_INSTALLER_ROLES'] = array();
 | |
| /**
 | |
|  * @category   pear
 | |
|  * @package    PEAR
 | |
|  * @author     Greg Beaver <cellog@php.net>
 | |
|  * @copyright  1997-2006 The PHP Group
 | |
|  * @license    http://www.php.net/license/3_0.txt  PHP License 3.0
 | |
|  * @version    Release: 1.4.11
 | |
|  * @link       http://pear.php.net/package/PEAR
 | |
|  * @since      Class available since Release 1.4.0a1
 | |
|  */
 | |
| class PEAR_Installer_Role
 | |
| {
 | |
|     /**
 | |
|      * Set up any additional configuration variables that file roles require
 | |
|      *
 | |
|      * Never call this directly, it is called by the PEAR_Config constructor
 | |
|      * @param PEAR_Config
 | |
|      * @access private
 | |
|      * @static
 | |
|      */
 | |
|     function initializeConfig(&$config)
 | |
|     {
 | |
|         if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) {
 | |
|             PEAR_Installer_Role::registerRoles();
 | |
|         }
 | |
|         foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $class => $info) {
 | |
|             if (!$info['config_vars']) {
 | |
|                 continue;
 | |
|             }
 | |
|             $config->_addConfigVars($info['config_vars']);
 | |
|         }
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * @param PEAR_PackageFile_v2
 | |
|      * @param string role name
 | |
|      * @param PEAR_Config
 | |
|      * @return PEAR_Installer_Role_Common
 | |
|      * @static
 | |
|      */
 | |
|     function &factory($pkg, $role, &$config)
 | |
|     {
 | |
|         if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) {
 | |
|             PEAR_Installer_Role::registerRoles();
 | |
|         }
 | |
|         if (!in_array($role, PEAR_Installer_Role::getValidRoles($pkg->getPackageType()))) {
 | |
|             $a = false;
 | |
|             return $a;
 | |
|         }
 | |
|         $a = 'PEAR_Installer_Role_' . ucfirst($role);
 | |
|         if (!class_exists($a)) {
 | |
|             require_once str_replace('_', '/', $a) . '.php';
 | |
|         }
 | |
|         $b = new $a($config);
 | |
|         return $b;
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * Get a list of file roles that are valid for the particular release type.
 | |
|      *
 | |
|      * For instance, src files serve no purpose in regular php releases.  php files
 | |
|      * serve no purpose in extsrc or extbin releases
 | |
|      * @param string
 | |
|      * @param bool clear cache
 | |
|      * @return array
 | |
|      * @static
 | |
|      */
 | |
|     function getValidRoles($release, $clear = false)
 | |
|     {
 | |
|         if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) {
 | |
|             PEAR_Installer_Role::registerRoles();
 | |
|         }
 | |
|         static $ret = array();
 | |
|         if ($clear) {
 | |
|             $ret = array();
 | |
|         }
 | |
|         if (isset($ret[$release])) {
 | |
|             return $ret[$release];
 | |
|         }
 | |
|         $ret[$release] = array();
 | |
|         foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $role => $okreleases) {
 | |
|             if (in_array($release, $okreleases['releasetypes'])) {
 | |
|                 $ret[$release][] = strtolower(str_replace('PEAR_Installer_Role_', '', $role));
 | |
|             }
 | |
|         }
 | |
|         return $ret[$release];
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * Get a list of roles that require their files to be installed
 | |
|      *
 | |
|      * Most roles must be installed, but src and package roles, for instance
 | |
|      * are pseudo-roles.  src files are compiled into a new extension.  Package
 | |
|      * roles are actually fully bundled releases of a package
 | |
|      * @param bool clear cache
 | |
|      * @return array
 | |
|      * @static
 | |
|      */
 | |
|     function getInstallableRoles($clear = false)
 | |
|     {
 | |
|         if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) {
 | |
|             PEAR_Installer_Role::registerRoles();
 | |
|         }
 | |
|         static $ret;
 | |
|         if ($clear) {
 | |
|             unset($ret);
 | |
|         }
 | |
|         if (!isset($ret)) {
 | |
|             foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $role => $okreleases) {
 | |
|                 if ($okreleases['installable']) {
 | |
|                     $ret[] = strtolower(str_replace('PEAR_Installer_Role_', '', $role));
 | |
|                 }
 | |
|             }
 | |
|         }
 | |
|         return $ret;
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * Return an array of roles that are affected by the baseinstalldir attribute
 | |
|      *
 | |
|      * Most roles ignore this attribute, and instead install directly into:
 | |
|      * PackageName/filepath
 | |
|      * so a tests file tests/file.phpt is installed into PackageName/tests/filepath.php
 | |
|      * @param bool clear cache
 | |
|      * @return array
 | |
|      * @static
 | |
|      */
 | |
|     function getBaseinstallRoles($clear = false)
 | |
|     {
 | |
|         if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) {
 | |
|             PEAR_Installer_Role::registerRoles();
 | |
|         }
 | |
|         static $ret;
 | |
|         if ($clear) {
 | |
|             unset($ret);
 | |
|         }
 | |
|         if (!isset($ret)) {
 | |
|             foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $role => $okreleases) {
 | |
|                 if ($okreleases['honorsbaseinstall']) {
 | |
|                     $ret[] = strtolower(str_replace('PEAR_Installer_Role_', '', $role));
 | |
|                 }
 | |
|             }
 | |
|         }
 | |
|         return $ret;
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * Return an array of file roles that should be analyzed for PHP content at package time,
 | |
|      * like the "php" role.
 | |
|      * @param bool clear cache
 | |
|      * @return array
 | |
|      * @static
 | |
|      */
 | |
|     function getPhpRoles($clear = false)
 | |
|     {
 | |
|         if (!isset($GLOBALS['_PEAR_INSTALLER_ROLES'])) {
 | |
|             PEAR_Installer_Role::registerRoles();
 | |
|         }
 | |
|         static $ret;
 | |
|         if ($clear) {
 | |
|             unset($ret);
 | |
|         }
 | |
|         if (!isset($ret)) {
 | |
|             foreach ($GLOBALS['_PEAR_INSTALLER_ROLES'] as $role => $okreleases) {
 | |
|                 if ($okreleases['phpfile']) {
 | |
|                     $ret[] = strtolower(str_replace('PEAR_Installer_Role_', '', $role));
 | |
|                 }
 | |
|             }
 | |
|         }
 | |
|         return $ret;
 | |
|     }
 | |
| 
 | |
|     /**
 | |
|      * Scan through the Command directory looking for classes
 | |
|      * and see what commands they implement.
 | |
|      * @param string which directory to look for classes, defaults to
 | |
|      *               the Installer/Roles subdirectory of
 | |
|      *               the directory from where this file (__FILE__) is
 | |
|      *               included.
 | |
|      *
 | |
|      * @return bool TRUE on success, a PEAR error on failure
 | |
|      * @access public
 | |
|      * @static
 | |
|      */
 | |
|     function registerRoles($dir = null)
 | |
|     {
 | |
|         $parser = new PEAR_XMLParser;
 | |
|         if ($dir === null) {
 | |
|             $dir = dirname(__FILE__) . '/Role';
 | |
|         }
 | |
|         $dp = @opendir($dir);
 | |
|         if (empty($dp)) {
 | |
|             return PEAR::raiseError("registerRoles: opendir($dir) failed");
 | |
|         }
 | |
|         while ($entry = readdir($dp)) {
 | |
|             if ($entry{0} == '.' || substr($entry, -4) != '.xml') {
 | |
|                 continue;
 | |
|             }
 | |
|             $class = "PEAR_Installer_Role_".substr($entry, 0, -4);
 | |
|             // List of roles
 | |
|             if (empty($GLOBALS['_PEAR_INSTALLER_ROLES'][$class])) {
 | |
|                 $file = "$dir/$entry";
 | |
|                 $parser->parse(file_get_contents($file));
 | |
|                 $data = $parser->getData();
 | |
|                 if (!is_array($data['releasetypes'])) {
 | |
|                     $data['releasetypes'] = array($data['releasetypes']);
 | |
|                 }
 | |
|                 $GLOBALS['_PEAR_INSTALLER_ROLES'][$class] = $data;
 | |
|             }
 | |
|         }
 | |
|         @closedir($dp);
 | |
|         ksort($GLOBALS['_PEAR_INSTALLER_ROLES']);
 | |
|         PEAR_Installer_Role::getBaseinstallRoles(true);
 | |
|         PEAR_Installer_Role::getInstallableRoles(true);
 | |
|         PEAR_Installer_Role::getPhpRoles(true);
 | |
|         PEAR_Installer_Role::getValidRoles('****', true);
 | |
|         return true;
 | |
|     }
 | |
| }
 | |
| ?>
 |