274 lines
7.2 KiB
PHP
274 lines
7.2 KiB
PHP
<?php
|
|
/**
|
|
* PEAR::CompatInfo Web frontend
|
|
*
|
|
* PHP versions 4 and 5
|
|
*
|
|
* @category PHP
|
|
* @package PHP_CompatInfo
|
|
* @author Laurent Laville <pear@laurent-laville.org>
|
|
* @license http://www.opensource.org/licenses/bsd-license.php BSD
|
|
* @version CVS: $Id: ci_frontend.php,v 1.6 2008/07/22 20:26:45 farell Exp $
|
|
* @link http://pear.php.net/package/PHP_CompatInfo
|
|
* @ignore
|
|
*/
|
|
|
|
require_once 'PEAR/Registry.php';
|
|
require_once 'HTML/QuickForm.php';
|
|
require_once 'HTML/QuickForm/advmultiselect.php';
|
|
|
|
if (version_compare(phpversion(), '5.0.0', '<')) {
|
|
include_once 'PHP/Compat.php';
|
|
PHP_Compat::loadFunction('array_combine');
|
|
}
|
|
|
|
session_start();
|
|
$sess =& $_SESSION;
|
|
|
|
$config = new PEAR_Config();
|
|
$pear_install_dir = $config->get('php_dir');
|
|
$reg = new PEAR_Registry($pear_install_dir);
|
|
|
|
if (count($sess) == 0) {
|
|
|
|
// PEAR packages installed from each channel
|
|
$allpackages = $reg->listAllPackages();
|
|
foreach ($allpackages as $channel => $packages) {
|
|
if ($packages) {
|
|
sort($packages, SORT_ASC);
|
|
foreach ($packages as $package) {
|
|
$info = &$reg->getPackage($package, $channel);
|
|
if (is_object($info)) {
|
|
$name = $info->getPackage();
|
|
$version = $info->getVersion();
|
|
$release_state = $info->getState();
|
|
} else {
|
|
$name = $info['package'];
|
|
$version = $info['version'];
|
|
$release_state = $info['state'];
|
|
}
|
|
$sess['packages'][$channel][] = "$name $version ($release_state)";
|
|
}
|
|
} else {
|
|
$sess['packages'][$channel] = array();
|
|
}
|
|
}
|
|
|
|
// channels
|
|
$channels = array_keys($sess['packages']);
|
|
array_unshift($channels, '');
|
|
$sess['channels'] = array_combine($channels, $channels);
|
|
|
|
// packages
|
|
$names[''] = array();
|
|
foreach ($sess['packages'] as $c => $p) {
|
|
if (count($p)) {
|
|
$l = array();
|
|
foreach ($p as $k) {
|
|
list($n, $v, $s) = explode(' ', $k);
|
|
$l[] = $n;
|
|
}
|
|
$names[$c] = array_combine($l, $p);
|
|
} else {
|
|
$names[$c] = array();
|
|
}
|
|
}
|
|
$sess['pkgnames'] = $names;
|
|
|
|
// PHP internal functions
|
|
$func = get_defined_functions();
|
|
sort($func['internal']);
|
|
$sess['phpfunctions'] = $func['internal'];
|
|
}
|
|
|
|
// ignore functions
|
|
$ignore_functions = array_combine($sess['phpfunctions'], $sess['phpfunctions']);
|
|
|
|
// web frontend
|
|
$form = new HTML_QuickForm('cife');
|
|
$form->removeAttribute('name'); // XHTML compliance
|
|
|
|
// header
|
|
$form->addElement('header', 'cife_hdr', 'CompatInfo :: Web frontend');
|
|
|
|
// ignore functions
|
|
$ams1 =& $form->addElement('advmultiselect', 'ignore_functions', null,
|
|
$ignore_functions,
|
|
array('size' => 5, 'style' => 'width:250px;', 'class' => 'pool'));
|
|
$ams1->setLabel(array('PHP functions:', 'available', 'ignore'));
|
|
|
|
// packages installed
|
|
$pkgInstalled =& $form->addElement('hierselect', 'package', null, array('class' => 'flat'), ' ');
|
|
$pkgInstalled->setLabel('Packages installed:');
|
|
$pkgInstalled->setOptions(array($sess['channels'], $sess['pkgnames']));
|
|
$form->addElement('submit', 'filelist', 'File List');
|
|
|
|
// ignore files
|
|
$safe = $form->getSubmitValues();
|
|
|
|
if (isset($safe['filelist'])) {
|
|
$package = &$reg->getPackage($safe['package'][1], $safe['package'][0]);
|
|
$files = array();
|
|
|
|
$filelist = $package->getFilelist();
|
|
foreach ($filelist as $name => $atts) {
|
|
if (isset($atts['role']) && $atts['role'] != 'php') {
|
|
continue;
|
|
}
|
|
if (!preg_match('/\.php$/', $name)) {
|
|
continue;
|
|
}
|
|
$files[] = $atts['installed_as'];
|
|
}
|
|
$sess['phpfiles'] = $files;
|
|
$labels = str_replace($pear_install_dir . DIRECTORY_SEPARATOR, '', $files);
|
|
$ignore_files = array_combine($files, $labels);
|
|
|
|
} else {
|
|
$ignore_files = array();
|
|
}
|
|
|
|
$ams2 =& $form->addElement('advmultiselect', 'ignore_files', null,
|
|
$ignore_files,
|
|
array('size' => 5, 'style' => 'width:300px;', 'class' => 'pool'));
|
|
$ams2->setLabel(array('Package files (role=php):', 'available', 'ignore'));
|
|
|
|
// dump options
|
|
$dump =& $form->addElement('checkbox', 'dump');
|
|
$dump->setLabel('Dump:');
|
|
$dump->setText('PHP min version only');
|
|
|
|
$dbg =& $form->addElement('checkbox', 'dbg');
|
|
$dbg->setLabel('Debug:');
|
|
$dbg->setText('Extra output');
|
|
|
|
// commands
|
|
$form->addElement('submit', 'process', 'Process');
|
|
$form->addElement('submit', 'abort', 'Abort');
|
|
|
|
// initial values
|
|
$form->setDefaults(array(
|
|
'ignore_functions' => array(),
|
|
'ignore_files' => array(),
|
|
'dump' => true
|
|
));
|
|
|
|
?>
|
|
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
|
|
"http://www.w3c.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
|
|
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en">
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
|
|
<title>PEAR::PHP_CompatInfo Web frontend </title>
|
|
<style type="text/css">
|
|
<!--
|
|
body {
|
|
background-color: #FFF;
|
|
font-family: Verdana, Arial, helvetica;
|
|
font-size: 10pt;
|
|
}
|
|
|
|
.error {
|
|
color: red;
|
|
font-weight: bold;
|
|
}
|
|
|
|
.dump {
|
|
background-color: #EEE;
|
|
color: black;
|
|
}
|
|
|
|
table.pool {
|
|
border: 0;
|
|
background-color: #339900;
|
|
width:450px;
|
|
}
|
|
table.pool th {
|
|
font-size: 80%;
|
|
font-style: italic;
|
|
text-align: left;
|
|
}
|
|
table.pool select {
|
|
color: white;
|
|
background-color: #006600;
|
|
}
|
|
|
|
.inputCommand {
|
|
background-color: #d0d0d0;
|
|
border: 1px solid #7B7B88;
|
|
width: 7em;
|
|
margin-bottom: 2px;
|
|
}
|
|
-->
|
|
</style>
|
|
<script type="text/javascript">
|
|
//<![CDATA[
|
|
<?php
|
|
echo $ams1->getElementJs();
|
|
|
|
echo $ams2->getElementJs();
|
|
?>
|
|
//]]>
|
|
</script>
|
|
</head>
|
|
<body>
|
|
<?php
|
|
if ($form->validate()) {
|
|
$safe = $form->getSubmitValues();
|
|
|
|
if (isset($safe['ignore_files'])) {
|
|
$ignore_files = $safe['ignore_files'];
|
|
} else {
|
|
$ignore_files = array();
|
|
}
|
|
if (isset($safe['ignore_functions'])) {
|
|
$ignore_functions = $safe['ignore_functions'];
|
|
} else {
|
|
$ignore_functions = array();
|
|
}
|
|
|
|
if (!isset($sess['phpfiles']) && !isset($safe['abort'])) {
|
|
echo '<p class="error">Please get file list before to process.</p>';
|
|
} else {
|
|
if (isset($safe['process'])) {
|
|
|
|
include_once 'PHP/CompatInfo.php';
|
|
|
|
$info = new PHP_CompatInfo();
|
|
|
|
$options = array(
|
|
'debug' => (isset($safe['dbg'])),
|
|
'ignore_files' => $ignore_files,
|
|
'ignore_functions' => $ignore_functions
|
|
);
|
|
|
|
$res = $info->parseArray($sess['phpfiles'], $options);
|
|
|
|
$php = $res['version'];
|
|
|
|
echo "<h1>CompatInfo for package {$safe['package'][1]}</h1>";
|
|
echo "<h2>PHP $php min is required</h2>";
|
|
|
|
if (!isset($safe['dump'])) {
|
|
echo '<pre class="dump">';
|
|
var_dump($res);
|
|
echo '</pre>';
|
|
}
|
|
}
|
|
|
|
if (isset($safe['process']) || isset($safe['abort'])) {
|
|
// cleansweep before quit
|
|
$_SESSION = array();
|
|
session_destroy();
|
|
if (isset($safe['abort'])) {
|
|
echo '<h1>Task was aborted !</h1>';
|
|
}
|
|
exit();
|
|
}
|
|
}
|
|
}
|
|
|
|
$form->display();
|
|
?>
|
|
</body>
|
|
</html>
|