cvs: phpdoc /scripts/iniupdate pecl.php update-all.php

nlopess Wed Sep 5 18:15:55 2007 UTC Added files: /phpdoc/scripts/iniupdate pecl.php Modified files: /phpdoc/scripts/iniupdate update-all.php Log: add functions to download PECL packages. mostly stolen from Sean's functable http://cvs.php.net/viewvc.cgi/phpdoc/scripts/iniupdate/update-all.php?r1=1.4&r2=1.5&diff_format=u Index: phpdoc/scripts/iniupdate/update-all.php diff -u phpdoc/scripts/iniupdate/update-all.php:1.4 phpdoc/scripts/iniupdate/update-all.php:1.5 --- phpdoc/scripts/iniupdate/update-all.php:1.4 Wed Sep 5 15:12:16 2007 +++ phpdoc/scripts/iniupdate/update-all.php Wed Sep 5 18:15:55 2007 @@ -18,31 +18,62 @@ */ require_once './cvs-versions.php'; +require_once './pecl.php'; + + +/** find a dir in a case-insensitive way */ +function try_dir_combinations($dir) +{ + $len = strlen($dir); + $pattern = ''; + + for ($i=0; $i<$len; ++$i) { + if (ctype_alpha($dir[$i])) { + $pattern .= '['.strtolower($dir[$i]).strtoupper($dir[$i]).']'; + } else { + $pattern .= $dir[$i]; + } + } + + $match = glob($pattern); + + return $match ? $match[0] : null; +} /** fetch a tag sources */ -function checkout_tag($tag) +function download_sources($url, $dir, $filename, $finaldir) { - if (is_dir($tag)) { + if (is_dir(try_dir_combinations($finaldir))) { echo "already there\n"; return; } - // $tag = PHP_x_x_x - $majorversion = substr($tag, 4, 1); - $dir = 'php-'.strtr(substr($tag, 4), '_', '.'); - $filename = "$dir.tar.gz"; - - if (!@copy("http://museum.php.net/php$majorversion/$filename", $filename)) { + if (!@copy($url, $filename)) { echo "\033[1;31mFAILED\033[0m\n"; return; } - $cmds[] = "tar xfz $filename"; - $cmds[] = "mv $dir $tag"; + $filename = escapeshellarg($filename); + + tar xfz $filename 2>&1 | grep -v "A lone zero block at"; // also skip some warnings from tar + + // this is needed because PECL packages differ + $dir = try_dir_combinations($dir); + if (!$dir) { + die("directory not found for the following file: $filename\n"); + } + + $dir = escapeshellarg($dir); + $finaldir = escapeshellarg($finaldir); + + if ($finaldir != $dir) { + $cmds[] = "mv $dir $finaldir"; + } + $cmds[] = "rm $filename"; - $cmds[] = 'find ' .escapeshellarg($tag). ' -type f -and -not -name "*.[chly]" -and -not -name "*.ec" -and -not -name "*.lex" | xargs rm -f'; - $cmds[] = 'while ( find ' .escapeshellarg($tag). ' -depth -type d -and -empty | xargs rm -r 2>/dev/null ) ; do true ; done'; + $cmds[] = 'find ' .$finaldir. ' -type f -and -not -name "*.[chly]" -and -not -name "*.ec" -and -not -name "*.lex" | xargs rm -f'; + $cmds[] = 'while ( find ' .$finaldir. ' -depth -type d -and -empty | xargs rm -r 2>/dev/null ) ; do true ; done'; foreach ($cmds as $cmd) { exec($cmd); @@ -52,6 +83,19 @@ } +/** fetch a tag sources */ +function checkout_tag($tag) +{ + // $tag = PHP_x_x_x + $majorversion = substr($tag, 4, 1); + $dir = 'php-'.strtr(substr($tag, 4), '_', '.'); + $filename = "$dir.tar.gz"; + $url = "http://museum.php.net/php$majorversion/$filename"; + + download_sources($url, $dir, $filename, $tag); +} + + chdir('sources'); foreach (get_php_release_tags() as $tag) { @@ -67,4 +111,6 @@ echo "done\n"; } +updare_pecl_sources(); + chdir('..'); http://cvs.php.net/viewvc.cgi/phpdoc/scripts/iniupdate/pecl.php?view=markup&rev=1.1 Index: phpdoc/scripts/iniupdate/pecl.php +++ phpdoc/scripts/iniupdate/pecl.php <?php /* +----------------------------------------------------------------------+ | ini doc settings updater | +----------------------------------------------------------------------+ | Copyright (c) 1997-2007 The PHP Group | +----------------------------------------------------------------------+ | This source file is subject to version 3.0 of the PHP license, | | that is bundled with this package in the file LICENSE, and is | | available through the world-wide-web at the following url: | | 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 world-wide-web, please send a note to | | license@php.net so we can mail you a copy immediately. | +----------------------------------------------------------------------+ | Authors: Nuno Lopes <nlopess@php.net> | +----------------------------------------------------------------------+ */ /** returns an array with the PECL packages */ function get_pecl_packages() { $packages = array(); $XE = @new SimpleXMLElement('http://pecl.php.net/rest/p/packages.xml', NULL, true); foreach ($XE as $Element) { if ($Element->getName() == 'p') { $packages[] = strtolower((string) $Element); } } return $packages; } /** returns an array with the releases of the given PECL package */ function get_pecl_releases($package) { try { $releases = array(); $XE = @new SimpleXMLElement("http://pecl.php.net/rest/r/$package/allreleases.xml", NULL, true); //@ sucks, but the XML doesn't like me foreach ($XE as $Element) { if ($Element->getName() == 'r') { if (preg_match('/\d+\.\d+(?:\.\d+)?$/', (string) $Element->v)) { $releases[] = (string) $Element->v; } } } sort($releases); return $releases; } catch (Exception $e) { print_r($e); exit; } } /** download a PECL release (if needed) */ function grab_pecl_release($package, $release) { $url = 'http://pecl.php.net/get/'. urlencode($package) . '-' . urlencode($release); $dir = "$package-$release"; $file = "$dir.tgz"; download_sources($url, $dir, $file, $dir); } /** update PECL sources */ function updare_pecl_sources() { foreach (get_pecl_packages() as $pkg) { $releases = get_pecl_releases($pkg); foreach ($releases as $ver) { echo "fetching PECL package: $pkg-$ver... "; grab_pecl_release($pkg, $ver); } } }