2002-01-30 12:20:12 +00:00
|
|
|
<?php
|
|
|
|
|
|
|
|
$remote = new PEAR_Remote($config);
|
|
|
|
$result = $remote->call('package.listAll', 1);
|
|
|
|
$i = $j = 0;
|
2002-02-07 20:50:08 +00:00
|
|
|
|
|
|
|
if (PEAR::isError($result)) {
|
|
|
|
die("\n\n Error while executing command!\n\n");
|
|
|
|
}
|
|
|
|
|
2002-01-30 12:20:12 +00:00
|
|
|
heading("Available packages");
|
2002-02-13 01:07:30 +00:00
|
|
|
|
2002-01-30 12:20:12 +00:00
|
|
|
foreach ($result as $package => $info) {
|
|
|
|
if ($i++ % 20 == 0) {
|
|
|
|
if ($j++ > 0) {
|
|
|
|
print "\n";
|
|
|
|
}
|
|
|
|
printf("%-20s %-10s %-15s %s\n",
|
|
|
|
"Package", "Stable", "Lead", "Category");
|
|
|
|
print str_repeat("-", 75)."\n";
|
|
|
|
}
|
|
|
|
if (empty($info['stable'])) {
|
|
|
|
$info['stable'] = '(none)';
|
|
|
|
}
|
|
|
|
$stable = (string)$info['stable'];
|
2002-02-13 01:07:30 +00:00
|
|
|
printf("%-20s %-10s %-15s %s\n", $package,
|
2002-01-30 12:20:12 +00:00
|
|
|
$info['stable'], $info['lead'], $info['category']);
|
|
|
|
}
|
|
|
|
|
|
|
|
?>
|