Add manpage and usage and version to packimage

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@852 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2008-03-20 14:45:08 +00:00
parent 0c0ec38b6e
commit bdf7d0f41c
2 changed files with 14 additions and 2 deletions

View File

@ -9,7 +9,7 @@ I<packimage [-h| --help]>
I<packimage [-v| --version]>
I<packimage [-o OS] [ -p profile] [-a architecture]>
I<packimage [-o OS] [ -p profile] [-a architecture] [-m method]>
=head1 DESCRIPTION
@ -33,6 +33,8 @@ B<-p> Profile (compute,service)
B<-a> Architecture (ppc64,x86_64,etc)
B<-m> Method (default cpio)
=head1 RETURN VALUE

View File

@ -33,8 +33,18 @@ sub process_request {
"profile|p=s" => \$profile,
"arch|a=s" => \$arch,
"osver|o=s" => \$osver,
"method|m=s" => \$method
"method|m=s" => \$method,
"help|h" => \$help,
"version|v" => \$version
);
if ($version) {
$callback->({info=>["Version 2.0"]});
return;
}
if ($help) {
$callback->({info=>["packimage -h \npackimage -v \npackimage [-p profile] [-a architecture] [-o OS] [-m method]\n"]});
return;
}
my $distname = $osver;
until (-r "$::XCATROOT/share/xcat/netboot/$distname/" or not $distname) {
chop($distname);