/**
* Execute this action
*
* @param string[] $args command line args
* @return int exit code
*/
public function perform($args)
{
$cwd = new FileCollection('.');
// Parse args
$i = 1;
if ('-r' === $args[0]) {
$remote = true;
array_shift($args);
$i++;
} else {
if ('-i' === $args[0]) {
$remote = false;
array_shift($args);
$i++;
$installed = new File($args[0] . '.json');
} else {
$installed = new File($args[0] . '.json');
$remote = !$installed->exists();
}
}
if (empty($args)) {
Console::$err->writeLine('*** Missing argument #', $i, ': Module name');
return 2;
}
sscanf(rtrim($args[0], '/'), '%[^@]@%s', $name, $version);
$module = Module::valueOf($name);
// Search for module
if ($remote) {
Console::writeLine('@', $this->api->getBase()->getURL());
$request = create(new RestRequest('/vendors/{vendor}/modules/{module}'))->withSegment('vendor', $module->vendor)->withSegment('module', $module->name);
try {
$result = $this->api->execute($request)->data();
} catch (RestException $e) {
Console::$err->writeLine('*** Cannot find remote module ', $module, ': ', $e->getMessage());
return 3;
}
$releases = $result['releases'];
} else {
Console::writeLine('@', $cwd->getURI());
try {
$result = self::$json->decodeFrom($installed->getInputStream());
} catch (IOException $e) {
Console::$err->writeLine('*** Cannot find installed module ', $module, ': ', $e->getMessage());
return 3;
}
$releases = $this->installedReleases($cwd, $module);
}
Console::writeLine(new Module($result['vendor'], $result['module']), ': ', $result['info']);
Console::writeLine($result['link']['url']);
uksort($releases, function ($a, $b) {
return version_compare($a, $b, '<');
});
Console::writeLine('Releases: ', sizeof($releases), ', list {');
foreach ($releases as $version => $release) {
$s = '';
foreach ($release as $key => $value) {
$s .= ', ' . $key . '= ' . \xp::stringOf($value);
}
Console::writeLine(' ', $version, ' (', substr($s, 2), ')');
}
Console::writeLine('}');
// List active releases for local queries
if (!$remote) {
foreach (new FilteredIOCollectionIterator($cwd, new NameMatchesFilter('#^\\.' . $module->vendor . '\\.' . $module->name . '.*\\.pth#')) as $found) {
$r = new StringReader($found->getInputStream());
Console::writeLine('Selected: ', basename($found->getURI()), ', class path {');
while (null !== ($line = $r->readLine())) {
$resolved = realpath($cwd->getURI() . ltrim($line, '!'));
if (is_dir($resolved)) {
$cl = \lang\FileSystemClassLoader::instanceFor($resolved, false);
} else {
if (is_file($resolved)) {
$cl = \lang\archive\ArchiveClassLoader::instanceFor($resolved, false);
}
}
Console::writeLine(' ', $cl);
}
Console::writeLine('}');
}
return 0;
}
}
/**
* Create a property file from an io.File object
*
* @deprecated Use load() method instead
* @param io.File file
* @return util.Properties
* @throws io.IOException in case the file given does not exist
*/
public static function fromFile(File $file)
{
$self = new self($file->getURI());
$self->load($file->getInputStream());
return $self;
}
