private NodeToken backtrackCompletedToken(
final NodeToken token, final ExecutionType executionType) {
token.markBacktracked();
NodeTokenEvent.fireBacktrackedEvent(engine, token);
List<ArcToken> parents = new ArrayList<ArcToken>(token.getChildTokens().size());
for (ArcToken childToken : token.getChildTokens()) {
ArcToken parent = arcTokenMap.get(childToken);
if (parent == null) {
throw new RuntimeException("No backtrack found for: " + childToken);
}
parents.add(parent);
}
NodeToken backtrackToken =
engine
.getFactory()
.newNodeToken(token.getProcess(), token.getNode(), executionType, parents, token);
NodeTokenEvent.fireCreatedEvent(engine, backtrackToken);
token.getProcess().addNodeToken(backtrackToken);
shareTokenSets(backtrackToken, token);
for (ArcToken parent : parents) {
token.getProcess().removeActiveArcToken(parent);
parent.markBacktracked();
ArcTokenEvent.fireBacktrackedEvent(engine, parent);
parent.markComplete(backtrackToken);
ArcTokenEvent.fireCompletedEvent(engine, parent);
}
return backtrackToken;
}
private NodeToken backtrackToken(final NodeToken token) {
NodeToken backtrackToken = token;
if (!token.isComplete()) {
token.markComplete();
NodeTokenEvent.fireCompletedEvent(engine, backtrackToken, null);
token.markBacktracked();
NodeTokenEvent.fireBacktrackedEvent(engine, token);
token.getProcess().removeActiveNodeToken(token);
} else if (!token.getExecutionType().isBacktracked()) {
if (token.getChildTokens().isEmpty()) {
token.markBacktracked();
NodeTokenEvent.fireBacktrackedEvent(engine, token);
} else {
backtrackToken = backtrackCompletedToken(token, ExecutionType.Backtracked);
backtrackToken.setGuardAction(GuardAction.SkipNode);
NodeTokenEvent.fireSkippedEvent(engine, backtrackToken, null);
}
}
for (ArcToken parent : getParents(token)) {
boolean backtrackParent = visited.contains(parent.getParentToken());
token.getProcess().removeActiveArcToken(parent);
parent.markBacktracked();
ArcTokenEvent.fireBacktrackedEvent(engine, parent);
ArcToken backtrackArcToken =
engine
.getFactory()
.newArcToken(
token.getProcess(),
parent.getArc(),
backtrackParent ? ExecutionType.Backtracked : ExecutionType.UTurn,
backtrackToken);
ArcTokenEvent.fireCreatedEvent(engine, backtrackArcToken);
backtrackToken.getChildTokens().add(backtrackArcToken);
shareTokenSets(backtrackArcToken, parent);
if (backtrackParent && parent.getExecutionType() != ExecutionType.Forward) {
ArcToken mirror = backtrackMirror.getMirror(parent);
arcTokenMap.put(mirror, backtrackArcToken);
finishArcTokenBacktrack(backtrackArcToken, mirror);
} else {
finishArcTokenBacktrack(backtrackArcToken, parent);
}
}
return backtrackToken;
}
private void completeExecuteArc(GraphProcess process, Node targetNode, List<ArcToken> tokens) {
NodeToken nodeToken = getFactory().newNodeToken(process, targetNode, tokens);
process.addNodeToken(nodeToken);
// Add new node token to add the token sets which its generating arc tokens are members of
Set<TokenSet> tokenSets = new HashSet<TokenSet>();
for (ArcToken token : tokens) {
for (ArcTokenSetMember setMember : token.getTokenSetMemberships()) {
TokenSet tokenSet = setMember.getTokenSet();
if (!tokenSet.isComplete() && !tokenSets.contains(tokenSet)) {
tokenSets.add(tokenSet);
NodeTokenSetMember newSetMember =
getFactory().newNodeTokenSetMember(tokenSet, nodeToken, setMember.getMemberIndex());
tokenSet.getActiveNodeTokens(this).add(nodeToken);
nodeToken.getTokenSetMemberships().add(newSetMember);
}
}
}
fireEvent(NodeTokenEvent.newCreatedEvent(this, nodeToken));
for (ArcToken token : tokens) {
process.removeActiveArcToken(token);
if (token.isPending()) {
token.markProcessed(this);
}
token.markComplete(this, nodeToken);
fireEvent(ArcTokenEvent.newCompletedEvent(this, token));
}
executeNode(process, nodeToken);
}
private void finishNewArcTokenProcessing(
final GraphProcess process, final ArcToken arcToken, final boolean asynchronous) {
fireEvent(ArcTokenEvent.newCreatedEvent(this, arcToken));
if (asynchronous && arcExecutionStarted) {
asyncQueue.add(arcToken);
} else {
process.enqueueArcTokenForExecution(arcToken);
}
}
protected void finishArcTokenBacktrack(final ArcToken backtrackArcToken, final ArcToken parent) {
arcTokenMap.put(parent, backtrackArcToken);
NodeToken nodeTokenParent = parent.getParentToken();
if (visited.contains(nodeTokenParent)) {
queue.add(nodeTokenParent);
backtrackArcToken.markProcessed();
ArcTokenEvent.fireProcessedEvent(engine, backtrackArcToken);
} else {
parent.getProcess().enqueueArcTokenForExecution(backtrackArcToken);
}
}
private void backtrackLeafArcTokens() {
for (ArcToken token : arcTokenLeaves) {
arcTokenMap.put(token, token);
token.markBacktracked();
ArcTokenEvent.fireBacktrackedEvent(engine, token);
queue.add(token.getParentToken());
token.getProcess().removeActiveArcToken(token);
}
}
public NodeToken backtrackDeadEnd(final NodeToken token) {
token.markBacktracked();
NodeTokenEvent.fireBacktrackedEvent(engine, token);
List<ArcToken> parents = new ArrayList<ArcToken>(token.getParentTokens().size());
for (ArcToken parent : token.getParentTokens()) {
parent.markBacktracked();
ArcTokenEvent.fireBacktrackedEvent(engine, parent);
ArcToken backtrackArcToken =
engine
.getFactory()
.newArcToken(token.getProcess(), parent.getArc(), ExecutionType.UTurn, token);
ArcTokenEvent.fireCreatedEvent(engine, backtrackArcToken);
token.getChildTokens().add(backtrackArcToken);
parents.add(backtrackArcToken);
shareTokenSets(backtrackArcToken, parent);
}
NodeToken backtrackToken =
engine
.getFactory()
.newNodeToken(
token.getProcess(), token.getNode(), ExecutionType.Forward, parents, token);
NodeTokenEvent.fireCreatedEvent(engine, backtrackToken);
token.getProcess().addNodeToken(backtrackToken);
shareTokenSets(backtrackToken, token);
for (ArcToken parent : parents) {
parent.markProcessed();
ArcTokenEvent.fireProcessedEvent(engine, parent);
parent.markComplete(backtrackToken);
ArcTokenEvent.fireCompletedEvent(engine, parent);
}
reactivateTokenSets();
return backtrackToken;
}
