From 7517473b49af62aae7eecf5836e603640b7bcdd8 Mon Sep 17 00:00:00 2001 From: adrianp Date: Sat, 5 May 2007 21:21:45 +0000 Subject: The PEAR package contains: * the PEAR installer, for creating, distributing and installing packages * the PEAR_Exception PHP5 error handling mechanism * the PEAR_ErrorStack advanced error handling mechanism * the PEAR_Error error handling mechanism * the OS_Guess class for retrieving info about the OS where PHP is running on * the System class for quick handling of common operations with files and directories * the PEAR base class --- lang/pear/DESCR | 9 + lang/pear/MESSAGE | 15 + lang/pear/Makefile | 95 ++ lang/pear/PLIST | 194 ++++ lang/pear/distinfo | 15 + lang/pear/files/go-pear.php | 2496 +++++++++++++++++++++++++++++++++++++++++++ lang/pear/files/pear.sh | 30 + lang/pear/patches/patch-aa | 143 +++ 8 files changed, 2997 insertions(+) create mode 100644 lang/pear/DESCR create mode 100644 lang/pear/MESSAGE create mode 100644 lang/pear/Makefile create mode 100644 lang/pear/PLIST create mode 100644 lang/pear/distinfo create mode 100644 lang/pear/files/go-pear.php create mode 100644 lang/pear/files/pear.sh create mode 100644 lang/pear/patches/patch-aa (limited to 'lang/pear') diff --git a/lang/pear/DESCR b/lang/pear/DESCR new file mode 100644 index 00000000000..ff9458a0176 --- /dev/null +++ b/lang/pear/DESCR @@ -0,0 +1,9 @@ +The PEAR package contains: +* the PEAR installer, for creating, distributing and installing packages +* the PEAR_Exception PHP5 error handling mechanism +* the PEAR_ErrorStack advanced error handling mechanism +* the PEAR_Error error handling mechanism +* the OS_Guess class for retrieving info about the OS where PHP is running on +* the System class for quick handling of common operations with files and + directories +* the PEAR base class diff --git a/lang/pear/MESSAGE b/lang/pear/MESSAGE new file mode 100644 index 00000000000..73506b080a0 --- /dev/null +++ b/lang/pear/MESSAGE @@ -0,0 +1,15 @@ +=========================================================================== +$NetBSD: MESSAGE,v 1.1.1.1 2007/05/05 21:21:45 adrianp Exp $ + +In order to use PEAR packages you may want to alter the default +include_path of PHP to include the PEAR installation directory where the +packages are located. To do this you need to edit the include_path +directive in your php.ini file: + + ${PKG_SYSCONFDIR}/php.ini + +Change the "include_path" directive to read as follows: + + include_path = ".:${PREFIX}/lib/php" + +=========================================================================== diff --git a/lang/pear/Makefile b/lang/pear/Makefile new file mode 100644 index 00000000000..71bfa80662f --- /dev/null +++ b/lang/pear/Makefile @@ -0,0 +1,95 @@ +# $NetBSD: Makefile,v 1.1.1.1 2007/05/05 21:21:45 adrianp Exp $ +# + +DISTNAME= PEAR-1.5.2 +PKGNAME= ${PHP_PKG_PREFIX}-${DISTNAME:S/PEAR/pear/} +CATEGORIES= lang +MASTER_SITES= http://download.pear.php.net/package/ +EXTRACT_SUFX= .tgz + +MAINTAINER= adrianp@NetBSD.org +HOMEPAGE= http://pear.php.net/ +COMMENT= PEAR Base System for PHP + +USE_LANGUAGES= # none +EXTRACT_ONLY= # none +USE_TOOLS+= gzcat + +.include "../../lang/php/phpversion.mk" + +.if ${PKG_PHP_VERSION} == "4" +CONFLICTS+= php<4.4.6nb1 +.elif ${PKG_PHP_VERSION} == "5" +CONFLICTS+= php<5.2.1nb2 +.endif + +BUNDLE= ${WRKSRC}/install/go-pear-bundle + +# everything else that forms a part of the "base" PEAR install +# +PEAR_SRCS= PEAR-1.5.2${EXTRACT_SUFX} +DISTFILES+= ${PEAR_SRCS} +EXTRACT_ONLY+= ${PEAR_SRCS} + +ARCHIVE_SRCS= Archive_Tar-1.3.2${EXTRACT_SUFX} +ARCHIVE_WRKSRC= ${WRKDIR}/${ARCHIVE_SRCS:S/${EXTRACT_SUFX}//} +DISTFILES+= ${ARCHIVE_SRCS} +EXTRACT_ONLY+= ${ARCHIVE_SRCS} + +CONSOLE_SRCS= Console_Getopt-1.2.2${EXTRACT_SUFX} +CONSOLE_WRKSRC= ${WRKDIR}/${CONSOLE_SRCS:S/${EXTRACT_SUFX}//} +DISTFILES+= ${CONSOLE_SRCS} +EXTRACT_ONLY+= ${CONSOLE_SRCS} + +STRUCTURES_SRCS= Structures_Graph-1.0.2${EXTRACT_SUFX} +DISTFILES+= ${STRUCTURES_SRCS} +# +# end of base components + +SUBST_CLASSES+= config +SUBST_STAGE.config= post-patch +SUBST_FILES.config= install/go-pear.php +SUBST_SED.config= -e "s|@PREFIX@|${PREFIX}|g" +SUBST_SED.config+= -e "s|@PKG_SYSCONFDIR@|${PKG_SYSCONFDIR}|g" +SUBST_MESSAGE.config= Fixing configuration files. + +SUBST_CLASSES+= pear +SUBST_STAGE.pear= post-patch +SUBST_FILES.pear= pear.sh +SUBST_SED.pear= -e "s|@php_bin@|${PREFIX}/bin/php|g" +SUBST_SED.pear+= -e "s|@php_dir@|${PREFIX}/lib/php|g" +SUBST_SED.pear+= -e "s|@SH@|${SH}|g" +SUBST_MESSAGE.pear= Fixing pear installation script. + +post-extract: + ${MKDIR} ${WRKSRC}/install + ${MKDIR} ${BUNDLE} + ${CP} ${FILESDIR}/go-pear.php ${WRKSRC}/install + ${CP} ${FILESDIR}/pear.sh ${WRKSRC} + +do-build: + ${GZCAT} ${DISTDIR}/${ARCHIVE_SRCS} > \ + ${BUNDLE}/${ARCHIVE_SRCS:S/${EXTRACT_SUFX}/.tar/} + ${GZCAT} ${DISTDIR}/${CONSOLE_SRCS} > \ + ${BUNDLE}/${CONSOLE_SRCS:S/${EXTRACT_SUFX}/.tar/} + ${GZCAT} ${DISTDIR}/${PEAR_SRCS} > \ + ${BUNDLE}/${PEAR_SRCS:S/${EXTRACT_SUFX}/.tar/} + ${GZCAT} ${DISTDIR}/${STRUCTURES_SRCS} > \ + ${BUNDLE}/${STRUCTURES_SRCS:S/${EXTRACT_SUFX}/.tar/} + + ${CP} ${ARCHIVE_WRKSRC}/Archive/Tar.php ${BUNDLE} + ${CP} ${CONSOLE_WRKSRC}/Console/Getopt.php ${BUNDLE} + ${CP} ${WRKSRC}/PEAR.php ${BUNDLE} + +do-install: + ${PREFIX}/bin/php ${WRKSRC}/install/go-pear.php + ${INSTALL_SCRIPT} ${WRKSRC}/pear.sh ${PREFIX}/bin/pear + +.if ${PKG_PHP_VERSION} == "4" +BUILDLINK_API_DEPENDS.php+= php>=4.4.6nb1 +.elif ${PKG_PHP_VERSION} == "5" +BUILDLINK_API_DEPENDS.php+= php>=5.2.1nb2 +.endif + +.include "${PHPPKGSRCDIR}/buildlink3.mk" +.include "../../mk/bsd.pkg.mk" diff --git a/lang/pear/PLIST b/lang/pear/PLIST new file mode 100644 index 00000000000..2509e667c25 --- /dev/null +++ b/lang/pear/PLIST @@ -0,0 +1,194 @@ +@comment $NetBSD: PLIST,v 1.1.1.1 2007/05/05 21:21:45 adrianp Exp $ +bin/pear +bin/peardev +bin/pecl +lib/php/.channels/.alias/pear.txt +lib/php/.channels/.alias/pecl.txt +lib/php/.channels/__uri.reg +lib/php/.channels/pear.php.net.reg +lib/php/.channels/pecl.php.net.reg +lib/php/.depdb +lib/php/.depdblock +lib/php/.filemap +lib/php/.lock +@exec ${MKDIR} %D/lib/php/.registry/.channel.__uri +@exec ${MKDIR} %D/lib/php/.registry/.channel.pecl.php.net +lib/php/.registry/archive_tar.reg +lib/php/.registry/console_getopt.reg +lib/php/.registry/pear.reg +lib/php/.registry/structures_graph.reg +lib/php/Archive/Tar.php +lib/php/Console/Getopt.php +lib/php/OS/Guess.php +lib/php/PEAR.php +lib/php/PEAR/Autoloader.php +lib/php/PEAR/Builder.php +lib/php/PEAR/ChannelFile.php +lib/php/PEAR/ChannelFile/Parser.php +lib/php/PEAR/Command.php +lib/php/PEAR/Command/Auth.php +lib/php/PEAR/Command/Auth.xml +lib/php/PEAR/Command/Build.php +lib/php/PEAR/Command/Build.xml +lib/php/PEAR/Command/Channels.php +lib/php/PEAR/Command/Channels.xml +lib/php/PEAR/Command/Common.php +lib/php/PEAR/Command/Config.php +lib/php/PEAR/Command/Config.xml +lib/php/PEAR/Command/Install.php +lib/php/PEAR/Command/Install.xml +lib/php/PEAR/Command/Mirror.php +lib/php/PEAR/Command/Mirror.xml +lib/php/PEAR/Command/Package.php +lib/php/PEAR/Command/Package.xml +lib/php/PEAR/Command/Pickle.php +lib/php/PEAR/Command/Pickle.xml +lib/php/PEAR/Command/Registry.php +lib/php/PEAR/Command/Registry.xml +lib/php/PEAR/Command/Remote.php +lib/php/PEAR/Command/Remote.xml +lib/php/PEAR/Command/Test.php +lib/php/PEAR/Command/Test.xml +lib/php/PEAR/Common.php +lib/php/PEAR/Config.php +lib/php/PEAR/Dependency.php +lib/php/PEAR/Dependency2.php +lib/php/PEAR/DependencyDB.php +lib/php/PEAR/Downloader.php +lib/php/PEAR/Downloader/Package.php +lib/php/PEAR/ErrorStack.php +lib/php/PEAR/Exception.php +lib/php/PEAR/Frontend.php +lib/php/PEAR/Frontend/CLI.php +lib/php/PEAR/Installer.php +lib/php/PEAR/Installer/Role.php +lib/php/PEAR/Installer/Role/Common.php +lib/php/PEAR/Installer/Role/Data.php +lib/php/PEAR/Installer/Role/Data.xml +lib/php/PEAR/Installer/Role/Doc.php +lib/php/PEAR/Installer/Role/Doc.xml +lib/php/PEAR/Installer/Role/Ext.php +lib/php/PEAR/Installer/Role/Ext.xml +lib/php/PEAR/Installer/Role/Php.php +lib/php/PEAR/Installer/Role/Php.xml +lib/php/PEAR/Installer/Role/Script.php +lib/php/PEAR/Installer/Role/Script.xml +lib/php/PEAR/Installer/Role/Src.php +lib/php/PEAR/Installer/Role/Src.xml +lib/php/PEAR/Installer/Role/Test.php +lib/php/PEAR/Installer/Role/Test.xml +lib/php/PEAR/PackageFile.php +lib/php/PEAR/PackageFile/Generator/v1.php +lib/php/PEAR/PackageFile/Generator/v2.php +lib/php/PEAR/PackageFile/Parser/v1.php +lib/php/PEAR/PackageFile/Parser/v2.php +lib/php/PEAR/PackageFile/v1.php +lib/php/PEAR/PackageFile/v2.php +lib/php/PEAR/PackageFile/v2/Validator.php +lib/php/PEAR/PackageFile/v2/rw.php +lib/php/PEAR/Packager.php +lib/php/PEAR/REST.php +lib/php/PEAR/REST/10.php +lib/php/PEAR/REST/11.php +lib/php/PEAR/Registry.php +lib/php/PEAR/Remote.php +lib/php/PEAR/RunTest.php +lib/php/PEAR/Task/Common.php +lib/php/PEAR/Task/Postinstallscript.php +lib/php/PEAR/Task/Postinstallscript/rw.php +lib/php/PEAR/Task/Replace.php +lib/php/PEAR/Task/Replace/rw.php +lib/php/PEAR/Task/Unixeol.php +lib/php/PEAR/Task/Unixeol/rw.php +lib/php/PEAR/Task/Windowseol.php +lib/php/PEAR/Task/Windowseol/rw.php +lib/php/PEAR/Validate.php +lib/php/PEAR/Validator/PECL.php +lib/php/PEAR/XMLParser.php +lib/php/Structures/Graph.php +lib/php/Structures/Graph/Manipulator/AcyclicTest.php +lib/php/Structures/Graph/Manipulator/TopologicalSorter.php +lib/php/Structures/Graph/Node.php +lib/php/System.php +lib/php/data/PEAR/package.dtd +lib/php/data/PEAR/template.spec +lib/php/data/Structures_Graph/LICENSE +lib/php/data/Structures_Graph/genpackage.xml.pl +lib/php/data/Structures_Graph/package.sh +lib/php/data/Structures_Graph/publish.sh +lib/php/doc/Archive_Tar/docs/Archive_Tar.txt +lib/php/doc/PEAR/INSTALL +lib/php/doc/PEAR/README +lib/php/doc/Structures_Graph/docs/generate.sh +lib/php/doc/Structures_Graph/docs/html/Structures_Graph/Structures_Graph.html +lib/php/doc/Structures_Graph/docs/html/Structures_Graph/Structures_Graph_Manipulator_AcyclicTest.html +lib/php/doc/Structures_Graph/docs/html/Structures_Graph/Structures_Graph_Manipulator_TopologicalSorter.html +lib/php/doc/Structures_Graph/docs/html/Structures_Graph/Structures_Graph_Node.html +lib/php/doc/Structures_Graph/docs/html/Structures_Graph/_Structures_Graph_Manipulator_AcyclicTest_php.html +lib/php/doc/Structures_Graph/docs/html/Structures_Graph/_Structures_Graph_Manipulator_TopologicalSorter_php.html +lib/php/doc/Structures_Graph/docs/html/Structures_Graph/_Structures_Graph_Node_php.html +lib/php/doc/Structures_Graph/docs/html/Structures_Graph/_Structures_Graph_php.html +lib/php/doc/Structures_Graph/docs/html/Structures_Graph/tutorial_Structures_Graph.pkg.html +lib/php/doc/Structures_Graph/docs/html/classtrees_Structures_Graph.html +lib/php/doc/Structures_Graph/docs/html/elementindex.html +lib/php/doc/Structures_Graph/docs/html/elementindex_Structures_Graph.html +lib/php/doc/Structures_Graph/docs/html/errors.html +lib/php/doc/Structures_Graph/docs/html/index.html +lib/php/doc/Structures_Graph/docs/html/li_Structures_Graph.html +lib/php/doc/Structures_Graph/docs/html/media/banner.css +lib/php/doc/Structures_Graph/docs/html/media/stylesheet.css +lib/php/doc/Structures_Graph/docs/html/packages.html +lib/php/doc/Structures_Graph/docs/html/todolist.html +lib/php/doc/Structures_Graph/docs/tutorials/Structures_Graph/Structures_Graph.pkg +lib/php/pearcmd.php +lib/php/peclcmd.php +lib/php/test/Structures_Graph/tests/README +lib/php/test/Structures_Graph/tests/all-tests.php +lib/php/test/Structures_Graph/tests/testCase/BasicGraph.php +@dirrm lib/php/doc/Archive_Tar/docs +@dirrm lib/php/doc/Archive_Tar +@dirrm lib/php/doc/PEAR +@dirrm lib/php/data/Structures_Graph +@dirrm lib/php/data/PEAR +@unexec ${RMDIR} %D/lib/php/data 2>/dev/null || ${TRUE} +@dirrm lib/php/Structures/Graph/Manipulator +@dirrm lib/php/Structures/Graph +@dirrm lib/php/Structures +@dirrm lib/php/PEAR/Validator +@dirrm lib/php/PEAR/Task/Windowseol +@dirrm lib/php/PEAR/Task/Unixeol +@dirrm lib/php/PEAR/Task/Replace +@dirrm lib/php/PEAR/Task/Postinstallscript +@dirrm lib/php/PEAR/Task +@dirrm lib/php/PEAR/REST +@dirrm lib/php/PEAR/PackageFile/v2 +@dirrm lib/php/PEAR/PackageFile/Parser +@dirrm lib/php/PEAR/PackageFile/Generator +@dirrm lib/php/PEAR/PackageFile +@dirrm lib/php/PEAR/Installer/Role +@dirrm lib/php/PEAR/Installer +@dirrm lib/php/PEAR/Frontend +@dirrm lib/php/PEAR/Downloader +@dirrm lib/php/PEAR/Command +@dirrm lib/php/PEAR/ChannelFile +@dirrm lib/php/PEAR +@dirrm lib/php/OS +@dirrm lib/php/Console +@dirrm lib/php/Archive +@dirrm lib/php/test/Structures_Graph/tests/testCase +@dirrm lib/php/test/Structures_Graph/tests +@dirrm lib/php/test/Structures_Graph +@unexec ${RMDIR} %D/lib/php/test 2>/dev/null || ${TRUE} +@dirrm lib/php/doc/Structures_Graph/docs/html/Structures_Graph +@dirrm lib/php/doc/Structures_Graph/docs/html/media +@dirrm lib/php/doc/Structures_Graph/docs/html +@dirrm lib/php/doc/Structures_Graph/docs/tutorials/Structures_Graph +@dirrm lib/php/doc/Structures_Graph/docs/tutorials +@dirrm lib/php/doc/Structures_Graph/docs +@dirrm lib/php/doc/Structures_Graph +@unexec ${RMDIR} %D/lib/php/doc 2>/dev/null || ${TRUE} +@dirrm lib/php/.registry/.channel.pecl.php.net +@dirrm lib/php/.registry/.channel.__uri +@unexec ${RMDIR} %D/lib/php/.registry 2>/dev/null || ${TRUE} +@dirrm lib/php/.channels/.alias +@dirrm lib/php/.channels diff --git a/lang/pear/distinfo b/lang/pear/distinfo new file mode 100644 index 00000000000..9f3ff8dd580 --- /dev/null +++ b/lang/pear/distinfo @@ -0,0 +1,15 @@ +$NetBSD: distinfo,v 1.1.1.1 2007/05/05 21:21:45 adrianp Exp $ + +SHA1 (Archive_Tar-1.3.2.tgz) = 40a16c6fe6cee12d9fd87d487785db2949ffa9ff +RMD160 (Archive_Tar-1.3.2.tgz) = cec105d1cdefd502f209c24c217645cec723d7a2 +Size (Archive_Tar-1.3.2.tgz) = 17150 bytes +SHA1 (Console_Getopt-1.2.2.tgz) = 3158237f6cd8ed34a269c67cbe546156c03cff0b +RMD160 (Console_Getopt-1.2.2.tgz) = fb8a955ef2c41618305e03c9a4164c3a465c5e86 +Size (Console_Getopt-1.2.2.tgz) = 4252 bytes +SHA1 (PEAR-1.5.2.tgz) = 49d5f666a385b3da8297d7d2a6f06d7b57adb609 +RMD160 (PEAR-1.5.2.tgz) = f8592eabfb056727e95751f78aaa5b173c752b38 +Size (PEAR-1.5.2.tgz) = 291323 bytes +SHA1 (Structures_Graph-1.0.2.tgz) = 300aa0a2effb0b39c4fa8a63a834748ae99c2855 +RMD160 (Structures_Graph-1.0.2.tgz) = 8eb53f6da109b90bab5d8101e99183a1ae116404 +Size (Structures_Graph-1.0.2.tgz) = 30947 bytes +SHA1 (patch-aa) = 5ff9804287e0fcea8eadf8b03f5292f11da3a5e6 diff --git a/lang/pear/files/go-pear.php b/lang/pear/files/go-pear.php new file mode 100644 index 00000000000..4384909d739 --- /dev/null +++ b/lang/pear/files/go-pear.php @@ -0,0 +1,2496 @@ + | +# | Stig Bakken | +# | Christian Dickmann | +# | Pierre-Alain Joye | +# | Greg Beaver | +# +----------------------------------------------------------------------+ +# +# $Id: go-pear.php,v 1.1.1.1 2007/05/05 21:21:47 adrianp Exp $ +# +# Id: go-pear,v 1.104 2007/03/17 21:43:08 cellog Exp +# +# Automatically download all the files needed to run the "pear" command +# (the PEAR package installer). Requires PHP 4.1.0 or newer. +# +# Installation: Linux +# +# This script can either be directly launched or passed via lynx like this. +# +# $ lynx -source http://pear.php.net/go-pear | php +# +# The above assumes your php binary is named php and that it's +# executable through your PATH: +# +# Installation: Windows +# +# On Windows, go-pear uses stdin for user input, so you must download +# go-pear first and then run it: +# +# Note: In PHP 4.2.0-4.2.3, the PHP CLI binary is named php-cli.exe while since +# PHP 4.3.0, it's simply named php.exe in the cli/ folder of your PHP directory. +# The CGI is also named php.exe but it sits directly in your PHP directory. +# +# > cli/php -r "readfile('http://pear.php.net/go-pear');" > go-pear +# > cli/php go-pear +# +# In PHP 5.0.0+, the PHP CLI binary is php.exe +# +# > php -r "readfile('http://pear.php.net/go-pear');" > go-pear +# > php go-pear +# +# Installation: Notes +# +# - If using the CGI version of PHP, append the -q option to suppress +# headers in the output. +# - By default, go-pear will install a system-wide configuration file. For +# a local install use: +# > php go-pear local +# +# - Once the go-pear script is initiated, you will see instructions on +# how to continue installing PEAR. The first thing you should see is: +# +# Welcome to go-pear! +# +# Installation: Web browser +# +# You can now use go-pear via a webbrowser, thanks to Christian Dickmann. It is +# still beta codes, but feel free to test it: +# 1.: Download the go-pear script by using the "Save target as ..." function +# of your browser here. +# +# 2.: Place the go-pear file somewhere under the document root of your webserver. +# The easiest way is to create a new directory for pear and to put the file in there. +# Be sure your web server is setup to recognize PHP, and that you use an appropriate +# extension. For example, you might name this file gopear.php +# +# 3.: Access go-pear through your webserver and follow the instructions. Please +# make sure that PHP has write access to the dir you want to install PEAR into. +# For example: http://localhost/pear/gopear.php +# +# 4.: After running go-pear you get a link to the Web Frontend of the PEAR installer. +# I suggest bookmarking this link. +# +# 5.: Protect the Web Frontend directory and the go-pear script with a password. +# Use .htaccess on Apache webservers for example. +# +# +function dump($var) { + if (defined('WEBINSTALLER') && WEBINSTALLER == 'cgi') { + echo '
';
+        print_r($var);
+        echo '
'; + } else { + print_r($var); + echo "\n"; + } +} + +$sapi_name = php_sapi_name(); + +$safe_mode = (bool)ini_get('safe_mode'); +if (!$safe_mode) { + set_time_limit(0); +} + + + +@ob_end_clean(); +ob_implicit_flush(true); +define('WEBINSTALLER', ($sapi_name != 'cli' && !(substr($sapi_name,0,3)=='cgi' && !isset($_SERVER['GATEWAY_INTERFACE'])))); + +ini_set('track_errors', true); +ini_set('html_errors', WEBINSTALLER); +ini_set('magic_quotes_runtime', false); +error_reporting( E_ALL & ~E_NOTICE); + +define('WINDOWS', (substr(PHP_OS, 0, 3) == 'WIN')); +define('GO_PEAR_VER', '0.6.0'); + +if (!function_exists('file_get_contents')) { + function file_get_contents($filename) + { + $fp = fopen($filename, 'rb'); + $ret = ''; + while (!feof($fp)) { + $ret .= fread($fp, 8092);; + } + return $ret; + } +} + +define('WIN32GUI', !WEBINSTALLER && WINDOWS && $sapi_name=='cli' && which('cscript')); + +/* + * See bug #23069 + */ +if ( WEBINSTALLER && WINDOWS ) { + $php_sapi_name = win32DetectPHPSAPI(); + if($php_sapi_name=='cgi'){ + $msg = nl2br(" +Sorry! The PEAR installer actually does not work on Windows platform using CGI and Apache. +Please install the module SAPI (see http://www.php.net/manual/en/install.apache.php for the +instructions) or use the CLI (cli\php.exe) in the console. +"); + displayHTML('error', $msg); + } +} + +if (WEBINSTALLER && isset($_GET['action']) && $_GET['action'] == 'img' && isset($_GET['img'])) { + switch ($_GET['img']) + { + case 'note': + case 'pearlogo': + case 'smallpear': + showImage($_GET['img']); + exit; + default: + exit; + }; +} + +// Check if PHP version is sufficient +if (function_exists("version_compare") && version_compare(phpversion(), "4.2.0",'<')) { + die("Sorry! Your PHP version is too old. PEAR and this script requires at +least PHP 4.2.0 for stable operation. + +It may be that you have a newer version of PHP installed in your web +server, but an older version installed as the 'php' command. In this +case, you need to rebuilt PHP from source. + +If your source is 4.2.x, you need to run 'configure' with the +--enable-cli option, rebuild and copy sapi/cli/php somewhere. + +If your source is 4.3.x or newer, just make sure you don't run +'configure' with --disable-cli, rebuilt and copy sapi/cli/php. + +Please upgrade PHP to a newer version, and try again. See you then. + +"); +} + +$installer_packages = array( + 'PEAR-stable', + 'Archive_Tar-stable', + 'Console_Getopt-stable', + 'Structures_Graph-stable', + ); + +if (WEBINSTALLER) { + $installer_packages[] = 'HTML_Template_IT-stable'; + $installer_packages[] = 'Net_UserAgent_Detect-stable'; + $installer_packages[] = 'PEAR_Frontend_Web-alpha'; +} + +$pfc_packages = array( + 'MDB2', +); + +$config_desc = array( + 'prefix' => 'Installation prefix', + 'bin_dir' => 'Binaries directory', + 'php_dir' => 'PHP code directory ($php_dir)', + 'doc_dir' => 'Documentation base directory', + 'data_dir' => 'Data base directory', + 'test_dir' => 'Tests base directory', + 'temp_dir' => 'Temporary files directory' +); + +if(!WEBINSTALLER && WINDOWS){ + $config_desc['php_bin'] = 'php.exe path'; +} + +if (WEBINSTALLER) { + $config_desc['cache_dir'] = 'PEAR Installer cache directory'; + $config_desc['cache_ttl'] = 'Cache TimeToLive'; + $config_desc['webfrontend_file'] = 'Filename of WebFrontend'; + $config_desc['php_bin'] = "php.exe path, optional (CLI command tools)"; +} + +if (my_env('HTTP_PROXY')) { + $http_proxy = my_env('HTTP_PROXY'); +} elseif (my_env('http_proxy')) { + $http_proxy = my_env('http_proxy'); +} else { + $http_proxy = ''; +} + +register_shutdown_function('bail'); + +detect_install_dirs(); + +if (WEBINSTALLER) { + @session_start(); + + /* + See bug #23069 + */ + if ( WINDOWS ) { + $php_sapi_name = win32DetectPHPSAPI(); + if($php_sapi_name=='cgi'){ + $msg = " + Sorry! The PEAR installer actually does not work on Windows platform using CGI and Apache. + Please install the module SAPI (see http://www.php.net/manual/en/install.apache.php for the + instructions) or use the CLI (cli\php.exe) in the console. + "; + displayHTML('error', $msg); + exit(); + } + } + + if (!isset($_SESSION['go-pear']) || isset($_GET['restart'])) { + $_SESSION['go-pear'] = array( + 'http_proxy' => $http_proxy, + 'config' => array( + 'prefix' => dirname(__FILE__), + 'bin_dir' => $bin_dir, + 'php_bin' => $php_bin, + 'php_dir' => '$prefix/PEAR', + 'doc_dir' => $doc_dir, + 'data_dir' => $data_dir, + 'test_dir' => $test_dir, + 'temp_dir' => '$prefix/temp', + 'cache_dir' => '$php_dir/cache', + 'cache_ttl' => 300, + 'webfrontend_file' => '$prefix/index.php', + ), + 'install_pfc' => true, + 'DHTML' => true, + ); + } + + if (!isset($_GET['step'])) { + $_GET['step'] = 'Welcome'; + /* clean up old sessions datas */ + session_destroy(); + } + if ($_GET['step'] == 'install') { + $_SESSION['go-pear']['http_proxy'] = strip_magic_quotes($_POST['proxy']['host']).':'.strip_magic_quotes($_POST['proxy']['port']); + if ($_SESSION['go-pear']['http_proxy'] == ':') { + $_SESSION['go-pear']['http_proxy'] = ''; + }; + + $www_errors = array(); + foreach($_POST['config'] as $key => $value) { + $_POST['config'][$key] = strip_magic_quotes($value); + if($key!='cache_ttl'){ + if ( empty($_POST['config'][$key]) ) { + if (WEBINSTALLER && $key!='php_bin' ) { + $www_errors[$key] = 'Please fill this path, you can use $prefix, $php_dir or a full path.'; + } + } + } + } + + if( sizeof($www_errors)>0){ + $_GET['step'] = 'config'; + } + + $_SESSION['go-pear']['config'] = $_POST['config']; + $_SESSION['go-pear']['install_pfc'] = (isset($_POST['install_pfc']) && $_POST['install_pfc'] == 'on'); + $_SESSION['go-pear']['DHTML'] = isset($_POST['BCmode']) ? false : true; + } + + $http_proxy = $_SESSION['go-pear']['http_proxy']; + foreach($_SESSION['go-pear']['config'] as $var => $value) { + $$var = $value; + } + $install_pfc = $_SESSION['go-pear']['install_pfc']; +} + +if (!WEBINSTALLER) { + $tty = WINDOWS ? @fopen('\con', 'r') : @fopen('/dev/tty', 'r'); + + if (!$tty) { + $tty = fopen('php://stdin', 'r'); + } + + $local = isset($_SERVER['argv'][1]) && $_SERVER['argv'][1] == 'local'; + if ($local) { + $local = " +Running in local install mode +"; + } elseif (WINDOWS) { + $local = " +Use 'php " . $_SERVER['argv'][0] . " local' to install a local copy of PEAR. +"; + } + print "Welcome to go-pear! + +Go-pear will install the 'pear' command and all the files needed by +it. This command is your tool for PEAR installation and maintenance. +$local +Go-pear also lets you download and install the PEAR packages bundled +with PHP: " . implode(', ', $pfc_packages) . ". + + +If you wish to abort, press Control-C now, or press Enter to continue: "; + + fgets($tty, 1024); + + print "\n"; + + print "HTTP proxy (http://user:password@proxy.myhost.com:port), or Enter for none:"; + + if (!empty($http_proxy)) { + print " [$http_proxy]"; + } + print ": "; + $tmp = trim(fgets($tty, 1024)); + if (!empty($tmp)) { + $http_proxy = $tmp; + } +} + +$origpwd = getcwd(); + +$config_vars = array_keys($config_desc); + +// make indices run from 1... +array_unshift($config_vars, ""); +unset($config_vars[0]); +reset($config_vars); +$desclen = max(array_map('strlen', $config_desc)); +$descfmt = "%-{$desclen}s"; +$first = key($config_vars); +end($config_vars); +$last = key($config_vars); + +if (WEBINSTALLER) { + if ( isset($www_errors) && sizeof($www_errors) ) { + displayHTML('config'); + exit(); + } else { + if (isset($_SESSION['go-pear']['DHTML']) && $_SESSION['go-pear']['DHTML'] == true && $_GET['step'] == 'install') { + $_GET['step'] = 'preinstall'; + } + if ($_GET['step'] != 'install' && $_GET['step'] != 'install-progress') { + displayHTML($_GET['step']); + exit; + } + if ($_GET['step'] == 'install-progress') { + displayHTMLHeader(); + echo "Starting installation ...
"; + } + ob_start(); + } +} + +$progress = 0; + +/* + * Checks PHP SAPI version under windows/CLI + */ +if( WINDOWS && !WEBINSTALLER && $php_bin=='') { + print " +We do not find any php.exe, please select the php.exe folder (CLI is +recommanded, usually in c:\php\cli\php.exe) +"; + $php_bin_set = false; +} elseif ( WINDOWS && !WEBINSTALLER && strlen($php_bin) ) { + $php_bin_sapi = win32DetectPHPSAPI(); + $php_bin_set = true; + switch($php_bin_sapi){ + case 'cli': + break; + case 'cgi': + print " +*NOTICE* +We found php.exe under $php_bin, it uses a $php_bin_sapi SAPI. PEAR commandline +tool works well with it, if you have a CLI php.exe available, we +recommand to use it. +"; + break; + default: + print " +*WARNING* +We found php.exe under $php_bin, it uses an unknown SAPI. PEAR commandline +tool has not been tested with it, if you have a CLI (or CGI) php.exe available, +we strongly recommand to use it. + +"; + break; + } +} + +while (!WEBINSTALLER) { + print " +Below is a suggested file layout for your new PEAR installation. To +change individual locations, type the number in front of the +directory. Type 'all' to change all of them or simply press Enter to +accept these locations. + +"; + + foreach ($config_vars as $n => $var) { + printf("%2d. $descfmt : %s\n", $n, $config_desc[$var], $$var); + } + + print "\n$first-$last, 'all' or Enter to continue: "; + $tmp = trim(fgets($tty, 1024)); + if ( empty($tmp) ) { + if( WINDOWS && !$php_bin_set ){ + echo "**ERROR** +Please, enter the php.exe path. + +"; + } else { + break; + } + } + if (isset($config_vars[(int)$tmp])) { + $var = $config_vars[(int)$tmp]; + $desc = $config_desc[$var]; + $current = $$var; + + if(WIN32GUI){ + $tmp = win32BrowseForFolder("$desc [$current] :"); + } else { + print "$desc [$current] : "; + $tmp = trim(fgets($tty, 1024)); + } + + $old = $$var; + if(WINDOWS && $var=='php_bin' ){ + if(file_exists($tmp.DIRECTORY_SEPARATOR.'php.exe')){ + $tmp = $tmp.DIRECTORY_SEPARATOR.'php.exe'; + $php_bin_sapi = win32DetectPHPSAPI(); + if($php_bin_sapi=='cgi'){ + print " +****************************************************************************** +NOTICE! We found php.exe under $php_bin, it uses a $php_bin_sapi SAPI. +PEAR commandline tool works well with it. +If you have a CLI php.exe available, we recommand to use it. + +"; + } elseif ($php_bin_sapi=='unknown') { + print " +****************************************************************************** +WARNING! We found php.exe under $php_bin, it uses an $php_bin_sapi SAPI. +PEAR commandline tool has not been tested with it. +If you have a CLI (or CGI) php.exe available, we strongly recommand to use it. + +"; + } + echo "php.exe (sapi: $php_bin_sapi) found.\n\n"; + $php_bin_set = true; + } else { + echo "**ERROR**: no php.exe found in this folder.\n"; + $tmp=''; + } + } + + if (!empty($tmp) ) { + $$var = $tmp; + } + } elseif ($tmp == 'all') { + foreach ($config_vars as $n => $var) { + $desc = $config_desc[$var]; + $current = $$var; + print "$desc [$current] : "; + $tmp = trim(fgets($tty, 1024)); + if (!empty($tmp)) { + $$var = $tmp; + } + } + } +} + +foreach ($config_vars as $n => $var) { + for ($m = 1; $m <= count($config_vars); $m++) { + $var2 = $config_vars[$m]; + $$var = str_replace('$'.$var2, $$var2, $$var); + } +} + + +#### +# Temp stuff +#### +if (!empty($temp_dir)) { + $_found = temp_dir($temp_dir); +} else { + $_found = temp_dir(); +} + +if (!$_found) { + print " + +****************************************************************************** +FATAL ERROR! We cannot initialize the temp directory. Please be sure to give +full write access to this directory and the install directory. + +"; + + if (!empty($temp_dir)) { + print "'$temp_dir' was given."; + } + exit(); +} + +$foo = $ptmp; + +$ptmp = tempnam($ptmp, 'gope'); + +if (WINDOWS) { + $ptmp = str_replace($foo,'',$ptmp); + $foo = str_replace("\\\\",'/',$foo); + $s = substr($ptmp,0,1); + if($s == "\\" || $s == '/' ){ + $ptmp = $foo . '/' . substr($ptmp,1); + } else { + $ptmp = $foo . '/' . $ptmp; + } +} + +rm_rf($ptmp); +mkdir_p($ptmp, 0700); +$ok = @chdir($ptmp); + +foreach ($config_vars as $var) { + $dir = $$var; + + if (!preg_match('/_dir$/', $var)) { + continue; + } + + if (!@is_dir($dir)) { + if (!mkdir_p($dir)) { + $root = WINDOWS ? 'administrator' : 'root'; + bail("Unable to create {$config_desc[$var]} $dir. +Run this script as $root or pick another location.\n"); + } + } +} + +if (!WEBINSTALLER) { + $msg = "The following PEAR packages are bundled with PHP: " . + implode(', ', $pfc_packages); + print "\n" . wordwrap($msg, 75) . ".\n"; + print "Would you like to install these as well? [Y/n] : "; + $install_pfc = !stristr(fgets($tty, 1024), "n"); + print "\n"; +} + +#### +# Download +#### + +if (function_exists('set_include_path')) { + set_include_path($ptmp); +} else { + ini_set('include_path', $ptmp); +} + +if (!extension_loaded('zlib') && !WEBINSTALLER) { // In Web context we could be in multithread env which makes dl() end up with a fatal error. + if (WINDOWS) { + @dl('php_zlib.dll'); + } elseif (PHP_OS == 'HP-UX') { + @dl('zlib.sl'); + } elseif (PHP_OS == 'AIX') { + @dl('zlib.a'); + } else { + @dl('zlib.so'); + } +} +if (!extension_loaded('zlib')) { + $urltemplate = 'http://pear.php.net/get/%s?uncompress=yes'; + $have_gzip = null; +} else { + $urltemplate = 'http://pear.php.net/get/%s'; + $have_gzip = true; +} + +print "Loading zlib: ".($have_gzip ? 'ok' : 'failed')."\n"; + +if (!$have_gzip) { + print "Downloading uncompressed packages\n"; +}; + +if ($install_pfc) { + $to_install = array_merge($installer_packages, $pfc_packages); +} else { + $to_install = $installer_packages; +} + +displayHTMLProgress($progress = 5); + +if (file_exists(dirname(__FILE__).'/go-pear-bundle') || is_dir(dirname(__FILE__).'/go-pear-bundle')) { + $dh = @opendir(dirname(__FILE__).'/go-pear-bundle'); +} else { + $dh = false; +} + +$local_dir = array(); +if ($dh) { + while($file = @readdir($dh)) { + if ($file == '.' || $file == '..' || !is_file(dirname(__FILE__).'/go-pear-bundle/'.$file)) { + continue; + } + $_pos = strpos($file, '-'); + if ($_pos === false) { + $local_dir[$file] = $file; + } else { + $local_dir[substr($file, 0, $_pos)] = $file; + } + } +} + +foreach ($installer_packages as $pkg) { + $pkg_basename = substr($pkg, 0, strpos($pkg, '-')); + if (isset($local_dir[$pkg_basename])) { + echo str_pad("Using local package: $pkg", max(38,21+strlen($pkg)+4), '.'); + copy(dirname(__FILE__) . '/go-pear-bundle/' . $local_dir[$pkg_basename], $local_dir[$pkg_basename]); + $tarball[$pkg_basename] = $local_dir[$pkg_basename]; + echo "ok\n"; + displayHTMLProgress($progress += round(65 / count($to_install))); + continue; + } + + $msg = str_pad("Downloading package: $pkg", max(38,21+strlen($pkg)+4), '.'); + print $msg; + $url = sprintf($urltemplate, $pkg); + + $pkg = str_replace('-stable', '', $pkg); + + $tarball[$pkg] = download_url($url, null, $http_proxy); + print "ok\n"; + displayHTMLProgress($progress += round(65 / count($to_install))); +} + +print 'Bootstrapping: PEAR...................'; +if (in_array('PEAR.php', $local_dir)) { + copy(dirname(__FILE__).'/go-pear-bundle/PEAR.php', 'PEAR.php'); + echo "(local) "; +} else { + $url = 'http://cvs.php.net/viewcvs.cgi/pear-core/PEAR.php?view=co&pathrev=PEAR_1_4'; + echo "(remote) "; + download_url($url, 'PEAR.php', $http_proxy); +} + +include_once 'PEAR.php'; +print "ok\n"; + +print 'Bootstrapping: Archive_Tar............'; +$r = 'RELEASE_' . ereg_replace('[^A-Za-z0-9]', '_', substr(substr($tarball['Archive_Tar'], 12), 0, -4)); + +/* force to a known revision */ +$url = "http://cvs.php.net/viewcvs.cgi/pear/Archive_Tar/Archive/Tar.php?view=co&pathrev=RELEASE_1_3_2"; +mkdir('Archive', 0700); + +if (in_array('Tar.php', $local_dir)) { + copy(dirname(__FILE__).'/go-pear-bundle/Tar.php', 'Archive/Tar.php'); + echo "(local) "; +} else { + download_url($url, 'Archive/Tar.php', $http_proxy); + echo "(remote) "; +} +print "ok\n"; + +print 'Bootstrapping: Console_Getopt.........'; +$r = 'RELEASE_' . ereg_replace('[^A-Za-z0-9]', '_', substr(substr($tarball['Console_Getopt'], 15), 0, -4)); +$url = "http://cvs.php.net/viewcvs.cgi/pear-core/Console/Getopt.php?view=co&pathrev=PEAR_1_4"; +mkdir('Console', 0700); +if (in_array('Getopt.php', $local_dir)) { + copy(dirname(__FILE__).'/go-pear-bundle/Getopt.php', 'Console/Getopt.php'); + echo "(local) "; +} else { + download_url($url, 'Console/Getopt.php', $http_proxy); + echo "(remote) "; +} +print "ok\n"; + +if ($install_pfc) { + foreach ($pfc_packages as $pkg) { + foreach($local_dir as $file) { + if (substr($file, 0, strlen($pkg)) == $pkg) { + echo str_pad("Using local package: $pkg", max(38,21+strlen($pkg)+4), '.'); + copy(dirname(__FILE__).'/go-pear-bundle/'.$file, $file); + $tarball[$pkg] = $file; + echo "ok\n"; + displayHTMLProgress($progress += round(65 / count($to_install))); + continue 2; + }; + }; + + $msg = str_pad("Downloading package: $pkg", max(38,21+strlen($pkg)+4), '.'); + print $msg; + $url = sprintf($urltemplate, $pkg); + $tarball[$pkg] = download_url($url, null, $http_proxy); + print "ok\n"; + displayHTMLProgress($progress += round(65 / count($to_install))); + } +} + +displayHTMLProgress($progress = 70); + +PEAR::setErrorHandling(PEAR_ERROR_DIE, "\n%s\n"); +print 'Extracting installer..................'; + +$dot = strrpos($tarball['Structures_Graph'], '.'); +$pkg = substr($tarball['Structures_Graph'], 0, $dot); +$ext = substr($tarball['Structures_Graph'], $dot + 1); + +include_once 'Archive/Tar.php'; + +$tar = &new Archive_Tar($tarball['Structures_Graph'], $have_gzip); +if (!$tar->extractModify($ptmp, $pkg)) { + bail("failed!\n"); +} + +$dot = strrpos($tarball['PEAR'], '.'); +$pkg = substr($tarball['PEAR'], 0, $dot); +$ext = substr($tarball['PEAR'], $dot + 1); + +$tar = &new Archive_Tar($tarball['PEAR'], $have_gzip); +if (!$tar->extractModify($ptmp, $pkg)) { + bail("failed!\n"); +} +print "ok\n"; + +$tarball['PEAR'] = 'package.xml'; // :-) + +// Default for sig_bin +putenv('PHP_PEAR_SIG_BIN=""'); +// Default for sig_keydir +putenv('PHP_PEAR_SIG_KEYDIR=""'); +putenv('PHP_PEAR_DOWNLOAD_DIR=' . $temp_dir . '/download'); +putenv('PHP_PEAR_TEMP_DIR=' . $temp_dir); + +include_once "PEAR.php"; +include_once "PEAR/Config.php"; +include_once "PEAR/Command.php"; +include_once "PEAR/Registry.php"; + +if (WEBINSTALLER || isset($_SERVER['argv'][1]) && $_SERVER['argv'][1] == 'local') { + $config = &PEAR_Config::singleton($prefix."/pear.conf", ''); +} else { + $config = &PEAR_Config::singleton(); +} + + +$config->set('preferred_state', 'stable'); +foreach ($config_vars as $var) { + $config->set($var, $$var); +} +$config->set('download_dir', $temp_dir . '/download'); +$config->set('temp_dir', $temp_dir); +$config->store(); + +$registry = new PEAR_Registry($php_dir); +PEAR_Command::setFrontendType('CLI'); +$install = &PEAR_Command::factory('install', $config); + +$install_options = array( + 'nodeps' => true, + 'force' => true, +); + +foreach ($tarball as $pkg => $src) { + $options = $install_options; + if ($registry->packageExists($pkg)) { + $options['upgrade'] = true; + } + + $install->run('install', $options, array($src)); + + displayHTMLProgress($progress += round(29 / count($tarball))); +} + +displayHTMLProgress($progress = 99); + +// Base installation finished + +ini_restore("include_path"); + +if (!WEBINSTALLER) { + $sep = WINDOWS ? ';' : ':'; + $include_path = explode($sep, ini_get('include_path')); + if (WINDOWS) { + $found = false; + $t = strtolower($php_dir); + foreach($include_path as $path) { + if ($t==strtolower($path)) { + $found = true; + break; + } + } + } else { + $found = in_array($php_dir, $include_path); + } + if (!$found) { + print " +****************************************************************************** +WARNING! The include_path defined in the currently used php.ini does not +contain the PEAR PHP directory you just specified: +<$php_dir> +If the specified directory is also not in the include_path used by +your scripts, you will have problems getting any PEAR packages working. +"; + + if ( $php_ini = getPhpiniPath() ) { + print "\n\nWould you like to alter php.ini <$php_ini>? [Y/n] : "; + $alter_phpini = !stristr(fgets($tty, 1024), "n"); + if( $alter_phpini ) { + alterPhpIni($php_ini); + } else { + if (WINDOWS) { + print " +Please look over your php.ini file to make sure +$php_dir is in your include_path."; + } else { + print " +I will add a workaround for this in the 'pear' command to make sure +the installer works, but please look over your php.ini or Apache +configuration to make sure $php_dir is in your include_path. +"; + } + + } + } + + print " +Current include path : ".ini_get('include_path')." +Configured directory : $php_dir +Currently used php.ini (guess) : $php_ini +"; + + print "Press Enter to continue: "; + fgets($tty, 1024); + } + + $pear_cmd = $bin_dir . DIRECTORY_SEPARATOR . 'pear'; + $pear_cmd = WINDOWS ? strtolower($pear_cmd).'.bat' : $pear_cmd; + + // check that the installed pear and the one in tha path are the same (if any) + $pear_old = which(WINDOWS ? 'pear.bat' : 'pear', $bin_dir); + if ($pear_old && ($pear_old != $pear_cmd)) { + // check if it is a link or symlink + $islink = WINDOWS ? false : is_link($pear_old) ; + if ($islink && readlink($pear_old) != $pear_cmd) { + print "\n** WARNING! The link $pear_old does not point to the " . + "installed $pear_cmd\n"; + } elseif (is_writable($pear_old) && !is_dir($pear_old)) { + rename($pear_old, "{$pear_old}_old"); + print "\n** WARNING! Backed up old pear to {$pear_old}_old\n"; + } else { + print "\n** WARNING! Old version found at $pear_old, please remove it or ". + "be sure to use the new $pear_cmd command\n"; + } + } + + print "\nThe 'pear' command is now at your service at $pear_cmd\n"; + + // Alert the user if the pear cmd is not in PATH + $old_dir = $pear_old ? dirname($pear_old) : false; + if (!which('pear', $old_dir)) { + print " +** The 'pear' command is not currently in your PATH, so you need to +** use '$pear_cmd' until you have added +** '$bin_dir' to your PATH environment variable. + +"; + + print "Run it without parameters to see the available actions, try 'pear list' +to see what packages are installed, or 'pear help' for help. + +For more information about PEAR, see: + + http://pear.php.net/faq.php + http://cvs.php.net/co.php/pearweb/doc/pear_package_manager.txt?p=1 + http://pear.php.net/manual/ + +Thanks for using go-pear! + +"; + } +} + +if (WEBINSTALLER) { + print "Writing WebFrontend file ... "; + @unlink($webfrontend_file); //Delete old one + copy ( $doc_dir.DIRECTORY_SEPARATOR. + 'PEAR_Frontend_Web'.DIRECTORY_SEPARATOR. + 'docs'.DIRECTORY_SEPARATOR. + 'example.php', + $webfrontend_file + ); + if ($_GET['step'] == 'install-progress') { + displayHTMLProgress($progress = 100); + ob_end_clean(); + displayHTMLInstallationSummary(); + displayHTMLFooter(); + } else { + $out = ob_get_contents(); + + $out = explode("\n", $out); + foreach($out as $line => $value) { + if (preg_match('/ok$/', $value)) { + $value = preg_replace('/(ok)$/', '\1', $value); + }; + if (preg_match('/^install ok:/', $value)) { + $value = preg_replace('/^(install ok:)/', '\1', $value); + }; + if (preg_match('/^Warning:/', $value)) { + $value = ''.$value.''; + }; + $out[$line] = $value; + }; + $out = nl2br(implode("\n",$out)); + ob_end_clean(); + + displayHTML('install', $out); + } + // Little hack, this will be fixed in PEAR later + if ( WINDOWS ) { + clearstatcache(); + @unlink($bin_dir.DIRECTORY_SEPARATOR.'.tmppear'); + } + exit; +} + +// Little hack, this will be fixed in PEAR later +if ( WINDOWS ) { + clearstatcache(); + @unlink($bin_dir.DIRECTORY_SEPARATOR.'.tmppear'); +} + +if (WINDOWS && !WEBINSTALLER) { + win32CreateRegEnv(); +} +// Set of functions following + +// {{{ download_url() + +function download_url($url, $destfile = null, $proxy = null) +{ + $use_suggested_filename = ($destfile === null); + if ($use_suggested_filename) { + $destfile = basename($url); + } + $tmp = parse_url($url); + if (empty($tmp['port'])) { + $tmp['port'] = 80; + } + if (empty($proxy)) { + $fp = fsockopen($tmp['host'], $tmp['port'], $errno, $errstr); + //print "\nconnecting to $tmp[host]:$tmp[port]\n"; + } else { + $tmp_proxy = parse_url($proxy); + $phost = $tmp_proxy['host']; + $pport = $tmp_proxy['port']; + $fp = fsockopen($phost, $pport, $errno, $errstr); + //print "\nconnecting to $phost:$pport\n"; + } + if (!$fp) { + bail("download of $url failed: $errstr ($errno)\n"); + } + if (empty($proxy)) { + $path = $tmp['path']; + } else { + $path = "http://$tmp[host]:$tmp[port]$tmp[path]"; + } + if (isset($tmp['query'])) { + $path .= "?$tmp[query]"; + } + if (isset($tmp['fragment'])) { + $path .= "#$tmp[fragment]"; + } + $request = "GET $path HTTP/1.0\r\nHost: $tmp[host]:$tmp[port]\r\n". + "User-Agent: go-pear\r\n"; + + if (!empty($proxy) && $tmp_proxy['user'] != '') { + $request .= 'Proxy-Authorization: Basic ' . + base64_encode($tmp_proxy['user'] . ':' . $tmp_proxy['pass']) . "\r\n"; + } + $request .= "\r\n"; + fwrite($fp, $request); + $cdh = "content-disposition:"; + $cdhl = strlen($cdh); + $content_length = 0; + while ($line = fgets($fp, 2048)) { + if (trim($line) == '') { + break; + } + if (preg_match('/^Content-Length: (.*)$/i', $line, $matches)) { + $content_length = trim($matches[1]); + } + if ($use_suggested_filename && !strncasecmp($line, $cdh, $cdhl)) { + if (eregi('filename="([^"]+)"', $line, $matches)) { + $destfile = basename($matches[1]); + } + } + } + + if ($content_length) { + displayHTMLSetDownload($destfile); + }; + $wp = fopen($destfile, "wb"); + if (!$wp) { + bail("could not open $destfile for writing\n"); + } + $bytes_read = 0; + $progress = 0; + while ($data = fread($fp, 2048)) { + fwrite($wp, $data); + $bytes_read += strlen($data); + if ($content_length != 0 && floor($bytes_read * 10 / $content_length) != $progress) { + $progress = floor($bytes_read * 10 / $content_length); + displayHTMLDownloadProgress($progress * 10); + }; + } + fclose($fp); + fclose($wp); + return $destfile; +} + +// }}} +// {{{ which() + +function which($program, $dont_search_in = false) +{ + if (WINDOWS) { + if ($_path=my_env('Path')) { + $dirs = explode(';', $_path); + } else { + $dirs = explode(';', my_env('PATH')); + } + foreach ($dirs as $i => $dir) { + $dirs[$i] = strtolower(realpath($dir)); + } + if ($dont_search_in) { + $dont_search_in = strtolower(realpath($dont_search_in)); + } + if ($dont_search_in && + ($key = array_search($dont_search_in, $dirs)) !== false) + { + unset($dirs[$key]); + } + + foreach ($dirs as $dir) { + $dir = str_replace('\\\\', '\\', $dir); + if (!strlen($dir)) { + continue; + } + if ($dir{strlen($dir) - 1} != '\\') { + $dir .= '\\'; + } + $tmp = $dir . $program; + $info = pathinfo($tmp); + if (in_array(strtolower($info['extension']), + array('exe', 'com', 'bat', 'cmd'))) { + if (file_exists($tmp)) { + return strtolower($tmp); + } + } elseif (file_exists($ret = $tmp . '.exe') || + file_exists($ret = $tmp . '.com') || + file_exists($ret = $tmp . '.bat') || + file_exists($ret = $tmp . '.cmd')) { + return strtolower($ret); + } + } + } else { + $dirs = explode(':', my_env('PATH')); + if ($dont_search_in && + ($key = array_search($dont_search_in, $dirs)) !== false) + { + unset($dirs[$key]); + } + foreach ($dirs as $dir) { + if (is_executable("$dir/$program")) { + return "$dir/$program"; + } + } + } + return false; +} + +// }}} +// {{{ bail() + +function bail($msg = '') +{ + global $ptmp, $origpwd; + if ($ptmp && is_dir($ptmp)) { + chdir($origpwd); + rm_rf($ptmp); + } + if ($msg && WEBINSTALLER) { + $msg = @ob_get_contents() ."\n\n". $msg; + @ob_end_clean(); + displayHTML('error', $msg); + exit; + }; + if ($msg && !WEBINSTALLER) { + die($msg); + } +} + +// }}} +// {{{ mkdir_p() + +function mkdir_p($dir, $mode = 0777) +{ + if (@is_dir($dir)) { + return true; + } + + $parent = dirname($dir); + $ok = true; + if (!@is_dir($parent) && $parent != $dir) { + $ok = mkdir_p(dirname($dir), $mode); + } + if ($ok) { + $ok = @mkdir($dir, $mode); + if (!$ok) { + print "mkdir failed: <$dir>\n"; + } + } + return $ok; +} + +// }}} +// {{{ rm_rf() + +function rm_rf($path) +{ + if (@is_dir($path) && is_writable($path)) { + $dp = opendir($path); + while ($ent = readdir($dp)) { + if ($ent == '.' || $ent == '..') { + continue; + } + $file = $path . DIRECTORY_SEPARATOR . $ent; + if (@is_dir($file)) { + rm_rf($file); + } elseif (is_writable($file)) { + unlink($file); + } else { + echo $file . "is not writable and cannot be removed. +Please fix the permission or select a new path.\n"; + } + } + closedir($dp); + return rmdir($path); + } else { + return @unlink($path); + } +} + +// }}} +// {{{ tmpdir() +/* + * Fixes for winXP/wrong tmp set by Urs Gehrig (urs@circle.ch) + */ +function temp_dir($default=false) +{ + global $ptmp, $prefix; + + if ($default) { + if (!@is_dir($default)) { + if (!mkdir_p($default)) { + return false; + } + } + + /* try it really, is_writable is buggy with openbasedir */ + $fh = fopen(realpath($default) . "/test","wb"); + if ($fh) { + $ptmp = $default; + return true; + } else { + $ptmp = "failed"; + return false; + } + } + + $_temp = false; + if (WINDOWS){ + if ( my_env('TEMP') ) { + $_temp = my_env('TEMP'); + } elseif ( my_env('TMP') ) { + $_temp = my_env('TMP'); + } elseif ( my_env('windir') ) { + $_temp = my_env('windir') . '\temp'; + } elseif ( my_env('SystemRoot') ) { + $_temp = my_env('SystemRoot') . '\temp'; + } + + // handle ugly ENV var like \Temp instead of c:\Temp + $dirs = explode("\\", realpath($_temp)); + if(strpos($_temp, ":") != 1) { + unset($_temp); + $_dirs = array(); + foreach($dirs as $val) { + if((boolean)$val ) { + $_dirs[] = str_replace("/", "", $val); + } + } + unset($dirs); + $dirs = $_dirs; + array_unshift ($dirs, "c:" ); + $_temp = $dirs[0]; + for($i = 1;$i < count($dirs);$i++) { + $_temp .= "//" . $dirs[$i]; + } + } + $ptmp = $_temp; + } else { + $_temp = my_env('TMPDIR'); + if (!$_temp) { + if (is_writable('/tmp')) { + $_temp = '/tmp'; + } + } + } + + // If for some reason the user has no rights to access to + // the standard tempdir, we assume that he has the right + // to access his prefix and choose $prefix/tmp as tempdir + if (!$_temp) { + print "System's Tempdir failed, trying to use \$prefix/tmp ..."; + $res = mkdir_p($prefix.'/tmp'); + if (!$res) { + bail('mkdir '.$prefix.'/tmp'.' ... failed'); + } + + $ptmp = $prefix . '/tmp'; + $_temp = tempnam($prefix.'/tmp', 'gope'); + + rm_rf($_temp); + mkdir_p($_temp, 0700); + $ok = @chdir($ptmp); + + if (!$ok) { // This should not happen, really ;) + bail('chdir '.$ptmp.' ... failed'); + } + + print "ok\n"; + + // Adjust TEMPDIR envvars + if (!isset($_ENV)) { + $_ENV = array(); + } + $_ENV['TMPDIR'] = $_ENV['TEMP'] = $prefix.'/tmp'; + } else { + $_temp = tempnam($_temp.'/tmp', 'gope'); + } + $temp_dir = $ptmp = $_temp; + return true; +} + +// }}} +// {{{ my_env() +/* +(cox) In my system PHP 4.2.1 (both cgi & cli) $_ENV is empty + but getenv() does work fine +*/ +function my_env($var) +{ + if (is_array($_ENV) && isset($_ENV[$var])) { + return $_ENV[$var]; + } + return getenv($var); +} + +// }}} +// {{{ detect_install_dirs() + +function detect_install_dirs($_prefix = null) { + global $temp_dir, $prefix, $bin_dir, $php_dir, $php_bin, $doc_dir, $data_dir, $test_dir; + if (WINDOWS) { + if ($_prefix === null) { + $prefix = getcwd(); + } else { + $prefix = $_prefix; + } + + if (!@is_dir($prefix)) { + if (@is_dir('c:\php5')) { + $prefix = 'c:\php5'; + } elseif (@is_dir('c:\php4')) { + $prefix = 'c:\php4'; + } elseif (@is_dir('c:\php')) { + $prefix = 'c:\php'; + } + } + + $bin_dir = '$prefix'; + $php_dir = '$prefix\pear'; + $doc_dir = '$php_dir\docs'; + $data_dir = '$php_dir\data'; + $test_dir = '$php_dir\tests'; + $temp_dir = '$prefix\temp'; + + /* + * Detects php.exe + */ + if( $t=getenv('PHP_PEAR_PHP_BIN') ){ + $php_bin = $t; + } elseif ($t=getenv('PHP_BIN') ) { + $php_bin = $t; + } elseif ( $t=which('php') ) { + $php_bin = $t; + } elseif ( is_file($prefix.'\cli\php.exe') ) { + $php_bin = $prefix.'\cli\php.exe'; + } elseif ( is_file($prefix.'\php.exe') ) { + $php_bin = $prefix.'\php.exe'; + } + if( $php_bin && !is_file($php_bin) ){ + $php_bin = ''; + } else { + if(!ereg(":",$php_bin)){ + $php_bin = getcwd().DIRECTORY_SEPARATOR.$php_bin; + } + } + if (!is_file($php_bin)) { + if (is_file('c:/php/cli/php.exe')) { + $php_bin = 'c:/php/cli/php.exe'; + } elseif (is_file('c:/php5/php.exe')) { + $php_bin = 'c:/php5/php.exe'; + } elseif (is_file('c:/php4/cli/php.exe')) { + $php_bin = 'c:/php4/cli/php.exe'; + } + } + } else { + if ($_prefix === null) { + $prefix = dirname(PHP_BINDIR); + } else { + $prefix = $_prefix; + } + $bin_dir = '$prefix/bin'; + $php_dir = '$prefix/share/pear'; + $doc_dir = '$php_dir/docs'; + $data_dir = '$php_dir/data'; + $test_dir = '$php_dir/tests'; + $temp_dir = '$prefix/temp'; + + // check if the user has installed PHP with PHP or GNU layout + if (@is_dir("$prefix/lib/php/.registry")) { + $php_dir = '$prefix/lib/php'; + } elseif (@is_dir("$prefix/share/pear/lib/.registry")) { + $php_dir = '$prefix/share/pear/lib'; + $doc_dir = '$prefix/share/pear/docs'; + $data_dir = '$prefix/share/pear/data'; + $test_dir = '$prefix/share/pear/tests'; + } elseif (@is_dir("$prefix/share/php/.registry")) { + $php_dir = '$prefix/share/php'; + } + } +} + +// }}} +// {{{ displayHTMLHeader + +function displayHTMLHeader() +{ +?> + + + + PEAR :: Installer :: Go-PEAR + + + + + + + + + + + + + + + + + + + + + +
+ PEAR + +   + + Go-PEAR +
+ Version  
+
+ + + + + + + + + +
+ + + + +
+

+ + > + Welcome to Go-PEAR +
+ + + > + Configuration +
+ + +'; ?> + Complete installation
+'; ?> + +
+ 		+ + + + +
+ + + + + + +
+ + + Error
+
+\1', $value); + } + if (preg_match('/failed$/', $value)) { + $value = preg_replace('/(failed)$/', '\1', $value); + } + if (preg_match('/^install ok:/', $value)) { + $value = preg_replace('/^(install ok:)/', '\1', $value); + } + if (preg_match('/^Warning:/', $value)) { + $value = ''.$value.''; + } + + echo nl2br($value); + } elseif ($page == 'Welcome') { +?> + Welcome to go-pear !
+
+ Go-pear will install the Web Frontend of the PEAR Installer and all the needed
+ files. This frontend is your tool for PEAR installation and maintenance.
+
+ Go-pear also lets you download and install the PEAR packages bundled
+ with PHP: .
+
+ Next >> + +
+ Configuration
+
+ HTTP proxy (host:port): + + +


+ Below is a suggested file layout for your new PEAR installation.
+
+ + + + + +
+ + Note: Make sure that PHP has the permission to access the specified
+ directories.

+ +
+ +"; + foreach ($www_errors as $n => $var) { + echo "\n"; + } + } + + foreach ($GLOBALS['config_vars'] as $n => $var) { + printf('', + $n, + $GLOBALS['config_desc'][$var], + $var, + $GLOBALS[$var]); + } +?> +
"; + echo 'ERROR(S):'; + echo "
"; + echo ''.$GLOBALS['config_desc'][$n].': '; + echo ""; + echo ''.$www_errors[$n].''; + echo "
\n"; + echo "
%d. %s
+

+ The following PEAR packages are common ones, and can be installed
+ by go-pear too:
+.
+ > Install those too
+

+ + + + + +
+ + Note: Installation might take some time, because go-pear has to download
+ all needed files from pear.php.net. Just be patient and wait for the next
+ page to load.
+ +
+
+ Compatibility-Mode for old non-DOM Browsers
+ + + + + + + + +
+ + Warning: Your PHP version (4.1.1) might be imcompatible with go-pear due to a bug
+ in your PHP binary. If the installation crashes you might want to update your PHP version.
+ +
+ +
+ +
+ + Installation Complete - Summary
+ + Installation in progress ...
+
+ + + + + +
+ + + + + + + + + + + + + + + +
           0 %
+
+ + + + + + + + + + + + + + + + + +
           0 % 
+
+ +
+ +
+ + +
+
+ + + + ".$data; + } +?> +
+ + + + + +
+ + Note: To use PEAR without any problems you need to add your
+ PEAR Installation path ()
+ to your include_path.
+
+ Using a .htaccess file or directly edit httpd.conf would be working solutions
+ for Apache running servers, too.
+ +
+
+ For more information about PEAR, see:
+ PEAR FAQ
+ PEAR Manual
+
+ Thanks for using go-pear!
+
+ + + + + + +
+ + Warning: Go-PEAR was not able to determine the URL to the newly
+ installed Web Frontend of the PEAR Installer. Please access it manually.
+ Since you specified the prefix, you should know how to do so.
+ +
+ + Start Web Frontend of the PEAR Installer >> + + Start Web Frontend of the PEAR Installer >> + array( + 'type' => 'gif', + 'data' => 'R0lGODlhEQATAMQAAAAAACqUACiTAC2WAC+YAzKZBTSaBsHgszOZADCYADmcB4TCZp3Ohtfrzd/v1+by4PD47DaaAz+fDUijF2WyOlCoHvT58VqtJPn893y+S/v9+f7//f3+/Pz9+////////ywAAAAAEQATAAAFkqAnjiR5NGXqcdpCoapnMVRdWbEHUROVVROYalHJTCaVAKWTcjAUGckgQY04SJAFMhJJIL5e4a5I6X6/gwlkRIwOzucAY9SYZBRvOCKheIwYFxR5enxCLhVeemAHbBQVg4SMIoCCinsKVyIOdlKKAhQcJFpGiWgFQiIYPxeJCQEEcykcDIgDAwYUkjEWB70NGykhADs=', + ), + 'pearlogo' => array( + 'type' => 'gif', + 'data' => 'R0lGODlhaAAyAMT/AMDAwP3+/TWaAvD47Pj89vz++zebBDmcBj6fDEekFluvKmu3PvX68ujz4XvBS8LgrNXqxeHw1ZnPaa/dgvv9+cLqj8LmltD2msnuls3xmszwmf7+/f///wAAAAAAAAAAACH5BAEAAAAALAAAAABoADIAQAX/ICCOZGmeaKqubOtWWjwJphLLgH1XUu//C1Jisfj9YLEKQnSY3GaixWQqQTkYHM4AMulNLJFC9pEwIW/odKU8cqTfsWoTTtcomU4ZjbR4ZP+AgYKCG0EiZ1AuiossEhwEXRMEg5SVWQ6MmZqKWD0QlqCUEHubpaYlExwRPRZioZZVp7KzKQoSDxANDLsNXA5simd2FcQYb4YAc2jEU80TmAAIztPCMcjKdg4OEsZJmwIWWQPQI4ikIwtoVQnddgrv8PFlCWgYCwkI+fp5dkvJ/IlUKMCy6tYrDhNIIKLFEAWCTxse+ABD4SClWA0zovAjcUJFi6EwahxZwoGqHhFA/4IqoICkyxQSKkbo0gDkuBXV4FRAJkRCnTgi2P28IcEfk5xpWppykFJVuScmEvDTEETAVJ6bEpypcADPkz3pvKVAICHChkC7siQ08zVqu4Q6hgIFEFZuEn/KMgRUkaBmAQs+cEHgIiHVH5EAFpIgW4+NT6LnaqhDwe/Ov7YOmWZp4MkiAWBIl0kAVsJWuzcYpdiNgddc0E8cKBAu/FElBwagMb88ZZKDRAkWJtkWhHh3wwUbKHQJN3wQAaXGR2LpArv5oFHRR34C7Mf6oLXZNfqBgNI7oOLhj1f8PaGpygHQ0xtP8MDVKwYTSKcgxr9/hS6/pCCAAg5M4B9/sWh1YP9/XSgQWRML/idBfKUc4IBET9lFjggKhDYZAELZJYEBI2BDB3ouNBEABwE8gAwiCcSYgAKqPdEVAG7scM8BPPZ4AIlM+OgjAgpMhRE24OVoBwsIFEGFA7ZkQQBWienWxmRa7XDjKZXhBdAeSmKQwgLuUVLICa6VEKIGcK2mQWoVZHCBXJblJUFkY06yAXlGsPIHBEYdYiWHb+WQBgaIJqqoHFNpgMGB7dT5ZQuG/WbBAIAUEEFNfwxAWpokTIXJAWdgoJ9kRFG2g5eDRpXSBpEIF0oEQFaZhDbaSFANRgqcJoEDRARLREtxOQpsPO906ZUeJgjQB6dZUPBAdwcF8KLXXRVQaKFcsRRLJ6vMiiCNKxRE8ECZKgUA3Va4arOAAqdGRWO7uMZH5AL05gvsjQbg6y4NCjQ1kw8TVGcbdoKGKx8j3bGH7nARBArqwi0gkFJBrZiXBQRbHoIgnhSjcEBKfD7c3HMhz+JIQSY3t8GGKW+SUhfUajxGzKd0IoHBNkNQK86ZYEqdzYA8AHQpqXRUm80oHs1CAgMoBxzRqvzs9CIKECC1JBp7enUpfXHApwVYNAfo16c4IrYPLVdSAJVob7IAtCBFQGHcs/RRdiUDPHA33oADEAIAOw==', + ), + 'note' => array( + 'type' => 'png', + 'data' => 'iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAAAAADFHGIkAAAAAmJLR0QAAKqNIzIAAAEESURBVHjaZZIhksMwDEV9voWFSwsLA0MLDf8VdARBUUNBQ1FBHcErZ5M0baXJjOPnb0vfLuMMn3H+lWMgBKL89A1Eq9Q9IrwB+gIOsnMPBR8giMclguQfBGS8x5xIoPQxnxqb4LL/eQ4l2AVNONP2ZshLCqJ3qqzWtT5pNgNnLU4OcNbuiqaLmFmHGhJ0TCMC99+f2wphlhaOYjuQVc0IIzLH2BRWfQoWsNSjct8AVop4rF3belTuVAb3MRj6kLrcTwtIy+g03V1vC57t1XrMzqfP5pln5yLTkk7+5UhstvOni1X3ixLEdf2c36+W0Q7kOb48hnSRLI/XdNPfX4kpMkgP5R+elfdkDPprQgAAAEN0RVh0U29mdHdhcmUAQCgjKUltYWdlTWFnaWNrIDQuMi44IDk5LzA4LzAxIGNyaXN0eUBteXN0aWMuZXMuZHVwb250LmNvbZG6IbgAAAAqdEVYdFNpZ25hdHVyZQAzYmQ3NDdjNWU0NTgwNzAwNmIwOTBkZDNlN2EyNmM0NBTTk/oAAAAOdEVYdFBhZ2UAMjR4MjQrMCswclsJMQAAAABJRU5ErkJggg==', + ), + ); + + Header('Content-Type: image/'.$images[$img]['type']); + echo base64_decode($images[$img]['data']); +}; + +// }}} +// {{{ displayHTMLProgress + +function displayHTMLProgress($progress) +{ + if (!(WEBINSTALLER && isset($_SESSION['go-pear']['DHTML']) && $_SESSION['go-pear']['DHTML'])) { + return; + }; + $msg = ob_get_contents(); + ob_end_clean(); + + $msg = explode("\n", $msg); + foreach($msg as $key => $value) { + if (preg_match('/ok$/', $value)) { + $value = preg_replace('/(ok)$/', '\1', $value); + }; + if (preg_match('/failed$/', $value)) { + $value = preg_replace('/(failed)$/', '\1', $value); + }; + if (preg_match('/^install ok:/', $value)) { + $value = preg_replace('/^(install ok:)/', '\1', $value); + }; + if (preg_match('/^Warning:/', $value)) { + $value = ''.$value.''; + }; + $msg[$key] = $value; + }; + $msg = implode('
', $msg); + + $msg.=''; + + echo $msg; + ob_start(); +}; + +// }}} +// {{{ displayHTMLDownloadProgress + +function displayHTMLDownloadProgress($progress) +{ + if (!(WEBINSTALLER && isset($_SESSION['go-pear']['DHTML']) && $_SESSION['go-pear']['DHTML'])) { + return; + }; + $msg = ob_get_contents(); + ob_end_clean(); + + echo ''; + + ob_start(); + echo $msg; +}; + +// }}} +// {{{ displayHTMLSetDownload + +function displayHTMLSetDownload($file) +{ + if (!(WEBINSTALLER && isset($_SESSION['go-pear']['DHTML']) && $_SESSION['go-pear']['DHTML'])) { + return; + }; + $msg = ob_get_contents(); + ob_end_clean(); + + echo ''; + + ob_start(); + echo $msg; +}; + +// }}} +// {{{ win32BrowseForFolder + +/* + * Create a vbs script to browse the getfolder dialog, called + * by cscript, if it's available. + * $label is the label text in the header of the dialog box + * + * TODO: + * - Do not show Control panel + * - Replace WSH with calls to w32 as soon as callbacks work + * @Author Pierrre-Alain Joye + */ +function win32BrowseForFolder($label) +{ + global $ptmp; + static $wshSaved=false; + static $cscript=''; +$wsh_browserfolder = 'Option Explicit +Dim ArgObj, var1, var2, sa, sFld +Set ArgObj = WScript.Arguments +Const BIF_EDITBOX = &H10 +Const BIF_NEWDIALOGSTYLE = &H40 +Const BIF_RETURNONLYFSDIRS = &H0001 +Const BIF_DONTGOBELOWDOMAIN = &H0002 +Const BIF_STATUSTEXT = &H0004 +Const BIF_RETURNFSANCESTORS = &H0008 +Const BIF_VALIDATE = &H0020 +Const BIF_BROWSEFORCOMPUTER = &H1000 +Const BIF_BROWSEFORPRINTER = &H2000 +Const BIF_BROWSEINCLUDEFILES = &H4000 +Const OFN_LONGNAMES = &H200000 +Const OFN_NOLONGNAMES = &H40000 +Const ssfDRIVES = &H11 +Const ssfNETWORK = &H12 +Set sa = CreateObject("Shell.Application") +var1=ArgObj(0) +Set sFld = sa.BrowseForFolder(0, var1, BIF_EDITBOX + BIF_VALIDATE + BIF_BROWSEINCLUDEFILES + BIF_RETURNFSANCESTORS+BIF_NEWDIALOGSTYLE , ssfDRIVES ) +if not sFld is nothing Then + if not left(sFld.items.item.path,1)=":" Then + WScript.Echo sFld.items.item.path + Else + WScript.Echo "invalid" + End If +Else + WScript.Echo "cancel" +End If +'; + if( !$wshSaved){ + $cscript = $ptmp.DIRECTORY_SEPARATOR."bf.vbs"; + $fh = fopen($cscript,"wb+"); + fwrite($fh,$wsh_browserfolder,strlen($wsh_browserfolder)); + fclose($fh); + $wshSaved = true; + } + exec('cscript '.$cscript.' "'.$label.'" //noLogo',$arPath); + if($arPath[0]=='' || $arPath[0]=='cancel'){ + return ''; + } elseif ($arPath[0]=='invalid') { + echo "Invalid Path.\n"; + return ''; + } + return $arPath[0]; +} + +// }}} +// {{{ win32CreateRegEnv + +/* + * Generates a registry addOn for Win32 platform + * This addon set PEAR environment variables + * @Author Pierrre-Alain Joye + */ +function win32CreateRegEnv() +{ + global $prefix, $bin_dir, $php_dir, $php_bin, $doc_dir, $data_dir, $test_dir, $temp_dir; + $nl = "\r\n"; + $reg ='REGEDIT4'.$nl. + '[HKEY_CURRENT_USER\Environment]'.$nl. + '"PHP_PEAR_SYSCONF_DIR"="'.addslashes($prefix).'"'.$nl. + '"PHP_PEAR_INSTALL_DIR"="'.addslashes($php_dir).'"'.$nl. + '"PHP_PEAR_DOC_DIR"="'.addslashes($doc_dir).'"'.$nl. + '"PHP_PEAR_BIN_DIR"="'.addslashes($bin_dir).'"'.$nl. + '"PHP_PEAR_DATA_DIR"="'.addslashes($data_dir).'"'.$nl. + '"PHP_PEAR_PHP_BIN"="'.addslashes($php_bin).'"'.$nl. + '"PHP_PEAR_TEST_DIR"="'.addslashes($test_dir).'"'.$nl; + + $fh = fopen($prefix.DIRECTORY_SEPARATOR.'PEAR_ENV.reg','wb'); + if($fh){ + fwrite($fh, $reg ,strlen($reg)); + fclose($fh); + echo " + +* WINDOWS ENVIRONMENT VARIABLES * +For convenience, a REG file is available under $prefix\\PEAR_ENV.reg . +This file creates ENV variables for the current user. + +Double-click this file to add it to the current user registry. + +"; + } +} + +// }}} +// {{{ win32DetectPHPSAPI + +/* + * Try to detect the kind of SAPI used by the + * the given php.exe. + * @Author Pierrre-Alain Joye + */ +function win32DetectPHPSAPI() +{ + global $php_bin,$php_sapi_name; + if (WEBINSTALLER) { + return $php_sapi_name; + } + if($php_bin!=''){ + exec($php_bin.' -v', $res); + if(is_array($res)) { + if( isset($res[0]) && strpos($res[0],"(cli)")) { + return 'cli'; + } + if( isset($res[0]) && strpos($res[0],"cgi")) { + return 'cgi'; + } else { + return 'unknown'; + } + } + } + return 'unknown'; +} + +// }}} +// {{{ getPhpiniPath + +/* + * Get the php.ini file used with the current + * process or with the given php.exe + * + * Horrible hack, but well ;) + * + * Not used yet, will add the support later + * @Author Pierre-Alain Joye + */ +function getPhpiniPath() +{ + $pathIni = get_cfg_var('cfg_file_path'); + if( $pathIni && is_file($pathIni) ){ + return $pathIni; + } + + // Oh well, we can keep this too :) + // I dunno if get_cfg_var() is safe on every OS + if (WINDOWS) { + // on Windows, we can be pretty sure that there is a php.ini + // file somewhere + do { + $php_ini = PHP_CONFIG_FILE_PATH . DIRECTORY_SEPARATOR . 'php.ini'; + if ( @file_exists($php_ini) ) break; + $php_ini = 'c:\winnt\php.ini'; + if ( @file_exists($php_ini) ) break; + $php_ini = 'c:\windows\php.ini'; + } while (false); + } else { + $php_ini = PHP_CONFIG_FILE_PATH . DIRECTORY_SEPARATOR . 'php.ini'; + } + + if( @is_file($php_ini) ){ + return $php_ini; + } + + // We re running in hackz&troubles :) + ob_implicit_flush(false); + ob_start(); + phpinfo(INFO_GENERAL); + $strInfo = ob_get_contents (); + ob_end_clean(); + ob_implicit_flush(true); + + if ( php_sapi_name() != 'cli' ) { + $strInfo = strip_tags($strInfo,''); + $arrayInfo = explode("", $strInfo ); + $cli = false; + } else { + $arrayInfo = explode("\n",$strInfo); + $cli = true; + } + + foreach($arrayInfo as $val){ + if ( strpos($val,"php.ini") ) { + if($cli){ + list(,$pathIni) = explode('=>',$val); + } else { + $pathIni = strip_tags(trim($val) ); + } + $pathIni = trim($pathIni); + if(is_file($pathIni)){ + return $pathIni; + } + } + } + + return false; +} + +// }}} +// {{{ alterPhpIni + +/* + * Not optimized, but seems to work, if some nice + * peardev will test it? :) + * + * @Author Pierre-Alain Joye + */ +function alterPhpIni($pathIni='') +{ + global $php_dir, $prefix; + + $iniSep = WINDOWS?';':':'; + + if( $pathIni=='' ){ + $pathIni = getphpinipath(); + } + + $arrayIni = file($pathIni); + $i=0; + $found=0; + + // Looks for each active include_path directives + foreach ( $arrayIni as $iniLine ) { + $iniLine = trim($iniLine); + $iniLine = str_replace(array("\n","\r"),array(),$iniLine); + if( preg_match("/^include_path/",$iniLine) ){ + $foundAt[] = $i; + $found++; + } + $i++; + } + + if ( $found ) { + $includeLine = $arrayIni[$foundAt[0]]; + list(,$currentPath)=explode('=',$includeLine); + + $currentPath = trim($currentPath); + if(substr($currentPath,0,1)=='"'){ + $currentPath = substr($currentPath,1,strlen($currentPath)-2); + } + + $arrayPath = explode($iniSep, $currentPath); + if( $arrayPath[0]=='.' ){ + $newPath[0] = '.'; + $newPath[1] = $php_dir; + array_shift($arrayPath); + } else { + $newPath[0] = $php_dir; + } + + foreach( $arrayPath as $path ){ + $newPath[]= $path; + } + } else { + $newPath[0] = '.'; + $newPath[1] = $php_dir; + + } + $nl = WINDOWS?"\r\n":"\n"; + $includepath = 'include_path="'.implode($iniSep,$newPath).'"'; + $newInclude = "$nl$nl;***** Added by go-pear$nl". + $includepath. + $nl.";*****". + $nl.$nl; + + $arrayIni[$foundAt[0]] = $newInclude; + + for( $i=1; $i<$found; $i++){ + $arrayIni[$foundAt[$i]]=';'.trim($arrayIni[$foundAt[$i]]); + } + + $newIni = implode("",$arrayIni); + if ( !($fh = @fopen($pathIni, "wb+")) ){ + $prefixIni = $prefix.DIRECTORY_SEPARATOR."php.ini-gopear"; + $fh = fopen($prefixIni, "wb+"); + if ( !$fh ) { + echo +" +****************************************************************************** +WARNING! I cannot write to $pathIni nor in $prefix/php.ini-gopear. Please +modify manually your php.ini by adding: + +$includepath + +"; + return false; + } else { + fwrite($fh, $newIni, strlen($newIni)); + fclose($fh); + echo +" +****************************************************************************** +WARNING! I cannot write to $pathIni, but I succesfully created a php.ini +under <$prefix/php.ini-gopear>. Please replace the file <$pathIni> with +<$prefixIni> or modify your php.ini by adding: + +$includepath + +"; + + } + } else { + fwrite($fh, $newIni, strlen($newIni)); + fclose($fh); + echo " +php.ini <$pathIni> include_path updated. +"; + } + return true; +} diff --git a/lang/pear/files/pear.sh b/lang/pear/files/pear.sh new file mode 100644 index 00000000000..f61c8cc0cc5 --- /dev/null +++ b/lang/pear/files/pear.sh @@ -0,0 +1,30 @@ +#!@SH@ +# +# $Id: pear.sh,v 1.1.1.1 2007/05/05 21:21:47 adrianp Exp $ + +# first find which PHP binary to use +if test "x$PHP_PEAR_PHP_BIN" != "x"; then + PHP="$PHP_PEAR_PHP_BIN" +else + if test "@php_bin@" = '@'php_bin'@'; then + PHP=php + else + PHP="@php_bin@" + fi +fi + +# then look for the right pear include dir +if test "x$PHP_PEAR_INSTALL_DIR" != "x"; then + INCDIR=$PHP_PEAR_INSTALL_DIR + INCARG="-d include_path=$PHP_PEAR_INSTALL_DIR" +else + if test "@php_dir@" = '@'php_dir'@'; then + INCDIR=`dirname $0` + INCARG="" + else + INCDIR="@php_dir@" + INCARG="-d include_path=@php_dir@" + fi +fi + +exec $PHP -C -q $INCARG -d output_buffering=1 -d open_basedir="" -d safe_mode=0 -d register_argc_argv="On" -d auto_prepend_file="" -d auto_append_file="" -d memory_limit=12M $INCDIR/pearcmd.php "$@" diff --git a/lang/pear/patches/patch-aa b/lang/pear/patches/patch-aa new file mode 100644 index 00000000000..7c268726e2b --- /dev/null +++ b/lang/pear/patches/patch-aa @@ -0,0 +1,143 @@ +$NetBSD: patch-aa,v 1.1.1.1 2007/05/05 21:21:47 adrianp Exp $ + +--- install/go-pear.php.orig 2007-04-15 23:09:15.000000000 +0100 ++++ install/go-pear.php +@@ -311,6 +311,8 @@ if (WEBINSTALLER) { + $install_pfc = $_SESSION['go-pear']['install_pfc']; + } + ++/* ++ + if (!WEBINSTALLER) { + $tty = WINDOWS ? @fopen('\con', 'r') : @fopen('/dev/tty', 'r'); + +@@ -355,6 +357,8 @@ If you wish to abort, press Control-C no + } + } + ++*/ ++ + $origpwd = getcwd(); + + $config_vars = array_keys($config_desc); +@@ -426,6 +430,8 @@ we strongly recommand to use it. + } + } + ++/* ++ + while (!WEBINSTALLER) { + print " + Below is a suggested file layout for your new PEAR installation. To +@@ -509,6 +515,8 @@ If you have a CLI (or CGI) php.exe avail + } + } + ++*/ ++ + foreach ($config_vars as $n => $var) { + for ($m = 1; $m <= count($config_vars); $m++) { + $var2 = $config_vars[$m]; +@@ -576,6 +584,8 @@ Run this script as $root or pick another + } + } + ++/* ++ + if (!WEBINSTALLER) { + $msg = "The following PEAR packages are bundled with PHP: " . + implode(', ', $pfc_packages); +@@ -585,6 +595,8 @@ if (!WEBINSTALLER) { + print "\n"; + } + ++*/ ++ + #### + # Download + #### +@@ -595,6 +607,8 @@ if (function_exists('set_include_path')) + ini_set('include_path', $ptmp); + } + ++/* ++ + if (!extension_loaded('zlib') && !WEBINSTALLER) { // In Web context we could be in multithread env which makes dl() end up with a fatal error. + if (WINDOWS) { + @dl('php_zlib.dll'); +@@ -620,6 +634,8 @@ if (!$have_gzip) { + print "Downloading uncompressed packages\n"; + }; + ++*/ ++ + if ($install_pfc) { + $to_install = array_merge($installer_packages, $pfc_packages); + } else { +@@ -776,7 +792,7 @@ include_once "PEAR/Command.php"; + include_once "PEAR/Registry.php"; + + if (WEBINSTALLER || isset($_SERVER['argv'][1]) && $_SERVER['argv'][1] == 'local') { +- $config = &PEAR_Config::singleton($prefix."/pear.conf", ''); ++ $config = &PEAR_Config::singleton("@PKG_SYSCONFDIR@"."/pear.conf", ''); + } else { + $config = &PEAR_Config::singleton(); + } +@@ -814,6 +830,8 @@ displayHTMLProgress($progress = 99); + + // Base installation finished + ++/* ++ + ini_restore("include_path"); + + if (!WEBINSTALLER) { +@@ -971,6 +989,9 @@ if ( WINDOWS ) { + if (WINDOWS && !WEBINSTALLER) { + win32CreateRegEnv(); + } ++ ++*/ ++ + // Set of functions following + + // {{{ download_url() +@@ -1367,16 +1388,18 @@ function detect_install_dirs($_prefix = + } + } else { + if ($_prefix === null) { +- $prefix = dirname(PHP_BINDIR); ++ $prefix = "@PREFIX@"; + } else { + $prefix = $_prefix; + } + $bin_dir = '$prefix/bin'; +- $php_dir = '$prefix/share/pear'; +- $doc_dir = '$php_dir/docs'; ++ $php_dir = '$prefix/lib/php'; ++ $doc_dir = '$php_dir/doc'; + $data_dir = '$php_dir/data'; +- $test_dir = '$php_dir/tests'; +- $temp_dir = '$prefix/temp'; ++ $test_dir = '$php_dir/test'; ++ $temp_dir = '/tmp'; ++ ++/* + + // check if the user has installed PHP with PHP or GNU layout + if (@is_dir("$prefix/lib/php/.registry")) { +@@ -1389,6 +1412,9 @@ function detect_install_dirs($_prefix = + } elseif (@is_dir("$prefix/share/php/.registry")) { + $php_dir = '$prefix/share/php'; + } ++ ++*/ ++ + } + } + +@@ -2494,3 +2520,4 @@ php.ini <$pathIni> include_path updated. + } + return true; + } ++?> -- cgit v1.2.3