function scorm_seq_choice_activity_traversal($activity, $userid, $seq, $direction)
{
if ($direction == 'forward') {
$act = scorm_seq_rules_check($activity, 'stopforwardtraversal');
if ($act != null) {
$seq->reachable = false;
$seq->exception = 'SB.2.4-1';
return $seq;
}
$seq->reachable = false;
return $seq;
}
if ($direction == 'backward') {
$parentsco = scorm_get_parent($activity);
if ($parentsco != null) {
if (isset($parentsco->forwardonly) && $parentsco->forwardonly == true) {
$seq->reachable = false;
$seq->exception = 'SB.2.4-2';
return $seq;
} else {
$seq->reachable = false;
$seq->exception = 'SB.2.4-3';
return $seq;
}
}
}
$seq->reachable = true;
return $seq;
}
function scorm_seq_flow_activity_traversal($activity, $userid, $direction, $childrenflag, $prevdirection, $seq, $userid)
{
$parent = scorm_get_parent($activity);
if (!isset($parent->flow) || $parent->flow == false) {
$seq->deliverable = false;
$seq->exception = 'SB.2.2-1';
$seq->nextactivity = $activity;
return $seq;
}
$rulecheck = scorm_seq_rules_check($activity, 'skip');
if ($rulecheck != null) {
$skip = scorm_evaluate_condition($rulecheck, $activity, $userid);
if ($skip) {
$seq = scorm_seq_flow_tree_traversal($activity, $direction, false, $prevdirection, $seq, $userid, $skip);
$seq = scorm_seq_flow_activity_traversal($seq->nextactivity, $userid, $direction, $childrenflag, $prevdirection, $seq, $userid);
} else {
if (!empty($seq->identifiedactivity)) {
$seq->nextactivity = $activity;
}
}
return $seq;
}
$ch = scorm_check_activity($activity, $userid);
if ($ch) {
$seq->deliverable = false;
$seq->exception = 'SB.2.2-2';
$seq->nextactivity = $activity;
return $seq;
}
if (!scorm_is_leaf($activity)) {
$seq = scorm_seq_flow_tree_traversal($activity, $direction, true, null, $seq, $userid);
if ($seq->identifiedactivity == null) {
$seq->deliverable = false;
$seq->nextactivity = $activity;
return $seq;
} else {
if ($direction == 'backward' && $seq->traversaldir == 'forward') {
$seq = scorm_seq_flow_activity_traversal($seq->identifiedactivity, $userid, 'forward', $childrenflag, 'backward', $seq, $userid);
} else {
$seq = scorm_seq_flow_activity_traversal($seq->identifiedactivity, $userid, $direction, $childrenflag, null, $seq, $userid);
}
return $seq;
}
}
$seq->deliverable = true;
$seq->nextactivity = $activity;
$seq->exception = null;
return $seq;
}
function scorm_seq_post_cond_rules($seq, $userid)
{
$sco = $seq->currentactivity;
if (!$seq->suspended) {
if ($action = scorm_seq_rules_check($sco, 'post') != null) {
switch ($action) {
case 'retry':
case 'continue':
case 'previous':
$seq->sequencing = $action;
break;
case 'exitparent':
case 'exitall':
$seq->termination = $action;
break;
case 'retryall':
$seq->termination = 'exitall';
$seq->sequencing = 'retry';
break;
}
}
}
return $seq;
}
