git.m6w6.name Git - m6w6/replicator/blob - bin/pecl

   1 #!/usr/bin/php -dphar.readonly=0
   2 <?php
   3
   4 ini_set("display_errors", 0);
   5 ini_set("log_errors", 1);
   6
   7 $what = !empty($argv[1]) ? $argv[1] : "latest";
   8 $pids = [];
   9
  10 function fail($pkg, $ver, $skp, $fmt) {
  11         $msg = call_user_func_array("sprintf", array_slice(func_get_args(), 3));
  12         fprintf(STDERR, "FAILURE: %s-%s, %s; skipping next time\n", $pkg, $ver, $msg);
  13         touch($skp);
  14 }
  15
  16 function wait(&$pids) {
  17         $status = null;
  18         switch ($pid = pcntl_wait($status)) {
  19                 case -1:
  20                         // meh
  21                         break;
  22                 default:
  23                         extract($pids[$pid]);
  24                         unset($pids[$pid]);
  25                         if (pcntl_wifexited($status) && ($rc = pcntl_wexitstatus($status))) {
  26                                 fail($pkg, $ver, $skp, "exit code: %d", $rc);
  27                         } elseif (pcntl_wifsignaled($status) && ($rc = pcntl_wtermsig($status))) {
  28                                 fail($pkg, $ver, $skp, "signal: %d", $rc);
  29                         } else {
  30                                 printf("SUCCESS: %s-%s\n", $pkg, $ver);
  31                         }
  32                         break;
  33         }
  34         return $pid > 0;
  35 };
  36
  37 function work($url, $dir) {
  38         is_dir($dir) || mkdir($dir, 0777, true);
  39         require_once __DIR__."/../vendor/autoload.php";
  40         $packager = new pharext\Packager;
  41         $packager->run(5, [
  42                 $_SERVER["argv"][0],
  43                 "-qps",
  44                 $url,
  45                 "-Zzd",
  46                 $dir
  47         ]);
  48 };
  49
  50 if (($sxe = simplexml_load_file("http://pecl.php.net/feeds/$what.rss"))) {
  51         foreach ($sxe->item as $item) {
  52                 $url = (string) $item->link;
  53                 $pkg = basename(dirname($url));
  54                 $ver = basename($url);
  55                 $skp = sprintf("%s/../build/%s-%s.skip", __DIR__, $pkg, $ver);
  56                 $ext = sprintf("%s/../public/phars/%s/%s-%s.ext.phar", __DIR__, $pkg, $pkg, $ver);
  57                 $dir = dirname($ext);
  58
  59                 if (!is_file($skp) && !is_file($ext)) {
  60                         switch ($pid = pcntl_fork()) {
  61                                 case -1:
  62                                         exit;
  63                                 case 0:
  64                                         work($url, $dir);
  65                                         exit;
  66                                 default:
  67                                         $pids[$pid] = compact("url", "pkg", "ver", "skp", "ext", "dir");
  68                                         break;
  69                         }
  70                 }
  71
  72                 if (count($pids) > 5) {
  73                         wait($pids);
  74                 }
  75         }
  76         while (wait($pids))
  77                 ;
  78
  79 }
  80
  81