arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fir rpm name and missing installp_bundle issues

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@12616 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
nott 2012-05-11 11:11:31 +00:00
parent 8e48144ba3
commit f362b67fdb
1 changed files with 28 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
xCAT-server/lib/xcat/plugins/aixinstall.pm
View File

@ -1942,9 +1942,28 @@ sub chkosimage
if ($imagedef{$image_name}{installp_bundle})
{
my @bndlist = split(/,/, $imagedef{$image_name}{installp_bundle});
# Get a list of the defined NIM installp_bundle resources
#
my $cmd = qq~/usr/sbin/lsnim -t installp_bundle | /usr/bin/cut -f1 -d' ' 2>/dev/null~;
my @instp_bnds = xCAT::Utils->runcmd("$cmd", -1);
if ($::RUNCMD_RC != 0)
{
my $rsp;
push @{$rsp->{data}}, "Could not get NIM installp_bundle definitions.";
xCAT::MsgUtils->message("E", $rsp, $callback);
}
foreach my $bnd (@bndlist)
{
$bnd =~ s/\s*//g; # remove blanks
# make sure the NIM installp_bundle resource is defined
if (!grep(/^$bnd$/, @instp_bnds) ) {
next;
}
my ($rc, $list, $loc) = xCAT::InstUtils->readBNDfile($callback, $bnd, $nimprime, $subreq);
foreach my $pkg (@$list)
{
@ -1996,8 +2015,10 @@ sub chkosimage
# get rpm packages
my $rcmd = qq~/usr/bin/ls $rpm_srcdir 2>/dev/null~;
my @rlist = xCAT::Utils->runcmd("$rcmd", -1);
foreach my $f (@rlist) {
if ($f =~ /\.rpm/) {
if (!grep(/^$f$/, @srclist)) {
push (@srclist, $f);
}
@ -2015,9 +2036,11 @@ sub chkosimage
}
}
# get installp filesets in this dir
my $icmd = qq~installp -L -d $instp_srcdir | /usr/bin/cut -f2 -d':' 2>/dev/null~;
my @ilist = xCAT::Utils->runcmd("$icmd", -1);
foreach my $f (@ilist) {
chomp $f;
push (@srclist, $f);
@ -2027,6 +2050,7 @@ sub chkosimage
my $rpmerror = 0;
my $remlist;
# check for each one - give msg if missing
foreach my $file (@install_list) {
$file =~ s/\*//g;
@ -2043,7 +2067,9 @@ sub chkosimage
my $foundlist = "";
foreach my $lppfile (@srclist) {
if ($lppfile =~ /$file/) {
# need both these checks to cover different naming issues
if ( ($lppfile eq $file) || ($lppfile =~ /^$file/)) {
$foundit++;
$foundlist .= "$lppfile ";
}
@ -11315,6 +11341,7 @@ sub checkNIMnetworks
Also does the NIM setup for additional networks if necessary.
Arguments:
Returns:
0 - OK