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

defect 3150, check for errors from DB. We can do itgit diff tabutils.pm

Browse Source
This commit is contained in:
lissav 2013-09-19 13:06:08 -04:00
parent 9f7f09d0f7
commit 25c5e4686a
1 changed files with 19 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
xCAT-server/lib/xcat/plugins/tabutils.pm
View File

@ -532,7 +532,7 @@ sub tabrestore
next LINE;
}
#TODO: check for error from DB and rollback
#check for error from DB and rollback
my @rc = $tab->setAttribs(\%record, \%record);
if (not defined($rc[0]))
{
@ -2340,11 +2340,27 @@ else {
}
#commit all the changes
my $rollback;
foreach (keys %tables) {
if (exists($tableupdates{$_})) {
$tables{$_}->setAttribs(\%keyhash,\%{$tableupdates{$_}});
my @rc=$tables{$_}->setAttribs(\%keyhash,\%{$tableupdates{$_}});
if (not defined($rc[0]))
{
$rollback = 1;
$callback->({error => "DB error " . $rc[1] , errorcode=>[4]});
}
}
if ($rollback)
{
$tables{$_}->rollback();
$tables{$_}->close;
undef $tables{$_};
return;
}
else
{
$tables{$_}->commit;
}
$tables{$_}->commit;
}
}
}