clear alarm for failure to register when we get a ping response

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/ec/trunk@38247 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
Richard Frith-MacDonald 2014-12-10 08:10:15 +00:00
parent b510488645
commit 146d598f34

View file

@ -657,7 +657,9 @@ static NSString* cmdWord(NSArray* a, unsigned int pos)
/* After the first ping response from a client we assume
* that client has completed startup and is running OK.
* We can therefore clear any loss of client alarm.
* We can therefore clear any loss of client alarm, any
* alarm for being unable to register, and launch failure
* or fatal configuration alarms.
*/
managedObject = EcMakeManagedObject(host, n, nil);
a = [EcAlarm alarmForManagedObject: managedObject
@ -669,6 +671,15 @@ static NSString* cmdWord(NSArray* a, unsigned int pos)
proposedRepairAction: nil
additionalText: nil];
[self alarm: a];
a = [EcAlarm alarmForManagedObject: managedObject
at: nil
withEventType: EcAlarmEventTypeProcessingError
probableCause: EcAlarmSoftwareProgramAbnormallyTerminated
specificProblem: @"Unable to register"
perceivedSeverity: EcAlarmSeverityCleared
proposedRepairAction: nil
additionalText: nil];
[self alarm: a];
[self clearConfigurationFor: managedObject
specificProblem: @"Process launch"
additionalText: @"Process is now running"];