-Attempt to lift restrictions on intra-service node that were imposed to mitigate DB handles
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4143 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
b421ab3302
commit
9076c195d1
@ -1067,9 +1067,9 @@ sub dispatch_request {
|
||||
foreach $xcatdest (@xcatdests) {
|
||||
my $dlock;
|
||||
if ($xcatdest and thishostisnot($xcatdest)) {
|
||||
mkpath("/var/lock/xcat/"); #For now, limit intra-xCAT requests to one at a time, to mitigate DB handle usage
|
||||
open($dlock,">","/var/lock/xcat/dispatchto_$xcatdest");
|
||||
flock($dlock,LOCK_EX);
|
||||
#mkpath("/var/lock/xcat/"); #For now, limit intra-xCAT requests to one at a time, to mitigate DB handle usage
|
||||
#open($dlock,">","/var/lock/xcat/dispatchto_$xcatdest");
|
||||
#flock($dlock,LOCK_EX);
|
||||
$ENV{XCATHOST} = ($xcatdest =~ /:/ ? $xcatdest : $xcatdest.":3001" );
|
||||
$$progname.=": connection to ".$ENV{XCATHOST};
|
||||
my $errstr;
|
||||
@ -1080,8 +1080,8 @@ sub dispatch_request {
|
||||
if ($@) {
|
||||
$errstr=$@;
|
||||
}
|
||||
unlink("/var/lock/xcat/dispatchto_$xcatdest");
|
||||
flock($dlock,LOCK_UN);
|
||||
#unlink("/var/lock/xcat/dispatchto_$xcatdest");
|
||||
#flock($dlock,LOCK_UN);
|
||||
if ($errstr) {
|
||||
if ($numdests == 1) {
|
||||
dispatch_callback({error=>["Unable to dispatch command to ".$ENV{XCATHOST}.", command will not make changes to that server ($errstr)"],errorcode=>[1]});
|
||||
|
Loading…
Reference in New Issue
Block a user