# Net/Socket.php \
# Schedule/At.php \
-PEAR_PACKAGES=\
- Net_Socket-1.0.tgz
-
+#PEARCMD=$(top_builddir)/sapi/cli/php $(builddir)/scripts/pear
+#
+#install-pear-installer: $(top_builddir)/sapi/cli/php
+# version=`grep '<version>' $(srcdir)/package-pear.xml|head -1|cut -d\> -f2|cut -d\< -f1`; \
+# if $(PEARCMD) shell-test PEAR; then
+# if ! $(PEARCMD) shell-test PEAR $$version; then \
+# $(PEARCMD) upgrade package-pear.xml; \
+# fi; \
+# else; \
+# $(PEARCMD) install package-pear.xml; \
+# fi
install-pear:
@if $(mkinstalldirs) $(INSTALL_ROOT)$(peardir); then \
for i in $(PEAR_SUBDIRS); do \
$(mkinstalldirs) $(INSTALL_ROOT)$(peardir)/$$i; \
done; \
- for dir in PEAR/CommandUI; do \
- test -d $(INSTALL_ROOT)$(peardir)/$$dir && rm -rf $(INSTALL_ROOT)$(peardir)/$$dir; \
- done; \
for i in $(PEAR_FILES); do \
echo "Installing $$i"; \
dir=`echo $$i|sed 's%[^/][^/]*$$%%'`; \
$(INSTALL_DATA) $(srcdir)/$$i $(INSTALL_ROOT)$(peardir)/$$dir; \
done; \
rm -f $(INSTALL_ROOT)$(peardir)/PEAR/Command/Login.php; \
- rm -f $(INSTALL_ROOT)$(peardir)/PEAR/CommandUI/CLI.php; \
rm -f $(INSTALL_ROOT)$(peardir)/PEAR/CommandResponse.php; \
rm -f $(INSTALL_ROOT)$(peardir)/PEAR/Uploader.php; \
else \
include_once $file;
// List of commands
$implements = call_user_func(array($class, "getCommands"));
- foreach ($implements as $command) {
+ foreach ($implements as $command => $desc) {
$GLOBALS['_PEAR_Command_commandlist'][$command] = $class;
+ $GLOBALS['_PEAR_Command_commanddesc'][$command] = $desc;
}
// List of options accepted
$cmdopts = array_merge($cmdopts, call_user_func(array($class, "getOptions")));
return $GLOBALS['_PEAR_Command_commandopts'];
}
+ /**
+ * Get description for a command.
+ *
+ * @param string $command Name of the command
+ *
+ * @return string command description
+ *
+ * @access public
+ */
+ function getDescription($command)
+ {
+ return @$GLOBALS['_PEAR_Command_commanddesc'][$command];
+ }
+
/**
* Get help for command.
*
*/
function getCommands()
{
- return array('login', 'logout');
+ return array('login' => 'Log In',
+ 'logout' => 'Log Out');
}
// }}}
*/
function getCommands()
{
- return array('config-show', 'config-get', 'config-set');
+ return array('config-show' => 'Show All Settings',
+ 'config-get' => 'Show One Setting',
+ 'config-set' => 'Change Setting');
}
// }}}
*/
function getCommands()
{
- return array('install', 'uninstall', 'upgrade');
+ return array('install' => 'Install Package',
+ 'uninstall' => 'Uninstall Package',
+ 'upgrade' => 'Upgrade Package');
}
function getHelp($command)
*/
function getCommands()
{
- return array('package',
- 'package-info',
- 'package-list',
- 'package-validate',
- 'cvstag');
+ return array('package' => 'Build Package',
+ 'package-info' => 'Show Package Info',
+ 'package-list' => 'List Files in Package',
+ 'package-validate' => 'Validate Package',
+ 'cvstag' => 'Set CVS Release Tag');
}
// }}}
*/
function getCommands()
{
- return array('list-installed', 'shell-test');
+ return array('list-installed' => 'List Installed Packages',
+ 'shell-test' => 'Shell Script Test');
}
function getHelp($command)
*/
function getCommands()
{
- return array('remote-package-info',
- 'list-upgrades',
- 'list-remote-packages',
- 'download');
+ return array('remote-package-info' => 'Information About Remote Package',
+ 'list-upgrades' => 'List Available Upgrades',
+ 'list-remote-packages' => 'List Remote Packages',
+ 'download' => 'Download Package');
}
// }}}
--- /dev/null
+<?php
+/*
+ +----------------------------------------------------------------------+
+ | PHP Version 4 |
+ +----------------------------------------------------------------------+
+ | Copyright (c) 1997-2002 The PHP Group |
+ +----------------------------------------------------------------------+
+ | This source file is subject to version 2.02 of the PHP license, |
+ | that is bundled with this package in the file LICENSE, and is |
+ | available at through the world-wide-web at |
+ | http://www.php.net/license/2_02.txt. |
+ | If you did not receive a copy of the PHP license and are unable to |
+ | obtain it through the world-wide-web, please send a note to |
+ | license@php.net so we can mail you a copy immediately. |
+ +----------------------------------------------------------------------+
+ | Author: Stig Sæther Bakken <ssb@fast.no> |
+ +----------------------------------------------------------------------+
+
+ $Id$
+*/
+
+require_once "PEAR.php";
+
+class PEAR_Frontend_Gtk extends PEAR
+{
+ // {{{ properties
+
+ /**
+ * What type of user interface this frontend is for.
+ * @var string
+ * @access public
+ */
+ var $type = 'Gtk';
+
+ var $omode = 'plain';
+ var $params = array();
+ var $window = null;
+
+ // }}}
+
+ // {{{ constructor
+
+ function PEAR_Frontend_Gtk()
+ {
+ parent::PEAR();
+ if (!extension_loaded('php_gtk')) {
+ dl('php_gtk.' . (OS_WINDOWS ? 'dll' : 'so'));
+ }
+ $this->window = &new GtkWindow();
+ $this->window->set_title('PEAR Installer');
+ $this->window->set_usize((gdk::screen_width()/3), (gdk::screen_height()/3));
+ $this->window->show_all();
+ }
+
+ // }}}
+
+ // {{{ displayLine(text)
+
+ function displayLine($text)
+ {
+ }
+
+ function display($text)
+ {
+ }
+
+ // }}}
+ // {{{ displayError(eobj)
+
+ function displayError($eobj)
+ {
+ }
+
+ // }}}
+ // {{{ displayFatalError(eobj)
+
+ function displayFatalError($eobj)
+ {
+ }
+
+ // }}}
+ // {{{ displayHeading(title)
+
+ function displayHeading($title)
+ {
+ }
+
+ // }}}
+ // {{{ userDialog(prompt, [type], [default])
+
+ function userDialog($prompt, $type = 'text', $default = '')
+ {
+ }
+
+ // }}}
+ // {{{ userConfirm(prompt, [default])
+
+ function userConfirm($prompt, $default = 'yes')
+ {
+ }
+
+ // }}}
+ // {{{ startTable([params])
+
+ function startTable($params = array())
+ {
+ }
+
+ // }}}
+ // {{{ tableRow(columns, [rowparams], [colparams])
+
+ function tableRow($columns, $rowparams = array(), $colparams = array())
+ {
+ }
+
+ // }}}
+ // {{{ endTable()
+
+ function endTable()
+ {
+ }
+
+ // }}}
+ // {{{ bold($text)
+
+ function bold($text)
+ {
+ }
+
+ // }}}
+}
+
+?>
<file role="php" name="Dependency.php"/>
<dir name="Frontend">
<file role="php" name="CLI.php"/>
+ <file role="php" name="Gtk.php"/>
</dir>
<file role="php" name="Installer.php"/>
<file role="php" name="Packager.php"/>
PEAR_Command::setFrontendType('CLI');
$all_commands = PEAR_Command::getCommands();
$cmd_options = PEAR_Command::getOptions();
-$ui = &PEAR_Command::getFrontendObject();
$progname = basename(__FILE__);
// XXX change Getopt to use raiseError() ?
$argv = Console_Getopt::readPHPArgv();
-$options = Console_Getopt::getopt($argv, "c:C:d:D:h?sSqu:v" . $cmd_options);
+$options = Console_Getopt::getopt($argv, "c:C:d:D:Gh?sSqu:v" . $cmd_options);
if (PEAR::isError($options)) {
usage($options);
}
-PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($ui, "displayFatalError"));
$opts = $options[0];
+$fetype = 'CLI';
+foreach ($opts as $opt) {
+ if ($opt[0] == 'G') {
+ $fetype = 'Gtk';
+ }
+}
+PEAR_Command::setFrontendType($fetype);
+$ui = &PEAR_Command::getFrontendObject();
+PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($ui, "displayFatalError"));
+
$pear_user_config = '';
$pear_system_config = '';
$store_user_config = false;
exit;
}
-if (empty($all_commands[$command]) || $command == 'help') {
- usage(null, @$options[1][2]);
-}
-
-$cmd = PEAR_Command::factory($command, $config);
-if (PEAR::isError($cmd)) {
- die($cmd->getMessage());
-}
-
-$cmdargs = array_slice($options[1], 2);
-$ok = $cmd->run($command, $cmdopts, $cmdargs);
-if ($ok === false) {
- PEAR::raiseError("unknown command `$command'");
+if ($fetype == 'Gtk') {
+ Gtk::main();
+} else {
+ if (empty($all_commands[$command]) || $command == 'help') {
+ usage(null, @$options[1][2]);
+ }
+
+ $cmd = PEAR_Command::factory($command, $config);
+ if (PEAR::isError($cmd)) {
+ die($cmd->getMessage());
+ }
+
+ $cmdargs = array_slice($options[1], 2);
+ $ok = $cmd->run($command, $cmdopts, $cmdargs);
+ if ($ok === false) {
+ PEAR::raiseError("unknown command `$command'");
+ }
}
// {{{ usage()
"Usage: $progname [options] command [command-options] <parameters>\n".
"Type \"$progname help options\" to list all options.\n".
"Type \"$progname help <command>\" to get the help for the specified command.\n".
- "Commands:\n " . implode("\n ", array_keys($all_commands));
+ "Commands:\n";
+ $maxlen = max(array_map("strlen", $all_commands));
+ $formatstr = "%-{$maxlen}s %s\n";
+ foreach ($all_commands as $cmd => $class) {
+ $put .= sprintf($formatstr, $cmd, PEAR_Command::getDescription($cmd));
+ }
}
- fputs($stderr, "$put\n\n");
+ fputs($stderr, "$put\n");
fclose($stderr);
exit;
}
" -C file find system configuration in `file'\n".
" -d foo=bar set user config variable `foo' to `bar'\n".
" -D foo=bar set system config variable `foo' to `bar'\n".
+ " -G start in graphical (Gtk) mode\n".
" -s store user configuration\n".
" -S store system configuration\n".
" -u foo unset `foo' in the user configuration\n".
projects / php / commitdiff